LOOP AT p_item.
      MOVE-CORRESPONDING p_item TO d_req.
      d_req-document_type = 'B'.
      d_req-document_numb = p_num.
      d_req-document_item = p_item-po_item.
      d_req-stge_loc = '0050'.
      d_req-quantity_sales_uom = p_item-quantity.
      d_req-date_usage = '1'.
      d_req-goods_issue_date = d_req-mat_availabil_date = bedat.
      d_req-delivery_date = d_req-transp_plan_date = bedat.
      d_req-date = bedat.
      APPEND d_req.
    ENDLOOP.
  CALL FUNCTION 'BAPI_DELIVERYPROCESSING_EXEC'
    TABLES
      request                  = d_req
      createditems          = d_item
      return                    = d_return
            .