Re: a need for speed

Or use an Input primary on the new logical, breaking on the key fields, and
writing a summary record at L1 time.  Fast, very fast. 
 
---------------------------------
Booth Martin
http://www.martinvt.com
---------------------------------
-------Original Message-------
 
From: RPG programming on the AS400 / iSeries
Date: 08/18/05 16:56:06
To: RPG programming on the AS400 / iSeries
Subject: Re: a need for speed
 
> I need to summarize a big telephone master file (22M+) into ranges.
> I'm attempting to use read, reap, setll to avoid the need to read each
> phone number record to create this summary file.  However, no luck so
> far.
 
a) Have a logical file thats keyed by: areacode, prefix, terminal and
suffix (in that order)
 
b) At the start of your program do a "setll *start"
 
c) use READ to get the area code, prefix and terminal and lowest suffix.
Save them somewhere (maybe in a data structure).  If the READ fails then
you're at the end of the file and you're done.
 
d) using the area code, prefix and terminal from (C) and setting the
suffix to *HIVAL, do a SETGT.  Follow that with a READPE (but don't
specify the suffix) to get the highest suffix.
 
e) write the summary record
 
f) Go back to step (C), continuing the loop until you've read the whole
file.
 
---
Scott Klement  http://www.scottklement.com
 
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
 
 
.