Installing the IAM CICS Monitor

IAMXMON is a program that executes as a CICS transaction provided as part of the IAM product. This transaction displays activity and statistics for opened, Enhanced Format IAM data sets within the CICS region, similar to the IAMINFO reports that are produced when an IAM file is closed. For additional information on using IAMXMON See to IAMXMON: IAM Execution Monitor for CICS.

After completing the following tasks, restart CICS, or INSTALL the transaction, program and map entries using CEDA

IAMXMON consists of a single program and a single mapset:

Program: IAMXMON language (Assembler) EXECKEY(CICS) API(OPENAPI) CONCURRENCY(REQUIRED)

Mapset: IAMXMAP

These modules must be copied from the IAM LOADLIB into a LOADLIB that is part of the DFHRPL concatenation in order to work properly. IAMXMON is a CICS application, not part of the IAM access method code. It must be defined with EXECKEY(CICS). A transaction ID must be assigned to invoke the IAMXMON program, such as IAMX or IMON and be defined with TASKDATAKEY(CICS).

The details of installing IAMXMON are provided below:

JCL to Copy IAMXMON into DFHRPL Library

1. Copy the modules IAMXMON and IAMXMAP into a load library that is in the DFHRPL concatenation. IAMXMON is the Execution Monitor program and IAMXMAP is the mapset
   Example of JCL to copy IAMXMON to DFHRPL

       //COPYIAMX EXEC PGM=IEBCOPY,REGION=2M
      //SYSPRINT DD   SYSOUT=*
      //SYSUT3   DD   UNIT=SYSDA,SPACE=(CYL,(2))
      //SYSUT4   DD   UNIT=SYSDA,SPACE=(CYL,(2))
      //IAMLIB   DD   DISP=SHR,DSN=iam.loadlib  ß User Change
      //DFHRPL   DD   DISP=SHR,DSN=cics.rpl     ß User Change
      //SYSIN    DD   *
        COPYMOD  INDD=((IAMLIB,R)),OUTDD=DFHRPL
        SELECT   MEMBER=IAMXMON
        SELECT   MEMBER=IAMXMAP
      /*
   

   PPT Entry for Mapset: IAMXMAP

2. Define new CICS Program Properties Table (PPT) entries for the Execution Monitor mapset which must be called IAMXMAP:
   Example of Defining PPT for the mapset: IAMXMAP

      OBJECT CHARACTERISTICS
         CEDA  View Mapset( IAMXMAP  )
   
          Mapset            : IAMXMAP
         Group             : IAMAPP1
          Description       :
          REsident          : No                 No | Yes
         USAge             : Normal         Normal | Transient
          USElpacopy        : No                 No | Yes
          Status            : Enabled       Enabled | Disabled
          RSl               : 00               0-24 | Public

   PPT Entry for Program: IAMXMON

3. Define a new CICS Program Properties Table (PPT) entry for the Execution Monitor program which must be call IAMXMON:
   Define PPT Entry for program: IAMXMON

      OBJECT CHARACTERISTICS
         CEDA  View PROGram( IAMXMON  )
          PROGram           : IAMXMON
         Group             : IAMAPP1
          DEscription       :
         Language          : Assembler     CObol | Assembler | Le370 | C | Pli | Rpg
       RELoad            : No            No | Yes
       RESident          : No            No | Yes
      USAge             : Normal        Normal | Transient
       USElpacopy        : No            No | Yes
       Status            : Enabled       Enabled | Disabled
       RSl               : 00            0-24 | Public
       Cedf              : Yes           Yes | No
       DAtalocation      : Any           Below | Any
       EXECKey           : Cics          User | Cics       ß  Note 1
       COncurrency    : Required           Quasirent | Threadsafe | Required
      Api            : Openapi            Cicsapi | Openapi
      REMOTE ATTRIBUTES
      REMOTESystem   :
       REMOTEName     :
       USElpacopy        : No            No | Yes
       Transid           :
       EXECUtionset      : Fullapi       Fullapi | Dplsubset

   Note

   If CICS Storage Protection is active, the IAMXMON program must be defined with EXECKEY(CICS).

   PCT Entry for IAMXMON Transaction

4. Define a new CICS Program Control Table (PCT) entry defining the Transaction ID (TRANSID) you will use to invoke the IAM Execution Monitor. The selected TRANSID can be any unique 1 to 4 character identifier.
   Define PCT Entry for IAMXMON Transaction

   OBJECT CHARACTERISTICS
        CEDA  View TRANSaction( IAMX )
         TRANSaction          : IAMX
         Group                : IAMAPP1
         DEscription          :
         PROGram              : IAMXMON
         TWasize              : 00000                 0-32767
         PROFile              : DFHCICST
         PArtitionset         :
         STAtus               : Enabled               Enabled | Disabled
         PRIMedsize           : 00000                0-65520
      TASKDATALoc          : Any                 Below | Any
      TASKDATAKey          : Cics                User | Cics       ß  Note 2
         STOrageclear         : No                    No | Yes
         RUnaway              : 0020000               System | 0-2700000
         SHutdown             : Disabled              Disabled | Enabled
         ISolate              : Yes                   Yes | No
         REMOTE ATTRIBUTES
         DYnamic              : No                    No | Yes
         REMOTESystem         :
         REMOTEName           :
         TRProf               :
         Localq               :                       No | Yes
        SCHEDULING
         PRIOrity             : 001                   0-255
         TClass               : No                    No | 1-10
         TRANClass          : DFHTCL00
        ALIASES
         Alias                :
         TASKReq              :
         XTRanid              :
         TPName               :
         XTPname              :
       RECOVERY
        DTimout              : No                    No | 1-6800
         INdoubt              : Backout               Backout | Commit | Wait
         RESTart              : No                    No | Yes
         SPurge               : No                    No | Yes
         TPUrge               : No                    No | Yes
         DUmp                 : Yes                   Yes | No
         TRACe                : Yes                   Yes | No
        SECURITY
         RESSec               : No                    No | Yes
         Cmdsec               : No                    No | Yes
         Extsec               : No
         TRANSec              : 01                    1-64
         RSl                  : 00                    0-24 | Public

   
   

   Note

   If CICS Storage Protection is active, the transaction must be defined with TASKDATAKEY(CICS).