As I wrote, the RETURN breakpoint has to turn off the original breakpoint before the GO. Also, I suggested
"To do what you want is to have a piece of code that will not be re executed (such as the entry logic and you will need multiple breakpoints)." For example AT +8 (AT +0 (OFF +8;GO +8); PARM1= 'PARMS' ; COPY 14R RGESVE L(16); CALL LOOKAT.LOOKAT PARM(PARM1) RETURN(+0)) : On Tue, 3 Jul 2018 14:34:49 -0400 Joseph Reichman <reichman...@gmail.com> wrote: :>Binyamin :> :>You are right so here is the code :> :>000008 9065 6080 STM R6,R5,SAVEREGS :>00000C 5870 BA3C L R7,SAVE7 :> :>In the clist :> GETMAIN 10 SP(0) LOC (BELOW) EQUATE (PARM1) :> GETMAIN 16 SP(0) LOC (BELOW) EQUATE(RGESVE) :> AT +8 (PARM1= 'PARMS' ; COPY 14R RGESVE L(16); CALL LOOKAT.LOOKAT :>PARM(PARM1) RETURN(+C)) :> AT +C (L 11R?+A3C L(64) XC) this area is all zeros because the :>instruction didn't execute :> :>RETURN(+C) puts the address of +C into r14 :> :>If I do that RETRN(+C) +8 never executes if I do return +8 it loops :> :>Thanks :> :>The program just saves and restores registers and does a TPUT :> :>LOOKAT CSECT :> USING *,R15 :> STM R0,R15,SAVEREGS :> DROP R15 :> BALR R12,0 :> USING *,R12 :> TPUT MESSAGE,11 :> LM R0,R15,SAVERGS :> BR R14 :>SAVEREGS DS 16F :>MESSAGE DC C'IN LOOK AT' :> :> :>-----Original Message----- :>From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of :>Binyamin Dissen :>Sent: Tuesday, July 3, 2018 2:16 PM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: Re: TSO TEST breakpoint subcommand call either looping or not being :>executed :> :>True. :> :>Never have used a CALL in a breakpoint and OFF was always the last in the :>list. :> :>To do what you want is to have a piece of code that will not be re executed :>(such as the entry logic and you will need multiple breakpoints). :> :>at BKP1 (call whatever return(BKP2)) :>at BKP2 (off BKP1;go BKP1) :> :>If you want this repeated you will need to reissue the at BKP1 (even as part :>of the list for BKP2) :> :>However, my point still stands. Show the exact commands you used and the :>results. Makes it a lot easier for people helping you. :> :>On Tue, 3 Jul 2018 13:23:37 -0400 Joseph Reichman <reichman...@gmail.com> :>wrote: :> :>:>Binyamin :>:> :>:>This is from 1.9 book I don't think things have changed :> :> "Note: If :>an OFF subcommand in the list removes the breakpoint for which a :>list is :>specified, all remaining subcommands in that list are ignored". :>:> :>:>-----Original Message----- :>:>From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf :>Of :>Binyamin Dissen :>:>Sent: Tuesday, July 3, 2018 12:13 PM :>:>To: IBM-MAIN@LISTSERV.UA.EDU :>:>Subject: Re: TSO TEST breakpoint subcommand call either looping or not :>being :>executed :> :>That has not been my experience. Doing OFF in the :>breakpoint does not cause :>an automatic GO :> :>My guess is that you did :>not form the statement correctly or that it is :>possible to get to +C :>without going thru +8. :>:> :>:>It is always best to show your commands and the responses, rather than :>:>telling us what you thought you did. :>:> :>:>On Tue, 3 Jul 2018 07:49:10 -0400 Joseph Reichman <reichman...@gmail.com> :>:>wrote: :>:> :>:>:>Binyamin :>:>:> :>:>:>The off for +C killed the call as the book says :>Off for an at in the :>:>list kills the remaining :>Subcommand :> :> :> :>> On Jul 2, 2018, at 4:31 :>:>PM, Binyamin Dissen <bdis...@dissensoftware.com> wrote: :>:>:>> :>:>:>> If I understand you correctly and you repetitively want this to occur, :>:>you :>> will need: :>:>:>> :>:>:>> AT +8 (AT +C (off +c;call ......;go);go) :>> :>> (assuming you want :>the :>CALL after the STM) :>> :>> :>> On Mon, 2 Jul 2018 16:07:38 -0400 :>Joseph :>Reichman <reichman...@gmail.com> :>> wrote: :>:>:>> :>:>:>> :>Binyamin :>:>:>> :> :>:>:>> :>For example AT +8 (CALL PROGRAM PARM(parms) RETRUN(+C)) :>> :>If +8 :>:>contains a STM r0,r15,saveregs in this scenario the STM is never :>> :>:>:>executed and return to +C :>> :> :>> :>If for example at +8 (call :>program :>:>PARAM(parms) Return(+8)) the program is :>> :>called repeatedly :>> :> :>> :>:>:>I would like what is +8 to get executed after the call or execute +8 the :>:>STM :>> :>and then called program then go to the NSI :>> :> :>> :>Cann't :>:>figure out the syntax to make this work :>> :> :>:>:>> :>Thanks :>:>:>> :> :>:>:>> :>-----Original Message----- :>:>:>> :>From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On :>:>Behalf Of :>> :>Binyamin Dissen :>> :>Sent: Monday, July 2, 2018 3:59 PM :>:>> :>:>:>To: IBM-MAIN@LISTSERV.UA.EDU :>> :>Subject: Re: TSO TEST breakpoint :>:>subcommand call either looping or not being :>> :>executed :>> :> :>> :>On :>:>Mon, 2 Jul 2018 15:37:34 -0400 Joseph Reichman <reichman...@gmail.com> :>> :>:>:>wrote: :>:>:>> :> :>:>:>> :>:>I have a TSO TEST breakpoint with a call subcommand when I return :>to :>the :>> :>:>offset of the breakpoint the program loops over and over :>again. :>:>When I :>> :>:>return to the NSI the instruction where the breakpoint is :>:>doesn't get :>> :>:>executed :>> :> :>> :>I do not understand your :>scenario. :>:>:>> :> :>:>:>> :>You are setting a breakpoint and at the breakpoint you issue the :>CALL :>:>> :>subcommand? :>:>:>> :> :>:>:>> :>What OPCODE are you breakpointing on? :>:>:>> :> :>:>:>> :>What is the exact CALL command used? :>:>:>> :>:>:>> -- :>:>:>> Binyamin Dissen <bdis...@dissensoftware.com> :>> :>:>http://www.dissensoftware.com :>> :>> Director, Dissen Software, Bar & :>Grill :>:>- Israel :>> :>> :>> Should you use the mailblocks package and expect a :>:>response from me, :>> you should preauthorize the dissensoftware.com :>domain. :>:>:>> :>:>:>> I very rarely bother responding to challenge/response systems, :>> :>:>especially those from irresponsible companies. :>:>:>> :>:>:>> ---------------------------------------------------------------------- :>:>:>> For IBM-MAIN subscribe / signoff / archive access instructions, :>> :>send :>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :> :>:>:>---------------------------------------------------------------------- :>:>:>For IBM-MAIN subscribe / signoff / archive access instructions, :>send :>:>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen <bdis...@dissensoftware.com> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
