Good Morning Gentle Readers,
 
I was called because the following message was coming up on the console:
IEFTMS9 TMC BACKUP REQUIRED, AUDIT FILE UTILISATION IS CURRENTLY 82%.
 
I executed the following job:
//STEP1     EXEC PGM=TMSCOPY,REGION=7M      
//TMSRPT     DD  SYSOUT=*                                        
//TMSOPTNS   DD  DISP=SHR,DSN=SYS4.TMS.PARMLIB(TMSOPTNS)         
//DUMPDD     DD  DSN=TMS.HESZ94M1(+1),UNIT=TAPE,                 
//          LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),   
//          VOL=(,RETAIN)                
//DUMPDD2    DD  DSN=TMS.HESZ94M2(+1),UNIT=TAPE,                 
//          LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),   
//          VOL=(,RETAIN),DATACLAS=OFFSITE                       
//AUDITDD    DD  DSN=SYS4.TMS.AUDIT,DISP=SHR                     
//AUDUMP     DD  DSN=&&AUDIT,UNIT=PASS,DISP=(,PASS),             
//     SPACE=(CYL,(20,5)),DCB=BLKSIZE=8880  
//*                                                                               
 //STEP2     EXEC PGM=IEBGENER,COND=(0,LT)                              
//SYSPRINT   DD  SYSOUT=*                                              
//SYSUT1     DD  DSN=&&AUDIT,DISP=(OLD,PASS)                           
//SYSUT2     DD  DSN=TMS.HESZ94AF(+1),UNIT=TAPE,LABEL=2,                      
//    VOL=REF=*.STEP1.DUMPDD,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32560) 
//SYSIN      DD  
DUMMY                                                              
//*                                               
//STEP3     EXEC PGM=IEBGENER,COND=(0,LT)                              
//SYSPRINT   DD  SYSOUT=*                                              
//SYSUT1     DD  DSN=&&AUDIT,DISP=(OLD,DELETE)                         
//SYSUT2     DD  DSN=TMS.HESZ94AF.COPYIDS(+1),UNIT=TAPE,LABEL=2,       
//     VOL=REF=*.STEP1.DUMPDD2,DATACLAS=OFFSITE,                       
//     DISP=(NEW,CATLG),DCB=(DUMDSCB,BLKSIZE=32560)                    
//SYSIN      DD  DUMMY                                                 
//*                                                                    
 
What I would like to know if this is the correct action to take or should I 
have done something else.  Please advise.
 
Thanks in advance.


 
 

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

Reply via email to