41 lines
1.3 KiB
Plaintext
41 lines
1.3 KiB
Plaintext
//DTSRT722 JOB (UI,4300,3400,T),JHP.PROD.RPT722,
|
|
// CLASS=P,MSGCLASS=X,
|
|
//**** TYPRUN=SCAN,
|
|
//**** USER=#DOADTS,
|
|
// NOTIFY=&SYSUID
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//**
|
|
// SET LVLNODE='PROD'
|
|
// SET TPSFILE1='DOESTAX.PROD.RPT722.QTR20241'
|
|
// SET PRINTER1='DOESTAX.PROD.CREDITS.QTR241'
|
|
//* SET LDEST=U@PRT65
|
|
//**
|
|
//* JOB: TPS RUN FROM RPT722 - REPORT CREDITS/REFUNDS (RATED)
|
|
//* (RPT722 IS PRODUCED BY RUNRQ722)
|
|
//*
|
|
//* THE PRINTER 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
|
|
//*
|
|
//* ADDED EXPORT FILE WHICH CONTAINS A COMMA-DELIMITED VERSION
|
|
//* OF THE HIT-FILE FOR EXPORT TO EXCEL. GD 04/23/2009
|
|
//*
|
|
//**
|
|
//* DEFINITION FOR PARMIN:
|
|
//* COLS 1-3 RANDOM NUMBER
|
|
//* 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 DTSTP722
|
|
//STEP0100.PARMIN DD *
|
|
119,0060,A1,20241
|
|
/*
|