Re: READE is confusing to me

["M. Lazarus" <mlazarus@xxxxxxxx>]

Booth,

At 9/10/00 07:12 PM +0000, you wrote:
>I have trouble making READE work properly.  Here's code that gives me just
>one record of a group and I can't figure out why.  Any replies would be
>appreciated.  I've RTFM so that isn't a help to me.
>
>C     JobNo         Chain     INVDET
>C                   If        %Found
>
>  * Fill the subfile:
>C                   DOW       %Equal And Not %EOF
>  * fill the detail fields:
>  ....
>C     JobNo         READE (E) INVDETR
>C                   END
>
>C                   END

  Since you're using DOW and both %Equal and %EOF and conditions which 
haven't been set yet, you'll never enter the loop.

  -mark

+---
| 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
+---