CBL_CLOSE_FILE

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.

On Exit:

None.

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.