BAPI or function module to change existing sap accounting document

ag • 2018.02.06 13:56 • 文章 • 阅读 3931

修改SAP会计凭证的两个函数使用。

FI_ITEMS_MASS_CHANGE
FI_DOCUMENT_CHANGE

    LOOP AT lt_updrv.
      "准备数据.
      CLEAR lt_accchg.

      lt_accchg-fdname = 'XBLNR'.
      lt_accchg-oldval = lt_updrv-awkey.
      lt_accchg-newval = lt_updrv-xblnr.
      APPEND lt_accchg.


      "调用函数.
      CALL FUNCTION 'FI_DOCUMENT_CHANGE'
        EXPORTING
          x_lock               = 'X'
          i_bukrs              = lt_updrv-bukrs
          i_belnr              = lt_updrv-belnr
          i_gjahr              = lt_updrv-gjahr
          i_kunnr              = lt_updrv-kunnr
        TABLES
          t_accchg             = lt_accchg
        EXCEPTIONS
          no_reference         = 1
          no_document          = 2
          many_documents       = 3
          wrong_input          = 4
          overwrite_creditcard = 5
          OTHERS               = 6.

      CLEAR lt_updrv.
      REFRESH lt_accchg[].
    ENDLOOP.

LOOP AT lt_updrv.

"准备数据.

CLEAR lt_accchg.

lt_accchg-fdname = 'XBLNR'.

lt_accchg-oldval = lt_updrv-awkey.

lt_accchg-newval = lt_updrv-xblnr.

APPEND lt_accchg.

"调用函数.

CALL FUNCTION 'FI_DOCUMENT_CHANGE'

EXPORTING

x_lock = 'X'

i_bukrs = lt_updrv-bukrs

i_belnr = lt_updrv-belnr

i_gjahr = lt_updrv-gjahr

i_kunnr = lt_updrv-kunnr

TABLES

t_accchg = lt_accchg

EXCEPTIONS

no_reference = 1

no_document = 2

many_documents = 3

wrong_input = 4

overwrite_creditcard = 5

OTHERS = 6.

CLEAR lt_updrv.

REFRESH lt_accchg[].

ENDLOOP.

本文作者: GavinDong

版权属于: GavinDong博客

文章链接: https://www.gavindong.com/2141.html

如果使用过程中遇到问题，可 **点击此处** 交流沟通。

BAPI function

ag普通用户

0 0

文章

FI常用BAPI（转）

总帐会计: (比较简单全部测试通过,关帐时使用)Line item of document for ledger with summary table GLF: BAPI_GLX_…

ag
2017.05.14
1.8K000
文章

abap se37测试bapi后显示成功但找不到单据

今天在写Hybris销售订单回传ECC的接口，需要调用ECC的bapi函数来实现电商的销售订单在ECC中创建。使用的bapi是BAPI_SALESORDER_CREATEFROMD…

ag
2017.08.24
2.8K000
文章

SAP项目中开发用到的BAPI

调用bapi都需要判断return消息类型，如果没有报错则BAPI_TRANSACTION_COMMIT和COMMIT WORK AND WAIT.，否则BAPI_TRANSACT…

ag
2018.07.04
3.4K000
文章

SAP工单退料取移动平均价问题研究

业务场景给工单A发料一批，发料时M物料的价格是10CNY/EA，退料时的移动平均价（MAP）变成了12CNY/EA，希望退料时取的价格是发料时的10CNY/EA。 MIGO测试发…

ag
2021.05.29
1.1K010

文章

删除销售订单BAPI

REPORT zdelete_sales_order.

TABLES vbak.
DATA: itab_vbak LIKE TABLE OF vbak.
DATA: itab_vbap LIKE TABLE OF vbap.
DATA: itab_vbkd LIKE TABLE OF vbkd.

DATA: wa_vbak LIKE vbak.
DATA: wa_vbap LIKE vbap.
DATA: wa_vbkd LIKE vbkd.


