Provided you have the appropriate authorities...
Batch job:
//jobcard
//SDSFCMD EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPROC DD DISP=SHR,DSN=Your.REXX.library
//SYSTSIN DD *
%SDSFCMD D GRS,RES=(*,SYS1.LINKLIB)
/*
SDSFCMD REXX:
/*REXX*/
blah = ISFCALLS('ON')
ISFCONS = "ANTCONXX"
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
Ant.
-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
willie bunter
Sent: Saturday, 1 June 2019 2:02 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: BATCH JOB TO RUN GRS COMMAND
Hallo All,
Would anybody have an example to run the GRS command for the following dsn via
a batch job :
DGRS,RES=(*,SYS1.LINKLIB)
Thanks in advance
----------------------------------------------------------------------
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
