//DTSRQ413 JOB (UI,4300,3400,T),BE413,CLASS=P,MSGCLASS=X,               00010047
//         NOTIFY=ECNTSUP,                                              00020047
//****     TYPRUN=SCAN,                                                 00030047
//****     USER=#DOADTS,                                                00040049
//         REGION=0M                                                    00050047
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00060047
//   SET LVLNODE='PROD'                                                 00070047
//   SET   LHOLD='YES'                                                  00080047
//****                                                                  00090047
//*    ON REQUEST REPORT DTSBR413 -                                 *   00100047
//*                      WRITE OFF CANDIDATE LIST (CR)                  00110047
//****                                                                  00120047
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB                       00130047
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00140047
//**                                                                    00150047
//*                       NO BACKUP NEEDED BEFORE THIS REPORT           00160047
//STEP0200 EXEC DTSUEXT,                                                00170047
//             RUNTYPE='OR'                                             00180047
//*                                                                     00190047
//STEP0100.EXTPARM DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRQ413),     00200052
//         DISP=SHR                                                     00220052
//*                        REPORT RECORD SORT                           00230047
//STEP0250 EXEC DTSRSORT                                                00240047
//*                        REPORT GENERATION                            00250047
//STEP0300 EXEC DTSRQRPT                                                00260047
//*                                                                     00260151
//**                           DELINQUERNT EMPLYR ACCT NBR LIST         00264051
//STEP0100.RPT413R1 DD  SYSOUT=Z                                        00265051
//**                           UNUSUAL CONDITIONS ENCOUNTERED REPORT    00267051
//STEP0100.RPT907R1 DD  SYSOUT=Z                                        00268051
//**                                                                    00269151
//STEP0100.RPT907R2 DD  DUMMY                                           00269251
//**                           CONTROL REPORT SUMMARY                   00269351
//STEP0100.RPT980R1 DD  SYSOUT=X                                        00269451
//*                                                                     00269651
//*                                                                     00270047
//DOESLBLP.DOESLBL1 DD DUMMY                      LABELS                00290000
//*                                                                     00291051