hi,
check this sample program.copy paste in se38 and execute.
&----
*& Report ZGM_ALV_GRAPH *
*& *
&----
*& *
*& *
&----
REPORT ZGM_ALV_GRAPH .
*structure declaration for performance measurement
TYPES: BEGIN OF ty_performance,
COMPANY(15) TYPE C,
Q1 TYPE I,
Q2 TYPE I,
Q3 TYPE I,
Q4 TYPE I,
END OF TY_PERFORMANCE.
*STRUCTURE DECLARATION FOR OPTIONS TABLE
TYPES : BEGIN OF TY_OPTTABLE,
OPTIONS(30) TYPE C,
END OF TY_OPTTABLE.
*INTERNAL TABLE AND WORK AREA DECLARATIONS
DATA : IT_PERFORMANCE TYPE STANDARD TABLE OF TY_PERFORMANCE,
WA_PERFORMANCE TYPE TY_PERFORMANCE.
DATA : IT_OPTTABLE TYPE STANDARD TABLE OF TY_OPTTABLE,
WA_OPTTABLE TYPE TY_OPTTABLE.
*INITIALIZATION EVENT
INITIALIZATION.
*START OF SELECTION EVENT
START-OF-SELECTION.
*CLEARING THE WORK AREAS
CLEAR WA_PERFORMANCE.
CLEAR WA_OPTTABLE.
*APPENDING VALUES INTO THE PERFORMANCE INTERNAL TABLE
WA_PERFORMANCE-COMPANY = 'Company A'.
WA_PERFORMANCE-Q1 = 78.
WA_PERFORMANCE-Q2 = 68.
WA_PERFORMANCE-Q3 = 79.
WA_PERFORMANCE-Q4 = 80.
APPEND WA_PERFORMANCE TO IT_PERFORMANCE.
WA_PERFORMANCE-COMPANY = 'Company B'.
WA_PERFORMANCE-Q1 = 48.
WA_PERFORMANCE-Q2 = 68.
WA_PERFORMANCE-Q3 = 69.
WA_PERFORMANCE-Q4 = 70.
APPEND WA_PERFORMANCE TO IT_PERFORMANCE.
WA_PERFORMANCE-COMPANY = 'Company C'.
WA_PERFORMANCE-Q1 = 78.
WA_PERFORMANCE-Q2 = 48.
WA_PERFORMANCE-Q3 = 79.
WA_PERFORMANCE-Q4 = 85.
APPEND WA_PERFORMANCE TO IT_PERFORMANCE.
*APPENDING VALUES INTO THE OPTIONS INTERNAL TABLE
WA_OPTTABLE-OPTIONS = 'P3TYPE = TO'.
APPEND WA_OPTTABLE TO IT_OPTTABLE.
WA_OPTTABLE-OPTIONS = 'P2TYPE = VB'.
APPEND WA_OPTTABLE TO IT_OPTTABLE.
WA_OPTTABLE-OPTIONS = 'TISIZE = 1'.
APPEND WA_OPTTABLE TO IT_OPTTABLE.
*CALLING THE GRAPH FUNCTION MODULE
CALL FUNCTION 'GRAPH_MATRIX_3D'
EXPORTING
COL1 = 'Quarter 1'
COL2 = 'Quarter 2'
COL3 = 'Quarter 3'
COL4 = 'Quarter 4'
DIM1 = 'In Percentage%'
SET_FOCUS = 'X'
TITL = 'Company Performances'
TABLES
DATA = IT_PERFORMANCE
OPTS = IT_OPTTABLE
EXCEPTIONS
OTHERS = 1.
Bluesky
