I am doing a ring pie chart in which I am using a style sheet that was provided by IBI. I am doing filtering using java script in a BI Portal but even if I do filtering via auto prompt. The end result is a chart that has a RYG status and I want the colors to be consistent on the filters.

I did a sample of this using the car file and have included the below code. When I am doing filtering and select Japan and then Italy the colors match up to what is in the legend for England and France.

I'm wanting it to no matter the selections it keeps the colors intact. Has anyone had this issue before and how was it corrected?

-* File: IBFS:/Uat/WFC/Repository/Retail2/Chart2.fex Created by WebFOCUS AppStudio
-*IA_GRAPH_BEGIN
-*Do not delete or modify the comments below
*-INTERNAL_COMMENT LINE#0$PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiIHN0YW5kYWxvbmU9Im5vIj8+CjwhLS0xLjAtLT48Um9vdCB2ZXJzaW9uPSIxLjAiPgogICAgPE9iamVjdCBvYmplY3RJZD0iQ2hhcnRfMSI+CiAgICAgICAgPFByb3BlcnR5IG5hbWU9IkxpbmtlZFNvcnRzIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIi8+CiAgICA8L09iamVjdD4KICAgIDxPYmplY3Qgb2JqZWN0SWQ9IkdMT0JBTCI+CiAgICAgICAgPFByb3BlcnR5IG5hbWU9IlNhbXBsZURhdGEiIHR5cGU9ImphdmEubGFuZy5Cb29sZWFuIj5mYWxzZTwvUHJvcGVydHk+CiAgICAgICAgPFByb3BlcnR5IG5hbWU9Ikdsb2JhbFJlY29yZExpbWl0IiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj41MDA8L1Byb3BlcnR5PgogICAgICAgIDxQcm9wZXJ0eSBuYW1lPSJHbG9iYWxSdW5SZWNvcmRMaW1pdCIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+MDwvUHJvcGVydHk+CiAgICAgICAgPFByb3BlcnR5IG5hbWU9Ikdsb2JhbE9wdGltaXphdGlvbiIgdHlwZT0iamF2YS5sYW5nLkJvb2xlYW4iPnRydWU8L1Byb3BlcnR5PgogICAgICAgIDxQcm9wZXJ0eSBuYW1lPSJmaWVsZERpc3BsYXlNb2RlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5sYWJlbDwvUHJvcGVydHk+CiAgICAgICAgPFByb3BlcnR5IG5hbWU9InByZWZpeERpc3BsYXlNb2RlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIi8+CiAgICAgICAgPFByb3BlcnR5IG5hbWU9IkFjdGl2ZV9TdHlsZV9Vc2VyX3R5cGUiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPnBvd2VyPC9Qcm9wZXJ0eT4KICAgICAgICA8UHJvcGVydHkgbmFtZT0iR2xvYmFsVmFsdWVzUGFnaW5nIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj40PC9Qcm9wZXJ0eT4KICAgICAgICA8UHJvcGVydHkgbmFtZT0iRm9jZXhlY1ByZWZlcmVuY2VzIiB0eXBlPSJNYXAiPgogICAgICAgICAgICA8RW50cnkga2V5PSJhdXRvRHJpbGxTY3JpcHQiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciLz4KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheUVkaXRNb2RlSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlGb3JtYXRUYWJJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPnRydWU8L0VudHJ5PgogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5SG9tZVRhYkluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZmFsc2U8L0VudHJ5PgogICAgICAgICAgICA8RW50cnkga2V5PSJtZXRhZGF0YV92aWV3cyIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+TWV0YURhdGFUcmVlLlZJRVdfRElNUzwvRW50cnk+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlRdWlja0FjY2Vzc1Rvb2xiYXJTYXZlSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj50cnVlPC9FbnRyeT4KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheVJlc291cmNlc0ZpZWxkVGFiSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlJbnNlcnRUYWJJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheVNsaWNlcnNUYWJFZGl0SW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9InJ1bk9uU3RhcnR1cERlZmVycmVkSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlTZXJpZXNUYWJJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4KICAgICAgICAgICAgPEVudHJ5IGtleT0iaW5mb0Fzc2lzdE1vZGVBbGxvd2VkSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRlZmF1bHRfcHJldmlld19wYWdlbGltaXRfbGF5b3V0IiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj4xPC9FbnRyeT4KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGVmYXVsdF9wcmV2aWV3X3BhZ2VsaW1pdCIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+NTwvRW50cnk+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRlZmF1bHRfY29tcG9zZV9mb3JtYXQiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPlBERjwvRW50cnk+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlJbnRlcmFjdGl2ZU1vZGVJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPnRydWU8L0VudHJ5PgogICAgICAgICAgICA8RW50cnkga2V5PSJydW5PblN0YXJ0dXBJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPnRydWU8L0VudHJ5PgogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5RGF0YVRhYkluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZmFsc2U8L0VudHJ5PgogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5U2xpY2Vyc1RhYkludGVyYWN0aXZlSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj50cnVlPC9FbnRyeT4KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheUxheW91dFRhYkluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZmFsc2U8L0VudHJ5PgogICAgICAgIDwvUHJvcGVydHk+CiAgICAgICAgPFByb3BlcnR5IG5hbWU9ImNhc2NhZGVOYW1lcyIgdHlw
*-INTERNAL_COMMENT LINE#1$ZT0iTWFwIi8+CiAgICAgICAgPFByb3BlcnR5IG5hbWU9Ik1hc3Rlcl9GaWxlcyIgdHlwZT0iU2V0Ij4KICAgICAgICAgICAgPEVudHJ5IHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmNhcjwvRW50cnk+CiAgICAgICAgPC9Qcm9wZXJ0eT4KICAgICAgICA8UHJvcGVydHkgbmFtZT0ibWV0YWRhdGFWaWV3QXMiIHR5cGU9Ik1hcCI+CiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImNhciIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+TWV0YURhdGFUcmVlLlZJRVdfRElNUzwvRW50cnk+CiAgICAgICAgPC9Qcm9wZXJ0eT4KICAgICAgICA8UHJvcGVydHkgbmFtZT0iZW5hYmxlUHJldmlldyIgdHlwZT0iamF2YS5sYW5nLkJvb2xlYW4iPnRydWU8L1Byb3BlcnR5PgogICAgPC9PYmplY3Q+CjwvUm9vdD4K
-*Do not delete or modify the comments above
ENGINE INT CACHE SET ON
-DEFAULTH &WF_STYLE_UNITS='PIXELS';
-DEFAULTH &WF_STYLE_HEIGHT='405.0';
-DEFAULTH &WF_STYLE_WIDTH='770.0';
-DEFAULTH &WF_TITLE='WebFOCUS Report';
GRAPH FILE car
-* Created by Info Assist for Graph
SUM CNT.CAR.COMP.CAR
BY CAR.ORIGIN.COUNTRY
WHERE CAR.ORIGIN.COUNTRY EQ &COUNTRY.(OR(FIND CAR.ORIGIN.COUNTRY IN CAR |FORMAT=A10)).COUNTRY:.;
ON GRAPH PCHOLD FORMAT JSCHART
ON GRAPH SET VZERO OFF
ON GRAPH SET HTMLENCODE ON
ON GRAPH SET GRAPHDEFAULT OFF
ON GRAPH SET UNITS &WF_STYLE_UNITS
ON GRAPH SET HAXIS &WF_STYLE_WIDTH
ON GRAPH SET VAXIS &WF_STYLE_HEIGHT
ON GRAPH SET GRMERGE ADVANCED
ON GRAPH SET GRMULTIGRAPH 0
ON GRAPH SET GRLEGEND 1
ON GRAPH SET GRXAXIS 0
ON GRAPH SET LOOKGRAPH PIERING
ON GRAPH SET AUTOFIT ON
ON GRAPH SET STYLE *
*GRAPH_SCRIPT
setPieDepth(0);
setPieTilt(0);
setDepthRadius(0);
setCurveFitEquationDisplay(false);
setPlace(true);
setPieFeelerTextDisplay(1);
*END
INCLUDE=IBFS:/WFC/Repository/STAR/styles/Warm.sty,$
TYPE=REPORT, TITLETEXT=&WF_TITLE.QUOTEDSTRING, $
*GRAPH_SCRIPT
setReportParsingErrors(false);
setSelectionEnableMove(false);
*END
ENDSTYLE
END
-RUN

