RE: infinite loop

How about just sending a message to this group entitled "infinite loop"?
It seems to have the same impact.  <tic>

-Bob Cozzi
www.iSeriesTV.com
Ask your Manager to watch iSeriesTV.com


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Albert York
Sent: Thursday, September 14, 2006 2:03 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: infinite loop

I agree that the infintite loop signals to the programmer to expect LEAVE
statements to exit.

Albert

  ----- Original Message -----
  From: AGlauser@xxxxxxxxxxxx
  To: "RPG programming on the AS400 / iSeries"
  Subject: RE: infinite loop
  Date: Thu, 14 Sep 2006 14:47:44 -0400


  > Do
  > ...some code in the loop
  > ITER
  > Enddo.
  >
  > Either that or would IBM please event yet another structured Goto
  that
  > would provide for loop to infinity.

  IMHO, the DOW (1=1) is much clearer, since at the beginning of the
  loop it
  is obvious that it will never end (outside of a LEAVE). As an aside,
  what
  would be the point of an infinite loop block? No one really intents
  to
  loop forever, do they? More like: Loop forever, until I get some
  signal.

 
################################################################################
#####
  Attention:
  The above message and/or attachment(s) is private and confidential
  and is intended
  only for the people for which it is addressed. If you are not named
  in the address
  fields, ignore the contents and delete all the material. Thank you.
  Have a nice day.

  For more information on email virus scanning, security and content
  management, please contact administrator@xxxxxxxxxxxx
 
################################################################################
#####
  --
  This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
  list
  To post a message email: RPG400-L@xxxxxxxxxxxx
  To subscribe, unsubscribe, or change list options,
  visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
  or email: RPG400-L-request@xxxxxxxxxxxx
  Before posting, please take a moment to review the archives
  at http://archive.midrange.com/rpg400-l.