On Fri, 11 Jan 2008 12:11:11 -0600, Gilbert Cardenas
<[EMAIL PROTECTED]> wrote:

>I have created a jcl to list all the GDG datasets that are in a deferred
status.
>Unfortunately, the jcl is lengthy and runs quite a while because I had to
>perform the following steps to filter out only the datasets I wanted :
>
>STEP1.  Perform an IDCAMS LISTCAT UCAT ALL to a dataset to identify all the
>user catalogs.
>
>STEP2.  Sort include only the catalog names and reformat the output to
>format the IDCAMS spread cards LISTC NVSAM HIST CAT [the catalog name].
>
>STEP3.  Perform the IDCAMS LISTC from the dataset created in STEP2.
>
>STEP4.  Perform another SORT against the output of STEP3 and include only
>the records that contain GDG BASE and reformat the output to format the
>IDCAMS spread cards LISTC NVSAM HIST GDG ENT [gdg base name].
>
>STEP5.  Perform the actual IDCAMS LISTC from the dataset created in STEP4.
>
>STEP6.  SORT include only the records that contain NONVSAM and STATUS
>which gives me all the GDG entries and their status.  I then perform a search
>on deferred to find if there are any GDGs in a deferred rollin status.
>
>This seems like a lot of rigmarole just to be able to find out what gdgs
are in a
>deferred status.
>
>Does anyone have a better/faster/reliable way to do this?
>

Yes.  Do it with the CSI (catalog search interface) in one step.  Look
at NVSMATTR:

+---------------------------------------------------------------------------+ 
¦ Table 21. Catalog Field Names                                             ¦ 
+---------------------------------------------------------------------------¦ 
¦ Type         ¦ Len ¦ Name       ¦ Description                             ¦ 
+--------------+-----+------------+-----------------------------------------¦ 
¦ Character    ¦ 1   ¦ NVSMATTR   ¦ Non-VSAM attribute information          ¦ 
+--------------+-----+------------+-----------------------------------------¦ 
¦ c'H'         ¦     ¦            ¦ Active GDS                              ¦ 
+--------------+-----+------------+-----------------------------------------¦ 
¦ c'N'         ¦     ¦            ¦ Deferred GDS                            ¦ 
+--------------+-----+------------+-----------------------------------------¦ 
¦ c'M'         ¦     ¦            ¦ Rolled-off GDS                          ¦ 
+--------------+-----+------------+-----------------------------------------¦ 
¦ c'L'         ¦     ¦            ¦ Extended partitioned data set (PDSE)    ¦ 
+--------------+-----+------------+-----------------------------------------¦ 
¦ c'P'         ¦     ¦            ¦ POSIX data set                          ¦ 
+--------------+-----+------------+-----------------------------------------¦ 
¦ x'00'        ¦     ¦            ¦ Simple non-VSAM data set                ¦ 
+--------------+-----+------------+-----------------------------------------+ 


The CSI documentation is in the "Managing Catalogs" manual.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to