BAPI Demo Program

This program is demo to change description of Equipment related to material in Material Master

*&---------------------------------------------------------------------*
*& Report  Y_REP_BAPI_EQUIP_DESC_CHANGE
*&
*&---------------------------------------------------------------------*
*&
*&Include :ZXMG0U02
*&---------------------------------------------------------------------*

REPORT y_rep_bapi_equip_desc_change.
DATA :  ls_bapi_itob_parms TYPE bapi_itob_parms,
        ls_bapi_itob_desc TYPE bapi_itob,
        ls_descript_flag TYPE bapi_itobx,
        ls_data_specific TYPE BAPI_ITOB_EQ_ONLY,
        ls_data_specific_update TYPE BAPI_ITOB_EQ_ONLYX.
DATA   makt_desc(40) TYPE c.
DATA   stext TYPE TABLE OF short_desc.

*READ TABLE stext INTO makt_desc WITH KEY spras = 'E'.
ls_bapi_itob_parms-equipment = '000000000030225002'.
*ls_bapi_itob-descript        = makt_desc.
ls_bapi_itob_desc-descript   = 'PLATE W. ROAD 32X32'.
ls_descript_flag-descript    = 'X'.
ls_data_specific-equicatgry  = 'Z'.
ls_data_specific_update-equicatgry  = 'X'.
ls_data_specific_update-EQUIPMENT = 'X'.
data: ls_return TYPE bapiret2.

CALL FUNCTION 'BAPI_EQUI_CHANGE'
  EXPORTING
    equipment     = ls_bapi_itob_parms-equipment
    data_general  = ls_bapi_itob_desc
    data_generalx = ls_descript_flag
    DATA_SPECIFIC = ls_data_specific
    DATA_SPECIFICX = ls_data_specific_update
  IMPORTING
    RETURN          = ls_return.

COMMIT WORK.

if SY-SUBRC = 0.
  WRITE 'EQUIPMENT DESCRIPTION CHANGED SUCCESSFULLY'.
Else.
  WRITE 'EQUIPMENT DESCRIPTION UPDATION FAILED'.
Endif.

Comments

  1. UnknownJuly 12, 2018 at 10:02 AM

    Helpful article.

    Can you please explain why do we need:

    ls_data_specific_update-EQUIPMENT = 'X'.

    ReplyDelete

Post a Comment

Popular posts from this blog

Export data to xls using OOPS

* REPORT  ZDEMO_EXCEL20 * Demo for method zcl_excel_worksheet-bind_alv: * export data from ALV (CL_GUI_ALV_GRID) object to excel *--------------------------------------------------------------------* REPORT  zdemo_excel20. *----------------------------------------------------------------------* *       CLASS lcl_handle_events DEFINITION *----------------------------------------------------------------------* * *----------------------------------------------------------------------* CLASS lcl_handle_events DEFINITION.   PUBLIC SECTION.     METHODS:       on_user_command FOR EVENT added_function OF cl_salv_events         IMPORTING e_salv_function. ENDCLASS.                    "lcl_handle_events DEFINITION *---------------------------------------------------------------------...
Read more

Factory method ALV sap abap

DATA lo_salv TYPE REF TO cl_salv_table , lo_functions TYPE REF TO cl_salv_functions_list , lo_columns TYPE REF TO cl_salv_columns_table , lo_columns2 TYPE REF TO cl_salv_columns_table , lo_column TYPE REF TO cl_salv_column_table , l_short TYPE scrtext_s , l_long TYPE scrtext_l , l_medium TYPE scrtext_m , lo_display TYPE REF TO cl_salv_display_settings , l_header_text TYPE lvc_title , not_found TYPE REF TO cx_salv_not_found , data_error TYPE REF TO cx_salv_data_error , l_string TYPE string , text TYPE string , oref TYPE REF TO cx_root . CONSTANTS : lc_info TYPE c VALUE 'I' , wc_error TYPE c VALUE wc_e . CLEAR : lo_salv , lo_functions . IF w_alv IS NOT INITIAL . * Use factory method TRY . CALL METHOD cl_salv_table => factory EXPORTING list_display = if_salv_c_bool_sa...
Read more

Delete Selected Record in ALV Report

form delete_selected_information.        data : i_lines type i.      *       Reading the index of the selected row in the ALV grid.   call method addressbook_grid->get_selected_rows        importing             et_index_rows = i_index_rows.      *       Check whether a row is selected or not. If not it popups a *       dialog box as warning to select a row.   describe table i_index_rows lines i_lines.        if i_lines = 0.     message i002.     exit.   endif.      *        Reads the selected rows into work area for display   loop at i_index_rows into i_selected_row.     if sy-tabix = 1.   ...
Read more