Focal Point
How to create column-groups/split-columns/sub-columns ?

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

January 02, 2006, 07:19 PM
Govind Jujare
How to create column-groups/split-columns/sub-columns ?
Is there a way to visually group related columns into column-groups ? For ex., I want to group 'DealerCost' and 'RetailCost' under a common column heading as 'SalesStatistics'. I have not shown borders of the table below, but I want to have them in my final report.

CAR        SalesStatistics           Measurements       
         DealerCost RetailCost       Height Width

This message has been edited. Last edited by: Govind Jujare,


WebFOCUS 5.3.3 MRE - Solaris - Sun Web Server - Weblogic
January 02, 2006, 07:57 PM
susannah
-SET &HEAD='<+0> (empty) <+0> SALES STATS<+0> MEASUREMENTS<+0> GROUP3 ';
TABLE FILE xxx
HEADING
&HEAD
...
ON TABLE SET STYLE *
TYPE=HEADING,HEADALIGN=BODY,$
then..
TYPE=HEADING,LINE=1,ITEM=1,COLSPAN=2,
BACKCOLOR= whatever ,$
TYPE=HEADING,LINE=1,ITEM=2, COLSPAN=2,STYLE=BOLD,JUSTIFY=CENTER,COLOR=RED,$
TYPE=HEADING,LINE=1,ITEM=3,COLSPAN=2,STYLE=BOLD, JUSTIFY=CENTER,COLOR=BLUE,$
TYPE=HEADING,LINE=1,ITEM=4, COLSPAN=3,STYLE=BOLD,JUSTIFY=CENTER,COLOR=TEAL,$
the key is headalign=body, then colspan=some multiple column count on that first heading title row, I make my heading title as an & var, you might be ok just putting this directly in the first line of your heading.
ok?

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




In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID
January 04, 2006, 02:27 AM
Govind Jujare
Thx, Susannah, that worked nice.

BTW, if I select the format as 'HTML' and select a 'LIGHT' border (with grid off), the heading goes away far off from the table. Any idea how to make it work with these settings ? I liked the nice border that I used to get with HTML format and LIGHT border. My code is as shown below.

TABLE FILE CAR
SUM 
     DEALER_COST
     RETAIL_COST
     LENGTH
     WIDTH
     HEIGHT
BY 
     CAR
HEADING
" <+0>SALES STATS<+0>MEASUREMENTS"
ON TABLE SET PAGE-NUM NOLEAD 
ON TABLE NOTOTAL
ON TABLE SET ONLINE-FMT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     PAGESIZE='Letter',
     LEFTMARGIN=0.250000,
     RIGHTMARGIN=0.250000,
     TOPMARGIN=0.250000,
     BOTTOMMARGIN=0.250000,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
     BORDER=LIGHT,
     FONT='ARIAL',
     SIZE=9,
     COLOR='BLACK',
     BACKCOLOR='NONE',
     STYLE=NORMAL,
     RIGHTGAP=0.125000,
$
TYPE=DATA,
     BACKCOLOR=( BY=B1 RGB(240 240 255) RGB(220 230 255) ),
$
TYPE=TITLE,
     COLOR='WHITE',
     BACKCOLOR=RGB(0 128 192),
     STYLE=BOLD,
$
TYPE=HEADING,
     COLOR='WHITE',
     BACKCOLOR=RGB(0 128 192),
     STYLE=BOLD,
     JUSTIFY=CENTER,
     HEADALIGN=BODY,
$
TYPE=HEADING,
     LINE=1,
     ITEM=1,
     COLSPAN=1,
$
TYPE=HEADING,
     LINE=1,
     ITEM=2,
     COLSPAN=2,
$
TYPE=HEADING,
     LINE=1,
     ITEM=3,
     COLSPAN=3,
$
ENDSTYLE
END



