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

Reply via email to