FIO_ASSOC

Create/open a sequential file associated with a parameter

Description:

Open the sequential file specified by parameter PNAME and return a file descriptor for it.

Invocation

CALL FIO_ASSOC( PNAME, ACMODE, FORM, RECSZ, FD, STATUS )

Arguments

PNAME = CHARACTER ( ) (Given)
Expression giving the name of a file parameter.
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.

External Routines Used

CHR: CHR_SIMLR