Re: Batch Finding Files using Wildcards

[Luis Rodriguez <luisro58@xxxxxxxxx>]

Kurt,

There are some issues to consider: Do your files have LFs dependent on them?
Also, if you read QSYS/QADBXREF directly, a new file could appear later on
your program, so you must be careful not to delete it.

Maybe you could consider doing first a list of your files, with DSPFD,
something like:
DSPFD FILE(*ALLUSR/*ALL)
      TYPE(*BASATR)
      OUTPUT(*OUTFILE)
      FILEATR(*PF)
      OUTFILE(MYLIB/FILELIST)

That way, you would have the "original" list of tables, just in case
something went wrong (you did not forgot to backup beforehand , did you? :-)

Then, just before your RCVF in your CL, you could do a OPNQRYF, something
like:
OPNQRYF FILE((QTEMP/FILELIST)) QRYSLT('atfile *ct ''%FILEA%''')

HTH,



Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries
--



On Wed, Aug 17, 2011 at 3:04 PM, Kurt Anderson <kurt.anderson@xxxxxxxxxxxxxx
> wrote:

> Looks like I'll give using QSYS/QADBXREF a try.
>
> -Kurt
>
> -----Original Message-----
> From: midrange-l-bounces@xxxxxxxxxxxx [mailto:
> midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Kurt Anderson
> Sent: Wednesday, August 17, 2011 2:17 PM
> To: 'Midrange Systems Technical Discussion' (midrange-l@xxxxxxxxxxxx)
> Subject: Batch Finding Files using Wildcards
>
> We have a number of files that we have copies of saved with a prefix to it.
>  For example:
> FILEA, FILEB
> ABCFILEA, ABCFILEB
> XXXFILEA, XXXFILEB
>
> This is the case across multiple libraries, and the prefixes can be
> virtually anything, although I know it's always 3 long.
>
> What I'd like to do is something like:
> WRKOBJPDM LIB(MYLIB) OBJ(*FILEA) OBJTYPE(*FILE) However this isn't allowed
> in batch mode.
>
> I have a CL program that is going to spin through our libraries to work
> with these files.  What I will be doing with these files is probably
> renaming them, creating a new file with the same name, and copy map/dropping
> the data back in then deleting the old file.
>
> Can anyone point me in the right direction?
>
> Thanks,
> Kurt Anderson
> Sr. Programmer/Analyst
> CustomCall Data Systems
>
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
> unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
> moment to review the archives at http://archive.midrange.com/midrange-l.
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.