Code: Alles auswählen.
DATA:
l_it_tabelle TYPE TABLE OF Y000001700, "Tabelle
l_wa_tabelle LIKE LINE OF l_it_tabelle, " Workarea
l_sytabix TYPE sy-tabix. "Zeilenanzahl
* Zuerst mal alle Daten aus der multiplen Struktur in die interne Tabelle schreiben
* Zeilenanzahl ermitteln
CALL METHOD <pub__service>->api__max_occurrence
EXPORTING
i_alias = 'ZPPTKP'
RECEIVING
r_occ = l_sytabix.
* Tabelle von unten nach oben durchlaufen
WHILE l_sytabix > 0.
*
* Werte in Workarea schreiben
CALL METHOD <pub__service>->API__GET_VALUE " Mitarbeiter
EXPORTING
I_ALIAS = 'ZPPKPHZ3'
I_OCC = l_sytabix
IMPORTING
E_VALUE = l_wa_tabelle-ZPPKPHZ3.
CALL METHOD <pub__service>->API__GET_VALUE " Datum
EXPORTING
I_ALIAS = 'ZPPKPMAS'
I_OCC = l_sytabix
IMPORTING
E_VALUE = l_wa_tabelle-ZPPKPMAS.
CALL METHOD <pub__service>->API__GET_VALUE " Zeit (von)
EXPORTING
I_ALIAS = 'ZPPKPEDAT'
I_OCC = l_sytabix
IMPORTING
E_VALUE = l_wa_tabelle-ZPPKPEDAT.
* Workarea in die interne Tabelle schreiben
append l_wa_tabelle to l_it_tabelle.
l_sytabix = l_sytabix - 1.
ENDWHILE.
* Zähler initialisieren
CLEAR l_sytabix.
"Neu eingegebene Daten aus F4-Hilfe auslesen und an Workarea übergeben
LOOP AT l_it_returntab INTO l_wa_returntab.
append l_wa_returntab to l_it_tabelle.
endloop.