Greetings Bob,
I was looking through my old JCL library and ran across several examples of
scans using ISRSUPC. Depending on what you want to do you could try
ISRSUPC. If you have access to JOBSCAN you could try it. If you client has
DAF, you can use that to scan SMF records to see if any executing jobs are
touch the dataset.
//SEARCH02 EXEC PGM=ISRSUPC,PARM=('SRCHCMP,ANYC,LPSF')
//NEWDD DD DSN=D0PCPN.JCLLIB.CA7PROD,DISP=(SHR,KEEP,KEEP)
// DD DSN=D0PCPN.JCLLIB.OVERRIDE,DISP=(SHR,KEEP,KEEP)
// DD DSN=D0PCPN.JCLLIB.ALTERNAT,DISP=(SHR,KEEP,KEEP)
// DD DSN=D0PCPN.JCLLIB.FREEZE,DISP=(SHR,KEEP,KEEP)
// DD DSN=D0PCPN.JCLLIB.ABEND,DISP=(SHR,KEEP,KEEP)
//OUTDD DD SYSOUT=X
//SYSIN DD *
SRCHFOR 'UNIT=TAPE'
/*
Paul
-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of
John Pratt
Sent: Friday, December 15, 2023 5:09 PM
To: [email protected]
Subject: Re: What is the PDS command?
Hi Bob,
If I remember correctly =3.14 has a batch option and you can concatenate all
your JCL libraries into the generated job.
John.
-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of
Bob Bridges
Sent: Saturday, 16 December 2023 8:55 AM
To: [email protected]
Subject: What is the PDS command?
Long ago I wrote - I'm pretty sure I wrote - a REXX exec that would do a
3.14 search through multiple libraries for a character string. I'm looking
for it now, and I find one in my archives that uses the PDS command to do
the search.
But what's the PDS command? I've a strong suspicion that I wrote this at a
client that had a popular CBTTAPE utility, and if so it's not appropriate
for my current location. Can someone confirm?
If you care, what I really want to do is search through a list of JCL
libraries for certain DSN fragments. There's a job we're probably going to
shut down, and I want to be sure the datasets it produces are not used
anywhere else in production.
---
Bob Bridges, [email protected], cell 336 382-7313
/* "Bother", said the Borg, "we've assimilated a Pooh". */
----------------------------------------------------------------------
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
