System iNetwork

 System iNEWS Code

Home » Code » Using Save Files
  Using Save Files

What are Save Files?

IBM defines a save file as a file allocated in auxiliary storage that can be used to store saved data on disk, without requiring diskettes or tapes. A save file is a regular AS/400 file with a record length of 528 bytes. A save file can contain source physical files, data files, and compiled objects.

The advantage of a save file is that you only have to upload one file to the iSeries, instead of many smaller source files, and with iSeries NEWS published code, the objects are usually already compiled. The disadvantage is that they're OS/400 release dependent. This means that if a save file was saved on a V5R2 machine, it can't be used a machine running a previous release of OS/400.
  1. Uploading using FTP

  2. With a newer Zip utility such as WinZip, open the zip file containing the save file.
  3. Extract the file save file into a temporary directory. We'll use c:\temp in this example.
  4. Make sure the save file 'NEWSyymm' exists in QGPL. If not, create it with the following iSeries command:
    CRTSAVF FILE(QGPL/NEWSyymm)
  5. Open a DOS window and type 'cd c:\temp'
  6. In the same DOS window, use the 'ftp' command in Windows, to FTP 'NEWSyymm.svf' into NEWSyymm in QGPL. Be sure to use the 'bin' command to change to binary mode. Here is a sample FTP session:
    C:\temp>ftp nnn.nnn.nnn.nnn
    Connected to nnn.nnn.nnn.nnn.
    220-QTCP at AS400.
    220 Connection will close if idle more than 5 minutes.
    User (nnn.nnn.nnn.nnn:(none)): userid
    331 Enter password.
    Password: XXXXX
    230 USERID logged on.
    ftp> bin
    200 Representation type is binary IMAGE.
    ftp> put NEWSyymm.svf
    200 PORT subcommand request successful.
    150 Sending file to member SAVF in file NEWSyymm in library QGPL.
    250 File transfer completed successfully.
    3792624 bytes sent in 78.38 seconds 48.39 Kbytes/sec)
    ftp> quit
    221 QUIT subcommand received.
  7. From an iSeries command prompt, run the following command:

RSTLIB SAVLIB(NEWSyymm) DEV(*SAVF) SAVF(QGPL/NEWSyymm) 
Help Topics
Using Bundle Files
Using Individual Files
Using iSeries Save Files

You are at a pentontech.com site.
If you have a question about our products or about an order you have placed,
please contact the customer service department at (800) 650-1804 or (970) 203-2914 or via e-mail.
If you have a technical question about this site, please contact the Web Master.
Terms of Use | Privacy Statement
© 2010Penton Media, Inc.