Bruce,

We do a "disk to disk" offload every night, issuing the following commands at 
23:00: 
$T OFFLOAD1,DSN=SYS3.JES2.OFFLOAD  
$TOFF1.ST,Q=US                     
$S OFFLOAD1,TYPE=TRANSMIT          

At 24:00, we issue:
$P OFFLOAD1

SYS3.JES2.OFFLOAD is a permanent data set on a 3390-9 defined as: 
DSNTYPE=LARGE, DSORG=PS, RECFM=U, LRECL=0, BLKSIZE=4042 

The next day, at 9:45, we "stack" a copy of the offload to a 3590 tape.  

Here's the job we ran today:
//COPYOFLD JOB 1,'COPY JES OFFLOAD',CLASS=K,MSGCLASS=S,REGION=0M
//   JCLLIB ORDER=SYS2.SYSTEMS.PARMLIB  
//* DUMMY ALLOCATION FOR RETAIN  
//DSTEP    EXEC PGM=IEFBR14,REGION=2M                              
//SYSPRINT  DD SYSOUT=*                                            
//SYSOUT    DD SYSOUT=*                                            
//   INCLUDE MEMBER=OFFINPUT                                    
//* BUILD THE JES2 OFFLOAD HISTORY                                 
//HISTORY  EXEC PGM=ICEGENER                                       
//SYSPRINT DD SYSOUT=*                                             
//SYSIN    DD DUMMY                                                
//SYSUT1   DD  DSN=SYS3.JES2.OFFLOAD,DISP=SHR                      
//    INCLUDE MEMBER=OFFLABEL 

Include member OFFINPUT: 

//TAPEDD   DD  DSN=BACKUP.JES2.OFFLOAD.D120225,   
//    DISP=SHR,VOL=(,RETAIN),UNIT=(,,DEFER)       

Include member OFFLABEL:

//SYSUT2   DD  DSN=BACKUP.JES2.OFFLOAD.D120226,                    
//        UNIT=HPCT,LABEL=(26,SL,RETPD=65),                        
//        DISP=(NEW,CATLG),VOL=(,RETAIN,,,REF=*.DSTEP.TAPEDD),     
// DCB=(MODEL,DSORG=PS,LRECL=0,RECFM=U,BLKSIZE=4042,TRTCH=COMP)    

The above members are built each day by a job that runs a REXX to get today's 
date and determine yesterday's date and the day before.  The day of the month 
is also the file sequence.  On the first day of the month member OFFINPUT has 
NULLFILE for the DSN so we get a new tape each month.   

We have always, IIRC, been able to store an entire month of output onto a 
single 3590 tape.  So, if someone is looking for a job that ran on the 14th, we 
go to the 14th file on the tape.  

There is some exposure to losing data, but our shop has not considered the 
offloaded job data to be critical data.  

HTH,
Greg Shirey
Ben E. Keith Company 


-----Original Message-----
From: IBM Mainframe Discussion List On Behalf Of Bruce Richardson

I would like to get some feedback from others on the list as to what they do 
for JES2 OFFLOAD. 

One of the questions I have is, can JES2 append to an existing OFFLOAD tape? I 
would like to be able to mount the same tape for month (roughly 20 working 
days). I know that as job numbers roll over 9999 to 1 I might get into the slim 
possibility of JOBNUM/JOBNAME conflicts on restoring the output.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to