Unless you're in supervisor state, I don't know of a way to do it. Dou you have a spare register so you could JAS to the message routine?
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 עַם יִשְׂרָאֵל חַי נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר ________________________________________ From: IBM Mainframe Discussion List <[email protected]> on behalf of Steve Austin <[email protected]> Sent: Monday, July 29, 2024 8:06 AM To: [email protected] Subject: Re: Breaking Event Address, BEAR The code I'm dealing with has an error routine that build a message, but sometimes the message is insufficient and it would be useful to know what branched to that routine without forcing a dump. -----The code Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Seymour J Metz Sent: Monday, July 29, 2024 12:58 PM To: [email protected] Subject: Re: Breaking Event Address, BEAR BEAR is not the address of the last branch, it's the address of the last breaking event. If you brnch to an OPEN and get am S213, I don't believe that there is any way to recover the branch. What is the specific scenario you're concerned with. IBM: is the BEAR at the time of a program check available to recovery exits? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 עַם יִשְׂרָאֵל חַי נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר ________________________________________ From: IBM Mainframe Discussion List <[email protected]> on behalf of Steve Austin <[email protected]> Sent: Monday, July 29, 2024 6:29 AM To: [email protected] Subject: Breaking Event Address, BEAR I lied I don’t want the Breaking Event address I’d like the source of the Breaking Event address. And I’m assuming the source of the BEA is the same as the source of the branch entries in the trace table. I’d like my running program to retrieve the address of the last branch without breaking anything. Is this possible? Thanks -- This e-mail message has been scanned and cleared by Google Message Security and the UNICOM Global security systems. This message is for the named person's use only. If you receive this message in error, please delete it and notify the sender. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN -- This e-mail message has been scanned and cleared by Google Message Security and the UNICOM Global security systems. This message is for the named person's use only. If you receive this message in error, please delete it and notify the sender. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
