IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Search utility(3.14) using JCl and Cobol


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
RKS3

New User


Joined: 09 Jun 2017
Posts: 4
Location: India

PostPosted: Sat Jun 10, 2017 10:24 pm
Reply with quote

Search utility(3.14) using JCl and Cobol.

Hello Guys -

I am planning to create a JCL(may use cobol program) which can be used to search a program in PDS library(Job,proc,control card) to find out the corresponding job,proc,control card so that the time will be saved when we search using 3.14(search utility) as we need to wait till it completes.

Input -> program name in sysin srchfor 'program name'
Ouput -> Program name , Job, Proc, Control card in a file


I tried with ISRSUPC utility using SRCHFOR with program name and could find, program name is used in control card with symbolic parameter. So how to proceed further to find out the job and proc.

Could you please share your thoughts on this or if you have any other easy solution which can solve all hurdles?

Note :
1-> control card name may not be same as program name
2-> Program name can be mentioned anywhere in control card : Ex : RUN PROGRAM(Program name) in case of db2
3-> How to find whether the program name is used in proc or in control card which is used in proc?

Appreciate your time.[/b]
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 917
Location: The Universe

PostPosted: Sat Jun 10, 2017 10:46 pm
Reply with quote

In these forums, Do not, ever, post the same query in multiple places. You will not get a response anywhere.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA

PostPosted: Sun Jun 11, 2017 6:55 am
Reply with quote

Quote:
the time will be saved when we search using 3.14(search utility) as we need to wait till it completes.
So instead of waiting for the system utility to complete, you want to wait for YOUR utility to complete?

I assume you work for a company that is charging out your time -- no other explanation makes sense for the system resources and personal time you are wasting on this effort. Use ISPF 3.4 and the search function -- that is what it is for. Duplicating this functionality is NOT providing your company with any additional functionality.

Furthermore, your statement of what you are doing is so vague as to be useless. What if the PROC is stored in a PROCLIB? What if the control records are stored in a different data set than the JCL (which is usual for many sites)? Based upon what you have said, it appears you are going to HAVE to use a programming language to complete your task.
Back to top
View user's profile Send private message
RKS3

New User


Joined: 09 Jun 2017
Posts: 4
Location: India

PostPosted: Sun Jun 11, 2017 12:31 pm
Reply with quote

Hi Robert

Time saving, I meant it will run as a batch job and I can do other task if it needs to search in multiple PDS. This is just one of the reason.

By just giving input as program name, I should get output with program name and corresponding proc n job .

And yes, there are many other possibilities of control card available in different library. I want to include all possibility . My question was whether it can be done in jcl ?

Thanks for your time.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA

PostPosted: Sun Jun 11, 2017 5:18 pm
Reply with quote

ISPF 3.4 can be submitted as a batch job, so your reasons for doing this are STILL completely false.

What do you mean by "whether it can be done in jcl"? JCL does nothing but set up the environment for a program to execute -- sometimes the program is an application program, sometimes the program is a system utility such as DFSORT -- but JCL does NOTHING by itself (if you want to delete a data set, even, you run a system program called IEFBR14 to do that).

You are not likely to get help with your task on this, or any, forum since we see no reason to waste time reinventing tools that are already available.
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 792
Location: Pennsylvania

PostPosted: Mon Jun 12, 2017 5:02 pm
Reply with quote

This can be done, but is no 'easy' task. I know because I have done it.

Here is a quick outline of my steps.

1) Used XREFPLUS! to expand all Production Jobs. This process brings in all Procs and Control cards.

2) Used a series of Synsort steps to extract the important information from the excessive amount of JCL output created.

3) Used a series of home grown Rexx execs to further refine the data into a format that can be referenced by the end user.

This is 6+ months of work boiled down to three steps.

This process runs in batch twice monthly to keep the data relevant.
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 917
Location: The Universe

PostPosted: Mon Jun 12, 2017 6:09 pm
Reply with quote

