Ü  Z-SUB (Zero Subtract)

0 - Factor 2 (numeric) è Result field

 

Example

 


Columns . . . :    6  80               Browse                                 AMINEM/QRPGLESRC
SEU==>                                                                               OP_Z_SUB
FMT C  CL0N01Factor1+++++++Opcode&ExtFactor2+++++++Result++++++++Len++D+HiLoEq....
*************** Beginning of data ****************************************************
0001.00 C                   Z-SUB     *ZEROS        A                 2 0               130131
0002.00 C                   Z-SUB     11            B                 2 0               130131
0003.00 C     A             DSPLY                                                       130131
0004.00 C     B             DSPLY                                                       130131
0005.00 C                   SETON                                        LR             130131
****************** End of data ******************************************************

 

 

OUTPUT

DSPLY   0

DSPLY  11-

 











User Comments:



Subscribe

.  


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