Informazioni utili e pratiche su SAP: Programma: Report per visualizzare un Grafico

lunedì 4 gennaio 2016

Programma: Report per visualizzare un Grafico

Visualizzare un Grafico

Questo programma consente di visualizzare un grafico tridimensionale mediante il FM GRAPH_MATRIX_3D.

Eseguendo il programma, si avrà in ouput il seguente grafico.

REPORT z_grafico.

DATA: BEGIN OF TAB OCCURS 5,
      CLASS(10) TYPE C,
      VAL1(2) TYPE I,
      VAL2(2) TYPE I,
      VAL3(2) TYPE I,
      END OF TAB.
DATA: BEGIN OF OPTTAB OCCURS 1,
        C(20),
      END OF OPTTAB.
MOVE: 'Tecnici' TO TAB-CLASS,
      12 TO TAB-VAL1, 8 TO TAB-VAL2, 15 TO TAB-VAL3.
APPEND TAB.
CLEAR TAB.
MOVE: 'Funzionali' TO TAB-CLASS,
      15 TO TAB-VAL1, 10 TO TAB-VAL2, 18 TO TAB-VAL3.
APPEND TAB.
CLEAR TAB.

MOVE: 'Sistemisti' TO TAB-CLASS,
      17 TO TAB-VAL1, 11 TO TAB-VAL2, 20 TO TAB-VAL3.
APPEND TAB.
CLEAR TAB.
OPTTAB = 'FIFRST = 3D'.     APPEND OPTTAB.      "// Grafik-Typ
OPTTAB = 'P3TYPE = TO'.     APPEND OPTTAB.      "// Objektart
OPTTAB = 'P3CTYP = RO'.     APPEND OPTTAB.      "// Farben der Objekte
OPTTAB = 'TISIZE = 2'.      APPEND OPTTAB.      "// Haupttitelgröße
OPTTAB = 'CLBACK = X'.      APPEND OPTTAB.      "// Background Color

CALL FUNCTION 'GRAPH_MATRIX_3D'
     EXPORTING
          COL1        = '2013'
          COL2        = '2014'
          COL3        = '2015'
          DIM2        = 'Informatici'
          DIM1        = 'Anni'
          TITL        = 'Lavoratori in Informatica'
     TABLES
          DATA        = TAB
          OPTS        = OPTTAB
     EXCEPTIONS
          OTHERS      = 1.
LEAVE PROGRAM.