The ADABAS Interface › Operating Instructions › User Table Customization › QCPU CPU Macro

QCPU CPU Macro

              Macro       Operands
  name        QCPU        TYPE=INITIAL   (generates a header for the CPU Table)

              QCPU        TYPE=ENTRY,    (generates a CPU Table entry)
                          MODEL='cpu model name',
                          IPS=nnnnnnnnn,
                          CORRFCT=nnnnnnnnn,
                          CPUID=a

              QCPU        TYPE=FINAL     (generates a trailer for the CPU Table)

name

is the name of the generated CSECT. The default name is JSIQCPU.

MODEL=

specifies, in a quoted string, the CPU model that this entry defines (1-16 characters alphanumeric).

IPS=

specifies this entry's instruction speed in IPS (Instructions Per Second) in decimal (1 to 9 digits).

CORRFCT=

specifies the installation correction factor (1 to 9 digits). Initially, the correction factor should be set to a value of '1'. After processing data for an entire ADABAS session, obtain the total Estimated CPU Time (ECPU) using the sample ADABAS Utilization Report as shown in Figure 1-3. The total Estimated CPU time (ECPU) in conjunction with the total CPU Time captured by SMF (SCPU) for the same ADABAS session, can be used to compute your installation correction factor (CORRFCT) as follows:

CORRFCT = CSPU / ECPU

CPUID=

specifies the assigned identifier for this entry (1 character alphanumeric).

The following is a sample CPU Table that you can modify and assemble. It is included as member JSIQCPU in CAJRSAMP. The load module name for the CPU Table must be QCPU.

  JSIQCPU  QCPU  TYPE=INITIAL
  *
           QCPU  TYPE=ENTRY,                                            *
                 MODEL='IBM 370/138',                                   *
                 IPS=240000,                                            *
                 CORRFCT=1,                                             *
                 CPUID=1
  *
           QCPU  TYPE=ENTRY,                                            *
                 MODEL='IBM 370/148',                                   *
                 IPS=500000,                                            *
                 CORRFCT=1,                                             *
                 CPUID=2

           QCPU  TYPE=ENTRY,                                            *
                 MODEL='ESP-36',                                        *
                 IPS=540000,                                            *
                 CORRFCT=1,                                             *
                 CPUID=3
  *
           QCPU  TYPE=ENTRY,                                            *
                 MODEL='ESP-41',                                        *
                 IPS=750000,                                            *
                 CORRFCT=1,                                             *
                 CPUID=4
  *
           QCPU  TYPE=ENTRY,                                            *
                 MODEL='IBM 4341-1',                                    *
                 IPS=750000,                                            *
                 CORRFCT=1,                                             *
                 CPUID=5
  *
           QCPU  TYPE=ENTRY,                                            *
                 MODEL='IBM 370/158-3',                                 *
                 IPS=920000,                                            *
                 CORRFCT=1,                                             *
                 CPUID=6
  *
           QCPU  TYPE=ENTRY,                                            *
                 MODEL='IBM 3031',                                      *
                 IPS=1200000,                                           *
                 CORRFCT=1,                                             *
                 CPUID=7
  *
           QCPU  TYPE=ENTRY,                                            *
                 MODEL='IBM 370/168-3',                                 *
                 IPS=2700000,                                           *
                 CORRFCT=1,                                             *
                 CPUID=8

*
         QCPU  TYPE=ENTRY,                                            *
               MODEL='IBM 3032',                                      *
               IPS=2700000,                                           *
               CORRFCT=1,                                             *
               CPUID=9
*
         QCPU  TYPE=ENTRY,                                            *
               MODEL='AMDAHL 470/V6',                                 *
               IPS=4000000,                                           *
               CORRFCT=1,                                             *
               CPUID=A
*
         QCPU  TYPE=ENTRY,                                            *
               MODEL='IBM 3033',                                      *
               IPS=4530000,                                           *
               CORRFCT=1,                                             *
               CPUID=B
*
         QCPU  TYPE=ENTRY,                                            *
               MODEL='AMDAHL 470/V7',                                 *
               IPS=4910000,                                           *
               CORRFCT=1,                                             *
               CPUID=C
*
*
         QCPU  TYPE=FINAL
         END