CBLVCAT Examples Menu

So far, LISTVCAT and LISTVTOC reports have been restricted to a single catalog or VTOC, but often the files you require are spread over more than one catalog or VTOC.

The example below is merging 2 VSAM catalogs, but it should be noted that the MERGE and SUBSET parameters can also be used on ICF catalogs and VTOCs.

Creating a report, on a subset of selected files, across multiple catalogs is easy.

 ___________________________________________________________________________________
|                                                                                  /
|   CBLVCAT REL 2.10 AT COMPUTE (Bridgend) Ltd - Wales             2003/09/26 10:02\
| o --------------------------------------------------             ----------------/
|                                                                                  \
|        REPORT VCAT  DSN 30 SORTD  NRECS 14 CATALOG                               /
| o                                                                                \
|        LISTVCAT DD=CBLV03 MERGE         * Combine 2 reports                      /
|              SUBSET                     * Select if : (opt parameter)            \
| o               IGN=/CICS               *           'CICS' not in DSN            /
|                 KEY=TEST                *           DSN starts 'TEST'            \
|                 NRECS=1                 *           File is not empty            /
| o               TYPE=EK                 *           ESDS or KSDS                 \
|                 NOVOL NOASSOC NOINDEX   *           Limit report                 /
|                                                                                  \
| o       LISTVCAT DD=CBLV04              * Same parameters as above               /
|             IGN=/CICS  KEY=TEST TYPE=EK NRECS=1  NOVOL NOASSOC NOINDEX           \
|                                                                                  /
| o                                                                                \
|                                                                                  /
|   DATASET NAME                      NRECS     CATALOG                            \
| o ------------                      -----     -------                            /
|                                                                                  \
|   TEST3.TRANS.HISTORY.QUARTER     2557934     VSAM.R1.TEST.VOL04                 /
| o TEST2W.WORK.HISTORY.WEEKLY        43555     VSAM.R1.TEST.VOL04                 \
|   TEST2W.WORK.HISTORY.WEEKLY.SOR    30067     VSAM.R1.TEST.VOL04                 /
|   TESTFLE                            1519     FBA.USER.CATALOG.A                 \
| o TESTENT                              80     FBA.USER.CATALOG.A                 /
|   TEST2.TRANS.HISTORY.WEEKLY            1     VSAM.R1.TEST.VOL04                 \
|                                                                                  /
| o                                                                                \
|                                                                                  /
|                                                                                  \
| o                                                                                /
|    ** ** ** CBLVCAT IS LICENSED BY COMPUTE (BRIDGEND) LTD 0656-652222, 0656-65646\
|                                ** EXPIRY DATE -- 12 JUN 2004 **                  /
|__________________________________________________________________________________\

Notes:

The MERGE parameter is used to combine multiple reports into one.

By supplying REPORT, MERGE and SUBSET the user is able to display exactly the information required.

The SUBSET parameter is optional because all its associated sub-parameters are unique, although you may prefer to include it to remind you of their function. To be selected, a file must satisfy all the subset parameters that are supplied. There is one exception to this. Multiple KEY and/or IGN parameters are supported. You can regard the KEY and IGN parameters as forming a combined name filter.

The above LISTVCAT example selects all non-empty (NRECS=1) ESDS and KSDS (TYPE=EK) files, which have filenames starting with "TEST", but not containing "CICS". The output from the two catalogs (CBLV03 and CBLV04) is merged into one convenient report, sorted in descending order by number of records (SORTD NRECS).