RE: page n of x

Richard,

At 9/6/00 11:10 AM -0600, you wrote:
>I like the *FCFC.  Does it work if the programmer didn't use indicator OF?
>In other words, does it work every time the report goes past top of form?

  Speaking of performance...  The fastest and probably the simplest, coding 
wise (if you're using the double pass method), would be to create a numeric 
data area in QTEMP.  At LR time, update the data are w/ the PAGE number 
value.  The 2nd pass would only have to access this data area once at 
*InzSR time.

  As an aside, if you use the *S36 method of CPYSPLF, the actual page 
number is in the beginning of the record, as the first 4 (?) bytes, binary 
format, so you could just read the last record to find the page number.

  -mark

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---