Subject: | |
From: | |
Reply To: | |
Date: | Tue, 20 Aug 2019 11:51:57 +0000 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
Thanks Mark.The system does a self-exam and reports a problem.
That is a clever idea.
-----Original Message-----
From: Mark Ranft <[log in to unmask]>
To: 'John Sommer' <[log in to unmask]>; HP3000-L <[log in to unmask]>
Sent: Mon, Aug 19, 2019 3:15 pm
Subject: RE: [HP3000-L] Job Monitoring Utility
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 *
|
|
|