//DTSMIN02 JOB (UI,4300,3400,T),SRJ,CLASS=A,MSGCLASS=X,                 JOB21442
//          USER=#DOADTS,
//          NOTIFY=ECNTSUP
//*                                                                     00001700
//  SET MSTNODE='PROD'                                                  00001700
//  SET LVLNODE='CONV'                                                  00001700
//*                                                                     00001700
//PROCLIB  JCLLIB ORDER=DOESTAX.PROD.PROCLIB                            00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001600
//*                                                                     00001700
//STEP0100 EXEC PGM=DTSBS412,
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*                                                                     00001700
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFWGH  DD  DSN=DOESTAX.&MSTNODE..VSAM.WGH,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//***
//DTSFSENT DD DSN=DOESTAX.CONV.SENTMINI(0),DISP=SHR
//***
//BX411TMP DD  DSN=&&X411TMP,                                           00005000
//             DISP=(NEW,PASS,DELETE),                                  00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(CYL,(20,10),RLSE),                                00008000
//             DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720)                   00009000
//*                                                                     00001700
//EXPBX100 DD  DUMMY                                                    00005000
//*                                                                     00001700
//EXPBX102 DD  DSN=DOESTAX.CONV.ESSP.C102,                              00005000
//*            DISP=(NEW,CATLG,DELETE),                                 00006000
//             DISP=SHR,                                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(29000,(1000,1000),RLSE),                          00008000
//             DCB=(RECFM=FB,LRECL=29,BLKSIZE=29000)                    00009000
//*                                                                     00001700
//EXPBX104 DD  DSN=DOESTAX.CONV.ESSP.C104,                              00005000
//*            DISP=(NEW,CATLG,DELETE),                                 00006000
//             DISP=SHR,                                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(21600,(1000,1000),RLSE),                          00008000
//             DCB=(RECFM=FB,LRECL=119,BLKSIZE=23800)                   00009000
//*                                                                     00001700
//EXPBX106 DD  DSN=DOESTAX.CONV.ESSP.C106,                              00005000
//*            DISP=(NEW,CATLG,DELETE),                                 00006000
//             DISP=SHR,                                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(26500,(1000,1000),RLSE),                          00008000
//             DCB=(RECFM=FB,LRECL=53,BLKSIZE=26500)                    00009000
//*                                                                     00001700
//EXPBX108 DD  DSN=DOESTAX.CONV.ESSP.C108,                              00005000
//*            DISP=(NEW,CATLG,DELETE),                                 00006000
//             DISP=SHR,                                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(24000,(1000,1000),RLSE),                          00008000
//             DCB=(RECFM=FB,LRECL=24,BLKSIZE=24000)                    00009000
//*                                                                     00001700
//EXPBX110 DD  DSN=DOESTAX.CONV.ESSP.C110,                              00005000
//*            DISP=(NEW,CATLG,DELETE),                                 00006000
//             DISP=SHR,                                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(24900,(1000,1000),RLSE),                          00008000
//             DCB=(RECFM=FB,LRECL=249,BLKSIZE=24900)                   00009000
//*                                                                     00001700
//EXPBX120 DD  DUMMY                                                    00005000
//*                                                                     00001700
//EXPBX130 DD  DUMMY                                                    00005000
//*                                                                     00001700
//EXPBX131 DD  DUMMY
//*
//EXPBX140 DD  DUMMY                                                    00005000
//*                                                                     00001700
//EXPBX141 DD  DUMMY                                                    00005000
//*XPBX141 DD  DSN=DOESTAX.&LVLNODE..C141.MINI,                         00005000
//*            DISP=(NEW,CATLG,DELETE),                                 00006000
//*            DISP=SHR,                                                00006000
//*            UNIT=SYSDA,                                              00007000
//*            SPACE=(CYL,(10,10),RLSE),
//*            DCB=(RECFM=FB,LRECL=102,BLKSIZE=30600)                   00009000
//*                                                                     00001700
//EXPBX142 DD  DUMMY
//*
//EXPBX145 DD  DUMMY
//*
//*******************
//*
//STEP0200  EXEC PGM=DTSBS413,REGION=1024K,COND=(0,LT)                  00009*18
//*
//DTSFSENT DD DSN=DOESTAX.CONV.SENTMINI(0),DISP=SHR
//*
//DSKFILE DD   DSN=DOESTAX.CONV.ESSP.MSCL,                              00011*18
//             DISP=SHR,UNIT=SYSDA,                                     00011*18
//*            DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,                      00011*18
//             SPACE=(CYL,(100,25),RLSE),
//             DCB=(RECFM=FB,LRECL=477,BLKSIZE=477)
//*                                                                     00011*18
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//***
//EXPBX100 DD  DUMMY
//*
//EXPBX102 DD  DUMMY
//*
//EXPBX104 DD  DUMMY
//**
//BX411TMP DD  DSN=&&X411TMP,
//             DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(CYL,(20,10),RLSE),
//             DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720)
//*
//EXPBX106 DD  DUMMY
//*
//EXPBX108 DD  DUMMY
//*
//EXPBX110 DD  DUMMY
//*
//EXPBX120 DD  DUMMY
//*
//EXPBX131 DD  DUMMY
//*
//EXPBX140 DD  DUMMY
//*
//EXPBX141 DD  DUMMY
//*
//EXPBX142 DD  DUMMY
//*
//EXPBX145 DD  DUMMY
//*
//*****************************************************************
//* TO CHECK IF THE C102 MINI CONVERSION HAS DATA
//*****************************************************************
//STEP0300 EXEC  PGM=IDCAMS
//INPUT    DD DSN=DOESTAX.CONV.ESSP.C102,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
 PRINT INFILE(INPUT) COUNT(1)
