COBOL Manual for TNS and TNS/R Programs

Run-Time Diagnostic Messages
HP COBOL Manual for TNS and TNS/R Programs—522555-006
48-37
Message List
Recovery. One of these, depending on the cause number:
1. Either delete the call to COBOL_CONTROL_ or COBOL_SETMODE_ or correct it
(depending on the cause):
a. Change the file to a file other than $RECEIVE.
b. Change the RESERVE clause so that it does not use HP COBOL Fast I-O.
c. Take the action indicated by the Guardian error code “(GE).”
2. Correct the ASSIGN in the select clause or change LINE SEQUENTIAL to
SEQUENTIAL.
124 (none)
Cause. An NMCOBOL object is being run on a system that does not contain the run-
time library. Instead, a “stub” is installed and it produces the diagnostic.
Effect. The run unit terminates abnormally.
Recovery. Ensure that either T8107 or T8108 is licensed to the system and installed
correctly.
125 (001)
Cause. The data item referenced in an OCCURS DEPENDING clause is either less
than the minimum or greater than the maximum number of occurrences.
Effect. The run unit terminates abnormally.
Recovery. Either change the maximum or minimum number of occurrences in the
OCCURS clause or correct the program so that the DEPENDING data item has a legal
value.
126 (002)
Cause. A parameter is being passed in an ENTER statement to a routine that expects
a byte-addressed or 2-byte-addressed reference parameter; however, the parameter is
located in extended storage and cannot be passed this way. A parameter specified in
the Linkage Section is always referred to through an extended address, even if it is
described with the ACCESS MODE STANDARD clause (the compiler ignores this
clause).
Effect. The run unit terminates abnormally.
System not licensed for COBOL programs
OCCURS DEPENDING ON data item out of range
Extended address parameter passed where byte or word address
expected