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

1、分类汇总/平均值/最大值/最小值&标题

1. TABLES: vbak.
   
2. 
   
3. SELECT-OPTIONS: s_vbeln FOR vbak-vbeln.
   
4. 
   
5. **********************************************************************
   
6. *ALV data
   
7. **********************************************************************
   
8. TRY.
   
9.     CALL METHOD cl_salv_gui_table_ida=>create
   
10.       EXPORTING
    
11.         iv_table_name        = 'VBAK'
    
12.       RECEIVING
    
13.         ro_alv_gui_table_ida = DATA(lr_alv).
    
14.   CATCH cx_salv_db_connection.
    
15.   CATCH cx_salv_db_table_not_supported.
    
16.   CATCH cx_salv_ida_contract_violation.
    
17. ENDTRY.
    
18. 
    
19. **********************************************************************
    
20. *alv select option
    
21. **********************************************************************
    
22. DATA:lt_ranges TYPE if_salv_service_types=>yt_named_ranges.
    
23. DATA:ls_ranges TYPE if_salv_service_types=>ys_named_range.
    
24. DATA: lr_range TYPE REF TO cl_salv_range_tab_collector.
    
25. 
    
26. CREATE OBJECT lr_range.
    
27. lr_range->add_ranges_for_name(
    
28.   EXPORTING
    
29.     iv_name   = 'VBELN'
    
30.     it_ranges = s_vbeln[]
    
31. ).
    
32. 
    
33. lr_range->get_collected_ranges(
    
34.   IMPORTING
    
35.     et_named_ranges = lt_ranges[]
    
36. ).
    
37. 
    
38. ls_ranges-name = 'WAERK'.
    
39. ls_ranges-sign = 'I'.
    
40. ls_ranges-option = 'EQ'.
    
41. ls_ranges-low = 'USD'.
    
42. APPEND ls_ranges TO lt_ranges.
    
43. 
    
44. TRY.
    
45.     lr_alv->set_select_options(
    
46.   EXPORTING
    
47.     it_ranges    = lt_ranges[]
    
48. ).
    
49.   CATCH cx_salv_ida_associate_invalid.
    
50.   CATCH cx_salv_db_connection.
    
51.   CATCH cx_salv_ida_condition_invalid.
    
52.   CATCH cx_salv_ida_unknown_name.
    
53. ENDTRY.
    
54. 
    
55. **********************************************************************
    
56. *alv select option
    
57. **********************************************************************
    
58. DATA(lr_option) = lr_alv->display_options( ).
    
59. lr_option->set_title( iv_title = 'VBAK information alv with ida' ).
    
60. lr_option->enable_alternating_row_pattern( ).
    
61. 
    
62. **********************************************************************
    
63. *alv select option
    
64. **********************************************************************
    
65. DATA: lt_sort TYPE if_salv_gui_types_ida=>yt_sort_rule.
    
66. DATA: ls_sort TYPE if_salv_gui_types_ida=>ys_sort_rule.
    
67. DATA: lt_aggregations TYPE if_salv_gui_types_ida=>yt_aggregation_rule.
    
68. DATA: ls_aggregations TYPE if_salv_gui_types_ida=>ys_aggregation_rule.
    
69. 
    
70. CLEAR: ls_sort.
    
71. ls_sort-field_name = 'ERNAM'.
    
72. ls_sort-descending = ''.
    
73. ls_sort-is_grouped = 'X'.   "按照字段ERNAM分类
    
74. APPEND ls_sort TO lt_sort.
    
75. 
    
76. CLEAR: ls_aggregations.
    
77. ls_aggregations-field_name = 'NETWR'.
    
78. ls_aggregations-function   = 'SUM'. "SUM,AVG,MIN,MAX，按照分类聚合字段NETWR数值
    
79. APPEND ls_aggregations TO lt_aggregations.
    
80. 
    
81. DATA(lr_layout) = lr_alv->default_layout( ).
    
82. TRY.
    
83.     lr_layout->set_sort_order( it_sort_order = lt_sort ).
    
84.   CATCH cx_salv_ida_unknown_name.
    
85.   CATCH cx_salv_ida_duplicate_name.
    
86. ENDTRY.
    
87. 
    
88. TRY.
    
89.     lr_layout->set_aggregations( it_aggregations = lt_aggregations ).
    
90.   CATCH cx_salv_key_figure_definition INTO DATA(LV_TEXT).
    
91.   CATCH cx_salv_ida_unknown_name.
    
92.   CATCH cx_salv_ida_contract_violation.
    
93. ENDTRY.
    
94. **********************************************************************
    
95. *alv rows
    
96. **********************************************************************
    
97. TRY.
    
98.     lr_alv->set_maximum_number_of_rows(
    
99.       EXPORTING
    
100.         iv_number_of_rows = 20
     
101.     ).
     
102.   CATCH cx_salv_param_out_of_bounds.
     
103. ENDTRY.
     
104. **********************************************************************
     
105. *alv dispaly
     
106. **********************************************************************
     
107. TRY.
     
108.     lr_alv->fullscreen( )->display( ).
     
109.   CATCH cx_salv_ida_contract_violation.
     
110. ENDTRY.

复制代码

2、运行结果