OpenTP1 Version 7 TP1/Client User's Guide TP1/Client/W, TP1/Client/P
CALL 'CBLDCRPS' USING identifier-1 identifier-2 identifier-3
01 identifier-1. 02 data-name-A PIC X(8) VALUE 'SETWATCH'. 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 9(9) COMP. 01 identifier-2. 02 FILLER PIC X(1). 01 identifier-3. 02 FILLER PIC X(1).
CALL 'CBLDCRPC' USING identifier-1
01 identifier-1. 02 data-name-A PIC X(8) VALUE 'SETWATCH'. 02 data-name-B PIC X(5). 02 FILLER PIC X(3). 02 data-name-C PIC S9(9) COMP VALUE ZERO.
Changes the timeout for the response of the service request. When the timeout is changed by using this program, the subsequent CBLDCRPS('CALL ') programs will use the new timeout until CBLDCRPS('CLOSE ') is executed. Note that this program does not change the value of DCWATCHTIM in the client environment definition.
Before you change the timeout by executing CBLDCRPS('SETWATCH'), execute CBLDCRPS('GETWATCH') to acquire the current value so that you can restore the previous setting after changing the timeout.
Status code | Meaning |
---|---|
00000 | Normal termination |
02401 | Invalid value for the data name. The request code (data-name-A) may be invalid. |
02402 | CBLDCRPS('OPEN ') is not executed. |
02404 | Insufficient memory |
02544 | The client ID specified for data-name-D differs from the one received with CBLDCCLS('CLTIN ') or CBLDCCLS('EXCLTIN '). |
All Rights Reserved. Copyright (C) 2006, 2009, Hitachi, Ltd.