CLASS lcl_salv_model DEFINITION INHERITING FROM cl_salv_model_list.
  PUBLIC SECTION.
    METHODS:get_grid
      IMPORTING io_model      TYPE REF TO cl_salv_model
      RETURNING VALUE(r_grid) TYPE REF TO cl_gui_alv_grid.
ENDCLASS.
CLASS lcl_salv_model IMPLEMENTATION.
  METHOD get_grid.
    DATA:grid_adapter TYPE REF TO cl_salv_grid_adapter.
    grid_adapter ?= io_model->r_controller->r_adapter.
    r_grid = grid_adapter->get_grid( ).
  ENDMETHOD.
ENDCLASS.

START-OF-SELECTION.

  SELECT *
    FROM tj02t
    UP TO 10 ROWS
    INTO TABLE @DATA(lt_data).

  cl_salv_table=>factory(
  IMPORTING
    r_salv_table = DATA(lo_salv)
  CHANGING
    t_table = lt_data
  ).

  lo_salv->display( ).
  DATA:lo_alv_model TYPE REF TO cl_salv_model.
  lo_alv_model = lo_salv.
  DATA(lo_local_salv_model) =  NEW lcl_salv_model( ).
  DATA(lo_grid) = lo_local_salv_model->get_grid( lo_alv_model ).