DATA: lt_order_header_in  LIKE bapisdh1,
      lt_order_header_inx LIKE bapisdh1x,
      lt_return           LIKE bapiret2 OCCURS 0 WITH HEADER LINE,
      lt_order_item_in    LIKE bapisditm OCCURS 0 WITH HEADER LINE,
      lt_order_item_inx   LIKE bapisditmx OCCURS 0 WITH HEADER LINE.

DATA lt_vbak LIKE TABLE OF vbak WITH HEADER LINE.

SELECT-OPTIONS s_vbeln FOR vbak-vbeln OBLIGATORY.


*SELECT * INTO TABLE itab_vbak FROM vbak WHERE vbeln IN s_vbeln.
*SELECT * INTO TABLE itab_vbap FROM vbap WHERE vbeln IN s_vbeln.
*SELECT * INTO TABLE itab_vbkd FROM vbkd WHERE vbeln IN s_vbeln.


SELECT vbeln INTO CORRESPONDING FIELDS OF TABLE lt_vbak
  FROM vbak
  WHERE vbeln IN s_vbeln.


LOOP AT lt_vbak.
  lt_order_header_inx-updateflag = 'D'.
  CALL FUNCTION 'BAPI_SALESORDER_CHANGE'
    EXPORTING
      salesdocument    = lt_vbak-vbeln
*     ORDER_HEADER_IN  = LT_ORDER_HEADER_IN
      order_header_inx = lt_order_header_inx
    TABLES
      return           = lt_return.

  LOOP AT lt_return WHERE type = 'E' OR type = 'A'.
  ENDLOOP.
  IF sy-subrc = 0.
    ROLLBACK WORK.
    WRITE:lt_vbak-vbeln,' E'.
  ELSE.
    COMMIT WORK AND WAIT.
    WRITE:lt_vbak-vbeln,' S'.
  ENDIF.

ENDLOOP.

*LOOP AT ITAB_VBAK INTO WA_VBAK.
*
*  DELETE FROM VBAK WHERE VBELN = WA_VBAK-VBELN.
*  DELETE FROM VBAP WHERE VBELN = WA_VBAK-VBELN.
*  DELETE FROM VBKD WHERE VBELN = WA_VBAK-VBELN.
*  DELETE FROM VBEP WHERE VBELN = WA_VBAK-VBELN.
*  DELETE FROM VBPA WHERE VBELN = WA_VBAK-VBELN.
*
*ENDLOOP.

REPORT zdelete_sales_order.

TABLES vbak.

DATA: itab_vbak LIKE TABLE OF vbak.

DATA: itab_vbap LIKE TABLE OF vbap.

DATA: itab_vbkd LIKE TABLE OF vbkd.

DATA: wa_vbak LIKE vbak.

DATA: wa_vbap LIKE vbap.

DATA: wa_vbkd LIKE vbkd.

DATA: lt_order_header_in LIKE bapisdh1,

lt_order_header_inx LIKE bapisdh1x,

lt_return LIKE bapiret2 OCCURS 0 WITH HEADER LINE,

lt_order_item_in LIKE bapisditm OCCURS 0 WITH HEADER LINE,

lt_order_item_inx LIKE bapisditmx OCCURS 0 WITH HEADER LINE.

DATA lt_vbak LIKE TABLE OF vbak WITH HEADER LINE.

SELECT-OPTIONS s_vbeln FOR vbak-vbeln OBLIGATORY.

*SELECT * INTO TABLE itab_vbak FROM vbak WHERE vbeln IN s_vbeln.

*SELECT * INTO TABLE itab_vbap FROM vbap WHERE vbeln IN s_vbeln.

*SELECT * INTO TABLE itab_vbkd FROM vbkd WHERE vbeln IN s_vbeln.

SELECT vbeln INTO CORRESPONDING FIELDS OF TABLE lt_vbak

FROM vbak

WHERE vbeln IN s_vbeln.

LOOP AT lt_vbak.

lt_order_header_inx-updateflag = 'D'.

CALL FUNCTION 'BAPI_SALESORDER_CHANGE'

EXPORTING

salesdocument = lt_vbak-vbeln

* ORDER_HEADER_IN = LT_ORDER_HEADER_IN

