On 3 October 2016 at 19:52, John McKown <[email protected]> wrote:
> On Mon, Oct 3, 2016 at 6:35 PM, Steve Thompson <[email protected]> wrote:
>
>> It is 0. I know this because I do a compare for anything other than zero
>> going to S0C3 (  EX  0,*).
>>
>
> I used to do that. I really prefer my "new" method (which I think I got
> from someone here).
>
>    LT Rx,ECBADDR
>    JZ *+2  # THIS ABENDS S0C1

There are many. For a change I like
LE    0,*+4
SQER  0,0

which produces, on z/OS, a 0E0-1D abend (square root exception). Not
too many of those happen in a typical app.

But I think we had a strong discussion of these "cute" abends some
years ago. Just issue an appropriate user ABEND macro and be done with
it, was the mainstream thinking.

Tony H.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to