BAPI_GOODSMVT_CREATE for subcontracting PO

  CLEAR goodsmvt_item.

  goodsmvt_item-line_id     = '0001'.

  goodsmvt_item-po_number   = ls_ekpo-ebeln.

  goodsmvt_item-po_item     = ls_ekpo-ebelp.

  goodsmvt_item-material    = ls_ekpo-matnr.

  goodsmvt_item-plant       = plant.

  goodsmvt_item-entry_qnt   = ls_ekpo-menge.

  goodsmvt_item-move_type   = '101'.

  goodsmvt_item-mvt_ind     = 'B'.

  goodsmvt_item-stge_loc    = lgort.

  goodsmvt_item-entry_uom_iso  = 'EA'.

  APPEND goodsmvt_item TO t_goodsmvt_item.

  CLEAR goodsmvt_item.

  goodsmvt_item-line_id     = '0002'.

  goodsmvt_item-parent_id     = '0001'.

  goodsmvt_item-material    = ls_ekpo-matnr.

  goodsmvt_item-plant       =  plant.

  goodsmvt_item-move_type   = '543'.

  goodsmvt_item-mvt_ind     = 'O'.

  goodsmvt_item-entry_uom_iso  = 'EA'.

  goodsmvt_item-entry_qnt   = ls_ekpo-menge.

  goodsmvt_item-batch       = batch_old.

  APPEND goodsmvt_item TO t_goodsmvt_item.

  goodsmvt_serialnumber-matdoc_itm = 1.

  goodsmvt_serialnumber-serialno = seril_new

  APPEND goodsmvt_serialnumber TO t_goodsmvt_serialnumber.

  goodsmvt_serialnumber-matdoc_itm = 2.

  goodsmvt_serialnumber-serialno = serial_old.

  APPEND goodsmvt_serialnumber TO t_goodsmvt_serialnumber.