使用BAPI批量修改採購信息記錄的稅率

業務方面提出需求：因爲國家稅率從5月份開始16%更改成13%。要求開發一個批量修改採購信息記錄稅率的功能。

稅代碼就是稅率，J2表明13%

 

這個需求在ME13裏面就能夠單個修改，因此能夠用BDC，但後來找了下BAPI，發現真有修改稅率的功能，果斷用上。

BAPI是 ME_UPDATE_INFORECORD。

其實程序用到的表就是EINA和EINE，通常數據和組織數據。每個供應商對應的物料、工廠都會有一條數據。

可是多個工廠的稅率都是同樣的，因此修改是要一併修改。

 

首先給個選擇屏幕讓業務選擇哪些供應商、哪些物料須要修改稅率，通常選供應商就行，再添加稅率的選擇框。

 

接下來直接上調用BAPI的代碼：

  

loop at it_tab assigning field-symbol(<wa_tab>).
    select single * from eina into yeina where infnr = <wa_tab>-infnr.
    move yeina to xeina.

    "多個工廠的稅率都要改
    select * from eine into table yeine where infnr = <wa_tab>-infnr.
    move yeine[] to xeine[].

    loop at xeine assigning field-symbol(<wa_xeine>).
      l_index = sy-tabix.
      <wa_xeine>-mwskz = p_mwskz.
      read table yeine assigning field-symbol(<wa_yeine>) index l_index.

      call function 'ME_UPDATE_INFORECORD'
        exporting
          xeina    = xeina
          xeine    = <wa_xeine>
          yeina    = yeina
          yeine    = <wa_yeine>
          reg_eina = reg_eina.

      call function 'BAPI_TRANSACTION_COMMIT'.
    endloop.


    <wa_tab>-light = '3'.
    <wa_tab>-msg   = '稅代碼修改爲功'.
    <wa_tab>-new_mwskz = p_mwskz.
  endloop.

　　

這個方法沒有返回sy-subrc因此都是直接修好了吧。

方法裏面 x 表明新記錄，y 表明就記錄。

到ME13查看就已經修改新的稅率。

 　

做者：明光爍亮
出處：http://www.cnblogs.com/hezhongxun/ 微信號：HEme922 關注可分享SAP ECC虛擬環境，以及開發或業務視頻教程 本文版權歸做者和博客園共有，歡迎轉載，但未經做者贊成必須保留此段聲明，且在文章頁面明顯位置給出原文鏈接，不然保留追究法律責任的權利。