> -----Original Message-----
> From: IBM Mainframe Discussion List
> [mailto:[email protected]] On Behalf Of Roberts, John J
> Sent: Tuesday, November 01, 2011 10:00 AM
> To: [email protected]
> Subject: Re: Scanning JES3 JCL
>
> Thanks to all that have contributed to this thread. To
> summarize what I have heard so far, there seems to be two basic ideas:
> (1) Post Process the JES Messages to extract the expanded JCL
> after a TYPRUN=SCAN or EXEC PGM=JCLTEST.
> (2) Use EXEC PGM=JSTTEST to generate special messages in the
> JES LOG that will show the connection between step
> names/DDNAME and dsnames.
>
> The first idea is the most obvious and one I had already
> considered. Basically it becomes a problem of matching the
> IEFC653I SUBSTITUTION JCL messages against the XX and X/
> lines in the listing. This would be a PITA to do in COBOL, a
> big job in ASM. Off platform I could do it easily in VB.Net
> or C#, but I would prefer to keep it all on the z/OS platform.
Not joking, this would be simple in Perl. There is a Perl for z/OS UNIX. Even
awk could possibly do it. awk comes with z/OS UNIX. Although awk runs under
z/OS UNIX, from a quick test on z/OS 1.10, it can read z/OS sequential
datasets. I don't think it can directly write to z/OS sequential files, but cp
can. Very simple example:
awk '{print $1;}' "//'some.sequential.input.file'" | cp /dev/fd0
"//'some.sequential.output.file'"
Of course, if you don't know Perl or awk, this become problematic. I may give a
look at this. But I need to download some of the JESJCL portions of some jobs
that I've run. In the words of Arnold: "I'll be back!"
Note: I will strongly suggest that you download all of Co:Z from
http://dovetail.com . No, it is not absolutely necessary. But it makes some
things much easier. I'll show you some goodies you can do using "lsjes",
"fromdsn", and "todsn" to copy the JESJCL around very easily. These things are
z/OS UNIX based programs. They are FREE to download and use. You don't even
need to register before hand. Just download them and install. They require no
special priviliges other than a UNIX segment. So you can install them in a
subdirectory in your own $HOME in UNIX. I do make the assumption that you do
have an OMVS segment and can use UNIX on z/OS. If you can't, sorry to bother
you.
<snip>
>
> John
--
John McKown
Systems Engineer IV
IT
Administrative Services Group
HealthMarkets(r)
9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone *
[email protected] * www.HealthMarkets.com
Confidentiality Notice: This e-mail message may contain confidential or
proprietary information. If you are not the intended recipient, please contact
the sender by reply e-mail and destroy all copies of the original message.
HealthMarkets(r) is the brand name for products underwritten and issued by the
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The
MEGA Life and Health Insurance Company.SM
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
