RE: Optimizing File I-O in RPG IV/ I-Series

Or the use of a translation table... In the example I use a key of two
combined text fields.

     A          R ARTALPL0                  PFILE(ARTIKEL)
     A            BESTNR             I
     A            TEXTZ1             I
     A            TEXTZ2             I
                        ...
     A            KEYTEX             I      CONCAT(TEXTZ1 TEXTZ2)
     A                                      TRNTBL(Q273)
     A          K KEYTEX

Kind regards/Mit freundlichen Gru?en

i.A. Erich W. Schasse

WIEDEMANN GmbH & Co. KG
IT/ORG
Wiedemannstr.
31157 Sarstedt
Tel. 05066/997-190
Fax  05066/997-366
mailto:schasse@xxxxxxxxxxxx
www.wiedemann.de



-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of rob@xxxxxxxxx
Sent: Wednesday, November 23, 2005 5:12 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Optimizing File I-O in RPG IV/ I-Series


Providing you created a case insensitive index.  In DDS it involves the
use of ALTSEQ.

Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"Fleming, Greg \(ED\)" <GFLEMING@xxxxxxxxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
11/23/2005 11:04 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


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

Fax to

Subject
RE: Optimizing File I-O in RPG IV/ I-Series






Interesting, Joep.

Although it's rare I ever need to access a file by a text field, I do
recall one example where I'm taking a list of email addresses which have
"opted out" of receiving emails from us, and compare it to all the
addresses on our database so I can flag the accounts "do not email".

The way I handle it, since the addresses can be mixed case in our
database, is to populate a temporary file with all of the addresses in
our database converted to lower case, then compare the incoming file of
opt outs, also converted to lower case.

Are you telling me I could just read the incoming file in whatever case
it is in, then setLL using a case insensitive index and READE to get all
the accounts using that address, even if they were entered in a
different case from the input file ?

That would be swell.


>-----Original Message-----
>From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]
>On Behalf Of J.Beckeringh@xxxxxxxxxxxxxxxxxxxxxxxxxx
>Sent: Wednesday, November 23, 2005 10:21 AM
>To: RPG programming on the AS400 / iSeries
>Subject: RE: Optimizing File I-O in RPG IV/ I-Series
>
>Simple example: You can create a case insensitive index. If you do a
SETLL
>with 'FLEMING', you might get a record with a key of 'Fleming'. READE
will
>handle it for you, a simple compare won't.
>
>Joep Beckeringh
>
>
>
>
>
>

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


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