Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

ERR IO-09 system file error - end of file ??

272 views
Skip to first unread message

J. Jennings

unread,
Mar 29, 2006, 11:03:10 AM3/29/06
to
Hi. I'm new to Fortran, and having troubles trying to read a file... >>
IO-09 error
Any insights would be appreciated!

Here's a test program to try to read one record (OPEN seems to work ok
in debug):

PROGRAM MAIN

CHARACTER*(128) IFILE
CHARACTER*80 BUFF
INTEGER IER

IER = 0

IFILE = 'C:\dgr292'

OPEN (91,ACCESS='SEQUENTIAL',
1 FORM='UNFORMATTED',RECL=80,
2 FILE=IFILE,STATUS='OLD',ERR=820)

READ (91) BUFF << fails IO-09 ??

CLOSE (91)

820 IER = 1
END

Here's sample file (as above DGR292) 80 character records:

! DGR292.DAT from pcd0158.simtab.data

!

4 10 4

1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000

1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000

!

! SECOND SET FOR FAMILIES

!

1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000

1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000

!

! THIRD SET FOR SUPPLEMENTARY FAMILY ADJUSTMENTS, FEB 1994

!

1.00000 1.00000 1.00000 1.00000 1.00000 1.00000 1.00000 1.00000 1.00000
1.00000
1.00000 1.00000 1.00000 1.00000 1.00000 1.00000 1.00000 1.00000 1.00000
1.00000
1.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0
1.0
1.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0
1.0

Thanks for having a look!
John

0 new messages