Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

Histogram in report

Former Member
0 Kudos

Hi

How to create a histogram( barchart) in a report(list dispaly)

I need the graph in the second page of the display .the graph will have to populate the first page values .

Please give some helpful details

Thanks

2 REPLIES 2

Former Member
0 Kudos

Please refer below codes to display graph , It shows the graph on seperate windows. Please write your codes accordingly.

Thank You,

Ganesh.

REPORT ZZ__GRAPH .

DATA: BEGIN OF ITAB_DATA OCCURS 0,

DATANAME(15),

QUANTITY1 TYPE I, QUANTITY2 TYPE I,

QUANTITY3 TYPE I, QUANTITY4 TYPE I,

END OF ITAB_DATA,

BEGIN OF ITAB_OPTIONS OCCURS 0,

OPTION(20),

END OF ITAB_OPTIONS.

ITAB_DATA-DATANAME = 'A'.

ITAB_DATA-QUANTITY1 = 55.

ITAB_DATA-QUANTITY2 = 62.

ITAB_DATA-QUANTITY3 = 59.

ITAB_DATA-QUANTITY4 = 50.

APPEND ITAB_DATA.

ITAB_DATA-DATANAME = 'B'.

ITAB_DATA-QUANTITY1 = 35.

ITAB_DATA-QUANTITY2 = 52.

ITAB_DATA-QUANTITY3 = 44.

ITAB_DATA-QUANTITY4 = 50.

APPEND ITAB_DATA.

ITAB_DATA-DATANAME = 'C'.

ITAB_DATA-QUANTITY1 = 18.

ITAB_DATA-QUANTITY2 = 22.

ITAB_DATA-QUANTITY3 = 19.

ITAB_DATA-QUANTITY4 = 5.

APPEND ITAB_DATA.

CALL FUNCTION 'GRAPH_MATRIX_3D'

EXPORTING

COL1 = 'Jan'

COL2 = 'Feb'

COL3 = 'Mar'

col4 = 'Apr'

TITL = 'POY Production in MT.'

TABLES

DATA = ITAB_DATA

OPTS = ITAB_OPTIONS

EXCEPTIONS

OTHERS = 1.

Former Member
0 Kudos

Create a PF-STATUS and Use the following code as per ur requirement---

DATA: BEGIN OF ITAB_DATA OCCURS 0,
DATANAME(13),
QUANTITY1 TYPE P DECIMALS 2,
QUANTITY2 TYPE P DECIMALS 2,
END OF ITAB_DATA.

 DATA: BEGIN OF ITAB_OPTIONS OCCURS 0,
OPTION(40),
END OF ITAB_OPTIONS.

SET PF-STATUS 'GRAPH'.
AT USER-COMMAND.

CASE SY-UCOMM.
WHEN 'GRAPH'.
    LOOP AT  ITAB .
       ITAB_DATA-DATANAME = ITAB-DES.
       ITAB_DATA-QUANTITY1 = ITAB-SU_AVG.
       APPEND ITAB_DATA.
      CLEAR ITAB_DATA.
      ENDLOOP.

      CONCATENATE 'TREND FOR SU -' SDATE1 'TO' SDATE2 INTO A SEPARATED BY ''.

CALL FUNCTION 'GRAPH_MATRIX_3D'
   EXPORTING
     COL1              = '%FE '
     VALT              = '%'
     MAIL_ALLOW        = 'X'
     TITL              = A
    TABLES
      DATA              = ITAB_DATA
      OPTS              = ITAB_OPTIONS
            .
ENDCASE.