CLOSE
PURPOSE:
To relinquish use of a FILE or DEVICE that was previously OPENed.
STATEMENT SYNTAX:
{stno} CLOSE (expr{,ERR=stno})
EXAMPLE:
0900 CLOSE(5)
1234 CLOSE(AP_MASTER)
NOTES:
The STOP, END, BEGINand START commands automatically CLOSE all open files.
If a channel is already CLOSEd no error is returned.
If a file is LOCKed the CLOSE will UNLOCK the file.