RE: New AS\400 user

["David Dunfield" <ddunfie@xxxxxxxxxxxx>]

Try to do a DSPTAP DEV(TAP01) DATA(*SAVRST).
If your tape files are in Save Restore Format you should see the name of the
library that was saved and a list of the objects saved.
If you see that information
Enter   RSTOBJ OBJ(*ALL) SAVLIB(Library Name) DEV(TAP01) MBROPT(*ALL)
ALWOBJDIF(*ALL) TOLIB(TAPEDUMP)

                     If you do not see save restore information you will
need to do a CPYFRMTAP. You will need to do a DSPTAP DEV(TAP01) and note the
file names, tape sequence #, record and block lengths for the file and use
those as parameters on the CPYFRMTAP command. You will need to create
Physical Files that match the tape files in your library using CRTPF
specifying Library/File and a record length to match the tape file record
length before your copy.


 -----Original Message-----
From:   owner-midrange-l@midrange.com [mailto:owner-midrange-l@midrange.com]
On Behalf Of Mark Davies
Sent:   Tuesday, March 21, 2000 9:41 AM
To:     MIDRANGE-L@midrange.com
Subject:        New AS\400 user

Hello all.

Just like to introduce myself as a new member to this group, and maybe
get a few questions answered.

I have a 9402 E04 CISC model, OS/400 V3R1M0 I'm just getting (trying) to
know my way around this system, even though I have had it for a year
now, I lost interest and now I'm back in there. This time round I've
found I can do a lot more with it (even though 9 / 10 times whatever I
try fails, but I'm sure that will change).

Anyhow, my latest quest: to copy files from a tape into a lib that I
have created.

The lib is TAPEDUMP
Tape dev is TAP01
The Volume label is 001
The first file is QTEMP

Here is what I have tried:

CHGCURLIB TAPEDUMP

RSTLIB SAVLIB(CURLIB) DEV(TAP01) VOL(001) LABEL(*ALL)
RSTLIB SAVLIB(TAPEDUMP) DEV(TAP01) VOL(001) LABEL(QTEMP)
RSTLIB SAVLIB(TAPEDUMP) DEV(TAP01) VOL(001) LABEL(*)
RSTLIB SAVLIB(TAPEDUMP) DEV(TAP01) VOL(001) LABEL(*ALL)
RSTLIB SAVLIB(TAPEDUMP) DEV(TAP01) VOL(001)

Always failes with something like File QTEMP not selected. File label
mismatch.

Hay, I think I've found the answer, CPYFRMTAP.

I take it then, that the RSTLIB will only Restore file that exist in the
Library?

Oh well, I'll get there. Anyway once again Hi
Regards
Mark Davies
SGI
SUN
AS/400
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@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
+---

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@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
+---