REPORT  z17_22                                 .

include <icon>.

types: begin of g_type_itab.
        include type sflight.
        types:   icon  type icon_d,
      end of g_type_itab.

data gt_itab    type table of g_type_itab.
data gs_itab    type g_type_itab.
data gr_table   type ref to cl_salv_table.

select * from sflight into table gt_itab
up to 25 rows.

loop at gt_itab into gs_itab.
    if gs_itab-seatsocc >= 90.
      gs_itab-icon = icon_locked.
    elseif gs_itab-seatsocc >= 50.
      gs_itab-icon = icon_message_warning.
else.
      gs_itab-icon = icon_unlocked.
    endif.

    modify gt_itab from gs_itab.
endloop.

cl_salv_table=>factory(
  importing
    r_salv_table = gr_table
  changing
    t_table      = gt_itab ).

data: lr_columns type ref to cl_salv_columns_table,
      lr_column  type ref to cl_salv_column_table.

lr_columns = gr_table->get_columns( ).
lr_column ?= lr_columns->get_column( 'ICON' ).
lr_column->set_icon( if_salv_c_bool_sap=>true ).
lr_column->set_long_text( 'ICON' ).

gr_table->display( ).