See the CONSOLE facility in TSO. I don't know whether it is available in System
Rexx.
________________________________________
From: IBM Mainframe Discussion List <ibm-m...@listserv.ua.edu> on behalf of
Farley, Peter <0000031df298a9da-dmarc-requ...@listserv.ua.edu>
Sent: Tuesday, May 9, 2023 1:30 PM
To: ibm-m...@listserv.ua.edu
Subject: Can REXX OUTTRAP trap WTO's?
Cross-posted to IBM-MAIN and TSO-REXX lists.
Is there any way for Rexx script to capture WTO output? This is a simple
case, a one-line WTO, no multiline possible.
I only recently found a need to do this, and my tests so far say "no it can't".
/* Rexx */
/* Capture WTO from BATCHPGM */
xtrp = outtrap("zdsp.")
address attchmvs "BATCHPGM"
xtrp = outtrap("OFF")
say "ZDSP.1="zdsp.1
Execution result online in TSO:
*** WTO OUTPUT FROM BATCHPGM ***
ZDSP.1=ZDSP.1
Peter
This message and any attachments are intended only for the use of the addressee
and may contain information that is privileged and confidential. If the reader
of the message is not the intended recipient or an authorized representative of
the intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication
in error, please notify us immediately by e-mail and delete the message and any
attachments from your system.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