This message has been edited. Last edited by: wlwright1,

Please post your code.

Looks like it's something regarding the style sheet which we can't see....


Or if you're trying to always have the same slice's color, add the following. But you will need to add as many getSeries(x) as you may have slice (to have it dynamic, you'll need to create some code):

setFillColor(getSeries(0),new Color(158,144,188));
setFillColor(getSeries(1),new Color(255,243,172));
setFillColor(getSeries(2),new Color(106,189,187));
setFillColor(getSeries(3),new Color(240,159,97));
setFillColor(getSeries(4),new Color(195,218,125));

This message has been edited. Last edited by: MartinY,

Where is that include for the style sheet being generated?

do you want me to include the part of the sty sheet for the graph?

I am slightly confused on what is actually wanting to be achieved. I believe wlwright1 is looking to color a slice based on the country, no matter which combination of countries are select. For example, England always appears blue, and no other country appears blue. Won't this:

quote:

 setFillColor(getSeries(0),new Color(158,144,188));
setFillColor(getSeries(1),new Color(255,243,172));
setFillColor(getSeries(2),new Color(106,189,187));
setFillColor(getSeries(3),new Color(240,159,97));
setFillColor(getSeries(4),new Color(195,218,125)); 

produce the same thing as any generic style sheet?

Yes, please include the style sheet in the discussion.

Do we answered your question already ?

Is that what you're looking for : have the slice's color always the same ?

Or always have the same slice's color for the for the country ? Example : Italy in blue, France in yellow, England in red, ...

You should try to reproduce your request using the CAR file, it will give us an example.

Maybe your style sheet is not the issue, but depending of what is your request and what is in the style sheet, it may be related to your issue.

Chad,

To have the country always displayed with the same slice's color, you need to know which slice will be assigned to that country or assign a slice to a country yourself. Then you can assign a default color to that slice which remain the same all the time.

To perform this, some code as to be entered and I'm pretty sure that a style sheet will not be able. It has to be dynamic.

Yes it is. Here is the setFillColor's for the different series.

*GRAPH_SCRIPT
setFillColor(getSeries(0),new Color(#526F35));
setFillColor(getSeries(1),new Color(#e1542b));
setFillColor(getSeries(2),new Color(#fee08b));
setFillColor(getSeries(3),new Color(#b2df8a));
setFillColor(getSeries(4),new Color(#1f78b4));
setFillColor(getSeries(5),new Color(#ffb061));

My thoughts are that whatever the number of items they fit into the series order. So if I select Italy and England it would be Series 0 and Series 1.

The only thing I think of is to do a define and then do conditional formatting and specify the colors. Exclude the stylesheet altogether?

Would that work?

quote:

*GRAPH_SCRIPT
setFillColor(getSeries(0),new Color(#526F35));
setFillColor(getSeries(1),new Color(#e1542b));
setFillColor(getSeries(2),new Color(#fee08b));
setFillColor(getSeries(3),new Color(#b2df8a));
setFillColor(getSeries(4),new Color(#1f78b4));
setFillColor(getSeries(5),new Color(#ffb061));
My thoughts are that whatever the number of items they fit into the series order. So if I select Italy and England it would be Series 0 and Series 1.

And what if I chose France and Japan, display with series 0 and 1 or with another series ?

And if I chose England, France, Italy and Japan, should they be displayed with :
England series (0), France Series(1), Italy series(2), Japan series(3) ? Which will be the case actually or should always be Italy series(0), England series(1) ?

I am still confused, what are you trying to do? Answer this question from Martin.

quote:

Is that what you're looking for : have the slice's color always the same ?

Or always have the same slice's color for the for the country ? Example : Italy in blue, France in yellow, England in red, ...

Yes I'm looking to to someone selects England then it be blue, France - red and so on. So no matter the selections the color is consistant.

This may do the trick, but you may have to play around a little:

-*-SET &CNTRY = 'FRANCE';
-*-SET &CNTRY = 'ITALY';
-SET &CNTRY = FOC_NONE;

TABLE FILE CAR
PRINT COMPUTE ROWID    /P2   = ROWID + 1; NOPRINT
      COMPUTE SERIES   /P2   = ROWID - 1; NOPRINT
      COMPUTE COLOR    /A11V = DECODE COUNTRY ('FRANCE' '255,0,0' 'ENGLAND' '0,255,0' 'ITALY' '0,0,255' 'JAPAN' '100,100,100' ELSE '200,200,200'); NOPRINT
      COMPUTE SETCOLOR /A51V = 'setFillColor(getSeries(' || EDIT(SERIES) || '),new Color(' || COLOR || '));';
BY COUNTRY NOPRINT
BY ROWID
WHERE COUNTRY EQ '&CNTRY';
ON TABLE HOLD AS SETCOL FORMAT BINARY
END
-RUN

-SET &NBROWS  = &LINES;

-* LOOP TO INITIALIZE COLORSET
-REPEAT CSET FOR &Y FROM 1 TO 5 STEP 1
-SET &COLSET.&Y = '';
-CSET
-* LOOP TO SET COLSET TO PROPER VALUE
-SET &Y     = 0;
-NEXTSET
-SET &Y = &Y + 1;
-READFILE SETCOL
-RUN
-SET &COLSET.&Y = &SETCOLOR;
-IF &Y LT &NBROWS THEN GOTO NEXTSET;

-* -------------------------------------------------
-* CREATE BAR GRAPH
-* -------------------------------------------------
GRAPH FILE CAR
SUM RETAIL_COST      AS ''
BY  COUNTRY
WHERE COUNTRY EQ '&CNTRY';
ON GRAPH PCHOLD FORMAT PNG
ON GRAPH SET HTMLENCODE ON
ON GRAPH SET GRAPHDEFAULT OFF
ON GRAPH SET VZERO OFF
ON GRAPH SET HAXIS 770
ON GRAPH SET VAXIS 405
ON GRAPH SET UNITS PIXELS
ON GRAPH SET LOOKGRAPH PIESINGL
ON GRAPH SET GRMERGE ADVANCED
ON GRAPH SET GRMULTIGRAPH 0
ON GRAPH SET GRLEGEND 1
ON GRAPH SET GRXAXIS 0
ON GRAPH SET GRAPHSTYLE *
setTemplateFile("/images/tdg/template/IBISouthWestern.txt");
setReportParsingErrors(false);
setSelectionEnableMove(false);
setTransparentBorderColor(getChartBackground(),true);
setTransparentBorderColor(getSeries(0),true);
setTransparentBorderColor(getSeries(1),true);
setTransparentBorderColor(getSeries(2),true);
setTransparentBorderColor(getSeries(3),true);
setTransparentBorderColor(getSeries(4),true);
setTransparentBorderColor(getSeries(5),true);
setPlace(true);
&COLSET1.EVAL
&COLSET2.EVAL
&COLSET3.EVAL
&COLSET4.EVAL
&COLSET5.EVAL
ENDSTYLE
END

You can use conditional styling in a graph just like you would I'm a report.

Not sure I'm on the same page as you but here is some code that I include to make sure colors match throughout the entire dashboard or PPT deck.

DEFMACRO=COND0001,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_1',$
DEFMACRO=COND0002,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_2',$
DEFMACRO=COND0003,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_3',$
DEFMACRO=COND0004,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_4',$
DEFMACRO=COND0005,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_5',$
DEFMACRO=COND0006,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_6',$
DEFMACRO=COND0007,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_7',$
DEFMACRO=COND0008,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_8',$
DEFMACRO=COND0009,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_9',$
DEFMACRO=COND0010,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_10',$
DEFMACRO=COND0011,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_11',$
DEFMACRO=COND0012,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_12',$
DEFMACRO=COND0013,COLUMN=&WHAT_COL,MACTYPE=RULE,WHEN=NEWMAN EQ '&COLOR_13',$
TYPE=DATA,COLOR=RGB(194 11 11),MACRO=COND0001,$
TYPE=DATA,COLOR=RGB(158 188 94),MACRO=COND0002,$
TYPE=DATA,COLOR=RGB(130 103 162),MACRO=COND0003,$
TYPE=DATA,COLOR=RGB(251 192 8),MACRO=COND0004,$
TYPE=DATA,COLOR=RGB(148 140 88),MACRO=COND0005,$
TYPE=DATA,COLOR=RGB(228 184 184),MACRO=COND0006,$
TYPE=DATA,COLOR=RGB(243 150 74),MACRO=COND0007,$
TYPE=DATA,COLOR=RGB(78 172 195),MACRO=COND0008,$
TYPE=DATA,COLOR=RGB(166 166 166),MACRO=COND0009,$
TYPE=DATA,COLOR=RGB(0 0 0),MACRO=COND0010,$
TYPE=DATA,COLOR=RGB(117 113 113),MACRO=COND0011,$
TYPE=DATA,COLOR=RGB(50 50 50),MACRO=COND0012,$
TYPE=DATA,COLOR=RGB(100 100 100),MACRO=COND0013,$

J.L., as far as I know this will work in a report for the data's color, not for slice's color in a graph which have a different syntax.

I ended up using the Traffic Lights on the Sum field. I was able to select multiple different items and it did stick with the colors. The legend didn't show the correct colors but I think that has to setting the conditions vs the colors via stylesheet or at the series level.

Martin, that's the code I use to make sure the information on a pie chart matches the colors on an hbar chart.