Re: If statements again..

[DennisLovelady@xxxxxxxxx (Dennis Lovelady)]

Hi, Chanh:

Here's the RPG/400 code to do it.  Make appropriate changes for ILE RPG.

C                     Z-ADD1         X       30
C           'CUSTNAME'LOKUPARRAYA,X                 22 (Search =)
C                     MOVELARRAYB,X  CSTNAM


But it seems odd... why is all of this in array format... and (assuming
that's necessary) why is the customer name (for example) not always at
a particular array element number?

Just curious.


Dennis Lovelady               Simpsonville, SC
life: dennis@lovelady.com     work: dennis.lovelady@kemet.com
www: http://cybercity.piedmont.net/~dennis
ICQ UIN: 5734860   



Chanh Le <Chanh_Le@countrywide.com> on 01/28/98 02:00:58 PM
To: MIDRANGE-L <MIDRANGE-L@midrange.com> @ INTERNET
cc:  
Subject: If statements again..


I would like to know if is there any new answer to eliminate IF statements
in this case.


          arrayA,001: 'CUSTID'           arrayB,001: '001'
          arrayA,002: 'CUSTNAME'   arrayB,002: 'JOHN'
          arrayA,003: 'CUSTADDR'   arrayB,003: '123 EUCLID BLV., IRVINE, CA
92000'


Example: 100 IF statements in a do loop


     arrayA,index   IFEQ 'CUSTNAME'
               MOVEL     arrayB,index         CUSTNAME
               ENDIF

Is there any better way ?

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