ABAP OOALV 隐藏工具栏某些按钮

1314lay_1007

已于 2024-08-08 14:20:00 修改

阅读量222

点赞数 1

分类专栏： SAP ABAP 文章标签： ABAP

于 2024-08-08 14:19:00 首次发布

本文链接：https://blog.csdn.net/weixin_44686958/article/details/141025812

版权

ABAP 同时被 2 个专栏收录

97 篇文章 4 订阅

订阅专栏

SAP

96 篇文章 0 订阅

订阅专栏

文章目录

- 实现
- 对象类和SET_TABLE_FOR_FIRST_DISPLAY方法

实现

在这里插入图片描述

DATA: GT_TOOLBAR TYPE UI_FUNCTIONS.

PERFORM EXCLUDE_TB_FUNCTIONS CHANGING GT_TOOLBAR. "隐藏某些按钮

FORM EXCLUDE_TB_FUNCTIONS CHANGING CT_EXCLUDE TYPE UI_FUNCTIONS .
  DATA LS_EXCLUDE TYPE UI_FUNC..
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_COPY_ROW.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_DELETE_ROW.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_APPEND_ROW.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_INSERT_ROW.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_MOVE_ROW.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_COPY.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_CUT.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_PASTE.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_PASTE_NEW_ROW.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_LOC_UNDO.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_PRINT.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_GRAPH.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_INFO.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_REFRESH.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
  LS_EXCLUDE = CL_GUI_ALV_GRID=>MC_FC_CHECK.
  APPEND LS_EXCLUDE TO CT_EXCLUDE.
ENDFORM .

CALL METHOD G_GUI_ALV_DOWN->SET_TABLE_FOR_FIRST_DISPLAY
    EXPORTING
      IS_LAYOUT            = GS_LAYOUT_DOWN
      I_SAVE               = 'A'
      IT_TOOLBAR_EXCLUDING = GT_TOOLBAR
    CHANGING
      IT_OUTTAB            = GS_OUT-DETAIL[]
      IT_FIELDCATALOG      = GT_FIELDCAT_DOWN.