Ü    ANDxx (And)    

 

· This op-code is always associated with other op-codes like ANDxx, DOUxx, DOWxx, IFxx, ORxx, or WHENxx operation.

· xx represents EQ, GE, GT, LE, LT, and NE.

Factor 1

Op-code

Factor 2

Result Field

Resulting Indicators

       HI                            LO                      EQ

Comparison value 1

ANDxx

Comparison  value 2

 

Example


Columns . . . :    6  80             Browse                                 AMINEM/QRPGLESRC
SEU==>                                                                              OP_ANDXX
FMT D  DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++++++
*************** Beginning of data ****************************************************
0001.00 Dcount            S              2  0 INZ(10)                                   130125
0002.00 Dn                S              2  0 INZ(5)                                    130125
0003.00 Da                S              2  0 INZ(0)                                    130125
0004.00 Db                S              1  0 INZ(0)                                    130125
0005.00 C     n             DOWLE     count                                             130125
0006.00 C     a             ANDLT     n                                                 130125
0007.00 C                   EVAL      a=a+3                                             130125
0008.00 C                   EVAL      n=n+1                                             130125
0009.00 C                   ENDDO                                                       130125
0010.00 C                   SETON                                        LR             130125
****************** End of data *******************************************************


 

OUTPUT

The loop comes to an end at the point when:

n = 08

a = 09

 











User Comments:



Subscribe

.  


Copyright © www.go4as400.com, 2013-2023. Copyright notice   Terms of services   Privacy policy