Hi Folks,
You can look at the code in IKJEFF10 which is in File 863 of the
CBT collection www.cbttape.org and see how it gets its results.
Below is the File 001 (doc) entry for CBT File 863.
Use it in good health.......
Sincerely, Sam
FILE 863 is from Jim Callihan and contains an IKJEFF10 TSO
SUBMIT exit that originally came from PRC's CBT tape
File 369. It stopped working from z/OS 1.12 to 1.13
because of a change in control blocks, and Jim found
a different way to obtain the information, which,
by the way, also works on old systems back to OS/390
1.3 (the first Y2K compliant MVS release). So (I
think) you can use this version of the exit on older
systems too. (Works on z/OS 2.2 also.)
The exit inserts a comment line in the JCL source,
telling you where the JCL in the job came from.
For example:
//*ISPF EDIT OF SBGOLOB.B.ASM(IKJEFF1$)
or
//*JCL: SBGOLOB SUBMIT 'SBGOLOB.CBT484.FILE863(IKJEFF1$)'
email: [email protected]
email: [email protected] or
[email protected]
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
