Date:         Tue, 19 Sep 1995 11:15:13 EDT
Reply-To:     The NOMAD2 Discussion List
Sender:       The NOMAD2 Discussion List
From:         "Walter H.Horowitz"
Subject:      MVS Partitioned DS

> Mary Lou Arundell 556-9050 <Mary.Arundell@UC.EDU> wrote:

>I want to define a file format in a PDS to NOMAD then cruise
>through all the members searching for ones that reference a
>particular schema.  Of course I don't want to run the procedure
>once for each member; I want to concatenate a bunch of libraries,
>and run the procedure and have it open and read each member.
>
>This may be more of an MVS issue than a NOMAD issue.  If anyone
>has done this successfully or knows it can't be done successfully
>I'll appreciate hearing about it.

The following response was given to me by Frank Griffin:

You can do this using the PDSDIR SCHEMA distributed with version
6.00 and later.  TYPE=PDSDIR is a GEDI-based database, somewhat
like TYPE=NSMENV, which maps a PDS directory as a "database" and
allows you to navigate it.  The MASTER is "keyed" on a DSNAME
field, and has a child segment which describes the members.
Your procedure would RKEY to each PDS DSNAME in turn, and then
search the member instances sequentially.  The most efficient
way to read the data for individual members is to do a FILE
DEFINE for the PDS using no member name at the time you do the
RKEY, and then do a FILE OPEN with a MEMBER override for each
member you want to read.  Note that you don't do any concatenations
in this approach --- all of the allocations are handled by the
PDSDIR support code.
Walter H. Horowitz - email whh@dart.thomsoft.com
Thomson Software Products - (203) 845-5025
back to index