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.
a. but would want to know how to do it using fold-line itself. The borders get cut at the fold -line b.how to identify the fold line component.
TABLE FILE A
PRINT
A AS 'DIVISION'
B AS 'Last Week,Comp%'
C AS 'Last Week,Group Rank,(Rank of:55)'
D AS 'Last Week, Rank Shift'
E AS 'MTD as of,Last Week,Comp%'
F AS 'Last Month,Group Rank,(Rank of:55)'
G AS 'Last Month, Rank Shift'
H AS 'YTD as of,Last Week,Comp%'
I AS 'YTD Group Rank,(Rank of:55)'
J AS 'YTD Rank, Shift'
BY CATEGORY AS ' '
BY SALES
ON CATEGORY FOLD-LINE
ON TABLE SET PAGE-NUM OFF
ON TABLE SET STYLEMODE FIXED
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET STYLE *
UNITS=IN,
PAGESIZE='A4',
LEFTMARGIN=1.305556,
SQUEEZE=ON,
ORIENTATION=LANDSCAPE,
$
TYPE=REPORT,
FONT='ARIAL',
SIZE=10,
$
TYPE=DATA,COLUMN=N1,COLOR=RED,BORDER-LEFT=ON,$
TYPE=REPORT,COLUMN=SALES,SEQUENCE=3,POSITION=1.5,$
TYPE=TITLE,BORDER-TOP=ON,BORDER-RIGHT=ON,$
TYPE=REPORT,COLUMN=N1,BORDER-LEFT=ON,$
TYPE=REPORT,COLUMN=DIVISION,BORDER-LEFT=ON,BORDER-RIGHT=ON,$
ENDSTYLE
END
-EXIT
------------------------------------------ I tried the to bring the data in a different way as well . in the below code i want to get % STR Sales and COMP SALES % RANKING in the same way mentioned in Output2(in previous post)
TABLE FILE C_HOLD
PRINT
CATG
COMPUTE ACRSDUMMY/A1='1'; NOPRINT
SALES AS ' '
WTD1 AS ', '
WTDR AS ', '
A AS ' ,Last Week,Rank Shift'
B AS ' ,MTD as of,Last Week,Comp%'
C AS ' ,Last Month,Group Rank,(Rank of:55)'
D AS ' ,Last Month, Rank Shift'
E AS ' ,YTD as of,Last Week,Comp%'
F AS ' ,YTD Group Rank,(Rank of:55)'
G AS ' ,YTD Rank, Shift'
BY CTR2 NOPRINT
ACROSS ACRSDUMMY AS '% STR,SALES,'
-*ON TABLE SUBHEAD
-*"COMP SALES"
ON TABLE SET PAGE-NUM OFF
ON TABLE SET STYLEMODE FIXED
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
1. I do not want the row where the text is '% STR,SALES,' .I need '2' to be printed once above RCOST ,DEALER_COST , MPG. Also i do no want the right border of dealer_cost to extend where the across value is . Actual format needed has been posted in the previous post.
2.I have tried to achieve the FOLD-LINE concept in a different way . i.e Country name Carname
For the indentation , i need to append space. But want to know how to achieve the required output using FOLD-LINE itself .
TABLE FILE CAR
PRINT
COUNTRY
CAR
SALES
RETAIL_COST
SEATS
DEALER_COST
MPG
ON TABLE HOLD AS H11
END
TABLE FILE H11
PRINT
DST.COUNTRY AS 'CATG'
DST.SALES AS 'SALES'
DST.RETAIL_COST AS 'RCOST'
DST.DEALER_COST AS 'DEALER_COST'
DST.MPG AS 'MPG'
ON TABLE HOLD AS H12
END
DEFINE FILE H12
CTR/D4= CTR +1;
CTR1/A10 = FTOA(CTR, '(D4)', CTR1);
CTR2/A21='A'||CTR1;
END
TABLE FILE H12
PRINT
COMPUTE CATG1/A20 = CATG;
SALES
CTR2
RCOST
DEALER_COST
MPG
ON TABLE HOLD AS XYZ
END
TABLE FILE CAR
PRINT
COUNTRY
CAR
SALES
RETAIL_COST
DEALER_COST
MPG
ON TABLE HOLD AS H11
END
DEFINE FILE H11
CTR/D4 =IF COUNTRY NE LAST COUNTRY THEN CTR +1 ELSE CTR;
CTR1/A10 = FTOA(CTR, '(D4)', CTR1);
CTR2/A21='A'||CTR1 || CTR1;
END
TABLE FILE H11
PRINT
COMPUTE CAR1/A20 = CAR;
SALES
CTR2
RETAIL_COST
DEALER_COST
MPG
ON TABLE HOLD AS XY1
END
TABLE FILE XYZ
PRINT
CATG
SALES
CTR2
RCOST
DEALER_COST
MPG
ON TABLE HOLD AS FHOLD
MORE
FILE XY1
END
DEFINE FILE FHOLD
ACRSDUMMY/I1=1;
END
TABLE FILE FHOLD
PRINT
-*CATG1
SALES
RCOST
DEALER_COST
MPG
BY ACRSDUMMY NOPRINT
BY CTR2 NOPRINT
BY CATG1 AS ''
ACROSS ACRSDUMMY AS '% STR,SALES,'
ON TABLE SET PAGE-NUM OFF
ON TABLE SET STYLEMODE FIXED
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET STYLE *
UNITS=IN,
PAGESIZE='A4',
LEFTMARGIN=1.305556,
SQUEEZE=ON,
ORIENTATION=LANDSCAPE,
-* GRID=ON,
$
TYPE=REPORT,
FONT='ARIAL',
SIZE=10,
$
TYPE=REPORT,BORDER-LEFT=ON,BORDER-RIGHT=ON,BORDER-BOTTOM=ON,$
TYPE=TITLE,BORDER-TOP=ON,BORDER-LEFT=ON,BORDER-BOTTOM=ON,$
TYPE=TABHEADING,POSITION=5,VGRID=ON,BACKCOLOR=WHITE,$
TYPE=DATA,BORDER-BOTTOM=OFF,WRAP=5,$
END
-RUN
-EXIT
3. Using fold line , i have tried to replicate my output in car file . The borders get cut though . Would like to know if there is any alternative. Please refer to my previous posts for the output needed.
TABLE FILE CAR
PRINT
CAR
SALES
RETAIL_COST
SEATS
DEALER_COST
MPG
BY COUNTRY AS ''
ON COUNTRY FOLD-LINE
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET STYLE *
TYPE=TITLE,BORDER-TOP=ON,BORDER-RIGHT=ON,$
TYPE=REPORT,COLUMN=COUNTRY,BORDER-LEFT=ON,$
TYPE=REPORT,COLUMN=CAR,BORDER-LEFT=ON,BORDER-RIGHT=ON,$
END
-EXIT
The concept is to create a new line for the COUNTRY, but out it in the CAR column.
I've set the columns to accepts NULLs, so the COUNTRY does not show values.
I think there are a number of other ways to do this, Macgyver is one.
TABLE FILE CAR
PRINT
COUNTRY
COMPUTE CAR /A20 = ' ' | CAR ;
COMPUTE DATATYPE /I1 = 2 ;
COMPUTE SALES /I6 MISSING ON = SALES ;
COMPUTE RETAIL_COST/D7 MISSING ON = RETAIL_COST ;
COMPUTE SEATS /I3 MISSING ON = SEATS ;
COMPUTE DEALER_COST/D7 MISSING ON = DEALER_COST ;
COMPUTE MPG /D7 MISSING ON = MPG ;
ON TABLE HOLD AS TMP_CAR FORMAT ALPHA MISSING ON
ON TABLE SET HOLDLIST PRINTONLY
END
FILEDEF TMP_CAR DISK tmp_car.ftm (APPEND
TABLE FILE CAR
PRINT
COUNTRY
COMPUTE CAR/A20 = COUNTRY;
COMPUTE DATATYPE/I1 = 1 ;
COMPUTE SALES /I6 MISSING ON = MISSING ;
COMPUTE RETAIL_COST/D7 MISSING ON = MISSING ;
COMPUTE SEATS /I3 MISSING ON = MISSING ;
COMPUTE DEALER_COST/D7 MISSING ON = MISSING ;
COMPUTE MPG /D7 MISSING ON = MISSING ;
ON TABLE SAVE AS TMP_CAR
END
FILEDEF TMP_CAR DISK tmp_car.ftm
SET NODATA = ' '
TABLE FILE TMP_CAR
PRINT
CAR AS ''
SALES
RETAIL_COST
SEATS
DEALER_COST
MPG
BY COUNTRY NOPRINT
BY DATATYPE NOPRINT
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET STYLE *
TYPE=TITLE,BORDER-TOP=ON,BORDER-RIGHT=ON,$
TYPE=REPORT,COLUMN=COUNTRY,BORDER-LEFT=ON,$
TYPE=REPORT,COLUMN=CAR,BORDER-LEFT=ON,BORDER-RIGHT=ON,$
END
-EXIT
1.I do not want the row where the text is '% STR,SALES,' .I need '2' to be printed once above RCOST ,DEALER_COST , MPG. Also i do no want the right border of dealer_cost to extend where the across value is . Actual format needed has been posted in the previous post
WAZ, in running this code the report spans 3 pages 1.1, 1.2, 1.3. Is that what you get? Is there a way to get it all on one page? Running that last step in Dev. Studio comes up on one page. I have this exact issue on a report I am developing. Thanks, Rick
Reporting Server 7.6.10 Dev. Studio 7.6.8 Windows NT Excel, HTML, PDF
Would be great if i could get some ideas for point no .1
1.I do not want the row where the text is '% STR,SALES,' .I need '2' to be printed once above RCOST ,DEALER_COST , MPG. Also i do no want the right border of dealer_cost to extend where the across value is . Actual format needed has been posted in the previous post