RE: Retrieving unknown file name

["Tracy Ball" <TBall@xxxxxxxxxxxxxxxx>]

Do you have a link for the RPG/IV Sorcerer's Redbook?   Is that different from 
the "Who Knew You Could Do That With RPG" manual?

-Tracy 
 Ext. 3107


-----Original Message-----
From: Haas, Matt [mailto:Matt.Haas@xxxxxxxxxxxxxxxxxxx]
Sent: Monday, March 24, 2003 4:12 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Retrieving unknown file name


John,

This may be an overkill sort of way to do this but there is a directory 
processing API that I'm pretty sure can look anywhere in the IFS (of which the 
libraries are a part). I don't recall using it to go against a library but we 
use it all the time for processing stuff in the root file system.

There's an example of this code in the RPG/IV Sorcerer's Redbook. The example 
just prints a list of objects but modifying it to do something else isn't 
difficult.

One other method we've used in the past is to put these types of files in a 
shared folder (/QDLS in the IFS) and use the DSPFLR command to create an 
outfile with all the files in a given folder. Our process used a CL command to 
read through the outfile and manipulate the file as needed.

Matt

-----Original Message-----
From: John Furniss [mailto:jfurniss@xxxxxxxxxxxxxxxxx]
Sent: Monday, March 24, 2003 3:40 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Retrieving unknown file name


List,
    We have a need to find the name of a file and copy it to a PF as a
new member. A company will be sending us a file that will get FTPed to
QGPL as P21nnnnnnn, where nnnnnnn is the number of seconds since
01/01/1970.
    How can we determine the name of the file? I checked the forum but
CHKOBJ was as close as I found. Can I check for the existance of P21*?

    TIA,

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