Could you please let me know, How to reach this requirement.
Thanks, RaghuThis message has been edited. Last edited by: Kerry,
WebFOCUS 7.6.7 Windows Excel, PDF, HTML
May 14, 2010, 11:49 AM
Darin Lee
Not quite sure what you are looking for. Maybe you could give us an example? You can name a column title anything you want with the AS phrase.
Regards,
Darin
In FOCUS since 1991 WF Server: 7.7.04 on Linux and Z/OS, ReportCaster, Self-Service, MRE, Java, Flex Data: DB2/UDB, Adabas, SQL Server Output: HTML,PDF,EXL2K/07, PS, AHTML, Flex WF Client: 77 on Linux w/Tomcat
May 15, 2010, 05:16 AM
Ram Prasad E
Are you looking for COLSPAN option. This working only in HTML & EXL2k. Provide a example using car file to help you better. Also mention the output format.
TABLE FILE CAR
HEADING
" "
" <+0>Sales Details<+0> "
PRINT CAR AS 'Car'
MODEL AS 'Model'
BODYTYPE AS 'Body Type'
SEATS AS 'No of Seats'
DEALER_COST AS 'Dealer $'
RETAIL_COST AS 'Retail $'
SALES AS 'Sales'
MPG AS 'MPG'
ON TABLE SET STYLE *
TYPE=REPORT, HEADALIGN=BODY, $
TYPE=HEADING, LINE=2, ITEM=1, COLSPAN=4, $
TYPE=HEADING, LINE=2, ITEM=2, COLSPAN=3, $
TYPE=HEADING, LINE=2, ITEM=3, COLSPAN=1, $
TYPE=HEADING, LINE=1, COLSPAN=8, $
ENDSTYLE
END
This will depend on the output format. PDF does not like COLSPAN.
You could also use the WIDTH option.
TABLE FILE CAR
HEADING
" "
" <+0>|<+0>Sales Details<+0>|<+0> "
PRINT CAR AS 'Car'
MODEL AS 'Model'
BODYTYPE AS 'Body Type'
SEATS AS 'No of Seats'
DEALER_COST AS 'Dealer $'
RETAIL_COST AS 'Retail $'
SALES AS 'Sales'
MPG AS 'MPG'
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
TYPE=REPORT, COLUMN=N1, WRAP=1, $
TYPE=REPORT, COLUMN=N2, WRAP=1, $
TYPE=REPORT, COLUMN=N3, WRAP=1, $
TYPE=REPORT, COLUMN=N4, WRAP=1, $
TYPE=REPORT, COLUMN=N5, WRAP=1, $
TYPE=REPORT, COLUMN=N6, WRAP=1, $
TYPE=REPORT, COLUMN=N7, WRAP=1, $
TYPE=REPORT, COLUMN=N8, WRAP=1, $
TYPE=HEADING, LINE=2, ITEM=1, WIDTH=4.44, $
TYPE=HEADING, LINE=2, ITEM=3, WIDTH=3.15,JUSTIFY=CENTER, $
ENDSTYLE
END
Waz...
Prod:
WebFOCUS 7.6.10/8.1.04
Upgrade:
WebFOCUS 8.2.07
OS:
Linux
Outputs:
HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!
May 17, 2010, 04:26 AM
raghuram
Hi Waz, We tried with the above code but it is not working. The requirement is same as you mentioned in the above mail. Please find below my code. TABLE FILE RPTTOP HEADING " " " <+0>Total Cost of Quality (USD)<+0> " PRINT SUPLLIER_CODE AS 'Supplier Code' SUPPLIER_NAME AS 'Supplier Name' UNCOLLECTED AS 'Total Uncollected CRA(USD)' DEL_COQ1 AS 'Delivery' LCH_COQ1 AS 'Launch' PRD_COQ1 AS 'Quality' WAR_COQ1 AS 'Warranty' REC_AMOUNT1 NOPRINT COMPUTE CRA_P/D10.1% = (COLL_AMT1/REC_AMOUNT1)*100; AS '% CRA Collected' COMPUTE COQ_1/D10.1 = PRD_COQ1+DEL_COQ1+WAR_COQ1+LCH_COQ1; NOPRINT COMPUTE COQ_P/D10.1% = (COLL_AMT1/COQ_1)*100; AS '% COQ Collected' ON TABLE SET PAGE-NUM NOLEAD &HTML_VW ON TABLE SET NODATA '0' ON TABLE SET EMPTYCELLS OFF ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * UNITS=IN, SQUEEZE=ON, ORIENTATION=PORTRAIT, TOPMARGIN=1,
$ TYPE=REPORT, BORDER-TOP=LIGHT, BORDER-BOTTOM=LIGHT, BORDER-LEFT=LIGHT, BORDER-RIGHT=LIGHT, BORDER-TOP-COLOR='SILVER', BORDER-BOTTOM-COLOR='SILVER', BORDER-LEFT-COLOR='SILVER', BORDER-RIGHT-COLOR='SILVER', GRID=ON, FONT='ARIAL', SIZE=9, $ -IF HTML EQ 'EXL2K' THEN GOTO SKIP_TIT; TYPE=TITLE,GRID=OFF,SIZE=9,BACKCOLOR=RGB(224 224 224),STYLE=BOLD,JUSTIFY=CENTER, $ -SKIP_TIT -IF HTML NE 'EXL2K' THEN GOTO SKIP_SLBR; -SKIP_SLBR TYPE=TITLE,STYLE=BOLD,JUSTIFY=CENTER,$ TYPE=TABHEADING,SIZE=12,STYLE=BOLD,$ TYPE=TABFOOTING,SIZE=12,STYLE=BOLD,$ TYPE=SUBHEAD,SIZE=10,STYLE=BOLD,$ TYPE=SUBFOOT,SIZE=10,STYLE=BOLD,$ -IF HTML EQ 'EXL2K' THEN GOTO SKIP_ACBG; TYPE=ACROSSVALUE,SIZE=9,STYLE=BOLD,BACKCOLOR=RGB(224 224 224),$ TYPE=REPORT,COLUMN=N1,WIDTH =1,SQUEEZE=1,$ TYPE=REPORT,COLUMN=N2,WIDTH =1,SQUEEZE=1,$ TYPE=REPORT,COLUMN=N3,WIDTH =1,SQUEEZE=1,$ TYPE=REPORT,COLUMN=N4,WIDTH =0.5,SQUEEZE=1,$ TYPE=REPORT,COLUMN=N5,WIDTH =0.5,SQUEEZE=1,$ TYPE=DATA,COLUMN=N2,JUSTIFY=CENTER,WIDTH =2,$ TYPE=DATA,COLUMN=N3,JUSTIFY=LEFT,$ TYPE=DATA,COLUMN=N4,JUSTIFY=CENTER,$ TYPE=DATA,COLUMN=N5,JUSTIFY=CENTER,$ TYPE=DATA,COLUMN=N6,JUSTIFY=CENTER,$ TYPE=DATA,COLUMN=N7,JUSTIFY=CENTER,$ TYPE=DATA,COLUMN=N8,JUSTIFY=CENTER,$ -SKIP_ACBG -IF HTML NE 'EXL2K' THEN GOTO SKIP_ACBR; -SKIP_ACBR -IF HTML NE 'EXL2K' THEN GOTO SKIP_STYL; -SKIP_STYL ENDSTYLE END
Please advice me how can i reach the requirement
Thanks, Raghu
WebFOCUS 7.6.7 Windows Excel, PDF, HTML
May 17, 2010, 04:48 AM
Yangyang
MY IDEA:
TABLE FILE TEST1
PRINT
COLUMN1
COLUMN2
COLUMN3
COLUMN4
COMPUTE combinedColumn1/A50 = COLUMN1||COLUMN2||COLUMN3
ON TABLE HOLD FORMAT TEST2
TABLE FILE TEST2
PRINT
*
HEADING
"<COLUMN1<combinedColumn1<COLUMN2 "
FOOTING
""
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
.......
.......
.......
i'm not sure this can run well,just a idea for you !
Thanks, James Yang
WebFOCUS 7.6.8 WebFOCUS 7.6.10 BI FLEX .NET
May 17, 2010, 05:31 AM
raghuram
Hi Yang, We are not concatinating the data. Just we are combinig the column header.
Thanks, Raghu
WebFOCUS 7.6.7 Windows Excel, PDF, HTML
May 17, 2010, 09:37 AM
PBrightwell
You will have to do this as a heading or subheading rather than a title and include the whole line. HEADING "This is your company heading" "The next line is your column titles" "<+0>Col 1<+0> Col2 Col3 Col4 <+0> Col 5"
In your stylesheet TYPE=HEADING, LINE=3 ITEM=2, COLSPAN=3, JUSTIFY=CENTER, $ If you have a problem identifying the item numbers, try making them different colors"
Pat WF 7.6.8, AIX, AS400, NT AS400 FOCUS, AIX FOCUS, Oracle, DB2, JDE, Lotus Notes
May 17, 2010, 05:53 PM
Waz
Raghu, what was wrong with the output ?
I changed your code to work on the CAR file, and it looks OK.
TABLE FILE CAR
HEADING
" "
" <+0>Total Cost of Quality (USD)<+0> "
PRINT COUNTRY AS 'Supplier Code'
CAR AS 'Supplier Name'
MODEL AS 'Total Uncollected CRA(USD)'
RETAIL_COST AS 'Delivery'
DEALER_COST AS 'Launch'
SALES AS 'Quality'
WIDTH AS 'Warranty'
LENGTH NOPRINT
COMPUTE CRA_P/D10.1% = (HEIGHT/LENGTH)*100; AS '% CRA Collected'
COMPUTE COQ_1/D10.1 = SALES +RETAIL_COST +WIDTH+DEALER_COST ; NOPRINT
COMPUTE COQ_P/D10.1% = (HEIGHT/COQ_1)*100; AS '% COQ Collected'
ON TABLE SET PAGE-NUM NOLEAD
-*&HTML_VW
ON TABLE SET NODATA '0'
ON TABLE SET EMPTYCELLS OFF
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
TOPMARGIN=1,
TYPE=REPORT, HEADALIGN=BODY, $
TYPE=HEADING, LINE=2, ITEM=1, COLSPAN=4, $
TYPE=HEADING, LINE=2, ITEM=2, COLSPAN=3, $
TYPE=HEADING, LINE=2, ITEM=3, COLSPAN=1, $
TYPE=HEADING, LINE=2, ITEM=4, COLSPAN=1, $
TYPE=HEADING, LINE=1, COLSPAN=9, $
$
TYPE=REPORT,
BORDER-TOP=LIGHT,
BORDER-BOTTOM=LIGHT,
BORDER-LEFT=LIGHT,
BORDER-RIGHT=LIGHT,
BORDER-TOP-COLOR='SILVER',
BORDER-BOTTOM-COLOR='SILVER',
BORDER-LEFT-COLOR='SILVER',
BORDER-RIGHT-COLOR='SILVER',
GRID=ON,
FONT='ARIAL',
SIZE=9,
$
-*-IF HTML EQ 'EXL2K' THEN GOTO SKIP_TIT;
TYPE=TITLE,GRID=OFF,SIZE=9,BACKCOLOR=RGB(224 224 224),STYLE=BOLD,JUSTIFY=CENTER,
$
-SKIP_TIT
-*-IF HTML NE 'EXL2K' THEN GOTO SKIP_SLBR;
-SKIP_SLBR
TYPE=TITLE,STYLE=BOLD,JUSTIFY=CENTER,$
TYPE=TABHEADING,SIZE=12,STYLE=BOLD,$
TYPE=TABFOOTING,SIZE=12,STYLE=BOLD,$
TYPE=SUBHEAD,SIZE=10,STYLE=BOLD,$
TYPE=SUBFOOT,SIZE=10,STYLE=BOLD,$
-*-IF HTML EQ 'EXL2K' THEN GOTO SKIP_ACBG;
TYPE=ACROSSVALUE,SIZE=9,STYLE=BOLD,BACKCOLOR=RGB(224 224 224),$
TYPE=REPORT,COLUMN=N1,WIDTH =1,SQUEEZE=1,$
TYPE=REPORT,COLUMN=N2,WIDTH =1,SQUEEZE=1,$
TYPE=REPORT,COLUMN=N3,WIDTH =1,SQUEEZE=1,$
TYPE=REPORT,COLUMN=N4,WIDTH =0.5,SQUEEZE=1,$
TYPE=REPORT,COLUMN=N5,WIDTH =0.5,SQUEEZE=1,$
TYPE=DATA,COLUMN=N2,JUSTIFY=CENTER,WIDTH =2,$
TYPE=DATA,COLUMN=N3,JUSTIFY=LEFT,$
TYPE=DATA,COLUMN=N4,JUSTIFY=CENTER,$
TYPE=DATA,COLUMN=N5,JUSTIFY=CENTER,$
TYPE=DATA,COLUMN=N6,JUSTIFY=CENTER,$
TYPE=DATA,COLUMN=N7,JUSTIFY=CENTER,$
TYPE=DATA,COLUMN=N8,JUSTIFY=CENTER,$
-SKIP_ACBG
-*-IF HTML NE 'EXL2K' THEN GOTO SKIP_ACBR;
-SKIP_ACBR
-*-IF HTML NE 'EXL2K' THEN GOTO SKIP_STYL;
-SKIP_STYL
ENDSTYLE
END