Previous Topic: User Accounting Table Examples

Next Topic: Record Descriptions and Processing Rules


Operations

Execution of the CA JARS Interface to CA Datacom/DB requires a minimum region size of 200K. In addition, several interrelated files are also required. The following list describes these required data sets and their functions:

DDName

Description

STEPLIB

This statement describes the load library that was loaded from the distribution tape.

CAIJFPR

This statement describes the SYSOUT data set for generated display messages.

CAIJFSN

This statement describes a SYSOUT data set for generated snap dumps.

CAIJSACT

This statement describes the output EXTDATA data set. This file must have these attributes:

RECFM=VB
LRECL=8188
BLKSIZE=8192 or more

SYSUDUMP

This statement describes a SYSOUT data set for dump output in the case of an abnormal termination.

CAIDCS6

This statement describes the output file written by the interface. It is this file that is input to the Report Writer. This file must have the following attributes:

RECFM=VB
LRECL=612
BLKSIZE=6233

CAIJFIN

This statement describes the data set that contains the interface control statements.

The following sample JCL can be used to execute the Interface to CA Datacom/DB. It is included as member DCINTR in CAJRJCL. Sample output from a run using a slightly modified version of this JCL can be found in the Reporting Considerations section of this chapter.

Sample JCL For CA Datacom/DB Interface Execution:
//DCINTR  JOB ...,CLASS=A,MSGCLASS=A
//*
//*
//*        THIS JOB EXECUTES THE CA JARS CA Datacom/DB INTERFACE TO
//*        PRODUCE A JARS LEVEL 7 HISTORY FILE.
//*
//*        THE FOLLOWING STATEMENTS ARE INSTALLATION-DEPENDENT
//*        AND MUST BE MODIFIED ACCORDINGLY:
//*          . JOB      ACCOUNTING & CLASS INFORMATION
//*          . STEPLIB  DSN= CA JARS LOAD LIBRARY
//*          . CAIDCS6  DSN= CA JARS LEVEL 7 HISTORY FILE (OUTPUT)
//*          . CAIJFIN  INTERFACE CONTROL STATEMENTS
//*
//*        VOLUME AND UNIT DESIGNATORS WHICH POINT TO THE ACTUAL
//*        VOLUMES ON WHICH YOUR DATA SETS RESIDE AND SPACE
//*        PARAMETERS WHICH CORRESPOND TO THE SIZE OF YOUR DATA
//*        MUST ALSO BE MODIFIED.
//*
//*  REFER TO MEMBER DCINTR IN THE CAJRJCL
//*
//DCSTEP  EXEC PGM=JSI,PARM='XXX00480,JSDC0000'
//STEPLIB  DD  DSN=CAI.CAJRLOAD,DISP=SHR
//CAIJFPR  DD  SYSOUT=*
//CAIJFSN  DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//CAIDCS6  DD  DSN=CAI.JARS.HISTORY.DATA,DISP=(,CATLG),
//  DCB=(RECFM=VB,LRECL=612,BLKSIZE=6233),
//  UNIT=uuuu,VOL=SER=vvvvvv,
//  SPACE=(TRK,(pp,ss),RLSE)
//CAIJSACT  DD DSN=CAI.DATACOM.EXTDATA, -- Change to your needs
//          DISP=(NEW,CATLG,DELETE),
//          UNIT=uuuu,
//          SPACE=(CYL,(pp,ss),RLSE),
//          DCB=(RECFM=VB,LRECL=8188,BLKSIZE=bbbb),
//          VOL=SER=vvvvvv
//CAIJFIN  DD  *
Datacom DATABASE 005 TBLNAM A04 SNAP 25 CPUID D ACCT JSDCACCT
/*
//

The following sample JCL can be used to create an CA Datacom/DB Utilization Report using the Report Writer. It is included as member DCUTLR in CAJRJCL.

Sample JCL For CA Datacom/DB Utilization Report:
//DCUTLR  JOB ...,TSOARS,CLASS=A,MSGCLASS=A
//*
//*
//*        THIS JOB EXECUTES THE CA JARS REPORT PROGRAM TO PRODUCE
//*        A CA Datacom/DB UTILIZATION REPORT.
//*
//*        THE FOLLOWING STATEMENTS ARE INSTALLATION-DEPENDENT
//*        AND MUST BE MODIFIED ACCORDINGLY:
//*          . JOB      ACCOUNTING & CLASS INFORMATION
//*          . STEPLIB  DSN= CA JARS LOAD LIBRARY
//*          . CAIJSHST DSN= CA JARS LEVEL 7 HISTORY FILE
//*
//*        SPACE PARAMETERS, APPROPRIATE TO THE SIZE OF YOUR
//*        DATA, SHOULD BE USED IN THE 'SORTWK' AND 'CAIJS'
//*        STATEMENTS.
//*
//*  REFER TO MEMBER DCINTR IN THE CAJRJCL
//*
//JARSSTEP EXEC PGM=JSIMAIN
//STEPLIB  DD  DSN=CAI.CAJRLOAD,DISP=SHR
//SORTMSG  DD  SYSOUT=*
//CAIJSPRT DD  SYSOUT=*
//CAIJSNAP DD  SYSOUT=*
//SYSOUT   DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SORTWK01 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//SORTWK02 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//SORTWK03 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//CAIJSCT1 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//CAIJSCT2 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//CAIJSACT DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//CAIJSHST DD  DSN=CAI.JARS.HISTORY.DATA,DISP=SHR
//CAIJSCIN DD  *
 SELECT       1                                   0
0HEADER     D A T A C O M   U T I L I Z A T I O N
0SORT    01608A2112605A2107716A21                1
0DISPLAY   002108114156140165166106112113
0DESCRIPT2****0851
0DESCRIPT1****0181
0EDIT    06 L12 L13 HF4 D
/*
//

If you use the following control statements (CAIJSCIN) in place of those shown on the previous page, the same report is produced. The DC in positions 10-11 of the DISPLAY statement (below) causes CA JARS to use the Replacement Title Table (JSIRTTDC) for CA Datacom/DB. Sample output from this run can be found the Reporting Considerations section of this chapter.

 SELECT       1                                   0
0HEADER     D A T A C O M   U T I L I Z A T I O N
0SORT    01608A2112605A2107716A21                1
0DISPLAY DC002108114156140165166106112113
0DESCRIPT2****0851
0DESCRIPT1****0181
0EDIT    06 L12 L13 HF4 D

The following sample JCL can be used to produce an CA Datacom/DB Job Charge Detail Report using the Report Writer. It is included as member DCDETR in CAJRJCL.

Sample JCL For CA Datacom/DB Job Charge Detail Report (1 of 2):
//DCDETR  JOB ...,CLASS=A,MSGCLASS=A
//*
//*
//*        THIS JOB EXECUTES THE CA JARS REPORT PROGRAM TO PRODUCE
//*        A CA JARS CA Datacom/DB JOB CHARGE DETAIL REPORT.
//*
//*        THE FOLLOWING STATEMENTS ARE INSTALLATION-DEPENDENT
//*        AND MUST BE MODIFIED ACCORDINGLY:
//*          . JOB      ACCOUNTING & CLASS INFORMATION
//*          . STEPLIB  DSN= CA JARS LOAD LIBRARY
//*          . CAIJSHST DSN= CA JARS LEVEL 7 HISTORY FILE
//*
//*        SPACE PARAMETERS, APPROPRIATE TO THE SIZE OF YOUR
//*        DATA, SHOULD BE USED IN THE 'SORTWK' AND 'CAIJS'
//*        STATEMENTS.
//*
//*  REFER TO MEMBER DCINTR IN THE CAJRJCL
//*
//JARSSTEP EXEC PGM=JSIMAIN
//STEPLIB  DD  DSN=CAI.CAJRLOAD,DISP=SHR
//SORTMSG  DD  SYSOUT=*
//CAIJSPRT DD  SYSOUT=*
//CAIJSNAP DD  SYSOUT=*
//SYSOUT   DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SORTWK01 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//SORTWK02 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//SORTWK03 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//CAIJSCT1 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//CAIJSCT2 DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//CAIJSACT DD  SPACE=(CYL,(1,1)),UNIT=SYSDA
//CAIJSHST DD  DSN=CAI.JARS.HISTORY.DATA,DISP=SHR
//CAIJSCIN DD  *
 SELECT       1                                   0
0HEADER     D A T A C O M   J O B    C H A R G E    D E T A I L
0SORT    01608A2112605A2107716A21                1
0DISPLAY   002108156166144140145146142114
0RATE     1000          100      001001001001001001
0DESCRIPT2****0851
0DESCRIPT1****0181
/*
//

If you use the following control statements (CAIJSCIN) in place of those shown on the previous page, the same report is produced. The DC in positions 10-11 of the DISPLAY statement causes CA JARS to use the Replacement Title Table (JSIRTTDC) for CA Datacom/DB. Sample output from this run can be found in the Reporting Considerations section of this chapter.

 SELECT       1                                   0
0HEADER     D A T A C O M   J O B    C H A R G E    D E T A I L
0SORT    01608A2112605A2107716A21                1
0DISPLAY DC002156166144133134139140145146142
0RATE     1000          100      001001001001001001
0DESCRIPT2****0851
0DESCRIPT1****0181