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

283 (Error)
Expected index data item or integer numeric data item
Cause
The data item does not have USAGE INDEX and is not a numeric item without fraction digits.
284 (Error)
Expected group data item
Cause
The data item is not a data structure, as it must be.
285 (Error)
Expected data file record data item
Cause
The data item is not a level-01 item subordinate to a data file description entry (level indicator
FD), as it must be.
286 (Error)
Expected sort-merge file record data item
Cause
The data item is not a level-01 item subordinate to a sort-merge file description entry (level
indicator SD), as it must be.
287 (Error)
Expected level 01 or level 77 or elementary data item
Cause
One of:
• The FIPS directive specified NONSTANDARDEXT, but the data item is not a level-01 item,
a level-77 item, or an elementary item of a record.
• No FIPS directive specified NONSTANDARDEXT, but the data item is not elementary,
level-01, level-77, or at a level other than 01 or 77 and aligned on a 2-byte boundary.
If the data item is subscripted, its first occurrence must be on a 2-byte boundary and the number
of occurrences must be even.
288 (Error)
Extended storage data item not permitted
Cause
The data item is either defined in the Extended-Storage Section or described with the ACCESS
MODE EXTENDED-STORAGE clause.
289 (Error)
Index data item not permitted
Cause
A reference to an index data item cannot appear in this context.
290 (Error)
Alphabetic data item not permitted
Message List 1147