23 Eylül 2013 Pazartesi

Example for COLLECT statement


DATA: BEGIN OF seats,
        carrid   TYPE sflight-carrid,
        connid   TYPE sflight-connid,
        seatsocc TYPE sflight-seatsocc,
       END OF seats.

DATA seats_tab LIKE HASHED TABLE OF seats
                WITH UNIQUE KEY carrid connid.

SELECT carrid connid seatsocc
       FROM sflight
       INTO seats.
  COLLECT seats INTO seats_tab.
ENDSELECT.

LOOP AT seats_tab INTO SEATS.
  WRITE: / 'CARRID:', SEATS-carrid, 'CONNID: ', SEATS-Connid , 'SEATSOCC: ', SEATS-seatsocc.
ENDLOOP.

Hiç yorum yok:

Yorum Gönder