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

Cause
The program tried to redefine a data item that was described with a REDEFINES clause. (A
subordinate of a redefinition can be redefined unless it is also described with a REDEFINES
clause.)
135 (Error)
Redefined data item not preceding item at this level
Cause
The data description entry of a redefinition was separated from the data description entry of the
redefined item by another data description entry with the same level-number, and the intervening
entry did not redefine the same data item.
136 (Error)
Redefined data item is table or has variable size
Cause
The program tried to redefine a table or a data structure with a variable size.
137 (Error)
Name conflict with other 01 level external data item
Cause
Two different records in the same source program have the same record-name and both have
the EXTERNAL attribute. Only one can have the EXTERNAL attribute.
138 (Error)
Redefinition not permitted for 01 level external data item
Cause
A record item described with a REDEFINES clause has the EXTERNAL clause.
139 (Error)
Picture string exceeds 30 characters
Cause
A PICTURE character-string has more than 30 characters.
140 (Error)
Improper picture string
Cause
The PICTURE character-string does not conform to the rules of the COBOL language, possibly
for one of these reasons:
• The characters are undefined in this context.
• The characters are combined improperly.
• The character-string has unmatched parentheses.
• The character-string has no positions for data characters.
141 (Error)
Too many digit positions
1128 Compiler Diagnostic Messages