BAPI for material storage location Add

 We can add material storage location plant wise using third party app or web. BAPI names : BAPI_MATERIAL_MAINTAINDATA_RT Import parameters: HEADDATA: Material Tables: STORAGELOCATIONDATA: Material: Plant: STGE_LOC:   STORAGELOCATIONDATAX: Material: Plant: STGE_LOC:   use below code after completing steps. CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.        

Using CL_SALV_TABLE

 
Display ALV Grid:
DATA: lo_salv TYPE REF TO cl_salv_table.
TRY.
  CALL METHOD cl_salv_table=>factory
    IMPORTING r_salv_table = lo_salv
    CHANGING t_table = t_data.
  CATCH cx_salv_msg.
ENDTRY.
lo_salv->display( ).
 
Set GUI Status:
CALL METHOD lo_salv->set_screen_status
  EXPORTING 
    report = sy-repid
    pfstatus = 'STANDARD' "your PF Status name
    set_functions = lo_salv->c_functions_all.
 
Enable Save ALV Layout:
DATA: 
ls_key TYPE salv_s_layout_key,
lo_layout TYPE REF TO cl_salv_layout.
ls_key-report = sy-repid.
lo_layout = lo_salv->get_layout( ).
lo_layout->set_save_restriction( if_salv_c_layout=>restrict_none ).
lo_layout->set_key( ls_key ).
 
Enable Save Default Layout:
lo_layout->set_default( abap_true ).
 
Set Column Optimized:
DATA: lo_columns TYPE REF TO cl_salv_columns_table.
lo_columns = lo_salv->get_columns( ).
lo_columns->set_optimize( 'X' ).
 Enable Saerch Help:
DATA: ls_ref TYPE salv_s_ddic_reference.
TRY.
  lo_columns ?=ch_cols->get_column( 'MATNR' ).
  ls_ref-table = 'MARA'.
  ls_ref-field = 'MATNR'.
  lo_columns->set_ddic_reference( ls_ref ).
  lo_columns->set_f4( 'X' ).
  CATCH cx_salv_not_found.
ENDTRY.    
 
Event Double Click:
DATA: lo_events TYPE REF TO cl_salv_events_table.
lo_events = lo_salv->get_event( ).
SET HANDLER cl_event_handler=>on_double_click FOR lo_events.

*create a new local class fo event handler
CLASS cl_event_handler DEFINITION.
  PUBLIC SECTION.
    CLASS-METHODS on_double_click FOR EVENT double_click OF cl_salv_events_table 
    IMPORTING row column.
ENDCLASS.
CLASS cl_event_handler IMPLEMENTATION.
  METHOD on_double_click.
    READ TABLE t_data INTO data(ls_data) INDEX row.
    CHECK sy-subrc = 0.
    SET PARAMETER ID 'MAT' FIELD ls_data-matnr.
    CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
  ENDMETHOD.
ENDCLASS.
 
Enable Zebra Layout:
DATA lo_settings TYPE REF TO cl_salv_display_settings.
lo_settings = lo_salv->get_display_settings( ).
lo_settings->set_striped_pattern( if_salv_c_bool_sap=>true ).  
 
Top of the page:
data(o_grid_header) = new cl_salv_form_layout_grid( ).

o_grid_header->create_header_information( row = 1
column = 1
text = 'Posting Date: p_date').


gr_table->set_top_of_list( o_grid_header ). 
     

Comments

Popular posts from this blog

New commodity code create in SAP S/4 Hana

Convert First character to Upper case in SAP ABAP