Tuesday, 17 April 2012

IEBPTPCH


//IEBPTPCH JOB
//         EXEC PGM=IEBPTPCH
//SYSUT1   DD DSN=KC03H0E.MCA2.PDS(A),DISP=SHR
//SYSUT2   DD DSN=KC03H0E.MCA2.PDS(A1),DISP=SHR
//SYSIN    DD *
 PRINT TYPORG=PS
/*
//SYSPRINT DD SYSOUT=*
//

No comments:

Post a Comment