Dave: what, pray tell, is XREFPLUS!?
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 792
Location: Pennsylvania

PostPosted: Mon Jun 12, 2017 7:04 pm
Reply with quote

This product is a JCL Cross Reference tool.

One of its abilities is to expand Jobs to bring in Procs, SYSIN and SYSTSIN input.

There are other products that do the same, I am sure.

Code:
XREFPLUS!  VER 4.3FCL
COPYRIGHT (C) 2013 SOFTWARE ENGINEERING OF AMERICA
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 3076
Location: NYC,USA

PostPosted: Mon Jun 12, 2017 8:40 pm
Reply with quote

Quote:
I am planning to create a JCL(may use cobol program) which can be used to search a program in PDS library(Job,proc,control card) to find out the corresponding job,proc,control card so that the time will be saved when we search using 3.14(search utility) as we need to wait till it completes.
Why you want to reinvent a wheel, 3.14 does exactly you asked for? if it has to wait then you got to wait till it finishes the task period, because the utility is doing its work while you wait and not sleeping after the job is submitted, it got to search all the members of the PDS of all the concatenated libs.
Back to top
View user's profile Send private message
RKS3

New User


Joined: 09 Jun 2017
Posts: 4
Location: India

PostPosted: Tue Jun 13, 2017 2:37 pm
Reply with quote

daveporcelan wrote:
This can be done, but is no 'easy' task. I know because I have done it.

Used XREFPLUS! to expand all Production Jobs. This process brings in all Procs and Control cards.
.


Hi Dave

Thank you for the reply

Could you please give some info on how XREFPLUS utility works and how to use it with an example?.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2454
Location: Hampshire, UK

PostPosted: Tue Jun 13, 2017 3:37 pm
Reply with quote

RKS,
Why ask Dave that? Do you have XREFPLUS installed at your place? If you do then you will access to the anuals and there will be samples in your workplace. If it is not installed then you will have to go to your System programmer's and ask them to buy it (I assume that it is not free) and install it. Buying it would then mean you have access to the manuals and samples and vendor support.
Back to top
View user's profile Send private message
RKS3

New User


Joined: 09 Jun 2017
Posts: 4
Location: India

PostPosted: Tue Jun 13, 2017 4:39 pm
Reply with quote

Nic Clouston wrote:
RKS,
Why ask Dave that? Do you have XREFPLUS installed at your place? If you do then you will access to the anuals and there will be samples in your workplace. If it is not installed then you will have to go to your System programmer's and ask them to buy it (I assume that it is not free) and install it. Buying it would then mean you have access to the manuals and samples and vendor support.


Hi Nic

Thank you . I think its not installed in my system . is there any possibility to replicate the same functionality with some jcl utility and sorting ? so that I can develop it.
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 792
Location: Pennsylvania

PostPosted: Tue Jun 13, 2017 5:13 pm
Reply with quote

At one point, our company had considered ending our contract for XREFPLUS!

They had asked me to come up with alternative. I looked into CA JCLCHECK, which performs similar functionality. I looked possible, but with some difficulties. Then for whatever reason, they renewed the contract.

The point here is: you need a way of expanding Procs and resolving symbolic parameters. That is what these products are for.

Quote:
with some jcl utility


I am not sure what you are looking for. Some magic (and free) bullet.

Coming up with innovative solutions is hard (and costly), but the end result is rewarding and useful.

My advice is look at the products currently available in your shop.

You must have some sort of JCL checker. That may have functionality useful as a starting point.

You can contact the XREFPLUS! company to purchase their product if this is important enough to management.

Check back with further questions and advice.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts COBOL sorting, with input GDG base COBOL Programming 7
No new posts Need help with ADABAS query (COBOL-AD... All Other Mainframe Topics 0
No new posts Replacing FILLER with FILLER<SeqNu... DFSORT/ICETOOL 2
No new posts Compile Sp Cobol base COBOL Programming 1
No new posts Use Copy Utility DB2 7
Search our Forums:

Back to Top