DATA WA TYPE SFLIGHT.
WA-CARRID = 'AA'.
WA-CONNID = '0017'.
PERFORM SAVE1 ON COMMIT.
WA-CARRID = 'AA'.
WA-CONNID = '0064'.
PERFORM SAVE2 ON COMMIT.
COMMIT WORK AND WAIT.
这时SAVE1 和SAVE2遇到COMMIT WORK AND WAIT. 时才执行。
所以
WA-CARRID = 'AA'.
WA-CONNID = '0017'.
是无效的,被后面的
WA-CARRID = 'AA'.
WA-CONNID = '0064'.
替代。