把内表拆分开,每次拆出来的行数可以自己定义,一直到内表拆完为止。
如上图,需求时每8个行项目拆分一次,进行打印。
REPORT ZTEST003 NO STANDARD PAGE HEADING .
DATA: ITAB1 TYPE TABLE OF MAKT WITH HEADER LINE,
ITAB2 LIKE ITAB1[] WITH HEADER LINE.
"每次拆分条数
DATA COUNT TYPE I VALUE 8 .
START-OF-SELECTION.
SELECT *
INTO TABLE ITAB1
FROM MAKT
UP TO 100 ROWS .
SORT ITAB1 BY MATNR.
WHILE ITAB1[] IS NOT INITIAL .
CLEAR ITAB2[].
APPEND LINES OF ITAB1 TO COUNT TO ITAB2 .
DELETE ITAB1 TO COUNT.
LOOP AT ITAB2.
WRITE: / SY-TABIX,ITAB2-MATNR.
ENDLOOP.
SKIP.
ENDWHILE.