COBOL Manual for TNS and TNS/R Programs
Run-Time Diagnostic Messages
HP COBOL Manual for TNS and TNS/R Programs—522555-006
48-38
Message List
Recovery. Copy the value from the Linkage Section data item to a data item in the
Working-Storage Section, and use the new data-name as the parameter in the ENTER
statement.
127 (003)
Cause. A CALL statement is recursive—it references a program that has been called
but has not executed an EXIT PROGRAM statement.
Effect. The run unit terminates abnormally.
Recovery. Correct the program.
128 (004)
Cause. Either the leftmost character position is out of range (negative, zero, or greater
than the number of characters in the data item), or the length is improper (negative,
zero, or greater than the sum of leftmost character position minus the original item size
plus 1).
Effect. The run unit is terminated abnormally.
Recovery. Correct the program.
129 (005)
Cause. A RELEASE statement was executed when a SORT input procedure was not
executing.
Effect. The run unit is terminated abnormally.
Recovery. Correct the program.
130 (006)
Cause. A RETURN statement was executed when a SORT or MERGE output
procedure was not executing.
Effect. The run unit is terminated abnormally.
Recovery. Correct the program.
CALL references an active program
Reference modifier out of range
Improper context for RELEASE statement
Improper context for RETURN statement