>To help alleviate the aformentioned problem, one of the VESOFT technicians
>created a command file/script that essentially parsed the output of the
>SHOWJOB command into a set of "ABORTJOB #S123" commands. The resulting
>commands would then be executed as a command file and thus log everyone off.
>[note: the actual origin of this command file is somewhat fuzzy -- there
>may have been two or three other "sources" of similar command files,
>including one from HP's tech support, but all of these command files had the
>same eventual effect]
Here is a portion of our automated backup job that redirects a SHOWJOB and
aborts sessions.
------- autobac1.pub.sys --------
! IF HPCIDEPTH = 1 THEN
! SETVAR JCW 0
! PAUSE 10
! PURGE JUNK,TEMP
! FILE JUNK;REC=-80,,F,ASCII;NOCCTL
! SHOWJOB ;*JUNK
! CONTINUE
! PRINT *JUNK
! RUN ?$LOCKWORD=GOD.PUB.VESOFT$?
! RUN CI.PUB.SYS;INFO="AUTOBAC2";STDIN=JUNK;PARM=3
! PAUSE 10
! ENDIF
----- autobac2.pub.sys--------
SETVAR MYJOB "#J" + "!HPJOBNUM"
WHILE COUNT > 0 DO
INPUT SJLINE
COMMENT - Skips scheduled jobs
IF NOT STR(SJLINE,9,5)="SCHED" THEN
COMMENT --- Looks for each record that begins with #
IF STR(SJLINE,1,1) = "#" THEN
COMMENT --- Does not abort the console
IF NOT STR(SJLINE,20,3)=" 20" THEN
SETVAR SJJOB STR(SJLINE,1,6)
IF STR(SJJOB,1,LEN(MYJOB)) = MYJOB THEN
TELLOP !MYJOB NOT ABORTED.. THAT'S ME
ELSE
SETVAR C STR(SJLINE,1,6)
SETVAR B "ABORTJOB "
SETVAR B B + C
TELLOP !B
COMMENT --- Aborts jobs/sessions
CONTINUE
!B
ENDIF
Rick Clark
Systems Manager
Nook Industries
|