//DTSBX500 JOB (UI,4300,3400,T),SUTA.RUN,CLASS=A,MSGCLASS=X,            00000010
//*          TYPRUN=SCAN,
//           USER=#DOADTS,
//          NOTIFY=ECNTSUP
//PROCLIB  JCLLIB ORDER=DOESTAX.PROD.PROCS.BATCH.LIB                            00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001600
//*                                                                     00001700
//*****   EXTRACT EMPLOYER AND WAGE QUARTERLY DATA FOR SUTA PACKAGE
//*                                                                     00001700
//*       MUST CHANGE QTR BEFORE RUNNING JOB           03/09/17 ZL1     00001700
//*                                                                     00001700
//* SET QTR='20161'              /* PARM QUARTER
//  SET AQTR='YRQ20161'              /* PARM QUARTER
//  SET BQTR='YRQ20162'              /* PARM QUARTER
//  SET CQTR='YRQ20163'              /* PARM QUARTER
//  SET DQTR='YRQ20164'              /* PARM QUARTER
//*                                                                     00001700
//STEP0100 EXEC PGM=DTSBX500,    EXTRACT EMPLOYER AND WAGE DATA FOR
//             COND=(0,LT),      SDDS.
//             PARM='20161',
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFNAME DD  DSN=DOESTAX.PROD.VSAM.WAGE.NAME,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFWGH  DD  DSN=DOESTAX.PROD.VSAM.WGH,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSWAGE  DD  DSN=DOESTAX.PROD.SDDS.WAGE.&AQTR.,                       00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(CYL,(75,25),RLSE),                                00008000
//             DCB=(RECFM=FB,LRECL=86,BLKSIZE=25800)                    00009000
//*
//DTSTAX   DD  DSN=DOESTAX.PROD.SDDS.TAX.&AQTR.,                        00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(7200,(5000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=72,BLKSIZE=7200)                     00009000
//*
//DTSCONT  DD  DSN=DOESTAX.PROD.SDDS.CONTACT.&AQTR.,                    00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(7070,(5000,2000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=101,BLKSIZE=7070)                    00009000
//*
//DTSEMPL  DD  DSN=DOESTAX.PROD.SDDS.SUTAEMP.&AQTR.,                    00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(6800,(5000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=340,BLKSIZE=6800)                    00009000
//*
//STEP0200 EXEC PGM=DTSBX801,    BUILD PRED SUCC FILE FOR SDDS
//             COND=(0,LT),
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFPRED DD  DSN=DOESTAX.PROD.SDDS.PREDSUCC.&AQTR.,
//*            DISP=(OLD,KEEP,KEEP),
//             DISP=(,CATLG,DELETE),
//             UNIT=SYSDA,
//             SPACE=(6600,(100,50),RLSE),
//             DCB=(RECFM=FB,LRECL=22,BLKSIZE=6600)
//*
//FTPXFER  EXEC PGM=FTP
//SYSPRINT DD  SYSOUT=*
//OUTOUT   DD  SYSOUT=*
//SYSPUT   DD  SYSOUT=*,DCB=BLKSIZE=133
//SYSGET   DD  *,DCB=BLKSIZE=80
//INPUT    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSFA502),DISP=SHR
/*
//***********************************************************
//STEP0300 EXEC PGM=IEBGENER,COND=(0,LT)
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:SUNNY.PANDIT@DC.GOV',
//* USERDATA=('TO:ZARATH.LALPUTAN@DC.GOV',
//         'CC:VENKAT.UPPALA@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//*        'CC:SARAVANAN.SWAMINATHAN@DC.GOV',
//         'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: FY2016 Q1 SDDS DATA AVAILABLE.....ZL1',
//         'FILEDESC: DUTAS SDDS 2016 QTRS 1 THRU 4 READY',
//         'FILENAME:SDDS_DUTAS_QDATA.TXT')
//SYSUT1   DD DSN=DOESTAX.DEVL.SDDS.QDATA.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//*
//STEP0200 EXEC PGM=DTSBX500,    EXTRACT EMPLOYER AND WAGE DATA FOR
//             COND=(0,LT),      SDDS.
//             PARM='20162',
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFNAME DD  DSN=DOESTAX.PROD.VSAM.WAGE.NAME,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFWGH  DD  DSN=DOESTAX.PROD.VSAM.WGH,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSWAGE  DD  DSN=DOESTAX.PROD.SDDS.WAGE.&BQTR.,                       00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(CYL,(75,25),RLSE),                                00008000
//             DCB=(RECFM=FB,LRECL=86,BLKSIZE=25800)                    00009000
//*
//DTSTAX   DD  DSN=DOESTAX.PROD.SDDS.TAX.&BQTR.,                        00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(7200,(5000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=72,BLKSIZE=7200)                     00009000
//*
//DTSCONT  DD  DSN=DOESTAX.PROD.SDDS.CONTACT.&BQTR.,                    00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(7070,(5000,2000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=101,BLKSIZE=7070)                    00009000
//*
//DTSEMPL  DD  DSN=DOESTAX.PROD.SDDS.SUTAEMP.&BQTR.,                    00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(6800,(5000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=340,BLKSIZE=6800)                    00009000
//*
//STEP0200 EXEC PGM=DTSBX801,    BUILD PRED SUCC FILE FOR SDDS
//             COND=(0,LT),
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFPRED DD  DSN=DOESTAX.PROD.SDDS.PREDSUCC.&BQTR.,
//*            DISP=(OLD,KEEP,KEEP),
//             DISP=(,CATLG,DELETE),
//             UNIT=SYSDA,
//             SPACE=(6600,(100,50),RLSE),
//             DCB=(RECFM=FB,LRECL=22,BLKSIZE=6600)
//*
//FTPXFER  EXEC PGM=FTP
//SYSPRINT DD  SYSOUT=*
//OUTOUT   DD  SYSOUT=*
//SYSPUT   DD  SYSOUT=*,DCB=BLKSIZE=133
//SYSGET   DD  *,DCB=BLKSIZE=80
//INPUT    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSFB502),DISP=SHR
/*
//***********************************************************
//STEP0300 EXEC PGM=IEBGENER,COND=(0,LT)
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:SUNNY.PANDIT@DC.GOV',
//* USERDATA=('TO:ZARATH.LALPUTAN@DC.GOV',
//         'CC:VENKAT.UPPALA@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//*        'CC:SARAVANAN.SWAMINATHAN@DC.GOV',
//         'CC:FREDERICK.COOKE@DC.GOV',
//         'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: FY2016 Q2 SDDS DATA AVAILABLE.....ZL1',
//         'FILEDESC: DUTAS SDDS 2016 QTRS 1 THRU 4 READY',
//         'FILENAME:SDDS_DUTAS_QDATA.TXT')
//SYSUT1   DD DSN=DOESTAX.DEVL.SDDS.QDATA.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//*
//STEP0300 EXEC PGM=DTSBX500,    EXTRACT EMPLOYER AND WAGE DATA FOR
//             COND=(0,LT),      SDDS.
//             PARM='20163',
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFNAME DD  DSN=DOESTAX.PROD.VSAM.WAGE.NAME,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFWGH  DD  DSN=DOESTAX.PROD.VSAM.WGH,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSWAGE  DD  DSN=DOESTAX.PROD.SDDS.WAGE.&CQTR.,                       00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(CYL,(75,25),RLSE),                                00008000
//             DCB=(RECFM=FB,LRECL=86,BLKSIZE=25800)                    00009000
//*
//DTSTAX   DD  DSN=DOESTAX.PROD.SDDS.TAX.&CQTR.,                        00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(7200,(5000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=72,BLKSIZE=7200)                     00009000
//*
//DTSCONT  DD  DSN=DOESTAX.PROD.SDDS.CONTACT.&CQTR.,                    00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(7070,(5000,2000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=101,BLKSIZE=7070)                    00009000
//*
//DTSEMPL  DD  DSN=DOESTAX.PROD.SDDS.SUTAEMP.&CQTR.,                    00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(6800,(5000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=340,BLKSIZE=6800)                    00009000
//*
//STEP0200 EXEC PGM=DTSBX801,    BUILD PRED SUCC FILE FOR SDDS
//             COND=(0,LT),
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFPRED DD  DSN=DOESTAX.PROD.SDDS.PREDSUCC.&CQTR.,
//*            DISP=(OLD,KEEP,KEEP),
//             DISP=(,CATLG,DELETE),
//             UNIT=SYSDA,
//             SPACE=(6600,(100,50),RLSE),
//             DCB=(RECFM=FB,LRECL=22,BLKSIZE=6600)
//*
//FTPXFER  EXEC PGM=FTP
//SYSPRINT DD  SYSOUT=*
//OUTOUT   DD  SYSOUT=*
//SYSPUT   DD  SYSOUT=*,DCB=BLKSIZE=133
//SYSGET   DD  *,DCB=BLKSIZE=80
//INPUT    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSFC502),DISP=SHR
/*
//***********************************************************
//STEP0300 EXEC PGM=IEBGENER,COND=(0,LT)
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:SUNNY.PANDIT@DC.GOV',
//* USERDATA=('TO:ZARATH.LALPUTAN@DC.GOV',
//         'CC:VENKAT.UPPALA@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//*        'CC:SARAVANAN.SWAMINATHAN@DC.GOV',
//         'CC:FREDERICK.COOKE@DC.GOV',
//         'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: FY2016 Q3 SDDS DATA AVAILABLE.....ZL1',
//         'FILEDESC: DUTAS SDDS 2016 QTRS 1 THRU 4 READY',
//         'FILENAME:SDDS_DUTAS_QDATA.TXT')
//SYSUT1   DD DSN=DOESTAX.DEVL.SDDS.QDATA.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//*
//STEP0400 EXEC PGM=DTSBX500,    EXTRACT EMPLOYER AND WAGE DATA FOR
//             COND=(0,LT),      SDDS.
//             PARM='20164',
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFNAME DD  DSN=DOESTAX.PROD.VSAM.WAGE.NAME,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFWGH  DD  DSN=DOESTAX.PROD.VSAM.WGH,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSWAGE  DD  DSN=DOESTAX.PROD.SDDS.WAGE.&DQTR.,                       00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(CYL,(75,25),RLSE),                                00008000
//             DCB=(RECFM=FB,LRECL=86,BLKSIZE=25800)                    00009000
//*
//DTSTAX   DD  DSN=DOESTAX.PROD.SDDS.TAX.&DQTR.,                        00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(7200,(5000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=72,BLKSIZE=7200)                     00009000
//*
//DTSCONT  DD  DSN=DOESTAX.PROD.SDDS.CONTACT.&DQTR.,                    00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(7070,(5000,2000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=101,BLKSIZE=7070)                    00009000
//*
//DTSEMPL  DD  DSN=DOESTAX.PROD.SDDS.SUTAEMP.&DQTR.,                    00005000
//*            DISP=(OLD,KEEP,KEEP),                                    00006000
//             DISP=(NEW,CATLG,DELETE),                                 00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(6800,(5000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=340,BLKSIZE=6800)                    00009000
//*
//STEP0200 EXEC PGM=DTSBX801,    BUILD PRED SUCC FILE FOR SDDS
//             COND=(0,LT),
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.PROD.VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//*
//DTSFPRED DD  DSN=DOESTAX.PROD.SDDS.PREDSUCC.&DQTR.,
//*            DISP=(OLD,KEEP,KEEP),
//             DISP=(,CATLG,DELETE),
//             UNIT=SYSDA,
//             SPACE=(6600,(100,50),RLSE),
//             DCB=(RECFM=FB,LRECL=22,BLKSIZE=6600)
//*
//FTPXFER  EXEC PGM=FTP
//SYSPRINT DD  SYSOUT=*
//OUTOUT   DD  SYSOUT=*
//SYSPUT   DD  SYSOUT=*,DCB=BLKSIZE=133
//SYSGET   DD  *,DCB=BLKSIZE=80
//INPUT    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSFD502),DISP=SHR
/*
//***********************************************************
//STEP0300 EXEC PGM=IEBGENER,COND=(0,LT)
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:SUNNY.PANDIT@DC.GOV',
//* USERDATA=('TO:ZARATH.LALPUTAN@DC.GOV',
//         'CC:VENKAT.UPPALA@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//*        'CC:SARAVANAN.SWAMINATHAN@DC.GOV',
//         'CC:FREDERICK.COOKE@DC.GOV',
//         'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: FY2016 Q4 SDDS DATA AVAILABLE.....ZL1',
//         'FILEDESC: DUTAS SDDS 2016 QTRS 1 THRU 4 READY',
//         'FILENAME:SDDS_DUTAS_QDATA.TXT')
//SYSUT1   DD DSN=DOESTAX.DEVL.SDDS.QDATA.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//*************************END JOB *************************************