Is there a way I can remove blank lines from top of the reports.

SET PAGE-NUM = NOLEAD

or

ON TABLE SET PAGE NOLEAD

Any help would be appreciated.

Vipul

Vipul,

Have you not answered your own question?


ON TABLE SET PAGE NOLEAD
works, doesn't it?

Here's some code I wrote that illustrates different settings, I hope it will be of some help.

Regards,

Pietro.


-*** FOCEXEC to test SET PAGE = NOLEAD
-*** (NOLEAD does not put the two blank lines at the beginning of a report)

SET PAGE = NOLEAD
-RUN

TABLE FILE CAR
PRINT CAR
SALES
BY COUNTRY

WHERE SALES GT 0;
WHERE COUNTRY IN ('ENGLAND', 'JAPAN') ;

ON TABLE SET STYLE *
TYPE=REPORT, GRID=OFF, FONT='Arial', SIZE=9, $
TYPE=TITLE, COLOR=NAVY, STYLE=BOLD, $
ENDSTYLE

ON TABLE HOLD AS HOLD1N FORMAT HTMTABLE
END
-RUN

TABLE FILE CAR
PRINT CAR
SALES
BY COUNTRY

WHERE SALES GT 0;
WHERE COUNTRY IN ('ENGLAND', 'JAPAN') ;

ON TABLE SET STYLE *
TYPE=REPORT, GRID=ON, FONT='Arial', SIZE=9, $
TYPE=TITLE, COLOR=NAVY, STYLE=BOLD, $
ENDSTYLE

ON TABLE HOLD AS HOLD1G FORMAT HTMTABLE
END
-RUN


SET PAGE = NOPAGE
-RUN

TABLE FILE CAR
PRINT CAR
SALES
BY COUNTRY

WHERE SALES GT 0;
WHERE COUNTRY IN ('ENGLAND', 'JAPAN') ;

ON TABLE SET STYLE *
TYPE=REPORT, GRID=OFF, FONT='Arial', SIZE=9, $
TYPE=TITLE, COLOR=NAVY, STYLE=BOLD, $
ENDSTYLE

ON TABLE HOLD AS HOLD2N FORMAT HTMTABLE
END
-RUN

TABLE FILE CAR
PRINT CAR
SALES
BY COUNTRY

WHERE SALES GT 0;
WHERE COUNTRY IN ('ENGLAND', 'JAPAN') ;

ON TABLE SET STYLE *
TYPE=REPORT, GRID=ON, FONT='Arial', SIZE=9, $
TYPE=TITLE, COLOR=NAVY, STYLE=BOLD, $
ENDSTYLE

ON TABLE HOLD AS HOLD2G FORMAT HTMTABLE
END
-RUN

SET PAGE = OFF
-RUN

TABLE FILE CAR
PRINT CAR
SALES
BY COUNTRY

WHERE SALES GT 0;
WHERE COUNTRY IN ('ENGLAND', 'JAPAN') ;

ON TABLE SET STYLE *
TYPE=REPORT, GRID=OFF, FONT='Arial', SIZE=9, $
TYPE=TITLE, COLOR=NAVY, STYLE=BOLD, $
ENDSTYLE

ON TABLE HOLD AS HOLD3N FORMAT HTMTABLE
END
-RUN

TABLE FILE CAR
PRINT CAR
SALES
BY COUNTRY

WHERE SALES GT 0;
WHERE COUNTRY IN ('ENGLAND', 'JAPAN') ;

ON TABLE SET STYLE *
TYPE=REPORT, GRID=ON, FONT='Arial', SIZE=9, $
TYPE=TITLE, COLOR=NAVY, STYLE=BOLD, $
ENDSTYLE

ON TABLE HOLD AS HOLD3G FORMAT HTMTABLE
END
-RUN

SET PAGE = ON
-RUN

TABLE FILE CAR
PRINT CAR
SALES
BY COUNTRY

WHERE SALES GT 0;
WHERE COUNTRY IN ('ENGLAND', 'JAPAN') ;

ON TABLE SET STYLE *
TYPE=REPORT, GRID=OFF, FONT='Arial', SIZE=9, $
TYPE=TITLE, COLOR=NAVY, STYLE=BOLD, $
ENDSTYLE

ON TABLE HOLD AS HOLD4N FORMAT HTMTABLE
END
-RUN

TABLE FILE CAR
PRINT CAR
SALES
BY COUNTRY

WHERE SALES GT 0;
WHERE COUNTRY IN ('ENGLAND', 'JAPAN') ;

ON TABLE SET STYLE *
TYPE=REPORT, GRID=ON, FONT='Arial', SIZE=9, $
TYPE=TITLE, COLOR=NAVY, STYLE=BOLD, $
ENDSTYLE

ON TABLE HOLD AS HOLD4G FORMAT HTMTABLE
END
-RUN

-HTMLFORM BEGIN

SET PAGE=NOLEAD
!IBI.FIL.HOLD1N;	!IBI.FIL.HOLD1G;

SET PAGE=NOPAGE
!IBI.FIL.HOLD2N;	!IBI.FIL.HOLD2G;

SET PAGE=OFF
!IBI.FIL.HOLD3N;	!IBI.FIL.HOLD3G;

SET PAGE=ON
!IBI.FIL.HOLD4N;	!IBI.FIL.HOLD4G;

-HTMLFORM END

This message has been edited. Last edited by: <Mabel>,

Thanks Pietro, You are great!