interne Tabelle (itab)

REPORT YZSM0006 .
TABLES SFLIGHT.
TYPES: BEGIN OF F_LISTE,
CARRID LIKE SFLIGHT-CARRID,
SEATSMAX LIKE SFLIGHT-SEATSMAX,
END OF F_LISTE.

DATA: ID LIKE SFLIGHT-CARRID,
MAX LIKE SFLIGHT-SEATSMAX,
FLUG_LISTE TYPE F_LISTE OCCURS 10 WITH HEADER LINE.

SELECT CARRID SEATSMAX INTO (ID, MAX) FROM SFLIGHT.
APPEND SFLIGHT TO FLUG_LISTE.
ENDSELECT.

LOOP AT FLUG_LISTE WHERE SEATSMAX > 5000.
WRITE: /10 FLUG_LISTE-CARRID, 40 FLUG_LISTE-SEATSMAX.
ENDLOOP.

(alle Quelltexte können hier heruntergeladen werden.)

Veröffentlicht in ABAP Getagged mit: , , , , , , , , ,

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert.

*