Udah lama sih gw nemuin kasus kaya gini, tapi ga ada salahnya gw tuangin disini. Maaf, ga maksud menggurui, hanya ingin share temuan. Atau malahan udah pada tau…. *asa ngabejaan bulu tuur*

Apa bedanya opcode MOVE, MOVEL dan EVAL di RPGLE ?
berikut contoh codenya, smoga memberikan pencerahanūüėÄ

DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++++++Comments++++++++++++
d VAR1            s              4S 0
d VAR2            s              3S 0
d VAR3            s              4S 0
CL0N01Factor1+++++++Opcode&ExtFactor2+++++++Result++++++++Len++D+HiLoEq....Comments++++++++++++
*
C                   Z-ADD     1234          VAR1
C     VAR1          DSPLY                                                  1234
c                   MOVE      VAR1          VAR2
C     VAR2          DSPLY                                                  234
c                   MOVEL     VAR1          VAR2
C     VAR2          DSPLY                                                  123
C*                  EVAL      VAR2 = VAR1                                  MENTAL
C                   Z-ADD     1000          VAR1
C                   Z-ADD     100           VAR2
C     var1          sub       var2          var3
C     VAR3          DSPLY                                                  900
c                   SETON                                        LR