Using an ECB for SYSEVENT TRANSWAP implies that the issuer will WAIT on the ECB that will be posted once the TRANSWAP is complete. You are in SRB mode and cannot issue the WAIT SVC - therefore your SRB code has most likely continued before SYSEVENT starts or even completes its processing.
Also being in SRB mode and using the ECB form of SYSEVENT is probably 'surprising' for the SYSEVENT code, so it might do one of the following : (a) Fail gracefully (b) Abend (c) Attempt to POST the ECB anyway with LINKAGE=SYSTEM/BRANCH hoping that you know what you are doing..... In any case I am curious to see which "system address space" are you trying to make NONSWAP and for what purpose? Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of MichealButz Sent: 23 July 2014 16:34 To: IBM-MAIN@LISTSERV.UA.EDU Subject: return code from SYSEVENT TRANSWAP ENTRY=BRANCH Hi, I have a SRB which I schedule in a system address space I would like to make it NON SWAPABLE in the srb I use SYSEVENT TRANSWAP,ENTRY=BRANCH Before I prime R1 with a ECB The documentation says the return code is in the last byte of R1 when sysevent returns R1 doesn't point to the ECB but some piece of code later in my program e.g. LA R1,ECB SYSEVENT TRANSWAP,LINKAGE=BRANCH CLM R1,B'0001',=X'00' BE GOOD The address returned in R1 from SYSEVENT points to somewhere in my program not a return code Thanks ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ================================ Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ +1 800.966.3270 ■ +1 781.577.4321 Unsubscribe From Commercial Email – unsubscr...@rocketsoftware.com Manage Your Subscription Preferences - http://info.rocketsoftware.com/GlobalSubscriptionManagementEmailFooter_SubscriptionCenter.html Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy ================================ ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
