COBOL Manual for TNS/E Programs (H06.08+, J06.03+)
Cause
The RELATIVE KEY clause references an object about which one of these is true:
• It is not an unsigned integer data item.
• It is described with P s in its PICTURE clause.
• It is a table or special register.
213 (Error)
Relative key item not external
Cause
The RELATIVE KEY clause for an external file references a data item that is not external.
214 (Error)
Relative key item within its file record
Cause
The relative key data item for a file is defined in the file’s record description entries.
215 (Error)
File status item not found
Cause
The FILE STATUS clause references an undefined name.
216 (Error)
File status item not simple two character alphanumeric
Cause
The FILE STATUS clause references either an object that is not a fixed-size two-character
alphanumeric data item or an object that is a table or special register.
218 (Error)
File status in improper section
Cause
The FILE STATUS clause references a data item that is defined in the File Section.
219 (Error)
Linage control item not found
Cause
The LINAGE clause references an undefined name.
220 (Error)
Linage control item not simple unsigned integer
Cause
The LINAGE clause references either an object that is not an unsigned integer data item or an
object that is a table or special register.
221 (Error)
Linage control item not external
Cause
The LINAGE clause for an external file references a data item that is not external.
1138 Compiler Diagnostic Messages










