REPORT  Z04_001 .

DATA: itab TYPE STANDARD TABLE OF

             sflight,

             wa LIKE LINE OF itab.

SELECT *

INTO CORRESPONDING FIELDS OF wa

FROM sflight

WHERE  carrid EQ ‘LH’.

             WRITE : / wa-carrid, wa-connid.

ENDSELECT.

REPORT  Z04_001 .

DATA: itab TYPE STANDARD TABLE OF

             sflight,

             wa LIKE LINE OF itab.

SELECT *

INTO CORRESPONDING FIELDS OF TABLE itab  FROM sflight

WHERE carrid EQ ‘LH’.

IF SY-SUBRC EQ 0.

             LOOP AT itab INTO wa.

                           WRITE: / wa-carrid, wa-connid.  ENDLOOP.

ENDIF.