DATA: C_FLAG(1) TYPE C.
DATA: G_POHEADER LIKE BAPIMEPOHEADER,
G_RETURN LIKE BAPIRET2 OCCURS 0 WITH HEADER LINE,
G_POITEM LIKE BAPIMEPOITEM OCCURS 0 WITH HEADER LINE,
G_POCOMPONENTS LIKE BAPIMEPOCOMPONENT OCCURS 0 WITH HEADER LINE,
G_POCOMPONENTSX LIKE BAPIMEPOCOMPONENTX OCCURS 0 WITH HEADER LINE.
"查询PO及组件
CALL FUNCTION 'BAPI_PO_GETDETAIL1'
EXPORTING
PURCHASEORDER = OEBELN
IMPORTING
POHEADER = G_POHEADER
TABLES
RETURN = G_RETURN
POITEM = G_POITEM
POCOMPONENTS = G_POCOMPONENTS.
READ TABLE G_RETURN WITH KEY TYPE = 'E'.
IF SY-SUBRC EQ 0.
LOOP AT G_RETURN WHERE TYPE = 'E'.
MESSAGE ID G_RETURN-ID TYPE G_RE
SAP BAPI_PO_CHANGE修改PO组件(数量)
于 2020-09-24 20:59:41 首次发布