Thomas Ramseier wrote:
You are right, abends are not handled. I added 3 loc in the version below
and did a first test with a sample job. It looks quite ok, but maybe some
other members of the list are willing to do further tests.
[snip]
If Bitand(sct_abnd,'04'X) = '04'X Then /* Step Abended */
ltrl = ' **** Jobstep abended ***** '
It might also be nice if you pull the abend code from the SCTX and
display something like "Abended Sxxx/Unnnn".
--
.-----------------------------------------------------------------.
| Edward E. Jaffe | |
| Mgr, Research & Development | [EMAIL PROTECTED] |
| Phoenix Software International | Tel: (310) 338-0400 x318 |
| 5200 W Century Blvd, Suite 800 | Fax: (310) 338-0801 |
| Los Angeles, CA 90045 | http://www.phoenixsoftware.com |
'-----------------------------------------------------------------'
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
