FIO_CLOSE - Close a sequential file

Description:

Close the file with the specified file descriptor.

Invocation:

CALL FIO_CLOSE( FD, STATUS )

Arguments:

FD = INTEGER (Given)

The file descriptor.

STATUS = INTEGER (Given and Returned)

The global status.

Notes:

• If the STATUS variable is not SAI__OK on input, then the routine will still attempt to execute, but will return with STATUS set to the import value.