/*
//*
//*****************************************************************
//* TO UPDATE EVENT LOG ENTRY (SCREEN 72)
//*****************************************************************
//STEP0400 EXEC PGM=DTSBS414,COND=(0,NE,STEP0300),REGION=4M
//*
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//CAIMRPTS DD  SYSOUT=*
//*
//EMPFILE1 DD  DSN=DOESTAX.CONV.ESSP.C102,DISP=SHR
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//*
//DTSFREF  DD  DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFATC  DD  DSN=DOESTAX.&MSTNODE..VSAM.ATC,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFWTC  DD  DSN=DOESTAX.&MSTNODE..VSAM.WTC,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFWGH  DD  DSN=DOESTAX.&MSTNODE..VSAM.WGH,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFBTCO DD  DSN=DOESTAX.&MSTNODE..BTC(+1),
//             DISP=(,CATLG,DELETE),
//             SPACE=(8192,(100,200),RLSE),
//             DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//*****************************************************************
//* EMAIL STEP
//*****************************************************************
//IF1    IF STEP0400.RC=0 THEN
//*
//STEP0500 EXEC PGM=IEBGENER,REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:ROSALIND.HOLBROOK@DC.GOV',
//            'TO:ARAVIND.VITTA@SAGITEC.COM',
//            'TO:YINKA.OLAREWAJU-ALO@DC.GOV',
//            'TO:MARGARET.HERNANDEZ@DC.GOV',
//            'TO:TIMOTHY.PERLOW@DC.GOV',
//            'TO:PRABHU.TEGUR@SAGITEC.COM',
//            'CC:SRUJANI.CHANDRAGIRI@DC.GOV',
//            'CC:ZARATH.LALPUTAN@DC.GOV',
//            'CC:RAJINI.JUJJAVARAPU@DC.GOV',
//         'SUBJECT: DAILY MINI CONVERSION REGISTRATION(S) READY '),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DSN=DOESTAX.CONV.SENTRPT.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//         ELSE
//STEP0600 EXEC PGM=IEBGENER,REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:ROSALIND.HOLBROOK@DC.GOV',
//            'TO:ARAVIND.VITTA@SAGITEC.COM',
//            'TO:YINKA.OLAREWAJU-ALO@DC.GOV',
//            'TO:MARGARET.HERNANDEZ@DC.GOV',
//            'TO:TIMOTHY.PERLOW@DC.GOV',
//            'TO:PRABHU.TEGUR@SAGITEC.COM',
//            'CC:SRUJANI.CHANDRAGIRI@DC.GOV',
//            'CC:ZARATH.LALPUTAN@DC.GOV',
//            'CC:RAJINI.JUJJAVARAPU@DC.GOV',
//         'SUBJECT: NO DAILY MINI CONV REGISTRATION TODAY...'),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DSN=DOESTAX.CONV.MINICONV.TXT1,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//         ENDIF
//*
//STEP0700 EXEC PGM=IEBGENER,REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:ROSALIND.HOLBROOK@DC.GOV',
//            'TO:ARAVIND.VITTA@SAGITEC.COM',
//            'TO:YINKA.OLAREWAJU-ALO@DC.GOV',
//            'TO:MARGARET.HERNANDEZ@DC.GOV',
//            'TO:TIMOTHY.PERLOW@DC.GOV',
//            'TO:PRABHU.TEGUR@SAGITEC.COM',
//            'CC:SRUJANI.CHANDRAGIRI@DC.GOV',
//            'CC:ZARATH.LALPUTAN@DC.GOV',
//            'CC:RAJINI.JUJJAVARAPU@DC.GOV',
//         'SUBJECT: ACCOUNTS PENDING FOR MINI CONV IN DUTAS.'),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DSN=DOESTAX.CONV.CURRRPT.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//*