PGDDS - Public Program Definition Resource Statistics

    CONTROL BLOCK NAME = DFHPGDDS
    NAME OF MATCHING PLS CONTROL BLOCK = DFHPGDPS
    DESCRIPTIVE NAME = CICS TS Public Programdef (PG Domain) Stats
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 2007, 2016 
    FUNCTION =
            This data area contains the Public 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 DFHPGDDS Programdef Resid stats record
(0) HALFWORD 2 PGDDS_LEN Programdef stats record length
(2) ADDRESS 2 PGDDS_ID Programdef stats id
(4) CHARACTER 1 PGDDS_VERS Programdef stats version
(5) CHARACTER 3   Reserved
(8) CHARACTER 8 PGD_PROGRAM_NAME Program Name
(10) BITSTRING 1 PGD_PROGRAM_TYPE Program Type
(11) BITSTRING 1 PGD_PROGRAM_EXEC_KEY Program CICS/USER key
(12) BITSTRING 1 PGD_PROGRAM_DATA_LOC Program Data Location
(13) BITSTRING 1 PGD_PROGRAM_ EXECUTION_SET Program Execution Set
(14) CHARACTER 4   Reserved
(18) BITSTRING 1 PGD_PROGRAM_LANG_ DEDUCED Program Language Deduced
(19) BITSTRING 1 PGD_PROGRAM_LANGUAGE Program Language
(1A) BITSTRING 1 PGD_PROGRAM_RUNTIME_ ENV Program Runtime Environment
(1B) CHARACTER 5   Reserved
(20) BITSTRING 1 PGD_PROGRAM_ CONCURRENCY Program Concurrency
(21) BITSTRING 1 PGD_PROGRAM_API Program API
(22) CHARACTER 3   Reserved
(25) BITSTRING 1 PGD_PROGRAM_REMOTE Program Remote
(26) BITSTRING 1 PGD_PROGRAM_DYNAMIC Program Dynamic
(27) BITSTRING 1 PGD_PROGRAM_JVM Program JVM
(28) BITSTRING 1 PGD_PROGRAM_ ENTRYPOINT Application Entry Point
(29) CHARACTER 3   Reserved
(2C) CHARACTER 8 PGD_PROGRAM_REMOTE_ NAME Remote Program name
(34) CHARACTER 4 PGD_PROGRAM_TRAN_ID Remote Transaction ID
(38) CHARACTER 4 PGD_PROGRAM_REMOTE_ SYSID Remote System name
(3C) CHARACTER 4   Reserved
(40) CHARACTER 8   Reserved
(48) CHARACTER 8 PGD_PROGRAM_JVMSERVER Program JVM server Name
(50) CHARACTER 8   Reserved
(58) CHARACTER 8 PGD_PROGRAM_DEFINE_ SOURCE Group installed from
(60) BITSTRING 8 PGD_PROGRAM_CHANGE_ TIME Change/create time
(68) CHARACTER 8 PGD_PROGRAM_CHANGE_ USERID Change userid
(70) BITSTRING 2 PGD_PROGRAM_CHANGE_ AGENT Change agent
(72) BITSTRING 2 PGD_PROGRAM_INSTALL_ AGENT Install agent
(74) BITSTRING 8 PGD_PROGRAM_INSTALL_ TIME Install/Create time
(7C) CHARACTER 8 PGD_PROGRAM_INSTALL_ USERID Install userid
(84) BITSTRING 4   Reserved
(84) 1... 1...   PGDDS_END "*"
(84) 1... 1...   PGDDS_LENGTH "*-PGDDS_LEN" Programdef record length 
  Constants that denote a Public PG Programdef stats record
(84) .111 1...   PGD_IDR "120" Programdef resid stats id
(84) .... ...1   PGD_VERS "X'01'" Record version number 
  Equates for testing PGD_PROGRAM_TYPE
(84) .... ...1   PGD_TYPE_PROGRAM "1" Program
(84) .... ..1.   PGD_TYPE_MAPSET "2" Mapset
(84) .... ..11   PGD_TYPE_PARTITIONSET "3" Partitionset 
  Equates for testing PGD_PROGRAM_EXEC_KEY
(84) .... ....   PGD_EXEC_KEY_ NOTAPPLIC "0" Exec key Notapplic
(84) .... ...1   PGD_EXEC_KEY_CICS "1" CICS exec key
(84) .... ..1.   PGD_EXEC_KEY_USER "2" USER exec key 
  Equates for testing PGD_PROGRAM_DATA_LOC
(84) .... ....   PGD_DATA_LOC_ NOTAPPLIC "0" Dataloc Notapplic
(84) .... ...1   PGD_DATA_LOC_BELOW "1" Dataloc Below
(84) .... ..1.   PGD_DATA_LOC_ANY "2" Dataloc Any 
  Equates for testing PGD_PROGRAM_EXECUTION_SET
(84) .... ....   PGD_EXEC_SET_ NOTAPPLIC "0" Execution set Notapplic
(84) .... ...1   PGD_EXEC_SET_ DPLSUBSET "1" Execution set DPL subset
(84) .... ..1.   PGD_EXEC_SET_FULLAPI "2" Execution set Full API 
  Equates for testing PGD_PROGRAM_LANG_DEDUCED
