//SLGSAVW JOB (9999,CSOPER,10,10), // 'CORNERSTONE', // CLASS=I, // MSGCLASS=X, // MSGLEVEL=(1,1), // NOTIFY=, // TIME=1440, // USER= //* //* //* //* LIB: CORNERST.ZOS140.OPER.LIB(SLGSAVW) //* GDE: CORNERSTONE OPERATOR REFERENCE //* DOC: THIS JOB ASKS THE OPERATOR TO SIGN OUT AND //* MOUNT A STANDARD LABELED SCRATCH TAPE, COPIES THE //* WEEKLY SYSLOG ACCUMULATION DATA SET IPOSAV.SYSLOGW //* TO THIS TAPE AS A GENERATION DATA SET, AND THEN //* EMPTIES IPOSAV.SYSLOGW. THIS JOB IS ALSO AUTOMATICALLY //* INVOKED BY MEMBER 'BKPWKY'. //* //* STEP1. SIGN OUT TAPES //* STEP2. COPIES IPOSAV.SYSLOGW TO BACKUP.SYSLOG(+1) (TAPE) //* STEP3. EMPTIES IPOSAV.SYSLOGW //* //SYSLGW1 EXEC IPOWTO,MSG='SIGN OUT 1 STD LBL TAPE FOR NEXT STEP' //SYSIN DD * DSN=BACKUP.SYSLOG(+1) --- DUMP OF ONE WEEKS SYSLOG RETPD = 365 THE INTERNAL AND EXTERNAL TAPE LABELS SHOULD MATCH. USE THE STANDARD LABEL TAPE NUMBER IN REPLY TO THE TAPE MOUNT REQUEST. /* //SYSLGW2 EXEC PGM=IEBGENER,REGION=512K,COND=(0,LT) //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT1 DD DSN=IPOSAV.SYSLOGW, // DISP=SHR //SYSUT2 DD DSN=BACKUP.SYSLOG(+1), // DISP=(,CATLG,DELETE), // LABEL=RETPD=365,UNIT=VTS1, // DCB=(IPOSAV.SYSLOGW) //* //SYSLGW3 EXEC PGM=IEBGENER,REGION=512K,COND=(0,LT,SYSLGW2) //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT1 DD DSN=NULLFILE,DCB=IPOSAV.SYSLOGW //SYSUT2 DD DSN=IPOSAV.SYSLOGW, // DISP=OLD //*