Re: opening existing files with OPEN()

In article <1189606396.692830.231870@xxxxxxxxxxxxxxxxxxxxxxxxxxxx>,
maserda@xxxxxxxxx writes:

To specific people:
- Steven Kargl, I do not fully understand. How do they not match?

My point was that the code is not doing what the error
stated.

do 01
do 02 i = 1, 100
write (*, writeout, iostat = readstatus) 1.0, ",", 2.0, ",", 3.0
^^^^^
This and

if (readstatus > 0) then
write (*, '(1X,A)') "***Cannot read existing file***"
^^^^
this do not match.

You are writing to the file. The error messages claims you
are trying to read the file. In what you provided in the
original post, it seems that you opened a file with the
intention of reading it. However, if you wrote to the file,
which will destroy the original file.

--
Steve
http://troutmask.apl.washington.edu/~kargl/
.