(84) .... ....   PGD_LANG_NOTAPPLIC "0" Language deduced Notapplic
(84) .... ...1   PGD_LANG_NOT_DEDUCED "1" Language not deduced
(84) .... ..1.   PGD_LANG_NOT_DEFINED "2" Language not defined
(84) .... ..11   PGD_LANG_ASSEMBLER "3" Language Assembler
(84) .... .1..   PGD_LANG_C "4" Language C
(84) .... .1.1   PGD_LANG_COBOL "5" Language COBOL
(84) .... .11.   PGD_LANG_LE "6" Language LE
(84) .... .111   PGD_LANG_PLI "7" Language PL1
(84) .... 1...   PGD_LANG_JAVA "8" Language JAVA 
  Equates for testing PGD_PROGRAM_LANGUAGE
(84) .... ....   PGD_LANGUAGE_ NOTAPPLIC "0" Language Notapplic
(84) .... ...1   PGD_LANGUAGE_NOT_ DEFINED "1" Language not defined
(84) .... ..1.   PGD_LANGUAGE_ ASSEMBLER "2" Language Assembler
(84) .... ..11   PGD_LANGUAGE_C "3" Language C
(84) .... .1..   PGD_LANGUAGE_COBOL "4" Language COBOL
(84) .... .1.1   PGD_LANGUAGE_LE "5" Language LE
(84) .... .11.   PGD_LANGUAGE_PLI "6" Language PL1 
  Equates for testing PGD_PROGRAM_RUNTIME_ENV
(84) .... ....   PGD_RUNTIME_NOTAPPLIC "0" Runtime Notapplic
(84) .... ...1   PGD_RUNTIME_ENV_JVM "1" Runtime JVM
(84) .... ..1.   PGD_RUNTIME_ENV_LE "2" Runtime LE
(84) .... ..11   PGD_RUNTIME_ENV_NONLE "3" Runtime Non LE
(84) .... .1..   PGD_RUNTIME_ENV_ XPLINK "4" Runtime XPLink 
  Equates for testing PGD_PROGRAM_CONCURRENCY
(84) .... ....   PGD_CONC_NOTAPPLIC "0" Concurrency Notapplic
(84) .... ...1   PGD_CONC_ QUASIREENTRANT "1" Concurrency Quasi-Reentrnt
(84) .... ..1.   PGD_CONC_THREADSAFE "2" Concurrency Threadsafe
(84) .... ..11   PGD_CONC_REQUIRED "3" Concurrency Required 
  Equates for testing PGD_PROGRAM_API
(84) .... ...1   PGD_API_OPENAPI "1" OPENAPI
(84) .... ..1.   PGD_API_CICSAPI "2" CICSAPI 
  Equates for testing PGD_PROGRAM_REMOTE
(84) .... ...1   PGD_REMOTE_NO "1" Remote No
(84) .... ..1.   PGD_REMOTE_YES "2" Remote Yes 
  Equates for testing PGD_PROGRAM_DYNAMIC
(84) .... ...1   PGD_DYNAMIC_NO "1" Dynamic No
(84) .... ..1.   PGD_DYNAMIC_YES "2" Dynamic Yes 
  Equates for testing PGD_PROGRAM_JVM
(84) .... ...1   PGD_JVM_NO "1" JVM No
(84) .... ..1.   PGD_JVM_YES "2" JVM Yes 
  Equates for testing PGD_PROGRAM_ENTRYPOINT
(84) .... ...1   PGD_ENTRYPOINT_NO "1" Entry point No
(84) .... ..1.   PGD_ENTRYPOINT_YES "2" Entry point Yes 
  Equates for testing PGD_PROGRAM_CHANGE_AGENT and INSTALL_AGENT
                                       Change Agents
(84) .... ...1   PGD_CSDAPI_CHANGE "0001" CSD API
(84) .... ..1.   PGD_CSDBATCH_CHANGE "0002" DFHCSDUP
(84) .... ..11   PGD_DREPAPI_CHANGE "0003" DREP API
(84) .... .1..   PGD_CREATE_CHANGE "0004" EXEC CREATE SPI
(84) .... .11.   PGD_AUTOINSTALL_ CHANGE "0006" AUTOINSTALL
(84) .... .111   PGD_SYSTEM_CHANGE "0007" SYSTEM
(84) .... 1...   PGD_DYNAMIC_CHANGE "0008" DYNAMIC Install Agents
(84) .... ...1   PGD_CSDAPI_INSTALL "0001" CSD API
(84) .... .1..   PGD_CREATE_INSTALL "0004" EXEC CREATE SPI
(84) .... .1.1   PGD_GRPLIST_INSTALL "0005" GRPLIST
(84) .... .11.   PGD_AUTOINSTALL_ INSTALL "0006" AUTOINSTALL
(84) .... .111   PGD_SYSTEM_INSTALL "0007" SYSTEM
(84) .... 1...   PGD_DYNAMIC_INSTALL "0008" DYNAMIC
(84) .... 1..1   PGD_BUNDLE_INSTALL "0009" BUNDLE