FORTRAN Reference Manual

Statements
FORTRAN Reference Manual—528615-001
7-82
POSITION Statement
ios
is a variable or array element of integer type that returns an error number or zero
(no error) following execution of the POSITION statement. For more information
about error numbers, see the Error Numbers on page 6-5.
lbl
is an integer expression that designates the label of an executable statement in the
same program unit to which control passes if an I/O error occurs during
positioning.
position
is a position specifier that assumes one of the following, mutually exclusive, forms:
REC = recno
or
KEY= key, KEYLEN= exp, KEYID= kid, MODE= mode
[, COMPARELEN= clen] [, SKIPEXACT= skip]
recno
is an expression of INTEGER*4 type that specifies the record number to which
the file is to be positioned. Note that the first record in a file is record number
one.
key
is a character expression whose value is a primary or alternate key value.
exp
is an integer expression that specifies the number of bytes in the key field to
compare to the same number of bytes in key.
kid
is an integer or character expression whose value specifies which key to use.
See Considerations on page 7-83 The default value is 0.
mode
is a character expression whose value is either 'APPROXIMATE', 'GENERIC',
or 'EXACT'. The default value is 'APPROXIMATE'.
clen
is an integer expression whose value is in the range 0 through 255. The default
value is 0.