Hi Tim,
Tried it but didn’t work. Tried moving it around but still not counting after 2nd page. Keeps coming up page # of 2 i.e. page 4 of 2. Ed. From: Dataperf [mailto:[email protected]] On Behalf Of Tim Rude Sent: Friday, July 26, 2019 9:29 AM To: [email protected] Subject: Re: [Dataperf] How to print Total page count in report. Ed, It appears that the page headers aren't processed when ---Turn File Off-- is in effect. Apparently that's intentional so that stuff you're outputting to the screen doesn't mess with your page counts. Try this as a solution: Move this TURN.FILE.OFF BEGIN.WRITING.TO.FILENAME.IN.RV:251 TURN.FILE.ON from the beginning of the report (in red below) to after the first subreport has completed (in green below). So you don't want a ---Turn File Off--- code before running the first subreport. Let DP think it's creating a file the whole time. But in the first run through, the file is being dumped to NUL. Since DP thinks it making a file, it processes the page headers and things as normal. Tim Rude On 7/24/2019 3:25 PM, Ed Marfil, MAST UNITED wrote: Tim, here is an extract from STE printout of the report. I left in most of the printer control strings in case any of them is interfering. REPORT.BASED.ON.PANEL:23 NAME:~07/2019~ REPORT.MODE:WP OUTPUT.FILENAME:~NUL~ CREATE.DISK.FILE REPORT.INDEX: 3 TEXT.LINES=65 TOP.MARGIN=0 BOTTOM.MARGIN=0 LEFT.MARGIN=0 BACKWARD REPORT.FORM: FIRST.PAGE.HEADER DO.LOOKUP PROMPT.FOR.VALUE.OF.RV:250 USING.FORMAT:~U1~ PROMPT.MSG:~Print to Paper? [Y] if Yes or [ENTER] to PDF:~ SET.RV:251 FORMULA: ~if RV250="Y" then cat.c["c:\dpspool\";apply.format["G999";today - date[1;1;year[today]] + 1];apply.format["G99999";now];".{1}"] else~ CR ~cat.c["c:\dpspool\";apply.format["G999999";~ FIELD=P23F1 ~];apply.format["G99";~ FIELD=P23F2 ~];".{2}"] endif~ FORMULA.END; TURN.FILE.OFF BEGIN.WRITING.TO.FILENAME.IN.RV:251 TURN.FILE.ON OTHER.PAGE.HEADER TWO.LEVEL.REPORT.HEADER REPORT.BODY TURN.FILE.OFF SUBREPORT.THRU.DOOR:5 TO.PANEL:24 FIRST.PAGE.HEADER SET.RV:19 FORMULA:~1~ FORMULA.END; PRINT.CNTRL.STRING: 206 0 13 206 PRINT.CNTRL.STRING: 192 0 0 5 8 192 PRINT.CNTRL.STRING: 250 112 58 92 109 117 111 109 97 92 109 117 108 111 103 105 110 118 46 106 112 103 59 53 46 50 53 59 48 46 52 59 50 46 53 59 48 46 55 53 250 PRINT.CNTRL.STRING: 244 70 76 117 99 105 100 97 32 83 97 110 115 32 85 110 105 99 111 100 101 244 PRINT.CNTRL.STRING: 244 80 49 48 244 PRINT.CNTRL.STRING: 244 87 50 57 244 PRINT.CNTRL.STRING: 244 83 87 244 TAB.TO.COL:9 OTHER.PAGE.HEADER SET.RV:19 FORMULA:~RV19+1~ FORMULA.END; PRINT.CNTRL.STRING: 206 0 13 206 PRINT.CNTRL.STRING: 192 0 0 5 8 192 PRINT.CNTRL.STRING: 250 112 58 92 109 117 111 109 97 92 109 117 108 111 103 105 110 118 46 106 112 103 59 53 46 50 53 59 48 46 52 59 50 46 53 59 48 46 55 53 250 PRINT.CNTRL.STRING: 244 70 76 117 99 105 100 97 32 83 97 110 115 32 85 110 105 99 111 100 101 244 PRINT.CNTRL.STRING: 244 80 49 48 244 PRINT.CNTRL.STRING: 244 87 50 57 244 PRINT.CNTRL.STRING: 244 83 87 244 TAB.TO.COL:9 TWO.LEVEL.REPORT.HEADER REPORT.BODY PRINT.CNTRL.STRING: 244 70 77 83 32 80 71 111 116 104 105 99 244 PRINT.CNTRL.STRING: 244 80 49 48 244 PRINT.CNTRL.STRING: 244 87 52 53 244 PRINT.CNTRL.STRING: 244 83 87 244 CR TWO.LEVEL.FOOTER PAGE.FOOTER SKIP.TO.PAGE.BOTTOM RV:4;~A16~ ~ ~ RV:6;~DZ9/99/99~ FINAL.FOOTER SKIP.TO.PAGE.BOTTOM RV:4;~A16~ ~ ~ RV:6;~DZ9/99/99~ END.SUBREPORT.FOR.PANEL:24 SET.PAGE.NUMBER.TO:1 TURN.FILE.OFF BEGIN.WRITING.TO.FILENAME.IN.RV:251 TURN.FILE.ON SUBREPORT.THRU.DOOR:5 TO.PANEL:24 FIRST.PAGE.HEADER PRINT.CNTRL.STRING: 206 0 13 206 PRINT.CNTRL.STRING: 192 0 0 5 8 192 PRINT.CNTRL.STRING: 250 112 58 92 109 117 111 109 97 92 109 117 108 111 103 105 110 118 46 106 112 103 59 53 46 50 53 59 48 46 52 59 50 46 53 59 48 46 55 53 250 PRINT.CNTRL.STRING: 244 70 76 117 99 105 100 97 32 83 97 110 115 32 85 110 105 99 111 100 101 244 PRINT.CNTRL.STRING: 244 80 49 48 244 PRINT.CNTRL.STRING: 244 87 50 57 244 PRINT.CNTRL.STRING: 244 83 87 244 TAB.TO.COL:9 OTHER.PAGE.HEADER PRINT.CNTRL.STRING: 206 0 13 206 PRINT.CNTRL.STRING: 192 0 0 5 8 192 PRINT.CNTRL.STRING: 250 112 58 92 109 117 111 109 97 92 109 117 108 111 103 105 110 118 46 106 112 103 59 53 46 50 53 59 48 46 52 59 50 46 53 59 48 46 55 53 250 PRINT.CNTRL.STRING: 244 70 76 117 99 105 100 97 32 83 97 110 115 32 85 110 105 99 111 100 101 244 PRINT.CNTRL.STRING: 244 80 49 48 244 PRINT.CNTRL.STRING: 244 87 50 57 244 PRINT.CNTRL.STRING: 244 83 87 244 TAB.TO.COL:9 TWO.LEVEL.REPORT.HEADER REPORT.BODY PRINT.CNTRL.STRING: 244 70 77 83 32 80 71 111 116 104 105 99 244 PRINT.CNTRL.STRING: 244 80 49 48 244 PRINT.CNTRL.STRING: 244 87 52 53 244 PRINT.CNTRL.STRING: 244 83 87 244 CR TWO.LEVEL.FOOTER PAGE.FOOTER SKIP.TO.PAGE.BOTTOM RV:4;~A16~ ~ ~ RV:6;~DZ9/99/99~ FINAL.FOOTER SKIP.TO.PAGE.BOTTOM RV:4;~A16~ ~ ~ RV:6;~DZ9/99/99~ END.SUBREPORT.FOR.PANEL:24 STORE.RV: 7 IN.FIELD:34 STORE.RV: 8 IN.FIELD:40 DO.LOOKUP TWO.LEVEL.FOOTER PAGE.FOOTER FINAL.FOOTER SKIP.TO.PAGE.BOTTOM EJECT REPORT.END;
_______________________________________________ Dataperf mailing list [email protected] http://lists.dataperfect.nl/cgi-bin/mailman/listinfo/dataperf
