82 lines
2.7 KiB
Plaintext
82 lines
2.7 KiB
Plaintext
//DTSRQ451 JOB (UI,4300,3400,T),RQ451.VIEWDIR, 00000010
|
|
// CLASS=P,MSGCLASS=X, 00000010
|
|
// NOTIFY=ECNTSUP,
|
|
//**** TYPRUN=SCAN,
|
|
// REGION=0M
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//**** /* VIEWDIRECT OPTIONS
|
|
// SET LVLPROG='PROD'
|
|
// SET LVLNODE='PROD'
|
|
// SET LDEST=U@PRT65
|
|
// SET LVDHOLD='YES'
|
|
//* JOB : FIRST DELINQUENCY NOTICE HOUSEHOLD EMPLOYERS - ANNUAL
|
|
//****
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLPROG..PROCS.BATCH.LIB
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
|
|
//**** SORT THE REPORT RECORDS
|
|
//STEP0050 EXEC DTSRSORT,
|
|
// RPTGEN='(+0)'
|
|
//**** REPORT GENERATION
|
|
//****
|
|
//**** /* GEN A DUMMY RECORD FOR THE LABELS FILE
|
|
//DOESLBL1 EXEC PGM=IEBDG,
|
|
// COND=(0,LT)
|
|
//SYSPRINT DD SYSOUT=*
|
|
//LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE),
|
|
// UNIT=SYSDA,
|
|
// SPACE=(TRK,1),
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSLBL01),
|
|
// DISP=SHR
|
|
//**** /* POPULATE THE LABELS WORK FILE
|
|
//DOESLBL2 EXEC PGM=IDCAMS,
|
|
// COND=(0,LT)
|
|
//SYSPRINT DD SYSOUT=*
|
|
//FILEIN DD DSN=&&TMP901,
|
|
// DISP=(OLD,DELETE,DELETE),
|
|
// UNIT=SYSDA
|
|
//DOESVRO1 DD DSN=&&LBL901,
|
|
// DISP=(NEW,PASS,DELETE),
|
|
// UNIT=SYSDA,
|
|
// SPACE=(8192,(1000,1000),RLSE),
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSLBL02),
|
|
// DISP=SHR
|
|
//****
|
|
//STEP0100 EXEC PGM=DTSBD800, OUTPUT GENERATION
|
|
// COND=(0,LT)
|
|
//SYSOUT DD SYSOUT=*
|
|
//SYSABOUT DD SYSOUT=*
|
|
//SYSUDUMP DD SYSOUT=*
|
|
//**
|
|
//PARMIN DD DUMMY
|
|
//**//PARMIN DD *
|
|
//**DTSBD800,INC,451,452,716
|
|
//**/*
|
|
//**
|
|
//ATLSTIN DD DUMMY
|
|
//**
|
|
//DTSFVRI1 DD DSN=&&SRTRPT,DISP=(OLD,DELETE,DELETE)
|
|
//**
|
|
//DOESVRO1 DD DSN=&&LBL901,DISP=(OLD,PASS,DELETE)
|
|
//**
|
|
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR,
|
|
// AMP=('BUFNI=5,BUFND=10')
|
|
//**
|
|
//** DELINQUENT HOUSEHOLD REPORT
|
|
//RPT452R1 DD SYSOUT=(V,DTS452Y1),HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//**
|
|
//RPT451R1 DD DUMMY
|
|
//**
|
|
//RPT716R1 DD SYSOUT=*
|
|
//RPT716R2 DD SYSOUT=*
|
|
//RPT907R1 DD SYSOUT=*
|
|
//RPT907R2 DD SYSOUT=*
|
|
//RPT991R1 DD SYSOUT=*
|
|
//RPT991R2 DD SYSOUT=*
|
|
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT
|
|
//RPT980R1 DD SYSOUT=(V,DTS980Y1),HOLD=&LVDHOLD.,
|
|
// DEST=&LDEST.
|
|
//* 00640000
|