[Closed] Help me to remove unwanted spaces above the heading

October 06, 2015, 09:47 AM

Hi,

I am trying to remove unwanted spaces above the heading.

Here's the sample code

TABLE FILE CAR
SUM
     CAR.BODY.RETAIL_COST/D12M AS ''
BY  CAR.COMP.CAR AS ''
HEADING
"<CAR.ORIGIN.COUNTRY "
WHERE COUNTRY EQ 'ENGLAND';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS TAB1 FORMAT HTMTABLE
ON TABLE SET STYLE *
$
TYPE=REPORT,
     GRID=OFF,
     FONT='ARIAL',
$
TYPE=DATA,
     SIZE=9,
$
TYPE=DATA,
     COLUMN=N2,
     CLASS=col2,
$
TYPE=DATA,
     COLUMN=N1,
     CLASS=col1,
     URL=https://www.google.com,
$
TYPE=HEADING,
     LINE=1,
     OBJECT=TEXT,
     ITEM=1,
     SIZE=9,
     STYLE=BOLD,
$
TYPE=HEADING,
     LINE=1,
     OBJECT=FIELD,
     ITEM=1,
     SIZE=9,
     STYLE=BOLD,
$
ENDSTYLE
END
-RUN


TABLE FILE CAR
SUM
     CAR.BODY.RETAIL_COST/D12M AS ''
BY  CAR.COMP.CAR AS ''
ON TABLE SUBHEAD
"<CAR.ORIGIN.COUNTRY "
WHERE COUNTRY EQ 'W GERMANY';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS TAB2 FORMAT HTMTABLE
ON TABLE SET STYLE *
$
TYPE=REPORT,
     GRID=OFF,
     FONT='ARIAL',
$
TYPE=DATA,
     SIZE=9,
$
TYPE=DATA,
     COLUMN=N2,
     CLASS=col3,
$
TYPE=DATA,
     COLUMN=N1,
     CLASS=col1,
     URL=https://www.google.com,
$
TYPE=TITLE,
     COLUMN=N1,
     URL=https://www.google.com,
$
TYPE=TABHEADING,
     LINE=1,
     OBJECT=TEXT,
     ITEM=1,
     SIZE=9,
     STYLE=BOLD,
$
TYPE=TABHEADING,
     LINE=1,
     OBJECT=FIELD,
     ITEM=1,
     SIZE=9,
     STYLE=BOLD,
$
ENDSTYLE
END
-RUN

DEFINE FILE CAR
DUMM/A50 = 'Net Sales';
END

TABLE FILE CAR
SUM
RETAIL_COST/D12M AS ''
WHERE COUNTRY IN ('W GERMANY','ENGLAND');
BY DUMM AS ''
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE HOLD AS TAB3 FORMAT HTMTABLE
ON TABLE SET STYLE *
$
TYPE=REPORT,
     GRID=OFF,
	 FONT='ARIAL',
$
TYPE=DATA,SIZE = 9,$
TYPE=DATA,
     COLUMN=N2,
     CLASS=col4,
	 STYLE=BOLD,
	 COLOR=RED,
$
TYPE=DATA,
     COLUMN=N1,
     STYLE=BOLD,
     SIZE=9,
$
ENDSTYLE
END

-HTMLFORM BEGIN
<HTML>
<STYLE type=text/css>
.col1 {position:relative; left:80px;}
.col2 {position:relative; left:150px;}
.col3 {position:relative; left:170px;}
.col4 {position:relative; left:100px;}
h3{font-size: 17px; font-family:ARIAL ; font-style: bold;}
</style>
<h3>Sales</h3>
<body>
!IBI.FIL.TAB1;
!IBI.FIL.TAB2;
!IBI.FIL.TAB3;
</body>
</HTML>
-HTMLFORM END

I want to remove space between ENGLAND, W GERMANY

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