BEGIN-FOOTING

Function

Begins the FOOTING section.

Syntax

BEGIN-FOOTING footing_lines_int_lit
[FOR-REPORTS=(report_name1[,report_namei]...)]
[FOR-TOCS=(toc_name1[,toc_namei]...)]
[NAME={footing_name}]
END-FOOTING

Arguments

footing_lines_int_lit

Number of lines to reserve at the bottom of each page.

FOR-REPORTS

Reports to which this footing applies. Required only for programs with multiple reports.

FOR-TOCS

Table of Contents to which this heading applies.

NAME

Name associated with this footing section. Used with ALTER-REPORT. Cannot be NONE or DEFAULT.

Description

FOOTING sections define and control information printed at the bottom of each page.

Define report_name in DECLARE-REPORT. If you do not use DECLARE-REPORT, the footing is applied to all reports. You can also specify FOR‑REPORTS=(ALL). (The parentheses are required).

There can only be one BEGIN-FOOTING section for each report. A BEGIN-FOOTING section with FOR‑REPORTS=(ALL) can be followed by other BEGIN-FOOTING sections for specific reports, which override ALL.

Define toc_name in DECLARE-TOC. You can also specify FOR‑TOCS=(ALL). (The parentheses are required.)

There can only be one BEGIN-FOOTING section for each Table of Contents. A BEGIN-FOOTING section with FOR-TOCS=(ALL) can be followed by other BEGIN-FOOTING sections for a specific Table of Contents, which override ALL.

BEGIN-FOOTING sections can be shared between reports and Table of Contents.

You can print outside the Footing area of the report from the Footing, but you cannot print into the Footing area from the body.

Examples

begin-footing 2 for-reports=(customer, summary)
  print 'Company Confidential' (1,1,0) center
  page-number (2,37,0)
end-footing

begin-footing 2                  ! For all reports
  print 'Division Report' (1,1,0) center
  page-number (2,37,0)
end-footing

begin-footing 2 for-tocs=(all) 
  print 'Table of Contents' (2,1) 
  let $page = roman(#page-count)	! ROMAN numerals 
  print $page (,64) 
end-footing