Operations › Z/VM Environment › Z/VM EXEC

Z/VM EXEC

 /*  */
 TRACE OFF; SIGNAL ON ERROR
 CA_LOADLIB_FN       = 'yourlib'
 IDMS_LOADLIB_FN     = 'idmslib'
 SORTLIB_FN          = 'sortlib'
 LOG_ARCHIVE_FN      = 'your.log.archive'
 LOG_ARCHIVE_FT      = 'filetype'
 LOG_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
 /*                                                                   */
 /* Files needed for all runs.                                            */
  'FILEDEF SORTMSG  PRINTER'
  'FILEDEF SYSUDUMP PRINTER'
  'FILEDEF SYSOUT   PRINTER'
  'FILEDEF AUDIT    DISK LOGA AUDIT fm'
  'FILEDEF REPORTS  DISK LOGA REPORTS fm'
  'FILEDEF EXTRACT  DISK LOGA EXTRACT fm'
  'FILEDEF LOGFILE  DISK' ,
    LOG_ARCHIVE_FN  LOG_ARCHIVE_FT LOG_ARCHIVE_FM
 /*                                                                   */
 /* You must create a file 'USLEXEC 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 */
 /* Log Analyzer User Guide for further details.                          */
 /*                                                                   */
  'FILEDEF SYSIPT   DISK USLEXEC SYSIPT   A'
 /*                                                                   */
 /* Insert FILEDEF statements for SORT work space as required by      */
 /* your SORT product.                                                    */
 /*                                                                   */
  'FILEDEF SORTWK01 DISK sort_fn sort_ft sort_fm4 ( XTENT 100 '
 /*                                                                   */
 SIGNAL OFF ERROR
 SAY 'STARTING EXECUTION OF CA IDMS/LOG ANALYZER'
 USLEXEC_RC = RC
  'EXECOS OSRUN USLMAIN'
  USLEXEC_RC = RC
  'CP SPOOL PRINTER NOCONT'
  'CP CLOSE PRINTER NAME LOGA LISTING'
  'CP SPOOL PRINTER OFF'
  SAY 'USLEXEC FINISHED WITH A RETURN CODE OF' USLEXEC_RC
  'GLOBAL LOADLIB'
  'GLOBAL TXTLIB'
  'FILEDEF * CLEAR'
  EXIT USLEXEC_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 LOGA LISTING'
 'CP SPOOL PRINTER OFF'
 'GLOBAL LOADLIB'
 'GLOBAL TXTLIB'
 'FILEDEF * CLEAR'
  EXIT ERROR_RC
/*                                                                      */