RPG

181. サブ・ルーチンから抜け出す LEAVESR

サブ・ルーチンから抜け出すのには RPG III では ENDSRGOTO 命令で
ジャンプさせていたはずである。

   C             CHECK       BEGSR
   C                           :
   C  99                     GOTO   CHKEND
                               :
   C             CHKEND      ENDSR

ところが、ありそうでなかったサブルーチンから抜け出す命令 LEAVESR
V5R2M0 あたりから追加されている。

   C             CHECK       BEGSR
                              :
   C  99                     LEAVESR
                              :
   C                         ENDSR

何かと便利な命令であるので、これを機会にお試し頂きたい。