Update GR quantity in Inbound delivery using 'BAPI_INB_DELIVERY_CHANGE'

Question

Hello SDNs,
I have a requirement to update quantity delivered post GR in the Inbound delivery. I'm using 'BAPI_INB_DELIVERY_CHANGE' to do the updation in program. The database is not updated with new quantity.
BAPI returns error message in "Return" table with ID VLBAPI . I'm unable to detect where the problem is.
Below is my code. Please help me resolve it.
  loop at it_final.
    CLEAR g_delivery.
    g_delivery = it_final-text(10).
*   g_delivery = '0180000221'.
    g_del_item = it_final-text+10(6).
*    g_del_item = '10'.
    g_material = it_final-text+16(18).
    g_dlv_qty = it_final-text+34(13).
    select single * from lips into wa_lips
        where vbeln = g_delivery
          and posnr = g_del_item
          and matnr = g_material.
    if sy-subrc eq 0.
      wa_lips-lfimg = g_dlv_qty.
      modify lips from wa_lips.
      check sy-subrc eq 0.
    endif.
    CLEAR gt_header_data.
    REFRESH gt_header_data.
    gt_header_data-deliv_numb = g_delivery.
    gt_header_data-volumeunit = wa_lips-voleh.
    APPEND gt_header_data.
    CLEAR gt_header_ctrl.
    REFRESH gt_header_ctrl.
    gt_header_ctrl-deliv_numb = g_delivery.
*    gt_header_ctrl-no_lock = 'Y'.
    APPEND gt_header_ctrl.
    clear gt_tech_ctrl.
    refresh gt_tech_ctrl.
    gt_tech_ctrl-UPD_IND = 'X'.
    gt_tech_ctrl-DLV_TYPE = 'EL'.
    append gt_tech_ctrl.
    CLEAR gt_data.
    REFRESH gt_data.
    gt_data-deliv_numb = g_delivery.
    gt_data-deliv_item = g_del_item.
    gt_data-material = g_material.
    gt_data-dlv_qty = wa_lips-lfimg.
    gt_data-sales_unit = wa_lips-vrkme.
    gt_data-base_uom = wa_lips-meins.
    gt_data-dlv_qty_imunit = g_dlv_qty.
*   gt_data-base_uom_iso =
*    gt_data-
    APPEND gt_data.
    REFRESH gt_ctrl.
    gt_ctrl-deliv_numb = g_delivery.
    gt_ctrl-deliv_item = g_del_item.
* gt_ctrl-del_item   = ' '.
    gt_ctrl-CHG_DELQTY = 'X'.
    APPEND gt_ctrl.
    CALL FUNCTION 'BAPI_INB_DELIVERY_CHANGE'
      EXPORTING
        HEADER_DATA                = gt_header_data
        HEADER_CONTROL             = gt_header_ctrl
        DELIVERY                   = g_delivery
        TECHN_CONTROL              = gt_tech_ctrl
      TABLES
*   HEADER_PARTNER             =
*   HEADER_PARTNER_ADDR        =
*   HEADER_DEADLINES           =
       ITEM_DATA                  = gt_data
      ITEM_CONTROL               =  gt_ctrl
*   ITEM_SERIAL_NO             =
*   EXTENSION1                 =
*   EXTENSION2                 =
        RETURN                     = return
*   TOKENREFERENCE             =
*   HANDLING_UNIT_HEADER       =
*   HANDLING_UNIT_ITEM         =
*   PARTIAL_GR_OBJECTS         =
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
      EXPORTING
        WAIT = ' '.
endloop.
Thanks
Shruti

Answer 1

Please check the inbound delivery you are trying to delete is not having goods receipt status as 'completed' OR not having HANDLING UNITS assigned to it.
In any of the above case, please reverse the goods receipt first, then unassign the handling units and then try to delete the inbound delivery. In my opinion, there should be no need to change the qty to 0 and just delete the inbound delivery should work.
In case you still encounter an error, try deleting the delivery using VL32n and you should get a clear error/problem for your case.