In an XDBC configuration file, set the DATE_NINE_VALUE configuration variable to a valid date, as per the format specified
by the XFD DATE directive, to be used when translating dates between a DATETIME type and a COBOL data type.
This date is used in the following situations:
- When translating COBOL data to a DATETIME, if the COBOL data item consists of all 9's or HIGH-VALUES, the value for DATA_NINE_VALUE
is used.
- When translating a DATETIME type to a COBOL item, if the DATETIME is the same value as DATE_NINE_VALUE, the COBOL item is
set to either all 9's or HIGH-VALUES, depending on the value of the DATE_MAX_HIGH_VALUES configuration variable.
Note: During translation, any information missing from the date string will default to the lowest possible value.
Example:
With the following variables set:
DATE_NINE_VALUE 2099123100000000
DATE_MAX_HIGH_VALUES nine
the following translations occur:
| Original item
|
Translated to
|
| COBOL item is all 9's
|
2099123100000000
|
| COBOL item is HIGH-VALUES
|
2099123100000000
|
| DATETYPE is 2099123100000000
|
all 9's
|