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

Cause
The attributes of the receiving operand do not permit assigning it a value derived from the
sending operand; for example:
• A numeric data item is being set to the value of a nonnumeric literal, nonnumeric data item,
or index data item.
• An index data item is being set to the value of a nonnumeric literal or nonnumeric data
item.
• A data item other than an index-name is being set UP or DOWN.
• A data item other than a mnemonic-name associated with an external switch is being set
ON or OFF.
• A data item other than a condition-name associated with a data item is being set to TRUE
or FALSE.
329 (Error)
INSPECT operand sizes not compatible
Cause
One of:
• The replaced and replacing operands have incompatible sizes. When replacing
CHARACTERS or a figurative constant, the size of the replacing operand must be one
character. When replacing a numeric or nonnumeric literal or a data item, the size of the
replacing operand must be the same as that of the replaced operand.
• The CONVERTING phrase operands are not the same size.
330 (Error)
NO REWIND phrase not permitted for I-O or EXTEND mode
Cause
The NO REWIND phrase appears when the open mode is I-O or EXTEND.
331 (Error)
EXTEND mode permitted only for sequential access
Cause
EXTEND mode is specified for a file access whose access is not sequential.
332 (Error)
EXTEND mode not permitted for MULTIPLE FILE TAPE file
Cause
EXTEND mode is specified for a file name that is specified in a MULTIPLE FILE TAPE clause.
333 (Error)
EXTEND mode not permitted for LINAGE file
Cause
EXTEND mode is specified for a file name that is described with a LINAGE clause.
334 (Error)
Too many AFTER phrases
Cause
A PERFORM statement has more than 6 AFTER phrases.
Message List 1153