PGEDS - Private Program Definition Resource Statistics

    CONTROL BLOCK NAME = DFHPGEDS
    NAME OF MATCHING PLS CONTROL BLOCK = DFHPGEPS
    DESCRIPTIVE NAME = CICS TS Private Programdef (PG Domain) Stats
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 2007, 2013 
    FUNCTION =
            This data area contains the Private Programdef
            statistics provided by the PG Domain.
            It is provided for use in users monitoring applications
            to map the statistics returned via the API or the
            statistics global user exit.
            There is a single instance of this data block.
    LIFETIME =
           This data block is created by the PG Domain to store
           statistics to be passed to the user in response to a
           request for PROGRAMDEF statistics. The storage is released
           when the user task is detached.
           The DSECT also maps the contents of part of the SMF buffer
           created by the statistics domain and is used in the
           statistics exit.
    STORAGE CLASS =
    LOCATION =
           The user is passed a pointer to the head of the storage
           block.
    INNER CONTROL BLOCKS = None
    NOTES :
       DEPENDENCIES = S/370
       RESTRICTIONS = None
       MODULE TYPE = Control block definition
   ---------------------------------------------------------------------
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 DFHPGEDS Programdef Resid stats record
(0) HALFWORD 2 PGEDS_LEN Programdef stats record length
(2) ADDRESS 2 PGEDS_ID Programdef stats id
(4) CHARACTER 1 PGEDS_VERS Programdef stats version
(5) CHARACTER 3   Reserved
(8) CHARACTER 64 PGE_PROGRAM_ PLATFORM_NAME Platform name
(48) CHARACTER 64 PGE_PROGRAM_ APPLICATION_NAME Application name
(88) FULLWORD 4 PGE_PROGRAM_APPL_ MAJOR_VER Application major version
(8C) FULLWORD 4 PGE_PROGRAM_APPL_ MINOR_VER Application minor version
(90) FULLWORD 4 PGE_PROGRAM_APPL_ MICRO_VER Application micro version
(94) CHARACTER 8 PGE_PROGRAM_NAME Program Name
(9C) BITSTRING 1 PGE_PROGRAM_TYPE Program Type
(9D) BITSTRING 1 PGE_PROGRAM_EXEC_KEY Program CICS/USER key
(9E) BITSTRING 1 PGE_PROGRAM_DATA_LOC Program Data Location
(9F) BITSTRING 1 PGE_PROGRAM_ EXECUTION_SET Program Execution Set
(A0) CHARACTER 4   Reserved
(A4) BITSTRING 1 PGE_PROGRAM_LANG_ DEDUCED Program Language Deduced
(A5) BITSTRING 1 PGE_PROGRAM_LANGUAGE Program Language
(A6) BITSTRING 1 PGE_PROGRAM_RUNTIME_ ENV Program Runtime Environment
(A7) CHARACTER 5   Reserved
(AC) BITSTRING 1 PGE_PROGRAM_ CONCURRENCY Program Concurrency
(AD) BITSTRING 1 PGE_PROGRAM_API Program API
(AE) CHARACTER 3   Reserved
(B1) BITSTRING 1 PGE_PROGRAM_REMOTE Program Remote
(B2) BITSTRING 1 PGE_PROGRAM_DYNAMIC Program Dynamic
(B3) BITSTRING 1 PGE_PROGRAM_JVM Program JVM
(B4) BITSTRING 1 PGE_PROGRAM_ ENTRYPOINT Application Entry Point
(B5) CHARACTER 3   Reserved
(B8) CHARACTER 8 PGE_PROGRAM_REMOTE_ NAME Remote Program name
(C0) CHARACTER 4 PGE_PROGRAM_TRAN_ID Remote Transaction ID
(C4) CHARACTER 4 PGE_PROGRAM_REMOTE_ SYSID Remote System name
(C8) CHARACTER 4   Reserved
(CC) CHARACTER 8   Reserved
(D4) CHARACTER 8 PGE_PROGRAM_JVMSERVER Program JVM server Name
(DC) CHARACTER 8   Reserved
(E4) CHARACTER 8 PGE_PROGRAM_DEFINE_ SOURCE Group installed from
(EC) BITSTRING 8 PGE_PROGRAM_CHANGE_ TIME Change/create time
(F4) CHARACTER 8 PGE_PROGRAM_CHANGE_ USERID Change userid
(FC) BITSTRING 2 PGE_PROGRAM_CHANGE_ AGENT Change agent
(FE) BITSTRING 2 PGE_PROGRAM_INSTALL_ AGENT Install agent
(100) BITSTRING 8 PGE_PROGRAM_INSTALL_ TIME Install/Create time
(108) CHARACTER 8 PGE_PROGRAM_INSTALL_ USERID Install userid
(110) CHARACTER 64 PGE_PROGRAM_ OPERATION_NAME Operation name
(150) BITSTRING 4   Reserved
(150) 0 PGEDS_END "*"
(150) 0 PGEDS_LENGTH "*-PGEDS_LEN" Programdef record length 
  Constants that denote a Private PG Programdef stats record
(150) 1..1 ..11   PGE_IDR "147" Private Programdef resid stats id
(150) .... ...1   PGE_VERS "X'01'" Record version number 
  Equates for testing PGE_PROGRAM_TYPE
(150) .... ...1   PGE_TYPE_PROGRAM "1" Program
(150) .... ..1.   PGE_TYPE_MAPSET "2" Mapset
(150) .... ..11   PGE_TYPE_PARTITIONSET "3" Partitionset 
  Equates for testing PGE_PROGRAM_EXEC_KEY
