report zsdr2618 no standard page heading message-id zmsg
line-size 91 line-count 60(1).
생략..
*&----- INITIALIZATION
initialization.
s_audat = sy-datum.
*&----- AT SELECTION-SCREEN
at selection-screen.
check sy-ucomm = 'ONLI'.
clear sy-ucomm.
perform read_data.
at selection-screen on value-request for s_prdha-low.
perform f4_matkl.
*---- TOP OF TAGE
top-of-page.
perform top_of_page.
*---- END OF TAGE
end-of-page.
perform end_of_page.
*&----- START-OF-SELECTION.
start-of-selection.
perform process_data.
perform write_data.
생략..
*&---------------------------------------------------------------------*
*& form write_data
*&---------------------------------------------------------------------*
form write_data.
data : l_kunnr like zsdtcham-kunnr.
sort itab by kunnr zdc matnr.
clear : l_kunnr.
loop at itab.
g_ant = g_ant + 1.
write : /(01) '|' no-gap,
(40) itab-arktx no-gap,
(01) '|' no-gap,
(5) itab-zcnt no-gap,
(01) '|' no-gap,
(10) itab-zjunga no-gap,
(01) '|' no-gap,
(7) itab-zdc+1(2) no-gap centered,
(01) '|' no-gap,
(10) itab-zamt2 no-gap,
(01) '|' no-gap,
(12) itab-zamt1 no-gap,
(01) '|' no-gap.
at end of kunnr.
perform write_sum.
new-page.
endat.
endloop.
perform write_sum.
endform. " WRITE_DATA
생략..
*&---------------------------------------------------------------------*
*& Form END_OF_PAGE
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
form END_OF_PAGE .
if g_ant <> 57.
uline.
clear g_ant.
endif.
endform. " END_OF_PAGE
이런식으로요!! 데이터의 양에 따라 줄은 인위적으로 긋고요
데이터가 많아서 다음 페이지로 이동할때는 end-of-page로 줄을 긋고
출력하는 프로그램입니다.
제가 뭘 잘못 이해했나요??
