|
It would think you could use the QUSLMBR API to list the members in the file. Then you could perform the override and process each member individually or as you suggested into a work file. If using a work file you could add an additional column to store the member name and another to help separate the unique records which could cause a problem when combining members. On a side note if the member name and unique keys are not important I think you use the CPYF command specify FROMMBR(*ALL) and TOMBR(*FIRST) to combine the file. Jeremy -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of steema@xxxxxxxxxxxxx Sent: Thursday, May 25, 2006 5:38 PM To: RPG programming on the AS400 / iSeries Subject: Re: Reading a member file I think what I can do is to read the entire file, and make a work file out of it. I only need to be concerned w/ the past 2 years. Is the approach the same in this scenario, of reading the file, all of the members? U would have to make it a called program w/ the ovrdbf? > I don't know if you got the answer you wanted, but one suggestion that > comes to mind. > > DSPFD FILE(LIBRARY/FILE) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*ALL) OUTFILE > (QTEMP/DSPFD) > > Then you can read through QTEMP/DSPFD looking at the field... MBNAME > > Hope that helps. > > > Michael Schutte > > > > > steema@diskhaven. > com > Sent by: To > rpg400-l-bounces@ rpg400-l@xxxxxxxxxxxx > midrange.com cc > > Subject > 05/25/2006 11:47 Reading a member file > AM > > > Please respond to > RPG programming > on the AS400 / > iSeries > <rpg400-l@midrang > e.com> > > > > > > > HI - also they now want to add a comment to the report. Doesn't have to be > on the subfile. THe comment is stored on a file by member. THe name of the > member is the invoice number. That is fine I have that. My question is how > to read this file, by setll, or can chain, or some other way? > > Thanks, > Steve > -- > 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. > >
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.