Header to be displayed on each page(I cannot use TOP_OF_PAGE)

Question

hi all,
I am writing a classical report. My output has two types of records. One is stored in internal table ITAB1 and other in ITAB2.
ITAB1 and ITAB2 don't have same header. I need to first display the records in ITAB1 and later ITAB2.
The problem here is both the tables have records exceeding one page. I need to print corresponding headers on each page.
For Ex: If ITAB1 has records which cover two pages, then ITAB1 header needs to be printed on each page. After that ITAB2 header needs to be printed on each page.
Can you please help.
Thanks,
Aravind

Answer 1

Hi Aravind,
You can try the following, declare a flag variable an set its value as 1. Now in event top-of-page check the value of the flag , if it is 1 write the heading for ITAB1 else write the heading for ITAB2.. Assume that the page length is 25 rows, that would invoke top-of-page after 25 rows. Now the output that you are displaying would be using the loop at itab1. write. endloop.
After the loop is completed increment the flag by 1 and call new page. Now the flag contains 2 hence the heading for ITAB2 will be called.
top-of-page.
if flag = 1.
  write <heading1>
else.
  write <heading2>
endif.
start-of-selection.
loop at itab1.
write <data from itab1>.
endloop.
flag = flag + 1.
<invoke new page by NEW-PAGE command>
loop at itab2.
  write <data from itab2>.
endloop.
Hope this helps.
Regards,
Sachin