From: Charley Shanks To: All

I was wondering if there is a way that a FLAG can be set in a CL program so that when it ends, the system sends an "Ended Abnormally" message. I'd like a nighttime batch job that doesn't meet certain criteria (that I can trap for) to end without blowing up, but I still want the operator notified that something went wrong. I know it's easy enough to send a message on my own...this is basically a curiosity question.

From: Ernie Malaga To: Charley Shanks

Some time ago, I uploaded a utility I wrote (the ABEND command), which you can find in the AS/400 Contributed Programs download area of OpenBBS. I think it will help you do what you want.

From: Pete Hall To: Charley Shanks

You can send an escape message to any program higher up in your program stack if you want to short-circuit the processing at intermediate levels. It's a handy trick once in a while. For example:

 SNDPGMMSG MSGID(CPF9897) + MSGF(QCPFMSG) MSGTYPE(*ESCAPE)