Upload Enforcement Report Output

Batch Utilities › CA IDMS Enforcer Batch Utilities › Upload Enforcement Structure (ESXULOD) › Upload Enforcement Report Output

Upload Enforcement Report Output

After executing ESXULOD, review the Audit Report. If ESXULOD does not execute successfully, error messages appear on the Audit Report. Correct any errors and resubmit the job.

 //ESXULOD  JOB (job card parameters),CLASS=A,MSGCLASS=A
 //ESXULOD  EXEC PGM=ESXBULD,REGION=1000K
 //STEPLIB  DD DISP=SHR,DSN=your.ca.loadlib
 //         DD DISP=SHR,DSN=your.idms.loadlib
 //SYSCTL   DD DISP=SHR,DSN=your.idms.sysctl
 //SYSIDMS  DD *
 DMCL=your.dmcl.name
 //AUDIT    DD SYSOUT=a
 //LODFILE  DD DISP=SHR,DSN=your.enforcer.structure
 //CDFILE   DD DISP=SHR,DSN=your.enforcer.cdfile
 //WORKFIL  DD DSN=your.enforcer.workfile,
 //         DISP=(NEW,DELETE,DELETE),
 //         UNIT=SYSDA,
 //         SPACE=(CYL,(2,1))
 //SYSIPT   DD *
  PROCESS,
    DICTIONARY=dictionary-name,
    NODE=node-name,
    REPLACE,
    WORDSET=wordset-name,
    TABLES
 /*
 //

Exhibit 4.4: Model z/OS and Z/OS JCL (ESXULOD)

Key to Variables

job card parameters — The job card parameters required at your company.
your.ca.loadlib — The name of the load library into which CA IDMS Enforcer load modules were link edited.
your.idms.loadlib — The name of the load library into which CA IDMS load modules were link edited.
your.idms.sysctl — The dataset name of the SYSCTL file for the Central Version (CV) used during CA IDMS Enforcer batch processing.
a — An appropriate SYSOUT class for your company.
your.enforcer.structure — The disk file that contains the CA IDMS Enforcer downloaded enforcement structure or system tables.
your.enforcer.cdfile — The disk file that contains 80 byte records of comma delimited word-sets for system table upload.
your.enforcer.workfile — The work file used by this utility.
dictionary-name — Is optional. If specified, must be a 1- to 8-character name of the dictionary specified for utility function.
node-name — Is optional. If specified, must be a 1- to 8-character name of the node specified for utility function.

wordset-name — Is optional. If specified, the upload represents the upload of a comma delimited file of element-designators to be read into the system table specified by the 1- to 32-character system-table name (wordset-name).

 * $$ JOB JNM=ESXULOD
 // JOB ESXULOD
 *
 // OPTION NODUMP
 // UPSI   a
 // ASSGN  SYS009,IGN
 *
 *  *** CORE IMAGE LIBRARY FOR PRODUCT
 // DLBL   ca,'your.corelib'
 // EXTENT ,volserc
 // LIBDEF PHASE,SEARCH=(ca.sublibrary,idms.sublibrary),TEMP
 *
 *  *** INPUT - SYNTAX
 // ASSGN  SYSIPT,SYSRDR
 *
 *  *** OUTPUT - AUDIT REPORT FILE
 // ASSGN  SYS011,SYSLST
 *
 *  *** INPUT  - STRUCTURE UPLOAD FILE
 // DLBL   LODFILE,'your.enforcer.structure',0,SD
 // EXTENT SYS014,volserw,,,strtrks,trks
 // ASSGN  SYS014,DISK,VOL=volserw,SHR
 *
 *  *** WORK   - TRANSIENT WORK FILE
 // DLBL   WORKFIL,'your.enforcer.workfile',0,SD
 // EXTENT SYS015,volserw,,,strtrks,trks
 // ASSGN  SYS015,DISK,VOL=volserw,SHR
 *
 *  *** UPLOAD Enforcer STRUCTURE
 // DLBL SYSIDMS,'#SYSIPT',0,SD
 // EXEC   ESXBULD,SIZE=(ESXBULD,400K)
  PROCESS,
   DICTIONARY=dictionary-name,
   NODE=node-name,
   replace
 /*
 *  Rnn.n OPTIONAL SYSIDMS PARAMETERS
 /*
 /*
 * $$ EOJ

Exhibit 4.5: Model Z/VSE JCL (ESXULOD.S)

Key to Variables

a — The UPSI switch to be replaced with specifications from the IDMSOPTI module.
ca or ca.sublibrary — The file name of the core image library into which the executable phases of CA IDMS Enforcer were installed.
your.corelib — The name of the core image library into which the executable phases of CA IDMS Enforcer were installed.
volser — The volume serial number or generic assignment of the disk volume on which the library, as specified in the previous statement, resides. The following letters identify the type of library or installation media: c=core image library, w=work file, r=relocatable library and s=source statement library.
idms or idms.sublibrary — The file name of the core image library into which the executable phases of CA IDMS were installed.
your.enforcer.structure — The name of the file from which the CA IDMS Enforcer structure will be uploaded.
strtrks — The starting track of the disk file specified in the previous statement.
trks — The number of tracks of the disk file specified in the previous statement.
your.enforcer.workfile — The work file used by this utility.
dictionary-name — The name of the alternate dictionary specified for upload.

node-name — The name of the node specified for upload.

 /*  */
 TRACE OFF; SIGNAL ON ERROR
 /*                                                                   */
 CA_LOADLIB_FN      = 'yourlib'
 IDMS_LOADLIB_FN    = 'idmslib'
 IDMS_TXTLIB_FN     = 'txtlib'
 /*                                                                   */
 /* Link and access the Minidisks containing the required librarie(s) */
 'GLOBAL TXTLIB  IDMS_TXTLIB_FN'
 'GLOBAL LOADLIB CA_LOADLIB_FN IDMS_LOADLIB_FN'
 'CP SPOOL PRINTER NOCONT CLOSE'
 'CP SPOOL PRINTER TO * NOHOLD CONT FORM OFF DIST OFF'
 /* Create the input parameter file.                                  */
  CALL CREATE_INPUT_PARM_FILE
 /*                                                                   */
 /* Product specific files.                                           */
 'FILEDEF  AUDIT    PRINTER'
 'FILEDEF  WORKFIL  DISK FILE WORKFIL a'
 'FILEDEF  LODFILE  DISK LODFILE SYSIPT A'
 'FILEDEF  SYSIPT   DISK ESXULOD SYSIPT A'
 /* 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'
 /*                                                                   */
 SIGNAL OFF ERROR
 SAY 'STARTING RUN OF CA IDMS Enforcer UPLOAD'
 'EXECOS OSRUN ESXBULD'
 ESXBULD_RC = RC
 'CP SPOOL PRINTER NOCONT'
 'CP CLOSE PRINTER NAME ESXULOD LISTING'
 'CP SPOOL PRINTER OFF'
 SAY 'Enforcer UPLOAD FINISHED WITH A RETURN CODE OF ' ESXBULD_RC
 'GLOBAL LOADLIB'
 'GLOBAL TXTLIB'
 'FILEDEF * CLEAR'
 EXIT ESXBULD_RC
 /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */
 CREATE_INPUT_PARM_FILE:
 /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */
 SIGNAL OFF ERROR
 'ERASE ESXULOD  SYSIPT A'
  PUSH 'FFILE'
  PUSH
  PUSH 'REPLACE'
  PUSH 'NODE=node-name,'
  PUSH 'DICTIONARY=dictionary-name,'
  PUSH 'PROCESS,'
  PUSH 'INPUT'
  PUSH 'SET LRECL 80'
  PUSH 'SET RECFM F'
  'XEDIT ESXDLOD SYSIPT A' ,
   '(NOPROFILE NOSCREEN NOMSG'
 RETURN
 /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */
 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 ESXULOD LISTING'
 'CP SPOOL PRINTER OFF'
 'GLOBAL LOADLIB'
 'FILEDEF * CLEAR'
 EXIT ERROR_RC

