And yet another approach is to define a couple of SYSTEM WIDE 
Logon and Logoff UDC's 

Here's what we do - 

We have a logon UDC - UDCSTART that runs an program we've written
to log to a database file that the job has started. 

We also have a log-off UDC which is invoked by the EOJ command to log the 
end of the job (it runs the same program with a different parm value). 

And we have a monitoring program that checks that any job that has started 
is either still running or has reached the EOJ card. 

Please note that you don't have to change the original job streams to implement
the above, but we also have other System wide UDCs which can flag the job
has having "logically" failed, or that the job has been streamed and is waiting in the
job Queue. 

Here's a few of the UDCs. Best of luck.

UDCSTART
PARM P1=" ",P2=" ",P3=" ",P4=" ",P5=" ",P6=" ",P7=" ",P8=" ",P9=" "
OPTION NOLIST
SETVAR P0 "!P1"+" !P2"+" !P3"+" !P4"+" !P5"+" !P6"+" !P7"+" !P8"+" !P9"
XEQ PRTRACK.prog.account;PARM=2;INFO="!P0"
comment
comment UDC invoked as part logon procedure for job streams confirming
comment start of job
comment

L:help eoj
User-defined command:

EOJ
OPTION NOLIST
UDCEOJ
EOJ
comment
comment UDC to intercept EOJ from JOB streams and invoke tracking
comment program to confirm EOJ. Note this UDC has to precede UDCEOJ
comment

L:help udceoj
User-defined command:                    

UDCEOJ
PARM P1=" ",P2=" ",P3=" ",P4=" ",P5=" ",P6=" ",P7=" ",P8=" ",P9=" "
OPTION NOLIST
SETVAR P0 "!P1"+" !P2"+" !P3"+" !P4"+" !P5"+" !P6"+" !P7"+" !P8"+" !P9"
XEQ PRTRACK.prog.acct;PARM=4;INFO="!P0"
comment
comment UDC invoked bu EOJ UDC above - tracks end of job
comment: