Don,
Perhaps you don't need all those OPEN and CLOSE statements. In my
electronic copy of the FORTRAN 77/XL manual it states:
....
FTN01 Through FTN99 (Excluding FTN05 and FTN06)
For compatibility with FORTRAN 66/V, the FORTRAN 77 I/O library
automatically opens units 1 through 99 (excluding 5 and 6) to the formal
file designators FTN01 through FTN99, respectively. OPEN statements are
not required for these files, though a :FILE equation is usually required
(as it is in FORTRAN 66/V).
Units 0 and those greater than 99 must be opened with an OPEN statement
before being used.
...
Regards
Paul Christidis
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *