HP 3000 Manuals

Language Concepts [ Micro Focus COBOL Language Reference - Additional Topics ] MPE/iX 5.0 Documentation


Micro Focus COBOL Language Reference - Additional Topics

Language Concepts 

Report File 

A report file is an output file having sequential organization.  A report
file has a file description entry containing a REPORT clause.  The
content of a report file consists of records that are written under
control of the RWCS.

A report file is named by a file control entry and is described by a file
description entry containing a REPORT clause.  A report file is referred
to and accessed by the OPEN, GENERATE, INITIATE, SUPPRESS, TERMINATE, USE
BEFORE REPORTING, and CLOSE statements.

Special Register PAGE-COUNTER 

The reserved word PAGE-COUNTER is a name for a page counter that is
generated for each RD entry in the report section of the Data Division.
The implicit description is PIC 9(6) BINARY. The value in PAGE-COUNTER is
maintained by the RWCS and is used by the program to number the pages of
a report.  PAGE-COUNTER can be referenced only in the SOURCE clause of
the Report Section and in Procedure Division statements.  (See the
section PAGE-COUNTER Rules later in this chapter.)

Special Register LINE-COUNTER 

The reserved word LINE-COUNTER is a name for a line counter that is
generated for each RD entry in the report section of the data division.
The implicit description is PIC 9(6) BINARY. The value in LINE-COUNTER is
maintained by the RWCS, and is used to determine the vertical positioning
of a report.  LINE-COUNTER can be referenced only in the SOURCE clause of
the report section and in Procedure Division statements; however, only
the RWCS can change the value of LINE-COUNTER. (See the section
LINE-COUNTER Rules later in this chapter.)

For OSVS only:  Special Register PRINT-SWITCH 

The reserved word PRINT-SWITCH is a name for a register whose value may
be set to non-zero in the course of a USE BEFORE REPORTING declarative
procedure.  This has the effect of suppressing printing of the
corresponding report group.

Subscripting 

In the Report Section, neither a sum counter nor the special registers
LINE-COUNTER and PAGE-COUNTER can be used as a subscript.



MPE/iX 5.0 Documentation