RE: CHAIN Versus SETLL and READ When Data Needed

It's not better, It's just different.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of AGlauser@xxxxxxxxxxxx
Sent: Thursday, March 01, 2007 6:32 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: CHAIN Versus SETLL and READ When Data Needed

Wes Reinhold wrote:

There was a lot of 'bad mouthing' of iter, leave, etc. yesterday.  How
would you get out of a DOW 0=0 without using them? 

Asher "613" Smith wrote on 01/03/2007 08:52:59 AM:

D timeToGo                  N    INZ('0')

DoU timeToGo ;

if .... ;
 timeToGo = '1' ;
endIf ;

EndDo ;

How is this any better than any better than a 'leave'?

I can certainly understand the arguments against leave/iter.  That said, I 
find them to be useful in some cases, mostly the type of thing that Wes 
was talking about - if user input doesn't validate, redisplay the screen 
before processing the input.  I'm sure that there are other ways to 
accomplish this than leave/iter, but I suspect that they could easily 
become at least as confusing as the use of leave/iter.  This is probably 
one of those things where if you are going to use a leave or iter, it is 
worth thinking about whether you can redesign the code in question. 
Sometimes the answer will be "yes", sometimes "no", sometimes "yes, but 
more work than it's worth".

Attention:

The information contained in this message and or attachments is 
intended only for the person or entity to which it is addressed and may
contain 
confidential and/or privileged material. Any review, retransmission, 
dissemination or other use of, or taking of any action in reliance upon,
this 
information by persons or entities other than the intended recipient is 
prohibited. If you received this message in error, please contact the sender
and 
delete the material from any system and destroy any copies. Thank you for
your 
time and consideration.

Attention: 

Le contenu de ce message et(ou) les fichiers ci-joints sadressent 
exclusivement ` la personne ou -entiti ` laquelle ils sont destinis. Ils
peuvent 
contenir de linformation confidentielle, protigie et(ou) classifiie. Il est

strictement interdit ` toute personne ou entiti autre que le(la)
destinataire 
privu(e) de ce message dexaminer, de riviser, de retransmettre ou de
diffuser 
cette information, de prendre une quelconque action en fonction ou sur la
base 
de celle-ci, ou den faire tout autre usage. Si vous avez regu ce message
par 
erreur, veuillez communiquer avec lexpiditeur(trice), supprimer ce message
et 
les fichiers ci-inclus de tout systhme, et en ditruire toutes copies,
quelles 
soient ilectroniques ou imprimies. Nous vous remercions de votre entihre 
collaboration.