Hello all. Let me first state that I've done lots of searching on this topic but have yet to find a solution that works in my version of Webfocus.

I have the following code which produces a report that has 5 lines of header before the title and data. I would like to eliminate the gap between the last header line and the title data below it.

Any help you can provide would be much appreciated!

-DEFAULTH &WF_FMT = 'HTML'
SET DROPBLNKLINE=ON
-SET &FileTitle = 'Executive Shrink Recap - ' | FINYRPOSTED | ' ' | 'WK'| FINWKPOSTED ;

DEFINE FILE EBRRPT_RPT_MONDAY_EXECUTIVE_RECAP_TBL
LOADDAY/A2=SUBSTR(11,EDIT(RUNDATE),10,11,2,LOADDAY);
LOADMONTH/A2=SUBSTR(11,EDIT(RUNDATE),8,9,2,LOADMONTH);
LOADYEAR/A4=SUBSTR(11,EDIT(RUNDATE),4,7,4,LOADYEAR);
RUNDATE/A10=LOADMONTH || '/' || LOADDAY || '/' || LOADYEAR;
FY_BEGIN_M/M =FY_BEGIN;
FY_BEGIN_D/D =FY_BEGIN;
FY_BEGIN_DATE/A13= TRIM('L',EDIT(FY_BEGIN_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(FY_BEGIN_D),11,'0',1,'A6');
FY_END_M/M =RPTEND;
FY_END_D/D =RPTEND;
FY_END_DATE/A13 = TRIM('L',EDIT(FY_END_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(FY_END_D),11,'0',1,'A6');
FYRDATERANGE/A30 = FY_BEGIN_DATE | ' to ' | FY_END_DATE;
QTR_BEGIN_M/M =QTR_BEGIN;
QTR_BEGIN_D/D =QTR_BEGIN;
QTR_BEGIN_DATE/A13= TRIM('L',EDIT(QTR_BEGIN_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(QTR_BEGIN_D),11,'0',1,'A6');
QTR_END_M/M =RPTEND;
QTR_END_D/D =RPTEND;
QTR_END_DATE/A13 = TRIM('L',EDIT(QTR_END_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(QTR_END_D),11,'0',1,'A6');
QTRDATERANGE/A30 = QTR_BEGIN_DATE | ' to ' | QTR_END_DATE;
PD_BEGIN_M/M =PD_BEGIN;
PD_BEGIN_D/D =PD_BEGIN;
PD_BEGIN_DATE/A13= TRIM('L',EDIT(PD_BEGIN_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(PD_BEGIN_D),11,'0',1,'A6');
PD_END_M/M =RPTEND;
PD_END_D/D =RPTEND;
PD_END_DATE/A13 = TRIM('L',EDIT(PD_END_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(PD_END_D),11,'0',1,'A6');
PDDATERANGE/A30 = PD_BEGIN_DATE | ' to ' | PD_END_DATE;
WK_BEGIN_M/M =WK_BEGIN;
WK_BEGIN_D/D =WK_BEGIN;
WK_BEGIN_DATE/A13= TRIM('L',EDIT(WK_BEGIN_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(WK_BEGIN_D),11,'0',1,'A6');
WK_END_M/M =RPTEND;
WK_END_D/D =RPTEND;
WK_END_DATE/A13 = TRIM('L',EDIT(WK_END_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(WK_END_D),11,'0',1,'A6');
WKDATERANGE/A30 = WK_BEGIN_DATE | ' to ' | WK_END_DATE;
DIVLABEL/A20 = IF SDIV EQ 99 THEN 'Company' ELSE 'Division ' | TRIM('L',EDIT(SDIV),11,'0',1,'A11');
YTDTYRATE/D7.2%=YTDTYRATE * 100;
YTDLYRATE/D7.2%=YTDLYRATE * 100;
QTDTYRATE/D7.2%=QTDTYRATE * 100;
QTDLYRATE/D7.2%=QTDLYRATE * 100;
PTDTYRATE/D7.2%=PTDTYRATE * 100;
PTDLYRATE/D7.2%=PTDLYRATE * 100;
WTDTYRATE/D7.2%=WTDTYRATE * 100;
WTDLYRATE/D7.2%=WTDLYRATE * 100;
ytdlabel/A3='YTD';
qtdlabel/A22='QTD - Financial Qtr '| TRIM('L',EDIT(FINQTRPOSTED),11,'0',1,'A2');
ptdlabel/A22='PTD - Financial Pd '| TRIM('L',EDIT(FINPDPOSTED),11,'0',1,'A2');
wtdlabel/A22='WTD - Financial Wk '| TRIM('L',EDIT(FINWKPOSTED),11,'0',1,'A2');
tylylabel/A28= 'Reconciled Results TY vs LY';
asofdatelabel/A24= 'Results as of ' | RUNDATE;


END

TABLE FILE EBRRPT_RPT_MONDAY_EXECUTIVE_RECAP_TBL
HEADING CENTER
"<+0> <+0>Executive Shrink Recap"
"<+0> <+0><asofdatelabel"
"<+0>Reconciled Results TY vs LY"
"<+0> <+0><ytdlabel<+0><qtdlabel<+0><ptdlabel<+0><wtdlabel"
"<+0> <+0><FYRDATERANGE<+0><QTRDATERANGE<+0><PDDATERANGE<+0><WKDATERANGE"



PRINT
DIVLABEL AS ''
YTDSCNT AS 'Store,Count'
YTDTYRATE AS ' ,TY Rate'
YTDLYRATE AS ' ,LY Rate'
YTDVAR/D10 AS ' ,Var'
QTDSCNT AS 'Store,Count'
QTDTYRATE AS ' ,TY Rate'
QTDLYRATE AS ' ,LY Rate'
QTDVAR/D10 AS ' ,Var'
PTDSCNT AS 'Store,Count'
PTDTYRATE AS ' ,TY Rate'
PTDLYRATE AS ' ,LY Rate'
PTDVAR/D10 AS ' ,Var'
WTDSCNT AS 'Store,Count'
WTDTYRATE AS ' ,TY Rate'
WTDLYRATE AS ' ,LY Rate'
WTDVAR/D10 AS ' ,Var'

WHERE SDIV EQ 99;

ON TABLE SET PAGE NOLEAD
ON TABLE SET PAGE OFF
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET DROPBLNKLINE ON
ON TABLE SET HTMLCSS ON
ON TABLE SET UNITS INCHES
ON TABLE SET STYLE *

-GOTO STYLE_&WF_FMT
-STYLE_HTML
HEADALIGN=BODY, FONT='Calibri', SIZE=12, COLOR=BLACK, GRID=OFF, $
-*TYPE=REPORT, LEFTGAP=.1, RIGHTGAP=.1, TOPGAP=0.02, BOTTOMGAP=0.02, $
-*TYPE=REPORT, SQUEEZE=ON,$
TYPE=HEADING, LINE=1, OBJECT=TEXT, ITEM=1, COLSPAN=1, BACKCOLOR=WHITE, $
TYPE=HEADING, LINE=1, OBJECT=TEXT, ITEM=2, JUSTIFY=CENTER, SIZE=20, COLSPAN=16, STYLE=BOLD,  $

TYPE=HEADING, LINE=2, OBJECT=TEXT, ITEM=1, COLSPAN=1, BACKCOLOR=WHITE, $
TYPE=HEADING, LINE=2, OBJECT=FIELD, ITEM=1, JUSTIFY=CENTER, SIZE=16, COLSPAN=16, STYLE=BOLD+ITALIC,  $

TYPE=HEADING, LINE=3, BACKCOLOR=WHITE, STYLE=BOLD, JUSTIFY=LEFT, $
TYPE=HEADING, LINE=3, OBJECT=TEXT, ITEM=1, COLSPAN=3, BACKCOLOR=WHITE, $

TYPE=HEADING, LINE=4, BACKCOLOR=RGB(22 54 92), BORDER-COLOR=RGB(22 54 92), STYLE=BOLD, COLOR=WHITE, JUSTIFY=CENTER, $
TYPE=HEADING, LINE=4, OBJECT=TEXT, ITEM=1, COLSPAN=1, BACKCOLOR=WHITE, $
TYPE=HEADING, LINE=4, OBJECT=FIELD, ITEM=1, COLSPAN=4, $
TYPE=HEADING, LINE=4, OBJECT=FIELD, ITEM=2, COLSPAN=4, $
TYPE=HEADING, LINE=4, OBJECT=FIELD, ITEM=3, COLSPAN=4, $
TYPE=HEADING, LINE=4, OBJECT=FIELD, ITEM=4, COLSPAN=4, $

TYPE=HEADING, LINE=5, BACKCOLOR=RGB(22 54 92), BORDER-COLOR=RGB(22 54 92), STYLE=BOLD, COLOR=WHITE, JUSTIFY=CENTER, $
TYPE=HEADING, LINE=5, OBJECT=TEXT, ITEM=1, COLSPAN=1, BACKCOLOR=WHITE, $
TYPE=HEADING, LINE=5, OBJECT=FIELD, ITEM=1, COLSPAN=4, $
TYPE=HEADING, LINE=5, OBJECT=FIELD, ITEM=2, COLSPAN=4, $
TYPE=HEADING, LINE=5, OBJECT=FIELD, ITEM=3, COLSPAN=4, $
TYPE=HEADING, LINE=5, OBJECT=FIELD, ITEM=4, COLSPAN=4, $

TYPE=TITLE, COLOR=BLACK, BACKCOLOR= RGB(184 204 228), STYLE=-UNDERLINE+BOLD, JUSTIFY=CENTER, SIZE=10, $
TYPE=TITLE, COLUMN=DIVLABEL, BACKCOLOR=WHITE, $
TYPE=TITLE, COLUMN=YTDSCNT, BORDER-LEFT=LIGHT, $
TYPE=TITLE, COLUMN=YTDVAR, BORDER-RIGHT=LIGHT, $
TYPE=TITLE, COLUMN=QTDVAR, BORDER-RIGHT=LIGHT, $
TYPE=TITLE, COLUMN=PTDVAR, BORDER-RIGHT=LIGHT, $
TYPE=TITLE, COLUMN=WTDVAR, BORDER-RIGHT=LIGHT, $

TYPE=DATA, BACKCOLOR=WHITE, JUSTIFY=CENTER, STYLE=NORMAL, BORDER-BOTTOM=LIGHT, $
TYPE=DATA, COLUMN=DIVLABEL, BORDER-BOTTOM=OFF, STYLE=BOLD, JUSTIFY=RIGHT, $
TYPE=DATA, COLUMN=YTDSCNT, BORDER-LEFT=LIGHT, $
TYPE=DATA, COLUMN=YTDVAR, BORDER-RIGHT=LIGHT, $
TYPE=DATA, COLUMN=QTDVAR, BORDER-RIGHT=LIGHT, $
TYPE=DATA, COLUMN=PTDVAR, BORDER-RIGHT=LIGHT, $
TYPE=DATA, COLUMN=WTDVAR, BORDER-RIGHT=LIGHT, $

-GOTO STYLE_DONE



-STYLE_PDF
-*PDF STYLING GOES IN THIS SECTION



-GOTO STYLE_DONE


-STYLE_DONE
ENDSTYLE
END
-RUN



  

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

what happens when you replace ON TABLE SET DROPBLNKLINE OFF with ON TABLE SET DROPBLNKLINE ALL ?

The DROPBLNKLINE parameter suppresses blank lines around subtotals, subheadings, and subfootings when formatting a report for output. In addition, certain data lines may be blank and appear as blank lines on the report output. You can eliminate these blank lines from the report output using the SET DROPBLNKLINE=ON command.

This setting does not apply to the following output formats: HOLD/PCHOLD/SAVE formats, ALPHA, INTERNAL, BINARY, COM, COMT, COMMA, TAB, TABT, FIX, DFIX, all DBMS, VSAM, LOTUS, SYLK, DIF, FOCUS, and XFOCUS.

The syntax is:
SET DROPBLNKLINE = {OFF|ON|BODY|HEADING|ALL}

where:
OFF - Inserts system-generated blank lines as well as empty data lines. OFF is the default value.
ON|BODY - Removes system-generated blank lines within the body of the report, for example, before and after subheads. In addition, certain data lines that may be blank and appear as blank lines on the report output will be removed from the output. BODY is a synonym for ON.
HEADING - Removes the blank lines between headings and titles and between the report body and the footing. Works in positioned formats (PDF, PS, DHTML, PPT) when a request has a border or backcolor StyleSheet attribute anywhere in the report.
ALL - Provides both the ON and HEADING behaviors

by Francis
http://forums.informationbuild...1057331/m/9547004076

quote:

Originally posted by tomatosauce:
what happens when you replace ON TABLE SET DROPBLNKLINE OFF with ON TABLE SET DROPBLNKLINE ALL ?

Nothing happens

quote:

Originally posted by tomatosauce:

The syntax is:
SET DROPBLNKLINE = {OFF|ON|BODY|HEADING|ALL}

where:
OFF - Inserts system-generated blank lines as well as empty data lines. OFF is the default value.
ON|BODY - Removes system-generated blank lines within the body of the report, for example, before and after subheads. In addition, certain data lines that may be blank and appear as blank lines on the report output will be removed from the output. BODY is a synonym for ON.
HEADING - Removes the blank lines between headings and titles and between the report body and the footing. Works in positioned formats (PDF, PS, DHTML, PPT) when a request has a border or backcolor StyleSheet attribute anywhere in the report.
ALL - Provides both the ON and HEADING behaviors

by Francis
http://forums.informationbuild...1057331/m/9547004076

I have done SET DROPBLNKLINE for each of the options above to no effect. I've seen this post before in my research.

Also, if you post code, please use the code tags.

It make the code readable and stops some of the code disappearing.

quote:

Originally posted by Waz:
Also, if you post code, please use the code tags.

It make the code readable and stops some of the code disappearing.

Sorry, I used the tags but deleted part of the tag by accident. It has been corrected.

The SET DROPBLNKLINE doesn't bite on HEADING when you have different border styles between the heading and the column titles or the data and the footing.

quote:

Originally posted by Hank W.:
The SET DROPBLNKLINE doesn't bite on HEADING when you have different border styles between the heading and the column titles or the data and the footing.

Do you mean strictly between the last heading and the top of the titles? I removed any border styling there and it didn't remove the gap. Or are you saying you cannot use borders at all?

quote:

Originally posted by Hank W.:
The SET DROPBLNKLINE doesn't bite on HEADING when you have different border styles between the heading and the column titles or the data and the footing.

So, I went through and removed all border styling from my report and it indeed removed the gap between the header and the title line. However now I have white grid lines between all my header, title and data columns. Solved one problem and introduced another. :-)

Hi Manglum

Please re-post your most current code.

Thanks,

Chuck, The code posted above contains the border formatting and the code below contains no border formatting.

-DEFAULTH &WF_FMT = 'HTML'
SET DROPBLNKLINE=ON
-SET &FileTitle = 'Executive Shrink Recap - ' | FINYRPOSTED | ' ' | 'WK'| FINWKPOSTED ;

DEFINE FILE EBRRPT_RPT_MONDAY_EXECUTIVE_RECAP_TBL
LOADDAY/A2=SUBSTR(11,EDIT(RUNDATE),10,11,2,LOADDAY);
LOADMONTH/A2=SUBSTR(11,EDIT(RUNDATE),8,9,2,LOADMONTH);
LOADYEAR/A4=SUBSTR(11,EDIT(RUNDATE),4,7,4,LOADYEAR);
RUNDATE/A10=LOADMONTH || '/' || LOADDAY || '/' || LOADYEAR;
FY_BEGIN_M/M =FY_BEGIN;
FY_BEGIN_D/D =FY_BEGIN;
FY_BEGIN_DATE/A13= TRIM('L',EDIT(FY_BEGIN_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(FY_BEGIN_D),11,'0',1,'A6');
FY_END_M/M =RPTEND;
FY_END_D/D =RPTEND;
FY_END_DATE/A13 = TRIM('L',EDIT(FY_END_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(FY_END_D),11,'0',1,'A6');
FYRDATERANGE/A30 = FY_BEGIN_DATE | ' to ' | FY_END_DATE;
QTR_BEGIN_M/M =QTR_BEGIN;
QTR_BEGIN_D/D =QTR_BEGIN;
QTR_BEGIN_DATE/A13= TRIM('L',EDIT(QTR_BEGIN_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(QTR_BEGIN_D),11,'0',1,'A6');
QTR_END_M/M =RPTEND;
QTR_END_D/D =RPTEND;
QTR_END_DATE/A13 = TRIM('L',EDIT(QTR_END_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(QTR_END_D),11,'0',1,'A6');
QTRDATERANGE/A30 = QTR_BEGIN_DATE | ' to ' | QTR_END_DATE;
PD_BEGIN_M/M =PD_BEGIN;
PD_BEGIN_D/D =PD_BEGIN;
PD_BEGIN_DATE/A13= TRIM('L',EDIT(PD_BEGIN_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(PD_BEGIN_D),11,'0',1,'A6');
PD_END_M/M =RPTEND;
PD_END_D/D =RPTEND;
PD_END_DATE/A13 = TRIM('L',EDIT(PD_END_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(PD_END_D),11,'0',1,'A6');
PDDATERANGE/A30 = PD_BEGIN_DATE | ' to ' | PD_END_DATE;
WK_BEGIN_M/M =WK_BEGIN;
WK_BEGIN_D/D =WK_BEGIN;
WK_BEGIN_DATE/A13= TRIM('L',EDIT(WK_BEGIN_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(WK_BEGIN_D),11,'0',1,'A6');
WK_END_M/M =RPTEND;
WK_END_D/D =RPTEND;
WK_END_DATE/A13 = TRIM('L',EDIT(WK_END_M),11,'0',1,'A6') || '/' || TRIM('L',EDIT(WK_END_D),11,'0',1,'A6');
WKDATERANGE/A30 = WK_BEGIN_DATE | ' to ' | WK_END_DATE;
DIVLABEL/A20 = IF SDIV EQ 99 THEN 'Company' ELSE 'Division ' | TRIM('L',EDIT(SDIV),11,'0',1,'A11');
YTDTYRATE/D7.2%=YTDTYRATE * 100;
YTDLYRATE/D7.2%=YTDLYRATE * 100;
QTDTYRATE/D7.2%=QTDTYRATE * 100;
QTDLYRATE/D7.2%=QTDLYRATE * 100;
PTDTYRATE/D7.2%=PTDTYRATE * 100;
PTDLYRATE/D7.2%=PTDLYRATE * 100;
WTDTYRATE/D7.2%=WTDTYRATE * 100;
WTDLYRATE/D7.2%=WTDLYRATE * 100;
ytdlabel/A3='YTD';
qtdlabel/A22='QTD - Financial Qtr '| TRIM('L',EDIT(FINQTRPOSTED),11,'0',1,'A2');
ptdlabel/A22='PTD - Financial Pd '| TRIM('L',EDIT(FINPDPOSTED),11,'0',1,'A2');
wtdlabel/A22='WTD - Financial Wk '| TRIM('L',EDIT(FINWKPOSTED),11,'0',1,'A2');
tylylabel/A28= 'Reconciled Results TY vs LY';
asofdatelabel/A24= 'Results as of ' | RUNDATE;


END

TABLE FILE EBRRPT_RPT_MONDAY_EXECUTIVE_RECAP_TBL
HEADING CENTER
"<+0> <+0>Executive Shrink Recap"
"<+0> <+0><asofdatelabel"
"<+0>Reconciled Results TY vs LY"
"<+0> <+0><ytdlabel<+0><qtdlabel<+0><ptdlabel<+0><wtdlabel"
"<+0> <+0><FYRDATERANGE<+0><QTRDATERANGE<+0><PDDATERANGE<+0><WKDATERANGE"



PRINT
DIVLABEL AS ''
YTDSCNT AS 'Store,Count'
YTDTYRATE AS ' ,TY Rate'
YTDLYRATE AS ' ,LY Rate'
YTDVAR/D10 AS ' ,Var'
QTDSCNT AS 'Store,Count'
QTDTYRATE AS ' ,TY Rate'
QTDLYRATE AS ' ,LY Rate'
QTDVAR/D10 AS ' ,Var'
PTDSCNT AS 'Store,Count'
PTDTYRATE AS ' ,TY Rate'
PTDLYRATE AS ' ,LY Rate'
PTDVAR/D10 AS ' ,Var'
WTDSCNT AS 'Store,Count'
WTDTYRATE AS ' ,TY Rate'
WTDLYRATE AS ' ,LY Rate'
WTDVAR/D10 AS ' ,Var'

WHERE SDIV EQ 99;

ON TABLE SET PAGE NOLEAD
ON TABLE SET PAGE OFF
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET DROPBLNKLINE ON
ON TABLE SET HTMLCSS ON
ON TABLE SET UNITS INCHES
ON TABLE SET STYLE *

-GOTO STYLE_&WF_FMT
-STYLE_HTML
HEADALIGN=BODY, FONT='Calibri', SIZE=12, COLOR=BLACK, GRID=OFF, $
-*TYPE=REPORT, LEFTGAP=.1, RIGHTGAP=.1, TOPGAP=0.02, BOTTOMGAP=0.02, $
-*TYPE=REPORT, SQUEEZE=ON,$
TYPE=HEADING, LINE=1, OBJECT=TEXT, ITEM=1, COLSPAN=1, BACKCOLOR=WHITE, $
TYPE=HEADING, LINE=1, OBJECT=TEXT, ITEM=2, JUSTIFY=CENTER, SIZE=20, COLSPAN=16, STYLE=BOLD,  $

TYPE=HEADING, LINE=2, OBJECT=TEXT, ITEM=1, COLSPAN=1, BACKCOLOR=WHITE, $
TYPE=HEADING, LINE=2, OBJECT=FIELD, ITEM=1, JUSTIFY=CENTER, SIZE=16, COLSPAN=16, STYLE=BOLD+ITALIC,  $

TYPE=HEADING, LINE=3, BACKCOLOR=WHITE, STYLE=BOLD, JUSTIFY=LEFT, $
TYPE=HEADING, LINE=3, OBJECT=TEXT, ITEM=1, COLSPAN=3, BACKCOLOR=WHITE, $

TYPE=HEADING, LINE=4,  STYLE=BOLD, BACKCOLOR=RGB(22 54 92), COLOR=WHITE, JUSTIFY=CENTER, $
TYPE=HEADING, LINE=4, OBJECT=TEXT, ITEM=1, COLSPAN=1, BACKCOLOR=WHITE, $
TYPE=HEADING, LINE=4, OBJECT=FIELD, ITEM=1, COLSPAN=4, $
TYPE=HEADING, LINE=4, OBJECT=FIELD, ITEM=2, COLSPAN=4, $
TYPE=HEADING, LINE=4, OBJECT=FIELD, ITEM=3, COLSPAN=4, $
TYPE=HEADING, LINE=4, OBJECT=FIELD, ITEM=4, COLSPAN=4, $

TYPE=HEADING, LINE=5, BACKCOLOR=RGB(22 54 92), STYLE=BOLD, COLOR=WHITE, JUSTIFY=CENTER, $
TYPE=HEADING, LINE=5, OBJECT=TEXT, ITEM=1, COLSPAN=1, BACKCOLOR=WHITE, $
TYPE=HEADING, LINE=5, OBJECT=FIELD, ITEM=1, COLSPAN=4, $
TYPE=HEADING, LINE=5, OBJECT=FIELD, ITEM=2, COLSPAN=4, $
TYPE=HEADING, LINE=5, OBJECT=FIELD, ITEM=3, COLSPAN=4, $
TYPE=HEADING, LINE=5, OBJECT=FIELD, ITEM=4, COLSPAN=4, $

TYPE=TITLE, COLOR=BLACK, BACKCOLOR= RGB(184 204 228), STYLE=-UNDERLINE+BOLD, JUSTIFY=CENTER, SIZE=10, $
TYPE=TITLE, COLUMN=DIVLABEL, BACKCOLOR=WHITE, $
TYPE=TITLE, COLUMN=YTDSCNT, $
TYPE=TITLE, COLUMN=YTDVAR, $
TYPE=TITLE, COLUMN=QTDVAR, $
TYPE=TITLE, COLUMN=PTDVAR, $
TYPE=TITLE, COLUMN=WTDVAR, $

TYPE=DATA, BACKCOLOR=WHITE, JUSTIFY=CENTER, STYLE=NORMAL, $
TYPE=DATA, COLUMN=DIVLABEL, STYLE=BOLD, JUSTIFY=RIGHT, $
TYPE=DATA, COLUMN=YTDSCNT, $
TYPE=DATA, COLUMN=YTDVAR, $
TYPE=DATA, COLUMN=QTDVAR, $
TYPE=DATA, COLUMN=PTDVAR, $
TYPE=DATA, COLUMN=WTDVAR, $

-GOTO STYLE_DONE



-STYLE_PDF
-*PDF STYLING GOES IN THIS SECTION

















-GOTO STYLE_DONE


-STYLE_DONE
ENDSTYLE
END
-RUN



  

Hi Manglum

I added this code


BORDER-TOP-COLOR=RGB(22 54 92),
BORDER-BOTTOM-COLOR=RGB(22 54 92),
BORDER-LEFT-COLOR=RGB(22 54 92),
BORDER-RIGHT-COLOR=RGB(22 54 92),


after this code


TYPE=HEADING,
LINE=4,
OBJECT=TEXT,
ITEM=1,
BACKCOLOR='NONE',
COLSPAN=1,
JUSTIFY=CENTER,


And the white borders went away..

A

Chuck,
Yes, of course they do :-) But if you look back at the original problem, whenever border formatting is employed there appears a blank white line (a gap) between the header data and the title line. I need that white gap to disappear.

Manglum

Sorry about that. You are right! You may want to open a case or maybe someone else has the answer. I'm sorry I was no help...

Regards,

Have you tried these SET commands at the top:
SET PRINTPLUS=ON, TITLELINE=SKIP

quote:

Originally posted by Tom Flynn:
Have you tried these SET commands at the top:
SET PRINTPLUS=ON, TITLELINE=SKIP

Tom, No effect.

Hi Manglum

I think you should open a case with techsupport to see if they have an answer..

Thanks,

quote:

Originally posted by Chuck Wolff:
Hi Manglum

I think you should open a case with techsupport to see if they have an answer..

Thanks,

Case opened.

Wishing you well in all that you do my Friend...

quote:

You may want to open a case or maybe someone else has the answer.

It's a 'documented feature'

Okay,

I'm going for "one of the worst hacks ever"-award.


You could add

-HTMLFORM BEGIN
<style>
.x19{display:none;}
</style>
-HTMLFORM END

either before the TABLE or after the END.

Works fine for HTML, aslong as the layout doesn't change.



Greets,
Dave

quote:

Originally posted by Dave:
Okay,

I'm going for "one of the worst hacks ever"-award.


You could add

-HTMLFORM BEGIN
<style>
.x19{display:none;}
</style>
-HTMLFORM END

either before the TABLE or after the END.

Works fine for HTML, aslong as the layout doesn't change.



Greets,
Dave

Thanks Dave. I tried this in both ways you listed above and it still doesn't work in HTML output.

quote:

Originally posted by Hank W.:


It's a 'documented feature'

I'm finding lots of those. and several that aren't yet documented features...lol

quote:

Originally posted by Doug:
Wishing you well in all that you do my Friend...

Thank you Doug, best wishes to you as well.

quote:

Originally posted by Dave:
Okay,

I'm going for "one of the worst hacks ever"-award.


You could add

-HTMLFORM BEGIN
<style>
.x19{display:none;}
</style>
-HTMLFORM END

either before the TABLE or after the END.

Works fine for HTML, aslong as the layout doesn't change.



Greets,
Dave

This blank line is one of the most frustrating things to deal with in WebFOCUS and I wish there was an easier way to remove it. The above code DOES work, but you must first run your report, then use the developer tools in IE/Chrome/etc to inspect the blank line to get the class name. It is normally some variant of x1,x2,x3, etc. Then use the code posted by Dave. If you change anything in your report, then the class can randomly change as well and you will have to update the class name.

A new feature request to have a setting to disable this line would be nice though...

quote:

Originally posted by capples:

quote:

Originally posted by Dave:
Okay,

I'm going for "one of the worst hacks ever"-award.


You could add

-HTMLFORM BEGIN
<style>
.x19{display:none;}
</style>
-HTMLFORM END

either before the TABLE or after the END.

Works fine for HTML, aslong as the layout doesn't change.



Greets,
Dave

This blank line is one of the most frustrating things to deal with in WebFOCUS and I wish there was an easier way to remove it. The above code DOES work, but you must first run your report, then use the developer tools in IE/Chrome/etc to inspect the blank line to get the class name. It is normally some variant of x1,x2,x3, etc. Then use the code posted by Dave. If you change anything in your report, then the class can randomly change as well and you will have to update the class name.

A new feature request to have a setting to disable this line would be nice though...

OK. So that x19 needs to be changes to whatever I find the class name to be and it will work? I'll give that a shot!

Alternatively you could leave out your borders (as you did above) and then add the following. You don't have to pre-execute your code to make sure that you have the correct class!

Obviously only for HTML as I guess that your next step is the other output format(s) styling (unless you've already pulled out you hair doing that )

-HTMLFORM BEGIN
<style>
table{border-collapse:collapse;}
</style>
-HTMLFORM END

T

Hi All, as per the information available over various earlier posts for similar issue and per the IBI documentation, the DROPBLNKLINE is not applicable to EXCEL format and there seems no straight forward way to achieve the same. As soon as we apply border to the DATA/REPORT, the blank line between HEADER and TITLE appears automatically. However, I have generated a workaround that meets the requirement. I have done the PoC on only three columns and anyone can extend the same as per the real time requirement.

Guys, again this is perhaps my first reply over the WebFOCUS community so I'd be more that glad to receive your positive up-votes and feedback. These would help me keep energetic for more replies

 TABLE FILE CAR
PRINT
COMPUTE COUNTRY/A10 = 'COUNTRY';
COMPUTE CAR/A16		= 'CAR';
COMPUTE MODEL/A24	= 'MODEL';
BY HIGHEST 1 COUNTRY NOPRINT
ON TABLE HOLD AS CAR_TITLE
END
-RUN

TABLE FILE CAR
PRINT
CAR.ORIGIN.COUNTRY 	
CAR.COMP.CAR        
CAR.CARREC.MODEL 
BY COUNTRY NOPRINT
ON TABLE HOLD AS CAR_DATA
END
-RUN

TABLE FILE CAR_TITLE
PRINT 
COUNTRY 
CAR 
MODEL
ON TABLE HOLD AS CAR_FNL
MORE 
FILE CAR_DATA
END
-RUN

TABLE FILE CAR_FNL
PRINT 
COUNTRY AS '' 
CAR AS '' 
MODEL AS ''
BY COMPUTE BLK/A1 = ''; NOPRINT
ON BLK SUBHEAD
"Markets and Discounts"
ON TABLE SET PAGE OFF
ON TABLE PCHOLD FORMAT XLSX
ON TABLE SET BYDISPLAY ON
ON TABLE SET DROPBLNKLINE HEADING
ON TABLE SET EMPTYREPORT ON
ON TABLE SET SHOWBLANKS OFF
ON TABLE SET STYLE *
TYPE=DATA,BORDER-TOP=LIGHT,BORDER-BOTTOM=LIGHT,BORDER-LEFT=LIGHT,BORDER-RIGHT=LIGHT,SIZE=10,$
TYPE=DATA, COLUMN=COUNTRY, FONT='CALIBRI',SIZE=14,COLOR='WHITE',BACKCOLOR=RGB(83 141 213),STYLE=BOLD,JUSTIFY=CENTER,WHEN=COUNTRY EQ 'COUNTRY', $
TYPE=DATA, COLUMN=CAR, FONT='CALIBRI',SIZE=14,COLOR='WHITE',BACKCOLOR=RGB(83 141 213),STYLE=BOLD,JUSTIFY=CENTER,WHEN=CAR EQ 'CAR', $
TYPE=DATA, COLUMN=MODEL, FONT='CALIBRI',SIZE=14,COLOR='WHITE',BACKCOLOR=RGB(83 141 213),STYLE=BOLD,JUSTIFY=CENTER,WHEN=MODEL EQ 'MODEL', $
TYPE=SUBHEAD, FONT='CAMBRIA',SIZE=16,COLOR=RGB(31 73 125),STYLE=BOLD, JUSTIFY=CENTER,$
ENDSTYLE
END


 

Can you use a template file with an Auto_Open macro? Borders, Group Borders and much more are so much easier. Almost every excel report we do uses this method.