憑證沖銷可以使用BAPI_ACC_DOCUMENT_REV_POST或者BDC錄制FB08來做，效果相同

本文介紹使用BAPI_ACC_DOCUMENT_REV_POST做沖銷憑證
?
部分代碼實(shí)現(xiàn)：
*@---------------------------------------------------------------------*
*@ ? BAPI函數(shù)用到的變量
DATA: wa_bapidochdrr TYPE bapiacrev,
? ? ? ? ? ? gt_return ? ? ? ? ?TYPE TABLE OF bapiret2 WITH HEADER LINE.
? ?LOOP AT gt_bkpf ASSIGNING <fs_bkpf> WHERE xreversal = ''.
* ? 給 BAPI 函數(shù)相應(yīng)的參數(shù)賦值
? ? wa_bapidochdrr-obj_type ? ? = <fs_bkpf>-awtyp.
? ? wa_bapidochdrr-obj_key ? ? ?= <fs_bkpf>-awkey.
? ? wa_bapidochdrr-obj_key_r ? ?= <fs_bkpf>-awkey.
? ? wa_bapidochdrr-pstng_date ? = <fs_bkpf>-budat.
? ? wa_bapidochdrr-fis_period ? = <fs_bkpf>-monat.
? ? wa_bapidochdrr-comp_code ? ?= <fs_bkpf>-bukrs.
? ? wa_bapidochdrr-ac_doc_no ? ?= <fs_bkpf>-belnr.
? ? wa_bapidochdrr-reason_rev ? = '03'.
* ? 取得系統(tǒng) LOGICAL SYSTEM
? ? CALL FUNCTION 'OWN_LOGICAL_SYSTEM_GET'
? ? ? IMPORTING
? ? ? ? own_logical_system = wa_bapidochdrr-obj_sys.
* ? 調(diào)用 BAPI 函數(shù)，沖銷會計(jì)憑證
? ? CALL FUNCTION 'BAPI_ACC_DOCUMENT_REV_POST'
* ? ? ?EXPORTING
* ? ? ? ?obj_type = gv_glvor
? ? ? EXPORTING
? ? ? ? reversal = wa_bapidochdrr
? ? ? ? bus_act ?= <fs_bkpf>-glvor
? ? ? TABLES
? ? ? ? return ? = gt_return.


? ? READ TABLE gt_return WITH KEY type = 'E'.
? ? IF sy-subrc NE 0.
* ? ? 提交憑證過賬
? ? ? CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
? ? ? ? EXPORTING
? ? ? ? ? wait ? = 'X'
? ? ? ? IMPORTING
? ? ? ? ? return = i_return.


? ? ? IF i_return IS INITIAL.
? ? ? ? APPEND LINES OF gt_return TO gt_info.
? ? ? ? MESSAGE '會計(jì)憑證過賬成功' TYPE 'S'.
? ? ? ELSE.
? ? ? ? APPEND i_return TO gt_info.
? ? ? ? CLEAR: i_return-number, i_return-id.
? ? ? ? i_return-type = 'E'.
? ? ? ? i_return-message = '過賬失敗,請用事務(wù)代碼ST22查看詳細(xì)信息'.
? ? ? ? APPEND i_return TO gt_info.
? ? ? ? MESSAGE '會計(jì)憑證過賬失敗' TYPE 'E'.
? ? ? ENDIF.
? ? ELSE.
? ? ? CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
* ? 將返回信息添加到結(jié)果信息內(nèi)表
? ? ? APPEND LINES OF gt_return TO gt_info.
? ? ENDIF.

總結(jié)

以上是生活随笔為你收集整理的SAP 凭证冲销可以使用BAPI_ACC_DOCUMENT_REV_POST或者BDC录制FB08来做的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。