Open Watcom FORTRAN 77 Language Reference

Language Reference
Example:
LOOP
READ( UNIT=8, END=100, FMT=200 ) RECORD
ENDLOOP
100 CLOSE( UNIT=8 )
In the previous example, we illustrate how one might process the records in a file and then terminate the
connection of the file to unit 8 using the CLOSE statement.
Notes:
1. Execution of a CLOSE statement specifying a unit that is not connected to a file or a unit that is
connected to a file that does not exist has no effect.
2. It is possible to connect the unit to another file after a CLOSE statement has been executed.
3. It is possible to connect the unit to the same file after a CLOSE statement has been executed,
provided that the file still exists.
4. It is possible to connect the file to another unit after a CLOSE statement has been executed,
provided that the file still exists.
5. At the termination of execution of the program, for whatever the reason of termination, any units
that are connected are closed. Each unit is closed with status ’KEEP’ unless the file status was
’SCRATCH’, in which case the unit is closed with status ’DELETE’. The effect is the same
as if a CLOSE statement is executed without a STATUS= specifier.
For more information on input/output, see the chapter entitled "Input/Output" on page 215.
30 CLOSE Statement