!job abrtckhr,manager.sys;outclass=lp,1
!
!run main.pub.vesoft,mpex
file abrtlist;rec=-80,,f,ascii
setvar t1 "spool.jobaborted"
setvar t2 "spool.readydate=today"
setvar t3 "spool.readytime>clock-3600"
showout $stdlist.@.@(!t1 and !t2 and !t3) >*abrtlist
if cierror = 0
   save abrtlist
#
#  send the report
#
   yespurge abrtlist
endif
deletespoolfile @.@.!hpaccount(spool.jsname="!hpjobname")
exit
!
!eoj