//ALVOLCAT JOB CLASS=A,MSGCLASS=Q,MSGLEVEL=(1,1),NOTIFY=&SYSUID 
//************************************************************  
//* REALIZA UNA DEFINICION DEL CATALOGO SYS1.VOLCAT.VGENERAL    
//************************************************************  
//PASO01 EXEC PGM=IDCAMS                                        
//SYSPRINT DD SYSOUT=A                                          
//SYSIN DD *                                                    
 DEFINE USERCATALOG -                                           
 (NAME(SYS1.VOLCAT.VGENERAL) -                                  
 VOLCATALOG -                                                   
 VOLUME(ZDSYS1) -                                               
 CYLINDERS(1 1))                                                
/*