RE: Copy source from the AS/400 to a PC for archival purposes...

I have done what you are looking for, but it is rather barbaric too;
basically I have an rpg that runs c/l commands since I have not had
the time to bother to look into the api's or system files that I
know exist out there - so;
I created one folder on our server (same as library name), then
created sub-folders with the source physical file names,
they copies the parent folder and renamed as to the libs that
I wanted to get all text source for.

the program then loops to a physical file that I do a
dspfd of the lib/*all type *mbrlist to the outfile,
I do a clear first, then subsequent libs to an add,
Now I have a file to read through with all my members,
I then have a ftp script written to ftp the member over,
the rpg changes the line depending on what member I am
reading (correct lib/source type) then executes the ftp -
speed is somewhat sluggish, but over a dead weekend - who cares,

has worked well and it does not miss anything as I rebuild everything
each time I run it.

hope this helps with other ideas
Mark


-----Original Message-----
From: midrange-l-admin@midrange.com
[mailto:midrange-l-admin@midrange.com]On Behalf Of Steve Landess
Sent: Thursday, September 12, 2002 11:34 AM
To: midrange-l@midrange.com
Subject: Copy source from the AS/400 to a PC for archival purposes...


This is a multi-part message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
Does anybody know an easy way to copy ALL source members from a given source
file to a PC?

I know that I can save the source to a save file and FTP that to my PC as a
binary, but I would like to have BOTH save file AND text versions of the
source on my PC.  This way I can view source on my PC without having to load
it back on the AS/400.


Back in the early days (circa 1989) of PC Support/400, I had written a batch
file that:

1) Ran a remote command on the AS/400 which did a DSPFD *MBRLIST on the
source physical file to an outfile.

2) Ran a file transfer request which download this file to the PC.

3) Ran a BASIC program which read this file and created the FDF and TFR
files for each member to transfer.

4) As it created the FDF and TFR files, it wrote a record to another batch
file with the appropriate RTOPCB command.

5)  When finished, it ran the batch file created in (4) to actually download
all of the source members to individual files on the PC.

I don't have this program any more, but I'm sure that there is an easier way
to do this today, but I'm not sure.  Can anybody give me ideas as to how do
this now?

Thanks in advance for your help!

_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.