如何通过 BAPI 更新 PO 采购订单中的 confirmation tab 中的 confirmation date.
答案是
?
ME_CONFIRMATION_UPDATE?
。。
?
格式我稍后提供
果斷上代碼 , 這是在PO增強(qiáng)中的一段代碼。獲取修改信息的時(shí)候?qū)⒆远x的增強(qiáng)TAB上的字段對(duì)應(yīng)入Confirmation Tab.
*********add by gary.chen 2011-03-11
DATA: zxekes TYPE TABLE OF uekes WITH HEADER LINE.
DATA: zyekes TYPE TABLE OF uekes WITH HEADER LINE.
?
*"獲取目前的confirm tab中的計(jì)劃
*"retrive old confirm information
?
LOOP AT xekpo.
??SELECT SINGLE * INTO CORRESPONDING FIELDS OF zyekes FROM ekes WHERE
??ekes~ebeln = xekpo-ebeln AND ekes~ebelp = xekpo-ebelp.
*"刪除之前的計(jì)劃
??IF sy-subrc EQ 0.
????zyekes-kz = 'D'.
????APPEND zyekes.
??ENDIF.
??CLEAR zyekes.
ENDLOOP.
?
*SELECT * INTO CORRESPONDING FIELDS OF TABLE xekes FROM ekpo WHERE
*ekpo~ebeln = ekpo-ebeln.
DATA lv_etens TYPE etens.
LOOP AT??xekpo.
??CLEAR lv_etens.
*"獲取confirm tab?中的confirm type.
*"reatrive the confirm type .
??zxekes-ebeln = xekpo-ebeln.
??zxekes-ebelp = xekpo-ebelp.
??lv_etens = xekpo-bstae.
*??LOOP AT xekes WHERE ebeln = xekpo-ebeln AND ebelp = xekpo-ebelp.
*????xekes-etens = xekpo-bstae.
*??ENDLOOP.
*
*??IF sy-subrc NE 0.
*????SELECT SINGLE ekes~etens INTO lv_etens FROM ekes
*????WHERE ekes~ebeln = xekpo-ebeln AND ekes~ebelp = xekpo-ebelp.
*??ENDIF.
*"獲取目前的customer tab的日期和時(shí)間 retrieave the date from custom tab.
?
*"如果confirm type?非0001,則標(biāo)記xekes-etens為空做后續(xù)刪除.
*"if cofirm type is not 0001, mark xekes-etens as null to delete the row
??IF lv_etens = '0001'.
????zxekes-etens = lv_etens.
????zxekes-kz = 'I'.
????zxekes-ebtyp = 'LA'.
????zxekes-lpein = '1'.
????zxekes-eindt = xekpo-zekpo_conf_arri.
????zxekes-menge = xekpo-zekpo_conf_qty.
* "如果CUSTOMER DATA的數(shù)量或日期為空則標(biāo)記etens為空.
* "if confirm arrive date or qty is initial. mark etens as null to
* "deltete the row
????IF ( zxekes-eindt IS INITIAL ) OR (??zxekes-menge IS INITIAL ).
??????CLEAR???zxekes.
??????zxekes-ebeln = xekpo-ebeln.
??????zxekes-ebelp = xekpo-ebelp.
??????zxekes-etens =??lv_etens.
????ENDIF.
????APPEND zxekes.
??ENDIF.
??CLEAR zxekes.
ENDLOOP.
?
?
?
*"標(biāo)準(zhǔn)功能函數(shù)調(diào)用,更新CONFIRMATION TAB.
?
IF NOT zxekes[] IS INITIAL.
*"刪除ETENS標(biāo)記為空的行??delete the row with etens markes as null.
??DELETE zxekes WHERE etens IS initial.
?
??CALL FUNCTION 'ME_CONFIRMATION_UPDATE'
???????EXPORTING
????????????i_ebeln = ekpo-ebeln
???????TABLES
????????????xekes???= zxekes??"new
????????????yekes???= zyekes. "old
?
??IF sy-subrc EQ 0.
?
????COMMIT WORK.
?
??ENDIF.
ENDIF.
?
CLEAR: zxekes[], zyekes[].
*******
總結(jié)
以上是生活随笔為你收集整理的如何通过 BAPI 更新 PO 采购订单中的 confirmation tab 中的 confirmation date.的全部?jī)?nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 美的诗篇
- 下一篇: 看好电影,学标准英语