Rob Is your suggestion to use EXTR as opposed to ECB because you suspect the validity of the TCB and the TCB is passed to the exit in R1
More so the EXTR will get control after the subtask does a BR R14 Back to the EXTR when the exit ( EXTR ) does a BR 14 to z/os, z/os will resume executing my code in my clean up routine as besides task termination I have to release CSA storage among other things Thanks > On Oct 31, 2018, at 7:01 AM, Rob Scott <[email protected]> wrote: > > I would suggest performing the DETACH from an "end of task exit routine" > whose address is passed on the ETXR keyword of ATTACH(X). > > Rob Scott > Rocket Software > > -----Original Message----- > From: IBM Mainframe Discussion List <[email protected]> On Behalf Of > Joseph Reichman > Sent: Wednesday, October 31, 2018 2:20 AM > To: [email protected] > Subject: S23E > > Hi > > > > I know system 23E is for invalid TCB it seems to me that TCB is valid could > any confirm that the following is the correct sequence of step to terminate a > TASK > > I have 4 tasks I do an ATTACH with ECB =, SYSECB is the ECB, I am using > END_ECB I use to tell the subtask to return via BR 14 > > > > Thanks > > DETACH_LOOP DS 0H > > * > > L R1,END_ECB > > * > > POST (R1) Post it > > * > > * > > WAIT ECB=SYSECB > > > > MVI TASK_ADDR,X'00' > > * > > DETACH TASK_ADDR > > * > > * > > * > > LA R7,THREAD_LEN(,R7) Next > > BCT R6,DETACH_LOOP > > * > > * > > > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > [email protected] with the message: INFO IBM-MAIN > ================================ > Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ > Main Office Toll Free Number: +1 855.577.4323 > Contact Customer Support: > https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport > Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - > http://www.rocketsoftware.com/manage-your-email-preferences > Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy > ================================ > > This communication and any attachments may contain confidential information > of Rocket Software, Inc. All unauthorized use, disclosure or distribution is > prohibited. If you are not the intended recipient, please notify Rocket > Software immediately and destroy all copies of this communication. Thank you. > > ---------------------------------------------------------------------- > 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
