COBOL Manual for TNS and TNS/R Programs

Compiler Diagnostic Messages
HP COBOL Manual for TNS and TNS/R Programs—522555-006
47-28
Message List
117 (Error)
Cause. The size of the receive control table as specified in the RECEIVE-CONTROL
paragraph exceeds 62 KB (65,400 characters). Reduce table-length in the TABLE
OCCURS phrase or reduce another factor in these formulas, which determine the size
of the receive control table:
•
In the CRE:
((max_requesters + 1) * 26) +
((((max_reply + 1) / 2) + 4) * (max_requesters * sync)) +4
•
In the non-CRE environment, when the receive control table is not in the Extended-
Storage Section:
((max_requesters + 1) * 11) +
((((max_reply + 1) / 2) + 4) * (max_requesters * sync)) +4
•
In the non-CRE environment, when the receive control table is in the Extended-
Storage Section:
((max_requesters + 1) * 11) +
(4 * (max_requesters * sync)) + 4
121 (Error)
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)
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)
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.)
Receive control table too large
Improper level-number
Missing 01 level entry
Not preceded by record