Untitled

  do 60 times.
        data(lv_fieldname) = conv lvc_fname( |SMTP_ADDR{ conv numc2( sy-index ) }| ) .
        data(lv_coltext)   = conv char40( |Mail { sy-index } | ) .
        tanim : lv_fieldname  lv_coltext.

        data(lv_where) = |{ lv_fieldname } ne space| .

        loop at <fs_1> transporting no fields where (lv_where).
          exit.
        endloop.

*     "Girilen mail kadar mail sütunu görünmeli.
        if sy-subrc ne 0.
          lr_column ?= lr_columns->get_column( lv_fieldname ).
          lr_column->set_visible( abap_false ).
        endif.

      enddo.

"Varsayılan mail adresi çakışmaması için arkaplanda gizlenir.
      lr_column ?= lr_columns->get_column( 'SMTP_ADDR' ).
      lr_column->set_visible( value = abap_false ).