Focal Point
[Solved] Line Break in Bar Graph

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/2737064586

February 06, 2017, 03:58 PM
MeM
[Solved] Line Break in Bar Graph
Hi,

I have the following code for the bar graph and trying to get the line break between Japan and England. Does anybody have any idea, how this can be done?

DEFINE FILE CAR
SORT /I1 = DECODE COUNTRY ('JAPAN' 1 'ENGLAND' 2 ELSE 3);
MEAS_LAT /P10C = IF BODYTYPE EQ 'SEDAN' THEN RETAIL_COST ELSE 0;
MEAS_OUT /P10C = IF BODYTYPE NE 'SEDAN' THEN RETAIL_COST ELSE 0;
END

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
SUM MEAS_LAT AS 'LATEST'
MEAS_OUT AS 'OUTDATED'
BY SORT NOPRINT
BY COUNTRY AS ''

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 0
ON GRAPH SET GRXAXIS 2
ON GRAPH SET LOOKGRAPH VBAR
ON GRAPH SET AUTOFIT ON
ON GRAPH SET STYLE *
*GRAPH_SCRIPT
setPieDepth(0);
setPieTilt(0);
setDepthRadius(0);
setCurveFitEquationDisplay(false);
setPlace(true);
*END
INCLUDE=IBFS:/FILE/IBI_HTML_DIR/javaassist/intl/EN/ENIADefault_combine.sty,$
TYPE=REPORT, TITLETEXT=&WF_TITLE.QUOTEDSTRING, $
*GRAPH_SCRIPT
setReportParsingErrors(false);
setSelectionEnableMove(false);
setDisplay(getDataText(0), true);
setDataTextDisplay(true);
*END
ENDSTYLE
END
-RUN



Thank you in advance,
MM

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


WebFOCUS 8.2.02
Windows, All Outputs
February 08, 2017, 09:39 AM
MeM
Hi,

I got the solution by myself. Here is the code:

DEFINE FILE CAR
SORT /I1 = DECODE COUNTRY ('JAPAN' 1 'ENGLAND' 2 ELSE 3);
MEAS_LAT /P10C = IF BODYTYPE EQ 'SEDAN' THEN RETAIL_COST ELSE 0;
MEAS_OUT /P10C = IF BODYTYPE NE 'SEDAN' THEN RETAIL_COST ELSE 0;
END

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
SUM MEAS_LAT AS 'LATEST'
MEAS_OUT AS 'OUTDATED'
BY SORT NOPRINT
BY COUNTRY AS ''

ON GRAPH PCHOLD FORMAT PNG
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 0
ON GRAPH SET GRXAXIS 2
ON GRAPH SET LOOKGRAPH VBAR
ON GRAPH SET AUTOFIT ON
ON GRAPH SET STYLE *


*GRAPH_SCRIPT
setPieDepth(0);
setPieTilt(0);
setDepthRadius(0);
setCurveFitEquationDisplay(false);
setPlace(true);

setReportParsingErrors(false);
setSelectionEnableMove(false);

setDisplay(getO1AltFmtFrame(),true);
setAltFmtFrameSeparator(getY1AltFmtFrame(0),1.0);
setDisplay(getO1AltFmtFrame(1),true);
setAltFmtFrameNumColors(getO1AltFmtFrame(),2);
setFillColor(getO1AltFmtFrame(1),new Color(180,100,100,0));
setFillColor(getO1AltFmtFrame(0),new Color(255,255,255,0));


setTransparentBorderColor(getSeries(1), true);
setTransparentBorderColor(getChartBackground(),true);
setY1MajorGridStyle(0);
setY2MajorGridStyle(0);

setLineStyleLegendMarkers(3);
setNullLegendMarkerShapesAsSquares(false);
setFrameAutoShade(true);
setColorMode(1);
setUseDefaultBubbleMarker(false);
setReportParsingErrors(false);
setSelectionEnableMove(false);
setFillColor(getSeries(0),new Color(2,26,50));
setFillColor(getSeries(1),new Color(248,151,29));
setLegendPosition(1);
setTextString(getTitle(),"$4K - $8K Summary");
setDisplay(getTitle(),true);
setFontName(getLegendText(),"ARIAL");
setFontSizeAbsolute(getLegendText(),true);
setAutofit(getLegendText(),false);
setFontSizeInPoints(getLegendText(),10);
setPlaceResize(getLegendText(),0);
setFontStyle(getLegendText(),2);
setDisplay(getDataText(0),true);
setDataTextPosition(0);
setCustomDataText(getDataText(0),true);
setTextFormatPreset(getDataText(0),0);
setDisplay(getDataText(1),true);
setCustomDataText(getDataText(1),true);
setTextFormatPreset(getDataText(1),0);
setDisplay(getO1Title(),false);
setDisplay(getY1Title(),false);
setFontName(getO1Label(),"ARIAL");
setFontSizeAbsolute(getO1Label(),true);
setFontSizeInPoints(getO1Label(),10);
setPlaceResize(getO1Label(),0);
setFontStyle(getO1Label(),2);
setFontName(getY1Label(),"ARIAL");
setFontSizeAbsolute(getY1Label(),true);
setFontSizeInPoints(getY1Label(),10);
setPlaceResize(getY1Label(),0);
setFontStyle(getY1Label(),2);

*END
-*INCLUDE=IBFS:/FILE/IBI_HTML_DIR/javaassist/intl/EN/ENIADefault_combine.sty,$
TYPE=REPORT, TITLETEXT=&WF_TITLE.QUOTEDSTRING, $
*GRAPH_SCRIPT
setReportParsingErrors(false);
setSelectionEnableMove(false);
setDisplay(getDataText(0), true);
setDataTextDisplay(true);

setLineBasicStrokeType(getY1MajorGrid(),12);
setDisplay(getO1AltFmtFrame(),true);

setDisplay(getO1AltFmtFrame(2),false);
setDisplay(getO1AltFmtFrame(3),false);
setDisplay(getO1AltFmtFrame(4),false);
setAltFmtFrameNumColors(getO1AltFmtFrame(),2);
setFillColor(getO1AltFmtFrame(0),new Color(128,128,128));
setFillColor(getO1AltFmtFrame(1),new Color(192,192,192));
setBorderColor(getY1MajorGrid(),new Color(105,105,105));

*END
*END
ENDSTYLE
END
-RUN


WebFOCUS 8.2.02
Windows, All Outputs