Re: %EOF

Dan,

I see your point, but LEAVE is nothing more than a GOTO of a different color.

Nesting an IF within a DO is like a double negative.  You already made the test,
why test twice?
IMHO, that's why you'll find primed DOW loops with a bottom read so common.

First, the primed read determines if you need to enter the loop at all, where a
DOU will always perform the loop once, thereby necessitating the inner IF.  Not 
to
mention the propensity to throw in a GOTO aka LEAVE.

It's a style thing.

James W. Kilgore
email@James-W-Kilgore.com

P.S. I get a perverse kick out of the annual DOx debates that appear on this 
list.
=8^)

Dan Bale wrote:

>
>
> IMHO: No, no, no, no!!!!  How is that more "structurally correct" than:
>
> Key      Setll     Filename
>          DoU       %EoF
> Key      ReadE     Filename
>          If        not %EoF
> .. do some code here ...
>          EndIf
>          EndDo
>
> or maybe even:
>
> Key      Setll     Filename
>          DoU       %EoF
> Key      ReadE     Filename
>          If        %EoF
>          Leave
>          EndIf
> .. do some code here ...
>          EndDo
>
> I would always rather have one READE in a loop than two.
>
> Back to the original poster's question, though; it sounds like a bug.  Are you
> up to date on PTFs?  Might be worth checking.
>

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *