COMSPDT 
COMMON
                                                                     #
          CTEXT  COMSPDT - PROBE DATA EQUIVALENCES. 
                                                                     #
                                               CONTROL NOLIST;
                                               CONTROL IFEQ LISTCON,1;
                                               CONTROL LIST;
                                               CONTROL FI;
                             BEGIN  # COMSPDT # 
  
                                                                     #
*       COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992. 
  
  
  
  
***     COMSPDT - PROBE DATA EQUIVALENCES.
*       R. A. JAPS.        79/08/16.
  
  
  
  
**        THE FOLLOWING MICRO DEFINITIONS CREATE MICRO NAMES
*         WHICH CORRESPOND TO THE OCTAL NUMBERS 1 THROUGH 177B. 
*         THEY HAVE VALUES WHICH ARE THE SAME AS THEIR NAME (IE,
*         "37" MICRO 1,,$37$  ).
*         THE PURPOSE OF THIS IS TO AVOID TYPE 9 ERRORS WHICH 
*         WOULD OTHERWISE OCCUR WHEN *COMPASS* PROCESSES A
*         LINE WITH A #   #DEF#    # MACRO CONTAINING THE 
*         *SYMPL* REPRESENTATION OF AN OCTAL NUMBER (O"37").
  
  
  
          NOREF  .R 
  
 OCTMIC   ECHO   ,FIRST=1,LAST=177B 
 .R       SET    LAST 
 GENMIC   DUP    LAST-FIRST+1 
 .R       SET    .R-1 
 .V       OCTMIC .R 
 ".V"     MICRO  1,,$.V$
 GENMIC   ENDD
 OCTMIC   ENDD
  
  
 PVERS    MICRO  1,,*PROBE VERSION 1.0* 
  
  
**        THE FOLLOWING SYSTEM CONSTANT DEFINITIONS ARE REQUIRED
*         TO ENSURE THAT *SYMPL* WILL PROPERLY DEFINE THE 
*         CONSTANTS FOR ACCESS TO SYSTEM TABLES.
*         *CPUM* AND *MXFM* ARE ALSO DEFINED IN *PPCOM*.
*         *MXPF* AND *PMXF* ARE ALSO DEFINED IN *COMSMTR*.
                                                                     #
  
#CPUM     #DEF#  21B         # CPUM #O"21"#;    # *CPUMTR* FUNCTION # 
#MXFM     #DEF#  122B        # MXFM #O"122"#;   # MONITOR FUNCTION #
#MXF1     #DEF#  121B        # MXF1 #O"121"#;   # MXFM - 1 #
#MXPF     #DEF#  21B         # MXPF #O"21"#;    # *MTR* FUNCTION LIMIT #
#MXP1     #DEF#  20B         # MXP1 #O"20"#;    # MXPF - 1 #
#PMXF     #DEF#  3B          # PMXF #O"3"#;     # PROGRAM FUNCTION #
#PMX1     #DEF#  2B          # PMX1 #O"2"#;     # PMXF-1 #
                                                                     #
  
  
  
  
***       *COMSPDT* DEFINES THE STRUCTURE AND SIZE OF THE *PROBE* 
*         DATA TABLES.
  
***       THE FOLLOWING RULES MUST BE FOLLOWED TO INSURE PROPER 
*         INTERFACE TO THE *PROBE* TABLES.
* 
*         1. THE *PROBE* TABLE INTERLOCK IS FOUND IN *SD5L* IN CMR. 
*         THIS INTERLOCK MUST BE USED BY ANY PROGRAM (OTHER THAN
*         *CPUMTR*) WHEN ACCESSING THE *PROBE* TABLES.  THIS WILL 
*         ENSURE THE STATE OF THE TABLES OR *PROBE* POINTERS DOES 
*         NOT CHANGE WHILE THE PROGRAM IS ACCESSING THE TABLES. 
* 
*         2. TO SET THE *PROBE* TABLE INTERLOCK, THE *UADM* MONITOR 
*         FUNCTION MUST BE USED.  THIS INSURES *CPUMTR* WILL NOT
*         UPDATE THE TABLES WHILE THEY ARE BEING ACCESSED/CHANGED BY
*         A PP PROGRAM. 
* 
*         3. *CPUMTR* MUST CHECK THE *PROBE* TABLE INTERLOCK
*         BEFORE ANY COUNTERS ARE UPDATED.  IF THE INTERLOCK IS 
*         SET, *CPUMTR* WILL NOT UPDATE THE COUNTER FOR THAT EVENT
*         OCCURENCE.  IF THE INTERLOCK IS NOT SET, *CPUMTR* NEED
*         NOT SET IT TO UPDATE THE TABLE ENTRIES. 
* 
*         4. TO CLEAR THE *PROBE* TABLES THE *PROBE* TABLE INTERLOCK
*         MUST BE OBTAINED.  ONCE THE TABLES ARE ZEROED, THE PACKED 
*         DATE AND TIME SHOULD BE SET IN *PDTL*.  THE INTERLOCK CAN 
*         THEN BE RELEASED. 
  
  
  
  
*         *PROBE* DATA TABLE LENGTHS. 
  
                                                                     #
