COBOL Manual for TNS/E Programs (H06.08+, J06.03+)
completion-code
is a numeric operand, the evaluation of which includes truncation as necessary to an integer
result with a value in the range of -32,768 through 32,767. If this parameter is present, the
value is passed to STOP or ABEND as the completion-code parameter for that routine.
termination-info
is a numeric operand, the evaluation of which includes truncation as necessary to an integer
result with a value in the range of -32,768 through 32,767. If this parameter is present, the
value is passed to STOP or ABEND as the termination-info parameter for that routine.
subsys-id
is a data item occupying at least twelve character positions. If this parameter is present, a
reference to the data item is passed to STOP or ABEND as the subsys-id parameter for that
routine.
text
is an alphanumeric data item containing at least as many characters as specified by the value
of text-length (alphabetic and alphanumeric-edited data items are also permissible). If this
parameter is present, a reference to the data item is passed to STOP or ABEND as the text
parameter for that routine.
Usage Considerations:
• Parameters Are Not Validated
When the run unit calls COBOL_COMPLETION_, the HP COBOL run-time routines terminate
execution of the run unit in an orderly fashion. The final step in the termination logic is to call
either the STOP or the ABEND routine of the operating environment (as specified by the implicit
or explicit abend-or-stop parameter value). All other parameters are made available to the
STOP or ABEND routine as described previously. It is the application’s responsibility to verify
that the combination of supplied parameters and their values meet the expectations of the
STOP or ABEND routine. The COBOL_COMPLETION_ routine does not validate the parameters.
COBOL_CONTROL_
The COBOL_CONTROL_ routine controls device-dependent I-O operations through a call to the
Guardian environment routine CONTROL.
If a no-waited, input-output request is active when the COBOL_CONTROL_ routine is called, the
request is completed before the CONTROL routine is called. If the file is closed when the call is
made, the request is queued until the next OPEN request for the file is issued.
CAUTION: The HP COBOL run-time library does not attempt to validate calls to CONTROL. To
avoid interfering with the operation of the HP COBOL run-time library, use COBOL_CONTROL_
only if absolutely necessary.
616 Libraries and Utility Routines










