ABAP报表开发HANA平台大数据展示工具SALV学习之五

sALV工具栏操作有两个方法TOOLBAR&STANDARD_FUNCTIONS，其中STANDARD_FUNCTIONS功能比较简单，就是实现工具栏按钮的开启和隐藏，但是TOOLBAR方法可以新增按钮、添加按钮下拉等功能。

1、工具栏的显示隐藏

1. CLASS lcl_handle DEFINITION.
   
2.   PUBLIC SECTION.
   
3.     METHODS handle FOR EVENT function_selected OF if_salv_gui_toolbar_ida
   
4.       IMPORTING ev_fcode.
   
5. ENDCLASS.
   
6. 
   
7. CLASS lcl_handle IMPLEMENTATION.
   
8.   METHOD handle.
   
9.     CASE ev_fcode.
   
10.       WHEN 'DELE'.
    
11.         MESSAGE 'This is delete button' TYPE 'I'.
    
12.     ENDCASE.
    
13.   ENDMETHOD.
    
14. ENDCLASS.
    
15. 
    
16. TABLES: vbak.
    
17. 
    
18. SELECT-OPTIONS: s_vbeln FOR vbak-vbeln.
    
19. 
    
20. START-OF-SELECTION.
    
21. **********************************************************************
    
22. *ALV data
    
23. **********************************************************************
    
24.   TRY.
    
25.       CALL METHOD cl_salv_gui_table_ida=>create
    
26.         EXPORTING
    
27.           iv_table_name        = 'VBAK'
    
28.         RECEIVING
    
29.           ro_alv_gui_table_ida = DATA(lr_alv).
    
30.     CATCH cx_salv_db_connection.
    
31.     CATCH cx_salv_db_table_not_supported.
    
32.     CATCH cx_salv_ida_contract_violation.
    
33.   ENDTRY.
    
34. 
    
35. **********************************************************************
    
36. *alv select option
    
37. **********************************************************************
    
38.   DATA:lt_ranges TYPE if_salv_service_types=>yt_named_ranges.
    
39.   DATA:ls_ranges TYPE if_salv_service_types=>ys_named_range.
    
40.   DATA: lr_range TYPE REF TO cl_salv_range_tab_collector.
    
41. 
    
42.   CREATE OBJECT lr_range.
    
43.   lr_range->add_ranges_for_name(
    
44.     EXPORTING
    
45.       iv_name   = 'VBELN'
    
46.       it_ranges = s_vbeln[]
    
47.   ).
    
48. 
    
49.   lr_range->get_collected_ranges(
    
50.     IMPORTING
    
51.       et_named_ranges = lt_ranges[]
    
52.   ).
    
53. 
    
54.   ls_ranges-name = 'WAERK'.
    
55.   ls_ranges-sign = 'I'.
    
56.   ls_ranges-option = 'EQ'.
    
57.   ls_ranges-low = 'USD'.
    
58.   APPEND ls_ranges TO lt_ranges.
    
59. 
    
60.   TRY.
    
61.       lr_alv->set_select_options(
    
62.     EXPORTING
    
63.       it_ranges    = lt_ranges[]
    
64.   ).
    
65.     CATCH cx_salv_ida_associate_invalid.
    
66.     CATCH cx_salv_db_connection.
    
67.     CATCH cx_salv_ida_condition_invalid.
    
68.     CATCH cx_salv_ida_unknown_name.
    
69.   ENDTRY.
    
70. 
    
71. **********************************************************************
    
72. *alv select option
    
73. **********************************************************************
    
74.   DATA(lr_option) = lr_alv->display_options( ).
    
75.   lr_option->set_title( iv_title = 'VBAK information alv with ida' ).
    
76.   lr_option->enable_alternating_row_pattern( ).
    
77. 
    
78. **********************************************************************
    
79. *Toolbar
    
80. **********************************************************************
    
81. *  lr_alv->toolbar( )->hide_all_standard_functions(  ).    "隐藏工具栏所有按钮
    
82.   DATA:lr_handle TYPE REF TO lcl_handle.
    
83. 
    
84.   TRY.
    
85.       lr_alv->toolbar( )->add_button(
    
86.     EXPORTING
    
87.       iv_fcode                     = 'DELE'
    
88.       iv_icon                      = '@11@' "ICON_DELETE
    
89. *    iv_is_disabled               =
    
90.       iv_text                      = 'Delete button'
    
91.       iv_quickinfo                 = 'Delete'
    
92. *    iv_is_checked                =
    
93. *    iv_before_standard_functions = abap_false
    
94.   ).
    
95.     CATCH cx_salv_ida_gui_fcode_reserved.
    
96.   ENDTRY.
    
97. 
    
98.   CREATE OBJECT lr_handle.
    
99.   SET HANDLER lr_handle->handle FOR ALL INSTANCES.
    
100. 
     
101. **********************************************************************
     
102. *standard functions
     
103. **********************************************************************
     
104.   DATA(lr_func) = lr_alv->standard_functions( ).
     
105. *lr_func->SET_EXPORT_ACTIVE( iv_active = abap_false ).       "Deactivate/activate function 'Export'
     
106.   lr_func->set_print_active( iv_active = abap_false ).       "Deactivate/activate function 'Print'
     
107. *lr_func->set_filter_active( iv_active = abap_false ).       "Deactivate/activate function 'Set Filter'
     
108. *lr_func->set_sort_active( iv_active = abap_false ).         "Deactivate/activate function 'Sort'
     
109. *lr_func->set_detail_active( iv_active = abap_false ).       "Deactivate/activate function 'Display Detail'
     
110. *lr_func->set_aggregation_active( iv_active = abap_false ).  "Deactivate/activate all aggregation functions
     
111. *lr_func->set_text_search_active( iv_active = abap_false ).  "Enable/Disable function 'TextSearch'
     
112. 
     
113. **********************************************************************
     
114. *alv rows
     
115. **********************************************************************
     
116.   TRY.
     
117.       lr_alv->set_maximum_number_of_rows(
     
118.         EXPORTING
     
119.           iv_number_of_rows = 20
     
120.       ).
     
121.     CATCH cx_salv_param_out_of_bounds.
     
122.   ENDTRY.
     
123. **********************************************************************
     
124. *alv dispaly
     
125. **********************************************************************
     
126.   TRY.
     
127.       lr_alv->fullscreen( )->display( ).
     
128.     CATCH cx_salv_ida_contract_violation.
     
129.   ENDTRY.

复制代码

2、测试效果

STANDARD_FUNCTIONS 隐藏指定按钮

TOOLBAR隐藏所有按钮

添加删除按钮