DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
76
JCL/ECNTVDAY.jcl
Normal file
76
JCL/ECNTVDAY.jcl
Normal file
@ -0,0 +1,76 @@
|
||||
//ECNTVDAY JOB (UI,4300,3400,T),DLYRPROD.VIEWDIR,
|
||||
// CLASS=P,MSGCLASS=X,
|
||||
// NOTIFY=ECNTSUP,
|
||||
//**** TYPRUN=SCAN,
|
||||
// REGION=0M
|
||||
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
||||
//*******************************************************************
|
||||
//****
|
||||
//**** DO NOT RUN THIS JOB - Z
|
||||
//****
|
||||
//*******************************************************************
|
||||
//*******************************************************************
|
||||
//**** SPECIAL SETUP TO RE-RUN DAILY PROD REPORTS FROM TEST ID
|
||||
//**** (SPEC. FOR VIEW DIRECT)
|
||||
//PROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCLIB
|
||||
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
|
||||
//*
|
||||
//* UP TO 15 DIFFERENT RPTS FROM THE *LAST* DAILY RUN
|
||||
//* MAY BE REPRINTED BY USING THE 'INC' PARM CARD, E.G.,
|
||||
//*//STEP0200 EXEC DTSDVD
|
||||
//*//STEP0990.PARMIN DD *
|
||||
//*DTSBD800,INC,434,604
|
||||
//*/*
|
||||
//* *ALL* RPTS FROM THE *LAST* DAILY RUN MAY BE REPRINTED BY
|
||||
//* NOT USING ANY PARM CARD.
|
||||
//*
|
||||
//* *ALL BUT* UP TO 15 DIFFERENT RPTS FROM THE *LAST* DAILY RUN
|
||||
//* MAY BE REPRINTED BY USING THE 'EXC' PARM CARD, E.G.,
|
||||
//*//STEP0200 EXEC DTSDVD,
|
||||
//*//STEP0990.PARMIN DD *
|
||||
//*DTSBD800,EXC,434,604
|
||||
//*/*
|
||||
//* EXECUTING BD800 ONLY W/THE *LAST* PROD SRTDAILY FILE CREATED
|
||||
//*
|
||||
//STEP0200 EXEC DTSDVD,
|
||||
// LVLNODE='PROD',
|
||||
// S0910='(+0)',
|
||||
// LDEST=U@PRT65,
|
||||
// LHOLD='YES',
|
||||
// LVDHOLD='YES'
|
||||
//**//STEP0990.PARMIN DD *
|
||||
//**DTSBD800,EXC,751
|
||||
//**/*
|
||||
//* REPORTS NOT IN VIEWDIRECT
|
||||
//STEP0990.RPT102R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT103R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT105R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT108R1 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT109R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT109R2 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT112R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT112R2 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT115R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT117R1 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT117R3 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT127R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT131R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT131R2 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT204R1 DD DUMMY REPORT 00631000
|
||||
//STEP0990.RPT303R1 DD DUMMY SPEC. FORM 00631000
|
||||
//STEP0990.RPT316R1 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT403R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT403R2 DD DUMMY LETTER (OLD) 00631000
|
||||
//STEP0990.RPT434R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT503R1 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT503R2 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT608R1 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT712R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT726R1 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT751R1 DD DUMMY LETTER 00631000
|
||||
//STEP0990.RPT902R1 DD DUMMY UC30 00631000
|
||||
//STEP0990.RPT903R1 DD DUMMY SELF-MAILER 00631000
|
||||
//STEP0990.RPT907R2 DD DUMMY DUP RPT 00631000
|
||||
//STEP0990.RPT910R1 DD DUMMY UC30H 00631000
|
||||
//DOESLBLP.DOESLBL1 DD DUMMY LABELS 00631000
|
||||
//*
|
||||
Reference in New Issue
Block a user