Code: Alles auswählen.
CLEAR jkap.
SELECT * FROM jkap
WHERE vbeln = i_jkak-vbeln
AND poart IN ('NP', 'PP')
AND xstorno = ' '
AND gueltigbis = max_gueltigbis.
MODIFY jkap.
ENDSELECT.
MOVE-CORRESPONDING jkap TO zdpv_wbz.
INSERT zdpv_wbz.
ENDLOOP.