Exhibit 4.6: Model Z/VM EXEC—ESXULOD

Key to Variables

yourlib — The file name of the load library into which you downloaded CA IDMS Enforcer.
idmslib — The file name of the load library containing your CA IDMS SUBSCHEMA and DMCL modules.
txtlib — The name of the text library containing your CA IDMS text files.
LODFILE SYSIPT A — The name of the disk file into which the CA IDMS Enforcer structure will be downloaded. If necessary, rename the file to suit your site's naming standards.
CDFILE SYSIPT A — The name of the disk file that contains the 80-byte records of comma-delimited word-sets for system table upload. If necessary, rename the file to suit your site's naming standards. An example of comma-delimited words follows: EMPLOYEE, PAYROLL, ACCOUNTS, INVENTORY, etc. Words must begin in column 1 of the 80-byte record; may not be continued from one 80-byte record to the next; may be terminated within an 80-byte record with a comma or trailing spaces; and may not contain embedded dashes, underscores, or spaces.
FILE WORKFIL A — The name of the work file used by this utility. If necessary, rename the file to suit your site's naming standards.
dictionary-name — The name of the alternate dictionary specified for download.
node-name — The name of the node specified for download.
wordset-name — The mutually exclusive WORDSET option is specified when the input file is CDFILE, containing 80-byte records with comma-delimited word-sets. Words are stored as values in the system table represented by the wordset-name (system table name).