Re: page n of x

John,

At 9/8/00 05:23 PM -0400, you wrote:
> >
> >   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.


>Nah... this has to be slower than passing a parameter.  You have to
>create the dtaara. Update it.  Read It.  Delete it.
>
>vs
>
>DCL         &PAGCNT     *DEC(15 5)
>
>CHGVAR &PAGCNT VALUE(0)
>
>CALL RPT(&PAGCNT)   /* if zero suppress output */
>
>CALL RPT(&PAGCNT)   /* produce Output */

  Technically you're right, but I was considering programming effort, 
too.  I was trying to avoid a parm change, which may require changing 
multiple CLP's.  Changing only the RPG can be self contained.

  -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
+---