Community
Application Development and Automation 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
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

Problem with 2D & 2D BAR Graphics

Former Member

‎2006 Mar 01 1:34 PM

0 Likes
359

Hi,

THere is Restirction while using the FM

'GRAPH_MATRIX_3D'

'GRAPH_MATRIX_2D'

We cannot have more than 6 Columns

Is there any way to get the multiple columns ,may be

20s-30 Columns or so.

Reply

Dnyanehs

2 REPLIES 2
Read only

Former Member

‎2006 Mar 01 5:23 PM

0 Likes
336

Hi,

I think you can clone the FM and try for adding more columns. As such FM doesn't support more than 6 cols.

Rajeev

Read only

Former Member

‎2008 Nov 24 11:53 AM

0 Likes
336

Hi, Please try ,

It will help out you.

&----

*& Report ZGRV_GRAPH

*&

&----

*&

*&

&----

REPORT ZGRV_GRAPH_TEST.

*structure declaration for performance measurement

TYPES: BEGIN OF TY_PERFORMANCE,

COMPANY(30) TYPE C,

Q1 TYPE I,

Q2 TYPE I,

*Q3 TYPE I,

*Q4 TYPE I,

*Q5 TYPE I,

*Q6 TYPE I,

TPQN TYPE I,

TUQN TYPE I,

TQN3 TYPE I,

TQN4 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 ,

WA_PERFORMANCE1 TYPE TY_PERFORMANCE .

TYPES: BEGIN OF ITAB ,

COMPANY(30) TYPE C,

TPLAN TYPE I,

TUNPLAN TYPE I,

END OF ITAB.

DATA: ITAB TYPE STANDARD TABLE OF ITAB,

WA_ITAB TYPE ITAB.

DATA: IT_OPTTABLE TYPE STANDARD TABLE OF TY_OPTTABLE,

WA_OPTTABLE TYPE TY_OPTTABLE.

INITIALIZATION.

SELECTION-SCREEN: BEGIN OF BLOCK BLK1 WITH FRAME TITLE TEXT-001 .

PARAMETERS: R1 RADIOBUTTON GROUP MODE.

PARAMETERS: R2 RADIOBUTTON GROUP MODE.

SELECTION-SCREEN: END OF BLOCK BLK1.

START-OF-SELECTION.

IF R1 EQ 'X'.

PERFORM DATA.

PERFORM QUANTITY.

ELSEIF R2 EQ 'X'.

PERFORM DATA.

PERFORM TOTAL_QUANTITY.

ENDIF.

&----

*& Form DATA

&----

  • text

----

FORM DATA.

WA_PERFORMANCE-COMPANY = 'Material1'.

WA_PERFORMANCE-Q1 = 350.

WA_PERFORMANCE-Q2 = 250.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material2'.

WA_PERFORMANCE-Q1 = 400.

WA_PERFORMANCE-Q2 = 300.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material3'.

WA_PERFORMANCE-Q1 = 450.

WA_PERFORMANCE-Q2 = 250.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material4'.

WA_PERFORMANCE-Q1 = 250.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material5'.

WA_PERFORMANCE-Q1 = 300.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material6'.

WA_PERFORMANCE-Q1 = 450.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material7'.

WA_PERFORMANCE-Q1 = 300.

WA_PERFORMANCE-Q2 = 250.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material8'.

WA_PERFORMANCE-Q1 = 400.

WA_PERFORMANCE-Q2 = 150.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material9'.

WA_PERFORMANCE-Q1 = 250.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material10'.

WA_PERFORMANCE-Q1 = 350.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material11'.

WA_PERFORMANCE-Q1 = 150.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material12'.

WA_PERFORMANCE-Q1 = 300.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material13'.

WA_PERFORMANCE-Q1 = 400.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material14'.

WA_PERFORMANCE-Q1 = 350.

WA_PERFORMANCE-Q2 = 250.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material15'.

WA_PERFORMANCE-Q1 = 400.

WA_PERFORMANCE-Q2 = 300.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material16'.

WA_PERFORMANCE-Q1 = 450.

WA_PERFORMANCE-Q2 = 250.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material17'.

