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,

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.

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.

Thanks. I will give those a try. As to the version we are running, I am trying to verify which one we are on.

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.

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".

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

7.7, z/OS & Win7, excel & pdf
8.2 testing