//SLGSAVT  JOB   (9999,CSOPER,10,10),
//         'CORNERSTONE',
//         CLASS=A,
//         MSGCLASS=X,
//         MSGLEVEL=(1,1),
//         NOTIFY=,
//         TIME=1440,
//         USER=
//*
//*
//*
//* LIB: CORNERST.ZOS140.OPER.LIB(SLGSAVT)
//* GDE: CORNERSTONE OPERATOR REFERENCE
//* DOC: THIS JOB IS INVOKED BY THE OPERATOR TO:
//*      DUMP THE WEEKLY SYSLOG DATA SET IPOSAV.SYSLOGW
//*      TO THE CURRENT SYSLOG ARCHIVE TAPE, ACCORDING TO THE
//*      CATALOG(BACKUP.SYSLOG), WITH A 'MOD' DISPOSITION.
//*      IT IS DESIGNED FOR USE WHEN THE WEEKLY DATA SET
//*      IS NOT ADEQUATE TO STORE THE DATA LOAD FOR ENTIRE WEEK
//*      IT IS ALSO INVOKED AUTMOATICALLY IF MEMBERS 'SLGSAVD'
//*      OR 'SLGSTR' ABEND.
//*
//* WARNING: IF JOB FAILS IN STEPS 2 OR 3, CARE MUST
//*          BE EXERCISED IF A RESTART PRIOR TO
//*          STEP3 IS ATTEMPTED.  DUPLICATE DATA MAY
//*          BE PLACED ON TAPE DUE TO THE USE OF THE
//*          'MOD' DISPOSTION IN STEP2.
//*
//*         STEP1 -- WARNS OPERATOR TO EXPECT UNEXPIRED FILE MESSAGE
//*         STEP2 -- MODS SYSLOGW TO BACKUP.SYSLOG(0) (TAPE)
//*         STEP3 -- EMPTIES IPOSAV.SYSLOGW
//*         STEP4 -- REINVOKES JOB SLGSAVD
//*         STEP5 -- WTO TO INFORM OF FAILURE
//*
//SYSLOG1 EXEC IPOWTO,REGION=512K
//SYSIN    DD  *
----     THIS STEP ADDS SYSLOG DATA TO PREVIOUS SYSLOG TAPE(S),
----     DSN=BACKUP.SYSLOG(0).
----     PUT RING IN THE TAPE(S) REQUESTED.
----     EXPECT MSG IEC507D FOR UNEXPIRED FILE. (REPLY: R XX,U)
/*
//SYSLOG2 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(0),DISP=MOD,
//             LABEL=RETPD=365,UNIT=VTS1,
//             DCB=(IPOSAV.SYSLOGW)
//*
//SYSLOG3 EXEC PGM=IEBGENER,REGION=512K,COND=(0,LT)
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  DUMMY
//SYSUT1   DD  DSN=NULLFILE,DCB=IPOSAV.SYSLOGW
//SYSUT2   DD  DSN=IPOSAV.SYSLOGW,DISP=OLD
//*
//SYSLOG4 EXEC JOB,N=SLGSAVD,REGION=512K,COND=(0,LT)
//SYSIN    DD  *
/*
//SYSLOG5 EXEC IPOWTO,REGION=512K,COND=((0,EQ,SYSLOG2),EVEN)
//SYSIN    DD  *
---- SLGSAVT HAS FAILED --- CALL THE CORNERSTONE ADMINISTRATOR
---- SLGSAVT HAS FAILED --- CALL THE CORNERSTONE ADMINISTRATOR
---- SLGSAVT HAS FAILED --- CALL THE CORNERSTONE ADMINISTRATOR
---- SLGSAVT HAS FAILED --- CALL THE CORNERSTONE ADMINISTRATOR
/*
//*