Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- *&---------------------------------------------------------------------*
- *& Report Z_POPOV_TASK_2
- *&---------------------------------------------------------------------*
- *&
- *&---------------------------------------------------------------------*
- REPORT Z_POPOV_TASK_2.
- TABLES sflight.
- DATA: it_sflight TYPE sflight OCCURS 100 WITH HEADER LINE.
- SELECTION-SCREEN BEGIN OF BLOCK bl1 WITH FRAME TITLE TEXT-001.
- PARAMETERS: airline TYPE sflight-carrid DEFAULT 'AA',
- code TYPE sflight-connid DEFAULT '0064'.
- SELECT-OPTIONS date FOR sflight-fldate DEFAULT '20150101' TO '20180101'NO-EXTENSION.
- SELECTION-SCREEN END OF BLOCK bl1.
- START-OF-SELECTION.
- WRITE:
- / sy-vline,
- 5 'CARRID',
- 10 sy-vline,
- 15 'CONNID',
- 20 sy-vline,
- 25 'FLDATE',
- 35 sy-vline,
- 38 'PRICE',
- 60 sy-vline,
- / sy-uline(60).
- SELECT * FROM sflight INTO CORRESPONDING FIELDS OF it_sflight
- WHERE carrid = airline AND connid = code AND fldate IN date.
- WRITE:
- / sy-vline,
- 5 it_sflight-carrid ,
- 10 sy-vline,
- 15 it_sflight-connid,
- 20 sy-vline,
- 25 it_sflight-fldate,
- 35 sy-vline,
- 38 it_sflight-price,
- 60 sy-vline,
- / sy-uline(60).
- ENDSELECT.
- END-OF-SELECTION.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement