To make it accurate, you'd almost have to query the call stack.
Mark D. Walter
Business to Business Data Integration Specialist
Certified IBM System I Specialist
Paragon Consulting Services, Inc.
mwalter@xxxxxxxxxxxxxxx
717-764-7909 Ext. (1)26
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Jernigan, John (Jay)
Sent: Monday, November 07, 2011 2:40 PM
To: Midrange Systems Technical Discussion
Subject: RE: Easy way for CL program to know what library it's in?
RTVOBJD OBJ(CLNAME)
OBJTYPE(*PGM)
RTNLIB(&LIRARY)
Jay Jernigan
Alamance Regional Medical Center
Sr Financial Systems Analyst
jjernigan@xxxxxxxx
336-538-8299
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of James Lampert
Sent: Monday, November 07, 2011 1:49 PM
To: Midrange Systems Technical Discussion
Subject: Easy way for CL program to know what library it's in?
Is there an easy way for a CL program to know what library it's located in?
It needs to access a similarly named IFS directory, according to the
library where it lives.
--
JHHL
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://archive.midrange.com/midrange-l.
______________________________________________________________________
Notice: The information contained in this message (Including attachments) is covered by the Electronic Communications Privacy Act, 18 U.S.C. 2510-2521, is confidential and may be legally protected from disclosure. If you are not the intended recipient, or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any retention, dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify the Sender immediately by replying to the message and deleting it from your computer. ______________________________________________________________________
midrange.com
