Hi George,

I believe we use the same approach (build backup job via REXX, as you
see creating on-site and off-site backups), and our created job looks
like this:

//ACT103   EXEC LRSTGBKP,PAC=ACT103                
//*                                                
//SCT100   EXEC LRSTGBKP,PAC=SCT100,               
//        VOLREF=',REF=*.ACT103.DFDSS1.TAPE1',FS=2,
//             OFFREF=',REF=*.ACT103.DFDSS1.TAPE2' 
//*                                                
//SCT101   EXEC LRSTGBKP,PAC=SCT101,               
//        VOLREF=',REF=*.ACT103.DFDSS1.TAPE1',FS=3,
//             OFFREF=',REF=*.ACT103.DFDSS1.TAPE2' 
//*                                                
//ACT102   EXEC LRSTGBKP,PAC=ACT102,               
//        VOLREF=',REF=*.ACT103.DFDSS1.TAPE1',FS=4,
//             OFFREF=',REF=*.ACT103.DFDSS1.TAPE2' 
//*    .... etc                                             

The cataloged PROC is:

//LRSTGBKP PROC PAC=NONE,DAYS='15',TAPE=TAPE,PRINT=*,VOLREF='',FS=1,
//       OFFREF=''                                                  
//DFDSS1       EXEC PGM=ADRDSSU                                     
//SYSPRINT   DD SYSOUT=&PRINT                                       
//DISK1      DD UNIT=SYSALLDA,DISP=SHR,VOL=SER=&PAC                 
//TAPE1      DD DSN=PSSTG.OPER.BKP.&PAC,                            
//             DISP=(NEW,KEEP,DELETE),                              
//             BLKSIZE=0,                                           
//             UNIT=(&TAPE,,DEFER),                                 
//             LABEL=(&FS,RETPD=&DAYS),                             
//             VOL=(PRIVATE,RETAIN,,10&VOLREF)                      
//TAPE2      DD DSN=PSSTG.OPER.OFF.&PAC,                            
//             DISP=(NEW,KEEP,DELETE),                              
//             BLKSIZE=0,                                           
//             UNIT=(&TAPE,,DEFER),                                 
//             LABEL=(&FS,RETPD=&DAYS),                             
//             VOL=(PRIVATE,RETAIN,,10&OFFREF)                      
//SYSIN      DD DISP=SHR,DSN=PRSTG.PERM.DATA(DFBACK)                



Best regards,
David Tidy                                      Tel:(31)115-67-1745
IS Technical Management/SAP-Mf          Fax:(31)115-67-1762     
Dow Benelux B.V.                                Mailto:dt...@dow.com



>>> George Rodriguez <rodrigu...@palmbeach.k12.fl.us> 12/14/2009 12:10
PM >>>
I've got a VTL (TS7720) and 2 3592 tape drives. A rexx exec was written,
to use DFSMSdss to back up volumes for disk to the 3592. The problem is
that the job is divided into 4 parts because of the step limitation. Is
there a way of keeping the tape mounted and at the same position after
job 1 completes?

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to