REPORT Z12_22 NO STANDARD PAGE HEADING
LINE-SIZE 120
LINE-COUNT 78.
DATA : GT_DATA TYPE TABLE OF SFLIGHT WITH HEADER LINE.
TOP-OF-PAGE.
WRITE:/50 'Report Format' CENTERED.
WRITE:/48 '------------------' CENTERED.
SKIP.
START-OF-SELECTION.
WRITE:/(51) SY-ULINE, 53(68) SY-ULINE,
/ SY-VLINE NO-GAP, 51 SY-VLINE NO-GAP, 53 SY-VLINE NO-GAP, 120 SY-VLINE NO-GAP.
WRITE: 2(9) 'Report No' NO-GAP CENTERED, SY-VLINE NO-GAP.
WRITE: 12(5) '00001' NO-GAP, 51 SY-VLINE NO-GAP.
WRITE: 54(11) 'Report Date' NO-GAP CENTERED, SY-VLINE NO-GAP.
WRITE: 66(10) SY-DATUM NO-GAP CENTERED, 120 SY-VLINE NO-GAP.
WRITE:/(51) SY-ULINE, 53(68) SY-ULINE.
SKIP.
WRITE:/(120) SY-ULINE.
SELECT * INTO CORRESPONDING FIELDS OF TABLE GT_DATA
FROM SFLIGHT UP TO 10 ROWS.
LOOP AT GT_DATA.
WRITE :/ SY-VLINE NO-GAP, 2(10) 'Carrier ID', SY-VLINE NO-GAP.
WRITE : 14(4) GT_DATA-CARRID, SY-VLINE NO-GAP.
WRITE : 20(18) 'Connection Number', SY-VLINE NO-GAP.
WRITE : 40(4) GT_DATA-CONNID, SY-VLINE NO-GAP.
WRITE : 46(12) 'Flight date', SY-VLINE NO-GAP.
WRITE : 60(12) GT_DATA-FLDATE, SY-VLINE NO-GAP.
WRITE : 74(10) 'Air Fare', SY-VLINE NO-GAP.
WRITE : 86(11) GT_DATA-PRICE, SY-VLINE NO-GAP.
WRITE : 100(15) 'Local currency', SY-VLINE NO-GAP.
WRITE : 116(3) GT_DATA-CURRENCY, SY-VLINE NO-GAP.
WRITE:/(120) SY-ULINE.
ENDLOOP.
LINE-SIZE 120
LINE-COUNT 78.
DATA : GT_DATA TYPE TABLE OF SFLIGHT WITH HEADER LINE.
TOP-OF-PAGE.
WRITE:/50 'Report Format' CENTERED.
WRITE:/48 '------------------' CENTERED.
SKIP.
START-OF-SELECTION.
WRITE:/(51) SY-ULINE, 53(68) SY-ULINE,
/ SY-VLINE NO-GAP, 51 SY-VLINE NO-GAP, 53 SY-VLINE NO-GAP, 120 SY-VLINE NO-GAP.
WRITE: 2(9) 'Report No' NO-GAP CENTERED, SY-VLINE NO-GAP.
WRITE: 12(5) '00001' NO-GAP, 51 SY-VLINE NO-GAP.
WRITE: 54(11) 'Report Date' NO-GAP CENTERED, SY-VLINE NO-GAP.
WRITE: 66(10) SY-DATUM NO-GAP CENTERED, 120 SY-VLINE NO-GAP.
WRITE:/(51) SY-ULINE, 53(68) SY-ULINE.
SKIP.
WRITE:/(120) SY-ULINE.
SELECT * INTO CORRESPONDING FIELDS OF TABLE GT_DATA
FROM SFLIGHT UP TO 10 ROWS.
LOOP AT GT_DATA.
WRITE :/ SY-VLINE NO-GAP, 2(10) 'Carrier ID', SY-VLINE NO-GAP.
WRITE : 14(4) GT_DATA-CARRID, SY-VLINE NO-GAP.
WRITE : 20(18) 'Connection Number', SY-VLINE NO-GAP.
WRITE : 40(4) GT_DATA-CONNID, SY-VLINE NO-GAP.
WRITE : 46(12) 'Flight date', SY-VLINE NO-GAP.
WRITE : 60(12) GT_DATA-FLDATE, SY-VLINE NO-GAP.
WRITE : 74(10) 'Air Fare', SY-VLINE NO-GAP.
WRITE : 86(11) GT_DATA-PRICE, SY-VLINE NO-GAP.
WRITE : 100(15) 'Local currency', SY-VLINE NO-GAP.
WRITE : 116(3) GT_DATA-CURRENCY, SY-VLINE NO-GAP.
WRITE:/(120) SY-ULINE.
ENDLOOP.
댓글 0
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
|---|---|---|---|---|
| 569 | PROGRAM z13_03. | sapjoy | 2012.08.01 | 1159 |
| 568 | PROGRAM z13_02. | sapjoy | 2012.08.01 | 1176 |
| 567 | PROGRAM z13_01. | sapjoy | 2012.08.01 | 1406 |
| 566 | report Z12_33 | sapjoy | 2012.07.30 | 1193 |
| 565 | REPORT z12_32. | sapjoy | 2012.07.30 | 993 |
| 564 | REPORT z12_31. | sapjoy | 2012.07.30 | 1310 |
| 563 | REPORT z12_30. | sapjoy | 2012.07.30 | 1159 |
| 562 | REPORT z12_29. | sapjoy | 2012.07.30 | 910 |
| 561 | REPORT z12_28. | sapjoy | 2012.07.30 | 1032 |
| 560 | REPORT z12_27. | sapjoy | 2012.07.30 | 1207 |
| 559 | REPORT Z12_26. | sapjoy | 2012.07.30 | 871 |
| 558 | REPORT z12_25. | sapjoy | 2012.07.30 | 997 |
| 557 | REPORT z12_24. | sapjoy | 2012.07.30 | 1152 |
| 556 | REPORT z12_23. | sapjoy | 2012.07.30 | 1021 |
| » | REPORT Z12_22 | sapjoy | 2012.07.30 | 1225 |
| 554 | REPORT z12_21. | sapjoy | 2012.07.30 | 919 |
| 553 | REPORT Z12_20. | sapjoy | 2012.07.30 | 926 |
| 552 | REPORT Z12_19 | sapjoy | 2012.07.30 | 930 |
| 551 | REPORT Z12_18. | sapjoy | 2012.07.30 | 964 |
| 550 | REPORT Z12_17. | sapjoy | 2012.07.30 | 978 |
