This section discusses ACUCOBOL-GT's compatibility with the non-ANSI features of HP e3000 COBOL that affect the Special Names Paragraph of the Environment Division.
Program switches
ACUCOBOL-GT in its HP e3000 COBOL compatibility mode allows you to specify the HP COBOL program switches in the Special Names Paragraph. HP e3000 COBOL specifies those switches as "SW0" through "SW15." ACUCOBOL-GT in the default mode uses "SWITCH-1" through "SWITCH-26."
TOP and NO SPACE CONTROL
With ACUCOBOL-GT in its HP e3000 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 is accessing sequential files.
Format 1
WRITE record-name [ FROM source ] [ {BEFORE} ADVANCING {mnemonic-name} ...]
{AFTER }
Syntax Rules
1. 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. (See Book 3, Reference Manual, section 6.6, "Procedure Division Statements," WRITE Statement.)
2. source is a data item or literal. It may not share any storage area with record-name. (See Book 3, Reference Manual, section 6.6, "Procedure Division Statements," WRITE Statement.)
3. 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. (See Book 3, Reference Manual, section 4.2.3, "Special Names Paragraph," syntax rule 2.)
General Rules
1. mnemonic-name assigned to TOP advances the line to the next page boundary (same as specifying PAGE).
2. mnemonic-name assigned to NO SPACE CONTROL suppresses spacing and keeps the line printer from advancing.