COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

Recovery
You can use the command interpreter ERROR command to discover the meaning of the Guardian
error number. The message might suggest a corrective action.
223
DEFINE required for LABEL RECORDS STANDARD
Cause
A DEFINE command is required if LABEL RECORDS STANDARD is specified in the File Definition.
Effect
The OPEN statement is unsuccessful with I-O status code “90.”
Recovery
Before running this program again, verify that the DEFINE in the environment is correct or correct
the file description.
224
PositionEdit failed with error nnn
Cause
The call to PositionEdit made during the OPEN processing for an EDIT file failed with Guardian
error nnn.
Effect
The OPEN statement is unsuccessful with I-O status code “30.”
Recovery
You can use the command interpreter ERROR command to discover the meaning of the Guardian
error number. The message might suggest a corrective action.
225
Size of unstructured file opened EXTEND not multiple of record size
Cause
The end of file on an unstructured file being opened for EXTEND is not a multiple of the record
size.
Effect
The OPEN statement is unsuccessful with an I-O status code “30.”
Recovery
If an incorrect file was assigned, assign the correct one. Otherwise, you must take some action
to repair the file.
226
File attributes don't match and file not opened OUTPUT or has alt keys
Cause
The file attributes of the existing file conflict with the file description in the program and the file
is not being opened for output, or (if it is being opened for output) the file description specifies
alternate record keys (COBOL cannot create a file with alternate keys). The conflict is that the
record sizes differ (the file description specifies a larger maximum record than the existing file’s
attributes), and the COBOL program indicates that the records are fixed length.
Effect
The OPEN statement is unsuccessful with I-O status code “30.”
1220 Run-Time Diagnostic Messages