* $$ JOB JNM=PXHRM01,CLASS=P,DISP=D * $$ LST CLASS=J,DISP=K,DEST=* * DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; // JOB PXHRM01 HW LOAD DR.REPORT.RELEASE & MERGE WITH IBM // OPTION PARSTD // DLBL CMWKF01,'NATURAL WORK FILE 1' // EXTENT ,PRDSEQ,1,0,1,150 // DLBL CMWKF02,'NATURAL WORK FILE 2' // EXTENT ,PRDSEQ,1,0,1,150 // DLBL CMWKF03,'NATURAL WORK FILE 3' // EXTENT ,PRDSEQ,1,0,1,150 // DLBL CMWKF04,'NATURAL WORK FILE 4' // EXTENT ,PRDSEQ,1,0,1,150 // OPTION USRLABEL /. C /. C 03/04/02 WMB ADDED LST CARD TO STEP=050 /. C 08/16/96 MXG ADDED STEP060 & STEP070 /. C 10/18/95 DLG MODIFIED FOR NEW PRD INTEGRATED ENV /. C 10/15/95 RAM ADDED ALL CHANGES FOR AUTO PROJECT /. C 08/30/95 JAC CONVERTED 'BRIDGE' TAPES TO EPIC FILES. /. C 11/05/94 DLG CONVERTED PRD TO PRD VERSION FOR AB2 IMPL. /* // PAUSE IF THIS IS A RESTART TYPE: GOTO STEPNNN ELSE PRESS ENTER /* * STEP=005 PGM=IDCAMS DELETE/DEFINE WORK FILES // EXEC PROC=PRDGENWK /* * $$ LST CLASS=A,DISP=K,DEST=* * DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; * STEP=010 PGM=MHRLC02 LOAD HONEYWELL DRAFTS /. C /. C NOTE ASSGN SYS011,IGN TO BYPASS MTD-ISSUED /. C /. C // ASSGN SYS011,IGN /. C // ASSGN SYS000,SYSRDR // ASSGN SYS020,SYSLST ++ // TLBL DRFFIL,'PRD.ME.MTD.ISSUED',,,,,,2 // DLBL WK20FIL,'PRD.GEN.WORK1',,VSAM,CAT=MOEUCAT // DLBL WK30FIL,'PRD.GEN.WORK2',,VSAM,CAT=MOEUCAT // DLBL REPFIL,'PRD.DR.REPORT.RELEASE',,VSAM,CAT=MOEUCAT // EXEC MHRLC02,SIZE=348K DRAFTS /* ADARUN DBID=227 /* /. STEP020 * $$ LST CLASS=A,DISP=K,DEST=* * DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; * STEP=020 PGM=MHRLC02 LOAD HONEYWELL RESERVES /. C /. C NOTE ASSGN SYS012,IGN TO BYPASS RESERVES /. C /. C // ASSGN SYS012,IGN /. C // ASSGN SYS000,SYSRDR // DLBL RESFIL,'PRD.RESERVES' // DLBL WK20FIL,'PRD.GEN.WORK1',,VSAM,CAT=MOEUCAT // DLBL WK30FIL,'PRD.GEN.WORK2',,VSAM,CAT=MOEUCAT // DLBL REPFIL,'PRD.DR.REPORT.RELEASE',,VSAM,CAT=MOEUCAT // EXEC MHRLC02,SIZE=348K RESERVES /* ADARUN DBID=227 /* /. STEP030 * $$ LST CLASS=A,DISP=K,DEST=* * DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; * STEP=030 PGM=MHRLC02 LOAD HONEYWELL CLAIM RECOVERIES /. C /. C NOTE ASSGN SYS013,IGN TO BYPASS CLAIMRECOV /. C /. C // ASSGN SYS013,IGN /. C // ASSGN SYS000,SYSRDR // TLBL SSFIL,'PRD.CLAIM.RECOV',,,,,,2 // DLBL WK20FIL,'PRD.GEN.WORK1',,VSAM,CAT=MOEUCAT // DLBL WK30FIL,'PRD.GEN.WORK2',,VSAM,CAT=MOEUCAT // DLBL REPFIL,'PRD.DR.REPORT.RELEASE',,VSAM,CAT=MOEUCAT // EXEC MHRLC02,SIZE=348K SALVAGE /* ADARUN DBID=227 /* /. STEP040 * $$ LST CLASS=A,DISP=K,DEST=* * DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; * STEP=040 PGM=MHRLC01 LOAD HONEYWELL PREMIUM WRITTEN /. C /. C NOTE ASSGN SYS011,IGN TO BYPASS MO-END-PW /. C /. C // ASSGN SYS011,IGN /. C // ASSGN SYS000,SYSRDR // TLBL PWFIL,'PRD.MO.END.PW',,,,,,2 // DLBL WKFIL,'PRD.GEN.WORK1',,VSAM,CAT=MOEUCAT // DLBL REPFIL,'PRD.DR.REPORT.RELEASE',,VSAM,CAT=MOEUCAT // EXEC MHRLC01,SIZE=348K PWMGD /* ADARUN DBID=227 /* /. STEP050 * $$ LST CLASS=A,DISP=K,DEST=*,LST=01E * STEP=050 PGM=DRP220 ADD MONTHLY TRANSACTIONS TO YTD BACKUP // ASSGN SYS000,SYSRDR // TLBL DRFM220,'PRD.DR.YTD.DET.BU',,,,,,2 // TLBL DRFK220,'PRD.DR.YTD.TMP.BU',,,,,,1 // DLBL DRFD195,'PRD.DR.REPORT.RELEASE',0,VSAM,CAT=MOEUCAT // EXEC DRP220,SIZE=AUTO ADARUN DBID=227 /* ONLY USE RELEASE FILE...BYPASS PREVIOUS YEAR'S TAPE TO START NEW YEAR /* /. STEP060 * $$ LST CLASS=A,DISP=K,DEST=*,LST=01E * STEP=060 PGM=MMRRN07 DRAFT EXPERIENCE BY STATE /. C /. C DJDE STMT IS I/P TO PGM, NOT JCL CARD /. C // ASSGN SYS000,IGN // ASSGN SYS010,01E // DLBL RPTREL,'PRD.DR.REPORT.RELEASE',,VSAM,CAT=MOEUCAT // DLBL SORTWK1,'$$$.PRDWK1' // OPTION NODUMP,SYSPARM='SYSRDR' // UPSI XX1 // EXEC NATBATCH,SIZE=2048K SYS=PRD BWORKD=(1,30,6600,VB) BPRINTD=(1,10,133) /* PRODLIB,PASSWORD EXEC MMRRN07 * DJDE COPIES=1 DUPLEX=NO END; FIN /* /. STEP070 * $$ LST CLASS=A,DISP=K,DEST=*,LST=02E * STEP=070 PGM=MMRRN09 RESERVES EXPERIENCE BY EXAMINER /. C /. C DJDE STMT IS I/P TO PGM, NOT JCL CARD /. C // ASSGN SYS000,IGN // ASSGN SYS011,02E // DLBL RPTREL,'PRD.DR.REPORT.RELEASE',,VSAM,CAT=MOEUCAT // DLBL SORTWK1,'$$$.PRDWK1' // OPTION NODUMP,SYSPARM='SYSRDR' // UPSI XX1 // EXEC NATBATCH,SIZE=2048K SYS=PRD BWORKD=(1,30,6600,VB) BPRINTD=(1,11,133) /* PRODLIB,PASSWORD EXEC MMRRN09 * DJDE COPIES=1 DUPLEX=NO END; FIN /* /& * DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; * $$ EOJ
Return to the Sample Job Stream List
//PXHRM01 JOB (PXHRM01),' ', // CLASS=A, // MSGCLASS=X, // MSGLEVEL=(1,1), // REGION=6M //* //JOBLIB INCLUDE MEMBER=JOBLIB //* //* DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; //* STEP=005 PGM=IDCAMS DELETE/DEFINE WORK FILES //* DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; //* STEP=010 PGM=MHRLC02 LOAD HONEYWELL DRAFTS //* //* STEP0010 PGM=MHRLC02 //* //STEP0010 EXEC PGM=MHRLC02 //* MODULE ADABAS PROCESSED BY PLUG-IN JCLTADAB //* MT I SYS011 UA 'PRD.ME.MTD.ISSUED' //DRFFIL DD DSN=MVS.PRD.ME.MTD.ISSUED, // DISP=SHR //* VS U MOEUCAT 'PRD.DR.REPORT.RELEASE' //REPFIL DD DSN=MVS.PRD.DR.REPORT.RELEASE, // DISP=SHR //* VS W MOEUCAT 'PRD.GEN.WORK1' //WK20FIL DD DSN=&&WK20FIL, // SPACE=(TRK,(1000,250)), // UNIT=SYSDA //* VS W MOEUCAT 'PRD.GEN.WORK2' //WK30FIL DD DSN=&&WK30FIL, // SPACE=(TRK,(1000,250)), // UNIT=SYSDA //* PR O SYS020 00E 0002 //SYS020 DD SYSOUT=A //* CD I SYS000 00C //SYS000 DD * DRAFTS /* //* CD I SYSRDR 00C ADABAS //DDCARD DD * ADARUN DBID=227 /* //* //* DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; //* STEP=020 PGM=MHRLC02 LOAD HONEYWELL RESERVES //*/. STEP020 //* //* STEP0020 PGM=MHRLC02 //* //STEP0020 EXEC PGM=MHRLC02 //* MODULE ADABAS PROCESSED BY PLUG-IN JCLTADAB //* SD I SYS011 UA 'PRD.RESERVES' //RESFIL DD DSN=MVS.PRD.RESERVES, // DISP=SHR //* VS U MOEUCAT 'PRD.DR.REPORT.RELEASE' //REPFIL DD DSN=MVS.PRD.DR.REPORT.RELEASE, // DISP=SHR //* VS W MOEUCAT 'PRD.GEN.WORK1' //WK20FIL DD DSN=&&WK20FIL, // SPACE=(TRK,(1000,250)), // UNIT=SYSDA //* VS W MOEUCAT 'PRD.GEN.WORK2' //WK30FIL DD DSN=&&WK30FIL, // SPACE=(TRK,(1000,250)), // UNIT=SYSDA //* PR O SYS020 00E 0003 //SYS020 DD SYSOUT=A //* CD I SYS000 00C //SYS000 DD * RESERVES /* //* CD I SYSRDR 00C ADABAS //DDCARD DD * ADARUN DBID=227 /* //* //* DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; //* STEP=030 PGM=MHRLC02 LOAD HONEYWELL CLAIM RECOVERIES //*/. STEP030 //* //* STEP0030 PGM=MHRLC02 //* //STEP0030 EXEC PGM=MHRLC02 //* MODULE ADABAS PROCESSED BY PLUG-IN JCLTADAB //* MT I SYS011 UA 'PRD.CLAIM.RECOV' //SSFIL DD DSN=MVS.PRD.CLAIM.RECOV, // DISP=SHR //* VS U MOEUCAT 'PRD.DR.REPORT.RELEASE' //REPFIL DD DSN=MVS.PRD.DR.REPORT.RELEASE, // DISP=SHR //* VS W MOEUCAT 'PRD.GEN.WORK1' //WK20FIL DD DSN=&&WK20FIL, // SPACE=(TRK,(1000,250)), // UNIT=SYSDA //* VS W MOEUCAT 'PRD.GEN.WORK2' //WK30FIL DD DSN=&&WK30FIL, // SPACE=(TRK,(1000,250)), // UNIT=SYSDA //* PR O SYS020 00E 0004 //SYS020 DD SYSOUT=A //* CD I SYS000 00C //SYS000 DD * SALVAGE /* //* CD I SYSRDR 00C ADABAS //DDCARD DD * ADARUN DBID=227 /* //* //* DJDE COPIES=1,JDE=DFLT,DUPLEX=NO,END; //* STEP=040 PGM=MHRLC01 LOAD HONEYWELL PREMIUM WRITTEN //*/. STEP040 //* //* STEP0040 PGM=MHRLC01 //* //STEP0040 EXEC PGM=MHRLC01 //* MODULE ADABAS PROCESSED BY PLUG-IN JCLTADAB //* MT I SYS011 UA 'PRD.MO.END.PW' //PWFIL DD DSN=MVS.PRD.MO.END.PW, // DISP=SHR //* VS U MOEUCAT 'PRD.DR.REPORT.RELEASE' //REPFIL DD DSN=MVS.PRD.DR.REPORT.RELEASE, // DISP=SHR //* VS W MOEUCAT 'PRD.GEN.WORK1' //WKFIL DD DSN=&&WKFIL, // SPACE=(TRK,(1000,250)), // UNIT=SYSDA //* PR O SYS020 00E 0005 //SYS020 DD SYSOUT=A //* CD I SYS000 00C //SYS000 DD * PWMGD /* //* CD I SYSRDR 00C ADABAS //DDCARD DD * ADARUN DBID=227 /* //* //* STEP=050 PGM=DRP220 ADD MONTHLY TRANSACTIONS TO YTD BACKUP //*/. STEP050 //* //* STEP0050 PGM=DRP220 //* //STEP0050 EXEC PGM=DRP220 //* MODULE ADABAS PROCESSED BY PLUG-IN JCLTADAB //* VS U MOEUCAT 'PRD.DR.REPORT.RELEASE' //DRFD195 DD DSN=MVS.PRD.DR.REPORT.RELEASE, // DISP=SHR //* MT W 'PRD.DR.YTD.DET.BU' //DRFM220 DD DSN=&&DRFM220, // UNIT=TAPE //* MT W 'PRD.DR.YTD.TMP.BU' //DRFK220 DD DSN=&&DRFK220, // UNIT=TAPE //* CD I SYS000 00C //SYS000 DD * ONLY USE RELEASE FILE...BYPASS PREVIOUS YEAR'S TAPE TO START NEW YEAR /* //* CD I SYSRDR 00C ADABAS //DDCARD DD * ADARUN DBID=227 /* //* //* STEP=060 PGM=MMRRN07 DRAFT EXPERIENCE BY STATE //*/. STEP060 //* //* STEP0060 PROC=NATURAL NATBATCH //* //STEP0060 EXEC PROC=NATURAL //* MODULE NATBATCH PROCESSED BY PLUG-IN JCLTNATB //* VS I MOEUCAT 'PRD.DR.REPORT.RELEASE' MMRRN07 //RPTREL DD DSN=MVS.PRD.DR.REPORT.RELEASE, // DISP=SHR //* SD W SYS030 UA P 'NATURAL WORK FILE 1' MMRRN07 //CMWKF01 DD DSN=&&CMWKF01, // BLKSIZE=6600, // RECFM=VB, // SPACE=(TRK,(150,37)), // UNIT=SYSDA //* PR O SYS010 01E 0007 MMRRN07 //CMPRT01 DD SYSOUT=A, // LRECL=133 //* CD I SYSIPT 00C //CMPRMIN DD * SYS=PRD /* //* CD I //CMSYNIN DD * PRODLIB,PASSWORD EXEC MMRRN07 * DJDE COPIES=1 DUPLEX=NO END; FIN /* //* //* STEP=070 PGM=MMRRN09 RESERVES EXPERIENCE BY EXAMINER //*/. STEP070 //* //* STEP0070 PROC=NATURAL NATBATCH //* //STEP0070 EXEC PROC=NATURAL //* MODULE NATBATCH PROCESSED BY PLUG-IN JCLTNATB //* VS I MOEUCAT 'PRD.DR.REPORT.RELEASE' MMRRN09 //RPTREL DD DSN=MVS.PRD.DR.REPORT.RELEASE, // DISP=SHR //* SD W SYS030 UA P 'NATURAL WORK FILE 1' MMRRN09 //CMWKF01 DD DSN=&&CMWKF01, // BLKSIZE=6600, // RECFM=VB, // SPACE=(TRK,(150,37)), // UNIT=SYSDA //* PR O SYS011 02E 0008 MMRRN09 //CMPRT01 DD SYSOUT=A, // LRECL=133 //* CD I SYSIPT 00C //CMPRMIN DD * SYS=PRD /* //* CD I //CMSYNIN DD * PRODLIB,PASSWORD EXEC MMRRN09 * DJDE COPIES=1 DUPLEX=NO END; FIN /* //
Return to the Sample Job Stream List