HP OpenVMS Systems Documentation

HP Fortran for OpenVMS
Language Reference Manual

The DELIM specifier asks how character constants are delimited in list-directed and namelist output. It takes the following form:

del

Is a scalar default character variable that is assigned one of the following values:

' APOSTROPHE '	If apostrophes are used to delimit character constants in list-directed and namelist output
' QUOTE '	If quotation marks are used to delimit character constants in list-directed and namelist output
' NONE '	If no delimiters are used
' UNDEFINED '	If the file is not connected, or is not connected for formatted data transfer

The DIRECT specifier asks whether a file is connected for direct access. It takes the following form:

dir

Is a scalar default character variable that is assigned one of the following values:

' YES '	If the file is connected for direct access
' NO '	If the file is not connected for direct access
' UNKNOWN '	If the file is not connected

The EXIST specifier asks whether a file exists and can be opened. It takes the following form:

ex

Is a scalar default logical variable that is assigned one of the following values:

.TRUE.	If the specified file exists and can be opened, or if the specified unit exists
.FALSE.	If the specified file or unit does not exist or if the file exists but cannot be opened

The unit exists if it is a number in the range allowed by the processor.

12.5.11 FORM Specifier

The FORM specifier asks whether a file is connected for formatted or unformatted data transfer. It takes the following form:

fm

Is a scalar default character variable that is assigned one of the following values:

' FORMATTED '	If the file is connected for formatted data transfer
' UNFORMATTED '	If the file is connected for unformatted data transfer
' UNDEFINED '	If the file is not connected

The FORMATTED specifier asks whether a file is connected for formatted data transfer. It takes the following form:

fmt

Is a scalar default character variable that is assigned one of the following values:

' YES '	If the file is connected for formatted data transfer
' NO '	If the file is not connected for formatted data transfer
' UNKNOWN '	If the processor cannot determine whether the file is connected for formatted data transfer

The NAME specifier returns the name of a file. It takes the following form:

nme

Is a scalar default character variable that is assigned the name of the file to which the unit is connected. If the file does not have a name, nme is undefined.

The value assigned to nme is not necessarily the same as the value given in the FILE specifier. For example, the value that the processor returns may be qualified by a directory name or a version number.

However, the value that is assigned is always valid for use with the FILE specifier in an OPEN statement, unless the value has been truncated in a way that makes it unacceptable. (Values are truncated if the declaration of nme is too small to contain the entire value.)

For More Information:

On the maximum possible size of file specifications, see the OpenVMS Record Management Services Reference Manual.

12.5.15 NAMED Specifier

The NAMED specifier asks whether a file is named. It takes the following form:

nmd

Is a scalar default logical variable that is assigned one of the following values:

.TRUE.	If the file has a name
.FALSE.	If the file does not have a name

The NEXTREC specifier asks where the next record can be read or written in a file connected for direct access. It takes the following form:

nr

Is a scalar integer variable that is assigned a value as follows:

• If the file is connected for direct access and a record (r) was previously read or written, the value assigned is r + 1.
• If no record has been read or written, the value assigned is 1.
• If the file is not connected for direct access, or if the file position cannot be determined because of an error condition, the value assigned is zero.
• If the file is connected for direct access and a REWIND has been performed on the file, the value assigned is 1.

The NUMBER specifier asks the number of the unit connected to a file. It takes the following form:

num

Is an scalar integer variable.

The num is assigned the number of the unit currently connected to the specified file. If there is no unit connected to the file, num is not defined.

12.5.18 OPENED Specifier

The OPENED specifier asks whether a file is connected. It takes the following form:

od

Is a scalar default logical variable that is assigned one of the following values:

.TRUE.	If the specified file or unit is connected
.FALSE.	If the specified file or unit is not connected

The PAD specifier asks whether blank padding was specified for the file. It takes the following form:

pd

Is a scalar default character variable that is assigned one of the following values:

' NO '	If the file or unit was connected with PAD= ' NO '
' YES '	If the file or unit is not connected, or it was connected with PAD= ' YES '

The POSITION specifier asks the position of the file. It takes the following form:

pos

Is a scalar default character variable that is assigned one of the following values:

' REWIND '	If the file is connected with its position at its initial point
' APPEND '	If the file is connected with its position at its terminal point (or before its end-of-file record, if any)
' ASIS '	If the file is connected without changing its position
' UNDEFINED '	If the file is not connected, or is connected for direct access data transfer and a REWIND statement has not been performed on the unit.

For More Information:

On record position, advancement, and transfer, see HP Fortran for OpenVMS User Manual.

12.5.22 READ Specifier

The READ specifier asks whether a file can be read. It takes the following form:

rd

Is a scalar default character variable that is assigned one of the following values:

' YES '	If the file can be read
' NO '	If the file cannot be read
' UNKNOWN '	If the processor cannot determine whether the file can be read