CALL FUNCTION 'TRANSACTION_BEGIN'
IMPORTING
transaction_id = lv_transaction_id.
* 更新日志表
MODIFY zfit0012_log FROM TABLE lt_zfit0012_log.
MODIFY zfit0012 FROM TABLE lt_zfit0012.
IF sy-subrc EQ 0.
COMMIT WORK AND WAIT.
* APPEND INITIAL LINE TO is_output-mt_fi012_erp_rsp-line_of_ret_msg ASSIGNING
*
*
ELSE.
ROLLBACK WORK.
* APPEND INITIAL LINE TO is_output-mt_fi012_erp_rsp-line_of_ret_msg ASSIGNING
*
*
ENDIF.
* 结束更新事务
CALL FUNCTION 'TRANSACTION_END'
EXPORTING
transaction_id = lv_transaction_id.
CALL FUNCTION 'TRANSACTION_BEGIN'
IMPORTING
transaction_id = lv_transaction_id.
* 更新日志表
MODIFY zfit0012_log FROM TABLE lt_zfit0012_log.
MODIFY zfit0012 FROM TABLE lt_zfit0012.
IF sy-subrc EQ 0.
COMMIT WORK AND WAIT.
* APPEND INITIAL LINE TO is_output-mt_fi012_erp_rsp-line_of_ret_msg ASSIGNING
*
*
ELSE.
ROLLBACK WORK.
* APPEND INITIAL LINE TO is_output-mt_fi012_erp_rsp-line_of_ret_msg ASSIGNING
*
*
ENDIF.
* 结束更新事务
CALL FUNCTION 'TRANSACTION_END'
EXPORTING
transaction_id = lv_transaction_id.
手机扫一扫
移动阅读更方便
你可能感兴趣的文章