How to add a refresh button to this report. Thank you.
DATA: ispfli TYPE TABLE OF spfli.
DATA: gr_table TYPE REF TO cl_salv_table.
DATA: gr_functions TYPE REF TO cl_salv_functions.
DATA: gr_display TYPE REF TO cl_salv_display_settings.
DATA: gr_columns TYPE REF TO cl_salv_columns_table.
DATA: gr_column TYPE REF TO cl_salv_column_table.
DATA: gr_sorts TYPE REF TO cl_salv_sorts.
data: gr_filter type REF TO cl_salv_filters.
DATA: color TYPE lvc_s_colo.
START-OF-SELECTION.
SELECT * INTO TABLE ispfli FROM spfli.
cl_salv_table=>factory( IMPORTING r_salv_table = gr_table
CHANGING t_table = ispfli ).
gr_functions = gr_table->get_functions( ).
gr_functions->set_all( abap_true ).
gr_display = gr_table->get_display_settings( ).
gr_display->set_striped_pattern( cl_salv_display_settings=>true ).
gr_display->set_list_header( 'This is the heading' ).
gr_columns = gr_table->get_columns( ).
gr_column ?= gr_columns->get_column( 'CITYTO').
gr_column->set_long_text( 'Destination' ).
gr_column->set_medium_text( 'Test' ).
gr_column->set_short_text( 'Test' ).
color-col = '3'.
color-int = '1'.
color-inv = '0'.
gr_column->set_color( color ).
gr_sorts = gr_table->get_sorts( ).
gr_sorts->add_sort( 'CITYTO' ).
gr_filter = gr_table->get_filters( ).
gr_filter->add_filter( columnname = 'CARRID' low = 'LH') .
gr_table->display( ).