|
CLEAR:lt_poitem,lt_poitemx.
lw_poitem-po_item = gw_alv-ebelp.
lw_poitem-calctype = 'C'.
lw_poitem-net_price = gw_alv-kbetr. "价格
lw_poitem-price_unit = gw_alv-kpein. "价格单位
APPEND lw_poitem TO lt_poitem.
CLEAR:lw_poitem.
lw_poitemx-po_item = gw_alv-ebelp.
lw_poitemx-po_itemx = 'X'.
lw_poitemx-calctype = 'X'.
lw_poitemx-net_price = 'X'.
lw_poitemx-price_unit = 'X'.
APPEND lw_poitemx TO lt_poitemx.
CLEAR:lw_poitemx.
直接更新POITEM即可,最后记得CALL COMMIT就可以了。
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'. |
|