首先，是否加了日志

      DSPOBJD 可以查看该物理文件是否加了日志

      如果没有，需要咨询系统管理员，加到那个journal file上。用STRJRNPF ,反之用ENDJRNPF取消。

      然后程序中的COMMIT需要加上

      最后，我之前一直忽略，CL中要STRCMTCTL启动事务控制，并在程序退出后ENDCMTCTL

RPG的事务控制就这么些。