选择屏幕4个按钮

TYPE-POOLS icon.
TABLES sscrfields.
DATA functxt TYPE smp_dyntxt.

PARAMETERS: p_carrid TYPE s_carr_id,
            p_cityfr TYPE s_from_cit.
SELECTION-SCREEN: FUNCTION KEY 1,
                  FUNCTION KEY 2,
                  FUNCTION KEY 3,
                  FUNCTION KEY 4.

INITIALIZATION.
  functxt-ICON_id = ICON_VARIANTS.
  functxt-quickinfo = '变式'.
*  functxt-icon_text = '变式'.
  sscrfields-functxt_03 = functxt.

  functxt-ICON_id = ICON_FAILURE.
  functxt-quickinfo = '变量'.
  sscrfields-functxt_04 = functxt.

  functxt-icon_id   = icon_ws_plane.
  functxt-quickinfo = 'Preselected Carrier'.
  functxt-icon_text = 'LH'.
  sscrfields-functxt_01 = functxt.

  functxt-icon_text = 'UA'.
  sscrfields-functxt_02 = functxt.

*functxt-icon_id = icon_variants.

AT SELECTION-SCREEN.
  CASE sscrfields-ucomm.
    WHEN 'FC01'.
      p_carrid = 'LH'.
      p_cityfr = 'Frankfurt'.
    WHEN 'FC02'.
      p_carrid = 'UA'.
      p_cityfr = 'Chicago'.
    WHEN 'FC03'.
      p_carrid = 'AA'.
      p_cityfr = 'beijing'.
    WHEN 'FC04'.
      p_carrid = 'BB'.
      p_cityfr = 'nanjing'.
*      ...
  ENDCASE.