As of December 1, 2020, Focal Point is retired and repurposed as a reference repository. We value the wealth of knowledge that's been shared here over the years. You'll continue to have access to this treasure trove of knowledge, for search purposes only.
Join the TIBCO Community TIBCO Community is a collaborative space for users to share knowledge and support one another in making the best use of TIBCO products and services. There are several TIBCO WebFOCUS resources in the community.
From the Home page, select Predict: WebFOCUS to view articles, questions, and trending articles.
Select Products from the top navigation bar, scroll, and then select the TIBCO WebFOCUS product page to view product overview, articles, and discussions.
Request access to the private WebFOCUS User Group (login required) to network with fellow members.
Former myibi community members should have received an email on 8/3/22 to activate their user accounts to join the community. Check your Spam folder for the email. Please get in touch with us at community@tibco.com for further assistance. Reference the community FAQ to learn more about the community.
I have seen many threads touching this topic in the past and offered some techniques but with WebFocus 8 came we might have some new technique to achieve this without doing more coding like earlier.
Problem: Compound pdf report which has a graph and report on one page. We need to burst it by country. That way we will have a document for each country with individual car data as a graph and report on separate page.
For example - England will have 3 pages of report (3 graph and 3 report). Italy will have 1 page of report (1 graph and 1 report).
Using Coordinated PDF I can able to get it bursted by country but getting only one page (1 graph and 1 report) with the combined CAR data.
Hope I put enough explanation on the problem. Did anybody achieved this recently? If yes,what could be the approach we need to do.
Thanks for your assistance.This message has been edited. Last edited by: WFDevConsultant,
Test_Report ----------- TABLE FILE CAR SUM RETAIL_COST BY COUNTRY NOPRINT BY CAR BY MODEL -*WHERE COUNTRY EQ '&COUNTRY' ON TABLE PCHOLD FORMAT PDF -*&CMPVAL ON TABLE SET STYLE * UNITS=IN,TOPMARGIN=3.00000,LEFTMARGIN=1.250000,RIGHTMARGIN=0.500000,WIDTH=11.000,ORIENTATION=PORTRAIT,$ -*TYPE=REPORT,BORDER-TOP=LIGHT,BORDER-BOTTOM=LIGHT,BORDER-LEFT=LIGHT,BORDER-RIGHT=LIGHT,BORDER-COLOR=WHITE,$ TYPE=REPORT,FONT=ARIAL,SIZE=5,GRID=OFF,SQUEEZE=ON,$ TYPE=SUBHEAD,BACKCOLOR=RGB(0 91 91),COLOR=WHITE,STYLE=BOLD,SIZE=8,$ TYPE=TITLE,BACKCOLOR=SILVER,COLOR=BLACK,STYLE=BOLD,SIZE=8,BORDER=1.0,$ TYPE=ACROSSVALUE,BACKCOLOR=RGB(0 91 91),COLOR=WHITE,JUSTIFY=CENTER,BORDER=1.0,$ TYPE=DATA,STYLE=BOLD,BACKCOLOR=WHITE,COLOR=BLACK,BORDER=1.0,$ -*TYPE=REPORT,IMAGE=IBFS:/WFC/Repository/iCare2/NurseMagnet/Burst_Reports/logo.jpg, POSITION=(.5 10.0), SIZE= (2.1 0.7),$ -*TYPE=TABFOOTING,SIZE=10,STYLE=BOLD,JUSTIFY=RIGHT,POSITION=(5.2 10.5),COLOR=BLACK,$ ENDSTYLE END -RUN
Testburstrpt ------------------------- -*-SET &ECHO='ALL'; -* SET GRAPHSERVURL=http://wfserver:8080/ibi_apps/IBIGraphServlet
GRAPH FILE CAR SUM SALES BY COUNTRY NOPRINT BY CAR HEADING "ON GRAPH SET LOOKGRAPH VBAR ON GRAPH SET GRAPHEDIT SERVER ON GRAPH SET BARNUMB OFF ON GRAPH SET 3D OFF ON GRAPH SET VZERO ON ON GRAPH SET GRID ON ON GRAPH SET VAXIS 1.875 ON GRAPH SET HAXIS 4.063 ON GRAPH SET UNITS INCHES ON GRAPH SET GRWIDTH 0 ON GRAPH HOLD AS HOLD FORMAT SVG ON GRAPH SET GRAPHSTYLE * setMarkerDisplay(true); setConnectLineMarkers(false); setConnectScatterMarkers(false); setO1LabelDisplay(true); setO1AxisSide(0); setO1MajorGridDisplay(true); setO1MajorGridStyle(0); setO1MinorGridDisplay(false); setAxisAssignment(0,0); setY1LabelDisplay(true); setY1AxisSide(0); setY1MajorGridDisplay(true); setY1MajorGridStyle(0); setY1MinorGridDisplay(false); setTextFormatPreset(getY1Label(),-1); setTextFormatPattern(getY1Label(),"#.##"); setPieFeelerTextDisplay(1); setPieLabelDisplay(0); setTextFormatPreset(getPieSliceLabel(),1); setRiserBorderMode(1); setSeriesDefaultTransparentBorderColor(true); setUseSeriesBorderDefaults(true); setLegendDisplay(true); setFontSizeAbsolute(getY1Title(),true); setFontSizeAbsolute(getY1Label(),true); setFontSizeAbsolute(getY2Title(),true); setFontSizeAbsolute(getY2Label(),true); setFontSizeAbsolute(getO1Title(),true); setPlace(true); ENDSTYLE ON GRAPH SET STYLE * SQUEEZE=ON,ORIENTATION=PORTRAIT,$ TYPE=REPORT,GRID=OFF,FONT='TIMES NEW ROMAN',SIZE=10,$ TYPE=HEADING,LINE=1,OBJECT=FIELD,ITEM=1,COLOR='BLACK',$ ENDSTYLE END -RUN TABLE FILE CAR " " SUM COMPUTE CNTR/I4 = CNTR + 1; NOPRINT COMPUTE CNTR2/A4 = IF &FOCGRAPHCNT EQ 1 THEN ' ' ELSE FTOA(CNTR-1,'(F4)','A4'); NOPRINT COMPUTE IMG/A16 = 'HOLD'||LJUST(4,CNTR2,'A4')|| '.svg';NOPRINT BY COUNTRY NOPRINT ON COUNTRY PAGE-BREAK ON TABLE SET PAGE-NUM NOLEAD ON TABLE PCHOLD FORMAT PDF ON TABLE SET STYLE * type=HEADING, IMAGE=(IMG), position=(0 0), $ TYPE=REPORT,PAGE-LOCATION=OFF,$ END
-*GRAPH FILE CAR -*SUM RETAIL_COST -*BY COUNTRY NOPRINT -*BY CAR -*-*WHERE COUNTRY EQ '&COUNTRY' -*-*ON GRAPH SET EMPTYREPORT ON -*-*ON GRAPH SET HTMLENCODE ON -*-*ON GRAPH SET GRAPHDEFAULT OFF -*-*ON GRAPH SET ARGRAPHENGIN JSCHART -*ON GRAPH SET GRAPHEDIT SERVER -*ON GRAPH SET BARNUMB OFF -*ON GRAPH SET 3D OFF -*ON GRAPH SET VZERO OFF -*ON GRAPH SET GRID ON -*-*ON GRAPH SET GRMERGE OFF -*-*ON GRAPH SET GRMULTIGRAPH 1 -*-*ON GRAPH SET GRLEGEND 1 -*ON GRAPH SET HAXIS 500 -*ON GRAPH SET VAXIS 500 -*-*ON GRAPH SET GRXAXIS 2 -*ON GRAPH SET GRAPHSTYLE * -*setPlace(false); -*setGraphType(44); -*setFrameDisplay(true); -*setSeriesType(0,1); -*setAxisAssignment(1,0); -*setAxisAssignment(2,1); -* -*setFillColor(getSeries(0),new Color(200,200,200)); -*setFillColor(getSeries(1),new Color(32,73,106)); -*setFillColor(getSeries(2),new Color(30,13,81)); -* -*setY1TitleString("Top Box %"); -* -*setScaleMinAuto(getY1Axis(),false); -*setScaleMin(getY1Axis(),0); -*setScaleMaxAuto(getY1Axis(),false); -*setScaleMax(getY1Axis(),100); -*setY1MajorGridStep(10); -* -*setScaleMinAuto(getY2Axis(),false); -*setScaleMin(getY2Axis(),0); -*setScaleMaxAuto(getY2Axis(),false); -*setScaleMax(getY2Axis(),100); -*setY2MajorGridStep(10); -* -*setDisplay(getO1MajorGrid(),false); -*setDisplay(getY1MajorGrid(),false); -*setDisplay(getX1MajorGrid(),false); -* -*setDisplay(getO1MinorGrid(),false); -*setDisplay(getY1MinorGrid(),false); -*setDisplay(getX1MinorGrid(),false); -* -*setTextRotation(getO1Label(),0); -*setLegendRect(new Rectangle(-1340,-1478,18948,150)); -* -*setUseSeriesShapes(true); -*-*setFillColor(getSeries(1),new Color(255,0,0)); -*setFillColor(getSeries(1),new Color(136,0,21)); -*setTransparentBorderColor(getSeries(1),true); -*setMarkerShape(getSeries(1),6); -*setMarkerSize(1,45); -*setMarkerShape(getSeries(2),3); -*setMarkerSize(2,45); -* -* -*setLegendTextAutofit(true); -*setLegendOrient(1); -*setLegendMarkersPerRow(3); -*-*setLegendPosition(10); -* -*setDataTextDisplay(true); -*setDisplay(getDataText(1), false); -*setDisplay(getDataText(2), false); -*-*setSeriesDataTextDisplay(getSeries(1),false); -*-*setSeriesDataTextDisplay(getSeries(1),false); -*setDataTextPosition(0); -*setDataTextAngleDefault(45); -*setFontStyle(getDataText(),0); -*setFontSizeAbsolute(getDataText(),true); -*setFontSizeInPoints(getDataText(),7); -*ENDSTYLE -*-*ON GRAPH PCHOLD FORMAT PDF -*-*OPEN -*-*ON GRAPH HOLD AS GRAPH1 FORMAT GIF -*END
-*TABLE FILE CAR -*PRINT COUNTRY NOPRINT -*BY COUNTRY NOPRINT -*WHERE RECORDLIMIT EQ 10 -*ON TABLE PCHOLD FORMAT PDF OPEN NOBREAK -*ON TABLE SET PAGE-NUM OFF -*ON TABLE SET STYLE * -*TYPE=REPORT,GRID=OFF,ORIENTATION=PORTRAIT,$ -*TYPE=HEADING,STYLE=BOLD,FONT=ARIAL,SIZE=9,$ -*TYPE=REPORT,IMAGE=GRAPH1.gif,POSITION=(0.15 1.25), SIZE=(9 4),$ -*END
-*TABLE FILE CAR -*SUM RETAIL_COST -*BY COUNTRY -*BY CAR -*-*WHERE COUNTRY EQ '&COUNTRY' -*ON TABLE PCHOLD FORMAT PDF CLOSE -*-*&CMPVAL -*ON TABLE SET STYLE * -*UNITS=IN,TOPMARGIN=3.00000,LEFTMARGIN=1.250000,RIGHTMARGIN=0.500000,WIDTH=11.000,ORIENTATION=PORTRAIT,$ -*-*TYPE=REPORT,BORDER-TOP=LIGHT,BORDER-BOTTOM=LIGHT,BORDER-LEFT=LIGHT,BORDER-RIGHT=LIGHT,BORDER-COLOR=WHITE,$ -*TYPE=REPORT,FONT=ARIAL,SIZE=5,GRID=OFF,SQUEEZE=ON,$ -*TYPE=SUBHEAD,BACKCOLOR=RGB(0 91 91),COLOR=WHITE,STYLE=BOLD,SIZE=8,$ -*TYPE=TITLE,BACKCOLOR=SILVER,COLOR=BLACK,STYLE=BOLD,SIZE=8,BORDER=1.0,$ -*TYPE=ACROSSVALUE,BACKCOLOR=RGB(0 91 91),COLOR=WHITE,JUSTIFY=CENTER,BORDER=1.0,$ -*TYPE=DATA,STYLE=BOLD,BACKCOLOR=WHITE,COLOR=BLACK,BORDER=1.0,$ -*-*TYPE=REPORT,IMAGE=IBFS:/WFC/Repository/iCare2/NurseMagnet/Burst_Reports/logo.jpg, POSITION=(.5 10.0), SIZE= (2.1 0.7),$ -*-*TYPE=TABFOOTING,SIZE=10,STYLE=BOLD,JUSTIFY=RIGHT,POSITION=(5.2 10.5),COLOR=BLACK,$ -*ENDSTYLE -*END -*-RUN -*-EXIT -*SET GRAPHSERVURL=http://172.16.20.230:8080/ibi_apps/IBIGraphServlet -* -*TABLE FILE CAR -*BY COUNTRY -*ON TABLE SAVE AS CTRYDAT -*END -*-RUN -* -*-SET &CLINES=&LINES; -* -*-SET &CNT=1; -*-REPEAT PRGLOOP &CLINES TIMES -* -*-READ CTRYDAT NOCLOSE &COUNTRY.A10. -* -*-SET &CMPVAL='OPEN'; -*GRAPH FILE CAR -*SUM RETAIL_COST -*BY COUNTRY NOPRINT -*BY CAR -*WHERE COUNTRY EQ '&COUNTRY' -*ON GRAPH SET EMPTYREPORT ON -*ON GRAPH SET GRAPHEDIT SERVER -*ON GRAPH SET BARNUMB OFF -*ON GRAPH SET 3D OFF -*ON GRAPH SET VZERO OFF -*ON GRAPH SET GRID ON -*ON GRAPH SET GRMERGE OFF -*ON GRAPH SET HAXIS 10 -*ON GRAPH SET VAXIS 10 -*ON GRAPH SET GRAPHSTYLE * -*setPlace(false); -*setGraphType(44); -*setFrameDisplay(true); -*setSeriesType(0,1); -*setAxisAssignment(1,0); -*setAxisAssignment(2,1); -* -*setFillColor(getSeries(0),new Color(200,200,200)); -*setFillColor(getSeries(1),new Color(32,73,106)); -*setFillColor(getSeries(2),new Color(30,13,81)); -* -*setY1TitleString("Top Box %"); -* -*setScaleMinAuto(getY1Axis(),false); -*setScaleMin(getY1Axis(),0); -*setScaleMaxAuto(getY1Axis(),false); -*setScaleMax(getY1Axis(),100); -*setY1MajorGridStep(10); -* -*setScaleMinAuto(getY2Axis(),false); -*setScaleMin(getY2Axis(),0); -*setScaleMaxAuto(getY2Axis(),false); -*setScaleMax(getY2Axis(),100); -*setY2MajorGridStep(10); -* -*setDisplay(getO1MajorGrid(),false); -*setDisplay(getY1MajorGrid(),false); -*setDisplay(getX1MajorGrid(),false); -* -*setDisplay(getO1MinorGrid(),false); -*setDisplay(getY1MinorGrid(),false); -*setDisplay(getX1MinorGrid(),false); -* -*setTextRotation(getO1Label(),0); -*setLegendRect(new Rectangle(-1340,-1478,18948,150)); -* -*setUseSeriesShapes(true); -*-*setFillColor(getSeries(1),new Color(255,0,0)); -*setFillColor(getSeries(1),new Color(136,0,21)); -*setTransparentBorderColor(getSeries(1),true); -*setMarkerShape(getSeries(1),6); -*setMarkerSize(1,45); -*setMarkerShape(getSeries(2),3); -*setMarkerSize(2,45); -* -* -*setLegendTextAutofit(true); -*setLegendOrient(1); -*setLegendMarkersPerRow(3); -*-*setLegendPosition(10); -* -*setDataTextDisplay(true); -*setDisplay(getDataText(1), false); -*setDisplay(getDataText(2), false); -*-*setSeriesDataTextDisplay(getSeries(1),false); -*-*setSeriesDataTextDisplay(getSeries(1),false); -*setDataTextPosition(0); -*setDataTextAngleDefault(45); -*setFontStyle(getDataText(),0); -*setFontSizeAbsolute(getDataText(),true); -*setFontSizeInPoints(getDataText(),7); -*ENDSTYLE -*ON GRAPH PCHOLD FORMAT PDF &CMPVAL NOBREAK -*END -* -*-SET &CMPVAL=IF &CNT EQ &CLINES THEN 'CLOSE' ELSE ''; -* -*TABLE FILE CAR -*SUM RETAIL_COST -*BY COUNTRY NOPRINT -*BY CAR -*WHERE COUNTRY EQ '&COUNTRY' -*ON TABLE PCHOLD FORMAT PDF &CMPVAL -*ON TABLE SET STYLE * -*UNITS=IN,TOPMARGIN=3.00000,LEFTMARGIN=1.250000,RIGHTMARGIN=0.500000,WIDTH=11.000,ORIENTATION=PORTRAIT,$ -*-*TYPE=REPORT,BORDER-TOP=LIGHT,BORDER-BOTTOM=LIGHT,BORDER-LEFT=LIGHT,BORDER-RIGHT=LIGHT,BORDER-COLOR=WHITE,$ -*TYPE=REPORT,FONT=ARIAL,SIZE=5,GRID=OFF,SQUEEZE=ON,$ -*TYPE=SUBHEAD,BACKCOLOR=RGB(0 91 91),COLOR=WHITE,STYLE=BOLD,SIZE=8,$ -*TYPE=TITLE,BACKCOLOR=SILVER,COLOR=BLACK,STYLE=BOLD,SIZE=8,BORDER=1.0,$ -*TYPE=ACROSSVALUE,BACKCOLOR=RGB(0 91 91),COLOR=WHITE,JUSTIFY=CENTER,BORDER=1.0,$ -*TYPE=DATA,STYLE=BOLD,BACKCOLOR=WHITE,COLOR=BLACK,BORDER=1.0,$ -*-*TYPE=REPORT,IMAGE=IBFS:/WFC/Repository/iCare2/NurseMagnet/Burst_Reports/logo.jpg, POSITION=(.5 10.0), SIZE= (2.1 0.7),$ -*-*TYPE=TABFOOTING,SIZE=10,STYLE=BOLD,JUSTIFY=RIGHT,POSITION=(5.2 10.5),COLOR=BLACK,$ -*ENDSTYLE -*END -*-RUN -*-SET &CNT=&CNT+1; -*-PRGLOOP -* -*-EXIT -*This message has been edited. Last edited by: WFDevConsultant,
You will get 3 page report for England, 1 page report for France and 2 page report for Italy. Each page you will get one graph and one tabular report.
Make sure to enable bursting option while scheduling.
APP PATH IBISAMP
SET HTMLARCHIVE=ON
COMPOUND LAYOUT PCHOLD FORMAT PDF
UNITS=IN, $
SECTION=section1, LAYOUT=ON, METADATA='prop_with_names^Margins_Left=0.5^Margins_Top=0.5^Margins_Right=0.5^Margins_Bottom=0.5^thumbnailscale=4',
MERGE=ON, ORIENTATION=PORTRAIT, PAGESIZE=Letter, SHOW_GLOBALFILTER=OFF, $
PAGELAYOUT=1, NAME='Page layout 1', text='Page layout 1', TOC-LEVEL=1, BOTTOMMARGIN=0.5, TOPMARGIN=0.5,
METADATA='BOTTOMMARGIN=0.5,TOPMARGIN=0.5,LEFTMARGIN=0,RIGHTMARGIN=0,', $
COMPONENT='report1', TEXT='report1', TOC-LEVEL=2, POSITION=(0.625 0.521), DIMENSION=(7.292 9.895), ARREPORTSIZE=DIMENSION,
METADATA='HEIGHT: 9.895in; WIDTH: 7.292in; POSITION: absolute; LEFT: 0.625in; Z-INDEX: 4; TOP: 0.521in', $
COMPONENT='report2', TEXT='report2', TOC-LEVEL=2, POSITION=(0.833 4.583), DIMENSION=(6.979 2.917), ARREPORTSIZE=DIMENSION,
METADATA='HEIGHT: 2.917in; WIDTH: 6.979in; POSITION: absolute; LEFT: 0.833in; Z-INDEX: 2; TOP: 4.583in', $
END
SET COMPONENT='report1'
-*component_type report
GRAPH FILE CAR
SUM
DEALER_COST
RETAIL_COST
BY COUNTRY NOPRINT
BY CAR NOPRINT
BY MODEL AS ''
HEADING
""
ON GRAPH SET LOOKGRAPH VBAR
ON GRAPH SET GRAPHEDIT SERVER
ON GRAPH SET BARNUMB OFF
ON GRAPH SET 3D OFF
ON GRAPH SET VZERO ON
ON GRAPH SET GRID ON
ON GRAPH SET VAXIS 1.875
ON GRAPH SET HAXIS 4.063
ON GRAPH SET UNITS INCHES
ON GRAPH SET GRWIDTH 0
ON GRAPH HOLD AS HOLD FORMAT SVG
ON GRAPH SET GRAPHSTYLE *
setMarkerDisplay(true);
setConnectLineMarkers(false);
setConnectScatterMarkers(false);
setO1LabelDisplay(true);
setO1AxisSide(0);
setO1MajorGridDisplay(true);
setO1MajorGridStyle(0);
setO1MinorGridDisplay(false);
setAxisAssignment(0,0);
setY1LabelDisplay(true);
setY1AxisSide(0);
setY1MajorGridDisplay(true);
setY1MajorGridStyle(0);
setY1MinorGridDisplay(false);
setTextFormatPreset(getY1Label(),-1);
setTextFormatPattern(getY1Label(),"#.##");
setPieFeelerTextDisplay(1);
setPieLabelDisplay(0);
setTextFormatPreset(getPieSliceLabel(),1);
setRiserBorderMode(1);
setSeriesDefaultTransparentBorderColor(true);
setUseSeriesBorderDefaults(true);
setLegendDisplay(true);
setFontSizeAbsolute(getY1Title(),true);
setFontSizeAbsolute(getY1Label(),true);
setFontSizeAbsolute(getY2Title(),true);
setFontSizeAbsolute(getY2Label(),true);
setFontSizeAbsolute(getO1Title(),true);
setPlace(true);
ENDSTYLE
ON GRAPH SET STYLE *
SQUEEZE=ON,ORIENTATION=PORTRAIT,$
TYPE=REPORT,GRID=OFF,FONT='TIMES NEW ROMAN',SIZE=10,$
TYPE=HEADING,LINE=1,OBJECT=FIELD,ITEM=1,COLOR='BLACK',$
ENDSTYLE
END
-RUN
TABLE FILE CAR
" "
SUM
COMPUTE CNTR/I4 = CNTR + 1; NOPRINT
COMPUTE CNTR2/A4 = IF &FOCGRAPHCNT EQ 1 THEN ' ' ELSE FTOA(CNTR-1,'(F4)','A4');
NOPRINT
COMPUTE IMG/A16 = 'HOLD'||LJUST(4,CNTR2,'A4')|| '.svg';NOPRINT
BY COUNTRY NOPRINT
BY CAR NOPRINT
ON CAR PAGE-BREAK
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET STYLE *
type=HEADING, IMAGE=(IMG), position=(0 0), $
TYPE=REPORT,PAGE-LOCATION=OFF,$
END
-RUN
SET COMPONENT='report2'
-*component_type report
TABLE FILE CAR
SUM
DEALER_COST
RETAIL_COST
BY COUNTRY
BY CAR
BY MODEL
ON CAR PAGE-BREAK
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE SET STYLE *
UNITS=IN,TOPMARGIN=3.00000,LEFTMARGIN=1.250000,RIGHTMARGIN=0.500000,WIDTH=11.000,ORIENTATION=PORTRAIT,$
TYPE=REPORT,FONT=ARIAL,SIZE=5,GRID=OFF,SQUEEZE=ON,$
TYPE=SUBHEAD,BACKCOLOR=RGB(0 91 91),COLOR=WHITE,STYLE=BOLD,SIZE=8,$
TYPE=TITLE,BACKCOLOR=SILVER,COLOR=BLACK,STYLE=BOLD,SIZE=8,BORDER=1.0,$
TYPE=ACROSSVALUE,BACKCOLOR=RGB(0 91 91),COLOR=WHITE,JUSTIFY=CENTER,BORDER=1.0,$
TYPE=DATA,STYLE=BOLD,BACKCOLOR=WHITE,COLOR=BLACK,BORDER=1.0,$
ENDSTYLE
END
-RUN
COMPOUND END