Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

How I can transfer AS400 objects to PC and vice versa?

3,309 views
Skip to first unread message

C.F. Sistemi

unread,
Aug 1, 1997, 3:00:00 AM8/1/97
to

I wish save a Library to a SAVF file, then transfer SAVF file to a PC.
The PC file shall be restored into an other AS400.
Is this possible?

Thank in advance,

Sergio Carpi

Michael D. Stackhouse

unread,
Aug 1, 1997, 3:00:00 AM8/1/97
to


Yes, if you have TCP/IP enabled on the AS/400's, you can FTP GET the
file from the
first AS/400 to your pc, and FTP PUT the file to the second AS/400. You
will have
to specify binary mode before the put and get so no EBCDIC and ASCII
conversions
will occur and the savf will be left intact.

If you need additional compression on the file, you can zip the file
once it's on
the pc and unzip it before putting back onto the AS/400.

Good luck!

Mike Stackhouse
mstac...@samsa.com

Geoff Wiggs

unread,
Aug 3, 1997, 3:00:00 AM8/3/97
to

>I wish save a Library to a SAVF file, then transfer SAVF file to a PC.
>The PC file shall be restored into an other AS400.
>Is this possible?
>
If you have the QUSRTOOL libaray on your system create the tool
CPYFRMSAVF. This will allow you to copy a save fiel to a database
flat file of record length 528 bytes. Download this file to your
diskette and when you've transfered the database file to the new
AS/400 you can use the QUSRTOOL CPYTOSAVF to copy the database back
into a savf file and restore it.

Geoff Wiggs
Orcas Technologies, Inc.

Robin Tatam

unread,
Aug 4, 1997, 3:00:00 AM8/4/97
to

Greetings

I have an *AWESOME* tool that allows you to do this with a command
interface .... "Tell me the library name and press ENTER" to create a file
that can be downloaded via shared folders and then restored the same way.

The library is restored with a single command !!!

Let me know if you have any interest ....

Robin Tatam
rta...@acsltd.com

PS If you would like to see the process of the restore, download my free
Highlight Source Comments utility at http://www.acsltd.com/freecode

C.F. Sistemi <ecs...@bo.nettuno.it> wrote in article
<5rtif7$b0o$1...@news.nettuno.it>...


> I wish save a Library to a SAVF file, then transfer SAVF file to a PC.
> The PC file shall be restored into an other AS400.
> Is this possible?
>

Walter Goodwin

unread,
Aug 4, 1997, 3:00:00 AM8/4/97
to

Geoff Wiggs wrote:
>
> >I wish save a Library to a SAVF file, then transfer SAVF file to a PC.
> >The PC file shall be restored into an other AS400.
> >Is this possible?
> >
> If you have the QUSRTOOL libaray on your system create the tool
> CPYFRMSAVF. This will allow you to copy a save fiel to a database
> flat file of record length 528 bytes. Download this file to your
> diskette and when you've transfered the database file to the new
> AS/400 you can use the QUSRTOOL CPYTOSAVF to copy the database back
> into a savf file and restore it.
>
> Geoff Wiggs
> Orcas Technologies, Inc.

If your 400s have TCP/IP, use FTP to transfer the save file. That is,

1) Create the save file on the source 400 and add the objects.
2) Create an *empty* save file on the target 400.
3) Transfer the save file (BINARY transfer mode) with FTP to the PC.
4) Transfer the save file (again BINARY mode) with FTP from the PC to
the save file created in step 2 on the target 400. (If you're using the
FTP client on the 400, use the GET command with the "(replace" option)
5) Restore the save file on the target.

You can save a step by only transferring 400-to-400 with FTP. The key
thing to remember is when transferring the file to the target 400,
transfer to an existing save file with the replace option. Otherwise,
FTP will create a non-save file for you that you can't restore.

This is a great way to move 400 objects around "without tape".

----------------------------
Walter Goodwin
email account: wpgoodwin
host: asna.com
----------------------------

Francesco Candia

unread,
Aug 12, 1997, 3:00:00 AM8/12/97
to

C.F. Sistemi <ecs...@bo.nettuno.it> wrote:

>I wish save a Library to a SAVF file, then transfer SAVF file to a PC.
>The PC file shall be restored into an other AS400.
>Is this possible?
>

>Thank in advance,
>
>Sergio Carpi

Is very simple:
1) Create a SAVF (CRTSAVF) we coll in the example Filesav
2) Save library or any kind of object into SAVF
3) Create a file with record lenght of 528 (CRTPF RCDLEN(528)) we call
PCFILE
4) Write a RPG program:
FFilesav IP F 528 Disk
FPcFile O F 528 Disk
IFilesav 01
I record 1 528
OPcFile D 01
O Record 528
5) Copy PcFile to a folder or to PC specifing NO CONVERSION
6) Upload to the other system
7) Create an empty SAVF and rerun RPG program invertin file names.

