Создание кнопки в меню селекционного экрана.

tables: sscrfields.
selection-screen: function key 1.
initialization.
  call function 'ICON_CREATE'
    exporting
      name                  = 'ICON_PERSONAL_SETTINGS'
      text                  = 'кнопка'
      info                  = ' '
    importing
      result                = sscrfields-functxt_01
    exceptions
      icon_not_found        = 1
      outputfield_too_short = 2
      others                = 3.
at selection-screen.
  case sscrfields-ucomm.
    when 'FC01'.
      message 'PUSH BUTTON' type 'I'.
  endcase.

результат

или еще можно так:

data: ls_dyntxt type smp_dyntxt.
  clear : ls_dyntxt.
  ls_dyntxt-icon_id = icon_protocol.
  ls_dyntxt-text =
  ls_dyntxt-icon_text = 'Журнал замеров'.
  sscrfields-functxt_01 = ls_dyntxt.

  clear : ls_dyntxt.
  ls_dyntxt-icon_id = icon_table_settings.
  ls_dyntxt-text =
  ls_dyntxt-icon_text = 'Диапазон плотностей'.
  sscrfields-functxt_02 = ls_dyntxt.