[CLOSED] Using TABPAGENO and TABLASTPAGE, TABLASTPAGE has wrong total in pdf
I am using TABLASPAGE on several pdf reports and I'm finding that the total number of pages is incorrect. When I go to last page, the pdf toolbar is showing 324 / 324, yet on the last page itselt, it shows 324 of 313.
TABLE FILE RCPTTRN
SUM ACCTCD AS '' ACCOUNT_DESC AS '' IN 21 TRN_AMT AS '' IN 65
COMPUTE TRSTFN = IF (SWDN NE LAST SWDN)
THEN 0 ELSE TRN_AMT; NOPRINT
COMPUTE GENREV = IF (SWDN NE LAST SWDN)
THEN 0 ELSE TRN_AMT; NOPRINT
COMPUTE WRKCAP = IF (SWDN NE LAST SWDN)
THEN 0 ELSE TRN_AMT; NOPRINT
COMPUTE GENREV1 = IF (SF_CD = '1') AND (GENREV = 0)
THEN GENREV + TRN_AMT
ELSE IF (SF_CD = '1') AND (GENREV NE 0)
THEN GENREV + GENREV1 ELSE IF (SF_CD NE '1')
AND (SWDN EQ LAST SWDN) THEN GENREV1 ELSE 0; NOPRINT
COMPUTE TRSTFN1 = IF (SF_CD = '2') AND (TRSTFN = 0)
THEN TRSTFN + TRN_AMT
ELSE IF (SF_CD = '2') AND (TRSTFN NE 0)
THEN TRSTFN + TRSTFN1 ELSE IF (SF_CD NE '2')
AND (SWDN EQ LAST SWDN) THEN TRSTFN1 ELSE 0; NOPRINT
COMPUTE WRKCAP1 = IF (SF_CD = '3') AND (WRKCAP = 0)
THEN WRKCAP + TRN_AMT
ELSE IF (SF_CD = '3') AND (WRKCAP NE 0)
THEN WRKCAP + WRKCAP1 ELSE IF (SF_CD NE '3')
AND (SWDN EQ LAST SWDN) THEN WRKCAP1 ELSE 0; NOPRINT
BY OLO NOPRINT
BY SITE NOPRINT
BY SWDN NOPRINT PAGE-BREAK
BY AGENCY_DOC_NBR NOPRINT
BY ACCTCD NOPRINT
WHERE L1_CD = '&L1';
&WHERE1
&WHERE2
WHERE POSTING_DT GE '&pdt';
WHERE ZOLO.INACTIVE_DT = '2099-01-01';
WHERE ZSITE.INACTIVE_DT = '2099-01-01';
WHERE TRN_CD = '40' OR '31';
HEADING CENTER
"REPORT OF VERIFIED TREASURER'S RECEIPTS"
"<32 &HEAD2 <42 &pdt <46 &HEAD2_1"
"</1"
ON SWDN SUBHEAD
"<OLO_NM"
"( <SITE ) <SITE_DESC"
" "
"SWDN: <SWDN"
"DEPOSIT NO. <AGID"
" "
ON SWDN SUBFOOT
" "
"GENERAL REVENUE <12 : <15 <GENREV1"
"TRUST FUND <12 : <15 <TRSTFN1"
"WORKING CAPITAL <12 : <15 <WRKCAP1"
"DEPOSIT TOTAL <12 : <15 <ST.TRN_AMT"
FOOTING BOTTOM
"Report run on &DATEMDYY for information as of &CURDT <+0>Page<TABPAGENO of<TABLASTPAGE"
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET LINES 999999
ON TABLE SET PAPER 999999
ON TABLE SET PAGE NOPAGE
ON TABLE SET STYLE *
TYPE=REPORT, FOCEXEC=NONE, FONT=ARIAL, SIZE=9, COLOR=BLACK,
BACKCOLOR=NONE, STYLE=NORMAL, GRID=OFF, $
TYPE=REPORT, PAGESIZE=LETTER, ORIENTATION=LANDSCAPE,
BOTTOMMARGIN=0.0, TOPMARGIN=0.5, LEFTMARGIN=0.5, $
TYPE=HEADING, JUSTIFY=CENTER, $
TYPE=HEADING, LINE=1, STYLE=BOLD, SIZE=12, $
TYPE=HEADING, LINE=2, STYLE=BOLD, SIZE=11, $
TYPE=HEADING, LINE=2, ITEM=3, STYLE=NORMAL, WIDTH=1.5, SIZE=7, $
TYPE=SUBHEAD, STYLE=BOLD, SIZE=10, $
TYPE=DATA, TOPGAP=0.05, $
TYPE=SUBFOOT, STYLE=NORMAL, COLOR=BLACK, SIZE=9, $
TYPE=SUBFOOT, ITEM=3, WIDTH=1.5, JUSTIFY=DECIMAL(.6), $
TYPE=FOOTING, LINE=1, STYLE=NORMAL, COLOR=BLACK, SIZE=9, $
TYPE=FOOTING, LINE=1, OBJECT=TEXT, ITEM=2, POSITION=9, $
ENDSTYLE
Any ideas why this would not produce the correct last page number everytime?
Thanks.This message has been edited. Last edited by: Kerry,
7.7, z/OS & Win7, excel & pdf 8.2 testing
March 02, 2012, 02:09 PM
Prarie
This has been an issue in earlier releases..years ago. Your signture says you are on Version 8. I did not think that was released yet. Any issues you may be having I would report to IBI as this is a new animal.
March 05, 2012, 11:37 AM
Darin Lee
Try using SET PRINTPLUS=ON at the beginning of your report. I've encountered your situation before and this usually seems to provide a solution. Also, when outputting to PDF I wouldn't mess with the page or paper settings. Leave out the
ON TABLE SET LINES 999999 ON TABLE SET PAPER 999999
as they might cause unintended interference with the way PDF generates the report.
Regards,
Darin
In FOCUS since 1991 WF Server: 7.7.04 on Linux and Z/OS, ReportCaster, Self-Service, MRE, Java, Flex Data: DB2/UDB, Adabas, SQL Server Output: HTML,PDF,EXL2K/07, PS, AHTML, Flex WF Client: 77 on Linux w/Tomcat
March 06, 2012, 08:22 AM
BGronli
Thanks. I will give those a try. As to the version we are running, I am trying to verify which one we are on.
7.7, z/OS & Win7, excel & pdf 8.2 testing
March 07, 2012, 08:48 AM
BGronli
Darrin,
I added the SET statement and removed the PAPER and LINE statements and the only result was the footer being moved to the very edge of the paper, instead of being 0.5 in from the edge.
7.7, z/OS & Win7, excel & pdf 8.2 testing
March 07, 2012, 09:43 AM
j.gross
1. There is a setting, SET RPAGESET, which might help.
2. You have "BOTTOMMARGIN=0.0", which explains why the the footer moved "to the very [bottom] edge of the paper".
- Jack Gross WF through 8.1.05
March 20, 2012, 08:51 AM
BGronli
quote:
SET PRINTPLUS=ON
I attempted to apply the SET RPAGESET and it caused my report to find no records where it previously was returning 1300+ pages. Thanks for the attempts but I think at this time we'll just leave off of