Footer In Classical Report

Question

Hi All,
    I want to fix the Footer of page just like header which is fixed. I mean that the header and footer are fixed and only data should scroll. just like what ALV do.
Please send me the sample code for this.
Reagrds,
Kiran I

Answer 1

Pls refer this code it may be helpful....
REPORT zfootertest
NO STANDARD PAGE HEADING
LINE-COUNT 50(5).   "Determines each page size & footer size
system reserves five lines for the footer
DATA : it_mara TYPE STANDARD TABLE OF mara WITH HEADER LINE.
DATA : W_NL TYPE I. " TO HOLD THE NO OF LINES
START-OF-SELECTION.
  SELECT * FROM mara INTO TABLE it_mara UP TO 1000 ROWS.
end-of-selection.
  LOOP AT it_mara.
    WRITE : / it_mara-matnr,
              it_mara-mtart.
  ENDLOOP.
<b>IF SY-LINNO < SY-LINCT " this checks how many lines are left
W_NL = SY-LINCT - SY-LINNO - 8." 5 IS FOR FOOTER AND 3 IS FOR HEADER
SKIP W_NL. " it will skip the no of lines in the w_ln
ENDIF.</b>
TOP-OF-PAGE.
  FORMAT COLOR COL_HEADING ON.
  WRITE : 'Material Data'.
  WRITE : /5  'SY-LINNO' , sy-linno,
          /5 'SY-LINCT' , sy-linct.
FORMAT COLOR COL_HEADING OFF.
END-OF-PAGE.
  FORMAT COLOR COL_HEADING ON.
  WRITE AT 10 sy-datum LEFT-JUSTIFIED.
  WRITE : /5  'SY-LINNO' , sy-linno,
          /5 'SY-LINCT' , sy-linct.
  FORMAT COLOR COL_HEADING OFF.
If it is found helpful Pls reward it.............