Using Bapi_salesorder_change adding a item, deleting a item,Quanty change

Question

I need help on Bapi_salesorder_change.
I have a table control in which there will be data of a particular sales document no, items, quantity, sales unit. When user changes the quantity, or adds a line item or deletes a line item and the press the save button bapi_salesorder_change should trigger and should change the order as the user changes.
Can u help how to write code for this three conditions
1> adding line item.
2> deleting a line item.
3> changing the quantity.
using bapi_salesorder_change
Can i use the same bapi for three conditions?
Please help me in this as soon as possible.
I thank them in advance

Answer 1

Hello Geeks,
          i am using this bapi  for updating my item quantity no....
          but the bapi return msg say tat its not changing....
          i think i may did some mistake pls anyone can rectify it....
          i hv attached my code below......
*For line item
TYPES :BEGIN OF y_t_vbap,
        vbeln TYPE vbeln_va,  "sales Document
        posnr TYPE posnr_va,  "Item no of SD document
        matnr TYPE matnr,     "Material No
        zmeng TYPE dzmeng ,   "Target qty in Sales unit
        spart TYPE spart,     "division
        message TYPE BAPI_MSG,
       kwmeng type kwmeng,   "cummulative order qty
       END OF y_t_vbap.
TYPES : y_t_itemin TYPE bapisditm,
        y_t_return TYPE bapiret2,
        y_t_headerx TYPE bapisdh1x.
TYPES: BEGIN OF y_t_logdata,
       lno             TYPE         lineno,         "Lineno
       field           TYPE         fieldname,      "Field Name
       value           TYPE         lmon_fvalue,    "Field Value
       message         TYPE         bapi_msg,       "Messages
       END OF y_t_logdata.
                 Internal table declaration
DATA: "y_i_vbak      TYPE   STANDARD TABLE OF y_t_vbak,
      y_i_vbap      TYPE   STANDARD TABLE OF y_t_vbap,
      y_i_headerx   TYPE   STANDARD TABLE OF bapisdh1x,
      y_i_itemin    TYPE   STANDARD TABLE OF bapisditm ,
      y_i_iteminx   TYPE   STANDARD TABLE OF bapisditmx,
      y_i_return    TYPE   STANDARD TABLE OF y_t_return,
      y_i_logdata   TYPE   STANDARD TABLE OF y_t_logdata,
      y_i_bapiret   TYPE   STANDARD TABLE OF bapiret2.
                 Table type declaration
TYPES: y_tt_vbap    TYPE   STANDARD TABLE OF y_t_vbap ,
       y_tt_logdata TYPE   STANDARD TABLE OF y_t_logdata.
                 Work Area declaration.
DATA:   y_wa_vbap     TYPE   y_t_vbap,
      y_wa_itemin   TYPE   bapisditm ,
      y_wa_iteminx  TYPE   bapisditmx,
      y_wa_headerx  TYPE   bapisdh1x,
      y_wa_return   TYPE   y_t_return,
      y_wa_logdata  TYPE   y_t_logdata,
      y_wa_event    TYPE   slis_alv_event,
      y_wa_event1   TYPE   slis_t_event,
      y_wa_bapiret  TYPE   bapiret2.
                 Variables declaration.
DATA: y_i_event     TYPE   slis_t_event,
      y_v_success   TYPE   i           , "For Success
      y_v_error     TYPE   i           , "For Error
      y_v_sno       TYPE   char30      ,
      y_v_eno       TYPE   char30      ,
      y_v_msg       TYPE   char100     . "error msg
                 Constants declaration.
constants : y_k_x type char1 value 'X',
                y_k_u type char1 value 'U',
               y_k_e type char1 value 'E'.
              SELECTION SCREEN LAYOUT
SELECTION-SCREEN:BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN: COMMENT 3(18) text-003.
PARAMETERS   :    y_p_vbln TYPE vbak-vbeln OBLIGATORY.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN : END OF BLOCK b1.
                  START-OF-SELECTION.
START-OF-SELECTION.
WRITE: text-002.
                  END-OF-SELECTION.
END-OF-SELECTION.
  SELECT  vbeln
          posnr
          matnr
          zmeng
          spart
          FROM vbap
               INTO TABLE    y_i_vbap
               WHERE vbeln = y_p_vbln.
  LOOP AT y_i_vbap INTO y_wa_vbap.
    y_wa_vbap-zmeng = 2 + y_wa_vbap-zmeng.
    MODIFY y_i_vbap FROM y_wa_vbap INDEX sy-tabix.
  ENDLOOP.
  PERFORM y_f_update USING y_i_vbap.
*&      Form  y_f_update
       POPULATE BAPI DATA AND RUN BAPI
FORM y_f_update USING  y_p_vbap TYPE y_tt_vbap.
  CLEAR: y_i_headerx, y_i_itemin, y_i_iteminx,
         y_i_return, y_i_bapiret.
  REFRESH: y_i_itemin, y_i_iteminx, y_i_return, y_i_bapiret.
  LOOP AT y_i_vbap INTO y_wa_vbap.
    MOVE y_wa_vbap-zmeng TO y_wa_itemin-target_qty.
    MOVE y_wa_vbap-posnr TO y_wa_itemin-itm_number.
    APPEND y_wa_itemin TO y_i_itemin.
  ENDLOOP.
*Update the Bapi Itnernal tables
  y_wa_headerx-updateflag = y_k_u .
  APPEND y_wa_headerx TO y_i_headerx.
  LOOP AT y_i_vbap INTO y_wa_vbap.
    y_wa_iteminx-itm_number = y_wa_vbap-posnr.
    y_wa_iteminx-target_qty = y_k_x .
    y_wa_iteminx-updateflag = y_k_u .
    APPEND y_wa_iteminx TO y_i_iteminx .
  ENDLOOP .
  CALL FUNCTION 'BAPI_SALESORDER_CHANGE'
    EXPORTING
      salesdocument    = y_wa_vbap-vbeln
      order_header_inx = y_wa_headerx
    TABLES
      return           = y_i_return
      order_item_in    = y_i_itemin
      order_item_inx   = y_i_iteminx.
  CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
  CLEAR y_i_vbap.
IF y_i_return is not initial.
  LOOP AT y_i_return INTO y_wa_return where TYPE = y_k_e .
    MOVE y_wa_return-message TO y_wa_vbap-message .
    Append  y_wa_vbap to y_i_vbap.
    y_v_success = y_v_success + 1.
  ENDLOOP.
ENDIF.
  y_wa_event-name = 'TOP_OF_PAGE'.
  y_wa_event-form = 'Y_FD_TOP_OF_LIST'.
  APPEND y_wa_event TO y_i_event.
  CLEAR y_wa_event.
  CALL FUNCTION 'ALV_LIST_DISPLAY'
    EXPORTING
      i_callback_program         = sy-repid
      i_tabtypename1             = 'Y_T_VBAP'
      it_events1                 = y_i_event[]
    TABLES
      t_outtab1                  = y_i_vbap[]
    EXCEPTIONS
      program_error              = 1
      maximum_of_appends_reached = 2
      OTHERS                     = 3.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE 'S' NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.
ENDFORM.                    " y_f_vbap
*&      Form  Y_FD_TOP_OF_LIST
FORM y_fd_top_of_list.
  MOVE: y_v_success TO y_v_sno,
        y_v_error   TO y_v_eno.
  CONCATENATE text-002 y_v_sno '/' y_v_eno INTO y_v_msg SEPARATED BY
  space.
  CONDENSE y_v_msg.
  WRITE / y_v_msg .
  SKIP 1.
ENDFORM.                    "Y_FD_TOP_OF_LIST