T100 事务的开始与结束

例如：

               IF cl_ask_confirm('apm-00801') THEN                              
                  CALL s_transaction_begin()
                  IF NOT axmt500_change_xmdc015('u') THEN
                     CALL s_transaction_end('N','0') 
                     EXIT DIALOG                  
                   END IF 
                   CALL s_transaction_end('Y','0') 
               END IF

CALL s_transaction_begin()　　——　　事务的开始，注意：事务未结束时再开启事务作业会异常关闭；

CALL s_transaction_end('N','0') 　　——　　事务回滚；

CALL s_transaction_end('Y','0') 　　——　　事务提交；

注意：

'Y' 提交事务 'N' 回滚事务；

信息显示否 0 - 不提示 1 - 提示；

事务未开启时处理事务作业会异常关闭。

T100 事务的开始与结束

推荐阅读