HP3000-L Archives

August 2019, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Mark Ranft <[log in to unmask]>
Reply To:
Mark Ranft <[log in to unmask]>
Date:
Mon, 19 Aug 2019 16:15:51 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (80 lines)
Here is an example where I am concerned that the weekly SLTBACK job doesn't complete.  I stream a second job for 6 hours out to check and complain if SLTBACK is still running.

!job sltback,manager.sys,job;outclass=lp,1,1
!
!continue
!stream sltchk.job.sys;in=,6
!
!if jobcnt('sltback,manager.sys') > 1 then
!  continue
!  mail.exe "-t [log in to unmask] &
!  -f [log in to unmask] &
!  -h !my_mailhost &
!  -s '!osnode sltback already running!!' &
!  sltback job already running !hpdatef at !hptimef"
!  eoj
!endif
!
!loadtap7
!pause 60
!
!run autorep.exe;parm=7
!file sysgtape;dev=7
!showdev 7
!
!sysgen
tape verbose store=^sltbk1
exit
!
!tellop ---- job sltback is done
!tell manager.sys ---- job sltback is done
!stream sltback.job;day=SUNDAY;at=02:30
!eoj

SLTBK1 contains....
@[log in to unmask]@      <-- or whatever filesets you desire
;show;onvs=mpexl_system_volume_set,client_vs;progress;maxtapebuf;compress=high;online=start;partialdb;directory;statistics


!JOB SLTCHK,manager.sys;OUTCLASS=LP,1
!# *-----------------------------------------------*
!# * THIS JOB WILL VERIFY THAT SLTBACK HAS         *
!# * COMPLETED SUCCESSFULY. THIS JOB SHOULD BE     *
!# * STREAMED TO RUN 6 HOURS AFTER THE SLTBACK     *
!# * JOB HAS STARTED.                              *
!# *-----------------------------------------------*
!
!# *-----------------------------------------------*
!# * Validate SLTBACK.JOB.SYS  has completed       *
!# *-----------------------------------------------*
!
!SETVAR CIERROR  0
!RUN MAIN.PUB.VESOFT;PARM=1;INFO= &
! "SHOWOUT @[log in to unmask](SPOOL.JSNAME MATCHES 'SLTBACK' AND &
!  SPOOL.ISOPENED)"
!
!IF CIERROR = 0
!
!  mail.exe "-t [log in to unmask] &
!   -f [log in to unmask] &
!   -h !my_mailhost &
!   -s ' ****  !osnode SLTBACK job problem ****' &
!    SLTBACK is still running!"
!
!abortio 7
!pause 2
!abortio 7
!PAUSE 2
!ABORTJOB SLTBACK,manager.sys
!
!endif
!
!eoj


Mark Ranft
Pro 3K

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2