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

Reply via email to