order_header_inx = lt_order_header_inx

TABLES

return = lt_return.

LOOP AT lt_return WHERE type = 'E' OR type = 'A'.

ENDLOOP.

IF sy-subrc = 0.

ROLLBACK WORK.

WRITE:lt_vbak-vbeln,' E'.

ELSE.

COMMIT WORK AND WAIT.

WRITE:lt_vbak-vbeln,' S'.

ENDIF.

ENDLOOP.

*LOOP AT ITAB_VBAK INTO WA_VBAK.

* DELETE FROM VBAK WHERE VBELN = WA_VBAK-VBELN.

* DELETE FROM VBAP WHERE VBELN = WA_VBAK-VBELN.

* DELETE FROM VBKD WHERE VBELN = WA_VBAK-VBELN.

* DELETE FROM VBEP WHERE VBELN = WA_VBAK-VBELN.

* DELETE FROM VBPA WHERE VBELN = WA_VBAK-VBELN.

*ENDLOOP.

2020.11.22

1.0K000

文章

SAP MM库存盘点BAPI的使用及注意点

盘赢：帐面库存小于实际库存。盘亏：帐面库存大于实际库存盘点在系统中的步骤：1.创建盘点凭证MI01告知系统在需要盘点的：工厂，库存地，物料，是否批次，是否特殊库存。 2.冻结上述…

ag
2017.05.17
3.3K000
文章

SAP销售退货订单BAPI使用案例

剩余80%内容付费后可查看本部分为付费内容，支付后可查看 ***尊重付出，互相认可*** 支付10元已支付？输入手机号查看

ag
2021.08.05
933000

文章

SAP FI记账凭证FB01的BAPI

FI模块记账凭证FB01的BAPI – POSTING_INTERFACE_DOCUMENT

CALL FUNCTION 'POSTING_INTERFACE_START'
EXPORTING
i_function = 'C'.
*-----------------------------------------------------
CALL FUNCTION 'POSTING_INTERFACE_DOCUMENT'
EXPORTING
i_tcode = 'FB01'
IMPORTING
e_subrc = subrc
e_msgid = msgid
e_msgty = msgty
e_msgno = msgno
e_msgv1 = msgv1
e_msgv2 = msgv2
e_msgv3 = msgv3
e_msgv4 = msgv4
TABLES
t_ftpost = gi_ftpost
t_fttax = gi_fttax
t_blntab = gi_xblntab.
*-------------------------------------
CALL FUNCTION 'POSTING_INTERFACE_END'.

CALL FUNCTION 'POSTING_INTERFACE_START'

EXPORTING

i_function = 'C'.

*-----------------------------------------------------

CALL FUNCTION 'POSTING_INTERFACE_DOCUMENT'

EXPORTING

i_tcode = 'FB01'

IMPORTING

e_subrc = subrc

e_msgid = msgid

e_msgty = msgty

e_msgno = msgno

e_msgv1 = msgv1

e_msgv2 = msgv2

e_msgv3 = msgv3

e_msgv4 = msgv4

TABLES

t_ftpost = gi_ftpost

t_fttax = gi_fttax

t_blntab = gi_xblntab.

*-------------------------------------

CALL FUNCTION 'POSTING_INTERFACE_END'.

2017.05.03

2.9K010

文章

BAPI_ACC_DOCUMENT_POST外部输入汇率

使用BAPI函数BAPI_ACC_DOCUMENT_POST推送会计凭证时，对于需要外部输入汇率的情况，需要特别指定换算日期和汇率和本位币金额。本位币金额可以用程序算，也可以外部输…

ag
2021.11.23
826000
文章

BAPI_ACC_DOCUMENT_POST导入固定资产业务

BAPI_ACC_DOCUMENT_POST导入固定资产业务时，以下几个参数要注意处理。 ACCOUNTGL-GL_ACCOUNT要传总账科目 ACCOUNTGL-KOART = …

ag
2021.10.13
531000

发表评论

登录后才能评论

BAPI or function module to change existing sap accounting document

相关文章

发表评论