JAcky
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to list...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
I don't know of a way to do it "system wide", but you can get all GDG bases from a specific catalog via:
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
LISTC GDG CAT(catalog.name)
/*
//
You need one such LISTC for each catalog. If you leave off the CAT(catalog.name) the LISTC looks only in the master catalog.
--
John McKown
Systems Engineer IV
IT
Administrative Services Group
HealthMarkets(r)
9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
john....@healthmarkets.com * www.HealthMarkets.com
Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM
>> -----Original Message-----
>> From: IBM Mainframe Discussion List
>> [mailto:IBM-...@bama.ua.edu] On Behalf Of Jacky Bright
>> Sent: Tuesday, November 24, 2009 2:49 PM
>> To: IBM-...@bama.ua.edu
>> Subject: Extracting GDG Base
>>
>> Business Operation Department has requested to extract all
>> GDG base dataset
>> names from the system. Is there any utility by which I can have these
>> details from the catalog ?
>>
>> JAcky
>
>I don't know of a way to do it "system wide", but you can get all GDG bases
from a specific catalog via:
>
>//IDCAMS EXEC PGM=IDCAMS
>//SYSPRINT DD SYSOUT=*
>//SYSIN DD *
> LISTC GDG CAT(catalog.name)
>/*
>//
>
>You need one such LISTC for each catalog. If you leave off the
CAT(catalog.name) the LISTC looks only in the master catalog.
>
The CSI (Catalog Search Interface) can be used. See IGGCSIRX sample
in SYS1.SAMPLIB or CATSRCH on my web site.
Run it with a key of '**' if you want to look at all data sets in
all catalogs. You can modify the code to throw out anything that
isn't a GDG base record (type "B").
Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:mark....@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
On Tue, 24 Nov 2009 15:08:23 -0600, McKown, John
<John....@HEALTHMARKETS.COM> wrote:
>> -----Original Message-----
>> From: IBM Mainframe Discussion List
>> [mailto:IBM-...@bama.ua.edu] On Behalf Of Jacky Bright
>> Sent: Tuesday, November 24, 2009 2:49 PM
>> To: IBM-...@bama.ua.edu
>> Subject: Extracting GDG Base
>>
>> Business Operation Department has requested to extract all
>> GDG base dataset
>> names from the system. Is there any utility by which I can have
these
>> details from the catalog ?
>>
>> JAcky
>
>I don't know of a way to do it "system wide", but you can get all GDG
bases from a specific catalog via:
>
>//IDCAMS EXEC PGM=IDCAMS
>//SYSPRINT DD SYSOUT=*
>//SYSIN DD *
> LISTC GDG CAT(catalog.name)
>/*
>//
>
>You need one such LISTC for each catalog. If you leave off the CAT
(catalog.name) the LISTC looks only in the master catalog.
>
>--
>John McKown
>Systems Engineer IV
>IT
>
>Administrative Services Group
>
>HealthMarkets(r)
>
>9151 Boulevard 26 * N. Richland Hills * TX 76010
>(817) 255-3225 phone * (817)-961-6183 cell
>john....@healthmarkets.com * www.HealthMarkets.com
>
>Confidentiality Notice: This e-mail message may contain confidential
or proprietary information. If you are not the intended recipient, please
contact the sender by reply e-mail and destroy all copies of the original
message. HealthMarkets(r) is the brand name for products underwritten
and issued by the insurance subsidiaries of HealthMarkets, Inc. -The
Chesapeake Life Insurance Company(r), Mid-West National Life
Insurance Company of TennesseeSM and The MEGA Life and Health
Insurance Company.SM
>
>
>
Are you licensed for Innovation Data Processing's ABR or FDREPORT products? If so
there's a very simple FDREPORT job that will get the information you need using
the following control cards:
**********
*
* Job extracts GDG base information from the system catalogs.
* Currently it takes about 74 seconds to extract the data
* from 295,040 GDG base records residing in a catalog structure
* containing 1.663 million entries.
*
**********
SUMMARY FIELD=DSN /* summarize entries processed */
REPORT FIELD=(GDGBASE, /* gdg base name */
GDGENTRY, /* active entry count */
GDGLIMIT, /* active entry limit */
GDGFLAGS, /* processing flags */
GDGLADAT) /* last altered date */
PRINT DATATYPE=CATALOG, /* process system catalogs */
ENABLE=GDGBASEONLY /* select only GDG base names */
Stephen Mednick
Computer Supervisory Services
Sydney, Australia
Asia/Pacific representatives for
Innovation Data Processing, Inc.