Catalog procedure

Procedure definition

//CATLG PROC                                                      
//STEP1    EXEC  PGM=IEFBR14                                      
//DD1 DD    DSN=KC03H0E.Z2.Z2,DISP=(NEW,CATLG),SPACE=(TRK,(5,2,0))
//SYSPRINT DD SYSOUT=*    
     
Invoking procedure

//MYJOB  JOB 1,'MCA',CLASS=A              
//       JCLLIB ORDER=(KC03H0E.MCA2.PDS)  
//STEP2  EXEC CATALOG1                    
//SYSIN DD *