REPORT ZDYNAMIC_ITAB_08.
TABLES : SFLIGHT.
SELECT-OPTIONS : S_CARRID FOR SFLIGHT-CARRID,
S_FLDATE FOR SFLIGHT-FLDATE.
DATA : GT_SFLIGHT LIKE SFLIGHT OCCURS 0 WITH HEADER LINE,
L_TEXT(72),
L_CNT(2) TYPE C.
DATA : BEGIN OF L_SRC_ST_IT OCCURS 0,
TEXT(72),
END OF L_SRC_ST_IT.
SELECT * INTO TABLE GT_SFLIGHT
FROM SFLIGHT
WHERE CARRID IN S_CARRID
AND FLDATE IN S_FLDATE.
CLEAR : L_CNT.
SORT GT_SFLIGHT BY FLDATE.
CLEAR : L_SRC_ST_IT.
L_SRC_ST_IT-TEXT = '*& Include ZDYNAMIC_ITAB_08TOP *'.
APPEND L_SRC_ST_IT.
CLEAR : L_SRC_ST_IT.
L_SRC_ST_IT-TEXT = 'DATA : BEGIN OF GT_FLDATE OCCURS 0,'.
APPEND L_SRC_ST_IT.
CLEAR : L_SRC_ST_IT.
L_SRC_ST_IT-TEXT = ' CARRID LIKE SFLIGHT-CARRID,'.
APPEND L_SRC_ST_IT.
CLEAR : L_SRC_ST_IT.
LOOP AT GT_SFLIGHT.
ON CHANGE OF GT_SFLIGHT-FLDATE.
L_CNT = L_CNT + 1.
CONCATENATE ' FLDATE' L_CNT ' LIKE SFLIGHT-FLDATE,' INTO L_TEXT.
L_SRC_ST_IT-TEXT = L_TEXT.
APPEND L_SRC_ST_IT.
CLEAR : L_SRC_ST_IT.
ENDON.
ENDLOOP.
L_SRC_ST_IT-TEXT = ' END OF GT_FLDATE.'.
APPEND L_SRC_ST_IT.
INSERT REPORT 'ZDYNAMIC_ITAB_09_TOP' FROM L_SRC_ST_IT.
EXPORT GT_SFLIGHT TO MEMORY ID 'TEST_ID'.
CALL TRANSACTION 'ZDYNAMIC_ITAB_09' AND SKIP FIRST SCREEN.
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
590 | REPORT Z12_20. | sapjoy | 2012.07.30 | 926 |
589 | REPORT z12_10. | sapjoy | 2012.07.30 | 927 |
588 | REPORT z05_05. | sapjoy | 2012.07.30 | 931 |
587 | REPORT Z12_19 | sapjoy | 2012.07.30 | 931 |
586 | REPORT z12_12. | sapjoy | 2012.07.30 | 932 |
585 | REPORT z14_04. | sapjoy | 2012.08.01 | 932 |
584 | REPORT z17_11 . | sapjoy | 2012.08.01 | 933 |
583 | REPORT z15_11. | sapjoy | 2012.08.01 | 937 |
582 | REPORT Z16_02. | sapjoy | 2012.08.01 | 939 |
581 | REPORT Z07_05. | sapjoy | 2012.07.30 | 943 |
580 | REPORT z05_13. | sapjoy | 2012.07.30 | 945 |
579 | REPORT z15_27. | sapjoy | 2012.08.01 | 946 |
578 | REPORT z05_15. | sapjoy | 2012.07.30 | 948 |
577 | REPORT z15_19. | sapjoy | 2012.08.01 | 952 |
576 | REPORT Z12_02 | sapjoy | 2012.07.30 | 953 |
575 | REPORT z17_09 . | sapjoy | 2012.08.01 | 954 |
574 | REPORT z12_09. | sapjoy | 2012.07.30 | 960 |
573 | REPORT z17_12 . | sapjoy | 2012.08.01 | 961 |
572 | REPORT z15_26. | sapjoy | 2012.08.01 | 964 |
571 | REPORT Z12_18. | sapjoy | 2012.07.30 | 967 |