XL Fortran for AIX 8.1

Language Reference



The ENDFILE statement writes an endfile record as the next record of an external file connected for sequential access. This record becomes the last record in the file.



is an external unit identifier. The value of u must not be an asterisk or a Hollerith constant.

is a list that must contain one unit specifier ([UNIT=]u) and can also contain one of each of the other valid specifiers:

[UNIT=] u
is a unit specifier in which u must be an external unit identifier whose value is not an asterisk. An external unit identifier refers to an external file that is represented by a scalar integer expression, whose value is in the range 1 through 2147483647. If the optional characters UNIT= are omitted, u must be the first item in position_list.

is an input/output status specifier that specifies the status of the input/output operation. ios is a scalar variable of type INTEGER(4) or default integer. When the ENDFILE statement finishes executing, ios is defined with:

ERR= stmt_label
is an error specifier that specifies the statement label of an executable statement in the same scoping unit to which control is to transfer in the case of an error. Coding the ERR= specifier suppresses error messages.


+-------------------------------IBM Extension--------------------------------+

If the unit is not connected, an implicit OPEN specifying sequential access is performed to a default file named fort.n, where n is the value of u with leading zeros removed.

If two ENDFILE statements are executed for the same file without an intervening REWIND or BACKSPACE statement, the second ENDFILE statement is ignored.

+----------------------------End of IBM Extension----------------------------+

If the ERR= and IOSTAT= specifiers are set and an error is encountered, transfer is made to the statement specified by the ERR= specifier and a positive integer value is assigned to ios.

+-------------------------------IBM Extension--------------------------------+

If IOSTAT= and ERR= are not specified,

+----------------------------End of IBM Extension----------------------------+


      ENDFILE 12

Related Information

[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]