REPORT z17_08.

DATA gt_itab    TYPE TABLE OF zemplist.
DATA gr_table   TYPE REF TO cl_salv_table.
DATA gr_columns TYPE REF TO cl_salv_columns_table.
DATA gr_column  TYPE REF TO cl_salv_column_table.
DATA gr_layout  TYPE REF TO cl_salv_layout.
DATA g_program  TYPE salv_s_layout_key.

SELECT *
  FROM zemplist
  INTO TABLE @gt_itab.

cl_salv_table=>factory(
  IMPORTING
    r_salv_table = gr_table
  CHANGING
    t_table      = gt_itab ).

gr_columns = gr_table->get_columns( ).
gr_column ?= gr_columns->get_column( 'MANDT' ).
gr_column->set_visible( cl_salv_column_table=>false ).

gr_layout = gr_table->get_layout( ).
g_program-report = sy-repid.
gr_layout->set_key( g_program ).
gr_layout->set_save_restriction( cl_salv_layout=>restrict_none ).

gr_table->display( ).