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

Cause
One of:
• A data item that is part or all of a redefinition is described with an ACCESS MODE clause
specifying a different mode than the data item it redefines.
• A data item that is subordinate to a data structure described with an ACCESS MODE clause
is described with an ACCESS MODE clause specifying a different mode.
157 (Error)
VALUE clause not permitted for index data item
Cause
A data item with USAGE INDEX is described with a VALUE clause.
158 (Error)
VALUE clause not permitted for redefinition
Cause
A data item that is part or all of a redefinition is described with a VALUE clause.
159 (Error)
VALUE clause not permitted for external data item
Cause
An external data item is described with a VALUE clause.
160 (Error)
VALUE clause not permitted in group with initial value
Cause
A data item that is subordinate to a data structure described with a VALUE clause is described
with its own VALUE clause.
161 (Error)
Numeric literal not compatible with nonnumeric literal
Cause
The literals of a range in a VALUE clause are not both numeric or both nonnumeric, as they must
be.
162 (Error)
Value range not permitted for initial value
Cause
The VALUE clause describing a data item contains a range of literals.
163 (Error)
Only one initial value permitted
Cause
The VALUE clause describing a data item contains more than one value.
164 (Error)
Table nesting too deep
Message List 1131