When I run the code below for a compound PDF Report, I get a one inch gap between the bottom of the first report, and the top of the second report.
Does anyone know what I code I can use to remove this gap?
DEFINE FILE BASELINE1
SECTIONDATA WITH FACILITY_NAME/A1= '';
END
TABLE FILE BASELINE1
BY FACILITY_NAME NOPRINT
HEADING
"LMC SIP REQUEST FOR INFORMATION"
"Use tab key to move between fields"
WHERE RECORDLIMIT EQ 0
ON TABLE SET STYLE *
UNITS=IN, ORIENTATION=PORTRAIT, BOTTOMMARGIN=0,$
TYPE=REPORT,FONT='ARIAL', GRID=ON,$
TYPE=HEADING,LINE=1,JUSTIFY=CENTER,STYLE=BOLD,SIZE=14,BACKCOLOR=RGB(210 210 210),$
TYPE=HEADING,LINE=2,JUSTIFY=CENTER,STYLE=BOLD,SIZE=14,BACKCOLOR=RGB(210 210 210),$
ENDSTYLE
ON TABLE PCHOLD FORMAT PDF OPEN NOBREAK
END
DEFINE FILE BASELINE1
SECTIONDATA WITH FACILITY_NAME/A1= '';
END
TABLE FILE BASELINE1
BY FACILITY_NAME NOPRINT
HEADING
"DSS INSPECTION INFORMATION"
ON TABLE SET STYLE *
UNITS=IN, ORIENTATION=PORTRAIT, TOPMARGIN=0,$
TYPE=REPORT,FONT='ARIAL', GRID=ON,$
TYPE=HEADING,LINE=1,JUSTIFY=LEFT,STYLE=BOLD,SIZE=12,BACKCOLOR=RGB(210 210 210),$
ENDSTYLE
ON TABLE PCHOLD FORMAT PDF CLOSE
END
-EXIT
This message has been edited. Last edited by: Kerry,
Production - 7.6.4 Sandbox - 7.6.4
July 29, 2010, 12:43 PM
Francis Mariani
Try adding
SET PAGE = NOLEAD
This usually removes two lines at the top, reserved for the default page number and is a vestige of mainframe FOCUS.
Francis
Give me code, or give me retirement. In FOCUS since 1991
Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
July 29, 2010, 12:49 PM
Francis Mariani
If you're using the default behaviour of page numbering, then add
ON TABLE SET PAGE NOLEAD
to the second report.
Francis
Give me code, or give me retirement. In FOCUS since 1991
Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
July 29, 2010, 01:33 PM
ColdWhiteMilk
These are not working.
Where in my code do I put them?
What am I missing?
Production - 7.6.4 Sandbox - 7.6.4
July 29, 2010, 02:05 PM
Francis Mariani
I did say "try" - I'm not sure if it will fix your problem.
ON TABLE SET PAGE NOLEAD
ON TABLE SET STYLE *
You may want to look into the Dev Studio Compound Layout tool which promises more precise layout...
Francis
Give me code, or give me retirement. In FOCUS since 1991
Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
July 29, 2010, 02:21 PM
Prarie
Try this
SET PRINTPLUS=ON
In Focus since 1993. WebFOCUS 7.7.03 Win 2003
July 29, 2010, 02:22 PM
Prarie
Oh and this too
SET PAGE-NUM=NOPAGE
I believe you have to have both.
In Focus since 1993. WebFOCUS 7.7.03 Win 2003
July 29, 2010, 02:26 PM
Francis Mariani
According to the manual, SET PAGE-NUM=NOPAGE is equivalent to SET PAGE=NOLEAD, but it might be a good idea to try both.
Francis
Give me code, or give me retirement. In FOCUS since 1991
Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
July 29, 2010, 06:07 PM
Waz
PAGE-NUM and PAGE are the same thing.
NOLEAD removes the most.
I did see an option I had not seen before, TOP.
The manual says this will remove the first two lines.
Waz...
Prod:
WebFOCUS 7.6.10/8.1.04
Upgrade:
WebFOCUS 8.2.07
OS:
Linux
Outputs:
HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!
July 30, 2010, 09:55 AM
Brian Suter
Use COMPOUND syntax (Devstudio Document Composer, PowerPainter, and InfoAssist in Compose mode all use the syntax). You do not need the latest tools. The syntax has been around for awhile (and improved regularly).