GUI标题的简单例子

业务背景：实际集团业务中，各子公司在统一报表或功能显示时需要显示为当前登录用户的公司数据，同样的GUI标题更加清晰引人注意。为此引入GUI标题的设计：

在资源库浏览器可以看到GUI标题的自建的3个标题：

GUI标题截图

简单看下运行结果中GUI标题的显示效果：

功能选择界面

GUI标题结果显示

以下是ABAP的简单例子：（仅供参考）

FORM frm_set_status USING pt_extab TYPE slis_t_extab.
  DATA:lv_text TYPE char20，
       gr_grid       TYPE REF TO cl_gui_alv_grid.
  DATA lt_exfcode TYPE TABLE OF sy-ucomm.
"根据不同的功能按钮不同的GUI标题
  IF p_deal = 'X'.
    CONCATENATE lv_text  '1200公司BMS结算单' INTO lv_text.
    SET TITLEBAR 'TIT_01' WITH lv_text."设置GUI标题
  ELSEIF p_redo = 'X'.
    CONCATENATE lv_text '1200公司BMS结算单' INTO lv_text.
    SET TITLEBAR 'TIT_02' WITH lv_text."设置GUI标题
  ELSE.
    CONCATENATE lv_text  '1200公司BMS结算单' INTO lv_text.
    SET TITLEBAR 'TIT_03' WITH lv_text."设置GUI标题
  ENDIF.

  SET PF-STATUS 'STATUS001' EXCLUDING lt_exfcode.
* 获取ALV对象
  CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
    IMPORTING
      e_grid = gr_grid.

  CALL METHOD gr_grid->check_changed_data.
  CALL METHOD gr_grid->refresh_table_display.
ENDFORM.