//TR$I01J3 JOB ,'KEN CALDWELL',MSGCLASS=H,NOTIFY=&SYSUID 00010000 //* 00020000 //STEP1 EXEC PGM=DOGPGM, 00030000 // PARM='KEN CALDWELL' 00040000 //STEPLIB DD DSN=&SYSUID..JCL.LOAD,DISP=SHR 00050000 //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) 00060000 //SYSOUT DD SYSOUT=* 00070000 //DOGRPT DD SYSOUT=* 00080000 //DOGFILE DD DSN=&SYSUID..JCL.DOGSORT,DISP=SHR 00090000 //DOGSORT DD DUMMY 00100000 // 00110000