Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Backup of AS400 w/o tape drive

Posted on 2004-08-27
3
Medium Priority
?
722 Views
Last Modified: 2009-12-03
Hello,

I have a problem.  We have an As400 that needs to be backed up.  In the past we have only done this through the use of a tape drive.  However, the tape drive we have has failed and it turns out it was not under contract for repair.  Is there temporary solution to back up the AS400 without a tape drive (preferably FTP)?  I have tried to FTP for backup but I can only get the actual "data" to move over.  Maybe there is a way to make the backup destination(Windows 2000 Server) recognize the AS400 file structure?

Thanks!

Sorry if I am unclear im not the DB admin, just a programmer who is afraid of working without a net!
0
Comment
Question by:Navicerts
  • 2
3 Comments
 
LVL 18

Accepted Solution

by:
Dave Ford earned 1500 total points
ID: 11917361
Here's what I would do. First, identify which libraries you'd like to back up. Then, create an empty save-file. Then, save the librarys to that save-file. Lastly, FTP the save-file to your PC desktop and burn it to CD.

e.g.
Let's assume I want to back up a library called CGIDemo

First, create the empty save-file:
CRTSAVF FILE(MYLIB/DELETEME)

Then, save the library to that save-file:
SAVLIB LIB(CGIDEMO) DEV(*SAVF) SAVF(MYLIB/DELETEME) SAVACT(*SYSDFN)

Lastly, FTP the save-file to your PC desktop:
C:\>ftp myAS400
Connected to myAS400.mydomain.com.
220-QTCP at MYAS400.ETHERLAN.
220 Connection will close if idle more than 5 minutes.
User (myas400.mydomain.com:(none)): myUserName
331 Enter password.
Password:
230 MYUSERNAME logged on.
ftp> bin
200 Representation type is binary IMAGE.
ftp> get mylib/deleteme c:\deleteme.savf
200 PORT subcommand request successful.
150 Retrieving member DELETEME in file DELETEME in library MYLIB.
250 File transfer completed successfully.
ftp: 515328 bytes received in 0.50Seconds 1030.66Kbytes/sec.
ftp> bye
221 QUIT subcommand received.

Burn c:\deleteme.savf to a CD, and (voila!) it's backed up.

Good luck!
Dave
0
 
LVL 7

Author Comment

by:Navicerts
ID: 11930091
Dave,
0
 
LVL 7

Author Comment

by:Navicerts
ID: 11930111
Dave,

Thank You,

Unfortunatly, i won't be able to test this as soon as I wanted to last week.  The good news...  Turns out i just needed to replace the fan in the tape drive now i have a working tape drive again.  But it seems very logical, why didn't I think of that!  I'll give it a shot later (I'm sure it will work fine).

Thanks Again!
0

Featured Post

Veeam Disaster Recovery in Microsoft Azure

Veeam PN for Microsoft Azure is a FREE solution designed to simplify and automate the setup of a DR site in Microsoft Azure using lightweight software-defined networking. It reduces the complexity of VPN deployments and is designed for businesses of ALL sizes.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Recursive SQL in UDB/LUW (you can use 'recursive' and 'SQL' in the same sentence) A growing number of database queries lend themselves to recursive solutions.  It's not always easy to spot when recursion is called for, especially for people una…
Recursive SQL in UDB/LUW (it really isn't that hard to do) Recursive SQL is most often used to convert columns to rows or rows to columns.  A previous article described the process of converting rows to columns.  This article will build off of th…
This course is ideal for IT System Administrators working with VMware vSphere and its associated products in their company infrastructure. This course teaches you how to install and maintain this virtualization technology to store data, prevent vuln…
This lesson discusses how to use a Mainform + Subforms in Microsoft Access to find and enter data for payments on orders. The sample data comes from a custom shop that builds and sells movable storage structures that are delivered to your property. …
Suggested Courses
Course of the Month11 days, 16 hours left to enroll

916 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question