更新销售订单执行新定价——BAPI_SALESORDER_CHANGE

代码：

DATA: l_vbeln           TYPE vbeln,
      ls_headerx        TYPE bapisdh1x,
      ls_logic          TYPE bapisdls,
      lt_return         TYPE TABLE OF bapiret2,
      lt_item           TYPE TABLE OF bapisditm,
      ls_item           TYPE bapisditm,
      lt_itemx          TYPE TABLE OF bapisditmx,
      ls_itemx          TYPE bapisditmx.

l_vbeln = '2100000792'.
ls_headerx-updateflag = 'U'.
ls_logic-pricing = 'B'.
ls_logic-cond_handl = 'X'.

ls_item-itm_number = ls_itemx-itm_number = '000190'.
ls_itemx-updateflag = 'U'.
APPEND ls_item TO lt_item.
APPEND ls_itemx TO lt_itemx.

CALL FUNCTION 'BAPI_SALESORDER_CHANGE'
  EXPORTING
    salesdocument    = l_vbeln
    order_header_inx = ls_headerx
    logic_switch     = ls_logic
  TABLES
    return           = lt_return
    order_item_in    = lt_item
    order_item_inx   = lt_itemx.

READ TABLE lt_return WITH KEY type = 'E' TRANSPORTING NO FIELDS.
IF sy-subrc = 0.
  ROLLBACK WORK.
ELSE.
  COMMIT WORK AND WAIT.
ENDIF.

cl_demo_output=>write( lt_return ).
cl_demo_output=>display(  ).