40 lines
1.3 KiB
Plaintext
40 lines
1.3 KiB
Plaintext
//DTSRT716 JOB (UI,4300,3400,T),TPS.PROD.RPT716,
|
|
// CLASS=P,MSGCLASS=X,
|
|
//**** TYPRUN=SCAN,
|
|
// NOTIFY=ECNTSUP
|
|
//**
|
|
//* CHANGE TPSFILE1 TO CORRECT GDG BEFORE RUNNING JOB - ZL1
|
|
//**
|
|
// SET LVLNODE='PROD'
|
|
// SET TPSFILE1='DOESTAX.PROD.RPT716.G0089V00' <<< CHANGE BEF RUN
|
|
// SET PRINTER1='DOESTAX.PROD.DELINQ.QTR241'
|
|
// SET LDEST=U@PRT65
|
|
//**-----------------------------------------------------------------
|
|
//* JOB: TPS RUN FROM RPT716 - REPORT DELINQUENCY
|
|
//* (RPT716 IS PRODUCED BY RUNRQ418)
|
|
//*
|
|
//* THE PRINTER FILE IS NOW CREATED ON DASD. SEE SET STATEMENT
|
|
//* FOR THE DATASET NAME. DOWNLOAD THE FILE FOR INPUT TO A SPREAD SHEET
|
|
//* GEORGE BROWN 4/15/2004
|
|
//*
|
|
//*
|
|
//**-----------------------------------------------------------------
|
|
//* DEFINITION FOR PARMIN:
|
|
//* COLS 1-3 RANDOM NUMBER (PICK ONE)
|
|
//* 5-8 NUMBER TO BE SAMPLED
|
|
//* - 4 DIGITS RIGHT JUSTIFIED
|
|
//* - ENTER LEADING ZEROES IF NEEDED
|
|
//* 10-11 SAMPLE TYPE
|
|
//* - A1,A2,E1,O1, OR O2 (1ST CHARACTER IS ALPHA)
|
|
//* 13-17 YYYYQ
|
|
//**-----------------------------------------------------------------
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
|
|
//**
|
|
//STEP0100 EXEC DTSTP716
|
|
//STEP0100.PARMIN DD *
|
|
698,0060,A1,20241
|
|
/*
|
|
//
|
|
//**
|