List Output - how to position cursor back to Page 1, line 5, column 90.

Question

Hello,
I have a report program that calculates and writes a Grand Total at the end of a multiple page report.
The program can not calculate the Grand Total until the end of the program.  Pages are displayed as Subtotals are calculated. My user wants the Grand Total to also be displayed at the top of Page one.    I am able to write to any line and column position just fine using the Skip to Line command.
But I can not find a way to return to Page 1 then write the value.  I have tried
SCROLL LIST TO FIRST PAGE   and I have tried to reset the sy-pagno value prior to the write
statement.   Is there a way to page back and write to a report list?
Thanks
MPersson

Answer 1

Check this sample code:
Here page no like 1 of totpage is inserted to top of every page. Similarly u can display total to each page.
REPORT ZLTEST3 NO STANDARD PAGE HEADING
LINE-COUNT 65
LINE-SIZE 80.
DATA: NUM_PAGES_C(10) TYPE C.
PERFORM WRITE.
PERFORM GET_TOTAL_PAGENO.
TOP-OF-PAGE.
WRITE:/(SY-LINCT) 'TEST - TEST' CENTERED.
WRITE: / SY-DATUM, 60 SY-PAGNO,'of', '*****'.
SKIP.
*& Form WRITE
text *
--> p1 text
<-- p2 text
FORM WRITE.
DO 200 TIMES.
WRITE:/ 'TEST', SY-LINNO.
ENDDO.
ENDFORM. " WRITE
*& Form GET_TOTAL_PAGENO
text *
--> p1 text
<-- p2 text
FORM GET_TOTAL_PAGENO.
WRITE SY-PAGNO TO NUM_PAGES_C LEFT-JUSTIFIED.
DO SY-PAGNO TIMES.
READ LINE 2 OF PAGE SY-INDEX.
REPLACE '*****' WITH NUM_PAGES_C INTO SY-LISEL.
MODIFY LINE 2 OF PAGE SY-INDEX.
ENDDO.
ENDFORM. " GET_TOTAL_PAGENO
Note : this method only works in foreground