OpenTP1 Version 7 TP1/Client User's Guide TP1/Client/W, TP1/Client/P
CALL 'CBLDCCLS' USING identifier-1 identifier-2 identifier-3
01 identifier-1. 02 data-name-A PIC X(8) VALUE 'EXNCACPT'. 02 data-name-B PIC X(5). 02 FILLER PIC X(3). 02 data-name-C PIC S9(9) COMP VALUE ZERO. 02 data-name-D PIC S9(9) COMP. 02 data-name-E PIC X(8). 02 data-name-F PIC X(n). 01 identifier-2. 02 data-name-G PIC S9(9) COMP. 02 data-name-H PIC X(n). 01 identifier-3. 02 data-name-I PIC 9(9) COMP.
CALL 'CBLDCCLT' USING identifier-1 identifier-2
01 identifier-1. 02 data-name-A PIC X(8) VALUE 'EXNCACPT'. 02 data-name-B PIC X(5). 02 FILLER PIC X(3). 02 data-name-C PIC S9(9) COMP VALUE ZERO. 02 data-name-D PIC S9(9) COMP. 02 data-name-E PIC X(8). 02 data-name-F PIC X(n). 01 identifier-2. 02 data-name-G PIC S9(9) COMP. 02 data-name-H PIC X(n).
Waits for a message returned by the CBLDCRPC('CLTSEND ') request code issued on the server side. The program stops waiting for the message if a timeout occurs before receiving the message. The timeout is specified in data-name-D. On reception of the message, this program returns the status code, received message, received message length, host name of the message-originating server, and node identifier of the message-originating server, and control returns to the CUP.
Before executing CBLDCCLS('EXNCACPT'), always issue CBLDCCLS('O-NOTIFY').
Use this function when using the host name extension function.
Status code | Meaning |
---|---|
00000 | Normal termination |
02501 | The value specified in the data area is incorrect. |
02502 | CBLDCCLS('O-NOTIFY') has not been executed. |
02504 | A necessary amount of buffer could not be allocated. |
02506 | Network error |
02507 | A timeout occurred during message reception. |
02518 | System error |
02535 | Versions do not match. |
02544 | The one-way message reception ID specified in data-name-I differs from the one received by CBLDCCLS('O-NOTIFY'). |
02546 | The received message is too large for the CUP-provided area. The excess portion of the message is truncated. Values have already been set for data-name-E and data-name-F. |
02548 | An invalid message was received. |
02549 | The one-way message reception status was canceled by CBLDCCLS('CANCEL ') or CBLDCCLS('EXNCANCL'). Values have already been set for data-name-F, data-name-G, and data-name-H. |
All Rights Reserved. Copyright (C) 2006, 2009, Hitachi, Ltd.