#TPDTL    #DEF#  1           # TPDTL #1#;  # PACKED DATE/TIME ENTRY # 
#TACEL    #DEF#  2           # TACEL #2#;  # CPU EXCHANGE ENTRY # 
#TCIOL    #DEF#  100B        # TCIOL #O"100"#;  # *TCIO* ENTRY #
#TPPUL    #DEF#  MXFM-CPUM   # TPPUL #(MXFM-CPUM)#;  # *TPPU* ENTRY # 
#TPRGL    #DEF#  MXFM-CPUM   # TPRGL #(MXFM-CPUM)#;  # *TPRG* ENTRY # 
#TRSVL    #DEF#  30B         # TRSVL #O"30"#;  # INSTALLATION AREA #
                                                                     #
  
  
  
  
**        *PROBE* DATA TABLE INDICES. 
* 
*         THE FOLLOWING DEFINITIONS DEFINE *PROBE* DATA TABLE INDICES.
*         THESE SYMBOLS SHOULD BE USED WHEN ACCESSING A PARTICULAR
*         TABLE.
  
  
  
  
**        TPDT - TABLE OF PACKED DATE AND TIME. 
* 
*         THE PACKED DATE AND TIME INDICATES THE BEGINNING
*         OF THE TIME INTERVAL DATA WAS GATHERED. 
                                                                     #
  
#TPDT     #DEF#  0           # TPDT #0#;
                                                                     #
  
  
  
  
**        TACE - TABLE OF ALTERNATE CPU EXCHANGES.
* 
*T CPU0   60/ CPU EXCHANGES FROM CPU 0 TO CPU 1 
*T,CPU1   60/ CPU EXCHANGES FROM CPU 1 TO CPU 0 
                                                                     #
  
#TACE     #DEF#  TPDT+TPDTL  # TACE #(TPDT+TPDTL)#; 
                                                                     #
  
  
  
  
**        TCIO - TABLE OF *CIO* RA+1 REQUESTS.
* 
*         THE TABLE IS INDEXED BY BITS 3 - 7 OF *CIO* FUNCTION CODE.
*         IF BIT 2 OF THE *CIO* FUNCTION CODE IS EQUAL TO ZERO
*         THEN IN THE COUNTER, BITS 0 - 29 ARE INCREMENTED. 
*         IF BIT 2 IS EQUAL TO ONE THEN IN THE COUNTER, BITS
*         30 - 59 ARE INCREMENTED.
                                                                     #
  
#TCIO     #DEF#  TACE+TACEL  # TCIO #(TACE+TACEL)#; 
                                                                     #
  
  
  
  
**        TMTR - TABLE OF *MTR* MONITOR MODE REQUESTS.
* 
*         INDEXED BY REQUEST NUMBER.
                                                                     #
  
#TMTR     #DEF#  TCIO+TCIOL  # TMTR #(TCIO+TCIOL)#; 
                                                                     #
  
  
  
  
**        TMNR - TABLE OF *MTR* PROGRAM MODE REQUESTS.
* 
*         INDEXED BY REQUEST NUMBER.
                                                                     #
  
#TMNR     #DEF#  TMTR+MXPF   # TMNR #(TMTR+MXPF)#;
                                                                     #
  
  
  
  
**        TPPU - TABLE OF PPU MONITOR MODE REQUESTS TO *CPUMTR* 
* 
*         INDEXED BY (REQUEST NUMBER - CPUM). 
                                                                     #
  
#TPPU     #DEF#  TMNR+MXFM   # TPPU #(TMNR+MXFM)#;
                                                                     #
  
  
  
  
**        TPRG - TABLE OF PPU PROGRAM MODE REQUESTS TO *CPUMTR*.
* 
*         INDEXED BY (REQUEST NUMBER - CPUM). 
                                                                     #
  
#TPRG     #DEF#  TPPU+TPPUL  # TPRG #(TPPU+TPPUL)#; 
                                                                     #
  
  
  
  
**        TSRV - TABLE RESERVED FOR INSTALLATIONS.
                                                                     #
  
#TRSV     #DEF#  TPRG+TPRGL  #TRSV#(TPRG+TPRGL)#; 
                                                                     #
  
  
  
  
**        TPRDL - LENGTH OF STATIC PORTION OF *PROBE* DATA TABLES.
                                                                     #
  
#TPRDL    #DEF#  TRSV+TRSVL  # TPRDL #(TRSV+TRSVL)#;
                                                                     #
  
  
  
  
**        TSPL - TABLE OF *PLD* SEARCHES. 
* 
*T WORD0  30/ PLD1 ,30/ PLD0
*T,WORD1  30/ PLD3 ,30/ PLD2
*T,WORD2  30/ PLD5 ,30/ PLD4
*T,          .        . 
*T,          .        . 
* 
*         PLD0 = NUMBER OF SEARCHES FOR FIRST *PLD* ENTRY.
*         PLD1 = NUMBER OF SEARCHES FOR SECOND *PLD* ENTRY. 
                                                                     #
  
#TSPL     #DEF#  TPRDL       # TSPL #TPRDL#;
  
                             END  # COMSPDT # 
                                                                     #
         COL   30 
  
         ENDX                                                        #
                                               CONTROL LIST;
  
