Re: Resetting %EOF.

[jpcarr@xxxxxxxxxxxx]

I never have the problem.
Of course I use a DOU so it resets the %EOF flag automatically.

key  setll     file
     dou  %eof(file)
key  reade     file
     if   %eof(file)
     leave
     endif

You must be a DOW person.
DOW is of course better<G, RDLMAO>   But since I do it wrong(DOU),
I don't have a problem.

John Carr
Just Joking folks,  so don't start the flames


----------------------------
I am building a subfile by reading a PF using READE.  The Subfile is
Displayed when the %EOF is encountered. I want to Add a record to my PF,
Clear the Subfile then re-read the PF to Rebuild the subfile.  It seems
that
when I try to rebuild the subfile the %EOF is still on.  Does anyone know
of
a way to reset the %EOF so that I can reread my PF from the beginning?  I
want to avoid using an indicator but I will if there is not other way.

Joel Harvell







+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---