SAP中ABAP 的3D图像展示
效果图:
代码:
*&---------------------------------------------------------------------*
*& Report Z0905
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT z0905.
DATA: BEGIN OF itab_data OCCURS 0,
dataname(15),
quantity1 TYPE i,
quantity2 TYPE i,
quantity3 TYPE i,
END OF itab_data,
BEGIN OF itab_options OCCURS 0,
option(20),
END OF itab_options.
itab_data-dataname = '第一种'.
itab_data-quantity1 = 20.
itab_data-quantity2 = 30.
itab_data-quantity3 = 50.
APPEND itab_data.
itab_data-dataname = '第二种'.
itab_data-quantity1 = 25.
itab_data-quantity2 = 62.
itab_data-quantity3 = 14.
APPEND itab_data.
itab_data-dataname = '第三种'.
itab_data-quantity1 = 18.
itab_data-quantity2 = 22.
itab_data-quantity3 = 88.
APPEND itab_data.
CALL FUNCTION 'GRAPH_MATRIX_3D'
EXPORTING
col1 = '第一栏'
col2 = '第二栏'
col3 = '第三栏'
titl = '3D图形'
TABLES
data = itab_data
opts = itab_options
EXCEPTIONS
OTHERS = 1.