Code: Alles auswählen.
DATA: lt_vbap TYPE TABLE OF vbap,
ls_vbap TYPE vbap.
DATA: menge TYPE vbap-kwmeng.
SELECT * FROM vbap INTO TABLE lt_vbap UP TO 200 ROWS.
SORT lt_vbap BY vbeln.
LOOP AT lt_vbap INTO ls_vbap.
AT NEW vbeln.
CLEAR menge.
WRITE: / 'Verkaufsbeleg:', ls_vbap-vbeln.
ENDAT.
WRITE: / 'Position:', ls_vbap-posnr, ls_vbap-kwmeng.
menge = menge + ls_vbap-kwmeng.
AT END OF vbeln.
WRITE: / 'Verkaufsbeleg:', ls_vbap-vbeln, menge.
ENDAT.
ENDLOOP.