!job abrtckdy,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"
showout $stdlist.@.@(!t1 and !t2) >*abrtlist
if cierror = 0
   save abrtlist
#
#  send the report to you
#
   yespurge abrtlist
endif
deletespoolfile @.@.!hpaccount(spool.jsname="!hpjobname")
exit
!
!eoj