83 lines
6.5 KiB
Plaintext
83 lines
6.5 KiB
Plaintext
//ECNTV120 JOB (UI,4300,3400,T),RQ120.VIEWDIR, 00010003
|
|
// CLASS=P,MSGCLASS=X, 00020000
|
|
//**** NOTIFY=ECNTJP2, 00040008
|
|
//**** USER=OPCSUB, 00041008
|
|
// NOTIFY=ECNTSUP, 00050008
|
|
//**** TYPRUN=SCAN, 00060000
|
|
// REGION=0M 00070000
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//**** /* VIEWDIRECT OPTIONS 00080000
|
|
// SET LVLPROG='PROD' 00090005
|
|
// SET LVLNODE='PROD' 00100005
|
|
// SET LDEST=U@PRT65 00110000
|
|
// SET LVDHOLD='YES' 00120000
|
|
//* JOB : RE-RUN POTENTIALLY FICTITIOUS EMPLOYERS RPT 00130006
|
|
//**** 00140000
|
|
/*JOBPARM LINECT=104 /* NEEDED FOR THE OLD XEROX AT DOES ONLY 00150000
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLPROG..PROCLIB 00160000
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00170000
|
|
//**** SORT THE REPORT RECORDS 00180000
|
|
//STEP0050 EXEC DTSRSORT, 00190000
|
|
// RPTGEN='(+0)' 00200003
|
|
//**** REPORT GENERATION 00210000
|
|
//**** 00220000
|
|
//**** /* GEN A DUMMY RECORD FOR THE LABELS FILE 00230000
|
|
//DOESLBL1 EXEC PGM=IEBDG, 00240000
|
|
// COND=(0,LT) 00250000
|
|
//SYSPRINT DD SYSOUT=* 00260000
|
|
//LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00270000
|
|
// UNIT=SYSDA, 00280000
|
|
// SPACE=(TRK,1), 00290000
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00300000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSLBL01), 00310000
|
|
// DISP=SHR 00320000
|
|
//**** /* POPULATE THE LABELS WORK FILE 00330000
|
|
//DOESLBL2 EXEC PGM=IDCAMS, 00340000
|
|
// COND=(0,LT) 00350000
|
|
//SYSPRINT DD SYSOUT=* 00360000
|
|
//FILEIN DD DSN=&&TMP901, 00370000
|
|
// DISP=(OLD,DELETE,DELETE), 00380000
|
|
// UNIT=SYSDA 00390000
|
|
//DOESVRO1 DD DSN=&&LBL901, 00400000
|
|
// DISP=(NEW,PASS,DELETE), 00410000
|
|
// UNIT=SYSDA, 00420000
|
|
// SPACE=(8192,(1000,1000),RLSE), 00430000
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00440000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSLBL02), 00450000
|
|
// DISP=SHR 00460000
|
|
//**** 00470000
|
|
//STEP0100 EXEC PGM=DTSBD800, OUTPUT GENERATION 00480000
|
|
// COND=(0,LT) 00490000
|
|
//SYSOUT DD SYSOUT=* 00500000
|
|
//SYSABOUT DD SYSOUT=* 00510000
|
|
//SYSUDUMP DD SYSOUT=* 00520000
|
|
//** 00530000
|
|
//PARMIN DD DUMMY 00540000
|
|
//**//PARMIN DD * 00550000
|
|
//**DTSBD800,INC,120 00560001
|
|
//**/* 00570000
|
|
//** 00580000
|
|
//ATLSTIN DD DUMMY 00590000
|
|
//** 00600000
|
|
//DTSFVRI1 DD DSN=&&SRTRPT,DISP=(OLD,DELETE,DELETE) 00610000
|
|
//** 00620000
|
|
//DOESVRO1 DD DSN=&&LBL901,DISP=(OLD,PASS,DELETE) 00630000
|
|
//** 00640000
|
|
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00650000
|
|
// AMP=('BUFNI=5,BUFND=10') 00660000
|
|
//** 00670000
|
|
//STEP0100.CHGPARM DD DSN=DOESTAX.&LVLNODE..CHG.PARM.SPEC120, 00671003
|
|
// DISP=SHR 00672003
|
|
//** POTENTIALLY FICTITIOUS EMPLYRS 00680001
|
|
//RPT120R1 DD SYSOUT=(Z,DTS120R1),HOLD=&LVDHOLD., 00690001
|
|
// DEST=&LDEST. 00700000
|
|
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT 00760000
|
|
//RPT907R1 DD SYSOUT=(Z,DTS907R1),HOLD=&LVDHOLD., 00770001
|
|
// DEST=&LDEST. 00780000
|
|
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT 00790000
|
|
//RPT907R2 DD DUMMY 00800000
|
|
//** CONTROL REPORT SUMMARY 00810000
|
|
//RPT980R1 DD SYSOUT=(Q,DTS980R1),HOLD=&LVDHOLD., 00820001
|
|
// DEST=&LDEST. 00830000
|
|
//* 00840000
|