COBOL Manual for TNS and TNS/R Programs

Compiler Diagnostic Messages
HP COBOL Manual for TNS and TNS/R Programs—522555-006
47-57
Message List
287 (Error)
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)
Cause. The data item is either defined in the Extended-Storage Section or described
with the ACCESS MODE EXTENDED-STORAGE clause.
289 (Error)
Cause. A reference to an index data item cannot appear in this context.
290 (Error)
Cause. The receiving data item is described as alphabetic when the data source for
an ACCEPT statement is DATE, DAY, DAY-OF-WEEK, or TIME.
291 (Error)
Cause. A numeric-edited data item is specified as an arithmetic operand.
Expected level 01 or level 77 or elementary data item
Extended storage data item not permitted
Index data item not permitted
Alphabetic data item not permitted
Numeric-edited data item not permitted