This site will undergo a maintenance outage on Saturday, 13 September beginning at 2:30 AM Central/1 PM IST for a platform upgrade. The downtime will be ~three hours.

Warehouse Dataset Contents Report Utility


This utility generates a printed report that lists details about the contents of the members in a ISPW Warehouse dataset.

Purpose

If a ISPW component or one of its generated parts is stored in a warehouse, the ISPW repository information identifies the warehouse name, dataset, and member. Before the addition of this utility, there was no report that could identify the contents of each member within a warehouse dataset in the reverse direction.

Functionality Overview

The Warehouse Dataset Contents Report Utility utilizes the WZZWH program to generate this report. The SAMPLIB member WZZWHJOB contains sample JCL that can be used as a starting point for creating JCL to run the utility.

To run this report, copy samplib member WZZWHJOB to a private JCL library and make the following updates:

  1. Add a valid JOB card.
  2. If your runtime configuration modules are not in a LINKLIST dataset, you must uncomment the STEPLIB DD card and replace #AUTHLINK with the DSNAME of the dataset containing the runtime configuration modules. No update is necessary if the substitution has already been made in the SAMPLIB member.
  3. Replace ?CONFIG? with the appropriate runtime configuration entry name for the ISPW system.
  4. Replace ?WHNAME? with the name of the ISPW Warehouse.
  5. Replace ?WHSTOR? with the storage name of the individual ISPW Warehouse dataset (e.g., L0000001).
  6. To enable the utility to verify that the warehouse members identified in the ISPW repository information exist in the warehouse dataset, uncomment the CHECKMBR DD card. This will also prompt the utility to report on any stray members (members that exist in the warehouse dataset but are not identified in the repository information as part of the warehouse dataset.)

Sample input without the JOB card

The following is the sample input without the JOB card:

//*
//L0000002 EXEC PGM=WZZRCJOB,PARM='ISPP/WZZWH'
//SYSPRINT DD SYSOUT=*
//WZZWHOUT DD SYSOUT=*
//CHECKMBR DD DUMMY
//WZZWHIN  DD *
$DEFINE_WS
 WHID=ISPWPROD
 WHSTORID=L0000001
/*
//

Sample Report

The following is the sample of ISPW Warehouse Dataset Contents report

ISPW Warehouse Dataset Contents Report

Warehouse=ISPWPROD Location=L0000001

Warehouse dsname=ISPW.PROD.WH.ISPWPROD.L0000001.WPDS

WH MEMBR COMPNENT TYPE APPL ASSIGNMENT CLVL VERSN PTYP PASCVAR  WHMEM
-------- -------- ---- ---- ---------- ---- ----- ---- -------- -----
A000000A TPROG01  COB  PLAY PLAY000002 PRD  00002 LIST GMT3NAME  Yes
A0000001 WZU@JOB  SKEL SITE SITE000001 PROD 00001                Yes
A0000002 TSUBR01  COB  PLAY PLAY000001 PRD  00001                Yes
A0000003 TPROG01  COB  PLAY PLAY000001 PRD  00001                Yes
A0000004 TSUBR01  COB  PLAY PLAY000002 PRD  00002                Yes
A0000005 TSUBR01  COB  PLAY PLAY000002 PRD  00002 OBJ  GMT1LNAM  Yes
A0000006 TSUBR01  COB  PLAY PLAY000002 PRD  00002 LIST GMT3NAME  Yes
A0000007 TPROG01  COB  PLAY PLAY000002 PRD  00002                Yes
A0000008 TPROG01  COB  PLAY PLAY000002 PRD  00002 LOAD LOADNAME  Yes
A0000009 TPROG01  COB  PLAY PLAY000002 PRD  00002 OBJ  GMT1LNAM  Yes

Number of members processed=10


ISPW Warehouse Dataset Contents - OK


 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*