Trapping command output issued via TSO server



IBM's Command List programming language & Restructured Extended Executor

Trapping command output issued via TSO server

Postby vsiano » Fri Sep 07, 2007 11:17 pm

Hello,
I'm trying to figure out how to trap a tso command response issued from my rexx code which is run in a netview on a z/os 1.8 box. The code logic follows:

1. <start a tso server>

2. issue a the command via PIPE:
"PIPE TSO "invoke_type" "xsid" "etype,
" | CORR 10",
" | STEM OUTPUT."

3. <stop the tso server>

i the output stem merely contains a "command accepted" message, not the output of the command itslef.

Any help would be appreciated.
vsiano
 
Posts: 1
Joined: Fri Sep 07, 2007 11:08 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Trapping command output issued via TSO server

Postby marso » Tue Sep 18, 2007 8:26 pm

I'm not sure about how TSO server works, but under TSO mainframe, this is what we do:

Call OUTTRAP('OUT.')              /* trap TSO output in stem OUT. */
Address TSO "LISTUSER"            /* run any TSO command */
Call OUTTRAP('OFF')               /* stop trapping */

Do Ix = 1 To OUT.0                /* sample loop to display */
   Say "Received: " OUT.Ix        /* trapped result */
End
User avatar
marso
 
Posts: 12
Joined: Mon Jul 30, 2007 5:04 pm
Has thanked: 0 time
Been thanked: 0 time


Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post