//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
//
//