41 lines
1.4 KiB
Plaintext
41 lines
1.4 KiB
Plaintext
//DTSRT719 JOB (UI,4300,3400,T),PROD.TPS719,
|
|
// CLASS=P,MSGCLASS=X,
|
|
//**** TYPRUN=SCAN,
|
|
//**** USER=#DOADTS,
|
|
// NOTIFY=ECNTSUP
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//**
|
|
// SET LVLNODE='PROD'
|
|
// SET TPSFILE1='DOESTAX.PROD.RPT719.G0076V00'
|
|
// SET PRINTER1='DOESTAX.PROD.CONTRIB.QTR241'
|
|
// SET CHECK1='DOESTAX.PROD.CONTRIB.UC30.QTR241'
|
|
// SET LDEST=U@PRT65
|
|
//*----------------------------------------------------------------+
|
|
//* JOB: TPS RUN FROM RPT719 - REPORT CONTRIBUTIONS
|
|
//* (RPT719 IS PRODUCED BY RUNRQ902)
|
|
//*
|
|
//* THE PRINTER FILE IS NOW CREATED ON DASD. SEE SET STATEMENT
|
|
//* FOR DATASET NAME. DOWNLOAD THE FILE FOR INPUT TO A SPREAD SHEET
|
|
//* GEORGE BROWN 04/14/2004
|
|
//*
|
|
//*
|
|
//**---------------------------------------------------------------
|
|
//* 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..PROCLIB
|
|
//**
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
|
|
//**
|
|
//STEP0100 EXEC DTSTP719
|
|
//STEP0100.PARMIN DD *
|
|
415,0060,A1,20241
|
|
/*
|
|
//
|