Hi, Donna,
We use sendmail to notify our help desk that a job has abended & a system programmer must be paged. (We also at one time had it alpha-text page us directly.)
Please note that we had problems when we first started using sendmail on our Development box.....we had a few suspicious system hang's. We believe that if the network was down (i.e. during nightly shutdown/backup), & sendmail attempted to send, it would hang the system. We resolved this by doing a network status check first, & bringing the network up if necessary. The following scripts are used as follows: msback1.job is set up as the "restart" job for our backup thru our scheduler, Maestro (Arranger). If the backup abends, it triggers msback1 to send mail using distlist. We have set up similar "restart" jobs for all jobs in the nightly schedule that require immediate attention of the on-call sys. pgmr. Maybe you can use pieces of this:
!job msback1,mgr.xxxxx;OUTCLASS=LP,1,1
!NETCHECK
!echo !netup
!setvar cnt 0
!WHILE "!NETUP" = "N" and cnt < 4
! setvar cnt !cnt+1
! STARTNET.NET.SYS
! PAUSE 600
! NETCHECK
! ENDWHILE
!IF "!NETUP" = "Y"
! CONTINUE
!file mailspfm,oldtemp
!if FINFO('*mailspfm','exists') then
! purge mailspfm,temp
!endif
!build mailspfm;temp;rec=,,b;disc=2147483647
!setvar recp1 ""
!setvar recp2 ""
!setvar recp3 ""
!mpex
setvar cnt 0
repeat
setvar cnt cnt+1
if cnt < 10
setvar recp1 '!recp1' + rtrim('!currentrec')
else
if cnt < 20
setvar recp2 '!recp2' + rtrim('!currentrec')
else
setvar recp3 '!recp3' + rtrim('!currentrec')
endif
endif
forrecs currentrec=maillist.data,old
exit
!setvar L3 &
!'This is an automated mail msg. Severity=1, Issue Type='
!setvar L4 &
!'Problem, Client Site=Farmington Hills, Client Name='
!setvar L5 &
!'HP3000 Auto-Client, Issue Descr=997 Backup Schedule Job Abend, '
!setvar L6 &
!'Issue Code=Job Abend, Product=HP3000, Application='
!setvar L7 &
!'System Programming Job Abend. Please do not reply to this '
!setvar L8 &
!'email as it is automated. Thank you." '
!echo To: !recp1!recp2!recp3 >*mailspfm
!echo From: HP3000 Auto-Client >>*mailspfm
!echo Subject: Please open Severity 1 issue >>*mailspfm
!echo !L3!L4!L5!L6!L7!L8 >>*mailspfm
!xeq SENDMAIL.PUB.SENDMAIL "-t" <*mailspfm
!purge mailspfm,temp
!reset mailspfm
!ELSE
! WHILE "!NETUP" = "N"
! TELLOP ++++++++++++++++++++++++++++++++++++
! TELLOP THERE MAY BE A NETWORK PROBLEM.....
! TELLOP PLEASE PAGE THE ON-CALL
! TELLOP HP3000 SYSTEM PROGRAMMER
! TELLOP ++++++++++++++++++++++++++++++++++++
! PAUSE 300
! NETCHECK
! ENDWHILE
!ENDIF
!SETJCW JCW FATAL0
!EOJ
print netcheck.cmds
RUN MAIN.PUB.VESOFT;INFO="MTESTNET.CMDS.xxxxx" > JUNK
print mtestnet.cmds
nscontrol status > nsfile
SETVAR NETUP "Y"
REPEAT
IF "!CURRENTREC" = "NO NETWORK SERVICES ARE CURRENTLY ACTIVE."
SETVAR NETUP "N"
ENDIF
FORRECS CURRENTREC=NSFILE,OLDTEMP
:print maillist.data (includes appropriate system programmers & all members of the Help Desk)
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask],
[log in to unmask]
>>> Donna Garverick <[log in to unmask]> 09/15/99 01:08PM >>>
hi all~
it looks like we'll actually be putting sendmail into
production soonish and i'm wondering...
- do 'we' have something like mailx to act as a wrapper for
sendmail or
- has someone written a command file wrapper to sendmail
i have mark bixby's 'mailspf' command file and it quite
wonderful (thanks, mark) but i need something that can
handle 1) regular text files(btw, are there any significant
limits here? like record widths...?); 2) handle an indirect
file reference (like ^myfile maybe?) to both a distribution
list and to a list of files. i've started working on such a
thing...but thought perhaps someone else has already
invented this wheel. - d
--
Donna Garverick Sr. System Programmer
925-210-6631 [log in to unmask]
>>>MY opinions, not Longs Drug Stores'<<<
|
