//LISTCAT  JOB   (9999,IPO,10,10),        
//         'CORNERSTONE',                 
//         CLASS=A,                       
//         MSGCLASS=X,                    
//         MSGLEVEL=(1,1),                
//         NOTIFY=,                       
//         TIME=1440,                     
//         USER=                          
//LISTCAT EXEC PGM=IDCAMS,REGION=1024K    
//SYSPRINT DD  SYSOUT=X                   
//SYSIN    DD  *                          
 LISTCAT            -                     
   CAT(CATALOG.MVSICFM.VBC2MCC)