Testing access to CA 11 Datacom tables using DBTSTPR

Products

• Datacom
• Datacom/AD
• CA-11

Issue/Introduction

I just upgraded my Datacom/AD software to a new version. How can I confirm that the CA 11 data is able to be accessed now?

Environment

Component : Datacom/AD

Component : CA 11

Resolution

Datacom provides a DBUTLTY function called DBTEST that can issue commands to read the database tables for Workload Automation Restart Option for z/OS Schedulers (called CA 11).

The sample job below will read 5 records from each of the tables in the database, using the same logic paths that would be used by the CA 11 application programs. This function will test several processes:

1. An application program's connection path to the MUF
2. The dynamic allocation of the database index and data areas by the MUF
3. The ability of the MUF to open each database table
4. The reading of multiple records in each table by the MUF
5. If run from a different LPAR, XCF communication to the MUF.

//JOBCARD
//****************************************************************** 
//* DBUTLTY DBTEST sample to read 5 records from each table in the *
//* CA 11 database. This job can be used to test connectivity to   *
//* the MUF and to test that the MUF can process the tables.       *
//****************************************************************** 
//DBTEST1  EXEC PGM=DBUTLTY,REGION=6M 
//STEPLIB  DD DISP=SHR,DSN=datacom.CUSLIB 
//         DD DISP=SHR,DSN=datacom.CAAXLOAD 
//SYSOUT   DD SYSOUT=* 
//SYSPRINT DD SYSOUT=* 
//SNAPER   DD SYSOUT=* 
//SYSUDUMP DD SYSOUT=*
//SYSIN    DD * 
DBURSTR ABEND=YES,MSTNAM=DBMSTLST,MULTUSE=YES 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=DSN,UPDATE=NO 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=PRD,UPDATE=NO 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=RRN,UPDATE=NO
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=AUD,UPDATE=NO 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=HST,UPDATE=NO 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=JOB,UPDATE=NO 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=MIS,UPDATE=NO 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=REA,UPDATE=NO 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=STP,UPDATE=NO 
DBURTBL ACCESS=RAN,DBID=0601,TBLNAM=CSD,UPDATE=NO
DBUREND SYSTEM=OS,USRINFO=DBTEST.4.CA11 
DBTEST PGM=DBTSTPR DUMP=P 
*---+----1----+----2----+----3----+----4----+----5----+----6----+----7
*CMD TBLKEYNM   DBIKEY                              ELM1 
LOCKYDSNDSNKY 1 
REDLEDSNDSNKY 1                                     DSNEL 
REDNXDSNDSNKY 1                                     DSNEL 04 
*                                                   
LOCKYPRDPRDKN 1                                     
REDLEPRDPRDKN 1                                     PRDEL 
REDNXPRDPRDKN 1                                     PRDEL 04 
*                                                   
LOCKYRRNRRNKN 1                                     
REDLERRNRRNKN 1                                     RRNEL 
REDNXRRNRRNKN 1                                     RRNEL 04 
*                                                   
LOCKYAUDAUDKT 1                                     
REDLEAUDAUDKT 1                                     AUDEL 
REDNXAUDAUDKT 1                                     AUDEL 04 
*                                                   
LOCKYHSTHSTKY 1                                     
REDLEHSTHSTKY 1                                     HSTEL 
REDNXHSTHSTKY 1                                     HSTEL 04 
*                                                   
LOCKYJOBJOBKY 1                                     
REDLEJOBJOBKY 1                                     JOBEL 
REDNXJOBJOBKY 1                                     JOBEL 04 
*                                                   
LOCKYMISMISKY 1                                     
REDLEMISMISKY 1                                     MISEL 
REDNXMISMISKY 1                                     MISEL 04 
*                                                   
LOCKYREAREAKY 1                                     
REDLEREAREAKY 1                                     REAEL 
REDNXREAREAKY 1                                     REAEL 04 
*                                                   
LOCKYSTPSTPKY 1                                     
REDLESTPSTPKY 1                                     STPEL 
REDNXSTPSTPKY 1                                     STPEL 04 
*                                                   
LOCKYCSDCSDKY 1                                     
REDLECSDCSDKY 1                                     CSDEL 
REDNXCSDCSDKY 1                                     CSDEL 04 
/*

Additional Information

For more information about the DBTEST function, please refer to the Datacom documentation for DBUTLTY.

As always, please contact Broadcom support for Datacom if you have further questions.