Specifies the behavior of a COMP-2 data item.
Syntax:
>>--.---.-----COMP2"type"-------><
+-\-+
Parameters:
- type
- The behavior of a data item of COMP-2 usage:
- FLOAT
- Micro Focus and IBM mainframe behavior, which is as a double precision floating point item.
- DECIMAL
- ACUCOBOL-GT COBOL behavior, which is that each digit is stored in one byte in binary format. If the value is signed, then
an additional trailing byte is allocated for the sign. The storage of COMP-2 is identical with USAGE DISPLAY with the high-order
four bits stripped from each byte.
Properties:
Default:
|
COMP2"FLOAT"
|
Phase:
|
Syntax check
|
$SET:
|
Initial
|
Dependencies:
DIALECT"RM" sets COMP2"DECIMAL" immediately.