Closes a file opened for byte-stream operations.
Syntax:
call "CBL_CLOSE_FILE" using file-handle
Parameters:
|
Using call prototype (see
Key)
|
Picture
|
file-handle
|
cblt-bytestream-handle
|
pic x(4) comp-5.
|
On Entry:
file-handle
|
The file handle returned when the file was opened.
|
Comments:
Any byte-stream file open when a STOP RUN is executed is automatically closed. Any record locks owned by the run-unit are released by a call to this routine.
The success of the call can be checked by examining RETURN-CODE.