View previous topic :: View next topic |
Author |
Message |
Rahull Beginner
![](images/avatars/gallery/cartoons/WB30.gif)
Joined: 29 Jan 2004 Posts: 62 Topics: 19
|
Posted: Tue Jan 25, 2005 6:42 am Post subject: Search copybook in PDS |
|
|
Hi,
I have got a list of 1000 of copybooks and now I have to search each copybook in each member of PDS(Having 4000 Programs) and make a report which list copybook name and program using that copybook.
Can we have JCL Utility for it ? Or we have to code rexx for it ? What it would be then? |
|
Back to top |
|
![](templates/subSilver/images/spacer.gif) |
kolusu Site Admin
![Site Admin Site Admin](images/ranks/adminpic.jpg)
Joined: 26 Nov 2002 Posts: 12367 Topics: 75 Location: San Jose
|
Posted: Tue Jan 25, 2005 6:44 am Post subject: |
|
|
Rahull,
3.14 or 3.15 can be invoked both in batch as well interactive mode
Kolusu _________________ Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
www.linkedin.com/in/kolusu |
|
Back to top |
|
![](templates/subSilver/images/spacer.gif) |
Rahull Beginner
![](images/avatars/gallery/cartoons/WB30.gif)
Joined: 29 Jan 2004 Posts: 62 Topics: 19
|
Posted: Thu Jan 27, 2005 12:36 am Post subject: |
|
|
Hi Kolusu,
If I am running the Job is batch, each time its abending with S322 abend. Even if I have change the TIME parameter, I am still getting the same abend.
I think PGM=ISRSUPC is failing to handle such a big input file. Please suggest me some other solution.
Thanks
Rahul |
|
Back to top |
|
![](templates/subSilver/images/spacer.gif) |
kolusu Site Admin
![Site Admin Site Admin](images/ranks/adminpic.jpg)
Joined: 26 Nov 2002 Posts: 12367 Topics: 75 Location: San Jose
|
Posted: Thu Jan 27, 2005 8:49 am Post subject: |
|
|
Rahull,
Try this job
Code: |
//SEARCH EXEC PGM=ISRSUPC, *
// PARM=(SRCHCMP,
// '')
//NEWDD DD DSN=YOUR INPUT DATASET,
// DISP=SHR
//OUTDD DD SYSOUT=(*)
//SYSIN DD *
SRCHFOR 'COPYBOOK1'
SRCHFOR 'COPYBOOK2'
....
SRCHFOR 'COPYBOOK 1000'
/*
|
Hope this helps...
Cheers
Kolusu _________________ Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
www.linkedin.com/in/kolusu |
|
Back to top |
|
![](templates/subSilver/images/spacer.gif) |
|
|