🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: bit.listserv.asm370
Article #212

Re: How to find PDS member name details

#212
From: Edward E. Jaffe
Date: Tue, 25 Oct 2005 00:09
33 lines
3097 bytes
Mike Baker wrote:

>I have a program which is executed inside many different Procedures, which
>in turn are stored in many different PDS datasets.
>
>Without making any JCL changes to the Procedures, is there some way of
>modifying the program code so that it can tell me:-
>1: The full-name of the PDS within which it (ie: the program) is executing?
>
>

You can get the load library name using the OUTPDATA= keyword of CSVQUERY.

>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.

--
.-----------------------------------------------------------------.
| 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 |
'-----------------------------------------------------------------'
Technical Details
Message-ID: <435D77A8.5010205@phoenixsoftware.com>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!logbridge.uoregon.edu!canoe.uoregon.edu!newsfeed.news.ucla.edu!newsfeed.berkeley.edu!ucberkeley!sn-xit-02!sn-xit-06!sn-xit-05!sn-xit-14!supernews.com!149.173.6.116.MISMATCH!foggy!vm.sas.com!phoenixsoftware.com!edjaffe
References: <200510242133.j9OKaWeA031464@malibu.cc.uga.edu>

Show Full Headers
Complete Article Headers
X-Google-Thread: fcdcb,21dc5dfdb7ef5f7f
X-Google-Attributes: gidfcdcb,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!logbridge.uoregon.edu!canoe.uoregon.edu!newsfeed.news.ucla.edu!newsfeed.berkeley.edu!ucberkeley!sn-xit-02!sn-xit-06!sn-xit-05!sn-xit-14!supernews.com!149.173.6.116.MISMATCH!foggy!vm.sas.com!phoenixsoftware.com!edjaffe
From: "Edward E. Jaffe" <edjaffe@phoenixsoftware.com>
Newsgroups: bit.listserv.asm370
Subject: Re: How to find PDS member name details
Date: Mon, 24 Oct 2005 17:09:12 -0700
Organization: SAS Inc.
Lines: 33
Sender: IBM Mainframe Assembler List <ASSEMBLER-LIST@LISTSERV.UGA.EDU>
Message-ID: <435D77A8.5010205@phoenixsoftware.com>
References: <200510242133.j9OKaWeA031464@malibu.cc.uga.edu>
NNTP-Posting-Host: mozart.unx.sas.com
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: foggy.unx.sas.com 1130199328 2371 10.19.150.41 (25 Oct 2005 00:15:28 GMT)
X-Complaints-To: usenet@unx.sas.com
NNTP-Posting-Date: Tue, 25 Oct 2005 00:15:28 +0000 (UTC)
Comments: Gated by NETNEWS@VM.SAS.COM
Return-Path: <owner-assembler-list@LISTSERV.UGA.EDU>
User-Agent: Mozilla Thunderbird 1.0.7 (Windows/20050923)
X-Accept-Language: en-us, en
Approved-By: "Edward E. Jaffe" <edjaffe@PHOENIXSOFTWARE.COM>
In-Reply-To: <200510242133.j9OKaWeA031464@malibu.cc.uga.edu>
Return-Path: owner-assembler-list@LISTSERV.UGA.EDU
X-OriginalArrivalTime: 25 Oct 2005 00:15:26.0252 (UTC)
                       FILETIME=[32E916C0:01C5D8F9]
Originator: daemon@mozart.unx.sas.com