abap 添加alv上的工具栏的按钮_在alv工具栏上自定义菜单下拉按钮

要在 ABAP 中为 ALV 添加工具栏按钮，可以使用以下步骤：

1. 在程序中定义一个工具栏按钮。您可以使用函数模块 'REUSE_ALV_TOOLBAR_CREATE' 来创建按钮。

2. 使用函数模块 'REUSE_ALV_GRID_DISPLAY' 以及参数 'I_TOOLBAR_EXCLUDING' 将工具栏添加到 ALV 上，将按钮添加到工具栏上。

3. 在程序中添加处理按钮事件的代码。您可以使用函数模块 'REUSE_ALV_EVENT_GET' 来获取所需的事件 ID。

以下是添加工具栏按钮的示例代码：

* 定义工具栏按钮
DATA: lt_toolbar TYPE STANDARD TABLE OF t_salv_tb_display,
      ls_toolbar TYPE t_salv_tb_display.

ls_toolbar = VALUE #( function = 'Z_MY_FUNCTION'
                       icon     = 'ICON_NAME'
                       quickinfo = 'BUTTON_TOOLTIP' ).
APPEND ls_toolbar TO lt_toolbar.

* 显示 ALV 并添加工具栏
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  EXPORTING
    it_fieldcat         = lt_fieldcat
    i_callback_program  = gv_prog_name
    i_callback_top_of_page = 'TOP_OF_PAGE'
    i_toolbar_title     = 'TOOLBAR_TITLE'
    i_toolbar_excluding = 0
  TABLES
    t_outtab            = lt_output
  EXCEPTIONS
    program_error       = 1
    OTHERS              = 2.

* 处理按钮事件
CASE sy-ucomm.
  WHEN 'Z_MY_FUNCTION'.
    " 处理按钮点击事件
ENDCASE.

如果您想要在工具栏上添加下拉菜单按钮，可以使用函数模块 'REUSE_ALV_TOOLBAR_CREATE' 创建一个下拉按钮。以下是示例代码：

* 创建下拉按钮
DATA: lt_toolbar TYPE STANDARD TABLE OF t_salv_tb_display,
      ls_toolbar TYPE t_salv_tb_display,
      lt_dropdown TYPE STANDARD TABLE OF t_salv_tb_display,
      ls_dropdown TYPE t_salv_tb_display.

ls_toolbar-function = 'Z_MY_DROPDOWN'.
ls_toolbar-icon     = 'ICON_NAME'.
ls_toolbar-quickinfo = 'BUTTON_TOOLTIP'.
APPEND ls_toolbar TO lt_toolbar.

ls_dropdown-function = 'Z_MY_FUNCTION'.
ls_dropdown-icon     = 'ICON_NAME'.
ls_dropdown-quickinfo = 'MENU_ITEM_TOOLTIP'.
APPEND ls_dropdown TO lt_dropdown.

* 将下拉按钮添加到工具栏
CALL FUNCTION 'REUSE_ALV_TOOLBAR_CREATE'
  EXPORTING
    i_style  = cl_salv_toolbar=>c_style_dropdown
  CHANGING
    ct_toolbar = lt_toolbar
    ct_dropdown = lt_dropdown.

* 显示 ALV 并添加工具栏
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  EXPORTING
    it_fieldcat         = lt_fieldcat
    i_callback_program  = gv_prog_name
    i_callback_top_of_page = 'TOP_OF_PAGE'
    i_toolbar_title     = 'TOOLBAR_TITLE'
    i_toolbar_excluding = 0
  TABLES
    t_outtab            = lt_output
  EXCEPTIONS
    program_error       = 1
    OTHERS              = 2.

* 处理下拉菜单事件
CASE sy-ucomm.
  WHEN 'Z_MY_FUNCTION'.
    " 处理下拉菜单点击事件
ENDCASE.