//TR$I01J2 JOB ,'KEN CALDWELL',MSGCLASS=H,NOTIFY=&SYSUID                00010000
//*                                                                     00020000
//STEP0    EXEC PGM=IEFBR14                                             00030000
//DD1      DD DSN=&SYSUID..JCL.DOGSORT,DISP=(MOD,DELETE),               00040000
//            UNIT=SYSDA,SPACE=(TRK,0)                                  00050000
//*                                                                     00060000
//STEP1    EXEC PGM=DOGPGM,                                             00070000
//         PARM='KEN CALDWELL'                                          00080000
//STEPLIB  DD DSN=&SYSUID..JCL.LOAD,DISP=SHR                            00090000
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(1,1))                              00100000
//SYSOUT   DD SYSOUT=*                                                  00110000
//DOGRPT   DD SYSOUT=*                                                  00120000
//DOGFILE  DD DSN=&SYSUID..JCL.LIB(DOGDATA),DISP=SHR                    00130000
//DOGSORT  DD DSN=&SYSUID..JCL.DOGSORT,DISP=(NEW,CATLG),                00140000
//            UNIT=SYSDA,SPACE=(TRK,(1,1)),                             00150000
//            DSORG=PS,RECFM=FB,LRECL=80,BLKSIZE=0                      00160000
//                                                                      00170000