Article View: bit.listserv.asm370
Article #211How to find PDS member name details
From: Mike Baker
Date: Mon, 24 Oct 2005 21:33
Date: Mon, 24 Oct 2005 21:33
17 lines
2006 bytes
2006 bytes
Hi, 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? 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. Thank you.
Technical Details
Message-ID:
<200510242133.j9OKaWeA031464@malibu.cc.uga.edu>Path:
arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!sn-xit-04!sn-xit-12!sn-xit-09!sn-xit-14!supernews.com!149.173.6.116.MISMATCH!foggy!vm.sas.com!HOTMAIL.COM!mikebaker345Show Full Headers
Complete Article Headers
X-Google-Thread: fcdcb,21dc5dfdb7ef5f7f,start
X-Google-Attributes: gidfcdcb,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!sn-xit-04!sn-xit-12!sn-xit-09!sn-xit-14!supernews.com!149.173.6.116.MISMATCH!foggy!vm.sas.com!HOTMAIL.COM!mikebaker345
From: Mike Baker <mikebaker345@HOTMAIL.COM>
Newsgroups: bit.listserv.asm370
Subject: How to find PDS member name details
Date: Mon, 24 Oct 2005 17:33:10 -0400
Organization: SAS Inc.
Lines: 17
Sender: IBM Mainframe Assembler List <ASSEMBLER-LIST@LISTSERV.UGA.EDU>
Message-ID: <200510242133.j9OKaWeA031464@malibu.cc.uga.edu>
NNTP-Posting-Host: mozart.unx.sas.com
Mime-Version: 1.0
Content-Type: text/plain
Content-Transfer-Encoding: 7bit
X-Trace: foggy.unx.sas.com 1130190089 31210 10.19.150.41 (24 Oct 2005 21:41:29 GMT)
X-Complaints-To: usenet@unx.sas.com
NNTP-Posting-Date: Mon, 24 Oct 2005 21:41:29 +0000 (UTC)
Comments: Gated by NETNEWS@VM.SAS.COM
Return-Path: <owner-assembler-list@LISTSERV.UGA.EDU>
Return-Path: owner-assembler-list@LISTSERV.UGA.EDU
X-OriginalArrivalTime: 24 Oct 2005 21:41:26.0715 (UTC)
FILETIME=[AFB7A0B0:01C5D8E3]
Originator: daemon@mozart.unx.sas.com