The following example shows the execution JCL for CA IDMS Journal Analyzer, where variables (lowercase, bold) are explained in the key opposite the JCL:
//JNLA EXEC PGM=USJMAIN,REGION=#K
//STEPLIB DD DSN=idms.dba.loadlib,DISP=SHR
// DD DSN=idms.custom.loadlib,DISP=SHR
// DD DSN=idms.cagjload,DISP=SHR
//SYSIDMS DD *
ECHO = ON
JOURNAL = OFF
LOCAL = on-or-off
TESTDBN = on-or-off
DMCL = dmclname
DBN = dbname
//dictdb dd dsn=your.idms.dictionary,disp=shr
//SYSOUT DD SYSOUT=a
//JASRTMSG DD sort-message
//SYSLST DD SYSOUT=a,
// DCB=BLKSIZE=1330
//SYSLSTR DD SYSOUT=r,
// DCB=BLKSIZE=1330
//SYSLSTD DD SYSOUT=d,
// DCB=BLKSIZE=1330
//SYSUDUMP DD SYSOUT=a
//SORTWK01 DD UNIT=SYSDA,
// SPACE=(CYL,(sort-space))
//SORTWK02 DD UNIT=SYSDA,
// SPACE=(CYL,(sort-space))
//SORTWK03 DD UNIT=SYSDA,
// SPACE=(CYL,(sort-space))
//SORTWK04 DD UNIT=SYSDA,
// SPACE=(CYL,(sort-space))
//SORTWK05 DD UNIT=SYSDA,
// SPACE=(CYL,(sort-space))
//SORTWK06 DD UNIT=SYSDA,
// SPACE=(CYL,(sort-space))
//ARCHIVE DD DSN=your.archive.journal,
// DISP=OLD,
// DCB=(blksize=archive-blksize,BUFNO=4),
// unit=tape,label=(,sl),vol=ser=serial-number
//EXTRACT DD dsn=your.extract.file,
// UNIT=disk,
// SPACE=(CYL,(extract-space),RLSE),
// DCB=(LRECL=311,BLKSIZE=6220,BUFNO=4),
// disp=extract-disp
//DISPLAY DD UNIT=disk,
// SPACE=(CYL,(display-space),RLSE),
// DCB=(BLKSIZE=display-blksize,BUFNO=4)
//RANKING DD UNIT=disk,
// SPACE=(CYL,(ranking-space,RLSE),
// DCB=(LRECL=60,BLKSIZE=6120,BUFNO=4)
//sortlib dd dsn=sys1.sortlib,disp=shr
//sortcntl dd *
your-sort-control-statements
//SYSIPT DD *
your-journal-analyzer-control-statements
The variables in the execution JCL are:
Defines the number of kilobytes of storage to be made available. The region size is between 1200K and 1800K, depending on CA IDMS Journal Analyzer's mode of accessing IDMS (Local Mode or CV), the BUFNOs specified for the various files, and the SIZE option of your sort.
Defines the dataset name of the library that contains the DMCL used by your dictionary subschema, IDMSNWKA. Omit if running through CV.
Defines the dataset name of the library that contains customized load modules.
Defines the dataset name of the library that contains CA IDMS Journal Analyzer modules and IDMSINTB.
Defines the DBNAME needed to access the appropriate DDLDML area of the CA IDMS dictionary for the DMCL name used.
Specify LOCAL=ON if you want Display processing to access the CA IDMS dictionary in LOCAL mode. Specify LOCAL=OFF for Central Version (CV) mode. Specify TESTDBN=ON if you want Display processing to access a secondary dictionary. Specify TESTDBN=OFF for the primary dictionary.
Defines the DMCLNAME to be used when Display processing accesses the CA IDMS dictionary.
Specify the correct DDNAME and dataset name of your CA IDMS dictionary's DDLDML area. Omit this statement if running through CV, or if the correct information is supplied in the DMCL.
An appropriate SYSOUT class for your installation.
To print sort messages, specify SYSOUT=a. To suppress printing of sort messages, specify DUMMY.
An appropriate SYSOUT class for Journal Reports. This should be different from a. If SYSLSTR is assigned to a file rather than to SYSOUT, specify DISP=MOD to ensure that Management Reports do not overlay other reports.
An appropriate SYSOUT CLASS FOR Journal Displays. This should be different from a.
A space specification appropriate to the number of records to be sorted. If PROCESS=EXTRACTS, provide space to sort the entire extract file. If PROCESS=DISPLAYS, provide space to sort the entire display file. If PROCESS=ALL, provide space to sort the larger of the display file or the extract file. If PROCESS=REPORTS, provide space to sort the extracted records for a single report interval.
Defines the dataset name of your archive journal file. This file should come from the FIX ARCHIVE utility, or from a batch job that ran in Local Mode. Do not use the output from IDMSJFIX. (You may specify NULLFILE if PROCESS=REPORTS.)
Defines the current block size of your archive journal file. (This parameter may be omitted if your file has standard labels.)
Defines the proper unit, label, and volume-serial information for your archive journal file. (These parameters may be omitted for a cataloged file.)
Defines the dataset name of the extract file. This parameter may be omitted, and a temporary file created, if PROCESS=DISPLAY, or if PROCESS=ALL and you do not intend to run PROCESS=REPORTS at a later time. If PROCESS=REPORTS, do not concatenate extract files. Multiple extract files must be sorted or merged on the first 46 bytes of the record before being input to CA IDMS Journal Analyzer.
Defines the device type of the extract, display, and ranking work files. (If this is a tape device, the following SPACE parameter should be omitted.)
If PROCESS=ALL or PROCESS=EXTRACTS, CA IDMS Journal Analyzer extracts archive records for each report type that is not suppressed. All reports use the BGIN, AREA, COMT, ABRT, and ENDJ records present for each run-unit. DBAREA and DBRECD reports also use the BFOR and AFTR records present for each run-unit. The amount of space depends on the number of run-units in the archive file, the number of areas readied, and the number of commits issued by those run-units (and if DBAREA and DBRECD reports are not suppressed, the number of database records processed by each run-unit).
Defines a disposition for the extract file. If PROCESS=EXTRACTS, specify DISP=(NEW,CATLG). If PROCESS=REPORTS, specify DISP=OLD. (This parameter should be omitted if the extract dataset name was omitted.)
If journal displays are specified, CA IDMS Journal Analyzer writes a record to the display file for each BFOR/AFTR record that meets selection criteria for DISPLAY=DBKEY or for DISPLAY=RECORD and for each BFOR/AFTR record for every run-unit that meets selection criteria for DISPLAY=PROGRAM. All ABRT records are also written for the displays specified. The amount of space depends on the number and size of these BFOR/AFTR/ABRT records.
Specifies the BLKSIZE for the DISPLAY file. Specify a value that contains at least one occurrence of your largest DISPLAY record plus a 4-byte block descriptor word. (A DISPLAY record contains a 4-byte record descriptor word, an 84-byte header, and a database record image.)
CA IDMS Journal Analyzer writes a record to the ranking file for every run-unit that meets the selection criteria of each REPORT=RANK specification. The amount of space depends on the number of rank reports specified and the number of run-units that satisfy the selection criteria.
This statement is optional. Its specification is dependent on your installation.
This statement is optional (see below). Consult the programmer's guide of your sort utility to determine the DDNAME of this file.
These statements are optional. Include them to override the options of your sort utility. (CA IDMS Journal Analyzer should be run with sort options that specify printing of critical messages, setting a return code of 16 if there is an unsuccessful sort, and sorting into EBCDIC sequence.) You may also want to specify a size different from the default. If you specify maximum size, further ensure that you have the sort use all but 256K (that is, SIZE=MAX-256) so that a BIND RUN-UNIT can be processed while sorting. Consult the programmer's guide of your sort utility to determine the format of these statements.
Specify a PROCESS statement and other statements for the reports and displays that you want generated. You can find more information in Chapter 5.
|
Copyright © 2014 CA.
All rights reserved.
|
|