WebFOCUS 5.3.3 MRE - Solaris - Sun Web Server - Weblogic
February 23, 2006, 08:56 PM
Nailzz
Hi all. I did a search to try and find if someone else was having the same problem as I or at least close to it. Govind Jujare problem is similar to mine since I am also using Webfocus 5.3.3, but not exactly. I have a report that returns in a Grid format. Based on whether one column is greater than the next it changes to a particular color indicating if it is good or bad. My problems is if the column in the middle isn't there then it throughs this off. How can I get columns (6) to appear even if it returns no data. Someone suggested I do a print parameter that when there is no data it prints something and when there is data make a noprint parameter. Not sure how to do that either. Does anyone have suggestions or code? Here is part of my code. I only need the fields 6 to appear when there is data up to a certain point but then the title appear with blank data so the "triggers" work.
TABLE FILE GRID
PRINT
CCARE/A40 AS 'Element'
MS10 NOPRINT
PCT1/D15S% AS 'Q1'
PCT2/D15S% AS 'Q2'
PCT3/D15S% AS 'Q3'
PCT4/D15S% AS 'Q4'
NUM5/I8S AS 'Q,N'
DEN5/I8S AS 'Q,D'
PCT5/D15S% AS 'Rate'
NUM6/I8S AS 'Current,N'
DEN6/I8S AS ',D'
PCT6/D15S% AS 'Current,Rate'
BMJCAHOTOP/D15S% AS '90th,Pctile'
BMJCAHOAVG/D15S% AS 'Avg,%'
BMGREEN/D15S% AS 'Top ,10%'
BMYELLOW/D15S AS 'Avg.'
BY
DEPARTMENT NOPRINT
BY
CONDITION AS 'Condition'
BY
ORDER NOPRINT
ON DEPARTMENT PAGE-BREAK
ON CONDITION SKIP-LINE
HEADING
"Performance Grid"
"Last Complete Quarter: 2005<+0> ................................................. <+0>(Quarter to-date thru <+0>&DATEMDYY <+0>)"
ON TABLE NOTOTAL
ON TABLE SET ONLINE-FMT PDF
ON TABLE SET STYLE *
UNITS=IN,
PAGESIZE='Legal',
LEFTMARGIN=0.500000,
RIGHTMARGIN=0.500000,
TOPMARGIN=0.500000,
BOTTOMMARGIN=0.500000,
SQUEEZE=ON,
ORIENTATION=LANDSCAPE,
$
DEFMACRO=PCT5YELLOW,
MACTYPE=RULE,
RIGHTGAP=0.125000,
WHEN=N12 GT N16,
$
DEFMACRO=PCT5GREEN,
MACTYPE=RULE,
RIGHTGAP=0.125000,
WHEN=N12 GE N16,
$
DEFMACRO=PCT4YELLOW,
MACTYPE=RULE,
RIGHTGAP=0.125000,
WHEN=N9 GE N17,
$
DEFMACRO=PCT4GREEN,
MACTYPE=RULE,
RIGHTGAP=0.125000,
WHEN=N9 GE N16,
$
DEFMACRO=CMS,
MACTYPE=RULE,
RIGHTGAP=0.125000,
WHEN=N5 EQ 'CMS10',
$
DEFMACRO=PCT6YELLOW,
MACTYPE=RULE,
RIGHTGAP=0.125000,
WHEN=N15 GT N16,
$
DEFMACRO=COND0001,
MACTYPE=RULE,
RIGHTGAP=0.125000,
WHEN=N15 GE N16,
$
TYPE=REPORT,
FONT='TIMES NEW ROMAN',
SIZE=10,
COLOR='BLACK',
BACKCOLOR='NONE',
STYLE=NORMAL,
RIGHTGAP=0.125000,
$
TYPE=DATA,
SIZE=9,
BACKCOLOR=( 'WHITE' RGB(235 235 224) ),
$
TYPE=DATA,
COLUMN=N4,
GRID=ON,
$
TYPE=DATA,
COLUMN=N4,
COLOR=RGB(0 0 160),
BACKCOLOR=RGB(118 223 254),
STYLE=BOLD,
MACRO=CMS,
$
TYPE=DATA,
COLUMN=N12,
GRID=ON,
$
TYPE=DATA,
COLUMN=N12,
BACKCOLOR=RGB(55 208 132),
MACRO=PCT5GREEN,
$
TYPE=DATA,
COLUMN=N12,
BACKCOLOR=RGB(255 255 128),
MACRO=PCT5YELLOW,
$
TYPE=DATA,
COLUMN=N11,
GRID=ON,
$
TYPE=DATA,
COLUMN=N10,
GRID=ON,
$
TYPE=DATA,
COLUMN=N9,
GRID=ON,
$
TYPE=DATA,
COLUMN=N9,
BACKCOLOR=RGB(55 208 132),
MACRO=PCT4GREEN,
$
TYPE=DATA,
COLUMN=N9,
BACKCOLOR=RGB(255 255 128),
MACRO=PCT4YELLOW,
$
TYPE=DATA,
COLUMN=N8,
GRID=ON,
$
TYPE=DATA,
COLUMN=N7,
GRID=ON,
$
TYPE=DATA,
COLUMN=N6,
GRID=ON,
$
TYPE=DATA,
COLUMN=N13,
GRID=ON,
$
TYPE=DATA,
COLUMN=N14,
GRID=ON,
$
TYPE=DATA,
COLUMN=N15,
GRID=ON,
$
TYPE=DATA,
COLUMN=N16,
GRID=ON,
$
TYPE=DATA,
COLUMN=N5,
COLOR=RGB(0 0 160),
BACKCOLOR=RGB(118 223 254),
STYLE=BOLD,
MACRO=CMS,
$
TYPE=TITLE,
BACKCOLOR=RGB(244 241 234),
$
TYPE=TITLE,
COLUMN=N13,
SIZE=8,
BACKCOLOR=RGB(244 241 234),
$
TYPE=TITLE,
COLUMN=N14,
SIZE=8,
BACKCOLOR=RGB(244 241 234),
$
TYPE=TITLE,
COLUMN=N15,
SIZE=8,
BACKCOLOR=RGB(244 241 234),
$
TYPE=TITLE,
COLUMN=N16,
SIZE=8,
BACKCOLOR='LIME',
$
TYPE=TITLE,
COLUMN=N5,
COLOR=RGB(0 0 160),
STYLE=BOLD,
$
TYPE=TITLE,
COLUMN=N19,
BACKCOLOR=RGB(118 223 254),
$
TYPE=TITLE,
COLUMN=N18,
BACKCOLOR=RGB(118 223 254),
$
TYPE=TITLE,
COLUMN=N17,
BACKCOLOR='LIME',
$
TYPE=TABHEADING,
SIZE=12,
COLOR='BLUE',
STYLE=BOLD,
$
TYPE=HEADING,
SIZE=12,
COLOR='TEAL',
STYLE=BOLD,
$
TYPE=HEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
STYLE=-UNDERLINE,
$
TYPE=HEADING,
LINE=2,
OBJECT=TEXT,
ITEM=1,
STYLE=-UNDERLINE,
$
TYPE=HEADING,
LINE=2,
OBJECT=TEXT,
ITEM=2,
STYLE=-UNDERLINE,
$
TYPE=HEADING,
LINE=2,
OBJECT=FIELD,
ITEM=1,
STYLE=-UNDERLINE,
$
TYPE=HEADING,
LINE=3,
OBJECT=TEXT,
ITEM=1,
STYLE=-UNDERLINE,
$
TYPE=HEADING,
LINE=3,
OBJECT=TEXT,
ITEM=2,
STYLE=NORMAL,
$
TYPE=HEADING,
LINE=3,
OBJECT=TEXT,
ITEM=3,
SIZE=8,
STYLE=NORMAL,
$
TYPE=HEADING,
LINE=3,
OBJECT=TEXT,
ITEM=4,
SIZE=8,
STYLE=NORMAL,
$
TYPE=HEADING,
LINE=3,
OBJECT=TEXT,
ITEM=5,
SIZE=8,
STYLE=NORMAL,
$
ENDSTYLE
END


WebFOCUS 7.1.3 on Win 2000