COMP1

Specifies the behavior of a COMP-1 data item.

Syntax:

>>--.---.-----COMP1-(type)----------><
    +-\-+

Parameters:

type
The behavior of a data item of COMP-1 usage:
FLOAT
Micro Focus and IBM mainframe behavior, which is as a single precision floating point item.
BINARY
ACUCOBOL-GT and RM/COBOL behavior, which is as s9(4) COMP usage.

Properties:

Default: COMP1(FLOAT)
Phase: Syntax check
$SET: Initial

Comments:

You can also default to COMP1(BINARY) behavior by setting the ACU compatible Compiler option ACUOPT(-Cv).