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 more information about using IAMXMON, see 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).

Use the following procedure to install IAMXMON:

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

   Important

   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

   
   

   Important

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