PROC to JCL mapping

jena_samirkumar · New User Joined: 16 Aug 2011 Posts: 3 Location: India

Hi Guys,

I am trying to map the procedures in the procedure library to the corresponding JCLs from which they are executed. I have a lot of procedures. Can you suggest me how can I find for each procedure the corresponding JCLs from where the Procedure is being called.

Thanks
Sam

PeterHolland · Posted: Tue Dec 08, 2015 12:39 pm

Scan your JCL libraries.

jena_samirkumar · New User Joined: 16 Aug 2011 Posts: 3 Location: India

I don't want to do it manually as I have a lot of procs.I want some JCL or any other idea to do it automatically.

PeterHolland · Posted: Tue Dec 08, 2015 1:30 pm

Abid Hasan · New User Joined: 25 Mar 2013 Posts: 88 Location: India

In-line with what Peter has pointed out, the output of ISPF 3.15 (Search-ForE) can be something you might want to look at; that as input to a small REXX or DFSORT or any utility of your choice for reformatting data will give you what you're looking for.

Hth.

Garry Carroll · Posted: Tue Dec 08, 2015 3:38 pm

You could modify the sample given in DFSort Smart Tricks for deleting all members of a PDS.

Instead of generating DELETE statements, generate SRCHFOR statements and pass the results into a step which runs ISRSUPC against a concatenation of your JCL libraries.

Garry

Rohit Umarjikar · Posted: Wed Dec 09, 2015 12:38 am

1.You can place all proc name one by one as a record in a PS file
2.Write a rexx to read this file and read one by one and search in JCL lib and find the member name and write to output
Google for 'read file and scan pds rexx' to get the source code

Or try it reverse way , get the JCL names and procs corresponds to it as done here.

Willy Jensen · Posted: Wed Dec 09, 2015 1:49 am

No easy solution as far as I am aware, which is why there are commercial products out there, and even they are sometimes failing. One alternative which springs to mind is to read all your executed jobs while still in spool using the SDSF API and then scan for the appropriate messages (xxx expanded from...)

Garry Carroll · Posted: Wed Dec 09, 2015 2:00 am

Suggest my approach as quite easy. I adapted the sample mentioned in about 15 mins to meet the requirements, I believe. ISRSUPC step can take multiple JCLLIBS to scan. A tiny further effort to modify the first step is needed if multiple PROCLIBS are involved.

Garry.

PeterHolland · Posted: Wed Dec 09, 2015 12:09 pm

jena_samirkumar · New User Joined: 16 Aug 2011 Posts: 3 Location: India

Hi Gary,
Is it possible to post the JCL to delete all member of PDS.I am not able to get a copyof the DFSORT smart trick pdf.

PeterHolland · Posted: Wed Dec 09, 2015 3:22 pm

jena_samirkumar, till now your only input was can i get some JCL or code.

Maybe you start doing/trying something yourself?

Being a software engineer, ex IBM employee with JCL and REXX skills.

Nic Clouston · Posted: Wed Dec 09, 2015 7:44 pm

The DFSort Smart Tricks is linked to in this and/or the sister forum in the DFsort section so saying you cannot get hold of same is saying that you have not tried.

Garry Carroll · Posted: Wed Dec 09, 2015 8:25 pm