I'm not on V6 yet, but in the RPG manual for V6 it looks to be a lot easier to resolve this kind of thing, what with being able to use the LIKEFILE and LIKEREC keywords. (See the LIKEFILE keyword in the V6 RPG manual, it has an example of doing just that).
Then you could set up a procedure that receives a LIKEFILE parameter to process any and all of the different files or libraries, as long as the processing is the same for all.
I'm really looking forward to having that available (along with the other goodies like threading) (Classes and objects ahead! Maybe!)
--Thanks
Alan
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of David FOXWELL
Sent: Thursday, January 15, 2009 3:53 AM
To: RPG programming on the IBM i / System i
Subject: RE: Problem with duplicated file names
Thanks,
I'm going to use a combination of these two solutions.
I'm adding a second program that will read the masterfile again sorted on the library name and access the detail files. That lets me close the files after each library has been treated.
-----Message d'origine-----
De : rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de Adam Glauser Envoyé : mercredi 14 janvier 2009 17:45 À : rpg400-l@xxxxxxxxxxxx Objet : Re: Problem with duplicated file names
Carel Teijgeler wrote:
3) If the library name from the master PF changes, then clode the
detail PF and return to step 2.
No clutter of numerous renames, subprocedures, etc.
The OP specifically said he does not want to close these files between reads. Personally, I like EXTFILE() + USROPN() method too, but I can see where it could cause a fairly significant performance hit if this routine is called frequently and the library changes on most calls.
--
This is the RPG programming on the IBM i / System i (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 IBM i / System i (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.
midrange.com
