//DELUCAT  JOB   (9999,IPO,10,10),                  
//         'CORNERSTONE',                           
//         CLASS=A,                                 
//         MSGCLASS=X,                              
//         MSGLEVEL=(1,1),                          
//         NOTIFY=,           -                     
//         TIME=1440,                               
//         USER=                                    
//DEFINE  EXEC PGM=IDCAMS,REGION=1024K              
//SYSPRINT DD  SYSOUT=X                             
//UCATVOL  DD  UNIT=3390,VOL=SER=TSOC02,DISP=SHR    
//SYSIN    DD  *                                    
     DELETE  CATALOG.MVSICF1.VTSOC02 UCAT FORCE     
/*