ADSO XREF Utility User's Guide
Copyright © 1985-2017 Laderman Associates


DIME Cross Reference

    Overview
    Input Statement Types
    Input Syntax Conventions
    Dictionary Definition Statement
    Variable Name Statements
    Options Statements
    OS Execution JCL
    DOS Execution JCL

Overview

The DIME Cross Reference produces up to 4 separate reports detailing, for an entire IDD, the use of those entity types for which there are no physical set relationships in the dictionary. Each report line lists the entity name & version, owning dialog name & version, and referencing process or map name & version.

  • The Included Module Report lists all modules which are the object of an ADS INCLUDE.
  • The Called Dialog Report lists all dialogs and programs to which control is passed
       (via LINK, TRANSFER, INVOKE, or RETURN).
  • The Edit/Code Table Report lists all edit/code tables and edit modules referenced within maps.
  • The Dictionary Message Report lists all dictionary messages issued by process code or maps.

    Any of the reports may be suppressed by using OPTIONS statements, as detailed below.

    Input Statement Types

    Three types of input statements may be specified.

  • Dictionary Definition statement defines the IDD to be cross referenced.
  • Variable Name statements specify variable data names in process code which are used to hold dictionary message IDs or dialog names.
  • Options statements specify which reports should be suppressed.

    Input Syntax Conventions

    If DICTNAME is specified, it must be first in the input stream (as the BIND RUN UNIT is executed after reading the first record). Other than that, any combination of input statements, in any order, is permitted. All input is optional. All input begins in position 1 of the input record. Parameters are separated by commas; any specifications following the first blank are ignored. There are no continuations; use multiple input statements if necessary.

    Dictionary Definition Statement

    A Dictionary Definition statement is required only if you are executing against a secondary dictionary (i.e. one which requires DBNAME table translation).

    
DICTNAME=dictname [,NODE=nodename]

    dictname specifies the DBNAME of the IDD. It is used as part of the BIND RUN UNIT 
             in the extract program.

    nodename specifies the node for DDS sites.

    Variable Name Statements

    Variable Name statements define the names of data fields used in process code to hold a dictionary message ID (for a DISPLAY MSG CODE command), a message prefix, or a dialog name (for an inter-dialog control command). When the AXU is parsing process code, it will save any values moved to these fields and process them in the appropriate manner. A maximum of 3 of each type of statement may be specified.

    MSGFIELD=data-name

    any 6 position numeric (literal or constant) or 8 position quoted literal (including 
    prefix) which is MOVEd to data-name will be treated as a dictionary message ID. Note that 
    CA applications standardly issue messages in this manner.

MPRFIELD=data-name

    any literal which is MOVEd to data-name will be used as the prefix for all 6 
    position dictionary message IDs captured due to a MSGFIELD specification. This prefix 
    will be used until the end of the process in which it appears or until it is superceded. 
    If MPRFIELD is not specified, the dialog default message prefix will be used. 

IDCFIELD=data-name

    any literal which is MOVEd to data-name will be treated as an called dialog. The 
    Called Dialog Report will display MOVE as its verb.

    Options Statements

    Options statements may be used to suppress the generation of specified report(s). If no options are specified, all reports will be generated.

    Multiple Options statements may be specified in one input record. Simply separate each option with a comma.

    
OPTIONS= 	DIALOGS=BYP
  		MODULES=BYP
  		MESSAGES=BYP
  		TABLES=BYP

    DIALOGS  specifies to bypass generation of the Called Dialog Report.
    MODULES  specifies to bypass generation of the Included Module Report.
    MESSAGES specifies to bypass generation of the Dictionary Message Report.
    TABLES   specifies to bypass generation of the Edit/Code Table Report.

    OS Execution JCL

    
//jobname  	JOB  	site parameters
//step1  	EXEC  	PGM=LADAXU05
//STEPLIB  	DD  	DSN=loadlib,DISP=SHR
//  	DD  	DSN=idmsload,DISP=SHR
//ddldml  	DD  	DSN=ddldml,DISP=SHR
//sysjrnl 	DD 	DUMMY
//EXTRACT  	DD  	DSN=extract,DISP=(,PASS),UNIT=unit,
//  	SPACE=(CYl,(5,5),RLSE),DCB=(RECFM=FB,LRECL=200,BLKSIZE=blksz)
//SYSLST 	DD  	SYSOUT=sysout class
//CARDIN  	DD  	*
input statements here
/*
//step2  	EXEC  	standard site sort
include standard site SORT JCL
//SORTIN  	DD  	DSN=extract,DISP=(OLD,DELETE)
//SORTOUT  	DD  	DSN=sorted,DISP=(,PASS),UNIT=unit,
//  	SPACE=(CYL,(5,5),RLSE),DCB=(RECFM=FB,LRECL=200,BLKSIZE=blksz)
//SYSIN  	DD  	* 
SORT FIELDS=(126,3,A,4,114,A,132,5,A),FORMAT=BI
/* 
//step3  	EXEC  	PGM=LADAXU06
//STEPLIB  	DD  	DSN=loadlib,DISP=SHR
//EXTRACT  	DD  	DSN=sorted,DISP=(OLD,PASS)
//SYSLST  	DD  	SYSOUT=sysout class
/*
//

    DOS Execution JCL

    
* $$ JOB JNM=jobname,site parameters
// JOB  site parameters
* step 1 - LADAXU05, Place LIBDEFS here
// UPSI 0
// ASSGN SYS005,SYSLST
// ASSGN SYS006,SYSRDR
// ASSGN SYS030,DISK,VOL=volume,SHR
// DLBL EXTRACT,'extract',0
// EXTENT SYS030,volume,,,space   	allow 5 or 10 cylinders
JCL for the DDLDML area of the IDD
IGNORE for sysjrnl
// EXEC LADAXU05,SIZE=640K
/*
* step 2 - SORT 'extract'
Execute your standard site SORT using 'extract' as SORTIN and SORTOUT
 SORT FIELDS=(126,3,BI,A,4,114,BI,A,132,5,BI,A),WORK=1
 RECORD TYPE=F,LENGTH=(200)
 INPFIL BLKSIZE=3000
 OUTFIL BLKSIZE=3000
 END
/*
* step 3 - LADAXU06, Place LIBDEFS here
// ASSGN SYS005,SYSLST
// ASSGN SYS030,DISK,VOL=volume,SHR
// DLBL EXTRACT,'extract',0
// EXTENT SYS030,volume,,,space
// EXEC LADAXU06,SIZE=640K
/*
/&
* $$ EOJ