With ACUCOBOL-GT in HP COBOL compatibility mode, you can include TOP and NO SPACE CONTROL as Special Names in the ADVANCING
clause of the WRITE statement. These Special Names can be used in Format 1 of the WRITE statement when the program accesses
sequential files.
Format
WRITE record-name [FROM source] [{BEFORE} ADVANCING {mnemonic-name}
{After}
Syntax Rules
- record-name is the name of a record associated with a file described in the File Section of the Data Division. The associated file may
not be a sort file. For more information, see WRITE Statement.
- source is a data item or literal. It may not share any storage area with record-name. For more information, see WRITE Statement.
- mnemonic-name is a user-defined word that may be used to change the state of the associated program switch or to refer to a device. For
details, see syntax rule 2 in Special-Names Paragraph.
General Rules
- mnemonic-name assigned to TOP advances the line to the next page boundary (same as specifying PAGE).
- mnemonic-name assigned to NO SPACE CONTROL suppresses spacing and keeps the line printer from advancing.
TOP and NO SPACE CONTROL are system-names accepted by ACUCOBOL-GT in HP COBOL compatibility mode. (For details, see syntax
rule 3 in Special-Names Paragraph.