SAP中ABAP 的3D图像展示

效果图:

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.