04-12-2007 10:38 AM
04-12-2007 10:43 AM
Hi,
write sy-pagno in end-of-page event.
Regards,
Sonika
Message was edited by:
Sonika Ahuja
04-12-2007 10:43 AM
Hi,
write sy-pagno in end-of-page event.
Regards,
Sonika
Message was edited by:
Sonika Ahuja
04-12-2007 10:44 AM
04-12-2007 11:28 AM
Hi,
In the END-OF-PAGE event , you can write
sy-pagno.
code:
END-OF-PAGE .
write:/ sy-pagno.
hope this helps. pls reward points if it helps .
04-12-2007 1:01 PM
Hai,
The better way is write at script editor as:
/: BOTTOM
&PAGE&
Regds,
Rama.Pammi
04-12-2007 1:04 PM
Hi Sriram,
Report zsudheer
line-size 80
line-count 65
no standard page heading.
data: imara type table of mara with header line.
selection-screen begin of block b1 with frame title text-001 .
parameters: p_check type c.
selection-screen end of block b1.
start-of-selection.
perform get_data.
perform write_report.
top-of-page.
perform top_of_page.
************************************************************************
FORM GET_DATA
************************************************************************
form get_data.
select * into corresponding fields of table imara
from mara up to 300 rows.
endform.
************************************************************************
FORM WRITE_REPORT
************************************************************************
form write_report.
data: xpage(4) type c.
loop at imara.
write:/ imara-matnr.
endloop.
write sy-pagno to xpage left-justified.
do sy-pagno times.
read line 1 of page sy-index.
replace '****' with xpage into sy-lisel.
modify current line.
enddo.
endform.
************************************************************************
Form top_of_page
************************************************************************
form top_of_page.
write:/32 'Test Program',
at 62 'Page:', at 67 sy-pagno, 'of', '****'.
endform.
Regards
Sudheer