FMT D DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++
*************** Beginning of data *************************************
0001.00 DA S 1S 0 INZ(-4)
0002.00 C EVAL A=%ABS(A-2)
0003.00 C A DSPLY
0004.00 C SETON LR
****************** End of data ****************************************
ABS FUNCTION IN RPG
what IS OUTPUT
*************** Beginning of data *************************************
0001.00 DA S 1S 0 INZ(-4)
0002.00 C EVAL A=%ABS(A-2)
0003.00 C A DSPLY
0004.00 C SETON LR
****************** End of data ****************************************
ABS FUNCTION IN RPG
what IS OUTPUT
No comments:
Post a Comment