PARAMETER:  pa_car TYPE sflight-carrid.

DATA: itab_demofocc TYPE STANDARD TABLE OF demo_focc,
      wa_demofocc LIKE LINE OF itab_demofocc,
      itab_sort LIKE itab_demofocc.

AUTHORITY-CHECK OBJECT 'S_CARRID'
                    ID 'CARRID' FIELD pa_car
                    ID 'ACTVT' FIELD '03'.


SELECT * FROM sflight
INTO CORRESPONDING FIELDS OF TABLE itab_demofocc
WHERE sflight~carrid = pa_car.

PERFORM printflightinfo
USING
itab_demofocc.