RE: Getting SaveFile from PC World to the AS/400 via CA/Win

[Jon Erickson <jonerickson@xxxxxxxxxxxxxxxxxxxx>]

I'll try this again, not all the code attached the first time, sorry.
      

-----Original Message-----
From:   Jon Erickson [SMTP:jonerickson@vikingindustries.com]
Sent:   Wednesday, December 10, 1997 10:11 AM
To:     'MIDRANGE-L@midrange.com'
Subject:        RE: Getting SaveFile from PC World to the AS/400 via CA/Win

Hi All,
Here are my tools, (CMD, CLP, RPG) to perform the tasks of copying to/from 
physical and save files.  They were taken from the TAATOOLS with a little 
modification since I've been working on a RISC box w/ V4R1.

HTH.
  
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Jon A. Erickson - Viking Industries
jonerickson@vikingindustries.com
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


-----Original Message-----
From:   Roger Vicker [SMTP:rvicker@mddc.com]
Sent:   Tuesday, December 09, 1997 8:21 PM
To:     MIDRANGE-L@midrange.com
Subject:        Re: Getting SaveFile from PC World to the AS/400 via CA/Win

Bob, I do this often with the following changes.
1) Creat Savef
2) Savobj
3) Cpytosavf (a TAA tool or Midrange Computing or News400, I can't remember 
which
and not at AS400 now)
    It creates a PF with lrl = 528
4) CA to PC with a type of NO CHANGE
5) Create PF with lrl = 528 on new AS400
6) CA to other AS 400 with type of NO CHANGE
7) Cpyfrmsavf (see above)
8) Rstobj

Roger Vicker, CCP

Bob Crothers wrote:

> I sent a client a Save File via Internet Email.  This save file
> was created on the AS/400 via normal methods (CRTSAVF & SAVOBJ).
>
> I then FTP'd down to the PC world.  I can then FTP it back to
> another AS/400 and it works just fine (the trick is to create
> the save file first).
>
> I then Email'd the file from my PC via the Internet.  My client
> does not have TCP/IP available so FTP is not an option.  He is
> trying to use CAWin/95.  When he does the file transfer, he gets
> a message that says     "Not a Valid Database File".   If he
> creates a plain old flat file (crtpf rcdlen(xxxx)), it
> transfers, but of course is no longer a save file so can not do
> a rstobj on it.
>
> My question being, What is the trick to getting  this to work
> via CAWin?
>
> Unimportantly, starting TCP/IP on his as/400 is not an option.
>
> TIA
>
> Regards,
> Bob Crothers
> Cornerstone Communications
>
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
> | To unsubscribe from this list send email to 
MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: 
david@midrange.com
> +---



--
*** Vicker Programming and Service *** Have bits will byte ***
Intellectuals do it smartly.



+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to 
MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: 
david@midrange.com
+---
umidr << File: cpyfsavr.txt >>