🚀 go-pugleaf

I wrote a replacement for the Submit command.  One of the things it did was
place a message in the joblog showing the dataset and member name from which
the JCL had been submitted.  Very handy.

Raymond H. Earle

-----Original Message-----
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU]
On Behalf Of Edward E. Jaffe
Sent: Tuesday, October 25, 2005 12:44 AM
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: Re: How to find PDS member name details

Robert A. Rosenberg wrote:

> At 17:09 -0700 on 10/24/2005, Edward E. Jaffe wrote about Re: How to
> find PDS member name details:
>
>> Mike Baker wrote:
>>
>>  >2: The full-name of the JCL member which was used to execute the
>> Procedure?
>>
>>>
>>> eg: If inside dataset "MY.PDS.JCL" there is a member called
>>> "PROGRUN", and
>>> this executes a PDS member called "MY.PDS.PROCLIB(PROCRUN)", and
>>> inside the
>>> Procedure "PROCRUN" it executes a program called "PROG001", then I
>>> would
>>> like "PROG001" to either issue some Macro/s or chain through MVS
>>> Control
>>> Blocks in order to find the answers to questions 1 + 2 above.
>>>
>>>
>>
>> If I understand what you've written above, you won't be able to get
>> this.
>
>
> The information IS available - The question is if it is accessible
> while the step is running. If you look at the JCL Listing of a job
> that invokes a proc (that is loaded from a Proclib) you will note a
> message that lists the Member Name of the Proc as well as the DSN of
> the Proclib that it was fetched from. The question is how to access
> this JCL listing (and if it can be accessed). Given that SDSF can
> list this while the job is running, I'd say that, at least
> theoretically, you should be able to run Control Block chains and/or
> issue commands to gain access to this data (ie: Use the same type of
> interface code that SDSF does).


If you want to find the job name, step name, and proc step name of an
executing job step -- the information displayed by SDSF -- that's
trivial. Look in the CSCB. But that won't help you in any way find the
DSN and member name of the PDS from which a job was submitted!

--
.-----------------------------------------------------------------.
| Edward E. Jaffe                |                                |
| Mgr, Research & Development    | edjaffe@phoenixsoftware.com    |
| Phoenix Software International | Tel: (310) 338-0400 x318       |
| 5200 W Century Blvd, Suite 800 | Fax: (310) 338-0801            |
| Los Angeles, CA 90045          | http://www.phoenixsoftware.com |
'-----------------------------------------------------------------'