//DTSRT300 JOB (UI,4300,3400,T),'REPRINTSI',CLASS=A,MSGCLASS=X,         00000199
//         NOTIFY=ECNTSUP                                               00000299
//**                                                                    00000499
//   SET QTRLY='QTR092'                                                 00000599
//   SET LVLNODE='PROD'                                                 00000599
//   SET MSTNODE='PROD'                                                 00000699
//   SET LVDHOLD='YES'
//   SET LDEST='LOCAL'
//****
//  SET CHGNODE='PROD'
//  SET CHGMNBR='CHGM002'
//  SET   QTRLY='QTR092' <<<<<<<< CHANGE PARM BEFORE RUNNING
//  SET   LDEST='LOCAL'
//  SET   LHOLD='YES'
//**
//PROCLIB  JCLLIB ORDER=DOESTAX.PROD.PROCLIB                            00001399
//*                                                                     00001400
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001599
//*                                                                     00001600
//********************************************************************* 00004549
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0',         SORT REPORT RECORDS   00004600
//             COND=(0,LT)                                              00004700
//SYSOUT   DD  SYSOUT=*                                                 00004800
//SORTIN   DD  DSN=DOESTAX.PROD.CHG.BD220.RPT.&QTRLY.,DISP=SHR          00005099
//SORTOUT  DD  DSN=&&SRTOUT,
//             DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(8192,(1000,1000),RLSE),
//             DCB=(RECFM=FB,LRECL=388,BLKSIZE=31040)
//SYSIN    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRT300),DISP=SHR         00007399
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(50,10),RLSE)                      00007499
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(50,10),RLSE)                      00008099
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(50,10),RLSE)                      00008099
//********************************************************************* 00018000
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0',         SORT EMPLOYER RECORDS 00004600
//             COND=(0,LT)                                              00004700
//SYSOUT   DD  SYSOUT=*                                                 00004800
//SORTIN   DD  DSN=DOESTAX.PROD.CHG.EMPL,DISP=SHR                       00005099
//SORTOUT  DD  DSN=DOESTAX.PROD.CHG.EMPL,DISP=SHR                       00005099
//SYSIN    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSEMPL),DISP=SHR         00007399
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE)                        00007499
//********************************************************************* 00018000
//STEP0300 EXEC CHGRT300                                                00018100
//                                                                      00157099