BAPI_GOODSMVT_CREATE

Code: Alles auswählen.

  DATA: BEGIN OF bapi_header OCCURS 0.
          INCLUDE STRUCTURE bapi2017_gm_head_01.
  DATA: END OF bapi_header.
  DATA: BEGIN OF bapi_item OCCURS 0.
          INCLUDE STRUCTURE bapi2017_gm_item_create.
  DATA: END OF bapi_item.
  DATA: BEGIN OF bapi_return OCCURS 0.
          INCLUDE STRUCTURE bapiret2.
  DATA: END OF bapi_return.
  bapi_header-pstng_date = sy-datum.
  bapi_header-doc_date = sy-datum.
  bapi_header-pr_uname = sy-uname.

  LOOP AT gt_new_ekpo INTO gs_ekpo WHERE ebeln = gs_ekko-ebeln.
    IF gs_ekpo-matnr IS NOT INITIAL.
      bapi_item-material = gs_ekpo-matnr.
    ELSE.
      bapi_item-material = gs_ekpo-ematn.
    ENDIF.
    bapi_item-plant = gs_ekpo-werks.
    bapi_item-stge_loc = gs_ekpo-lgort.
    bapi_item-move_type = '101'.
    bapi_item-mvt_ind = 'F'.
    bapi_item-stck_type = 'F'.
    bapi_item-vendor = gs_ekko-lifnr.
    bapi_item-po_number = gs_ekpo-ebeln.
    bapi_item-po_item = gs_ekpo-ebelp.
    bapi_item-entry_qnt = gs_ekpo-menge.
    bapi_item-entry_uom = gs_ekpo-meins.
    bapi_item-po_pr_qnt = gs_ekpo-menge.
    bapi_item-orderpr_un = gs_ekpo-meins.
    bapi_item-no_more_gr = 'X'.
    APPEND bapi_item.
  ENDLOOP.
  CALL FUNCTION 'BAPI_GOODSMVT_CREATE'
    EXPORTING
      goodsmvt_header = bapi_header
      goodsmvt_code   = '01'
    TABLES
      goodsmvt_item   = bapi_item
      return          = bapi_return
    .