Splice JCL into one record for DD statement parms
Splice JCL into one record for DD statement parms
I am working on an SMS conversion and trying to identify some of the hard-coded VOL=SER references for certain DSN prefixes. I am looking for something that splices the JCL into one record per JOB, EXEC, or DD statement to make searching for certain dataset names with VOL=SER references easier. Rather than re-invent the wheel, I thought I would see if it has already been done by someone.
- sergeyken
- Posts: 458
- Joined: Wed Jul 24, 2019 10:12 pm
- Skillset: Assembler, JCL, Utilities, PL/I, C/C++, DB2, SQL, REXX, COBOL, etc. etc. etc.
- Referer: Internet search
Re: Splice JCL into one record for DD statement parms
phcribb wrote:I am working on an SMS conversion and trying to identify some of the hard-coded VOL=SER references for certain DSN prefixes. I am looking for something that splices the JCL into one record per JOB, EXEC, or DD statement to make searching for certain dataset names with VOL=SER references easier. Rather than re-invent the wheel, I thought I would see if it has already been done by someone.
In my former two or three projects I wrote such tools, both as REXX program, and as Edit Macro. Being familiar with REXX it took about one day, to make it handle all possible combinations of input data.
Unfortunately, those clients strictly prohibited to copy any real code out of the company. That’s why I don’t have it on hand right now. I’m lazy to re-create it again for no reason.
Javas and Pythons come and go, but JCL and SORT stay forever.
- prino
- Posts: 641
- Joined: Wed Mar 11, 2009 12:22 am
- Skillset: PL/I - CICS - DB2 - IDMS - REXX - JCL, most in excess of three decades
- Referer: Google
- Location: Vilnius, Lithuania
- Contact:
Re: Splice JCL into one record for DD statement parms
phcribb wrote:I am working on an SMS conversion and trying to identify some of the hard-coded VOL=SER references for certain DSN prefixes. I am looking for something that splices the JCL into one record per JOB, EXEC, or DD statement to make searching for certain dataset names with VOL=SER references easier. Rather than re-invent the wheel, I thought I would see if it has already been done by someone.
I have the code to do this (and a lot more), but why do you need it if you can find a "VOL=SER=XXXXXX" with a
Code: Select all
f p'VOL=SER=^^^^^^'
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
robert.ah.prins @ the.17+Gb.Google thingy
Re: Splice JCL into one record for DD statement parms
Hi Robert, I need to search for certain DSN prefixes and for a certain VOL=SER prefix. For example, DSN=MACPAC* and VOL=SER=PRD* within the JCL proclib for all members containing that pattern. Anything you could offer would be appreciated. For general purpose for the other users, I think it would nice to have a general purpose JCL splicer that splices the JCL into one record per JOB, EXEC, or DD statement. I found one Rexx program written by Marc Vincent Irvin (below) that was a response to the same requirement, but I can’t make heads or tails out of it. Also I found Frank Clarke's JCL splitter (below) which I think I can modify, but I thought I would ask if anyone has ever come across a JCL splicer. I can see where both of the utilities (JCL Splitter and JCL Splicer) would be useful.
https://bit.listserv.tsorexx.narkive.co ... l-language
https://www.rexxla.org/freerepo/REXX/jsplit.txt
Patrick
https://bit.listserv.tsorexx.narkive.co ... l-language
https://www.rexxla.org/freerepo/REXX/jsplit.txt
Patrick
-
- Similar Topics
- Replies
- Views
- Last post
-
- 4
- 2686
-
by enrico-sorichetti
View the latest post
Fri Dec 18, 2020 7:59 pm
-
-
Copy partial record after a string in a record using SORT.
by Esmayeelhusen » Thu May 04, 2023 3:03 pm » in DFSORT/ICETOOL/ICEGENER - 16
- 4146
-
by Esmayeelhusen
View the latest post
Mon May 22, 2023 3:50 pm
-
-
- 8
- 4230
-
by steve-myers
View the latest post
Sat Oct 16, 2021 8:59 pm
-
- 2
- 1390
-
by PRDVCF
View the latest post
Thu Nov 17, 2022 9:58 pm
-
-
compare substring in the same record
by samb01 » Mon Jun 12, 2023 1:08 pm » in DFSORT/ICETOOL/ICEGENER - 10
- 2813
-
by sergeyken
View the latest post
Tue Jun 13, 2023 11:04 pm
-