You are a genius it worked I don’t understand why > On Jul 3, 2018, at 4:07 PM, Binyamin Dissen <bdis...@dissensoftware.com> > wrote: > > Not true - only if you are doing an OFF for the current breakpoint. > > Try my example. > > On Tue, 3 Jul 2018 15:31:40 -0400 Joseph Reichman <reichman...@gmail.com> > wrote: > > :>anytime I do an OFF subcommand all other subcommand don’t execute > :> > :> > :> > :> > :> > :>> On Jul 3, 2018, at 2:46 PM, Binyamin Dissen <bdis...@dissensoftware.com> > wrote: > :>> > :>> 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 > :> > :>---------------------------------------------------------------------- > :>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
---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN