|
COBOL USAGE CLAUSES | |
BINARY |
Integer Data in Binary Format |
COMP |
Integer Data in Binary Format (same as BINARY) |
COMP-1 |
Single precision floating point in hexadecimal format, 4 bytes long |
COMP-2 |
Double precision floating point in hexadecimal format, 8 bytes long |
COMP-3 |
Integer data in Packed decimal format/ 8421 code / (Int((n/2)+1))) |
COMP-4 |
Integer Data in Binary format (same as COMP/BINARY) |
COMP-5 |
Integer Data in Native/Extended Binary (No Truncation due to PICTURE clause size) |
COMP-6 |
Unsigned Packed Decimal (No Sign) (Int(n/2)) (RM/COBOL Only) |
DISPLAY |
EBCDIC Char string with single byte (8 BITS) per character, Default clause |
DISPLAY-1 |
EBCDIC Char string with two bytes per character (DBCS or DBCS-EDITED) |
INDEX |
32 Bit Binary Format to hold the displacement of a table, Assigned by SET statement |
NATIONAL |
Unicode Char string (UTF-16) with one byte per character |
NATIVE |
NATIVE phrase is syntax checked, but has no effect on the execution of the program |
PACKED-DECIMAL |
Integer data in Packed decimal / 8421 code (same as COMP-3) |
POINTER |
32 Bit Binary Format to hold the address of a variable |
PROCEDURE-POINTER |
64 Bit Binary data to hold the address of a primary/alternative entry point of a COBOL program |
FUNCTION-POINTER |
32 Bit Binary data to hold the address of a primary/alternative entry point of a COBOL program |
OBJECT-REFERENCE
|
Handle for accessing a class in OO Cobol
|
|
Home | Mainframe Wiki | Downloads | Programs | Mainframe Forum