|
I have a client that switched to a 3570 B11 from a 3490 type of drive. They used to keep a backup of 3 or 4 libraries on the tapes every monthend. When then 3570 was installed, they had something like 10 or 15 3490 tapes that needed to be converted to the 3570. The backup basically had the same library names on it. In order to convert the files to the 3570, I wrote the attached CL. The parms had to be passed to it (can't remember if the was a CMD to go along with it or the operator just entered it). In any case, you could write a front-end to pass the parms based on a file or something and have it submit this CL. The TAPFs were nothing more than pointing to the correct device. The parms are pretty straight-forward. &SEQ3490 is the sequence number of the source file, &LABEL is the tape label of the source file, &CRTDAT is the date that you want the file to have on the new media, &OPTxxxx are the ENDOPTs (ie. *REWIND, *LEAVE, etc). It might help you out Mike. PGM PARM(&SEQ3490 &LABEL &CRTDAT &OPT3490 &OPT3570) DCL VAR(&SEQ3490) TYPE(*CHAR) LEN(5) DCL VAR(&LABEL) TYPE(*CHAR) LEN(17) DCL VAR(&CRTDAT) TYPE(*CHAR) LEN(6) DCL VAR(&OPT3490) TYPE(*CHAR) LEN(7) DCL VAR(&OPT3570) TYPE(*CHAR) LEN(7) OVRTAPF FILE(TAP3490) SEQNBR(&SEQ3490) LABEL(&LABEL) ENDOPT(&OPT3490) OVRTAPF FILE(TAP3570) LABEL(&LABEL) CRTDATE(&CRTDAT) EXPDATE(*PERM) ENDOPT(&OPT3570) CPYF FROMFILE(TAP3490) TOFILE(TAP3570) MONMSG MSGID(CPA4036) DLTOVR FILE(*ALL) ENDPGM ==================================================== R. Bruce Orrell Protech Consulting Inc. Toronto, Ontario ===================================================== "Mike Berman" <mikeba777@xxxxxxxxx> wrote in message news:20050202142049.97908.qmail@xxxxxxxxxxxxxxxxxxxxxxxxxx > HI We are converting monthly applications saves from tapes on the previous > AS/400 (Magstar MP) to the newer and larger capacity ( more expensive) > Powerware 3581 tapes. Whereas w/ the old tapes, a monthly save would fit > on most of two tapes, here there are many months that can go on one new > tape. So I have been manually saving months via the DUPTAP command. The > problem is in looking at the DSPTAP you only see the same library, > repeating w/out an indication of what month it is. The way to do it would > be to save it as say ARJAN, ARFEB, for example, but this means to restore > if first and rename. Is there any better ideas for this?
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.