|
|
|
Execution of the ADABAS Interface 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. |
|
SYSUDUMP |
This statement describes a SYSOUT data set for dump output in the case of an abnormal termination. |
|
CAIJRADA |
This statement describes the ADABAS log file to be processed by the interface. |
|
CAIJRJAR |
This statement describes the output file written by the interface. It is this file that is later input to the Report Writer. This file must have the following attributes: RECFM=VB |
|
CAISACT |
This optional DD statement indicates to the interface that EXTDATA records are to be written as well. The file must have these attibutes: RECFM=VB |
|
SORTLIB |
This statement describes the load library that contains the installation's SORT modules. |
|
SORTMSG |
This statement describes the SYSOUT data set for generated SORT messages. |
|
SORTWKnn |
These statements describe the temporary data sets used as sort work areas during the sort phase. |
|
CAIJRIN |
This statement describes the data set that contains the CPU-ID control statement. |
The input CPU-ID is entered via CAIJRIN with a CPU-ID statement in the following format:
|
Field Name |
Field Position |
Field Length |
Format |
Notes |
|---|---|---|---|---|
|
Statement Type |
1-6 |
6 |
a |
CPUID= |
|
CPU-ID |
7 |
1 |
a |
CPU-ID from CPU Table |
The following sample JCL can be used to execute the ADABAS Interface. It is included as member ADAINTR in CAJRJCL. Sample output from a run using a slightly modified version of this JCL can be found in in the Sample Reports section of this chapter.
Sample JCL for ADABAS Interface Execution: //ADAINTR JOB ...,CLASS=A,MSGCLASS=A //* //* //* THIS JOB EXECUTES THE CA JARS ADABAS 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 //* . SORTLIB DSN= PDS CONTAINING THE SORT MODULE //* . CAIJRADA DSN= ADABAS COMMAND LOG FILE (INPUT) //* . CAIJRJAR DSN= CA JARS LEVEL 7 HISTORY FILE (OUTPUT) //* . CAIJRIN CPUID= 1 CHARACTER ALPHANUMERIC CPU IDENTIFIER //* //* 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 ADAINTR IN THE CA JARS CAJRJCL LIBRARY //* //ADASTEP EXEC PGM=JSI,PARM='JSQA0000' //STEPLIB DD DSN=CAI.CAJRLOAD,DISP=SHR //SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR //SORTMSG DD SYSOUT=* //CAIJFPR DD SYSOUT=* //CAIJFSN DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SORTWK01 DD SPACE=(CYL,(50)),UNIT=SYSDA //SORTWK02 DD SPACE=(CYL,(50)),UNIT=SYSDA //SORTWK03 DD SPACE=(CYL,(50)),UNIT=SYSDA //SORTWK04 DD SPACE=(CYL,(50)),UNIT=SYSDA //SORTWK05 DD SPACE=(CYL,(50)),UNIT=SYSDA //SORTWK06 DD SPACE=(CYL,(50)),UNIT=SYSDA //CAIJRADA DD DSN=CAI.ADABAS.LOGDATA,DISP=SHR //CAIJRJAR 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.ADABAS.EXTDATA, // DISP=(NEW,CATLG,DELETE), // UNIT=uuuu, // SPACE=(CYL,(pp,ss),RLSE), // DCB=(RECFM=VB,LRECL=8188,BLKSIZE=bbbb), // VOL=SER=vvvvvv //CAIJRIN DD * CPUID=A /* //
The following sample JCL can be used to create an ADABAS Utilization Report using the Report Writer. It is included as member ADAUTLR in CAJRJCL.
Sample JCL For ADABAS Utilization Report (1 of 2): //ADAUTLR JOB ...,TSOARS,CLASS=A,MSGCLASS=A //* //* //* THIS JOB EXECUTES THE CA JARS REPORT PROGRAM TO PRODUCE //* AN ADABAS 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 ADAUTLR IN THE CA JARS CAJRJCL LIBRARY //* //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
Sample JCL For ADABAS Utilization Report (2 of 2): //CAIJSCIN DD * CONFIG OTHE01F SELECT 1 0 0HEADER A D A B A S U T I L I Z A T I O N 0SORT 01608A2109908A2110708A1 0DISPLAY 021561401651661061121131F4 0DESCRIPT3****1381 0DESCRIPT2****0881 0DESCRIPT1****0181 0EDIT 06 L12 L13 HF4 D 0TITLE 02 TERM CM FILE JOBNAME ID CD NBR 0TITLE 56 CMD COUNT 0TITLE 66 ESTIMATED CPU TIME 0TITLE 06MIN STRT DATE 0TITLE 12MIN STRT TIME 0TITLE 13 MAX END TIME 0TITLE F4 USER ACCOUNT CODE /* //
If you use the following control statements (CAIJSCIN) in place of those shown on the previous pages, the same report is produced. The QA in positions 10-11 of the DISPLAY statement (below) causes the Replacement Title Table (JSIRTTQA) for ADABAS to be used. Sample output from this run can be found in the Sample Reports section of this chapter.
CONFIG OTHE01F SELECT 1 0 0HEADER A D A B A S U T I L I Z A T I O N 0SORT 01608A2109908A2110708A1 0DISPLAY QA0021561401651661061121131F4 0DESCRIPT3****1381 0DESCRIPT2****0881 0DESCRIPT1****0181 0EDIT 06 L12 L13 HF4 D 0TITLE 02 TERM CM FILE JOBNAME ID CD NBR The following sample JCL can be used to produce an ADABAS Job Charge Detail Report using the Report Writer. It is included as member ADADETR in CAJRJCL.
Sample JCL For ADABAS Job Charge Detail Report: //ADADETR JOB ...,CLASS=A,MSGCLASS=A //* //* //* THIS JOB EXECUTES THE CA JARS REPORT PROGRAM TO PRODUCE //* A CA JARS ADABAS 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 ADADETR IN THE CA JARS CAJRJCL LIBRARY //* //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 * CONFIG OTHE01F SELECT 1 0 0HEADER A D A B A S J O B C H A R G E D E T A I L 0SORT 01608A2109908A2110708A1 0DISPLAY 002156166144133134139140145146142 0RATE 1000500 100 001001 001 0DESCRIPT3****1381 0DESCRIPT2****0881 0DESCRIPT1****0181 0TITLE 02 TERM CM FILE JOBNAME ID CD NBR 0TITLE 56 CMD COUNT 0TITLE 66 ESTIMATED CPU TIME 0TITLE 33ASSOCIATOR I/O COUNT 0TITLE 34 WORK I/O COUNT 0TITLE 39 DATA I/O COUNT /* //
If you use the following control statements (CAIJSCIN) in place of those shown on the previous pages, the same report is produced. The QA in positions 10-11 of the DISPLAY statement causes the Replacement Title Table (JSIRTTQA) for ADABAS to be used. Sample output from this run can be found in the Sample Reports section of this chapter.
CONFIG OTHE01F SELECT 1 0 0HEADER A D A B A S J O B C H A R G E D E T A I L 0SORT 01608A2109908A2110708A1 0DISPLAY QA002156166144133134139140145146142 0RATE 1000500 100 001001 001 0DESCRIPT3****1381 0DESCRIPT2****0881 0DESCRIPT1****0181 0TITLE 02 TERM CM FILE JOBNAME ID CD NBR
The following sample JCL can be used to produce an ADABAS Job Charge Summary Report using the Report Writer. It is included as member ADASUMR in CAJRJCL.
Sample JCL For ADABAS Job Charge Summary Report: //ADASUMR JOB ...,TSOARS,CLASS=A,MSGCLASS=A //* //* //* THIS JOB EXECUTES THE CA JARS REPORT PROGRAM TO PRODUCE //* A CA JARS ADABAS JOB CHARGE SUMMARY 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 ADASUMR IN THE CA JARS CAJRJCL LIBRARY //* //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 * CONFIG OTHE01F SELECT 1 0 0HEADER A D A B A S J O B C H A R G E S U M M A R Y 0SORT 01608A1109908A1 0DISPLAY 002056166144133134139140145146142 0RATE 1000500 100 001001 001 0DESCRIPT2****1281 0DESCRIPT1****0181 0TITLE 02 TERMINAL JOBNAME ID 0TITLE 56 CMD COUNT 0TITLE 66 ESTIMATED CPU TIME 0TITLE 33ASSOCIATOR I/O COUNT 0TITLE 34 WORK I/O COUNT 0TITLE 39 DATA I/O COUNT /* //
If you use the following control statements (CAIJSCIN) in place of those shown previously, the same report is produced. The QA in positions 10-11 of the DISPLAY statement causes the Replacement Title Table (JSIRTTQA) for ADABAS to be used. Sample output from this run can be found in the Sample Reports section of this chapter.
CONFIG OTHE01F SELECT 1 0 0HEADER A D A B A S J O B C H A R G E S U M M A R Y 0SORT 01608A1109908A1 0DISPLAY QA002056166144133134139140145146142 0RATE 1000500 100 001001 001 0DESCRIPT2****1281 0DESCRIPT1****0181 0TITLE 02 TERMINAL JOBNAME ID
| Copyright © 2012 CA. All rights reserved. |
|