If you have questions in italian send me an e-mail.
Francesco Candia
Via Monte Cervino 1/9
10090 Gassino Torinese
Italy
fca...@mbox.vol.it
francesc...@bigfoot.com

MOK CHI KIN

unread,
Aug 13, 1997, 3:00:00 AM8/13/97
to

Just use FTP

MOK CHI KIN

A & H wrote:

> Geoff Wiggs wrote:
> >
> > >I wish save a Library to a SAVF file, then transfer SAVF file to a
> PC.
> > >The PC file shall be restored into an other AS400.
> > >Is this possible?
> > >

> > If you have the QUSRTOOL libaray on your system create the tool
> > CPYFRMSAVF. This will allow you to copy a save fiel to a database
> > flat file of record length 528 bytes. Download this file to your
> > diskette and when you've transfered the database file to the new
> > AS/400 you can use the QUSRTOOL CPYTOSAVF to copy the database back
> > into a savf file and restore it.
> >
> > Geoff Wiggs
> > Orcas Technologies, Inc.
>

> If you don't have QUSRTOOL you can get source code to do this from my
> web page at http://www.geocities.com/SiliconValley/Pines/9037/
>
> Take the "AS/400 Utilities" link and look for the "ZCPYSAVF (Copy
> from/to save file" link.
> --
> ----------------------------------------------------
> A&H Computer Services
> Anne: car...@ibm.net
> Herb: herb_...@geocities.com
> http://www.geocities.com/SiliconValley/Pines/9037/
> ---------------------------------------------------


Bradley V. Stone

unread,
Aug 13, 1997, 3:00:00 AM8/13/97
to

FTP doesn't always work. Some of the data gets jumbled up in the
conversion.

Brad Stone

On Wed, 13 Aug 1997 21:39:38 +0800, MOK CHI KIN <mo...@sunway.com.sg>
wrote:

Bradley V. Stone
Programmer/Analyst
Taylor Corporation
bvs...@nospam.com (replace "nospam" with "taylorcorp")

Chris Breemer

unread,
Aug 13, 1997, 3:00:00 AM8/13/97
to

More than one lister suggests using FTP for transfer between PC and
AS/400.
Now that's all very well when you do it interactively, but I want to
automate it.
Normally I create a file with ftp commands, e.g. ftp.cmds containing:

verbose
open myhost
user foo bar (user AND password here)
....
bye

and run

ftp -n < ftp.cmds

While this works on UNIX, it doesn't on the PC. ftp (I think it's
Novell ftp I'm using) does not want the user/password redirected and
prompts
for it. It does not recognize the "-n" flag.

There's also the problem, in case of an AS/400 library, how do you spawn
RSTLIB from an ftp script ? Some ftp's have "site" or "system" commands
but the PC version hasn't. Of course there are zillions of PC ftp's
which
makes it only worse...

Lastly, who guarantees everybody has ftp on their AS/400 ? CA/400 is
okay,
because that's a requirement for our client/server setup anyway.

So because of all that, I was thinking of supplying a CA/400 macro doing
the
file transfer and RSTLIB command, and whatever else needs to be done on
the host.
I'm still not sure if this is feasible (because I'm a newbie :-).
Any ideas out there ?

--
Kind regards,

Chris Breemer chris_...@nl.compuware.com
Compuware Europe B.V. http://www.compuware.com

Mark Thorndyke

unread,
Aug 15, 1997, 3:00:00 AM8/15/97
to

> Now that's all very well when you do it interactively, but I want to
> automate it.
> Normally I create a file with ftp commands, e.g. ftp.cmds containing:

If you check back a few weeks to a subject 'Run FTP in batch'
you will find a sample CL code which shows how to run FTP in batch!!!!
(Forgetting all these other 'look my web site'/'we sell a product' garbage)

> Lastly, who guarantees everybody has ftp on their AS/400 ? CA/400 is

Seeing as TCP/IP is packaged as standard with version 3, then the majority
will have access to ftp. Just requires for yourself to install and
configure it.

Mark T
(MThor...@mcmail.com / MThor...@aol.com)

Azizan

unread,
Sep 26, 1997, 3:00:00 AM9/26/97
to

I used to transfer AS/400 object using diskette, this is how to do it:

a. create save file *SAVF
b. save your objects to *SAVF
c. at pc end: enter command : ftp hostname
d. command: binary
e. get savf drive:filename

to upload the save file back to AS/400
a. create a *SAVF file on AS/400
b. at pc: ftp hostname
c. binary
d. put drive:filename savefilename

note: on AS/400 end, a *SAVF file must exist before ftp, or else, the ftp
file will be converted to PF (physical file) instead of *SAVF

regards


Azizan- Malaysia

C.F. Sistemi <ecs...@bo.nettuno.it> wrote in article
<5rtif7$b0o$1...@news.nettuno.it>...

> I wish save a Library to a SAVF file, then transfer SAVF file to a PC.
> The PC file shall be restored into an other AS400.
> Is this possible?
>

0 new messages