Better than my previously posted solution!
<snip>
There's an LE370 program/service that can be invoked to cause an abend.
I've pasted in a small example of a callable COBOL program which in turn
calls the LE370 program.
LINKAGE SECTION.
01 ABEND-CODE PIC S9(05) COMP.
01 DUMP-IND PIC S9(05) COMP.
PROCEDURE DIVISION USING ABEND-CODE DUMP-IND.
CALL 'CEE3ABD' USING ABEND-CODE DUMP-IND.
GOBACK.
</snip>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
