Re: Copy and rename many IFS files

[Scott Klement <midrange-l@xxxxxxxxxxxxxxxx>]

Hi Steve,

I wrote an article awhile back that demonstrated how to write an ILE RPG 
program that scans through all of the files in a subtree of the IFS, and 
checks the date of each file.  My utility uses this to purge old files 
from the IFS, but it would be relatively simple to modify it to call the 
Qp0lRenameKeep() API to accomplish your purpose.

Here's a link to the article (it requires a membership to System 
iNetwork, but a free "Associate" membership should work):
http:///www.systeminetwork.com/article.cfm?id=52993

Normally for tasks like this, I'd recommend QShell... but QShell does 
not provide access to the "create date" of files, it only provides the 
"last change", "last modify" and "last access" timestamps, it doesn't 
provide "create".  So you won't be able to use QShell.  The RPG program 
I mention above won't have that limitation.

Good luck

Steve McKay wrote:
> We have a need to copy many (> 1000) IFS files from many folders to many 
> corresponding folders, renaming them as we copy.
>
> To elaborate, we have an IFS folder (folder A) for each of our 600+ stores 
> and we have a corresponding archive folder for each store (folder B).  When 
> we process a file out of folder A, we copy it to folder B "just in case" and 
> delete it from folder A.
>
> Now we need to copy files back from folder B to folder A (based on creation 
> date) and rename the files so they don't get intermingled with files from 
> "today".
>
> Any thoughts?
>
> Thanks,
>
> Steve