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

Recovery
Before running this program again, verify that the DEFINE in the environment is correct or correct
the file’s record description.
219
Wrong or missing BLOCKLEN attribute
Cause
A BLOCKLEN attribute in a DEFINE command that refers to a file contains more than 6 digits,
is not correctly formed, is negative, is omitted for tapes specified with LABEL RECORDS
STANDARD, is greater than the record length when BLOCK CONTAINS is not specified, or does
not match file 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.
220
Wrong or missing FILESEQ attribute
Cause
A FILESEQ attribute in a DEFINE command that refers to a file contains more than 4 digits, is
not correctly formed, is negative, or does not match that specified in the MULTIPLE FILE TAPE
clause.
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’s MULTIPLE FILE TAPE clause.
221
Wrong or missing DEVICE attribute
Cause
A DEVICE attribute in a DEFINE command that refers to a file does not start with a dollar sign
($) or backslash (\) or is not alphabetic.
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.
222
A DEFINE procedure failed with error nnn
Cause
A request to get DEFINE information failed with Guardian error nnn.
Effect
The OPEN statement is unsuccessful with I-O status code “90.”
Message List 1219