|
//BARR$SN2 JOB , |
|
// NOTIFY=&SYSUID,COND=(4,LT),MSGCLASS=A |
|
/*ROUTE PRINT U1 <==== |
|
//************************************************************* |
|
//* |
|
//* THIS STEP LINKS THE ACTUAL TP THAT WILL BE INVOKED |
|
//* |
|
//* 1) Change 'xxxx.LINKLIB' to the name of the |
|
//* APF authorized library specified on the STEPLIB DD card |
|
//* in the TP definition. |
|
//* |
|
//************************************************************* |
|
//LINK EXEC PGM=IEWL, |
|
// PARM='MAP,LIST,AC=1' |
|
//SYSPRINT DD SYSOUT= |
|
//SYSUT1 DD SPACE=(CLY,(1,1)),UNIT=SYSDA |
|
//SYSLMOD DD DISP=SHR,DSN=xxxx.LINKLIB(BARR$SN) |
|
//SYSLIN DD DISP=SHR,DSN=&SYSUID..APPC$SN.CNTL(OBJECT) |
|
//* |