COBOL Manual for TNS/E Programs (H06.08+, J06.03+)
((max_requesters + 1) * 26) +
((((max_reply + 1) / 2) + 4) * (max_requesters * sync)) +4
121 (Error)
Improper level-number
Cause
A level-number is not 66, 77, 88, or in the range 01 through 49. The compiler converts the
improper level-number to 50.
122 (Error)
Missing 01 level entry
Cause
A data description entry with a level-number from 02 through 49 inclusive is not subordinate to
a data description entry with level-number 01.
123 (Error)
Not preceded by record
Cause
A data description entry with level-number 66 is not preceded by a record description. (Any
intervening data description entries must also have level-number 66.)
124 (Error)
Not permitted within this section
Cause
One of:
• A level-77 data item is defined in the File Section.
• A level-01 data item defined in the File Section is described with the REDEFINES clause.
• The EXTERNAL clause for a data description entry is not within the Working-Storage Section
or Extended-Storage Section.
• The GLOBAL clause appears in descriptions that are not within the File Section,
Working-Storage Section, or Extended-Storage Section.
• The description of a data item defined within the File Section or Linkage Section includes
a VALUE clause.
125 (Error)
Not preceded by conditional variable
Cause
The definition of a condition-name (a name whose data description entry has level-number 88)
is not preceded by the entry for the data item whose value it tests. (Any intervening data
description entries must also have level-number 88.)
126 (Error)
Inconsistent level-number
Cause
A level-number is neither greater than the level-number of the preceding data description entry
nor equal to that of some preceding data description entry in the same record description.
1126 Compiler Diagnostic Messages










