Thank you for getting back I’m sending the email from my personal email as I cannt send out from my IRS email So have to look at the PDS and type in what it says
CONTROL NOLIST NOCONLIST NOSYMLIST NOMSG This is the non debugging CONTROL From my experience this CONTROL and the other I use ( with out the ‘NO’) makes a difference at which sysoutline number the data is in Thanks > On Oct 30, 2024, at 9:37 AM, Binyamin Dissen > <[email protected]> wrote: > > Show the > > CONTROL LIST > > On Wed, 30 Oct 2024 07:55:15 -0400 Joseph Reichman > <[email protected]> wrote: > > :>Binyamin > :> > :>Here it is > :> > :> > :>AT +160 (CONDBREK 7R?+24 2 0038) NONOTIFY > :> > :>Here is the CLIST CONDBREK ddname SYSUEXEC > :> > :>PROC 3 ADDRESS LEN VALUE > :>SET ENDLEN = (12+((&LEN*2)-1) > :>SET &SYSOUTTRAP = 1 > :>LIST &ADDRESS L(&LEN) XC > :>SET &SYSOUTTRAP = 0 > :>SET VAL = &STR(&SUBSTR(12:&ENDLEN,&SYSOUTLINE1) > :>IF &VAL = = &VALUE THEN + > :> WRITE BREAK POINT CONDTION HIT > :>Else > :> GO /* CONTINUE */ > :> > :>THANKS > :> > :> > :> > :>-----Original Message----- > :>From: IBM Mainframe Discussion List <[email protected]> On Behalf Of > :>Binyamin Dissen > :>Sent: Wednesday, October 30, 2024 2:55 AM > :>To: [email protected] > :>Subject: Re: Conditional breakpoint TSO TEST > :> > :>TEST uses PUTGET/PUTLINE > :> > :>Show the AT command. > :> > :>Show the output.. > :> > :> > :>On Tue, 29 Oct 2024 20:49:39 -0400 Joseph Reichman > :><[email protected]> wrote: > :> > :>:>I do capture the output but for some reason I don't break on equal > :>condition :> :>> On Oct 29, 2024, at 8:47?PM, Seymour J Metz > :><[email protected]> wrote: > :>:>> > :>:>> ?Even if TSO TEST LIST uses TPUT, you can capture the output if you run > :>under the TSO Session Manager. > :>:>> > :>:>> -- > :>:>> Shmuel (Seymour J.) Metz > :>:>> http://mason.gmu.edu/~smetz3 > :>:>> ??? ?????????? ??? > :>:>> ?????? ??????????? ???? ?????????? > :>:>> > :>:>> > :>:>> > :>:>> ________________________________________ > :>:>> From: IBM Mainframe Discussion List <[email protected]> on behalf > :>of Joseph Reichman <[email protected]> > :>:>> Sent: Tuesday, October 29, 2024 6:26 PM :>> To: [email protected] > :>:>> Subject: Conditional breakpoint TSO TEST :>> :>> Caution: This email did > :>not originate from George Mason's mail system. Do not click links or open > :>attachments unless you recognize the sender and know the content is safe. > :>:>> > :>:>> > :>:>> Hi > :>:>> > :>:>> Is there a way to make a conditional breakpoint by trapping the TEST > :>list command getting its value and comparing it :>> :>> What I mean at > :>breakoint execute a clist which issues and traps the list command for what > :>you want to compare and if its equal do nothing :>> :>> Other wise go :>> > :>:>> SET &SYSOUTRAP = 1 :>> List 7R?+24 L(2) XC :>> SET &SYSOUTRAP = 0 :>> > :>:>> Set Val = &str(&substr(12:15,&SYSOUTLINE1) :>> :>> If &val = 0012 then + > :>:>> Write hit condition :>> Else :>> Go :>> :>> This code doesn't seem to > :>work :>> :>> Thanks :>> > :>---------------------------------------------------------------------- > :>:>> 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 :> > :>:>---------------------------------------------------------------------- > :>:>For IBM-MAIN subscribe / signoff / archive access instructions, :>send > :>email to [email protected] with the message: INFO IBM-MAIN > > -- > Binyamin Dissen <[email protected]> > http://www.dissensoftware.com > > Director, Dissen Software, Bar & Grill - Israel > > ---------------------------------------------------------------------- > 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
