BAPI:销售订单删除-BAPI_SALESORDER_CHANGE

DATA: ls_headinx LIKE bapisdh1x,
lt_return TYPE TABLE OF bapiret2,
ls_return TYPE bapiret2.

CLEAR: ls_headinx .

ls_headinx-updateflag = ‘D’.

CALL FUNCTION ‘BAPI_SALESORDER_CHANGE’
EXPORTING
salesdocument = pv_vbeln
order_header_inx = ls_headinx
TABLES
return = lt_return.

CLEAR pv_msgtxt.
LOOP AT lt_return INTO ls_return
WHERE type = ‘E’
OR type = ‘A’.

IF pv_msgtxt NS ls_return-message.
  CONCATENATE pv_msgtxt ls_return-message  INTO pv_msgtxt SEPARATED BY '/'  .
ENDIF.

ENDLOOP.

IF pv_msgtxt IS INITIAL .
COMMIT WORK AND WAIT .

ELSE.
ROLLBACK WORK.

ENDIF.