(150) .... ....   PGE_EXEC_KEY_ NOTAPPLIC "0" Exec key Notapplic
(150) .... ...1   PGE_EXEC_KEY_CICS "1" CICS exec key
(150) .... ..1.   PGE_EXEC_KEY_USER "2" USER exec key 
  Equates for testing PGE_PROGRAM_DATA_LOC
(150) .... ....   PGE_DATA_LOC_ NOTAPPLIC "0" Dataloc Notapplic
(150) .... ...1   PGE_DATA_LOC_BELOW "1" Dataloc Below
(150) .... ..1.   PGE_DATA_LOC_ANY "2" Dataloc Any 
  Equates for testing PGE_PROGRAM_EXECUTION_SET
(150) .... ....   PGE_EXEC_SET_ NOTAPPLIC "0" Execution set Notapplic
(150) .... ...1   PGE_EXEC_SET_ DPLSUBSET "1" Execution set DPL subset
(150) .... ..1.   PGE_EXEC_SET_FULLAPI "2" Execution set Full API 
  Equates for testing PGE_PROGRAM_LANG_DEDUCED
(150) .... ....   PGE_LANG_NOTAPPLIC "0" Language deduced Notapplic
(150) .... ...1   PGE_LANG_NOT_DEDUCED "1" Language not deduced
(150) .... ..1.   PGE_LANG_NOT_DEFINED "2" Language not defined
(150) .... ..11   PGE_LANG_ASSEMBLER "3" Language Assembler
(150) .... .1..   PGE_LANG_C "4" Language C
(150) .... .1.1   PGE_LANG_COBOL "5" Language COBOL
(150) .... .11.   PGE_LANG_LE "6" Language LE
(150) .... .111   PGE_LANG_PLI "7" Language PL1
(150) .... 1...   PGE_LANG_JAVA "8" Language JAVA 
  Equates for testing PGE_PROGRAM_LANGUAGE
(150) .... ....   PGE_LANGUAGE_ NOTAPPLIC "0" Language Notapplic
(150) .... ...1   PGE_LANGUAGE_NOT_ DEFINED "1" Language not defined
(150) .... ..1.   PGE_LANGUAGE_ ASSEMBLER "2" Language Assembler
(150) .... ..11   PGE_LANGUAGE_C "3" Language C
(150) .... .1..   PGE_LANGUAGE_COBOL "4" Language COBOL
(150) .... .1.1   PGE_LANGUAGE_LE "5" Language LE
(150) .... .11.   PGE_LANGUAGE_PLI "6" Language PL1 
  Equates for testing PGE_PROGRAM_RUNTIME_ENV
(150) .... ....   PGE_RUNTIME_NOTAPPLIC "0" Runtime Notapplic
(150) .... ...1   PGE_RUNTIME_ENV_JVM "1" Runtime JVM
(150) .... ..1.   PGE_RUNTIME_ENV_LE "2" Runtime LE
(150) .... ..11   PGE_RUNTIME_ENV_NONLE "3" Runtime Non LE
(150) .... .1..   PGE_RUNTIME_ENV_ XPLINK "4" Runtime XPLink 
  Equates for testing PGE_PROGRAM_CONCURRENCY
(150) .... ....   PGE_CONC_NOTAPPLIC "0" Concurrency Notapplic
(150) .... ...1   PGE_CONC_ QUASIREENTRANT "1" Concurrency Quasi-Reentrnt
(150) .... ..1.   PGE_CONC_THREADSAFE "2" Concurrency Threadsafe
(150) .... ..11   PGE_CONC_REQUIRED "3" Concurrency Required 
  Equates for testing PGE_PROGRAM_API
(150) .... ...1   PGE_API_OPENAPI "1" OPENAPI
(150) .... ..1.   PGE_API_CICSAPI "2" CICSAPI 
  Equates for testing PGE_PROGRAM_REMOTE
(150) .... ...1   PGE_REMOTE_NO "1" Remote No
(150) .... ..1.   PGE_REMOTE_YES "2" Remote Yes 
  Equates for testing PGE_PROGRAM_DYNAMIC
(150) .... ...1   PGE_DYNAMIC_NO "1" Dynamic No
(150) .... ..1.   PGE_DYNAMIC_YES "2" Dynamic Yes 
  Equates for testing PGE_PROGRAM_JVM
(150) .... ...1   PGE_JVM_NO "1" JVM No
(150) .... ..1.   PGE_JVM_YES "2" JVM Yes 
  Equates for testing PGE_PROGRAM_CHANGE_AGENT and INSTALL_AGENT
                                       Change Agents
(150) .... ...1   PGE_CSDAPI_CHANGE "0001" CSD API
(150) .... ..1.   PGE_CSDBATCH_CHANGE "0002" DFHCSDUP
(150) .... ..11   PGE_DREPAPI_CHANGE "0003" DREP API
(150) .... .1..   PGE_CREATE_CHANGE "0004" EXEC CREATE SPI
(150) .... .11.   PGE_AUTOINSTALL_ CHANGE "0006" AUTOINSTALL
(150) .... .111   PGE_SYSTEM_CHANGE "0007" SYSTEM Install Agents
(150) .... ...1   PGE_CSDAPI_INSTALL "0001" CSD API
(150) .... .1..   PGE_CREATE_INSTALL "0004" EXEC CREATE SPI
(150) .... .1.1   PGE_GRPLIST_INSTALL "0005" GRPLIST
(150) .... .11.   PGE_AUTOINSTALL_ INSTALL "0006" AUTOINSTALL
(150) .... .111   PGE_SYSTEM_INSTALL "0007" SYSTEM
(150) .... 1..1   PGE_BUNDLE_INSTALL "0009" BUNDLE