RE: DOW & DOU

["Leland, David" <dleland@xxxxxxxxxx>]

No, you aren't serious are you?  We just went thru the "goto" discussion
on this list and now you're bringing up the "RPG cycle" thing.  Don't we
have better things to discuss?  Please stop it now!!!

Dave

> ----------
> From:         boothm@ibm.net[SMTP:boothm@ibm.net]
> Sent:         Friday, May 08, 1998 12:51 PM
> To:   MIDRANGE-L@midrange.com
> Subject:      Re: DOW & DOU
> 
> I am confused. 
> 
> If I was going to read the file from beginning to end why wouldn't I
> just
> use the rpg cycle? If I am just processing a section of the file, and
> want
> to get out of a loop in the odd event that I am at a group that
> happens to
> contain the last record in a file, then this structure serves no
> useful
> purpose.
> 
> Having said that, I realize bright people wrote this and are excited
> about
> using it.  So... as I said, I am confused.
> 
> Where would be a useful place for this structure?
> 
> In <Pine.3.89.9805080937.A4908-0100000@netcom20>, on 05/08/98 
>    at 09:45 AM, "Jeffrey M. Silberberg" <silbrbrg@netcom.com> said:
> 
> 
> >  Roger, 
> 
> >     where would the read go in this case, just before the DOU, and
> just
> >before the enddo.
> 
> >     read filea
> >     DOU    %EOF(filea) 
> >     ........
> >     .........
> >     read filea
> >     enddo
> 
> -- 
> -----------------------------------------------------------
> boothm@ibm.net
> -----------------------------------------------------------
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To unsubscribe from this list send email to
> MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
> david@midrange.com
> +---
> 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---