Administration of the Central Component › Batch Jobs › Program APCDAREO

Program APCDAREO

Program APCDAREO deletes the information that has expired based on the user-defined lifetime. All deleted entries are reported in the SYSOUT DD statement APCREP. The program consists of the following parts:

• All stored data of the CICS and IMS/DC Features are compared with their corresponding lifetime, usually user defined as a general parameter called Delete data if older than. If the lifetime is expired, the online data records and corresponding transaction alert entries are deleted.

The JCL for job APCDJREO is provided next.

...JOBCARD
//*
//*
//*
//********************************************************************
//*                                                                  *
//*     PMA: APCDJREO                                                *
//*                                                                  *
//* MAINTENANCE: PMA TEAM                                            *
//*                                                                  *
//* ACTION:      PERIODIC MAINTENANCE OF PMA CICS/IMS CLUSTER        *
//*                                                                  *
//* FUNCTION:    DELETE ALL RECORDS ON THE PMA ONLINE CLUSTER WHICH  *
//*              HAVE EXCEEDED THE DEFINED LIFETIME.                 *
//*                                                                  *
//* FILES :      ALERT FILE                                          *
//*              IMS PROFILE FILE                                    *
//*              CICS PROFILE FILE                                   *
//*                                                                  *
//*------------------------------------------------------------------*
//* Copyright (C) 2012 CA. All Rights Reserved.
//* Copyright (C) Trilog AG. 
//********************************************************************
//********************************************************************
//*    MAINTENANCE OF PMA ONLINE DATA CLUSTER                        *
//*    DELETE ALL ENTRIES WITH EXPIRED LIFETIME                      *
//********************************************************************
//*
//APCDAREO EXEC PGM=APCDAREO
//STEPLIB  DD  DISP=SHR,
//             DSN=CAMAT.PMA.CEETLOAD
//APCPARAM DD  DISP=SHR,
//             DSN=CAMAT.PMA.PARMS
//APCBALT1 DD  DISP=SHR,
//             DSN=CAMAT.PMA.KSDSALT
//APCIPRO1 DD  DISP=SHR,
//             DSN=CAMAT.PMA.KSDSIMS
//APCCPRO1 DD  DISP=SHR,
//             DSN=CAMAT.PMA.KSDSCIC
//APCCCST1 DD  DISP=SHR,
//             DSN=CAMAT.PMA.KSDSCST
//APCREP   DD  SYSOUT=*
//APCEREP  DD  SYSOUT=*
//*