I need to know how to run this graph with the dates displaying in lowest to highest order (Jan 16 - Dec 16) and not alphabetical order. I also do not need the legend to display at the bottom. Thanks.
-SET &ECHO = ALL;
DEFINE FILE CAR
MTH_NAME/A3 = DECODE MODEL (
'V12XKE AUTO' 'Jan'
'XJ12L AUTO' 'Feb'
'INTERCEPTOR III' 'Mar'
'TR7' 'Apr'
'B210 2 DOOR AUTO' 'May'
'COROLLA 4 DOOR DIX AUTO' 'Jun'
'2000 4 DOOR BERLINA' 'Jul'
'2000 GT VELOCE' 'Aug'
'2000 SPIDER VELOCE' 'Sep'
'DORA 2 DOOR' 'Oct'
'100 LS 2 DOOR AUTO' 'Nov'
'2002 2 DOOR' 'Dec'
ELSE '');
-*
RPT_YR/A2 = '16';
RPT_MO/I2 = DECODE MTH_NAME (
'Jan' 01
'Feb' 02
'Mar' 03
'Apr' 04
'May' 05
'Jun' 06
'Jul' 07
'Aug' 08
'Sep' 09
'Oct' 10
'Nov' 11
'Dec' 12 ELSE 0);
REPORT_MY/A8 = MTH_NAME|''|RPT_YR;
MONTH1/A10 = 'Jan 16';
MONTH2/A10 = 'Feb 16';
MONTH3/A10 = 'Mar 16';
MONTH4/A10 = 'Apr 16';
MONTH5/A10 = 'May 16';
MONTH6/A10 = 'Jun 16';
MONTH7/A10 = 'Jul 16';
MONTH8/A10 = 'Aug 16';
MONTH9/A10 = 'Sep 16';
MONTH10/A10 = 'Oct 16';
MONTH11/A10 = 'Nov 16';
MONTH12/A10 = 'Dec 16';
COMPANY/A3 WITH CAR = 'ABC';
SOFTWARE/A2 WITH CAR = 'WF';
RPT_CONTENT/A3 WITH CAR = 'BOB';
END
GRAPH FILE CAR
SUM
COMPUTE COST_PER_SEAT/D20CM = RCOST / SEATS; AS ''
-*ACROSS REPORT_MY COLUMNS MONTH1 AND MONTH2 AND MONTH3 AND MONTH4 AND MONTH5 AND MONTH6 AND MONTH7 AND MONTH8 AND MONTH9 AND MONTH10 AND MONTH11 AND MONTH12
BY RPT_CONTENT NOPRINT
BY COMPANY NOPRINT
BY SOFTWARE NOPRINT
BY RPT_YR NOPRINT
BY RPT_MO NOPRINT
ACROSS REPORT_MY AS ''
WHERE MTH_NAME NE ''
ON GRAPH PCHOLD FORMAT PDF
ON GRAPH SET GRMERGE ON
ON GRAPH SET GRMULTIGRAPH 0
ON GRAPH SET GRLEGEND 5
ON GRAPH SET GRXAXIS 0
ON GRAPH SET LOOKGRAPH VBAR
ON GRAPH SET STYLE *
*GRAPH_JS
border:{width:2, color:'teal'},
legend: {visible:false},
colorMode: {mode: 'byGroup'},
series: [
{series: 'all', border: {width: 1, color: 'grey'}},
{series: 0, color: 'red'},
{series: 1, color: 'teal'},
{series: 2, color: 'yellow'},
{series: 3, color: 'cyan'}
]
*END
ENDSTYLE
END
This message has been edited. Last edited by: Michele Brooks,
WF 8205, Windows 10 Oracle DBMS EXL07/PDF Output
October 20, 2017, 11:35 AM
FP Mod Chuck
Hi Michelle
Try this.
-SET &ECHO = ALL;
DEFINE FILE CAR MTH_NAME/A3 = DECODE MODEL ( 'V12XKE AUTO' 'Jan' 'XJ12L AUTO' 'Feb' 'INTERCEPTOR III' 'Mar' 'TR7' 'Apr' 'B210 2 DOOR AUTO' 'May' 'COROLLA 4 DOOR DIX AUTO' 'Jun' '2000 4 DOOR BERLINA' 'Jul' '2000 GT VELOCE' 'Aug' '2000 SPIDER VELOCE' 'Sep' 'DORA 2 DOOR' 'Oct' '100 LS 2 DOOR AUTO' 'Nov' '2002 2 DOOR' 'Dec' ELSE ''); -* RPT_YR/A2 = '16'; RPT_MO/I2 = DECODE MTH_NAME ( 'Jan' 01 'Feb' 02 'Mar' 03 'Apr' 04 'May' 05 'Jun' 06 'Jul' 07 'Aug' 08 'Sep' 09 'Oct' 10 'Nov' 11 'Dec' 12 ELSE 0); REPORT_MY/A8 = MTH_NAME|''|RPT_YR; MONTH1/A10 = 'Jan 16'; MONTH2/A10 = 'Feb 16'; MONTH3/A10 = 'Mar 16'; MONTH4/A10 = 'Apr 16'; MONTH5/A10 = 'May 16'; MONTH6/A10 = 'Jun 16'; MONTH7/A10 = 'Jul 16'; MONTH8/A10 = 'Aug 16'; MONTH9/A10 = 'Sep 16'; MONTH10/A10 = 'Oct 16'; MONTH11/A10 = 'Nov 16'; MONTH12/A10 = 'Dec 16'; COMPANY/A3 WITH CAR = 'ABC'; SOFTWARE/A2 WITH CAR = 'WF'; RPT_CONTENT/A3 WITH CAR = 'BOB'; END -*IA_GRAPH_BEGIN -*Do not delete or modify the comments below *-INTERNAL_COMMENT ACROSS REPORT_MY COLUMNS MONTH1 AND MONTH2 AND MONTH3 AND MONTH4 AND MONTH5 AND MONTH6 AND MONTH7 AND MONTH8 AND MONTH9 AND MONTH10 AND MONTH11 AND MONTH12 -*Do not delete or modify the comments above -*Do not delete or modify the comments below *-INTERNAL_COMMENT ACROSS REPORT_MY COLUMNS MONTH1 AND MONTH2 AND MONTH3 AND MONTH4 AND MONTH5 AND MONTH6 AND MONTH7 AND MONTH8 AND MONTH9 AND MONTH10 AND MONTH11 AND MONTH12 -*Do not delete or modify the comments above -*Do not delete or modify the comments below *-INTERNAL_COMMENT LINE#0$PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiIHN0YW5kYWxvbmU9Im5vIj8+DQo8IS0tMS4wLS0+PFJvb3QgdmVyc2lvbj0iMS4xIj4NCiAgICA8T2JqZWN0IG9iamVjdElkPSJDaGFydF8xIj4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9IkxpbmtlZFNvcnRzIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIi8+DQogICAgPC9PYmplY3Q+DQogICAgPE9iamVjdCBvYmplY3RJZD0iR0xPQkFMIj4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9IlNhbXBsZURhdGEiIHR5cGU9ImphdmEubGFuZy5Cb29sZWFuIj5mYWxzZTwvUHJvcGVydHk+DQogICAgICAgIDxQcm9wZXJ0eSBuYW1lPSJHbG9iYWxSZWNvcmRMaW1pdCIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+NTAwPC9Qcm9wZXJ0eT4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9Ikdsb2JhbFJ1blJlY29yZExpbWl0IiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj4wPC9Qcm9wZXJ0eT4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9Ikdsb2JhbE9wdGltaXphdGlvbiIgdHlwZT0iamF2YS5sYW5nLkJvb2xlYW4iPnRydWU8L1Byb3BlcnR5Pg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0iZmllbGREaXNwbGF5TW9kZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+bGFiZWw8L1Byb3BlcnR5Pg0KICAgICAgICA8UHJvcGVydHkgbmFtZT0icHJlZml4RGlzcGxheU1vZGUiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciLz4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9IkFjdGl2ZV9TdHlsZV9Vc2VyX3R5cGUiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPnBvd2VyPC9Qcm9wZXJ0eT4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9Ikdsb2JhbFZhbHVlc1BhZ2luZyIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+NDwvUHJvcGVydHk+DQogICAgICAgIDxQcm9wZXJ0eSBuYW1lPSJGb2NleGVjUHJlZmVyZW5jZXMiIHR5cGU9Ik1hcCI+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5U2xpY2Vyc1RhYkVkaXRJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlTZXJpZXNUYWJJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImF1dG9EcmlsbFNjcmlwdCIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyIvPg0KICAgICAgICAgICAgPEVudHJ5IGtleT0icnVuT25TdGFydHVwRGVmZXJyZWRJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlFZGl0TW9kZUluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZmFsc2U8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheUhvbWVUYWJJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9Im1ldGFkYXRhX3ZpZXdzIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5NZXRhRGF0YVRyZWUuVklFV19ESU1TPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlEYXRhVGFiSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJpbmZvQXNzaXN0TW9kZUFsbG93ZWRJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRlZmF1bHRfcHJldmlld19wYWdlbGltaXQiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPjU8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheUluc2VydFRhYkluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+ZmFsc2U8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0icnVuT25TdGFydHVwSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj50cnVlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlMYXlvdXRUYWJJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPmZhbHNlPC9FbnRyeT4NCiAgICAgICAgICAgIDxFbnRyeSBrZXk9ImRpc3BsYXlJbnRlcmFjdGl2ZU1vZGVJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPnRydWU8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGVmYXVsdF9wcmV2aWV3X3BhZ2VsaW1pdF9sYXlvdXQiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPjE8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheVF1aWNrQWNjZXNzVG9vbGJhclNhdmVJbmZvTWluaVByZWZlcmVuY2UiIHR5cGU9ImphdmEubGFuZy5TdHJpbmciPnRydWU8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheVNsaWNlcnNUYWJJbnRlcmFjdGl2ZUluZm9NaW5pUHJlZmVyZW5jZSIgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+dHJ1ZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkZWZhdWx0X2NvbXBvc2VfZm9ybWF0IiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5QREY8L0VudHJ5Pg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iZGlzcGxheVJlc291cmNlc0ZpZWxkVGFiSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5mYWxzZTwvRW50cnk+DQogICAgICAgICAgICA8RW50cnkga2V5PSJkaXNwbGF5Rm9ybWF0VGFiSW5mb01pbmlQcmVmZXJlbmNlIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj50cnVlPC9FbnRyeT4NCiAgICAgICAgPC9Qcm9wZXJ0eT4NCiAgICAg *-INTERNAL_COMMENT LINE#1$ICAgPFByb3BlcnR5IG5hbWU9ImNhc2NhZGVOYW1lcyIgdHlwZT0iTWFwIi8+DQogICAgICAgIDxQcm9wZXJ0eSBuYW1lPSJNYXN0ZXJfRmlsZXMiIHR5cGU9IlNldCI+DQogICAgICAgICAgICA8RW50cnkgdHlwZT0iamF2YS5sYW5nLlN0cmluZyI+Q0FSPC9FbnRyeT4NCiAgICAgICAgPC9Qcm9wZXJ0eT4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9Im1ldGFkYXRhVmlld0FzIiB0eXBlPSJNYXAiPg0KICAgICAgICAgICAgPEVudHJ5IGtleT0iQ0FSIiB0eXBlPSJqYXZhLmxhbmcuU3RyaW5nIj5NZXRhRGF0YVRyZWUuVklFV19ESU1TPC9FbnRyeT4NCiAgICAgICAgPC9Qcm9wZXJ0eT4NCiAgICAgICAgPFByb3BlcnR5IG5hbWU9ImVuYWJsZVByZXZpZXciIHR5cGU9ImphdmEubGFuZy5Cb29sZWFuIj50cnVlPC9Qcm9wZXJ0eT4NCiAgICA8L09iamVjdD4NCjwvUm9vdD4NCg== -*Do not delete or modify the comments above ENGINE INT CACHE SET ON -DEFAULTH &WF_STYLE_UNITS='INCHES'; -DEFAULTH &WF_STYLE_HEIGHT='4.21875'; -DEFAULTH &WF_STYLE_WIDTH='8.020833'; -DEFAULTH &WF_TITLE='WebFOCUS Report'; GRAPH FILE CAR -* Created by Info Assist for Graph SUM COMPUTE COST_PER_SEAT/D20CM=RCOST/SEATS ; AS '' BY CAR.COMP.RPT_CONTENT NOPRINT BY CAR.COMP.COMPANY NOPRINT BY CAR.COMP.SOFTWARE NOPRINT BY RPT_YR NOPRINT BY CAR.CARREC.RPT_MO NOPRINT BY CAR.CARREC.REPORT_MY AS '' WHERE CAR.CARREC.MTH_NAME NE ''; ON GRAPH PCHOLD FORMAT PDF ON GRAPH SET VZERO OFF ON GRAPH SET HTMLENCODE ON ON GRAPH SET GRWIDTH 1 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 6 ON GRAPH SET LOOKGRAPH VBAR 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); *GRAPH_JS "border": { "color": "teal", "width": 2 }, "legend": { "visible": false }, "series": [{ "border": { "color": "grey", "width": 1 }, "series": "all" }, { "color": "red", "series": 0 }, { "color": "teal", "series": 1 }, { "color": "yellow", "series": 2 }, { "color": "cyan", "series": 3 }], "colorMode": { "mode": "byGroup" } , *END ENDSTYLE END -RUN
-*IA_GRAPH_FINISH
Thank you for using Focal Point!
Chuck Wolff - Focal Point Moderator WebFOCUS 7x and 8x, Windows, Linux All output Formats
October 20, 2017, 11:54 AM
MartinY
Use a real date and not a text (or Chuck option but the NOPRINT fields may cause issue in graph).
Assuming that you have a real date somewhere in your data.
DEFINE FILE GGSALES
YM /MYt = DATE;
END
TABLE FILE GGSALES
SUM DOLLARS
BY YM
END
WF versions : Prod 8.2.04M gen 33, Dev 8.2.04M gen 33, OS : Windows, DB : MSSQL, Outputs : HTML, Excel, PDF In Focus since 2007
October 20, 2017, 12:27 PM
Michele Brooks
Chuck, your suggestion worked. Thanks so much. I applied the changes to my real graph and it came out perfectly. I originally tried using the COLUMNS function that I used in 8009, but it doesn't work in 8201. I really appreciate your suggestions. Thanks again.
WF 8205, Windows 10 Oracle DBMS EXL07/PDF Output
October 20, 2017, 12:30 PM
Michele Brooks
quote:
Originally posted by MartinY: Use a real date and not a text (or Chuck option but the NOPRINT fields may cause issue in graph).
Assuming that you have a real date somewhere in your data.
Thanks Martin, but I had no problem with the defined hard coded dates. Thanks for the example using the GGSALES DB. I'll keep that DB in mind when I need to use dates.
DEFINE FILE GGSALES
YM /MYt = DATE;
END
TABLE FILE GGSALES
SUM DOLLARS
BY YM
END