WA_PERFORMANCE-Q1 = 250.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material18'.

WA_PERFORMANCE-Q1 = 300.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material19'.

WA_PERFORMANCE-Q1 = 450.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material20'.

WA_PERFORMANCE-Q1 = 300.

WA_PERFORMANCE-Q2 = 250.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material21'.

WA_PERFORMANCE-Q1 = 400.

WA_PERFORMANCE-Q2 = 150.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material22'.

WA_PERFORMANCE-Q1 = 250.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material23'.

WA_PERFORMANCE-Q1 = 350.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material24'.

WA_PERFORMANCE-Q1 = 150.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material25'.

WA_PERFORMANCE-Q1 = 300.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material26'.

WA_PERFORMANCE-Q1 = 400.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material27'.

WA_PERFORMANCE-Q1 = 350.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material28'.

WA_PERFORMANCE-Q1 = 150.

WA_PERFORMANCE-Q2 = 100.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material29'.

WA_PERFORMANCE-Q1 = 300.

WA_PERFORMANCE-Q2 = 200.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

WA_PERFORMANCE-COMPANY = 'Material30'.

WA_PERFORMANCE-Q1 = 400.

WA_PERFORMANCE-Q2 = 400.

APPEND WA_PERFORMANCE TO IT_PERFORMANCE.

LOOP AT IT_PERFORMANCE INTO WA_PERFORMANCE.

WA_ITAB-COMPANY = 'Total Quantity '.

WA_ITAB-TPLAN = WA_ITAB-TPLAN + WA_PERFORMANCE-Q1.

wa_ITAB-TUNPLAN = Wa_ITAB-TUNPLAN + WA_PERFORMANCE-Q2.

ENDLOOP.

APPEND WA_ITAB TO ITAB.

WA_OPTTABLE-OPTIONS = 'P2TYPE = PI'.

APPEND WA_OPTTABLE TO IT_OPTTABLE.

WA_OPTTABLE-OPTIONS = 'FIFRST = GP'.

APPEND WA_OPTTABLE TO IT_OPTTABLE.

WA_OPTTABLE-OPTIONS = 'FISTK2 = N'.

APPEND WA_OPTTABLE TO IT_OPTTABLE.

    • WA_OPTTABLE-OPTIONS = 'FISTK3 = N'.

    • APPEND WA_OPTTABLE TO IT_OPTTABLE.

WA_OPTTABLE-OPTIONS = 'CLPALT = E'.

APPEND WA_OPTTABLE TO IT_OPTTABLE.

WA_OPTTABLE-OPTIONS = 'TISIZE = 50'.

APPEND WA_OPTTABLE TO IT_OPTTABLE.

ENDFORM. "DATA

&----

*& Form QUANTITY

&----

  • text

----

FORM QUANTITY.

*calling the graph function module

CALL FUNCTION 'GRAPH_MATRIX_3D'

EXPORTING

COL1 = 'Unplanned Quantity'

COL2 = 'Planned Quantity'

WINSZX = '50'

WINSZY = '50'

*dim1 = 'In Percentage%'

SET_FOCUS = 'X'

*notify = 'X'

TITL = 'Planned & Unplanned Material Description'

TABLES

DATA = IT_PERFORMANCE

OPTS = IT_OPTTABLE

EXCEPTIONS

OTHERS = 1.

ENDFORM. "QUANTITY

&----

*& Form TOTAL_QUANTITY

&----

  • text

----

FORM TOTAL_QUANTITY.

*calling the graph function module

CALL FUNCTION 'GRAPH_MATRIX_3D'

EXPORTING

COL1 = 'Unplanned Quantity'

COL2 = 'Planned Quantity'

WINSZX = '50'

WINSZY = '50'

*dim1 = 'In Percentage%'

SET_FOCUS = 'X'

*notify = 'X'

TITL = 'Planned & Unplanned Material Description'

TABLES

DATA = ITAB

OPTS = IT_OPTTABLE

EXCEPTIONS

OTHERS = 1.

*endif.

ENDFORM. "TOTAL_QUANTITY

Regards

Gaurav Kumar