[SOLVED]make extra line under titles white instead of the color of the column titles?

September 29, 2008, 12:54 PM

Is it possible to make the line under the column titles white instead of the color of the title? It would provide better separation of the titles with the data. Please run the fex to understand what I am looking for.

-* File car_format.fex
APP PATH IBISAMP
DEFINE FILE CAR
DUMY1/A3=' ';
END
TABLE FILE CAR
PRINT
DUMY1 AS ''
BODYTYPE AS 'Body Type'
DEALER_COST AS 'Dealer Cost'
RETAIL_COST AS 'Retail Cost'
SALES AS '# Sold'
BY COUNTRY NOPRINT
BY CAR NOPRINT
BY MODEL NOPRINT
BY BODYTYPE NOPRINT

ON COUNTRY SUBHEAD
"<0>ON COUNTRY SUBFOOT
"Total " "
ON COUNTRY NOSPLIT

ON CAR SUBHEAD
"<2>
ON MODEL SUBHEAD
"<3>HEADING
"<0>Country"
"<2>Maker"
"<3>Model"
ON TABLE SET PAGE NOPAGE
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=LANDSCAPE,
$
TYPE=REPORT, GRID=OFF, FONT='ARIAL', SIZE=10, LEFTGAP=0.000000,$

TYPE=TITLE, BACKCOLOR=RGB(153 153 153), JUSTIFY=RIGHT, STYLE=-UNDERLINE+BOLD, $

TYPE=DATA, GRID=OFF, BACKCOLOR='NONE',$
TYPE=HEADING, BACKCOLOR=RGB(153 153 153),$

TYPE=SUBHEAD, BACKCOLOR='SILVER',$

TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=TEXT, ITEM=1, BACKCOLOR=RGB(153 153 153), POSITION=0, $
TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=FIELD, ITEM=1, BACKCOLOR=RGB(153 153 153), POSITION=0.6, $
TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=FIELD, ITEM=2, BACKCOLOR=RGB(153 153 153), POSITION='N7', JUSTIFY=RIGHT, $
TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=FIELD, ITEM=3, BACKCOLOR=RGB(153 153 153), POSITION='N8',JUSTIFY=RIGHT, $
TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=FIELD, ITEM=4, BACKCOLOR=RGB(153 153 153), POSITION='N9', JUSTIFY=RIGHT, $

TYPE=REPORT, COLUMN=N9,WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT, COLUMN=N5,WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT,COLUMN=N6, WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT, COLUMN=N7,WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT,COLUMN=N8,WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT, COLUMN=N10,WRAP=1.250000, JUSTIFY=RIGHT,$
ENDSTYLE
END

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

September 29, 2008, 01:26 PM

Francis Mariani

I think that line under the column-title line isn't really a line - it is not addressable in a style-sheet declaration. It's there due to some WebFOCUS idiosyncrasy.

Here's one solution, though I'm not completely satisfied with the look. Perhaps one of the PDF gurus can help...

-* File car_format.fex
APP PATH IBISAMP
DEFINE FILE CAR
DUMY1/A3=' ';
END
TABLE FILE CAR
PRINT
DUMY1 AS ''
BODYTYPE AS 'Body Type'
DEALER_COST AS 'Dealer Cost'
RETAIL_COST AS 'Retail Cost'
SALES AS '# Sold'
BY COUNTRY NOPRINT
BY CAR NOPRINT
BY MODEL NOPRINT
BY BODYTYPE NOPRINT

ON COUNTRY SUBHEAD
"<0>
ON COUNTRY SUBFOOT
"Total
" "
ON COUNTRY NOSPLIT

ON CAR SUBHEAD
"<2>

ON MODEL SUBHEAD
"<3>
HEADING
"<0>Country"
"<2>Maker"
"<3>Model"
ON TABLE SET PAGE NOPAGE
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=LANDSCAPE,
$
TYPE=REPORT, GRID=OFF, FONT='ARIAL', SIZE=10, LEFTGAP=0.000000,$

TYPE=TITLE, BACKCOLOR=RGB(153 153 153), JUSTIFY=RIGHT, STYLE=-UNDERLINE+BOLD,
 BORDER-BOTTOM=5, BORDER-BOTTOM-COLOR=WHITE, BOTTOMGAP=0.1, $

TYPE=DATA, GRID=OFF, BACKCOLOR='NONE',$
TYPE=HEADING, BACKCOLOR=RGB(153 153 153),$

TYPE=SUBHEAD, BACKCOLOR='SILVER',$

TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=TEXT, ITEM=1, BACKCOLOR=RGB(153 153 153), POSITION=0, $
TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=FIELD, ITEM=1, BACKCOLOR=RGB(153 153 153), POSITION=0.6, $
TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=FIELD, ITEM=2, BACKCOLOR=RGB(153 153 153), POSITION='N7', JUSTIFY=RIGHT, $
TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=FIELD, ITEM=3, BACKCOLOR=RGB(153 153 153), POSITION='N8',JUSTIFY=RIGHT, $
TYPE=SUBFOOT, BY=1, LINE=1, OBJECT=FIELD, ITEM=4, BACKCOLOR=RGB(153 153 153), POSITION='N9', JUSTIFY=RIGHT, $

TYPE=REPORT, COLUMN=N9,WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT, COLUMN=N5,WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT,COLUMN=N6, WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT, COLUMN=N7,WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT,COLUMN=N8,WRAP=1.250000, JUSTIFY=RIGHT,$
TYPE=REPORT, COLUMN=N10,WRAP=1.250000, JUSTIFY=RIGHT,$
ENDSTYLE
END

The BORDER-BOTTOM=5, BORDER-BOTTOM-COLOR=WHITE, sets up the colour and height of the BORDER and BOTTOMGAP=0.1 adds space to the bottom of the column-titles or they would get cut off. As far as I can tell, adding BORDER-BOTTOM suppresses the unwanted extra line.

This message has been edited. Last edited by: Francis Mariani,