//DTSRT718 JOB (UI,4300,3400,T),JHP.PROD.RPT718,
//             CLASS=P,MSGCLASS=X,
//****         TYPRUN=SCAN,
//             NOTIFY=ECNTSUP
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//**
//  SET LVLNODE='PROD'
//  SET TPSFILE1='DOESTAX.PROD.RPT718.YR2024'     <<<< CHANGE BEF RUN
//  SET PRINTER1='DOESTAX.PROD.AUDIT.YR2024'       <<<< CHANGE BEF RUN
//  SET PICKLST='DOESTAX.PROD.PICKLST.AUDIT.YR2024'  << CHANGE BEF RUN
//  SET LDEST=U@PRT65
//*----------------------------------------------------------------+
//* JOB: TPS RUN FROM RPT718 - REPORT FIELD AUDIT
//*           (PROD.RPT718 IS PRODUCED BY RUNRQ718)
//*
//* AUDITS ARE RUN FOR THE WHOLE CAL YEAR 010114 - 123114        ZL1
//*
//* 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
//*       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-16     YYYY
//*================================================================|
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB
//**
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//**
//STEP0100 EXEC DTSTP718
//STEP0100.PARMIN  DD  *
701,0060,A1,2024
/*
//