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
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
|---|---|---|---|---|
| 571 | PROGRAM z13_05. | sapjoy | 2012.08.02 | 1177 |
| 570 | PROGRAM z13_04. | sapjoy | 2012.08.02 | 1049 |
| 569 | PROGRAM z13_03. | sapjoy | 2012.08.02 | 1190 |
| 568 | PROGRAM z13_02. | sapjoy | 2012.08.02 | 1205 |
| 567 | PROGRAM z13_01. | sapjoy | 2012.08.02 | 1449 |
| 566 | report Z12_33 | sapjoy | 2012.07.31 | 1218 |
| 565 | REPORT z12_32. | sapjoy | 2012.07.31 | 1021 |
| 564 | REPORT z12_31. | sapjoy | 2012.07.31 | 1328 |
| 563 | REPORT z12_30. | sapjoy | 2012.07.31 | 1170 |
| 562 | REPORT z12_29. | sapjoy | 2012.07.31 | 920 |
| 561 | REPORT z12_28. | sapjoy | 2012.07.31 | 1046 |
| 560 | REPORT z12_27. | sapjoy | 2012.07.31 | 1224 |
| 559 | REPORT Z12_26. | sapjoy | 2012.07.31 | 883 |
| 558 | REPORT z12_25. | sapjoy | 2012.07.31 | 1012 |
| 557 | REPORT z12_24. | sapjoy | 2012.07.31 | 1166 |
| 556 | REPORT z12_23. | sapjoy | 2012.07.31 | 1065 |
| » | REPORT Z12_22 | sapjoy | 2012.07.31 | 1242 |
| 554 | REPORT z12_21. | sapjoy | 2012.07.31 | 938 |
| 553 | REPORT Z12_20. | sapjoy | 2012.07.31 | 948 |
| 552 | REPORT Z12_19 | sapjoy | 2012.07.31 | 951 |
