OpenTP1 Version 7 Programming Reference COBOL Language

[Contents][Index][Back][Next]

DISABLE - Terminate continuous-inquiry-response processing

Format

DATA DIVISION (communication description entry) specification

CD  communication-description-name
    FOR  I-O  STORAGE
    [STATUS KEY IS data-name-1]

PROCEDURE DIVISION specification

DISABLE  communication-description-name.

Description

DISABLE enables the following CALL interface facility:

Items specified in the communication description entry

STATUS KEY clause

Specify this clause to receive a status code. If this clause is omitted, a status code cannot be received.

Item specified in the communication statement

None

Status codes

Status code Explanation
00000 Normal termination.
72000 <Return at MHP execution>
The DISABLE statement that terminates continuous-inquiry-response was used out of sequence. The DISABLE statement that terminates continuous-inquiry-response termination was used before the RECEIVE statement that receives first segment was called from the MHP.
<Return at SPP execution>
The DISABLE statement that terminates continuous-inquiry-response cannot be used from an SPP.
72101 The DISABLE statement that terminates continuous-inquiry-response was used from an MHP for which type=cont (continuous-inquiry-response type) was not specified in the MCF application definition.
72107 The DISABLE statement that terminates continuous-inquiry-response termination was already used.
72111 The SEND statement that sends response message in which the name of the continuous-inquiry-response type application to be activated next was specified was used, then the DISABLE statement that terminates continuous-inquiry-response was used.
The SEND statement that starts application program in which the name of the continuous-inquiry-response type application to be activated next was specified was used, then the DISABLE statement that terminates continuous-inquiry-response was used.
Other than the above An unprecedented error (e.g., program damage) occurred.