Tuesday, 17 April 2012

Backward reference(pgm)


//JOB1 JOB 1,'MCA'
//STEP1 EXEC PGM=IEFBR14
//DD1 DD DSN=KC03H0E.MCA5.PDS,
// DISP=(NEW,CATLG),          
// SPACE=(TRK,(5,2,0))        
//STEP2 EXEC PGM=*.STEP1.DD1  
//SYSPRINT DD SYSOUT=*        
//SYSIN DD DUMMY  

No comments:

Post a Comment