alv tree 添加工具栏按钮

最新推荐文章于 2024-07-19 09:19:29 发布

SpanserWang

最新推荐文章于 2024-07-19 09:19:29 发布

阅读量2.4k

点赞数

分类专栏： SAP ABAP ALV SAP技术文章标签： tree 工具 function button delete object

本文链接：https://blog.csdn.net/ibeanode/article/details/5048768

版权

SAP技术同时被 2 个专栏收录

113 篇文章 1 订阅

订阅专栏

SAP ABAP ALV

21 篇文章 1 订阅

订阅专栏

在全局数据中加入：

g_toolbar TYPE REF TO cl_gui_toolbar, "alv tree 工具栏

在类定义中加入：

PUBLIC SECTION.

      METHODS on_function_selected                         "添加工具栏按钮
      FOR EVENT function_selected OF cl_gui_toolbar
      IMPORTING fcode.

在类现实中加入：

METHOD on_function_selected.
    DATA : it_selected_nodes TYPE lvc_t_nkey,
               l_selected_node TYPE lvc_nkey,
               l_rc TYPE c.
    CASE fcode.
      WHEN 'DELETE'.
        CALL METHOD g_alv_tree->get_selected_nodes     "获取用户选择数据节点
          CHANGING
            ct_selected_nodes = it_selected_nodes.
        CALL METHOD cl_gui_cfw=>flush.
        READ TABLE it_selected_nodes INTO l_selected_node INDEX 1.
        IF sy-subrc EQ 0.
          CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'
            EXPORTING
              textline1      = 'Do you really want to delete'(902)
              textline2      = 'this node and all its subnodes?'(903)
              titel          = 'Confirmation'(904)
              cancel_display = ' '
            IMPORTING
              answer         = l_rc.
          IF l_rc EQ 'J'.
            CALL METHOD g_alv_tree->delete_subtree       "删除数据节点
              EXPORTING
                i_node_key = l_selected_node.
            CALL method g_alv_tree->frontend_update.
          ENDIF.
        ENDIF.
    ENDCASE.
ENDMETHOD.

在类注册中添加：

SET HANDLER l_event_receiver->on_function_selected FOR g_toolbar.

在BUILD_TREE中添加：

PERFORM change_toolbar.

    FORM change_toolbar .
   CALL METHOD g_alv_tree->get_toolbar_object
    IMPORTING
      er_toolbar = g_toolbar.
    CHECK NOT g_toolbar IS INITIAL.
    CALL METHOD g_toolbar->add_button
      EXPORTING
      fcode     = ''
      icon      = ''
      butn_type = cntb_btype_sep.
    CALL METHOD g_toolbar->add_button
      EXPORTING
      fcode     = 'DELETE'
      icon      = '@11@'
      butn_type = cntb_btype_button
      text      = ''
      quickinfo = text-901.
    ENDFORM.                    " change_toolbar