Administration of the Central Component › Batch Jobs › Job APCXJINV - Add New CA MAT Requests

Job APCXJINV - Add New CA MAT Requests

Job APCXJINV performs all CA MAT CANCEL and INVOKE commands that are created by job APCXJLIB to delete all of yesterday's requests and add all new measurement requests.

Job APCXJINV has the following scheduling considerations:

• Execute daily before batch production and after job APCXJLIB has finished.
• Execute this job in every MVS image that your batch production runs in and that CA MAT is available in.

Job APCXJINV consists of step TUNCALL as illustrated following.

Program TUNCALL of job APCXJINV inserts the INVOKE and CANCEL requests into CA MAT.

//JOBCARD…
//*
//*
//*
//********************************************************************
//*                                                                  *
//* PMA: APCXJINV                                                    *
//* ACTION:      CALL  CA MAT FOR INVOKE MONITOR REQUESTS            *
//* FUNCTION:    DAILY MEASUREMENT OF BATCH JOBS                     *
//*                                                                  *
//*------------------------------------------------------------------*
//* Copyright (C) 2012 CA. All Rights Reserved.
//* Copyright (C) Trilog AG. 
//********************************************************************
//*
//********************************************************************
//* CANCEL OF WAITING MONITORS BEFORE DOING NEW ALERTS FOR
//********************************************************************
//*
//APCTOK1  EXEC PGM=IKJEFT01,DYNAMNBR=30,PARM='APCXRIDE'
//STEPLIB  DD DISP=SHR,DSN=CAMAT.CEESLOAD
//SYSPRINT DD SYSOUT=*
//TUNPRINT DD SYSOUT=*
//APCPARM  DD DISP=SHR,DSN=CAMAT.PMA.PARMS
//DELREQ   DD DISP=OLD,DSN=CAMAT.PMA.DELRQ
//SYSEXEC  DD DISP=SHR,DSN=CAMAT.PMA.EXEC
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DUMMY
//*
//*
//********************************************************************
//* INVOKE  CA MAT MONITOR REQUESTS, SAVE CA MAT OUTPUT FOR FURTHER
//* SCAN OF GIVEN TOKEN-NUMBERS
//********************************************************************
//CA MAT EXEC PGM=TUNCALL
//SYSPRINT DD SYSOUT=*
//TUNPRINT DD DSN=&&TUNLOG,
//            DISP=(,PASS),
//            UNIT=SYSDA,
//            DCB=(DSORG=PS,LRECL=133,RECFM=FB),
//            SPACE=(CYL,(1,2))
//STEPLIB  DD DISP=SHR,
//            DSN=LOAD
//TUNIN    DD DISP=SHR,
//            DSN=CAMAT.PMA.ADDRQ
//*
//*
//********************************************************************
//* SAVE TUNPRINT OUTPUT
//********************************************************************
//SAVETUNP EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  DSN=*. CA MAT.TUNPRINT,DISP=(OLD,PASS,KEEP)
//SYSUT2   DD  SYSOUT=*
//SYSIN    DD  DUMMY
//********************************************************************
//* SCAN INVOKE OUTPUT TO GET TOKEN FOR CANCEL OF WAITING MONITORS
//* BEFORE DOING NEW INVOKES FOR
//********************************************************************
//*
//APCTOK2  EXEC PGM=IKJEFT01,DYNAMNBR=30,PARM='APCXRTOK'
//SYSTSIN  DD DUMMY
//SYSPRINT DD SYSOUT=*
//TUNPRINT DD DSN=&&TUNLOG,DISP=(OLD,DELETE)
//DELREQ   DD DISP=OLD,DSN=CAMAT.PMA.DELRQ
//SYSEXEC  DD DISP=SHR,DSN=CAMAT.PMA.EXEC
//SYSTSPRT DD SYSOUT=*