Re: a need for speed

Not sure if this would work but I'd try creating a logical over it by:
AreaCode, Prefix, Terminal, Suffix since this appears to be the break 
order you are looking for.
Next create a KLIST on the first 3 fields.
Setll to beginning of the file and read the very first record.  Save the 
values of the very first record, then use SETGT on the KLIST and then a 
READP to get the last record of your set and save that value.
Then READ next record and repeat above process until EOF.  This way you'd 
only end up with 2 reads per record set.
HTH,

Ron Power
Programmer
Information Services
City Of St. John's, NL
P.O. Box 908
St. John's, NL
A1C 5M2
709-576-8132
rpower@xxxxxxxxxx
http://www.stjohns.ca/
___________________________________________________________________________
Success is going from failure to failure without a loss of enthusiasm. - 
Sir Winston Churchill




"Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
2005/08/18 07:04 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
a need for speed






Can below be done without having to read thru each record in detail 
file(Telephone Master)?

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.

The detail file looks like below:
AreaCode    Prefix    Suffix    Terminal
 601         123       0001      JSN
 601         123       0002      JSN
 601         123       0003      JSN
 601         123       0004      JSN
 601         123       0009      BTD
 601         123       0010      BTD
 601         123       0044      BTD 
 601         123       0091      JSN
 601         123       0092      JSN
 .
 . 
 .


The summary file is by AreaCode, Prefix, Terminal, From Suffix, to Suffix. 
 Using above data, the result should be as follow:
AreaCode    Prefix    Terminal    From Suffix    to Suffix
601          123        JSN         0001           0004
601          123        BTD         0009           0044 
601          123        JSN         0091           0092