RE: ILE RPG:Is the use of ITER & LEAVE Structured Programming?

Or:


                                *IN01  IFEQ   '0'
                                *IN02  ANDEQ  '1'
                                *IN03  ANDEQ  '0'
                                        ....
                                        code
                                        ....
                                       ENDIF
                              



Neil Palmer                                AS/400~~~~~      
NxTrend Technology - Canada   ____________          ___  ~     
Thornhill, Ontario,  Canada   |OOOOOOOOOO| ________  o|__||=   
Phone: (905) 731-9000  x238   |__________|_|______|_|______)   
Cell.: (416) 565-1682  x238    oo      oo   oo  oo   OOOo=o\   
Fax:   (905) 731-9202       ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 
mailto:NPalmer@NxTrend.com    AS/400  The Ultimate Business Server      
http://www.NxTrend.com

> -----Original Message-----
> From: Jeffrey M. Silberberg [SMTP:silbrbrg@netcom.com]
> Sent: Sunday, April 26, 1998 10:36 PM
> To:   PaulMmn
> Cc:   MIDRANGE-L@midrange.com
> Subject:      RE: ILE RPG:Is the use of ITER & LEAVE Structured
> Programming?
> 
> 
>       Of course let's not forget the other use;
> 
>                       *IN,01 IFEQ '010'
>                               ...
>                               CODE
>                               ...
>                               ENDIF
> 
>       At least this used to work.
> 
> 
>       JMS
> 
> 
> On Fri, 24 Apr 1998, PaulMmn wrote:
> 
> > 
> > Hey, Hey, HEY!  Left-hand indicators are not all -that-
> complicated...
> > they're just like saying
> >                     *IN01  IFEQ   '0'
> >                     *IN02  IFEQ   '1'
> >                     *IN03  IFEQ   '0'
> >                             ....
> >                             code
> >                             ....
> >                            ENDIF
> >                            ENDIF
> >                            ENDIF
> > 
> +---
> | 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
+---