Value mit Corresponding und cond Operator, funktioniert nicht bei gleichen Feldnamen
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
13 Beiträge
•
Seite 1 von 1
13 Beiträge
Seite 1 von 1
Hallo zusammen,
einfache Aufgabe, aber keine Lösung mit den neuen Funktionen wenn man ohne Loop auskommen möchte:
Gleiche Felder aus Tabelle 1 sollen in Tabelle 2 übernommen werden, wenn TAB1-SDATE aber leer ist soll es mit heutigen Datum gefüllt werden:
Das funktioniert: (Feldname in Zielstruktur auf sdate_delete geändert, Datum wird gesetzt)
Das nicht: (gleicher Feldname in beiden Strukturen, Datum bleibt auf 0000000 )
Hat jemand eine Idee wie das trotzdem funktionieren könnte?
Danke und Gruß,
Wolfgang
einfache Aufgabe, aber keine Lösung mit den neuen Funktionen wenn man ohne Loop auskommen möchte:
Gleiche Felder aus Tabelle 1 sollen in Tabelle 2 übernommen werden, wenn TAB1-SDATE aber leer ist soll es mit heutigen Datum gefüllt werden:
Das funktioniert: (Feldname in Zielstruktur auf sdate_delete geändert, Datum wird gesetzt)
Code: Alles auswählen.
mth_cycles_del = VALUE #( FOR <ls_t811s> IN mt_t811s ( CORRESPONDING #( BASE ( VALUE #( sdate_delete = COND sydatum( WHEN <ls_t811s>-sdate = '00000000' THEN sy-datum ) ) ) <ls_t811s> ) ) ).Code: Alles auswählen.
mth_cycles_del = VALUE #( FOR <ls_t811s> IN mt_t811s ( CORRESPONDING #( BASE ( VALUE #( sdate = COND sydatum( WHEN <ls_t811s>-sdate = '00000000' THEN sy-datum ) ) ) <ls_t811s> ) ) ).Danke und Gruß,
Wolfgang
Geht nicht gibts nicht
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Beitrag
von black_adept (Top Expert / 4103 / 128 /
945
)
»
Moin Wolfgang,
im Wesentlichen verwendest du die Syntax "CORRESPONDING #( BASE (X) Y )" , wobei "X" als VALUE... COND... definiert ist.
Was hierbei passiert ist folgendes: Falls der BASE Zuatz fehlt initialisiert ABAP die Zielstruktur, andernfalls belegt sie sie mit dem X vor. Danach werden die namensgleichen Felder aus Y in die Zielstruktur übertragen.
Bei dir heißt das: In einem Fall setzt du das Feld SDATE_DELETE im anderen Fall das Feld SDATE. Da aber SDATE in der Struktur <ls_t811s> vorhanden ist, überschreibst du das Feld dann wieder mit dem Wert aus ebendieser Struktur, aber SDATE_DELETE ist nicht vorhanden und wird daher nicht überschrieben (zumindest gehe ich davon aus dass SDATE_DELETE zwar in mth_cycles_del enthalten ist aber nicht in mt_t811s weil ich mir nur so dein Problem erklären kann ).
Du musst also das "VALUE mit dem COND" in den hinteren Teil der Anweisung verfrachten.
Schau dir mal folgendes Beispiel an, das vereinfacht deinem Fall entspricht. So in etwa solltest du das umbauen
im Wesentlichen verwendest du die Syntax "CORRESPONDING #( BASE (X) Y )" , wobei "X" als VALUE... COND... definiert ist.
Was hierbei passiert ist folgendes: Falls der BASE Zuatz fehlt initialisiert ABAP die Zielstruktur, andernfalls belegt sie sie mit dem X vor. Danach werden die namensgleichen Felder aus Y in die Zielstruktur übertragen.
Bei dir heißt das: In einem Fall setzt du das Feld SDATE_DELETE im anderen Fall das Feld SDATE. Da aber SDATE in der Struktur <ls_t811s> vorhanden ist, überschreibst du das Feld dann wieder mit dem Wert aus ebendieser Struktur, aber SDATE_DELETE ist nicht vorhanden und wird daher nicht überschrieben (zumindest gehe ich davon aus dass SDATE_DELETE zwar in mth_cycles_del enthalten ist aber nicht in mt_t811s weil ich mir nur so dein Problem erklären kann ).
Du musst also das "VALUE mit dem COND" in den hinteren Teil der Anweisung verfrachten.
Schau dir mal folgendes Beispiel an, das vereinfacht deinem Fall entspricht. So in etwa solltest du das umbauen
Code: Alles auswählen.
REPORT.
TYPES: BEGIN OF lts_datum,
datum TYPE sydatum,
END OF lts_datum.
DATA: ls_syst TYPE syst.
ls_syst = CORRESPONDING #( BASE ( syst ) VALUE lts_datum( datum = '11111111' ) ).
BREAK-POINT.Folgende Benutzer bedankten sich beim Autor black_adept für den Beitrag:
DeathAndPain
Hallo black_adept,
ich habe das Beispiel mal vereinfacht, gleicher Ausdruck wie erstes Beispiel:
Das Datum wird nicht gesetzt. Wenn ich es umstelle so wie Du meinst bekomme ich Syntaxfehler: (vorher stand statt da #, da konnte der Compiler aber keinen Typ ableiten)
ich habe das Beispiel mal vereinfacht, gleicher Ausdruck wie erstes Beispiel:
Code: Alles auswählen.
TYPES:
BEGIN OF tp_source,
date TYPE d,
END OF tp_source,
BEGIN OF tp_target,
date TYPE d,
END OF tp_target.
DATA:
t_source TYPE STANDARD TABLE OF tp_source,
t_target TYPE STANDARD TABLE OF tp_target.
* füllen
t_source = VALUE #( ( date = '19000101' )
( date = '00000000' ) ).
t_target = VALUE #( FOR <s_source> IN t_source ( CORRESPONDING #( BASE ( VALUE #( date = COND #( WHEN <s_source>-date = '00000000' THEN sy-datum ) ) ) <s_source> ) ) ).Das Datum wird nicht gesetzt. Wenn ich es umstelle so wie Du meinst bekomme ich Syntaxfehler: (vorher stand statt da #, da konnte der Compiler aber keinen Typ ableiten)
Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.
Geht nicht gibts nicht
Der Zusatz BASE ist in diesem Beispiel mE nicht notwendig.
Wenn du COND verwendest, musst du auch ELSE verwenden.
Wenn du COND verwendest, musst du auch ELSE verwenden.
BASE ist doch notwendig!
ist im Grunde eine Abwandlung hiervon:
https://tricktresor.de/blog/correspondi ... faultwert/
ist im Grunde eine Abwandlung hiervon:
https://tricktresor.de/blog/correspondi ... faultwert/
Code: Alles auswählen.
t_target = VALUE #( FOR <s_source> IN t_source
( VALUE #( BASE CORRESPONDING #( <s_source> )
date = COND #( WHEN <s_source>-date = '00000000' THEN sy-datum
ELSE <s_source>-date ) ) ) ).
gerne. bei diesen Konstrukten muss ich auch immer irgendwo nachgucken, wie das wirklich funktionierte...
Beitrag
von DeathAndPain (Top Expert / 1961 / 261 /
415
)
»
Ich würde hier SWITCH statt COND nehmen, dann ist es schon mal ein bisschen übersichtlicher. 🙂
Folgende Benutzer bedankten sich beim Autor DeathAndPain für den Beitrag:
Romaniac
Beitrag
von black_adept (Top Expert / 4103 / 128 /
945
)
»
Moin Wolfgang,
nachdem ich noch mal drüber geschlafen habe: Deine Zuweisung scheint ja inherent kompliziert und somit fehleranfällig und schwer debug- / wartbar zu sein. Daher noch ein paar Alternativen
Alternative 1: Falls die Tabelle mt_t811S mittels SELECT aus der T811S gefüllt wird und das Feld SDATE nicht noch andere Funktionen hat, könntest du es direct beim SELECT mittels sql-expression "CASE" füllen
Alternative 2: Fast genau so, aber du hast keinen Einfluss auf das Füllen der mt_t811S und bist auf einen halbwegs modernen Release. Dann kannst du mittels aus der itab die Daten in die andere Tabelle überführen ( so in etwa - gerade kein modernes System unter den Fingern ). Da du das Feld SDATE durch das * und die explizite Feldangabe doppelt definiert hast zieht die am weitesten hinten stehende Angabe und das ist das CASE und du bist mehr oder minder gezwungen das INTO CORRESPONDING FIELDS OF zu verwenden
Alternative 3: Ganz anders mit 2 Befehlen, was ich für den Ottonormalprogrammier am verständlichsten halte:
Bei deinem komplexen Ansatz halte ich es für sehr gut einen Kommentar einzustreuen, der erklärt was zum Geier du dort vorhast. Die 3 Alternativen und hier vorrangig die 3. könnten m.E. ohne Kommentar verwendet werden, da dort eigentlich klar ist was passieren soll.
nachdem ich noch mal drüber geschlafen habe: Deine Zuweisung scheint ja inherent kompliziert und somit fehleranfällig und schwer debug- / wartbar zu sein. Daher noch ein paar Alternativen
Alternative 1: Falls die Tabelle mt_t811S mittels SELECT aus der T811S gefüllt wird und das Feld SDATE nicht noch andere Funktionen hat, könntest du es direct beim SELECT mittels sql-expression "CASE" füllen
Alternative 2: Fast genau so, aber du hast keinen Einfluss auf das Füllen der mt_t811S und bist auf einen halbwegs modernen Release. Dann kannst du mittels
Code: Alles auswählen.
SELECT itab~*,
CASE itab~sdate WHEN '00000000' THEN itab~sdate ELSE @sy-datum END AS sdate
FROM mt_t811S as itab
INTO CORRESPONDING FIELDS OF TABLE @mth_cycles_delAlternative 3: Ganz anders mit 2 Befehlen, was ich für den Ottonormalprogrammier am verständlichsten halte:
Code: Alles auswählen.
mth_cylces_del = CORRESPONDING #( mt_t811s ).
MODIFY mth_cylces_del FROM VALUE #( sdate = sy-datum ) TRANSPORTING sdate WHERE sdate IS INITIAL.Folgende Benutzer bedankten sich beim Autor black_adept für den Beitrag (Insgesamt 4):
ewx • Romaniac • DeathAndPain • tar
Hallo back_adept,
vielen Dank für Deine nächtliche Aufarbeitung meines Anliegens :-) Ich bin da auch Deiner Meinung, lieber Les- und debugbar als alles in einer Zeile komprimiert, Laufzeit dürfte da ja auch kein Argument sein.
Ursprünglich hatte mich ja ein Kollege gefragt ob das überhaupt gehen würde in einer Zeile, mit einem ganz anderen Ausdruck. Ich habe dann mein funktionierendes Beispiel mit der T811 Tabelle auf Datum umgebaut, ursprünglich hatte ich nur ein X gesetzt in einem Feld, das nur in einer Tabelle vorkommt und darum hat das funktioniert, bei gleichen Feldern bin ich dann auf dieses Problem gestoßen.
Ein schönes Wochendende allen,
Gruß Wolfgang
vielen Dank für Deine nächtliche Aufarbeitung meines Anliegens :-) Ich bin da auch Deiner Meinung, lieber Les- und debugbar als alles in einer Zeile komprimiert, Laufzeit dürfte da ja auch kein Argument sein.
Ursprünglich hatte mich ja ein Kollege gefragt ob das überhaupt gehen würde in einer Zeile, mit einem ganz anderen Ausdruck. Ich habe dann mein funktionierendes Beispiel mit der T811 Tabelle auf Datum umgebaut, ursprünglich hatte ich nur ein X gesetzt in einem Feld, das nur in einer Tabelle vorkommt und darum hat das funktioniert, bei gleichen Feldern bin ich dann auf dieses Problem gestoßen.
Ein schönes Wochendende allen,
Gruß Wolfgang
Geht nicht gibts nicht
Beitrag
von ralf.wenzel (Top Expert / 3946 / 201 /
281
)
»
Wenn man so ein Coding dokumentiert, dann kann man das schon machen. Aber nicht mit Kommentaren, sondern indem man die Anweisung in eine Methode schreibt, der man einen sprechenden Namen gibt.
Denen, die sagen "eine Anweisung in einer Methode ist Mist" (Gedenksekunde für Ex-Regular "daniel" 😉 ): Eigentlich ist das mehr als eine Anweisung.
Ralf
Denen, die sagen "eine Anweisung in einer Methode ist Mist" (Gedenksekunde für Ex-Regular "daniel" 😉 ): Eigentlich ist das mehr als eine Anweisung.
Ralf
Ralf Wenzel • Heuristika SAP-Development
25 Jahre SAP-Entwickler • 20 Jahre Freiberufler
Publikationen • Ungarische Notation • Xing
Seite 1 von 1
Vergleichbare Themen
0
Antw.
Antw.
1577
Views
Views
ABAP-interner Bug bei COND-Operator?
von DeathAndPain » 10.08.2018 19:16 • Verfasst in ABAP® für Anfänger
von DeathAndPain » 10.08.2018 19:16 • Verfasst in ABAP® für Anfänger
2
Antw.
Antw.
821
Views
Views
COND #( WHEN x IS NOT INITIAL THEN y ) funktioniert nicht
von Romaniac » 22.05.2022 14:58 • Verfasst in ABAP® Core
von Romaniac » 22.05.2022 14:58 • Verfasst in ABAP® Core
7
Antw.
Antw.
3713
Views
Views
Wie funktioniert der Z-Operator?
von DeathAndPain » 14.09.2017 18:10 • Verfasst in ABAP® für Anfänger
von DeathAndPain » 14.09.2017 18:10 • Verfasst in ABAP® für Anfänger
4
Antw.
Antw.
504
Views
Views
neue Schreibweise COND für if then else
von Micha_ela » 06.11.2024 12:12 • Verfasst in ABAP® für Anfänger
von Micha_ela » 06.11.2024 12:12 • Verfasst in ABAP® für Anfänger
Frage die ABAP Experten
Über diesen Beitrag
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
CL_GUI_ALV_GRID - Zeilen auf Read-Only / Editierbar schalten
vor 3 Tagen von a-dead-trousers 5 / 1229
vor 3 Tagen von a-dead-trousers 5 / 1229
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.
Aktuelle Forenbeiträge
CL_GUI_ALV_GRID - Zeilen auf Read-Only / Editierbar schalten
vor 3 Tagen von a-dead-trousers 5 / 1229
vor 3 Tagen von a-dead-trousers 5 / 1229