//DLDFALIS JOB   (9999,IPO,10,10),               
//         'OPERATOR',                           
//         MSGCLASS=X,                           
//         MSGLEVEL=(1,1),                       
//         TIME=1440                             
//*                                              
//*                                              
//*                                              
//VR      EXEC PGM=IDCAMS,REGION=512K            
//SYSPRINT DD  SYSOUT=*                          
//SYSIN    DD  *                                 
    DEL KCI04 ALIAS                              
     DEF ALIAS(REL(CATALOG.MVSICF1.VTSOC01)  -   
         NAME(KCI04))  -                 
         CATALOG(CATALOG.MVSICFM.VBC2MCC