Ü MVR (Move Remainder)
·
It is used in getting
the remainder of a division.
·
It follows DIV op-code.
Example
Columns . . . : 6 80 Browse AMINEM/QRPGLESRC
SEU==> OP_CHECK
FMT D DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++++++
*************** Beginning of data ****************************************************
0001.00 DA S 2P 0 INZ(25) 130128
0002.00 DB S 2P 0 INZ(11) 130128
0003.00 * 130128
0004.00 C A DIV B C 2 0 130128
0005.00 C MVR D 2 0 130128
0006.00 C C DSPLY 130128
0007.00 C D DSPLY 130128
0008.00 C SETON LR 130128
0009.00 130128
****************** End of data *******************************************************
OUTPUT