A sample EXEC for executing CA IDMS Journal Analyzer is shown below. Variables (lowercase) are explained in the key below the EXEC.
Note: The PROCESS=DISPLAYS option should not be used in a z/VM/CMS environment. The Journal must be archived using the CA IDMS utility with a file mode of x4 to indicate z/OS file-type simulation, and a DCB of: (RECFM F LRECL 4096.
/* */ TRACE OFF; SIGNAL ON ERROR /* */ CA_LOADLIB_FN = 'yourlib' IDMS_LOADLIB_FN = 'idmslib' SORTLIB_FN = 'sortlib' JNLA_ARCHIVE_FN = 'your.journal.archive' JNLA_ARCHIVE_FT = 'filetype' JNLA_ARCHIVE_FM = '*' /* */ /* Link and access the Minidisks containing the required librarie(s) */ /* and database file(s). */ /* */ 'CP SPOOL PRINTER NOCONT CLOSE' 'CP SPOOL PRINTER TO * NOHOLD CONT FORM OFF DIST OFF' 'GLOBAL LOADLIB ' CA_LOADLIB_FN IDMS_LOADLIB_FN 'GLOBAL TXTLIB ' SORTLIB_FN /* */ /* Dictionary and Journal file definitions. */ /* When running in local mode remove the comments from around the */ /* next 4 statements. */ /* 'FILEDEF DICTDB DISK dictdb_fn dictdb_ft dictdb_fm ( dcb extent' 'FILEDEF SYSJRNL DUMMY' 'FILEDEF J1JRNL DUMMY' 'FILEDEF J2JRNL DUMMY' */ /* Files needed for all runs. */ /* */ 'FILEDEF JASRTMSG PRINTER' 'FILEDEF SYSLST PRINTER' 'FILEDEF SYSUDUMP PRINTER' 'FILEDEF SYSOUT PRINTER' 'FILEDEF SYSLSTD DISK JNLA SYSLSTD fm' 'FILEDEF SYSLSTR DISK JNLA SYSLSTR fm' 'FILEDEF AUDIT DISK JNLA AUDIT fm' 'FILEDEF EXTRACT DISK JNLA EXTRACT fm' 'FILEDEF DISPLAY DISK JNLA DISPLAY fm ( BLKSIZE dddd' 'FILEDEF RANKING DISK JNLA RANKING fm ( BLKSIZE rrrr' /* */
/* Archive Journal Disk File */ /* */ 'FIL ARCHIVE DISK JNLA_ARCHIVE_FN JNLA_ARCHIVE_FT JNLA_ARCHIVE_FM' /* */ /* You must create a file 'SYSIDMS INPUT A' containing the SYSIDMS */ /* parameters you use to specify your runtime environment. */ /* */ 'FILEDEF SYSIDMS DISK SYSIDMS INPUT A' /* */ /* You must create a file 'USJEXEC SYSIPT A' containing the input */ /* parameter statements prior to executing this EXEC. */ /* This file must include a PROCESS statement and other statements */ /* for the reports and displays that you want generated. See CA IDMS */ /* Journal Analyzer User Guide for further details. */ /* */ 'FILEDEF SYSIPT DISK USJEXEC SYSIPT A' 'FILEDEF SYSCTL DISK fn SYSCTL fm' /* */ /* Insert FILEDEF statements for SORT work space as required by */ /* your SORT product. */ /* */ SIGNAL OFF ERROR SAY 'STARTING EXECUTION OF CA IDMS Journal Analyzer' 'EXECOS OSRUN USJMAIN' USJEXEC_RC = RC 'CP SPOOL PRINTER NOCONT' 'CP CLOSE PRINTER NAME JNLA LISTING' 'CP SPOOL PRINTER OFF' SAY 'USJEXEC FINISHED WITH A RETURN CODE OF' USJEXEC_RC 'GLOBAL LOADLIB' 'GLOBAL TXTLIB' 'FILEDEF * CLEAR' EXIT USJEXEC_RC /* */ /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */ ERROR: /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */ ERROR_RC = RC TRACE OFF; SIGNAL OFF ERROR SAY 'NON-ZERO RETURN CODE ENCOUNTERED IN EXEC AT LINE' SIGL 'CP SPOOL PRINTER NOCONT' 'CP CLOSE PRINTER NAME JNLA LISTING' 'CP SPOOL PRINTER OFF' 'GLOBAL LOADLIB' 'GLOBAL TXTLIB' 'FILEDEF * CLEAR' EXIT ERROR_RC /* */
The file name of the load library into which you downloaded CA IDMS Journal Analyzer.
The file name of the load library containing your CA IDMS SUBSCHEMA and DMCL modules.
The file name of the text library containing your sort modules.
The file name of your journal archive file. This file should come from the ARCHIVE JOURNAL utility, or from a batch job that ran in local mode. Do not use the output from the FIX ARCHIVE utility. If you request any Journal Displays, you should pre-sort the archive file so that each record is sequenced on RUNUNIT-ID and ARC-SEQUENCE-NBR. USJSORT may be used for this purpose.
The file type of your journal archive file.
The file name of your CA IDMS dictionary file.
The file type of your CA IDMS dictionary file.
The file mode of your CA IDMS dictionary file.
The file mode of the relevant file.
The file name, file type, and file mode of the SYSCTL file for the Central Version (CV) used during batch processing.
The EXTRACT file. CA IDMS Journal Analyzer writes extracts of 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. The amount of space needed 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.
The DISPLAY file. If Journal Displays are requested, CA IDMS Journal Analyzer writes a record to the Display File for each BFOR/AFTR record that meets the selection criteria for DISPLAY=DBKEY or for DISPLAY=RECORD, and for each BFOR/AFTR record for every run-unit that meets the selection criteria for DISPLAY=PROGRAM. Each ABRT record will also be written for each DISPLAY requested. The amount of space needed depends on the number and size of these records.
The RANKING file. CA IDMS Journal Analyzer writes a record to the Ranking File for every run-unit that meets the selection criteria of each REPORT=RANK request. The amount of space needed depends on the number of requests for RANK reports and the number of run-units that satisfy the selection criteria.
The file name, file type, and file mode of the Journal Display file. This should be different from PRINTER.
The file name, file type, and file mode of the Journal Reports file. This should be different from PRINTER.
The information required for your CA IDMS dictionary file.
The BLKSIZE for the Ranking File. Must be a multiple of 60 (LRECL).
The BLKSIZE for the DISPLAY file. Specify a value that will contain 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.)
|
Copyright © 2014 CA.
All rights reserved.
|
|