CBLDCJUP('CLOSERPT') - Close the jnlrput output file
Format
PROCEDURE DIVISION specification
CALL 'CBLDCJUP' USING unique-name-1 unique-name-2 |
DATA DIVISION specification
01 unique-name-1. |
Description
CBLDJUP('CLOSERPT') closes the execution result file of the jnlrput command. Specify the file descriptor returned from CBLDCJUP('OPENRPT') for CBLDCJUP('CLOSERPT').
Data areas whose values are set in the UAP
data-name-A
Specify VALUE 'CLOSERPT' for the request code indicating that the jnlrput command output file is closed.
data-name-Z
Specify 0.
data-name-C
Specify the file descriptor.
Data area to which a value is returned from OpenTP1
data-name-B
A status code of 5 digits is returned.
Status codes
Status code | Explanation |
---|---|
00000 | The jnlrput command output file was closed normally. |
01101 | The request code (data-name-A) is invalid. |
01271 | The file descriptor specified for data-name-C is not the one which was acquired by opening the jnlrput command output file normally. |
The jnlrput command output file is not open. |