Dein Unternehmen ist auf der Suche nach neuen Kolleg:innen? Gerne weitersagen:Stellenanzeigen auf ABAPforum.com schalten
.Eine Methode ist das hochladen in das Forum.Bill S´geht hat geschrieben:Wie kann ich eigendlich Bildschirmschnappschüsse in das Forum bringen...
Die Frage ist nun, ob die Eigenschaftswerte in eine Datenbanktabelle übernommen werden als Wertetabelle,Bill S´geht hat geschrieben:..ich über den Nummernschlüssel (die erset Stelle) als Berechnetes Feld angegeben...
Code: Alles auswählen.
DATA: lv_temp type string,
lv_QCODE type QCODE,
i TYPE i.
break sapuser.
clear: lv_QCODE, mytext.
* wieviele Stellen ?
i = STRLEN( qpcd-code ).
* Stelle sicher Code hat nur Zahlen an erster und zweiter Stelle
IF i = 2 AND qpcd-code(1) CO '0123456789' AND qpcd-code+1(1) CO '0123456789'.
lv_QCODE = qpcd-code.
ENDIF.
* Stelle sicher Code hat nur Zahlen an ersterStelle
IF i = 1 AND qpcd-code(1) CO '0123456789'.
lv_QCODE = qpcd-code.
ENDIF.
* Wenns nicht passt dann raus
if lv_QCODE is initial.
exit.
endif.
*Einstellige Zahl
if i = 1 .
mytext = QPCT-KURZTEXT.
endif.
*Zweistellige Zahl-> kombiniere
if i = 2 .
select single KURZTEXT from QPCT INTO lv_temp where
KATALOGART = QPCD-KATALOGART and
CODEGRUPPE = QPCD-CODEGRUPPE and
CODE = lv_QCODE(1) and
SPRACHE = QPCT-SPRACHE.
select single KURZTEXT from QPCT INTO mytext where
KATALOGART = QPCD-KATALOGART and
CODEGRUPPE = QPCD-CODEGRUPPE and
CODE = lv_QCODE+1(1) and
SPRACHE = QPCT-SPRACHE.
concatenate lv_temp '-' mytext into mytext.
endif.
Code: Alles auswählen.
CODE KURZTEXT MYTEXT
1 COLOR 1 1 01.01.1993 Rot Rot
1 COLOR 10 1 01.01.1993 Braun Rot-
1 COLOR 11 1 01.01.1993 Hellrot Rot-Rot
1 COLOR 12 1 01.01.1993 Mittelrot Rot-Violett
1 COLOR 13 1 01.01.1993 Dunkelrot Rot-Blau
1 COLOR 2 1 01.01.1993 Violett Violett
1 COLOR 3 1 01.01.1993 Blau Blau
1 COLOR 4 1 01.01.1993 Grün Grün
1 COLOR 5 1 01.01.1993 Gelb Gelb
1 COLOR 6 1 01.01.1993 Orange Orange
1 COLOR 7 1 01.01.1993 Weiß Weiß
1 COLOR 8 1 01.01.1993 Schwarz Schwarz
1 COLOR 9 1 01.01.1993 Grau Grau
Folgende Benutzer bedankten sich beim Autor Tron für den Beitrag:
Bill S´geht
Ja, wenn Du debuggen möchtest , trage Deinen User ein.Kurze frage . Was bewirkt der Break sapuser, ist dies zum das Coding zu debuggen kann. (Müsste ich hier meinen Benutzer eintragen?)
Habe ich schon gemacht, leider findet er nur den Katalog 1.1.)
Hake KATALOG im Query zur selektion an ( und was man sonst noch braucht )
bzw. kontrolliere was auf der Datenbank zur finden ist in der Tabelle QPCD . Vorzugsweise mit SE16N.
So alle Daten auf der Datenbank sind, sollte die Selektion kein Problem sein.Bill S´geht hat geschrieben:Habe ich schon gemacht, leider findet er nur den Katalog 1.
Folgende Benutzer bedankten sich beim Autor Tron für den Beitrag:
Bill S´geht