FORTRAN Reference Manual

Statements
FORTRAN Reference Manual—528615-001
7-79
PARAMETER Statement
If you run your program as a NonStop process, an OPEN statement automatically
checkpoints program environment information to your backup process. The effect
of this specifier is the same as that in the CHECKPOINT statement, which is
described in this section and in Section 14, Interprocess Communication.
•
Error conditions
If you specify label, and an error occurs while FORTRAN is opening the file, the
OPEN statement terminates, the file position becomes indeterminate, and
FORTRAN transfers control to the statement identified by label. If you also
specified ios, you can determine the error that occurred by analyzing ios.
If you specify ios, but not label, and an error occurs on the OPEN statement,
your program continues executing with the statement that follows the OPEN
statement. You can analyze ios to determine the error that occurred, if any.
If you do not specify ios or label, and an error occurs, FORTRAN terminates
your program and displays a run-time diagnostic message.
Examples
OPEN (60, FILE='outfile',STATUS='NEW',IOSTAT=misopen)
OPEN (UNIT=1, FILE='$receive',MODE='INPUT',RECL=346)
OPEN (UNIT=master,FILE='mastrprt', SYNCDEPTH=1)
PARAMETER Statement
The PARAMETER statement assigns a symbolic name to a constant value.
name
is a symbolic name.
exp
is a constant expression.
Considerations
•
The PARAMETER statement defines the value of each name by evaluating its
corresponding expression.
°
If the first letter of name designates a numeric type, exp must be an arithmetic
expression.
°
If the first letter of name designates a character type, exp must be a character
expression.
PARAMETER ( name = exp [, name = exp ]... )