This routine closes a file.
Specification
01 file-handle PIC X(4). 01 status-code PIC S9(4) COMP-5.
CALL "CBL_CLOSE_FILE" USING file-handle RETURNING status-code.
Interface
Specifies the file handle returned by CBL_OPEN_FILE, CBL_OPEN_FILE2, CBL-CREATE_FILE, or CBL_CREATE_FILE2.
The return code is set in the status-code specified in the RETURNING clause.
0: Successful
-1: Parameter error
Other than above: Value indicating ANSI74 file status