Joined: 02 Dec 2002 Posts: 700 Topics: 63 Location: USA
Posted: Tue Nov 04, 2003 7:00 am Post subject: How to find which Panvalet Library has a particular Pgm
This is a problem I face ocassionally, I am told to look into 'MEMDIBA' but I don't know if it is a JCL or Program or copybook or whatever. Only thing I know it is in atleast one of the 45 panvalet libraries which I can access only through Panvalet. Now how to find which are those?
Joined: 26 Nov 2002 Posts: 12378 Topics: 75 Location: San Jose
Posted: Tue Nov 04, 2003 8:56 am Post subject:
Dibakar,
You can use the batch pgm(PAN#1) for searching a member in a panavalet library.
The multiple library search facility provides logical concatenation of CA-Panvalet libraries for the purpose of member name searches.
The PANDD1 DD or DLBL statement specifies the primary CA-Panvalet library used by PAN#1. CA-Panvalet always searches the primary library first for members. Allocate ddnames or DLBL PANDD11 through PANDD19 in your JOB STEP, or when executing PAN#1 under TSO to specify other, secondary CA-Panvalet libraries to be searched (in that order) for member names.You can allocate these names using JCL or dynamically. These ddnames should not use the JCL SUBSYS= parameter.
Use the PANALLOC TSO command to allocate PANDD11 through PANDD19 for multiple library member search for ++INCLUDE processing with the CA-Panvalet subsystem.
After CA-Panvalet searches the primary CA-Panvalet library, it then searches the secondary libraries in ddname or DLBL order until the member is found or until it searches all allocated CA-Panvalet libraries.
You can specify up to nine secondary libraries using any ddnames or DLBL.If you allocate PANDD11 and PANDD13 but not PANDD12, both PANDD11 and PANDD13 are used to resolve each ++INCLUDE or ++WRITE request.
If you do not allocate secondary libraries, none are searched. All members specified on ++INCLUDE or ++WRITE statements must reside on the primary library to be resolved.
The multiple library search facility permits establishment of libraries of common Subroutines or data descriptions that several application groups can share.
The following JCL causes the statements of MEMDIBA from YOUR PANLIB1 to be written to the SYSPRINT. If MEMDIBA is not found in YOUR PANLIB, YOUR PANLIB1 (the library associated with the next ddname or DLBL PANDD12) is searched next.
PS: If you have Z/OS operating system then there is a feature called MEMBER. This works for regular pds's
Type in MEMBER MEMDIBA on 3.4 listing of your tid as high level qualifier and it searches all the PDS and displays the "Member: MEMDIBA" besides all the pds in which the member is found.
Joined: 02 Dec 2002 Posts: 700 Topics: 63 Location: USA
Posted: Wed Nov 05, 2003 4:23 am Post subject:
Thanks a lot Kolusu!
I tried "TSO PANALLOC" only to get following error -
Code:
PANV103E ERROR - REJECTED - SUBSYSTEM IS NOT ACTIVE
PANV103E *** UNABLE TO BUILD SVC 99 TEXT UNIT
So I tried Batch solution, slightly modified. It worked but gave more than I wanted. I am only looking which library has 'MEMDIB', but it also fetches me the data.
What would be the method to find libraries containg members starting with 'MEMDIB'?
Here is a REXX-JCL code to list the matched libraries (only). It will submit a job named ueridD
Code:
/* REXX program to submit job to search a member in all Panlibs.
Input: Member Name
Output: Library Names
*/
arg memname
if memname = '' then
do
say Give member Name
pull memname
end
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
