PURPOSE: The DIBOL option controls ACCENT R's ability to distinguish between DIBOL and COBOL overpunch schemes for storing negative numbers. It is used exclusively for output of DIBOL fields. This command is valid in a CM, PM, SF and as a direct command.
{ENABLE; DISABLE} DIBOL [{IF; UNLESS} clause]
|
ENABLE |
allows ACCENT R to recognize DIBOL overpunch schemes. |
|
DISABLE |
is the default state where ACCENT R only recognizes COBOL overpunch schemes. |
|
{IF; UNLESS} clause |
specifies certain criteria that must be met for the ENABLE or DISABLE command to take effect. |
NOTES: ACCENT R can distinguish between DIBOL and COBOL overpunch schemes when accessing fields for input without the DIBOL option being enabled. The option needs to be enabled only for the output of DIBOL fields, then disabled again.
In order to access a certain field/column within a data set, the OVERPUNCH and ASCII clauses must be specified on a field statement within the Schema Definition (SD).
FIELDNAME, D18 (DIBOL STATEMENT)
FIELD NAME, N, 18, 2, ASCII, OVERPUNCH (ACCENT R STATEMENT)