That code has to run under SDSF, which is a TSO command. I don't know whether 
SDSF will run under a TSO subset environment.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


________________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of 
Paul Gilmartin <0000000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Wednesday, August 26, 2020 9:40 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: MVS modify command capture

On Wed, 26 Aug 2020 07:40:47 -0500, Roger Lowe wrote:
>>
>>Is there a way to capture a MODIFY command ?
>>
>You could try this bit of REXX and then invoke it via IKJEFT01 batch jcl -
>
Does that require TSO or would IRXJCL (or even UNIX mutatis mutandis) sufffice?

> /*REXX*/
> blah = ISFCALLS('ON')
> ISFCONS  = "MY@CONS"
> ISFDELAY = "1"
> PARSE ARG input
> cmd.0=1
> cmd.1=input
> ADDRESS SDSF ISFSLASH "(cmd.)"
> IF (ISFULOG.0 > 0) THEN
> DO i=1 TO ISFULOG.0
>   SAY ISFULOG.i
> END
> EXIT 0
>
>and then the jcl to use -
>
> //S1       EXEC PGM=IKJEFT01
>//SYSEXEC  DD DISP=SHR,DSN=my.rexx.lib
>//SYSTSPRT DD SYSOUT=*                            <===== change this to point 
>to a dataset
>//SYSTSIN  DD *
>   %SDSFCMD D T

-- gil

----------------------------------------------------------------------
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