OpenTP1 Version 7 TP1/Client User's Guide TP1/Client/W, TP1/Client/P
CALL 'CBLDCCLS' USING identifier-1
01 identifier-1. 02 data-name-A PIC X(8) VALUE 'RECEIVE2'. 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 S9(9) COMP. 02 data-name-G PIC 9(9) COMP. 02 data-name-H PIC X(n).
CALL 'CBLDCCLT' USING identifier-1
01 identifier-1. 02 data-name-A PIC X(8) VALUE 'RECEIVE2'. 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 S9(9) COMP. 02 data-name-F PIC 9(9) COMP. 02 data-name-H PIC X(n).
Receives messages from the MHP.
Before executing CBLDCCLS('RECEIVE2'), execute CBLDCRPS('OPEN ') by specifying 8 or 16 for data-name-C.
Status code | Meaning |
---|---|
00000 | Normal termination |
02501 | Invalid data name. A request code (data-name-A) may be incorrect. |
02502 | Possible causes are as follows:
|
02504 | Insufficient memory |
02506 | Network error |
02507 | Timeout occurred during reception of the message. |
02518 | System error |
02538 | Insufficient resource |
02542 | The remote system released the connection. |
02544 | The client ID specified for data-name-G differs from the one received with CBLDCCLS('CLTIN ') or CBLDCCLS('EXCLTIN '). |
All Rights Reserved. Copyright (C) 2006, 2009, Hitachi, Ltd.