> -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:[EMAIL PROTECTED] On Behalf Of Edward Jaffe > Sent: Monday, April 21, 2008 9:46 AM > To: IBM-MAIN@BAMA.UA.EDU > Subject: Re: "action" in UK33496 > > > Patrick O'Keefe wrote: > > Sheesh! Everybody knows you're supposed to EX and EX in such > > circumstances, not execute some clever word. You need a more > > intuitive, self-explanatory abend like S0C3 to aid your > debugging. :-) > > > > I've remember some old code that used: > > EX 0,* > > to force a "logic error" abend. Such specification no longer > compile in > the "immediate relative" world. These days we use: > > J *+2 > > -- > Edward E Jaffe
Yea, I just changed a module to be "baseless". I had to include an EX 0,* in the "constants" area. Since I didn't want the S0C3 abend to always be from that address, I had to put an EX in the "code" section which referenced the EX in the "constants" section. That works OK. I could have jumped to the "constants" section, then looked at the BEAR register to tell where I came from, but I thought my way was a bit easier to debug. Why use J *+2 ? It assembles to "A7F4 0001", which would jump to the "0001" portion of the instruction. Why not just hard code a H'0'? Do you have some fancy debugger which detects this particular sequence by saying something like: "If the abend is a S0C1, and the opcode is x'00' followed by a x'01' and the BEA register points 2 bytes before the abend address, then report a deliberate abend."? -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology The information contained in this e-mail message may be privileged and/or confidential. It is for intended addressee(s) only. If you are not the intended recipient, you are hereby notified that any disclosure, reproduction, distribution or other use of this communication is strictly prohibited and could, in certain circumstances, be a criminal offense. If you have received this e-mail in error, please notify the sender by reply and delete this message without copying or disclosing it. ---------------------------------------------------------------------- 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
