//RMMDAILY JOB (9999), // CLASS=R, // REGION=8M, // MSGCLASS=X,MSGLEVEL=(1,1) //* //* ***************************************************************** //* //* LIB: CORNERST.ZOS140.OPER.LIB(RMMDAILY) //* GDE: CORNERSTONE OPERATOR REFERENCE //* DOC: THIS JOB IS THE DAILY RMM PROCEDURE SUBMITED BY CSDAILY. //* THE FOLLOWING TASKS ARE PERFORMED: //* 1) PERFORMS VITAL RECORD PROCESSING //* 2) CREATES VITAL RECORD RETENTION REPORT //* 3) PERFORMS EXPIRATION PROCESSING //* 4) PERFORMS STORAGE LOCATION PROCESSING //* 5) CEATES BACKUP OF RMM DATABASE & JOURNAL TO DISK/TAPE //* 6) CREATES EXTRACT FILE FOR REPORT PROCESSING //* 7) CREATES INVENTORY REPORT //* 8) CREATES MOVEMENT REPORTS //* //* ***************************************************************** //SCRCHLST EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=A //SYSTSIN DD * RMM SEARCHDATASET DSNAME(*) SEQ(*) LIMIT(*) OWNER(*) /* //HSKP1 EXEC PGM=EDGHSKP, //* PARM='BACKUP(DSS),RPTEXT,DATEFORM(E)' // PARM='VRSEL,VERIFY' //MESSAGE DD DISP=SHR,DSN=RMM.MESSAGE.LOG //REPORT DD DISP=SHR,DSN=RMM.REPORT.FILE //ACTIVITY DD DISP=SHR,DSN=RMM.ACTIVITY.FILE //SYSPRINT DD SYSOUT=* //DSSOPT DD * CONCURRENT OPTIMIZE(4) VALIDATE /* //HSKP2 EXEC PGM=EDGHSKP,PARM='VRSEL,EXPROC,RPTEXT' //MESSAGE DD DISP=SHR,DSN=RMM.MESSAGE.LOG //REPORT DD DISP=SHR,DSN=RMM.REPORT.FILE //ACTIVITY DD DISP=SHR,DSN=RMM.ACTIVITY.FILE //SYSPRINT DD SYSOUT=* //DSSOPT DD * /* //REPTEXT DD DISP=SHR,DSN=RMM.REPORT.EXTRACT.FILE //BACKUP DD DSN=RMM.BACKUP.FILE(+1),DISP=(NEW,CATLG,DELETE), // UNIT=3390,AVGREC=U, // SPACE=(4096,(1000,500)), // LRECL=9000,BLKSIZE=32000,RECFM=VB, // VOL=SER=BC2P1C ******* //JRNLBKUP DD DSN=RMM.JOURNAL.BACKUP.FILE(+1),DISP=(NEW,CATLG,DELETE), // UNIT=3390,AVGREC=U, // SPACE=(4096,(1000,500)), // LRECL=32756,BLKSIZE=32760,RECFM=VB, // VOL=SER=BC2P1C ******* //SYSOUT DD SYSOUT=* /* //HSKP3 EXEC PGM=EDGHSKP,PARM='BACKUP(DSS)' //MESSAGE DD DISP=SHR,DSN=RMM.MESSAGE.LOG //REPORT DD DISP=SHR,DSN=RMM.REPORT.FILE //DSSOPT DD * CONCURRENT OPTIMIZE(4) VALIDATE /* //SYSPRINT DD SYSOUT=* //REPTEXT DD DISP=SHR,DSN=RMM.REPORT.EXTRACT.FILE //BACKUP DD DSN=RMM.BACKUP.TAPE(+1),DISP=(,CATLG,DELETE), // UNIT=VTS1,LABEL=(1,SL),AVGREC=U, // LRECL=9000,BLKSIZE=32000,RECFM=VB //JRNLBKUP DD DSN=RMM.JOURNAL.BACKUP.TAPE(+1),DISP=(,CATLG,DELETE), // UNIT=VTS1,LABEL=(2,SL),AVGREC=U, // LRECL=9000,BLKSIZE=32000,RECFM=VB, // VOL=REF=*.BACKUP //SYSOUT DD SYSOUT=* /* //MESSAGE EXEC PGM=IEBGENER //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=RMM.MESSAGE.LOG,DISP=SHR //SYSUT2 DD SYSOUT=* //SYSIN DD DUMMY /* //REPORT EXEC PGM=IEBGENER //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=RMM.REPORT.FILE,DISP=SHR //SYSUT2 DD SYSOUT=* //SYSIN DD DUMMY /* //RPTD EXEC PGM=EDGRPTD,PARM='DATAFORM(A)' //SYSOUT DD SYSOUT=A //SYSPRINT DD SYSOUT=A //REPTEXT DD DISP=SHR,DSN=RMM.REPORT.EXTRACT.FILE //TOSTRCK DD SYSOUT=A //INSTVOL DD SYSOUT=A //INSTBIN DD SYSOUT=A //FMSTBIN DD SYSOUT=A //TOSTOWN DD SYSOUT=A //INSTOWN DD SYSOUT=A //FMSTOWN DD SYSOUT=A // //