FIO_OPEN

Create/open a sequential file

Description:

Open a sequential file with the specified access mode. When the file is created, the specified carriage control mode and maximum record size will be used. Return a file descriptor which can be used to access the file.

Invocation

CALL FIO_OPEN( FILE, ACMODE, FORM, RECSZ, FD, STATUS )

Arguments

FILE = CHARACTER ( ) (Given)
Expression giving the name of the file to be opened.
ACMODE = CHARACTER ( ) (Given)
Expression giving the required access mode. Valid modes are:
‘READ’ - Open the file READONLY. The file must exist.
‘WRITE’ - Create a new file and open it to write.
‘UPDATE’ - Open a file to write. The file must exist.
‘APPEND’ - Open a file to append. The file need not exist.
FORM = CHARACTER ( ) (Given)
Expression giving the required formatting of the file. Valid formats are:
‘FORTRAN’ - Formatted file, normal Fortran interpretation of the first character of each record.
‘LIST’ - Formatted file, single spacing between records.
‘NONE’ - Formatted file, no implied carriage control.
‘UNFORMATTED’ - Unformatted, no implied carriage control.
RECSZ = INTEGER (Given)
Expression giving the maximum record size in bytes. Set it to zero if the Fortran default is required.
FD = INTEGER (Returned)
Variable to contain the file descriptor.
STATUS = INTEGER (Given and Returned)
The global status.