OpenTP1 Version 7 Programming Reference COBOL Language
CBLDCRPC('GETERDES') - Acquire the descriptor of an asynchronous response-type RPC request which has encountered an error
Format
PROCEDURE DIVISION specification
CALL 'CBLDCRPC' USING unique-name-1 |
DATA DIVISION specification
01 unique-name-1. 02 data-name-A PIC X(8) VALUE 'GETERDES'. 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. |
Description
CBLDCRPC('GETERDES') acquires the descriptor of a service request which has encountered an error when it is called just after CBLDCRPC('POLLANYR') without a particular asynchronous response specified returns with an error.
It can acquire the descriptor only when the error has occurred on the SPP. If an error has occurred on the CBLRPC('POLLANYR') caller, CBLDCRPC('GETERDES') cannot acquire the descriptor.
Data areas whose values are set in the UAP
data-name-A
Specify VALUE 'GETERDES' for the request code indicating descriptor acquisition.
data-name-C
Specify 0.
Data areas whose values are returned from OpenTP1
data-name-B
A status code of 5 digits is returned.
data-name-D
The descriptor is returned if it is acquired. Otherwise, 0 is set here.
Status codes
Status code | Explanation |
---|---|
00000 | Normal termination. |
00301 | The value specified for the data name is invalid. This error also occurs when the request code (data-name-A) is invalid. |
All Rights Reserved. Copyright (C) 2006, 2010, Hitachi, Ltd.