FORTRAN Reference Manual

Statements
FORTRAN Reference Manual528615-001
7-90
READ Statement
ERR = lbl
label is the label of an executable statement in the current program unit to
which FORTRAN transfers control if an error occurs while executing the READ
statement.
END = endlbl
endlbl is an integer that specifies the label of an executable statement within
the same program unit to which control passes if the READ statement
encounters an end of file.
LOCK = lock
lock is a logical expression that specifies whether records are available to
other processes.
UPDATE = update
update is a logical expression that indicates whether records in structured
files are to be updated or deleted.
LENGTH = len
len is an INTEGER*2 variable that returns the actual length, in bytes, of the
record most recently read.
TIMEOUT = to
to is an INTEGER*2 or INTEGER*4 expression that specifies the maximum
time the system should wait for the read operation to complete.
PROMPT = message
message is a character expression that specifies the prompt message to
display when input is expected.
PROMPTLENGTH = plen
plen is an integer expression that specifies the length of the prompt message.
SOURCE = receive
is an integer array of at least 16 elements that contains information about the
requester. For additional details, see Section 14, Interprocess Communication.