2013年12月24日 星期二

IBM Acronyms

The IBM world is full of acronyms. The following list, is just a sampling of some of the many acronyms that are used by IBM professionals on a daily basis.
ACS - Autonomic Class Selection

AMS - Access Method Services

APF - Authorized Program Facility

API - Application Programming Interface

ASCB - Address Space Control Block

ASclass - Address Space class

ASclass - Address Space classentifier

ASM - Auxiliary Storage Manager

ASMP - Asymmetric Multi Processing

BC - Business Class

BCP - Base Control Program

BDAM - Basic Direct Access Method

BDW - Block Descriptor Word

BI - Business Intelligence

BLKSIZE - Block Size

BPAM - Basic Partitioned Access Method

BSAM - Basic Sequential Access Method

BX - Byte Index

CA - Control Area

CBU - Capacity Backup

CE - Customer Engineer

CEC - Central Electronic Complex

CFCC - Coupling Facility Control Code

CHPclass - Channel Path classentifier

CI - Control Interval

CICS - Customer Information Control System

CIU - Customer Initiated Upgrade

CKD - Count Key Data

CLISTS - Command Lists

CMS - Conversational Monitor System

COBOL - Common Business Oriented Language

CP - Control Program

CP - Central Processor

CPC - Central Processor Complex

CRM - Customer Relationship Management

CSS IOPQ - Channel Subsystem I/O Priority Queuing

CSS - Channel Subsystem

CSTOR - Central Storage

CTC - Channel to Channel

CU - Control Units

CUA - Control Unit Address

CoD - Capacity on Demand

DA - Device Adapter

DASD - Direct Access Storage Device

DAT - Dynamic Address Translation

DBA - Database Administrator

DCB - Data Control Block

DCM - Dynamic Channel

DD - Data Definition

DFS - Distributed File System

DOS - Disk Operating System

DR - Disaster Recovery

DUAS - Dual Address Space

EAL5 - Common Criteria Evaluation Assurance Level 5

EAV - Extended Address Volume

EC - Enterprise Class

ECKD - Extended Count Key Data

EFDS - Entry Sequence Data Set

ERP - Enterprise Resource Planning

ESA - Enterprise Systems Architecture

ESCON - Enterprise Systems Connection

ESS - Enterprise Storage System

ESTOR - Expanded Storage

ETR - External Time Reference

FICON - Fiber Connection

FLPA - Fixed Link Pack Area

FTSS/SE - Field Technical Sales Support/Systems Engineer

GDG - Generation Data Groups

GDPS - Geographically Dispersed Parallel Sysplex

GDS - Generation Data Set

GRS - Global Resource Serialization

HA - Host Adapter

HDA - Head Disk Assembly

HFS - Hierarchical File System

HLQ - High Level Qualifier

HMC - Hardware Management Console

HSA - Hardware System Area

ICF - Integrated Coupling Facility (for Parallel Sysplex)

IFB - Infiniband

IFL - Integrated Facility for Linux

IMS - Information Management System

IOCDS - I/O Control Data Set

IOP - I/O Processors

IPL - Initial Program Load

ISMF - Interactive Storage Management Facility

ISPF - Interactive System Productivity Facility

ISV - Independent Software Vender

JCL - Job Control Language

JES - Job Entry Subsystem

JVM - Java Virtual Machine

KSDS - Keyed Sequence Data Set

LCSS - Logical Channel Subsystems

LDS - Linear Data Set

LIC - Licensed Internal Code

LPAR - Logical Partition

LRECL - Logical Record Length

MIPS - Million Instruction Per Second

MLPA - Modified Link Pack Area

MTBF - Mean Time Between Failure

MVS - Multiple Virtual Storage

NUMA - Non Uniform Memory Access

OEM - Original Equipment Manufacturer

OLTP - Online Transaction Processing (occur interactively with end user)

PA - Program Action

PAV - Parallel Access Volume

PC - Program Call

PDS - Partitioned Data Set

PF - Program Function

PFA - Predictive Failure Analysis

PHCclass - Physical Channel classentifier

Pclass - Process class

PLPA - Pageable Link Pack Area

POR - Power On Reset

POSIX - Portability Operating Systems Interface

PR/SM - Processor Resource/System Manager

PSA - Prefix Storage Area

PSA - Prefixed Saved Area

PSW - Program Status Word

PU - Processing Unit

PX - Page Index

QSAM - Queued Sequential Access Method

R(F/S/T)X - Region (First/Second/Third) Index

R1/2/3T - Region First/Second/Third Table

RACF - Resource Access Control Facility

RAS - Reliability, Availability, Serviceability

RCT - Region Control Task

RDF - Record Descriptor Field

RDW - Record Descriptor Word

RECFM - Record Format

REXX - Restructured Extended Executor

RISC - Reduced Instruction Set Computer

RRDS - Relative Record Data Set

RSM - Real Storage manager

RTM - Recovery Termination Manager

RX - Region Index

SAP - System Assistance Processor

SCB - Status Control Block

SCP - System Control Program

SDSF - System Display and Search Facility

SE - Support Element

SFM - Sysplex Failure Manager

SIE - Start Interpretive Execution

SIGP - Single Processor

SLA - Service Level Agreement (Batch window defined here)

SMB - Server Message Block

SMP - Symmetric Multi Processing

SMS - System Managed Storage

SQA - System Queue Area

SRB - Service Request Block

SRM - System Resource Manager

STI - Self timed interface

SVC - Supervisor Call

SX - Segment Index

SYSPLEX - System Complex

TCB - Task Control Block

TFS - Temporary File System

TOD - Time Of Day

TOR - Terminal Owning Region

TPS - Transactions per second

TSO/E - Time Sharing Option/Extensions

UA - Unit Address

UCB - Unit Control Block

USS - Unix System Services

VOLSER - Volume Serial Number

VSAM - Virtual Storage Access Method

VSCR - Virtual Storage Constraint

VSM - Virtual Storage Manager

VTOC - Volume Table of Contents

WLM - Workload Manager

XA - Extended Architecture

XM - Cross Memory

dfMSM - dfStorage Management

z/OS NFS - z/OS Network File System

z/TPF - Z/Transaction Processing Facility

z/VM - Z/Virtual Machine

z/VSE - Z/Virtual Storage Extended

zAAP - Z/OS Application Assist Processor

zFS - zSeries File System

zIIP - Z/OS Integrated Information Processor

2013年12月5日 星期四

Get IODF information

cvt      = Storage(10,4)                    /* get the CVT address    */ 
cvtixavl = Storage(D2x(C2d(cvt)+124),4)     /* get the IOCOM address  */ 
cvtext2  = Storage(D2x(C2d(cvt)+328),4)     /* get the EXT2 address   */ 
cvtiocid = Storage(D2x(C2d(cvtext2)+6),2)   /* active IO config id    */ 
iociovtp = Storage(D2x(C2d(cvtixavl)+208),4)/* get the IOVT address   */ 
cda      = Storage(D2x(C2d(iociovtp)+24),4) /* get the CDA address    */ 
iodfname = Storage(D2x(c2d(cda)+32),44)     /* get the IODF name      */ 
iodfcfgi = Storage(D2x(c2d(cda)+92),8)      /* get the IODF config id */ 
iodfedt  = Storage(D2x(c2d(cda)+104),2)     /* get the IODF EDT       */ 
iodfproc = Storage(D2x(c2d(cda)+124),8)     /* get the IODF Proc      */ 
iodfdate = Storage(D2x(c2d(cda)+156),8)     /* get the IODF Date      */ 
iodftime = Storage(D2x(c2d(cda)+164),8)     /* get the IODF Time      */ 
iodfdesc = Storage(D2x(c2d(cda)+172),16)    /* get the IODF Descriptn */ 

2013年11月25日 星期一

2013年11月17日 星期日

z/OS an address space virtual storage layout

The virtual storage layout document refer to idcl.marist.edu link site.

2013年11月14日 星期四

2013年10月11日 星期五

C dynamic call RMF API ERBSMFI program

#pragma linkage (EXSMFI,OS)
typedef int EXSMFI();

int  reqtype = 0x00000003;        /* Request type                  */
int  rectype = 0x0000004F;        /* Record type 79 - 2            */
int  subtype = 0x00000002;        /* Subtype for ARD report record */
char *buffer;                     /* SMF record buffer             */
int  buflen  = 247488;            /* Length of SMF record buffer   */
                                  /* 214720 + 32768                */
int  cpuutl  = 0;                 /* Return area for CPU util.     */
int  dpr     = 0;                 /* Return area for demand paging */
int  fullwd  = 0x00000000;        /* Parameter 8                   */
int  srm     = 0x00000000;        /* MVS/SRM CPU utilization       */

int  rc      = 0;                 /* call ERBSMFI return code      */
EXSMFI *fptr;

/* --------------------------------------------------------------- */
/* Get storage for SMF record buffer                               */
/* --------------------------------------------------------------- */
buffer = (char *)malloc(buflen);
memset(buffer,0,buflen);

/* --------------------------------------------------------------- */
/* Call ERBSMFI to create the record                               */
/* --------------------------------------------------------------- */
fptr = (EXSMFI *)fetch("ERBSMFI");
rc = (*fptr)(&reqtype,
             &rectype,
             &subtype,
             buffer,
             &buflen,
             &cpuutl,
             &dpr,
             &fullwd,
             &srm);

2013年9月13日 星期五

Get system information via REXX

/* REXX * SYSINFO
*/

if arg() = 0 then return "ERROR (Parameter fehlt)"

main_start:

   _info = translate(arg(1))
   if words(_info) > 1 then parse var _info _info parms
   _progname = left(prog_name(),3)
   select
     when _info = "JOBNAME"  then erg = stor_infos("JOBNAME")
     when _info = "JOBTYP"   then erg = stor_infos("JOBTYP")
     when _info = "JOBNUM"   then erg = stor_infos("JOBNUM")
     when _info = "STEPNAME" then erg = stor_infos("STEPNAME")
     when _info = "PROCSTEP" then erg = stor_infos("PROCSTEP")
     when _info = "SYSLEVEL" then erg = stor_infos("SYSLEVEL")
     when _info = "JES"      then erg = stor_infos("JES")
     when _info = "SYSID"    then erg = stor_infos("SYSID")
     when _info = "IPLVOL"   then erg = stor_infos("IPLVOL")
     when _info = "NJENODE"  then erg = stor_infos("NJENODE")
     when _info = "PROC"     then erg = stor_infos("PROC")
     when _info = "IPLDATE"  then erg = stor_infos("IPLDATE")
     when _info = "IPLDAY"   then erg = stor_infos("IPLDAY")
     when _info = "IPLTAG"   then erg = stor_infos("IPLTAG")
     when _info = "IPLTIME"  then erg = stor_infos("IPLTIME")
     when _info = "PROGNAME" then erg = prog_name()
     when _info = "SMIPS"    then erg = get_mips("S")
     when _info = "TMIPS"    then erg = get_mips("T")
     when _info = "ISPFSCRN" then erg = ispf_screens()
     otherwise                    erg = "ERROR"
   end

main_ende:
return erg


get_mips: procedure
   arg parm
   if parm <> "S" then parm = "T"
   CVT  = STORAGE(10,4)
   RMCT = STORAGE(D2X(C2D(CVT)+604),4)
   SU   = STORAGE(D2X(C2D(RMCT)+64),4)
   SU   = 16000000/C2D(SU)
   CVTPCCAT = STORAGE(D2X(C2D(CVT)+764),4)
   I = 0
   P = 0
   DO WHILE I < 16
   PCCA   = STORAGE(D2X(C2D(CVTPCCAT)+I*4),4)
   IF PCCA  ^= '00000000'X THEN DO
      PCCAPCCA = STORAGE(D2X(C2D(PCCA)),4)
      PCCAVC   = STORAGE(D2X(C2D(PCCA)+4),2)
      PCCACPID = STORAGE(D2X(C2D(PCCA)+6),6)
      PCCAMDL  = STORAGE(D2X(C2D(PCCA)+12),4)
      IF PCCAPCCA = 'PCCA' THEN DO
         P = P + 1
         END
      END
   I = I + 1
   END
   IF P > 1 THEN PROCS = 'PROCESSORS'
            ELSE PROCS = 'PROCESSOR'
   MIPS = SU/48.5
  MSU = SU*P*3600/1000000
  if parm = "S" then erg= mips p
  else erg = mips * p
return erg
/* ENDE MIPS */

get_lpar_name: procedure
/*---REXX--EXEC-GETSMFID---*/
  SMCA = D2X(C2D(STORAGE(10,4))+197)
  SMFID = D2X(C2D(STORAGE(SMCA,3))+16)
  SMFID = STORAGE(SMFID,4)
   SAY 'LPAR  IS' SMFID
  EXIT


prog_name: procedure
   /*
   From:    wooda@IBM.NET
   Subject: How to find program executin environment under MVS
   Andy Wood
   */
   xp      = storage(0000021c,4)
   xp2     = ptr2(xp,'b4'x)
   xp3      = d2x(c2d(xp2) + c2d('168'x))
   progname = storage(xp3,8)
   return progname

   ptr2: procedure
     address = c2d(arg(1))
     offset  = c2d(arg(2))
     return storage(d2x(address+offset),4)
   return
/* ENDE job_step_exec_name */


stor_infos: procedure expose _progname
   /* diverse infos aus der Task-Control-Table */
   arg infotyp
   CVT      = C2d(Storage(10,4))/* point to CVT */
   tcb      = storage(21c,4)
   tiot     = storage(d2x(c2d(tcb)+12),4)
   jscb     = storage(d2x(c2d(tcb)+180),4)
   ssib     = storage(d2x(c2d(jscb)+316),4)
   jobname  = strip(storage(d2x(c2d(tiot)),8))
   jobtype  = storage(d2x(c2d(ssib)+12),3)
   jobnum   = strip(storage(d2x(c2d(ssib)+15),5),l,0)
   stepname = strip(storage(d2x(c2d(tiot)+8),8),l,0)
   procstep = strip(storage(d2x(c2d(tiot)+16),8),l,0)

   /* */
   SMCA = Storage(D2x(CVT + 196),4) /* point to SMCA*/
   SMCA = Bitand(SMCA,'7FFFFFFF'x)/* zero high order bit*/
   SMCA = C2d(SMCA) /* convert to decimal */

   /*
   The IPL date is stored in packed decimal format - so to make
   the date printable, it needs to be converted back to hex and
   the packed sign needs to be removed.
   */
   IPLTIME= C2d(Storage(D2x(SMCA + 336),4)) /* IPL Time - binary*/
   IPLDATE= C2d(Storage(D2x(SMCA + 340),4)) /* IPL Date - 0CYYDDDF*/
   IPLDATE= D2x(IPLDATE) /* convert back to hex*/
   parse var IPLDATE . 2 IPLDATE 7 .
   iplday = date('w',ipldate,'j')
   x = wordpos(left(iplday,2),"Mo Tu We Th Fr Sa Su")
   y = "Montag Dienstag Mittwoch Donnerstag Freitag Samstag Sonntag"
   ipltag = word(y,x)
   parse value date('s',ipldate,'j') with 1 jjjj 5 mm 7 dd
   ipldate= dd"."mm"."jjjj
   IPLTIME= IPLTIME / 100 /* remove hundreths */
   HH = IPLTIME % 3600/* IPL hour */
   MM = (IPLTIME - (3600 * HH)) % 60/* IPL minute */
   SS = (IPLTIME - (3600 * HH)- (60 * MM)) % 1/* IPL seconds*/
   HH = Right(HH,2,'0') /* ensure 2 digit HH*/
   MM = Right(MM,2,'0') /* ensure 2 digit MM*/
   SS = Right(SS,2,'0') /* ensure 2 digit SS*/
   IPLTIME= HH':'MM':'SS/* time in HH:MM format */
   select
      when infotyp = "JOBNAME"  then erg = jobname
      when infotyp = "JOBTYP"   then erg = jobtype
      when infotyp = "JOBNUM"   then erg = jobnum
      when infotyp = "STEPNAME" then erg = stepname
      when infotyp = "PROCSTEP" then erg = procstep
      when infotyp = "SYSLEVEL" then erg = left(mvsvar('sysmvs'),10)
      when infotyp = "JES"      then do
         if _progname = "IRX" then erg = ""
         else                      erg = sysvar("SYSJES")
      end
      when infotyp = "SYSID"    then erg = mvsvar("SYSNAME")
      when infotyp = "IPLVOL"   then erg = "" !! ,
                                     left(mvsvar('symdef','sysr1'),10)
      when infotyp = "NJENODE"  then do
         if _progname = "IRX" then erg = ""
         else                      erg = left(sysvar('sysnode'),10)
      end
      when infotyp = "PROC"     then do
         if _progname = "IRX" then erg = ""
         else                      erg = sysvar("SYSPROC")
      end
      when infotyp = "IPLDATE"  then erg = ipldate
      when infotyp = "IPLDAY"   then erg = iplday
      when infotyp = "IPLTAG"   then erg = ipltag
      when infotyp = "IPLTIME"  then erg = ipltime
      otherwise                      erg = "ERROR"
   end
return erg


ispf_screens: procedure expose _progname
   if _progname = "IRX" then return ""
   if sysvar("SYSISPF") <> "ACTIVE" then return ""
   /* active ISPF-Screens                           */
   /* RESULT = scr1 name1 \ ... \                   */

   TCBP=PTR(132+PTR(540)) /* CURRENT ISPTASK TCB       */
   TCBP=PTR(TCBP+132)     /* ISPMAIN TCB VIA TCBOTC    */
   TCBP=PTR(TCBP+136)     /* ISPTASK TCB VIA TCBLTC    */

   erg =
   DO WHILE TCBP <> 0
      X=TLDID(TCBP)
      erg = erg !! scrnr scrname "\"
      TCBP=PTR(128+TCBP) /* FOLLOW NTC */
   END
RETURN erg

PTR:  RETURN C2D(STORAGE(D2X(ARG(1)),4))
STG:  RETURN STORAGE(D2X(ARG(1)),ARG(2))

TLDID:
   R9=PTR(112+ARG(1))
   IF STG(R9+40,4)='ISPF' & STG(R9+24,1)='00'X THEN DO

       R9= PTR(R9+24)
       IF R9 <>0 & STG(R9+24,1)='00'X THEN DO
        SCRNR  =STG(PTR(R9)+003,1)
        SCRNAME=STG(PTR(R9)+852,8)
        RETURN 0
        END
     END
RETURN 'NONE'
/* Ende ISPF-SCREENS */

get_symbols: procedure

call set_sym_names
say
say "Standars MVS Symbols:"
do I = 1 while SYS.I <> "SYS."I
   say left(SYS.I,10) ">>" mvsvar("SYMDEF",SYS.I)
end
say
say "Installationsabh鄚gige:"
do I = 1 while SYM.I <> "SYM."I
   say left(SYM.I,10) ">>" mvsvar("SYMDEF",SYM.I)
end
exit

set_sym_names:
   I = 0 /* Standard MVS */
   I=I+1;SYS.I= "JOBNAME"
   I=I+1;SYS.I= "LYYMMDD"
   I=I+1;SYS.I= "LHHMMSS"
   I=I+1;SYS.I= "HHMMSS"
   I=I+1;SYS.I= "LYR4"
   I=I+1;SYS.I= "SYSR1"
   I = 0 /* Definiert in der SYS1.PARMLIB(IEASYMxx) */
   I=I+1;SYM.I= "CPUNAME"
   I=I+1;SYM.I= "CSABELOW"
   I=I+1;SYM.I= "CSAHIGH"
   I=I+1;SYM.I= "SUFFIX"
   I=I+1;SYM.I= "PAGELOC1"
   I=I+1;SYM.I= "PAGECOM1"
   I=I+1;SYM.I= "MAXUSER"
   I=I+1;SYM.I= "GRSMODE"
   I=I+1;SYM.I= "RSUPARM"
   I=I+1;SYM.I= "RWGSYSID"
return
/*
   Quelle TSO-REXX NewsGroup at GOOGLE

   Die SYMBOLS aus der SYS1.PARMLIB werden zur Zeit nicht benutzt

   Aufruf-Syntax: INFO = 刨YSINFO(parm)

   Inhalt parm   m鐷liches Funktionsergebnis
   -----------   ------------------------------------------------------
   JOBNAME       DAAKW
   JOBTYP        TSU
   JOBNUM        13716
   STEPNAME      RWGTSO
   PROCSTEP      RWGTSO
   SYSLEVEL      SP6.1.0
   JES           JES2 OS 2.10
   SYSID         S6UP
   IPLVOL        OS#11F
   NJENODE       GNO45NJ1
   PROC          RWGTSO
   IPLDATE       13.02.2002
   IPLDAY        Wednesday
   IPLTAG        Mittwoch
   IPLTIME       21:38:42
   PROGNAME      IKJEFT01
   SMIPS         173.447375 5
   TMIPS         867.236875
   ISPFSCRN      4 DSLIST   \3 SD       \2 EDIT     \1 DSLIST   \

   ist einer der Werte nicht ermittelbar wird SPACE zur𡡷kgegeben
*/


The driver for SYSINFO

/* REXX * SYSINFO-Treiberprogramm

trace ?r
*/
call test1_vars
do i = 1 to words(tstvars)
   say left(word(tstvars,i),10) ">>" sysinfo(word(tstvars,i))
end
call get_symbols
exit



get_symbols: procedure

call set_sym_names
say
say "Standars MVS Symbols:"
do I = 1 while SYS.I <> "SYS."I
   say left(SYS.I,10) ">>" mvsvar("SYMDEF",SYS.I)
end
say
say "Installationsabhängige:"
do I = 1 while SYM.I <> "SYM."I
   say left(SYM.I,10) ">>" mvsvar("SYMDEF",SYM.I)
end
return

set_sym_names:
   I = 0 /* Standard MVS */
   I=I+1;SYS.I= "JOBNAME"
   I=I+1;SYS.I= "LYYMMDD"
   I=I+1;SYS.I= "LHHMMSS"
   I=I+1;SYS.I= "HHMMSS"
   I=I+1;SYS.I= "LYR4"
   I=I+1;SYS.I= "SYSR1"
   I = 0 /* Definiert in der SYS1.PARMLIB(IEASYMxx) */
   I=I+1;SYM.I= "CPUNAME"
   I=I+1;SYM.I= "CSABELOW"
   I=I+1;SYM.I= "CSAHIGH"
   I=I+1;SYM.I= "SUFFIX"
   I=I+1;SYM.I= "PAGELOC1"
   I=I+1;SYM.I= "PAGECOM1"
   I=I+1;SYM.I= "MAXUSER"
   I=I+1;SYM.I= "GRSMODE"
   I=I+1;SYM.I= "RSUPARM"
   I=I+1;SYM.I= "RWGSYSID"
return

test1_vars:
   tstvars =  "JOBNAME"  ,
              "JOBTYP"   ,
              "JOBNUM"   ,
              "STEPNAME" ,
              "PROCSTEP" ,
              "SYSLEVEL" ,
              "JES2"     ,
              "SYSID"    ,
              "IPLVOL"   ,
              "NJENODE"  ,
              "PROC"     ,
              "IPLDATE"  ,
              "IPLDAY"   ,
              "IPLDAYG"  ,
              "IPLTIME"  ,
              "PROGNAME" ,
              "SMIPS"    ,
              "TMIPS"    ,
              "ISPFSCRN" ,
              ""
return

2013年9月12日 星期四

z/OS Workload Manager: What Are you Thinking?

Presentation : z/OS Workload Manager: What Are you Thinking? "This session will review many of the common definition mistakes seen by IBM. The session will provide recommendations for finding these mistakes and provide alternatives for better performance, or avoiding potential problems".

2013年8月9日 星期五

2013年7月13日 星期六

Calling an assembler program from a C program

How to calling an assembler program form a C program detail information refer to David E. Ellis document website.

2013年6月14日 星期五

Get task information from control blocks

(1) The Prefix Save Area (PSA) points (->) to the CVT, which points to the SMCA, which gets us to the system name.

(2) PSATOLD -> JSCB -> SSIB -> jobtype, tasknum

(3) PSATOLD -> TIOT -> job, step, proc name plus allocated DD information

/*-------------------------------------------------------*/
/* Follow the control blocks to the Step Control Table.  */
/*-------------------------------------------------------*/
/* Psa                                  Prefix Save Area
/* Psa@540                              Pointer of PSATOLD
/* Psa@540=>tcb                         Task control block
/* Psa@540=>tcb+181                     Pointer of TCBJSCBB
/* Psa@540=>tcb+181=>jscb               JOBSTEP control block
/* Psa@540=>tcb+181=>jscb+261           Pointer to Job Control Table
/* Psa@540=>tcb+181=>jscb+261=>jct      Job Control Table
/* Psa@540=>tcb+181=>jscb+261=>jct+329  Pointer to Step Contolr Table
/* Psa@540=>tcb+181=>jscb+261=>jct+329=>sct Step Control Table*/
/*------------------------------------------------------------*/

2013年6月4日 星期二

MVS Control Blocks

CVT   DSECT=YES,LIST=NO          MVS CVT
IKJCPPL ,                        Command Processor Parm List
IEFJESCT ,                       JES Communication Table
IHAPSA ,                         Prefix save area
IKJTCB ,                         Task Control Block
IEZJSCB ,                        Job Step Control Block
IEFAJCTB ,                       Job Control table
IEFASCTB ,                       Step Control table
IHAASCB ,                        Address Space Control Block
IHAASSB ,                        Address Space Secondary Block
IAZJSAB ,                        Job Schedular Addr Spc CB
IEFZB505 LOCEPAX=YES             EPA mapping for SWAREQ
IEFQMIDS ,                       Equates for SWA requests
DCBD   DSORG=PO,DEVD=DA          Data Control Block

Get step name and return code

/* REXX                              */
/* GET THE STEP NAME AND RETURN CODE */
NUMERIC DIGITS(32) /* ENSURE MAX PRECISION */
TCB=STORAGE(D2X(540),4) /* PSATOLD IN PSA */
JSCB =STORAGE(D2X(C2D(TCB)+180),4) /* TCBJSCB IN TCB */
JCT = STORAGE(D2X(C2D(JSCB)+261),3) /* JSCBJCTA IN JSCB */
THIS_STEP_NO = X2D(C2X(STORAGE(D2X(C2D(JSCB)+228),1)))
/* THIS STEP NO. */
FSCT = STORAGE(D2X(C2D(JCT)+48),3) /* JCTSDKAD IN JCT */
/* IS FIRST SCT */
TEMP_SCT = FSCT
DO I = 1 TO (THIS_STEP_NO - 1)
  STEP = STORAGE(D2X(C2D(TEMP_SCT)+68),8)
  RCSTEP = X2D(C2X(STORAGE(D2X(C2D(TEMP_SCT)+24),2)))
  /* SCTSEXEC IN SCT */
  BYPASS = STORAGE(D2X(C2D(TEMP_SCT)+188),1)
  IF X2D(C2X(BYPASS)) = 80 THEN /* CHECK IF STEP WAS NOT EXECUTED */
    DO
      RCSTEP = 'FLUSHED '
    END
  SAY 'STEP ==>' STEP ' RC ==>' RCSTEP
  TEMP_SCT = STORAGE(D2X(C2D(TEMP_SCT)+36),3)
END
EXIT

2013年6月3日 星期一

How many MIPS does your MVS machine deliver ?

/* REXX */
 CVT  = STORAGE(10,4)
 RMCT = STORAGE(D2X(C2D(CVT)+604),4)
 SU   = STORAGE(D2X(C2D(RMCT)+64),4)
 SU   = 16000000/C2D(SU)
 SAY  'SU/SEC FACTOR IS' SU ,
 '(1 CPU SECOND EQUALS' SU 'SERVICE UNITS)'
 CVTPCCAT = STORAGE(D2X(C2D(CVT)+764),4)
 SAY 'PCCA VECTOR TABLE AT' C2X(CVTPCCAT)
 I = 0
 P = 0
 SAY '----------------------------------------'
 SAY ' PROC   VERSION  CPUID   MODEL    PCCA  '
 SAY 'NUMBER    CODE                   ADDRESS'
 SAY '----------------------------------------'
 DO WHILE I < 16
 PCCA   = STORAGE(D2X(C2D(CVTPCCAT)+I*4),4)
 IF PCCA  ^= '00000000'X THEN DO
    PCCAPCCA = STORAGE(D2X(C2D(PCCA)),4)
    PCCAVC   = STORAGE(D2X(C2D(PCCA)+4),2)
    PCCACPID = STORAGE(D2X(C2D(PCCA)+6),6)
    PCCAMDL  = STORAGE(D2X(C2D(PCCA)+12),4)
    IF PCCAPCCA = 'PCCA' THEN DO
       SAY ' ' I '     ' PCCAVC '   ' PCCACPID ,
           ' '!!PCCAMDL ' ' C2X(PCCA)
       P = P + 1
       END
    END
 I = I + 1
 END
 IF P > 1 THEN PROCS = 'PROCESSORS'
          ELSE PROCS = 'PROCESSOR'
 SAY
 SAY P PROCS 'IN THIS COMPLEX'
 MIPS = SU/48.5
 SAY
 SAY '** TOTAL MIPS                   :' MIPS*P
 IF P > 1 THEN SAY ,
  '** EQUIVALENT UNIPROCESSOR MIPS :' MIPS
/*                                           */
/*  MSU EVALUATION                           */
/*                                           */
MSU = SU*P*3600/1000000
SAY FORMAT(MSU,,0) 'MSU (FOR PSLC PRICING -'

Getting info about your MVS environment

/* rexx */ 
say "user :" userid(); 
say "mvs :" mvsvar('sysmvs'); 
say "sysname :" mvsvar('sysname'); 
say "opsys :" mvsvar('sysopsys'); 
say "sysplex :" mvsvar('sysplex'); 
say "sysclone :" mvsvar('sysclone'); 
say "DfpLevel :" mvsvar('sysdfp'); 
say "SMFid :" mvsvar('syssmfid'); 
say "SMS is? :" mvsvar('syssms'); 
cvt=c2d(storage(10,4)); 
csd=c2d(storage(d2x(cvt+660),4)); 
hid=c2d(storage(d2x(cvt+x2d(42c)),4)); 
pccavt=c2d(storage(d2x(cvt+764),4)); 
do cpu=0 to 15; 
pcc=c2d(storage(d2x(pccavt+(cpu*4)),4)); 
if pcc=0 then leave; 
serial=storage(d2x(pcc+4),8); 
cpuid=storage(d2x(pcc+12),4) 
say "cpu :" right(cpu,2,'0') " id: " cpuid " serial: " serial 
end 
ecvt=c2d(storage(d2x(cvt+140),4)) 
say "CBID :" storage(d2x(ecvt+000),4) 
say "HD-name :" storage(d2x(ecvt+336),8) 
say "LPAR name :" storage(d2x(ecvt+344),8) 
say "LPAR# :" c2d(storage(d2x(csd+252),1)) 
say "VMNM :" storage(d2x(ecvt+352),8) 
say "TYPE :" storage(d2x(hid+26),6) 
say "MODEL :" storage(d2x(hid+32),3) 
say "FACTURE BY :" storage(d2x(hid+35),3) 
say "PLANT :" storage(d2x(hid+38),2) 
say "SEQNO :" storage(d2x(hid+40),12) 

2013年5月25日 星期六

Show installation CVT VERID

/* REXX - Show installation CVT VERID */
CVT    = STORAGE(10,4)                       /* Locate CVT */
DCVT   = C2D(CVT)                            
CVTPFX = DCVT - X2D(100)                     /* Locate CVTFIX*/
SPREL  = STORAGE(C2X(D2C(CVTPFX+X2D(D8))),8) /* MVS SP release*/
VERID  = STORAGE(C2X(D2C(CVTPFX+X2D(E8))),16) /* Get VERID */
say "MVS "strip(sprel)" is at "substr(verid,1,8)
say "SYSRES was copied on "substr(verid,9,16)

2013年5月6日 星期一

Get system CPU information via control block

/*   location 10x --> CVT
/*        CVT+C4x  -->  SMCA
/*            SMCA+16 contains the SMF id
/*        CVT+294x -->  CSD
/*            CSD+4, +8 and + 10 contain
/*              some interesting cpu counts
/*        CVT+2FCx -->  PCCAVT
/*            PCCAVT+0   -->  PCCA for CPU 0
/*            PCCAVT+4   -->  PCCA for CPU 1
/*            ... etc.
/*            PCCAVT+60  -->  PCCA for CPU 15
/*            PCCA+4   contains the cpu id, serial#, type
/*            PCCA+24    -->  virtual PSA
/*            PCCA+28    -->  real PSA

example:
   SMF id= H901
   nr cpus currently alive: 5
   5 available for jobs
   5 available for srbs
   2 currently alive

   -----CPU--------------  PSA       PSA
   #  ver id serial  type  vaddr     raddr     status:
   00  52  0 12495   3090  8000F6F0  00157240  jobs srbs no-alive
   01  52  1 12495   3090  7800F9F0  00134030  jobs srbs no-alive
   02  52  2 12495   3090  0000F980  0002F040  jobs srbs no-alive
   03  52  3 12495   3090  0000F960  00068040  jobs srbs no-alive
   04  52  4 12495   3090  1000F7F0  000A2040  jobs srbs no-alive
   05  a:  9 &             00070C30  0080007B  no-srbs srbs no-alive

2013年5月5日 星期日

The Hidden Cost of TCP/IP

The z/OS system resource hidden cost of TCP/IP refer to link.

2013年4月5日 星期五

Control Blocks - from MVS data areas

/* ----------------------------------------------------------------- */
/* Generated: 20040928 09:13:42                                      */
/* ----------------------------------------------------------------- */
/* Book     :   IEA2D120   GA22-7581-02                              */
/* Title    :  z/OS: MVS Data Areas, Volume 1 (ABEP - DAIT)          */
/* Copyright:    Copyright IBM Corp. 1988, 2002                      */
/* ----------------------------------------------------------------- */
/* Area     Macro    FILE     Chapter                                */
/* -------- -------- -------- -------------------------------------- */
/* ABEP     IHAABEPL IEA2D120 2.1.1                                  */
/*          ABDUMP Exit Parameter List                               */
/* ACA      ILRACA   IEA2D120 3.1                                    */
/*          Auxiliary Storage Management Control Area                */
/* ACE      ILRACE   IEA2D120 4.1                                    */
/*          Auxiliary Storage Management Control Elemen              */
/* ADB      IEFZB4H1 IEA2D120 5.1                                    */
/*          Allocation Descriptor Block (ADB)                        */
/* ADSR     ADSR     IEA2D120 6.1.1                                  */
/*          Symptom Record                                           */
/* ADYENF   ADYENF   IEA2D120 7.1.1                                  */
/*          DAE ENF Parameter List                                   */
/* ADYEVENT ADYEVENT IEA2D120 8.1                                    */
/*          DAE Event List Mapping                                   */
/* AE       IHAAE    IEA2D120 9.1                                    */
/*          VSM Allocated Element                                    */
/* AIA      ILRAIA   IEA2D120 10.1                                   */
/*          Auxiliary Storage Management I/O Request Area            */
/* AMDDATA  AMDDATA  IEA2D120 11.1                                   */
/*          Dump Records Mapping                                     */
/* AQAT     IHAAQAT  IEA2D120 12.1                                   */
/*          VSM Address Queue Anchor Table                           */
/* AQST     IGVAQST  IEA2D120 13.1                                   */
/*          Address Queue anchor table Stack                         */
/* ASASYMBP ASASYMBP IEA2D120 14.1.1                                 */
/*          ASASYMBM parameter area and symbol table                 */
/* ASBEXSCH ASBEXSCH IEA2D120 15.1                                   */
/*          APPC Extract Scheduler Information Control Block         */
/* ASCB     IHAASCB  IEA2D120 16.1.1                                 */
/*          ADDRESS SPACE CONTROL BLOCK                              */
/* ASEO     IHAASEO  IEA2D120 17.1.1                                 */
/*          ASCRE Create Output data area                            */
/* ASMHD    ILRASMHD IEA2D120 18.1                                   */
/*          Auxiliary Storage Management Header                      */
/* ASMVT    ILRASMVT IEA2D120 19.1                                   */
/*          ASM Vector Table                                         */
/* ASPCT    ILRASPCT IEA2D120 20.1                                   */
/*          ASM Page Correspondence Table                            */
/* ASREPL   ASREPL   IEA2D120 21.1                                   */
/*          Authorization Exit Parameter List                        */
/* ASSB     IHAASSB  IEA2D120 22.1.1                                 */
/*          Address Space Secondary Block                            */
/* ASTE     IHAASTE  IEA2D120 23.1                                   */
/*          ADDRESS SPACE SECOND TABLE ENTRY (ASTE)                  */
/* ASVT     IHAASVT  IEA2D120 24.1                                   */
/*          ADDRESS SPACE VECTOR TABLE                               */
/* ASWA     IEFZB453 IEA2D120 25.1                                   */
/*          Allocation STAE Work Area                                */
/* ASXB     IHAASXB  IEA2D120 26.1.1                                 */
/*          Address Space Extension Block                            */
/* ATA      ILRATA   IEA2D120 27.1                                   */
/*          ASM Tracking Area                                        */
/* ATBAPPCA ATBAPPCA IEA2D120 28.1.1                                 */
/*          APPC Component Control Block                             */
/* ATBASASM ATBASASM IEA2D120 29.1.1                                 */
/*          Interface Declaration File for APPC/MVS Version          */
/* ATBCSASM ATBCSASM IEA2D120 30.1.1                                 */
/*          Interface Declaration File for APPC/MVS Callable         */
/* ATBCTASM ATBCTASM IEA2D120 31.1.1                                 */
/*          Interface Declaration File for Callable Transaction      */
/* ATBDFTP  ATBDFTP  IEA2D120 32.1.1                                 */
/*          APPC SDFM Transaction Profile (TP) Key Mapping Macro     */
/* ATBDFTPE ATBDFTPE IEA2D120 33.1                                   */
/*          APPC SDFM TP Profile Conversion Exit                     */
/* ATBEXCON ATBEXCON IEA2D120 34.1                                   */
/*          APPC Extract Conversation Information Control Block      */
/* ATBEXCOS ATBEXCOS IEA2D120 35.1.1                                 */
/*          APPC Extract Specific Conversation Information           */
/* ATBSECB  ATBSECB  IEA2D120 36.1                                   */
/*          APPC Scheduler Extract Control Block                     */
/* ATBSERV  ATBSERV  IEA2D120 37.1                                   */
/*          Interface Declaration File for LU 6.2 Protocol           */
/* ATBXCFMS ATBXCFMS IEA2D120 38.1.1                                 */
/*          APPC/XCF Message mappings                                */
/* ATRFZQRY ATRFZQRY IEA2D120 39.1.1                                 */
/*          RRS ATRQUERY Mappings and Constants                      */
/* ATRFZSRV ATRFZSRV IEA2D120 40.1.1                                 */
/*          RRS ATRSRV Constants                                     */
/* ATRRASM  ATRRASM  IEA2D120 41.1.1                                 */
/*          RRS Assembler Declares                                   */
/* ATRSASM  ATRSASM  IEA2D120 42.1.1                                 */
/*          RRS Assembler Declares for SRR services                  */
/* ATRSZAUR ATRSZAUR IEA2D120 43.1.1                                 */
/*          RRS Archive Log Block                                    */
/* ATRSZPUR ATRSZPUR IEA2D120 44.1.1                                 */
/*          RRS UR/Restart Log Block                                 */
/* ATRTZRMD ATRTZRMD IEA2D120 45.1.1                                 */
/*          RRS RM Data Log Block                                    */
/* ATTCH    IEZATTCH IEA2D120 46.1                                   */
/*          ATTACH Parameter List DSECT                              */
/* AXAT     IHAAXAT  IEA2D120 47.1                                   */
/*          Authorization Index Allocation Table                     */
/* BASEA    IEEBASEA IEA2D120 48.1                                   */
/*          MASTER SCHEDULER RESIDENT DATA AREA                      */
/* BEB      IECDBEB  IEA2D120 49.1                                   */
/*          TCCW Beginning-End Block                                 */
/* BLSABDPL BLSABDPL IEA2D120 50.1.1                                 */
/*          ABDUMP Parameter List for Formatters                     */
/* BLSACBSP BLSACBSP IEA2D120 51.1.1                                 */
/*          Control Block Status (CBSTAT) service parameter list     */
/* BLSADSY  BLSADSY  IEA2D120 52.1                                   */
/*          Add symptom service parameter list                       */
/* BLSAPCQE BLSAPCQE IEA2D120 53.1                                   */
/*          Contention Queue Element (CQE) create service            */
/* BLSQFXL  BLSQFXL  IEA2D120 54.1                                   */
/*          Format Exit List                                         */
/* BLSQNTKP BLSQNTKP IEA2D120 55.1                                   */
/*          Name/Token Service Parameter List                        */
/* BLSRDATC BLSRDATC IEA2D120 56.1.1                                 */
/*          IPCS attributes                                          */
/* BLSRDATS BLSRDATS IEA2D120 57.1.1                                 */
/*          IPCS address space descriptor                            */
/* BLSRDATT BLSRDATT IEA2D120 58.1.1                                 */
/*          IPCS data tupe                                           */
/* BLSRDATC BLSRDATC IEA2D120 59.1.1                                 */
/*          IPCS attributes                                          */
/* BLSRDRPX BLSRDRPX IEA2D120 60.1.1                                 */
/*          Unformatted dump record prefix                           */
/* BLSRDRPX BLSRDRPX IEA2D120 61.1.1                                 */
/*          Unformatted dump record prefix                           */
/* BLSRESSY BLSRESSY IEA2D120 62.1.1                                 */
/*          IPCS Symbol Table Record                                 */
/* BLSRESSY BLSRESSY IEA2D120 63.1.1                                 */
/*          IPCS Symbol Table Record                                 */
/* BLSRNAMP BLSRNAMP IEA2D120 64.1.1                                 */
/*          IPCS NAME service parameter list                         */
/* BLSRPRD  BLSRPRD  IEA2D120 65.1.1                                 */
/*          Unformatted dump record prefix                           */
/* BLSRPWHS BLSRPWHS IEA2D120 66.1.1                                 */
/*          IPCS Symbol Table Record                                 */
/* BLSRPWHS BLSRPWHS IEA2D120 67.1.1                                 */
/*          IPCS Symbol Table Record                                 */
/* BLSRSASY BLSRSASY IEA2D120 68.1.1                                 */
/*          IPCS Storage Address Record                              */
/* BLSRSA64 BLSRSASY IEA2D120 69.1.1                                 */
/*          IPCS Storage Address Record                              */
/* BLSRXMSP BLSRSMSP IEA2D120 70.1.1                                 */
/*          IPCS storage map service parameter list                  */
/* BLSRXSSP BLSRXSSP IEA2D120 71.1.1                                 */
/*          Symbol service parameter list                            */
/* BLSUPPR2 BLSUPPR2 IEA2D120 72.1.1                                 */
/*          Expanded Print Parameter List                            */
/* BPXYOSMF BPXYOSMF IEA2D120 73.1.1                                 */
/*          OpenMVS SMF Job/Step Accounting data mapping             */
/* BPXYTCPP BPXYTCPP IEA2D120 74.1.1                                 */
/*          TCP Parameter list                                       */
/* BPXYTCPX BPXYTCPX IEA2D120 75.1.1                                 */
/*          TCP Initialization Parameter list                        */
/* BPXZODMV BPXZODMV IEA2D120 76.1.1                                 */
/*          OpenMVS Display Command Interface                        */
/* CACHE    ILRCACHE IEA2D120 77.1                                   */
/*          CACHE Array                                              */
/* CAFM     IEFZB428 IEA2D120 78.1                                   */
/*          Common Allocation Function Map                           */
/* CBDZCIP  CBDZCIP  IEA2D120 79.1.1                                 */
/*          Control Unit Information Parameters (CIP)                */
/* CBDZDCP  CBDZDCP  IEA2D120 80.1.1                                 */
/*          Device Characteristics Parameters                        */
/* CBDZDEVL CBDZDEVL IEA2D120 81.1.1                                 */
/*          Device Information Look-up Parameter List                */
/* CBDZDFP  CBDZDFP  IEA2D120 82.1.1                                 */
/*          Device Features Parameters                               */
/* CBDZGETM CBDZGETM IEA2D120 83.1.1                                 */
/*          HCD Getmain Storage Routine Parameter List               */
/* CBDZGIP  CBDZGIP  IEA2D120 84.1.1                                 */
/*          Generic Information Parameters (GIP)                     */
/* CBDZHCEX CBDZHCEX IEA2D120 85.1.1                                 */
/*          HCD object management (HOM) constants.                   */
/* CBDZHIEX CBDZHIEX IEA2D120 86.1.1                                 */
/*          HCD object management (HOM) object interface records     */
/* CBDZHOEX CBDZHOEX IEA2D120 87.1.1                                 */
/*          HCD object management (HOM) object records               */
/* CBDZHRB  CBDZHRB  IEA2D120 88.1.1                                 */
/*          HCD object management (HOM) request block.               */
/* CBDZIODV CBDZIODV IEA2D120 89.1.1                                 */
/*          IODEVICE Internal Text Record Mapping Macro              */
/* CBDZITRH CBDZITRH IEA2D120 90.1.1                                 */
/*          Internal Text Record Header Mapping Macro                */
/* CBDZMSG  CBDZMSG  IEA2D120 91.1.1                                 */
/*          HCD Message Routine Parameter List                       */
/* CBDZSIP  CBDZSIP  IEA2D120 92.1.1                                 */
/*          Switch Information Parameters (SIP)                      */
/* CBDZUCA  CBDZUCA  IEA2D120 93.1.1                                 */
/*          UIM Communication Area                                   */
/* CBDZUIP  CBDZUIP  IEA2D120 94.1.1                                 */
/*          Unit Information Parameters                              */
/* CBLS     IHACBLS  IEA2D120 95.1                                   */
/*          Supervisor Control Block Length Table                    */
/* CDE      IHACDE   IEA2D120 96.1.1                                 */
/*          Contents Directory Entry                                 */
/* CESRB    IHACESRB IEA2D120 97.1                                   */
/*          CONFIGURE EXTENDED STORAGE REQUEST BLOCK                 */
/* CIB      IEZCIB   IEA2D120 98.1.1                                 */
/*          COMMAND INPUT BUFFER MAPPING MACRO                       */
/* CISP     IEEZB832 IEA2D120 99.1                                   */
/*          Console Inactive Signal Parameter List                   */
/* CLTE     IHACLTE  IEA2D120 100.1                                  */
/*          CURRENT LOCKS HELD TABLE EXTENSION                       */
/* CMB      IRACMB   IEA2D120 101.1                                  */
/*          CHANNEL MEASUREMENT BLOCK                                */
/* CMCT     IRACMCT  IEA2D120 102.1.1                                */
/*          Channel Measurement Control Table                        */
/* CMDX     IEZVX101 IEA2D120 103.1.1                                */
/*          COMMAND INSTALLATION EXIT ROUTINE PARAMETER LIST         */
/* CNMB     IEFCNMB  IEA2D120 104.1.1                                */
/*          Converter Message Buffer Mapping                         */
/* COM      IEZCOM   IEA2D120 105.1.1                                */
/*          Communications Parameter List                            */
/* CONV     IEZVG200 IEA2D120 106.1.1                                */
/*          CONV PARAMETER LIST                                      */
/* CPAB     IHACPAB  IEA2D120 107.1                                  */
/*          Cell Pool Anchor Block                                   */
/* CPMT     IRACPMT  IEA2D120 108.1                                  */
/*          CHANNEL PATH MEASUREMENT TABLE                           */
/* CQE      IEZVD001 IEA2D120 109.1                                  */
/*          Console Queue Element                                    */
/* CRGASM   CRGASM   IEA2D120 110.1.1                                */
/*          Registration Services ASM Declares                       */
/* CRW      IHACRW   IEA2D120 111.1                                  */
/*          CRW - Channel Report Word                                */
/* CRWQ     IOSDCRWQ IEA2D120 112.1                                  */
/*          Channel Recovery Word Queuing Element                    */
/* CSCB     IEECHAIN IEA2D120 113.1                                  */
/*          COMMAND SCHEDULING CONTROL BLOCK                         */
/* CSD      IHACSD.  IEA2D120 114.1.1                                */
/*          COMMON SYSTEM DATA AREA (CSD).                           */
/* CSRBPASM CSRBPASM IEA2D120 115.1.1                                */
/*          Block Paging Service Assembler Declares                  */
/* CSRCPASM CSRCPASM IEA2D120 116.1.1                                */
/*          Bit Mapped Cell Pool Service Assembler Declares          */
/* CSRC4ASM CSRC4ASM IEA2D120 117.1.1                                */
/*          Bit Mapped Cell Pool Service Assembler Declares          */
/* CSRLJASM CSRLJASM IEA2D120 118.1.1                                */
/*          Load 16 and Jump Assembler Declares                      */
/* CSRSIIDF CSRSIIDF IEA2D120 119.1.1                                */
/*          CSRSI IDF (return codes and output area maps)            */
/* CSRYCMPD CSRYCMPD IEA2D120 120.1.1                                */
/*          Compression/Expansion dictionary mappings                */
/* CSRYCMPS CSRYCMPS IEA2D120 121.1.1                                */
/*          Compression parameter block                              */
/* CSRYL16J CSRYL16J IEA2D120 122.1.1                                */
/*          Load 16 and Jump Area                                    */
/* CSRYUNIC CSRYUNIC IEA2D120 123.1.1                                */
/*          Unicode Services parameter blocks                        */
/* CSVAPFAA CSVAPFAA IEA2D120 124.1.1                                */
/*          APF List Answer Area                                     */
/* CSVDLAA  CSVDLAA  IEA2D120 125.1.1                                */
/*          Dynamic Lnklst Answer Area                               */
/* CSVDLCB  CSVDLCB  IEA2D120 126.1.1                                */
/*          Dynamic LNKLST Control Block                             */
/* CSVDLENF CSVDLENF IEA2D120 127.1.1                                */
/*          Dynamic Lnklst ENF mapping (event code 52)               */
/* CSVEXAA  CSVEXAA  IEA2D120 128.1.1                                */
/*          Exit Answer Area                                         */
/* CSVEXRET CSVEXRET IEA2D120 129.1.1                                */
/*          Exit Return information area                             */
/* CSVEXTI  CSVEXTI  IEA2D120 130.1.1                                */
/*          LOAD EXTInfo parameter mapping                           */
/* CSVLPRET CSVLPRET IEA2D120 131.1.1                                */
/*          Dynamic LPA Return Information                           */
/* CSVMODI  CSVMODI  IEA2D120 132.1.1                                */
/*          Contents module information                              */
/* CSVRTAA  CSVRTAA  IEA2D120 133.1.1                                */
/*          RTLS Answer Area                                         */
/* CSVTTEST CSVTTEST IEA2D120 134.1                                  */
/*          Contents Supervisor TSO Test Interface                   */
/* CTSS     ITTCTSS  IEA2D120 135.1.1                                */
/*          Component Trace Start/Stop Parmlist                      */
/* CTXASM   CTXASM   IEA2D120 136.1.1                                */
/*          Context Services ASM Declares                            */
/* CTXI     ITTCTXI  IEA2D120 137.1.1                                */
/*          CTRACE Exit Interface                                    */
/* CTXT     IEZVX100 IEA2D120 138.1.1                                */
/*          COMMUNICATIONS TASK INSTALLATION EXIT ROUTINE            */
/* CVT      CVT      IEA2D120 139.1.1                                */
/*          Communications Vector Table                              */
/* CXSA     IEZVD002 IEA2D120 140.1                                  */
/*          SVC 72 Extended Save Area                                */
/* CXT      COFZCXIT IEA2D120 141.1.1                                */
/*          Parameter list for DLF installation exit                 */
/* DAIT     IEFZB4H3 IEA2D120 142.1                                  */
/*          Display Allocation Index Table (DAIT)                    */
/* ----------------------------------------------------------------- */
/* Generated: 20040928 09:13:52                                      */
/* ----------------------------------------------------------------- */
/* Book     :   IEA2D220   GA22-7582-02                              */
/* Title    :  z/OS: MVS Data Areas, Volume 2 (DCCB - ITZYRETC)      */
/* Copyright:    Copyright IBM Corp. 1988, 2002                      */
/* ----------------------------------------------------------------- */
/* Area     Macro    FILE     Chapter                                */
/* -------- -------- -------- -------------------------------------- */
/* DCCB     N/A      IEA2D220 2.1                                    */
/*          N/A                                                      */
/* DCCD     IOSDDCCD IEA2D220 3.1.1                                  */
/*          Dynamic Configuration Change Data                        */
/* DCM      IEETDCM  IEA2D220 4.1                                    */
/*          PAGEABLE DISPLAY CONTROL MODULE MAPPING MACRO            */
/* DCQ      IHADCQ   IEA2D220 5.1                                    */
/*          Device Class Queue                                       */
/* DDRCOM   IHADDR   IEA2D220 6.1                                    */
/*          IOS Dynamic Device Reconfiguration Communication         */
/* DDT      IECDDT   IEA2D220 7.1                                    */
/*          IECDDT Device Descriptor Table Mapping                   */
/* DEIB     ILRDEIB  IEA2D220 8.1                                    */
/*          Data Set Extent Informarion Block                        */
/* DFE      IHADFE   IEA2D220 9.1                                    */
/*          VSM Double Free Element                                  */
/* DFLM     ADYDFLM  IEA2D220 10.1                                   */
/*          DAE OPTIONS                                              */
/* DMDT     IRADMDT  IEA2D220 11.1                                   */
/*          Domain Table Description                                 */
/* DOCNP    IEFDOCNP IEA2D220 12.1.1                                 */
/*          Dynamic Output Installation Exit Parameter List          */
/* DOMC     IHADOMC  IEA2D220 13.1.1                                 */
/*          DELETE-OPERATOR-MESSAGE CONTROL BLOCK                    */
/* DOMPL    IEZVM112 IEA2D220 14.1                                   */
/*          DOM Parameter List                                       */
/* DQE      IHADQE   IEA2D220 15.1                                   */
/*          VSM Descriptor Queue Element                             */
/* DSAB     IHADSAB  IEA2D220 16.1.1                                 */
/*          DATA SET ASSOCIATION BLOCK                               */
/* DSABQDB  IEFZB4D5 IEA2D220 17.1                                   */
/*          DSAB Queue Descriptor Block (QDB)                        */
/* DSCA     ADYDSCA  IEA2D220 18.1                                   */
/*          DAE Communication Area                                   */
/* DSD      IHADSD   IEA2D220 19.1.1                                 */
/*          DISPATCHABILITY SERVICE DATA AREA                        */
/* DSERV    IAZDSERV IEA2D220 20.1.1                                 */
/*          JES Job Information Service Token List                   */
/* DSNT     IEFDSNT  IEA2D220 21.1                                   */
/*          Data Set Name Table                                      */
/* DSPD     ADYDSPD  IEA2D220 22.1                                   */
/*          DAE PREDUMP/POSTDUMP PARAMETER LIST                      */
/* DSTAT    ADYDSTAT IEA2D220 23.1.1                                 */
/*          DAE Action Status                                        */
/* DSVCB    IHADSVCB IEA2D220 24.1                                   */
/*          DUMPING SERVICES CONTROL BLOCK                           */
/* EAECB    IEZEAECB IEA2D220 25.1.1                                 */
/*          System Address Space Initialization Communication ECBs   */
/* ECB      IHAECB   IEA2D220 26.1.1                                 */
/*          Event Control Block                                      */
/* ECVT     IHAECVT  IEA2D220 27.1.1                                 */
/*          Extended Communications Vector Table                     */
/* EDT      IEFZB421 IEA2D220 28.1                                   */
/*          ELIGIBLE DEVICE TABLE MAPPING MACRO                      */
/* EDUMPLST IEEMMSAI IEA2D220 29.1                                   */
/*          Vary Storage Physical Dump List                          */
/* EED      IHART1W  IEA2D220 30.1                                   */
/*          RTM1 Work Area                                           */
/* EMPARMS  IEFZB476 IEA2D220 31.1.1                                 */
/*          Dynamic Allocation Error Message Processor Parameter     */
/* ENFCT    IEFENFCT IEA2D220 32.1.1                                 */
/*          Event Notification Facility Control Table                */
/* ENFDS    IEFENFDS IEA2D220 33.1                                   */
/*          Event Notification Process Table                         */
/* ENFLS    IEFENFLS IEA2D220 34.1                                   */
/*          Event Notification Facility Listener Element             */
/* ENFPM    IEFENFPM IEA2D220 35.1.1                                 */
/*          Event Notification Facility Parameter List               */
/* ENFVT    IEFENFVT IEA2D220 36.1                                   */
/*          Event Notification Facility Vector Table                 */
/* ENV      IGFENV   IEA2D220 37.1                                   */
/*          Machine Check Handler Environment Data Area              */
/* EPAL     N/A      IEA2D220 38.1                                   */
/*          EPA MAPPING FOR LOCATE MODE SWA MANAGER                  */
/* EPAM     N/A      IEA2D220 39.1                                   */
/*          EPA MAPPING FOR MOVE MODE SWA MANAGER                    */
/* EPCB     IECDEPCB IEA2D220 40.1                                   */
/*          EXCP Purge Control Block                                 */
/* EPIE     IHAEPIE  IEA2D220 41.1.1                                 */
/*          Extended Program Interruption Element                    */
/* EQSRD    ILREQSRD IEA2D220 42.1                                   */
/*          Extended Quick Start Record for Extended PLPA            */
/* ERPMSG   IECDLMSG IEA2D220 43.1                                   */
/*          IOS/ERP I/O ERROR MESSAGE MAPPING                        */
/* ESA      RTM2ESA  IEA2D220 44.1                                   */
/*          RTM2 EXTENDED SAVE AREA                                  */
/* ESCT     IRAESCT  IEA2D220 45.1                                   */
/*          System Resource Manager Expanded Storage Criteria        */
/* ESPI     IHAESPI  IEA2D220 46.1                                   */
/*          EXTENDED SPIE PARAMETER LIST                             */
/* ESTA     IHAESTA  IEA2D220 47.1                                   */
/*          EXTENDED STAE PARAMETER LIST                             */
/* ESTE     IARESTE  IEA2D220 48.1                                   */
/*          Expanded Storage Table Entry                             */
/* ESW      IHAESW   IEA2D220 49.1                                   */
/*          ESW - Extended Status Word                               */
/* ESWL     IHAESWL  IEA2D220 50.1                                   */
/*          Extended Status Word Long.                               */
/* ETD0     IHAETD   IEA2D220 51.1.1                                 */
/*          Entry Table Description - Format 0                       */
/* ETD1     IHAETD   IEA2D220 52.1                                   */
/*          Entry Table Description - Format 1                       */
/* ETE      IHAETE   IEA2D220 53.1                                   */
/*          Entry Table Entry                                        */
/* ETIB     IHAETIB  IEA2D220 54.1                                   */
/*          Entry Table Information Block                            */
/* ETIORB   IEFZB430 IEA2D220 55.1                                   */
/*          DSAB/TIOT Entry Build Routine Request Block              */
/* EVNT     IHAEVNT  IEA2D220 56.1                                   */
/*          Event Table                                              */
/* EWA      EWAMAP   IEA2D220 57.1                                   */
/*          EWA - Error Recovery Procedure Work Area                 */
/* FBQE     IHAFBQE  IEA2D220 58.1                                   */
/*          VSM Free Block Queue Element                             */
/* FFAP     N/A      IEA2D220 59.1                                   */
/*          N/A                                                      */
/* FIB      IGVFIB   IEA2D220 60.1                                   */
/*          VSM Format Information Block                             */
/* FIX      IECDFIX  IEA2D220 61.1                                   */
/*          TCCW Translator Fix List                                 */
/* FMLE     IHAFMLE  IEA2D220 62.1                                   */
/*          FASTID Map List Entry                                    */
/* FMTB     ITTFMTB  IEA2D220 63.1                                   */
/*          Component Trace format table                             */
/* FQE      IHAFQE   IEA2D220 64.1                                   */
/*          VSM Free Queue Element                                   */
/* FRRS     IHAFRRS  IEA2D220 65.1.1                                 */
/*          FUNCTION RECOVERY ROUTINE STACK                          */
/* FSIP     IAZFSIP  IEA2D220 66.1.1                                 */
/*          Common Fixed Length Parameter List                       */
/* FTPT     IEZVR001 IEA2D220 67.1                                   */
/*          Parm list for FRR/ESTAE (Comm Task)                      */
/* FUNCFLGS IEFZB4UV IEA2D220 68.1.1                                 */
/*          Parameter Mappings for IEFAB4UV and IEFEB4UV             */
/* GDA      IHAGDA   IEA2D220 69.1.1                                 */
/*          Global Data Area Block                                   */
/* GRPL     IGVGRPL  IEA2D220 70.1                                   */
/*          VSM Getregion Parameter List                             */
/* GSDA     IHAGSDA  IEA2D220 71.1                                   */
/*          Global System Duplex Area                                */
/* GTD      AHLZGTD. IEA2D220 72.1                                   */
/*          GTF DATA IN TRACE DATA SET RECORDS.                      */
/* GTO      AHLZGTO. IEA2D220 73.1                                   */
/*          GTF TRACE OPTIONS MAPPING.                               */
/* GTS      AHLZGTS. IEA2D220 74.1.1                                 */
/*          GENERALIZED TRACE DATA SOURCE DESCRIPTOR.                */
/* GTW      AHLZGTW. IEA2D220 75.1                                   */
/*          GENERALIZED TRACE WRITER DATA.                           */
/* GVT      ISGGVT   IEA2D220 76.1.1                                 */
/*          GLOBAL RESOURCE SERIALIZATION (GRS) VECTOR TABLE         */
/* GVTX     ISGGVTX  IEA2D220 77.1                                   */
/*          GRS VECTOR TABLE EXTENSION                               */
/* GWT      IHAGWT   IEA2D220 78.1                                   */
/*          VSM Get Region Work Table                                */
/* HCL      IHAHCLOG IEA2D220 79.1.1                                 */
/*          HARDCOPY LOG FORMAT (HCL OR HCR)                         */
/* HIDT     IOSDHIDT IEA2D220 80.1                                   */
/*          HOT I/O Detection Table                                  */
/* HMAA     COFZHMAA IEA2D220 81.1.1                                 */
/*          Hiperbatch Monitor Answer Area                           */
/* HMPL     COFZHMPL IEA2D220 82.1                                   */
/*          Hiperbatch Monitor Parameter List                        */
/* IARDRL   IARDRL   IEA2D220 83.1.1                                 */
/*          DSPSERV Range List Entry                                 */
/* IARVRL   IARVRL   IEA2D220 84.1.1                                 */
/*          IARVSERV Virtual Range List Entry                        */
/* IAXCNTPL IAXCNTPL IEA2D220 85.1                                   */
/*          RSM Frame Count Service Parameter List                   */
/* IAXPFTE  IAXPFTE  IEA2D220 86.1                                   */
/*          PAGE FRAME TABLE ENTRY                                   */
/* IAXV64WA IAXV64WA IEA2D220 87.1.1                                 */
/*          IARV64 REQUEST=LIST work area                            */
/* IAZBTOKP IAZBTOKP IEA2D220 88.1.1                                 */
/*          JES spool data set browse token (common mapping)         */
/* IAZCHK   IAZCHK   IEA2D220 89.1.1                                 */
/*          JES FSI checkpoint record area                           */
/* IAZCTKN  IAZCTKN  IEA2D220 90.1.1                                 */
/*          Allocation Client Token                                  */
/* IAZCVDEV IAZCVDEV IEA2D220 91.1.1                                 */
/*          JES2 Parameter List for Device Name                      */
/* IAZENF58 IAZENF58 IEA2D220 92.1.1                                 */
/*          ENF58 Parameter List                                     */
/* IAZJBCLD IAZJBCLD IEA2D220 93.1.1                                 */
/*          JES2 Job Class Data Parameter List                       */
/* IAZSPLIO IAZSPLIO IEA2D220 94.1.1                                 */
/*          JES2 Spool Input/Output Parameter List                   */
/* ICHPT    IHAICHPT IEA2D220 95.1                                   */
/*          Installation Channel Path Table                          */
/* ICHS     IOSDICHS IEA2D220 96.1                                   */
/*          IOS Channel Subsystem Information                        */
/* ICSC     IRAICSC  IEA2D220 97.1                                   */
/*          System Resource Manager Installation Control             */
/* ICT      IRAICT   IEA2D220 98.1                                   */
/*          System Resource Manager I/O Management Control Table     */
/* IDAL     IECDIDAL IEA2D220 99.1                                   */
/*          TCCW Translator Indirect Address List                    */
/* IDX      IAZIDX   IEA2D220 100.1.1                                */
/*          Index Table                                              */
/* IEAASM   IEAASM   IEA2D220 101.1.1                                */
/*          Supervisor Callable Services Asm Declarations            */
/* IEAMSYMP IEAMSYMP IEA2D220 102.1.1                                */
/*          Static Symbol Service Parameter List                     */
/* IEANTASM IEANTASM IEA2D220 103.1.1                                */
/*          Name/Token Service Assembler Declares                    */
/* IECDPIRL IECDPIRL IEA2D220 104.1.1                                */
/*          Purge I/O Restore List                                   */
/* IECDPPL  IECDPPL  IEA2D220 105.1.1                                */
/*          Purge Parameter List                                     */
/* IECDRQEX IECDRQEX IEA2D220 106.1                                  */
/*          RQEX - EXCP Request Queue Element Extension              */
/* IEDB     IOSDIEDB IEA2D220 107.1.1                                */
/*          I/O Error Data Block                                     */
/* IEESMCX  IEESMCX  IEA2D220 108.1                                  */
/*          SMF CONTROL TABLE EXTENSION                              */
/* IEEZB833 IEEZB833 IEA2D220 109.1.1                                */
/*          VARY Device Service Input                                */
/* IEEZB834 IEEZB834 IEA2D220 110.1.1                                */
/*          VARY Device Service Results                              */
/* IEEZB887 IEEZB887 IEA2D220 111.1.1                                */
/*          EMCS Console Display Mapping                             */
/* IEEZB888 IEEZB888 IEA2D220 112.1.1                                */
/*          IEEQEMCS Return and Reason Codes                         */
/* IEEZB889 IEEZB889 IEA2D220 113.1.1                                */
/*          IEECMDS Buffer Mapping                                   */
/* IEFCITUX IEFCITUX IEA2D220 114.1                                  */
/*          Converter/Interpreter User Exit Trace Record Mapping     */
/* IEFCNPRM IEFCNPRM IEA2D220 115.1                                  */
/*          Converter Parameter List                                 */
/* IEFDELT  IEFDELT  IEA2D220 116.1.1                                */
/*          Eligible Device Table (EDT) Latch Table                  */
/* IEFDISMP IEFDISMP IEA2D220 117.1.1                                */
/*          DD Service Output Mapping                                */
/* IEFDISRC IEFDISRC IEA2D220 118.1.1                                */
/*          DD Service Return and Reason Codes                       */
/* IEFDOKEY IEFDOKEY IEA2D220 119.1.1                                */
/*          Dynamic OUTPUT Key Mapping                               */
/* IEFDORC  IEFDORC  IEA2D220 120.1.1                                */
/*          Dynamic Output SVC Reason Codes                          */
/* IEFDOTUM IEFDOTUM IEA2D220 121.1.1                                */
/*          Dynamic Output Text Unit Mappings                        */
/* IEFENF40 IEFENF40 IEA2D220 122.1.1                                */
/*          Mapping macro for ENF Event Code #40 Listeners           */
/* IEFENFSC IEFENFSC IEA2D220 123.1                                  */
/*          ENF Schedule SRB Listener Control Block                  */
/* IEFENFSG IEFENFSG IEA2D220 124.1.1                                */
/*          ENF Signal Data                                          */
/* IEFENFSP IEFENFSP IEA2D220 125.1                                  */
/*          ENF Schedule SRB Parameter List                          */
/* IEFEVARY IEFEVARY IEA2D220 126.1.1                                */
/*          VARY PARAMETER LIST                                      */
/* IEFJFRQP IEFJFRQP IEA2D220 127.1.1                                */
/*          IEFJFRQ Exit Routine Parameter List                      */
/* IEFJSBVT IEFJSBVT IEA2D220 128.1                                  */
/*          Function Routine Input Table Mapping                     */
/* IEFJSQRY IEFJSQRY IEA2D220 129.1.1                                */
/*          IEFSSI QUERY Output Mapping                              */
/* IEFJSRC  IEFJSRC  IEA2D220 130.1.1                                */
/*          Dynamic SSI Return and Reason Codes                      */
/* IEFSIOTX IEFSIOTX IEA2D220 131.1                                  */
/*          STEP INPUT/OUTPUT TABLE EXTENSION                        */
/* IEFSJDKY IEFSJDKY IEA2D220 132.1.1                                */
/*          Scheduler JCL Facility (SJF) / Dynamic Allocation        */
/* IEFSJOKY IEFSJOKY IEA2D220 133.1.1                                */
/*          Scheduler JCL Facility (SJF) Output Descriptor Keys      */
/* IEFZB4D2 IEFZB4D2 IEA2D220 134.1.1                                */
/*          Dynamic Allocation Key Definition Table                  */
/* IEFZB4FJ IEFZB4FJ IEA2D220 135.1.1                                */
/*          JES3 Initialization and Setup Exit Flags                 */
/* IEFZB4F7 IEFZB4F7 IEA2D220 136.1                                  */
/*          IEFAB4FX Recovery Block                                  */
/* IEFZB468 IEFZB468 IEA2D220 137.1                                  */
/*          Mapping macro for STARTIO/EXCP ESTAE Parms               */
/* IEFZDDWA IEFZDDWA IEA2D220 138.1                                  */
/*          DD Work Area                                             */
/* IEFZPMAP IEFZPMAP IEA2D220 139.1.1                                */
/*          Mapping Macros for use with the "Logical Parmlib"        */
/* IEFZPRC  IEFZPRC  IEA2D220 140.1.1                                */
/*          Logical Parmlib Service Return and Reason Codes          */
/* IEWLCNV  IEWLCNV  IEA2D220 141.1.1                                */
/*          PMLoader DE convert services parameter area              */
/* IEWPMAR  IEWPMAR  IEA2D220 142.1.1                                */
/*          Program Management Attribute Record                      */
/* IEZEUNLD IEZEUNLD IEA2D220 143.1.1                                */
/*          UNLOAD Parameter List                                    */
/* IEZVG100 IEZVG100 IEA2D220 144.1.1                                */
/*          Subsystem Console Service Routine Parameter List         */
/* IFAEDIDF IFAEDIDF IEA2D220 145.1.1                                */
/*          IFAEDxxx IDF (return codes and output areas)             */
/* IFAENF37 IFAENF37 IEA2D220 146.1.1                                */
/*          SMF MAPPING MACRO FOR EVENT CODE 37                      */
/* IFAUCCC  IFAUCCC  IEA2D220 147.1.1                                */
/*          Usage Report Program Customer Data                       */
/* IFAUMCC  IFAUMCC  IEA2D220 148.1.1                                */
/*          Usage Report Program Processor Table                     */
/* IFAUOCC  IFAUOCC  IEA2D220 149.1.1                                */
/*          Usage Report Program Product Owner Data                  */
/* IFAUPCC  IFAUPCC  IEA2D220 150.1.1                                */
/*          Usage Report Program Product Data                        */
/* IFAUPRM  IFAUPRM  IEA2D220 151.1.1                                */
/*          Usage Report Program Vendor Exit Parm List               */
/* IFAUSID  IFAUSID  IEA2D220 152.1.1                                */
/*          System Configuration Information                         */
/* IFAUVCC  IFAUVCC  IEA2D220 153.1.1                                */
/*          Usage Report Program Vendor Data                         */
/* IFBDCBDC IFBDCBDC IEA2D220 154.1                                  */
/*          Mapping for Logrec Data CSECT in nucleus resident        */
/* IFBENF36 IFBENF36 IEA2D220 155.1.1                                */
/*          Mapping for ENF event code 36 listen exit parameter      */
/* IFBLOGLB IFBLOGLB IEA2D220 156.1                                  */
/*          Logrec - Log Stream Log Block                            */
/* IFBNTASM IFBNTASM IEA2D220 157.1.1                                */
/*          System Level DSNLOGREC Name/Token Retrieve and ENF       */
/* IGVCAUB  IGVCAUB  IEA2D220 158.1                                  */
/*          Common Area User Block                                   */
/* IGVDGNB  IGVDGNB  IEA2D220 159.1                                  */
/*          Diagnostic traps indicators                              */
/* IGVDGNX  IGVDGNX  IEA2D220 160.1                                  */
/*          Diagnostic traps extraction area                         */
/* IGVGQAT  IGVGQAT  IEA2D220 161.1                                  */
/*          GQE Queue Anchor Table                                   */
/* IGVGQE   IGVGQE   IEA2D220 162.1                                  */
/*          GETMAINed Queue Element.                                 */
/* IGVVAB   IGVVAB   IEA2D220 163.1                                  */
/*          VSM Address space Block                                  */
/* IGVVSMWK IGVVSMWK IEA2D220 164.1                                  */
/*          VSM Work Area                                            */
/* IHAARB   IHAARB   IEA2D220 165.1.1                                */
/*          Associated Request Block Mapping                         */
/* IHAASTE1 IHAASTE1 IEA2D220 166.1                                  */
/*          Address Space Second Table Entry (ASTE)                  */
/* IHACDR   IHACDR   IEA2D220 167.1.1                                */
/*          Configuration Data Record                                */
/* IHADPL   IHADPL   IEA2D220 168.1                                  */
/*          SVC DUMP PACKING LIST                                    */
/* IHADWHDR IHADWHDR IEA2D220 169.1.1                                */
/*          Dump Writing Structure Dump Header                       */
/* IHADWOBH IHADWOBH IEA2D220 170.1.1                                */
/*          Dump Writing Object Header                               */
/* IHAETE1  IHAETE1  IEA2D220 171.1                                  */
/*          Entry Table Entry for ESAME                              */
/* IHAETRI  IHAETRI  IEA2D220 172.1.1                                */
/*          ETR Status Informatiom Mapping                           */
/* IHAFETWK IHAFETWK IEA2D220 173.1                                  */
/*          Fetch work area definition                               */
/* IHAFPC   IHAFPC   IEA2D220 174.1.1                                */
/*          FLOATING POINT CONTROL REGISTER                          */
/* IHAFPRET IHAFPRET IEA2D220 175.1.1                                */
/*          IEAFP Return Information                                 */
/* IHAFSD   IHAFSD   IEA2D220 176.1.1                                */
/*          FICON Switch Data                                        */
/* IHAIPA   IHAIPA   IEA2D220 177.1.1                                */
/*          Initialization Parameter Area                            */
/* IHALCCX  IHALCCX  IEA2D220 178.1                                  */
/*          Extended Status Saving Work Area                         */
/* IHALCCXT IHALCCXT IEA2D220 179.1                                  */
/*          LCCA Extension (LCCX) Vector Table                       */
/* IHAPRD   IHAPRD   IEA2D220 180.1.1                                */
/*          Dump Header mapping for SVC Dump                         */
/* IHAPSAE  IHAPSAE  IEA2D220 181.1.1                                */
/*          PSA Extension (z/Architecture)                           */
/* IHAPSAX  IHAPSAX  IEA2D220 182.1                                  */
/*          PSA Extension (ESAME)                                    */
/* IHAPWVT  IHAPWVT  IEA2D220 183.1                                  */
/*          Processor Work Unit Queue Vector Table                   */
/* IHARBUP  IHARBUP  IEA2D220 184.1.1                                */
/*          RB updated Return Information                            */
/* IHASAVER IHASAVER IEA2D220 185.1.1                                */
/*          General Purpose Registers Save Area                      */
/* IHASDEXI IHASDEXI IEA2D220 186.1.1                                */
/*          SDUMP Exit information                                   */
/* IHASDMSE IHASDMSE IEA2D220 187.1.1                                */
/*          SDUMPX Multisystem SDUMP Exit parameter area             */
/* IHASDPD  IHASDPD  IEA2D220 188.1.1                                */
/*          SDUMPX ProbDesc area mapping                             */
/* IHASDRMT IHASDRMT IEA2D220 189.1.1                                */
/*          SDUMPX REMOTE keyword information area                   */
/* IHASDSTR IHASDSTR IEA2D220 190.1.1                                */
/*          SDUMPX STRLIST Parameter List Mappings                   */
/* IHASLMSG IHASLMSG IEA2D220 191.1                                  */
/*          WTO slip interface mapping                               */
/* IHASVTX  IHASVTX  IEA2D220 192.1                                  */
/*          Extended SVT                                             */
/* IHATDRMT IHATDRMT IEA2D220 193.1.1                                */
/*          Transaction dump REMOTE information area                 */
/* IHATDUMP IHATDUMP IEA2D220 194.1                                  */
/*          Transaction Dump parameter list                          */
/* IHAWEB   IHAWEB   IEA2D220 195.1                                  */
/*          Work Element Block                                       */
/* IHAWEE   IHAWEE   IEA2D220 196.1                                  */
/*          WEB Extent Element                                       */
/* IHLMGTRC IHLMGTRC IEA2D220 197.1.1                                */
/*          GTF Event Identifier Constants                           */
/* IHSA     IHAIHSA  IEA2D220 198.1                                  */
/*          INTERRUPT HANDLER SAVE AREA                              */
/* IIT      IOSDIIT  IEA2D220 199.1                                  */
/*          IPL Information Table                                    */
/* IKJTAIE  IKJTAIE  IEA2D220 200.1.1                                */
/*          TSO Terminal Attention Interrupt Element                 */
/* IMCB     IRAIMCB  IEA2D220 201.1                                  */
/*          SYSTEM RESOURES MANAGER USER I/O MEASUREMENT CONTROL     */
/* IMDMEDIT IMDMEDIT IEA2D220 202.1.1                                */
/*          GTF Event Identifier Constants                           */
/* INF      IHAINF   IEA2D220 203.1                                  */
/*          VSM Information Message Table                            */
/* IOBE     IOSDIOBE IEA2D220 204.1.1                                */
/*          Input/Output Block (IOB) Extension                       */
/* IOCOM    IECDIOCM IEA2D220 205.1.1                                */
/*          I/O Communication area                                   */
/* IOQ      IECDIOQ  IEA2D220 206.1                                  */
/*          IOS Queue Element                                        */
/* IORB     ILRIORB  IEA2D220 207.1                                  */
/*          Input/Output Request Block                               */
/* IOSB     IECDIOSB IEA2D220 208.1                                  */
/*          IOS (I/O Supervisor) Block                               */
/* IOSDDACH IOSDDACH IEA2D220 209.1.1                                */
/*          IOS ENF device availability change parameter list        */
/* IOSDDEVI IOSDDEVI IEA2D220 210.1.1                                */
/*          Device information mapping                               */
/* IOSDFEAT IOSDFEAT IEA2D220 211.1.1                                */
/*          IOS FEATURES INFORMATION MAPPING                         */
/* IOSDMAP  IOSDMAP  IEA2D220 212.1.1                                */
/*          MAP - IOS Map Service Parameter List                     */
/* IOSDNPPL IOSDNPPL IEA2D220 213.1.1                                */
/*          New Purge Parameter List                                 */
/* IOSDPATH IOSDPATH IEA2D220 214.1.1                                */
/*          Path information mapping                                 */
/* IOSDPAVA IOSDPAVA IEA2D220 215.1.1                                */
/*          Parallel Access Volume Array (PAVA) mapping              */
/* IOSDSHID IOSDSHID IEA2D220 216.1.1                                */
/*          System Host ID Mapping                                   */
/* IOSDSRWQ IOSDSRWQ IEA2D220 217.1                                  */
/*          Subchannel Recovery Word Queuing Element                 */
/* IOSDSWTD IOSDSWTD IEA2D220 218.1.1                                */
/*          Switch Data Area mapping                                 */
/* IOSDUPFX IOSDUPFX IEA2D220 219.1.1                                */
/*          UCB PREFIX MAPPING                                       */
/* IOSDUPI  IOSDUPI  IEA2D220 220.1.1                                */
/*          UCB Prefix Information Area                              */
/* IPIB     IECDIPIB IEA2D220 221.1                                  */
/*          I/O Purge Interface Block                                */
/* IPWA     IOSDIPWA IEA2D220 222.1                                  */
/*          IPWA - Purge Work Area                                   */
/* IQE      IHAIQE   IEA2D220 223.1.1                                */
/*          Interruption Queue Element                               */
/* IRACPMB  IRACPMB  IEA2D220 224.1.1                                */
/*          Channel Path Measurement Block                           */
/* IRAENF55 IRAENF55 IEA2D220 225.1.1                                */
/*          ENF signal 55 parameters                                 */
/* IRAEVPL  IRAEVPL  IEA2D220 226.1.1                                */
/*          Sysevent Parameter List Mappings                         */
/* IRAICSM  IRAICSM  IEA2D220 227.1.1                                */
/*          System Resource Manager Installation Control             */
/* IRALPDAT IRALPDAT IEA2D220 228.1.1                                */
/*          Sysevent REQLPDAT parameter list                         */
/* IRAOUCBX IRAOUCBX IEA2D220 229.1                                  */
/*          Resources Manager User Control Block Extension           */
/* IRARASC  IRARASC  IEA2D220 230.1.1                                */
/*          Request Address Space Classification Informatio          */
/* IRARASD  IRARASD  IEA2D220 231.1.1                                */
/*          Request Address Space Data Parameter List                */
/* IRARENF1 IRARENF1 IEA2D220 232.1.1                                */
/*          ENF signal 42 qualifiers                                 */
/* IRASRCD  IRASRCD  IEA2D220 233.1.1                                */
/*          System Resource Manager Swapout Reason Codes             */
/* IRASRMST IRASRMST IEA2D220 234.1.1                                */
/*          Request SRM Status Sysevent Parameter List               */
/* IRB      IHAIRB   IEA2D220 235.1                                  */
/*          Interruption Response Block                              */
/* ISGE51CN ISGE51CN IEA2D220 236.1.1                                */
/*          Global and Local Contention Data (ENF Event Code 51)     */
/* ISGE51RN ISGE51RN IEA2D220 237.1.1                                */
/*          Job Suspension/Resumption due to RNL Change (ENF         */
/* ISGLMASM ISGLMASM IEA2D220 238.1.1                                */
/*          GRS Latch Manager Services Assembler Declares            */
/* ISGRSC   ISGRSC   IEA2D220 239.1                                  */
/*          RING STATUS CHANGE PARAMETER LIST                        */
/* ISGYCON  ISGYCON  IEA2D220 240.1.1                                */
/*          Constants for users of GRS services                      */
/* ISGYDSPX ISGYDSPX IEA2D220 241.1.1                                */
/*          Display GRS Resource Exit Parameter List                 */
/* ISGYNQBP ISGYNQBP IEA2D220 242.1.1                                */
/*          Batch ENQ Exit Parameter List                            */
/* ISGYNQQP ISGYNQQP IEA2D220 243.1.1                                */
/*          Queued ENQ/DEQ Exit Parameter List                       */
/* ISGYNQXP ISGYNQXP IEA2D220 244.1.1                                */
/*          ENQ Exit Parameter List                                  */
/* ISGYQCBP ISGYQCBP IEA2D220 245.1.1                                */
/*          QCB Destroy Exit Parameter List                          */
/* ISGYREPL ISGYREPL IEA2D220 246.1.1                                */
/*          RNL Exit Parameter List                                  */
/* ITK      IEFVKEYS IEA2D220 247.1.1                                */
/*          TABLE OF CONVERTER/INTERPRETER KEYS                      */
/* ITTCTE   ITTCTE   IEA2D220 248.1                                  */
/*          Component Trace Element                                  */
/* ITZENF60 ITZENF60 IEA2D220 249.1.1                                */
/*          ENF Signal 60 Parameter List                             */
/* ITZYRETC ITZYRETC IEA2D220 250.1.1                                */
/*          Transaction Trace ITZEVENT Macro Return Codes            */
/* ----------------------------------------------------------------- */
/* Generated: 20040928 09:14:16                                      */
/* ----------------------------------------------------------------- */
/* Book     :   IEA2D320   GA22-7583-02                              */
/* Title    :  z/OS: MVS Data Areas, Volume 3 (IVT - RCWK)           */
/* Copyright:    Copyright IBM Corp. 1988, 2002                      */
/* ----------------------------------------------------------------- */
/* Area     Macro    FILE     Chapter                                */
/* -------- -------- -------- -------------------------------------- */
/* IVT      IHAIVT   IEA2D320 2.1                                    */
/*          IPL VECTOR TABLE                                         */
/* IWMECD   IWMECD   IEA2D320 3.1.1                                  */
/*          Enclave Classification Data Mapping                      */
/* IWMENF57 IWMENF57 IEA2D320 4.1.1                                  */
/*          ENF signal 57 parameter list                             */
/* IWMPB    IWMPB    IEA2D320 5.1.1                                  */
/*          Performance Block for IWM Work Manager and Delay         */
/* IWMRENF1 IWMRENF1 IEA2D320 6.1.1                                  */
/*          ENF signal 41 qualifiers                                 */
/* IWMRENF2 IWMRENF2 IEA2D320 7.1.1                                  */
/*          ENF signal 56 parameter list                             */
/* IWMSERVD IWMSERVD IEA2D320 8.1.1                                  */
/*          WLM Service Definition mapping                           */
/* IWMSET   IWMSET   IEA2D320 9.1.1                                  */
/*          WLM Scheduling Environments Table                        */
/* IWMSVAEA IWMSVAEA IEA2D320 10.1.1                                 */
/*          WLM Service Definition Application Environment           */
/* IWMSVDCR IWMSVDCR IEA2D320 11.1.1                                 */
/*          WLM Service Definition Classification Rule mapping       */
/* IWMSVDEF IWMSVDEF IEA2D320 12.1.1                                 */
/*          WLM Service Definition mapping                           */
/* IWMSVIDS IWMSVIDS IEA2D320 13.1.1                                 */
/*          WLM Service Definition identifier mappings               */
/* IWMSVNPA IWMSVNPA IEA2D320 14.1.1                                 */
/*          WLM Service Definition Notepad mapping                   */
/* IWMSVPCD IWMSVPCD IEA2D320 15.1.1                                 */
/*          IWMWQRY Answer Area                                      */
/* IWMSVPOL IWMSVPOL IEA2D320 16.1.1                                 */
/*          IWMPQRY Answer Area                                      */
/* IWMSVPSE IWMSVPSE IEA2D320 17.1.1                                 */
/*          WLM Service Policy Scheduling Environment mapping        */
/* IWMSVSEA IWMSVSEA IEA2D320 18.1.1                                 */
/*          WLM Service Definition Scheduling Environment            */
/* IWMWRCAA IWMWRCAA IEA2D320 19.1.1                                 */
/*          IWMRCOLL Answer Area                                     */
/* IWMWRQAA IWMWRQAA IEA2D320 20.1.1                                 */
/*          IWMRQRY Answer Area                                      */
/* IWMWSYSI IWMWSYSI IEA2D320 21.1.1                                 */
/*          WLM System Capacity Information Area                     */
/* IWMWSYSL IWMWSYSL IEA2D320 22.1.1                                 */
/*          Sysplex Query Response                                   */
/* IWMWSYSR IWMWSYSR IEA2D320 23.1.1                                 */
/*          Sysplex Router Response                                  */
/* IWMYCON  IWMYCON  IEA2D320 24.1.1                                 */
/*          Constants for users of IWM services (includes Work       */
/* IXCYAMDA IXCYAMDA IEA2D320 25.1.1                                 */
/*          XCF Accounting and Measurement Data Area                 */
/* IXCYARAA IXCYARAA IEA2D320 26.1.1                                 */
/*          IXCARM Answer Area Structure                             */
/* IXCYAREN IXCYAREN IEA2D320 27.1.1                                 */
/*          Automatic Restart Manager ENF signal parameter list      */
/* IXCYARM  IXCYARM  IEA2D320 28.1.1                                 */
/*          IXCARM and IXCXARMI Macro Constants                      */
/* IXCYCON  IXCYCON  IEA2D320 29.1.1                                 */
/*          Constants for users of IXC services                      */
/* IXCYENF  IXCYENF  IEA2D320 30.1.1                                 */
/*          Event Notification Facility signal parmlist              */
/* IXCYERE  IXCYERE  IEA2D320 31.1.1                                 */
/*          Automatic Restart Manager (ARM) Element Restart          */
/* IXCYEVE  IXCYEVE  IEA2D320 32.1.1                                 */
/*          Automatic Restart Manager Event-Exit Parameter List      */
/* IXCYGEPL IXCYGEPL IEA2D320 33.1.1                                 */
/*          Group Exit Parameter List                                */
/* IXCYMEPL IXCYMEPL IEA2D320 34.1.1                                 */
/*          Message Exit Parameter List                              */
/* IXCYMNPL IXCYMNPL IEA2D320 35.1.1                                 */
/*          Message Notification Exit Parameter List                 */
/* IXCYMQAA IXCYMQAA IEA2D320 36.1.1                                 */
/*          Message Control Query Answer Area                        */
/* IXCYMSGC IXCYMSGC IEA2D320 37.1.1                                 */
/*          Constants for users of the IXCMSGC service               */
/* IXCYQUAA IXCYQUAA IEA2D320 38.1.1                                 */
/*          Query Answer Area                                        */
/* IXCYSEPL IXCYSEPL IEA2D320 39.1.1                                 */
/*          Status Exit Parameter List                               */
/* IXCYWRE  IXCYWRE  IEA2D320 40.1.1                                 */
/*          Automatic Restart Manager Workload-Restart-Exit          */
/* IXGANSAA IXGANSAA IEA2D320 41.1.1                                 */
/*          Answer area mapping macro                                */
/* IXGBRMLT IXGBRMLT IEA2D320 42.1.1                                 */
/*          Browse Multi-block Output Mapping Macro                  */
/* IXGCMPL  IXGCMPL  IEA2D320 43.1.1                                 */
/*          Complete Exit Parameter List                             */
/* IXGCON   IXGCON   IEA2D320 44.1.1                                 */
/*          Constants for users of IXG services                      */
/* IXGENF   IXGENF   IEA2D320 45.1.1                                 */
/*          Event Notification Facility Signal Parameter List        */
/* IXGQBUF  IXGQBUF  IEA2D320 46.1.1                                 */
/*          Query Buffer                                             */
/* IXGRMEPL IXGRMEPL IEA2D320 47.1.1                                 */
/*          Resource Manager Exit Parameter List                     */
/* IXGSXAP  IXGSXAP  IEA2D320 48.1.1                                 */
/*          LOGR subsystem data set interface exit allocation        */
/* IXGSXCMP IXGSXCMP IEA2D320 49.1.1                                 */
/*          LOGR subsystem data set interface exit common            */
/* IXGSXCNP IXGSXCNP IEA2D320 50.1.1                                 */
/*          LOGR subsystem data set interface exit converter         */
/* IXGSXGP  IXGSXGP  IEA2D320 51.1.1                                 */
/*          LOGR subsystem data set interface exit GET specific      */
/* IXGSXMSP IXGSXMSP IEA2D320 52.1.1                                 */
/*          LOGR subsystem data set interface exit message area      */
/* IXGSXOCP IXGSXOCP IEA2D320 53.1.1                                 */
/*          LOGR subsystem data set interface exit OPEN/CLOSE        */
/* IXGSXTXT IXGSXTXT IEA2D320 54.1.1                                 */
/*          LOGR subsystem data set interface exit SUBSYS=           */
/* IXGSXUP  IXGSXUP  IEA2D320 55.1.1                                 */
/*          LOGR subsystem data set interface exit unallocation      */
/* IXLYAMDA IXLYAMDA IEA2D320 56.1.1                                 */
/*          Accounting and Measurement Data Area                     */
/* IXLYCAA  IXLYCAA  IEA2D320 57.1.1                                 */
/*          IXLCACHE Request Answer Area                             */
/* IXLYCANB IXLYCANB IEA2D320 58.1.1                                 */
/*          Cache Name Block                                         */
/* IXLYCCIH IXLYCCIH IEA2D320 59.1.1                                 */
/*          Castout Class Information Header                         */
/* IXLYCEPL IXLYCEPL IEA2D320 60.1.1                                 */
/*          Contention Exit Parameter List                           */
/* IXLYCFSE IXLYCFSE IEA2D320 61.1.1                                 */
/*          Coupling Facility Sender Event Notification              */
/* IXLYCMPL IXLYCMPL IEA2D320 62.1.1                                 */
/*          Complete Exit Parameter List                             */
/* IXLYCOMP IXLYCOMP IEA2D320 63.1.1                                 */
/*          CF Dumping Compdata Record Format Mappings               */
/* IXLYCON  IXLYCON  IEA2D320 64.1.1                                 */
/*          Constants for users of IXL services                      */
/* IXLYCONA IXLYCONA IEA2D320 65.1.1                                 */
/*          Connect Answer Area                                      */
/* IXLYCRRB IXLYCRRB IEA2D320 66.1.1                                 */
/*          Cache Register Name List Registration Block              */
/* IXLYCSCS IXLYCSCS IEA2D320 67.1.1                                 */
/*          Cache Storage Class Statistics - CSCS                    */
/* IXLYCSPA IXLYCSPA IEA2D320 68.1.1                                 */
/*          IXLCSP Request Answer Area                               */
/* IXLYCUNB IXLYCUNB IEA2D320 69.1.1                                 */
/*          Cache Unlock-castout Name Block                          */
/* IXLYDCAC IXLYDCAC IEA2D320 70.1.1                                 */
/*          Dumping Cache Structure Controls Mapping                 */
/* IXLYDCCC IXLYDCCC IEA2D320 71.1.1                                 */
/*          Dumping Castout Class Controls Mapping                   */
/* IXLYDDIB IXLYDDIB IEA2D320 72.1.1                                 */
/*          Dumping Information Block mappings                       */
/* IXLYDEIB IXLYDEIB IEA2D320 73.1.1                                 */
/*          Directory Entry Information Block - DEIB                 */
/* IXLYDELI IXLYDELI IEA2D320 74.1.1                                 */
/*          Delete EntryList Input                                   */
/* IXLYDEQC IXLYDEQC IEA2D320 75.1.1                                 */
/*          Dumping Event Queue Controls Mapping                     */
/* IXLYDLC  IXLYDLC  IEA2D320 76.1.1                                 */
/*          Dumping List Controls Mapping                            */
/* IXLYDLCC IXLYDLCC IEA2D320 77.1.1                                 */
/*          Dumping Local Cache Controls Mapping                     */
/* IXLYDLIC IXLYDLIC IEA2D320 78.1.1                                 */
/*          Dumping List Structure Controls Mapping                  */
/* IXLYDLUC IXLYDLUC IEA2D320 79.1.1                                 */
/*          Dumping List User Controls Mapping                       */
/* IXLYDNNB IXLYDNNB IEA2D320 80.1.1                                 */
/*          Cache Delete-Name-List Name Block                        */
/* IXLYDSCC IXLYDSCC IEA2D320 81.1.1                                 */
/*          Dumping Storage Class Controls Mapping                   */
/* IXLYEEPL IXLYEEPL IEA2D320 82.1.1                                 */
/*          Event Exit Parameter List                                */
/* IXLYEMC  IXLYEMC  IEA2D320 83.1.1                                 */
/*          Event Monitor Controls                                   */
/* IXLYLAA  IXLYLAA  IEA2D320 84.1.1                                 */
/*          List Answer Area                                         */
/* IXLYLCTL IXLYLCTL IEA2D320 85.1.1                                 */
/*          List Entry Controls mapping                              */
/* IXLYLEPL IXLYLEPL IEA2D320 86.1.1                                 */
/*          List Transition Exit Parameter List                      */
/* IXLYLMI  IXLYLMI  IEA2D320 87.1.1                                 */
/*          List Monitoring Information                              */
/* IXLYLRB  IXLYLRB  IEA2D320 88.1.1                                 */
/*          Lock Request Block                                       */
/* IXLYMELI IXLYMELI IEA2D320 89.1.1                                 */
/*          Move EntryList Input                                     */
/* IXLYMRTD IXLYMRTD IEA2D320 90.1.1                                 */
/*          Mapping of Multiple Record Data Entries                  */
/* IXLYMSRI IXLYMSRI IEA2D320 91.1.1                                 */
/*          Monitor Sublist Registration Input                       */
/* IXLYNDE  IXLYNDE  IEA2D320 92.1.1                                 */
/*          Node Descriptor                                          */
/* IXLYNEPL IXLYNEPL IEA2D320 93.1.1                                 */
/*          Notify Exit Parameter List                               */
/* IXLYNSB  IXLYNSB  IEA2D320 94.1.1                                 */
/*          Register Name List Name-State Block                      */
/* IXLYRTAA IXLYRTAA IEA2D320 95.1.1                                 */
/*          IXLRT answer area mapping                                */
/* IXLYSTRC IXLYSTRC IEA2D320 96.1.1                                 */
/*          Partial Dump Reason Code constants                       */
/* IXLZSTRB IXLZSTRB IEA2D320 97.1.1                                 */
/*          IXLZSTR Macro Service ANSAREA Mappings                   */
/* IXZ$XPL  IXZ$XPL  IEA2D320 98.1.1                                 */
/*          JESXCF Exit parameter list                               */
/* IXZYIXAC IXZYIXAC IEA2D320 99.1.1                                 */
/*          JESXCF Acknowledgement message                           */
/* IXZYIXEN IXZYIXEN IEA2D320 100.1.1                                */
/*          JESXCF Message Envelope                                  */
/* IXZYIXIF IXZYIXIF IEA2D320 101.1.1                                */
/*          JESXCF Information  list entry                           */
/* IXZYIXJE IXZYIXJE IEA2D320 102.1.1                                */
/*          JESXCF Event notification                                */
/* IXZYIXPE IXZYIXPE IEA2D320 103.1.1                                */
/*          JESXCF Post exit parameter list                          */
/* IXZYIXSE IXZYIXSE IEA2D320 104.1.1                                */
/*          JESXCF System Event Message                              */
/* IXZYPIDS IXZYPIDS IEA2D320 105.1.1                                */
/*          JESXCF Performance Information Data Stream               */
/* JCT      IEFAJCTB IEA2D320 106.1                                  */
/*          Job Control Table                                        */
/* JCTX     IEFJCTX  IEA2D320 107.1                                  */
/*          JOB CONTROL TABLE EXTENSION                              */
/* JESCT    IEFJESCT IEA2D320 108.1.1                                */
/*          Job Entry Subsystem Communication Table                  */
/* JFCB     IEFJFCBN IEA2D320 109.1.1                                */
/*          Job File Control Block                                   */
/* JFCBE    IEFJFCBE IEA2D320 110.1.1                                */
/*          JOB FILE CONTROL BLOCK EXTENSION FOR 3800 PRINTER        */
/* JFCBX    IEFJFCBX IEA2D320 111.1.1                                */
/*          JOB FILE CONTROL BLOCK EXTENSION                         */
/* JICA     IEFJICA  IEA2D320 112.1                                  */
/*          JES/INTERPRETER COMMUNICATIONS AREA                      */
/* JMR      IEFJMR   IEA2D320 113.1.1                                */
/*          Job Management Record                                    */
/* JSAB     IAZJSAB  IEA2D320 114.1.1                                */
/*          Job scheduler address space control block                */
/* JSCB     IEZJSCB  IEA2D320 115.1.1                                */
/*          Job/Step Control Block                                   */
/* JSIPL    IEFJSIPL IEA2D320 116.1.1                                */
/*          Subsystem initialization parameter list                  */
/* JSPA     IAZJSPA  IEA2D320 117.1.1                                */
/*          Job Separator Page Data Area                             */
/* LCCA     IHALCCA  IEA2D320 118.1                                  */
/*          Logical Configuration Communication Area                 */
/* LCCAVT   IHALCCAT IEA2D320 119.1                                  */
/*          Logical Configuration Communication Area Vector          */
/* LCT      IEFALLCT IEA2D320 120.1                                  */
/*          Linkage Control Table                                    */
/* LDA      IHALDA   IEA2D320 121.1                                  */
/*          VSM Local Data Area                                      */
/* LGE      ILRLGE   IEA2D320 122.1                                  */
/*          Logical Group Entry                                      */
/* LGVT     ILRLGVT  IEA2D320 123.1                                  */
/*          ASM Logical Group Vector Table                           */
/* LKPT     IHALKPT  IEA2D320 124.1                                  */
/*          LOCK MANAGER PARMAMETER LIST TABLE                       */
/* LLCB     IHALLCB  IEA2D320 125.1                                  */
/*          LNKLST Lookaside Control Block                           */
/* LLE      IHALLE   IEA2D320 126.1.1                                */
/*          Load List Element                                        */
/* LLPM     IHALLPM  IEA2D320 127.1                                  */
/*          LNKLST Lookaside Parameter List                          */
/* LLP1     IHALLP1  IEA2D320 128.1.1                                */
/*          Library Lookaside Fetch Installation Exit Parameter List */
/* LLP2     IHALLP2  IEA2D320 129.1.1                                */
/*          LLA Staging Installation Exit Parameters                 */
/* LLT      IHALLT   IEA2D320 130.1.1                                */
/*          Link List Table                                          */
/* LPAL     IOSDLPAL IEA2D320 131.1                                  */
/*          LPA Device Support Module List                           */
/* LPAT     IHALPAT  IEA2D320 132.1                                  */
/*          LPALST Table                                             */
/* LPBT     IRALPBT  IEA2D320 133.1                                  */
/*          TABLE OF LOGICAL PATH CONTROL BLOCKS                     */
/* LPDE     IHALPDE  IEA2D320 134.1                                  */
/*          Link Pack Directory Entry                                */
/* LQB      CNLMLQB  IEA2D320 135.1                                  */
/*          Language Query Block Mapping Macro                       */
/* LRB      IHALRB   IEA2D320 136.1                                  */
/*          LOGREC Buffer                                            */
/* LXAT     IHALXAT  IEA2D320 137.1                                  */
/*          LINKAGE INDEX ALLOCATION TABLE                           */
/* MCA      CNLMMCA  IEA2D320 138.1.1                                */
/*          Message Communication Area Mapping Macro                 */
/* MCHEAD   MCHEAD   IEA2D320 139.1.1                                */
/*          Monitor Call Routing Table Head  (MCHEAD)                */
/* MCSCSA   IEAVG131 IEA2D320 140.1                                  */
/*          MCS Extended Console Status Area                         */
/* MCSOP    IEZVG111 IEA2D320 141.1.1                                */
/*          MCSOPER OPERPARM Mapping                                 */
/* MCT      IRAMCT   IEA2D320 142.1                                  */
/*          System Resource Manager Storage Management Control       */
/* MDB      IEAVM105 IEA2D320 143.1.1                                */
/*          Message Data Block  (MDB)                                */
/* MDBP     IEAVG132 IEA2D320 144.1                                  */
/*          Prefix area for Message Data Block                       */
/* MGCRE    IEZMGCRE IEA2D320 145.1                                  */
/*          MGCRE parameter list                                     */
/* MGCRPL   IEZMGCR  IEA2D320 146.1.1                                */
/*          MGCR PARAMETER LIST DEFINITION                           */
/* MIO      CNLMMIO  IEA2D320 147.1                                  */
/*          Message Input/Output Block Mapping Macro                 */
/* MIR      IOSDMIR  IEA2D320 148.1                                  */
/*          MIR - Missing Interrupt Logrec Records                   */
/* MMB      IEAMMB   IEA2D320 149.1                                  */
/*          MONITOR MESSAGE BLOCK                                    */
/* MPB      CNLMMPB  IEA2D320 150.1.1                                */
/*          Message Parameter Block Mapping Macro                    */
/* MPFT     IEEZB809 IEA2D320 151.1                                  */
/*          MESSAGE PROCESSING FACILITY TABLE (MPFT) MAPPING         */
/* MQE      IHAMQE   IEA2D320 152.1                                  */
/*          IPL Message Queue Element (MQE).                         */
/* MQH      IHAMQH   IEA2D320 153.1                                  */
/*          IPL Message Queue Header (MQH).                          */
/* MSGS     IEAVM101 IEA2D320 154.1                                  */
/*          Generalized Message Service Parameter List (MSGS)        */
/* MSRASDCA IEEZB808 IEA2D320 155.1                                  */
/*          MASTER SCHEDULER COMMAND RAS DATA COMMUNICATIONS         */
/* MTB      CNLMMTB  IEA2D320 156.1.1                                */
/*          Message Text Block Mapping Macro                         */
/* MTT      IEEZB806 IEA2D320 157.1                                  */
/*          Master Trace Table                                       */
/* NEL      IEFNEL   IEA2D320 158.1.1                                */
/*          Interpreter Entrance List                                */
/* NLLE     IEANLLE  IEA2D320 159.1                                  */
/*          Nucleus load list element                                */
/* NSSA     IHANSSA  IEA2D320 160.1                                  */
/*          RTM Normal Stack Save Area                               */
/* NUCMP    IEANUCMP IEA2D320 161.1                                  */
/*          Nucleus Map Entry                                        */
/* NVT      IHANVT   IEA2D320 162.1                                  */
/*          NIP Vector Table                                         */
/* OMDG     N/A      IEA2D320 163.1                                  */
/*          N/A                                                      */
/* OPSPL    ILROPSPL IEA2D320 164.1                                  */
/*          ASM ILROPS00 Parameter List                              */
/* ORB      IHAORB   IEA2D320 165.1                                  */
/*          Operation Request Block                                  */
/* ORE      IHAORE   IEA2D320 166.1.1                                */
/*          OPERATOR REPLY ELEMENT DEFINITION                        */
/* OUCB     IRAOUCB  IEA2D320 167.1.1                                */
/*          RESOURCES MANAGER USER CONTROL BLOCK                     */
/* OUSB     IHAOUSB  IEA2D320 168.1                                  */
/*          RESOURCES MANAGER USER SWAPPABLE BLOCK                   */
/* OUXB     IHAOUXB  IEA2D320 169.1.1                                */
/*          RESOURCES MANAGER USER EXTENSION BLOCK                   */
/* PARM4CB  IEFZB4CB IEA2D320 170.1                                  */
/*          Input for IEFAB4CB                                       */
/* PART     ILRPART  IEA2D320 171.1                                  */
/*          Paging Activity Reference Table                          */
/* PAT      ILRPAT   IEA2D320 172.1                                  */
/*          Page Allocation Table                                    */
/* PCB      IARPCB   IEA2D320 173.1                                  */
/*          PAGE CONTROL BLOCK                                       */
/* PCCA     IHAPCCA  IEA2D320 174.1.1                                */
/*          PHYSICAL CONFIGURATION COMMUNICATION AREA                */
/* PCCAVT   IHAPCCAT IEA2D320 175.1.1                                */
/*          Physical Configuration Communication Area Vector         */
/* PCCB     IEFPCCB  IEA2D320 176.1                                  */
/*          Private Catalog Control Block                            */
/* PCCW     ILRPCCW  IEA2D320 177.1                                  */
/*          ASM Paging Channel Command Work Area                     */
/* PCDPARMS IEFZB459 IEA2D320 178.1                                  */
/*          PCDALT Parameter list (PCDPARMS)                         */
/* PCRA     IHAPCRA  IEA2D320 179.1                                  */
/*          Program Call Recovery Area                               */
/* PCT      ILRPCT   IEA2D320 180.1                                  */
/*          ASM Performance Characteristics Table                    */
/* PCTRC    IHAPCTRC IEA2D320 181.1                                  */
/*          PC/AUTH SERVICES SYSTEM TRACE ENTRY TEMPLATES            */
/* PEL      ISGPEL   IEA2D320 182.1.1                                */
/*          Parameter Element List                                   */
/* PFK      IEEVC103 IEA2D320 183.1                                  */
/*          PROGRAM FUNCTION KEY TABLE MAPPING                       */
/* PFTE     IARPFTE  IEA2D320 184.1                                  */
/*          PAGE FRAME TABLE ENTRY                                   */
/* PICA     IHAPICA  IEA2D320 185.1.1                                */
/*          Program Interrupt Control Area                           */
/* PIE      IHAPIE   IEA2D320 186.1.1                                */
/*          Program Interruption Element                             */
/* PPD      IGVPPD   IEA2D320 187.1                                  */
/*          Primary Pool Descriptor (VSM Cell Pool)                  */
/* PPT      IEFZB610 IEA2D320 188.1.1                                */
/*          Program Properties Table Mapping Macro                   */
/* PQCB     ISGPQCB  IEA2D320 189.1                                  */
/*          PLACEHOLDER QUEUE CONTROL BLOCK                          */
/* PRA      IARPRA   IEA2D320 190.1                                  */
/*          Page Service Protect/Unprotect Recording Area (Audit     */
/* PRMESTAE IEFZB447 IEA2D320 191.1                                  */
/*          MAPPING MACRO FOR COMMON ALLOCATION ESTAE PARMS          */
/* PSA      IHAPSA   IEA2D320 192.1.1                                */
/*          Prefixed Save Area                                       */
/* PSL      IHAPSL   IEA2D320 193.1.1                                */
/*          Page Service List Entry                                  */
/* PVT      IHAPVT   IEA2D320 194.1.1                                */
/*          RSM Page Vector Table                                    */
/* PXT      IGVPXT   IEA2D320 195.1                                  */
/*          VSM Cell Pool Primary Extent                             */
/* QCB      ISGQCB   IEA2D320 196.1                                  */
/*          QUEUE CONTROL BLOCK                                      */
/* QDB      IHAQDB   IEA2D320 197.1                                  */
/*          Queue Descriptor Block                                   */
/* QEL      ISGQEL   IEA2D320 198.1                                  */
/*          QUEUE ELEMENT                                            */
/* QHT      ISGQHT   IEA2D320 199.1                                  */
/*          QUEUE HASH TABLE                                         */
/* QIO      IHAQIO   IEA2D320 200.1                                  */
/*          QMNGRIO Work Area                                        */
/* QMIDS    IEFQMIDS IEA2D320 201.1.1                                */
/*          Constants for SWA block IDs and acronyms                 */
/* QMPA     N/A      IEA2D320 202.1                                  */
/*          SWA MANAGER PARAMETER AREA                               */
/* QSRCD    ILRQSRCD IEA2D320 203.1                                  */
/*          ASM Quick Start Record                                   */
/* QVOD     IHAQVOD  IEA2D320 204.1                                  */
/*          Queue Verifier Output Data                               */
/* QVPL     IHAQVPL  IEA2D320 205.1                                  */
/*          Queue Verification Parameter List                        */
/* QWA      ISGQWA   IEA2D320 206.1                                  */
/*          QUEUE WORK AREA                                          */
/* QWB      ISGQWB   IEA2D320 207.1                                  */
/*          QUEUE WORK BLOCK                                         */
/* QXB      ISGQXB   IEA2D320 208.1                                  */
/*          QUEUE EXTENSION BLOCK                                    */
/* RAB      IARRAB   IEA2D320 209.1                                  */
/*          RSM ADDRESS SPACE BLOCK                                  */
/* RAX      IARRAX   IEA2D320 210.1.1                                */
/*          RSM ADDRESS SPACE BLOCK EXTENSION                        */
/* RB       IHARB    IEA2D320 211.1.1                                */
/*          REQUEST BLOCKS                                           */
/* RBCB     RTMRBCB  IEA2D320 212.1                                  */
/*          Recovery Termination Management Recording Buffers        */
/* RCB      RTMRCB   IEA2D320 213.1                                  */
/*          Recovery Termination Management Recording Control        */
/* RCBE     RTMRCBE  IEA2D320 214.1                                  */
/*          RTM Record Control Buffer Entry                          */
/* RCE      IARRCE   IEA2D320 215.1.1                                */
/*          RSM Control and Enumeration Area                         */
/* RCT      IRARCT   IEA2D320 216.1                                  */
/*          System Resource Manager Resource Control Table           */
/* RCTD     IEARCTD  IEA2D320 217.1                                  */
/*          Region Control Task Data Area                            */
/* RCWK     IGVRCWK  IEA2D320 218.1                                  */
/*          VSM Recovery Work Area                                   */
/* ----------------------------------------------------------------- */
/* Generated: 20040928 09:14:40                                      */
/* ----------------------------------------------------------------- */
/* Book     :   IEA2D420   GA22-7584-02                              */
/* Title    :  z/OS: MVS Data Areas, Volume 4 (RD - SRRA)            */
/* Copyright:    Copyright IBM Corp. 1988, 2002                      */
/* ----------------------------------------------------------------- */
/* Area     Macro    FILE     Chapter                                */
/* -------- -------- -------- -------------------------------------- */
/* RD       IHARD    IEA2D420 2.1                                    */
/*          VSM REGION DESCRIPTOR                                    */
/* RDCM     IEERDCM  IEA2D420 3.1                                    */
/*          RESIDENT DISPLAY CONTROL MODULE MAPPING MACRO            */
/* RESPA    IAZRESPA IEA2D420 4.1.1                                  */
/*          Response Area                                            */
/* RGR      IHARGR   IEA2D420 5.1                                    */
/*          VSM Region Request Element                               */
/* RIB      ISGRIB   IEA2D420 6.1.1                                  */
/*          RESOURCE INFORMATION BLOCK RESOURCE INFORMATION          */
/* RIT      IARRIT   IEA2D420 7.1                                    */
/*          RSM Internal Table                                       */
/* RMCA     IRARMCA  IEA2D420 8.1                                    */
/*          System Resource Manager Control Area                     */
/* RMCT     IRARMCT  IEA2D420 9.1.1                                  */
/*          SYSTEM RESOURCES MANAGER CONTROL TABLE                   */
/* RMEP     IRARMEP  IEA2D420 10.1                                   */
/*          System Resources Manager Entry Point Block               */
/* RMEX     IRARMEX  IEA2D420 11.1                                   */
/*          SYSTEM RESOURCES MANAGER EXTERNAL ENTRY POINT            */
/* RMPL     IHARMPL  IEA2D420 12.1.1                                 */
/*          RESOURCE MANAGER PARAMETER LIST                          */
/* RNLE     ISGRNLE  IEA2D420 13.1.1                                 */
/*          RESOURCE NAME LIST ENTRY                                 */
/* RPT      ISGRPT   IEA2D420 14.1                                   */
/*          Resource Pool Table                                      */
/* RQE      IECDRQE  IEA2D420 15.1                                   */
/*          EXCP Request Queue Element                               */
/* RRPA     IRARRPA  IEA2D420 16.1                                   */
/*          SYSTEM RESOURCES MANAGER RECOVERY ROUTINE PARAMETER      */
/* RSA      ISGRSA   IEA2D420 17.1                                   */
/*          RING SYSTEM AUTHORITY MESSAGE                            */
/* RSRRB    IHARSRRB IEA2D420 18.1                                   */
/*          RSM Real Storage Reconfiguration Block                   */
/* RTCT     IHARTCT  IEA2D420 19.1                                   */
/*          Recovery/Termination Control Table                       */
/* RTM2WA   IHARTM2A IEA2D420 20.1                                   */
/*          RTM2 WORK AREA                                           */
/* RTSD     IHARTSD  IEA2D420 21.1                                   */
/*          RTCT SDUMP EXTENSION                                     */
/* EED      IHART1W  IEA2D420 22.1                                   */
/*          RTM1 Work Area                                           */
/* RWA      IGFRWA   IEA2D420 23.1                                   */
/*          Machine Check Handler Recovery Work Area                 */
/* SCA      IHASCA   IEA2D420 24.1                                   */
/*          SPIE/ESPIE Control Area                                  */
/* SCANPARM IEZVQ100 IEA2D420 25.1                                   */
/*          PARAMETER LIST FOR IEAVQ700 (THE COMM TASK QUEUE         */
/* SCB      IHASCB   IEA2D420 26.1.1                                 */
/*          STAE Control Block                                       */
/* SCCB     IHASCCB  IEA2D420 27.1.1                                 */
/*          SERVICE CALL CONTROL BLOCK (SCCB)                        */
/* SCD      IOSDSCD  IEA2D420 28.1                                   */
/*          SCD - HOT I/O Storage Collection Data                    */
/* SCE      IHASCE   IEA2D420 29.1                                   */
/*          Slip Control Element                                     */
/* SCFS     IHASCFS  IEA2D420 30.1                                   */
/*          SUPERVISOR CONTROL FLIH SAVEAREA                         */
/* SCHIB    IHASCHIB IEA2D420 31.1                                   */
/*          Subchannel Information Block                             */
/* SCL      IEEZB815 IEA2D420 32.1                                   */
/*          Scan Parameter List                                      */
/* SCRA     IHASCRA  IEA2D420 33.1                                   */
/*          Supervisor Control Recovery Area                         */
/* SCT      IEFASCTB IEA2D420 34.1                                   */
/*          STEP CONTROL TABLE                                       */
/* SCTX     IEFSCTX  IEA2D420 35.1                                   */
/*          STEP CONTROL TABLE EXTENSION                             */
/* SCVA     IHASCVA  IEA2D420 36.1                                   */
/*          Slip Control Element Variable Area                       */
/* SCVT     IHASCVT  IEA2D420 37.1.1                                 */
/*          Secondary Communication Vector Table                     */
/* SCWA     IHASCWA  IEA2D420 38.1                                   */
/*          Supervisor Control Work Area                             */
/* SDDSQ    IHASDDSQ IEA2D420 39.1                                   */
/*          SDUMP DUMP DATA SET QUEUE                                */
/* SDEPL    IHASDEPL IEA2D420 40.1.1                                 */
/*          SDUMP POST EXIT PARAMETER LIST                           */
/* SDIR     IGVSDIR  IEA2D420 41.1                                   */
/*          VSM SQAT Directory                                       */
/* SDMPX    IHASDMPX IEA2D420 42.1                                   */
/*          SDUMP PARAMETER LIST                                     */
/* SDRSN    IHASDRSN IEA2D420 43.1.1                                 */
/*          SDUMP PARTIAL DUMP REASON CODE CONTROL BLOCK             */
/* SDST     IHASDST  IEA2D420 44.1.1                                 */
/*          SVC DUMP Status Area                                     */
/* SDUMP    IHASDUMP IEA2D420 45.1                                   */
/*          SDUMP PARAMETER LIST                                     */
/* SDWA     IHASDWA  IEA2D420 46.1.1                                 */
/*          SYSTEM DIAGNOSTIC WORK AREA                              */
/* SDWORK   IHASDWRK IEA2D420 47.1                                   */
/*          SVC DUMP WORK AREA                                       */
/* SETXPL   IEEZB831 IEA2D420 48.1                                   */
/*          Extended Parameter List for the SET Keyword              */
/* SGTE     IARSGTE  IEA2D420 49.1                                   */
/*          SEGMENT TABLE ENTRY                                      */
/* SHDR     IHASHDR  IEA2D420 50.1                                   */
/*          SLIP Header                                              */
/* SIOT     IEFASIOT IEA2D420 51.1.1                                 */
/*          Step Input/Output Table                                  */
/* SJACP    IEFSJACP IEA2D420 52.1                                   */
/*          SCHEDULER JCL FACILITY ACCESS FUNCTION PARAMETER         */
/* SJCLS    IEFSJCLS IEA2D420 53.1                                   */
/*          Scheduler JCL Facility JDT Class Definitions             */
/* SJDLP    IEFSJDLP IEA2D420 54.1                                   */
/*          SCHEDULER JCL FACILITY DELETE SCHEDULER WORK BLOCK       */
/* SJERP    IEFSJERP IEA2D420 55.1                                   */
/*          SJF ERASE SWB PARAMETER LIST                             */
/* SJFNP    IEFSJFNP IEA2D420 56.1                                   */
/*          Scheduler JCL Facility Find SWB Parameter List           */
/* SJGEP    IEFSJGEP IEA2D420 57.1                                   */
/*          Scheduler JCL Facility Get SWB Parameter List            */
/* SJKEY    IEFSJKEY IEA2D420 58.1.1                                 */
/*          Scheduler JCL Facility (SJF) Key Constants               */
/* SJKLP    IEFSJKLP IEA2D420 59.1                                   */
/*          Scheduler JCL Facility Key List Service Parameter        */
/* SJMRP    IEFSJMRP IEA2D420 60.1                                   */
/*          Scheduler JCL Facility Merge SWB Parameter list          */
/* SJPRFX   IEFSJPFX IEA2D420 61.1                                   */
/*          NJE Prefix Mapping                                       */
/* SJPUP    IEFSJPUP IEA2D420 62.1                                   */
/*          SCHEDULER JCL FACILITY PUT SWB PARAMETER LIST            */
/* SJRC     IEFSJRC  IEA2D420 63.1.1                                 */
/*          Scheduler JCL Facility Reason Codes                      */
/* SJREP    IEFSJREP IEA2D420 64.1.1                                 */
/*          SJF Retrieve Parameter List                              */
/* SJRSP    IEFSJRSP IEA2D420 65.1                                   */
/*          SCHEDULER JCL FACILITY RETURN SWB PARAMETER LIST         */
/* SJRUP    IEFSJRUP IEA2D420 66.1                                   */
/*          Scheduler JCL Facility Update Parameter List             */
/* SJSCP    IEFSJSCP IEA2D420 67.1                                   */
/*          SCHEDULER JCL FACILITY SCAN SWB CHAIN PARAMETER LIST     */
/* SJSMP    IEFSJSMP IEA2D420 68.1                                   */
/*          Scheduler JCL Facility SWBTU_MERGE Parameter List        */
/* SJTRC    IEFSJTRC IEA2D420 69.1.1                                 */
/*          Scheduler JCL Facility (SJF) SWBTUREQ Services           */
/* SJTRP    IEFSJTRP IEA2D420 70.1                                   */
/*          Scheduler JCL Facility SWBTUREQ RETRIEVE Parameter       */
/* SJTSP    IEFSJTSP IEA2D420 71.1                                   */
/*          Scheduler JCL Facility SWBTUREQ SPLICE and SPLIT         */
/* SJVEP    IEFSJVEP IEA2D420 72.1.1                                 */
/*          SJF VERIFY Parameter List                                */
/* SLFP     IHASLFP  IEA2D420 73.1                                   */
/*          RTM SLIP FRR Parameter Area                              */
/* SLPL     IHASLPL  IEA2D420 74.1                                   */
/*          Slip Control Element                                     */
/* SLR      IOSDSLR  IEA2D420 75.1                                   */
/*          Subchannel Logout Record                                 */
/* SLWA     IHASLWA  IEA2D420 76.1                                   */
/*          RTM SLIP Work Area                                       */
/* SMCA     IEESMCA  IEA2D420 77.1.1                                 */
/*          SMF CONTROL TABLE                                        */
/* SMDLR    IHASMDLR IEA2D420 78.1                                   */
/*          Summary Dump Logical Record                              */
/* SMEW     IHASMEW  IEA2D420 79.1                                   */
/*          SUMMARY DUMP EXTENDED WORK AREA                          */
/* SMPL     ISGSMPL  IEA2D420 80.1                                   */
/*          STORAGE MANAGEMENT PARAMETER LIST ENTRY                  */
/* SMWKRSCB IHASDRSB IEA2D420 81.1                                   */
/*          SUMMARY DUMP REAL STORAGE CONTROL BLOCK                  */
/* SNAPX    IHASNAPX IEA2D420 82.1.1                                 */
/*          SNAPX PARAMETER LIST                                     */
/* SPD      IGVSPD   IEA2D420 83.1                                   */
/*          VSM Cell Pool Secondary Extent Descriptor                */
/* SPQA     IHASPQA  IEA2D420 84.1                                   */
/*          VSM Subpool Queue Anchors                                */
/* SPQE     IHASPQE  IEA2D420 85.1                                   */
/*          VSM Subpool Queue Element                                */
/* SPT      IHASPT   IEA2D420 86.1                                   */
/*          VSM Subpool Table                                        */
/* SPTRC    IHASPTRC IEA2D420 87.1                                   */
/*          Supervisor Control Services System Trace Entry           */
/* SPTT     IGVSPTT  IEA2D420 88.1                                   */
/*          VSM Subpool Translation Table                            */
/* SQAT     IHASQAT  IEA2D420 89.1                                   */
/*          VSM Size Queue Anchor Table                              */
/* SRB      IHASRB   IEA2D420 90.1.1                                 */
/*          Service Request Block                                    */
/* SRCD     ADYSRCD  IEA2D420 91.1.1                                 */
/*          DAE data set record format                               */
/* SRPL     IEEZB814 IEA2D420 92.1                                   */
/*          ENF SIGNAL ROUTINE PARAMETER LIST (SRPL)                 */
/* SRRA     IHASRRA  IEA2D420 93.1                                   */
/*          Service Routine Recovery Area                            */
/* ----------------------------------------------------------------- */
/* Generated: 20040928 09:14:46                                      */
/* ----------------------------------------------------------------- */
/* Book     :   IEA2D520   GA22-7585-02                              */
/* Title    :  z/OS: MVS Data Areas, Volume 5 (SSAG - XTLST)         */
/* Copyright:    Copyright IBM Corp. 1988, 2002                      */
/* ----------------------------------------------------------------- */
/* Area     Macro    FILE     Chapter                                */
/* -------- -------- -------- -------------------------------------- */
/* SSAG     IEFSSAG  IEA2D520 2.1                                    */
/*          SSOB Extension for Allocation Grouping of SUBSYS         */
/* SSAL     IEFSSAL  IEA2D520 3.1.1                                  */
/*          Allocation/Unallocation of SYSOUT function               */
/* SSARB    IEFSSARB IEA2D520 4.1                                    */
/*          Subsystem Allocation Request Block                       */
/* SSAT     IHASSAT  IEA2D520 5.1                                    */
/*          SUBSYSTEM AFFINITY TABLE MAPPING MACRO                   */
/* SSCA     IEFSSCA  IEA2D520 6.1                                    */
/*          SSOB Extension for Common Allocation/JES3 Exit           */
/* SSCF     IEFSSCF  IEA2D520 7.1.1                                  */
/*          FAILING SVC 34 COMMANDS                                  */
/* SSCI     IEFSSCI  IEA2D520 8.1.1                                  */
/*          SSOB Extension for SUBSYS Keyword Converter Exit         */
/* SSCM     IEFSSCM  IEA2D520 9.1.1                                  */
/*          SSOB EXTENSION FOR COMMAND PROCESSING EXIT               */
/* SSCS     IEFSSCS  IEA2D520 10.1                                   */
/*          SSOB Extension for Cancel/Status Function                */
/* SSCU     IEFSSCU  IEA2D520 11.1                                   */
/*          SSOB Extension for Common Unallocation/JES3 Exit         */
/* SSCVT    IEFJSCVT IEA2D520 12.1.1                                 */
/*          Subsystem Communications Vector Table                    */
/* SSDA     IEFSSDA  IEA2D520 13.1                                   */
/*          FUNCTIONAL EXTENSION FOR OPEN/CLOSE,                     */
/* SSDD     IEFSSDD  IEA2D520 14.1                                   */
/*          SSOB Extension for Change DDname/JES3 Exit               */
/* SSDM     IEFSSDM  IEA2D520 15.1.1                                 */
/*          SSOB Extension for Delete Operator Messages              */
/* SSDR     IEFSSDR  IEA2D520 16.1                                   */
/*          SSOB Extension for Dynamic Device Reconfiguration        */
/* SSDY     IEFSSDY  IEA2D520 17.1.1                                 */
/*          SSOB Extension for Dynamic Allocation JES3               */
/* SSEN     IEFSSEN  IEA2D520 18.1.1                                 */
/*          SSOB Extension for End of Memory                         */
/* SSET     IEFSSET  IEA2D520 19.1.1                                 */
/*          SSOB Extension for End of Task                           */
/* SSGC     IEFSSGC  IEA2D520 20.1.1                                 */
/*          SSOB functional extension for Generic Connect            */
/* SSIB     IEFJSSIB IEA2D520 21.1.1                                 */
/*          Subsystem Identification Block (SSIB)                    */
/* SSJI     IAZSSJI  IEA2D520 22.1.1                                 */
/*          SSOB Extension for the JES Job Information Service       */
/* SSJS     IEFSSJS  IEA2D520 23.1                                   */
/*          JOB SELECT FUNCTION                                      */
/* SSJT     IEFSSJT  IEA2D520 24.1                                   */
/*          Job Termination Function                                 */
/* SSL      IHASSL   IEA2D520 25.1.1                                 */
/*          SHORT PAGE SERVICE LIST                                  */
/* SSNQ     IEFSSNQ  IEA2D520 26.1                                   */
/*          SSOB Extension for Dynamic Allocation Change ENQ         */
/* SSNU     N/A      IEA2D520 27.1                                   */
/*          JES NOTIFY USER MSG SERVICE SSOB EXTENSION               */
/* SSOB     IEFSSOBH IEA2D520 28.1.1                                 */
/*          Subsystem Options Block                                  */
/* SSPJ     IAZSSPJ  IEA2D520 29.1                                   */
/*          Persistent JCL interface SSOB extension                  */
/* SSRB     IHASSRB  IEA2D520 30.1                                   */
/*          Suspended Service Request Block                          */
/* SSRQ     IEFSSRQ  IEA2D520 31.1                                   */
/*          SSOB Extension for Re-enqueue of a Job                   */
/* SSRR     IEFSSRR  IEA2D520 32.1.1                                 */
/*          SSOB Extension for Request/Return Job ID                 */
/* SSSF     IAZSSSF  IEA2D520 33.1.1                                 */
/*          Scheduler Facility Services SSI Extension                */
/* SSSI     IEFSSSI  IEA2D520 34.1                                   */
/*          SSOB Extension for Step Initiation                       */
/* SSSM     IEFSSSM  IEA2D520 35.1.1                                 */
/*          SUBSYSTEM ACCOUNTING PARAMETERS                          */
/* SSSO     IEFSSSO  IEA2D520 36.1.1                                 */
/*          SSOB Extension for Processing SYSOUT Datasets            */
/* SSST     IAZSSST  IEA2D520 37.1.1                                 */
/*          SSOB Extension for Extended Status                       */
/* SSS2     IAZSSS2  IEA2D520 38.1.1                                 */
/*          SSOB Extension for SYSOUT Application Program            */
/* SSTA     IEFSSTA  IEA2D520 39.1.1                                 */
/*          Tape Allocation Subsystem Interface Mapping              */
/* SSUS     IEFSSUS  IEA2D520 40.1                                   */
/*          SSOB Extension for Remote Destination Validity Check     */
/* SSVI     IEFSSVI  IEA2D520 41.1.1                                 */
/*          Subsystem Version Information SSOB Extension             */
/* SSVS     IEFSSVS  IEA2D520 42.1.1                                 */
/*          Subsystem Verification Service                           */
/* SSVT     IEFJSSVT IEA2D520 43.1                                   */
/*          Subsystem Vector Table                                   */
/* SSWA     N/A      IEA2D520 44.1                                   */
/*          SUBSYSTEM SCHEDULER WORK AREA                            */
/* SSWT     IEFSSWT  IEA2D520 45.1.1                                 */
/*          SSOB Extension for Write to Operator                     */
/* STAB     ITTSTAB  IEA2D520 46.1                                   */
/*          Subname mapping.                                         */
/* STCB     IHASTCB  IEA2D520 47.1.1                                 */
/*          Secondary Task Control Block (TCB)                       */
/* STKE     IHASTKE  IEA2D520 48.1                                   */
/*          PCLINK Stack Element (STKE)                              */
/* SVCTABLE IHASVC   IEA2D520 49.1                                   */
/*          SVC Table Entry                                          */
/* SVT      IHASVT   IEA2D520 50.1.1                                 */
/*          Supervisor Vector Table                                  */
/* SXT      IGVSXT   IEA2D520 51.1                                   */
/*          VSM Cell Pool Secondary Extent                           */
/* SYMPQ    ADYSYMP  IEA2D520 52.1                                   */
/*          DAE Symptom Queue Element                                */
/* S99PARMS IEFZB4D0 IEA2D520 53.1.1                                 */
/*          Dynamic Allocation (SVC 99) Parameter List               */
/* TAXE     IKJTAXE  IEA2D520 54.1                                   */
/*          TERMINAL ATTENTION EXIT ELEMENT                          */
/* TBVT     IHATBVT  IEA2D520 55.1                                   */
/*          System trace buffer vector table and trace buffer        */
/* TBWC     ITTTBWC  IEA2D520 56.1                                   */
/*          CTRACE Trace Buffer Writer Control area                  */
/* TCB      IKJTCB   IEA2D520 57.1.1                                 */
/*          TASK CONTROL BLOCK                                       */
/* TCCW     IECDTCCW IEA2D520 58.1                                   */
/*          Translation Control Block                                */
/* TCT      IEFTCT   IEA2D520 59.1.1                                 */
/*          SMF TIMING CONTROL TABLE                                 */
/* DCM      IEETDCM  IEA2D520 60.1                                   */
/*          PAGEABLE DISPLAY CONTROL MODULE MAPPING MACRO            */
/* TEXTUNIT IEFZB4D1 IEA2D520 61.1                                   */
/*          Dynamic Allocation Text Unit Pointer List                */
/* TFWA     IHATFWA  IEA2D520 62.1                                   */
/*          System trace formatter work area (TFWA)                  */
/* TICB     IOSDTICB IEA2D520 63.1                                   */
/*          TICB - MIH Time Interval Control Block                   */
/* TIOT     IEFTIOT1 IEA2D520 64.1.1                                 */
/*          Task Input/Output Table                                  */
/* TMRB     IEFZB424 IEA2D520 65.1                                   */
/*          TIOT Manager Request Block                               */
/* TMTRC    IHATMTRC IEA2D520 66.1                                   */
/*          Task Manangement Services System Trace Entry             */
/* TOB      IHATOB   IEA2D520 67.1                                   */
/*          SYSTEM TRACE OPTION BLOCK (TOB)                          */
/* TOT      IHATOT   IEA2D520 68.1                                   */
/*          System trace operand table (TOT)                         */
/* TPC      IEAVVTPC IEA2D520 69.1.1                                 */
/*          TIMER SUPERVISION WORK AREA                              */
/* TQE      IHATQE   IEA2D520 70.1.1                                 */
/*          Timer Queue Element                                      */
/* TRBP     IHATRBPL IEA2D520 71.1.1                                 */
/*          RESOURCES MANAGER TRANSACTION REPORTING BASIC            */
/* TRCT     IHATRCT  IEA2D520 72.1                                   */
/*          System Trace COPYTRC Parameter List                      */
/* TREP     IHATREPL IEA2D520 73.1.1                                 */
/*          RESOURCES MANAGER TRANSACTION REPORTING EXTENDED         */
/* TRFM     IHATRFM  IEA2D520 74.1                                   */
/*          System Trace Table Format Request Parameter List         */
/* TROB     IHATROB  IEA2D520 74.4                                   */
/*          SYSTEM TRACE TABLE FORMATTER OUTPUT BUFFER               */
/* TRSN     IHATRSN  IEA2D520 75.1                                   */
/*          System Trace SNAPTRC Parameter List                      */
/* TRST     IEEZB901 IEA2D520 76.1                                   */
/*          System Trace Status Parameter List                       */
/* TRVT     IHATRVT  IEA2D520 77.1.1                                 */
/*          System trace vector table (TRVT)                         */
/* TTCH     IHATTCH  IEA2D520 78.1                                   */
/*          System Trace Table Snapshot Copy Header                  */
/* TTE      IHATTE   IEA2D520 79.1.1                                 */
/*          System trace table entry (TTE)                           */
/* TXTFT    IEFTXTFT IEA2D520 80.1.1                                 */
/*          C/I Text Format Mapping                                  */
/* UCB      IEFUCBOB IEA2D520 81.1.1                                 */
/*          UCB Mapping Macro                                        */
/* UCM      IEECUCM  IEA2D520 82.1                                   */
/*          UNIT CONTROL MODULE (UCM) DEFINITION                     */
/* UPL      IEFZB461 IEA2D520 83.1                                   */
/*          UCB Pointer List                                         */
/* URLB     IOSDURLB IEA2D520 84.1                                   */
/*          URLB - Unconditional Reserve block                       */
/* UXPARMA  IEFZB478 IEA2D520 85.1.1                                 */
/*          Volume ENQ User Exit Communications Area                 */
/* UXPARMB  IEFZB479 IEA2D520 86.1.1                                 */
/*          Volume Mount User Exit Communication Area                */
/* UXPARMC  IEFZB480 IEA2D520 87.1.1                                 */
/*          Specific Wait User Exit Communication Area               */
/* UXPARMD  IEFZB481 IEA2D520 88.1.1                                 */
/*          Offline Devices User Exit Communication Area             */
/* VAT      IEFZB611 IEA2D520 89.1                                   */
/*          Virtual Address Table                                    */
/* VCB      IHAVCB   IEA2D520 90.1                                   */
/*          VIO Control Block                                        */
/* VFCB     VIRTUAL  IEA2D520 91.1                                   */
/*          N/A                                                      */
/* VFDE     IHAVFDE  IEA2D520 92.1                                   */
/*          Virtual Fetch Directory Entry                            */
/* VFPM     IHAVFPM  IEA2D520 93.1.1                                 */
/*          Virtual Fetch Parameter List                             */
/* VFVT     IHAVFVT  IEA2D520 94.1                                   */
/*          Virtual Fetch Vector Table                               */
/* VFWK     IHAVFWK  IEA2D520 95.1                                   */
/*          Virtual Fetch Work Area                                  */
/* VRAMAP   IHAVRA   IEA2D520 96.1.1                                 */
/*          Variable Recording Area                                  */
/* VSL      IHAVSL   IEA2D520 97.1.1                                 */
/*          Virtual Subarea List Entry                               */
/* VSMD     IGVVSMD  IEA2D520 98.1.1                                 */
/*          VSM Descriptors                                          */
/* VSSA     IHAVSSA  IEA2D520 99.1                                   */
/*          Vector Status Save Area                                  */
/* VTSPL    IEFVTSPL IEA2D520 100.1                                  */
/*          Subsystem Vector Table Service Parameter List            */
/* VUNT     IEFZB423 IEA2D520 101.1                                  */
/*          VOLUNIT Table Entry                                      */
/* WKAL     N/A      IEA2D520 102.1                                  */
/*          N/A                                                      */
/* WMST     IRAWMST  IEA2D520 103.1                                  */
/*          System Resource Manager Workload Manager                 */
/* WPL      IEZWPL   IEA2D520 104.1.1                                */
/*          WTO/WTOR/MLWTO/WTP PARAMETER LIST                        */
/* WQE      IHAWQE   IEA2D520 105.1.1                                */
/*          WRITE-TO-OPERATOR QUEUE ELEMENT (WQE) DEFINITIONS        */
/* WSAVTC   IHAWSAVT IEA2D520 106.1                                  */
/*          Work/Save Area Vector Tables                             */
/* WSAVTC   IHAWSAVT IEA2D520 107.1                                  */
/*          Work/Save Area Vector Tables                             */
/* WSAVTC   IHAWSAVT IEA2D520 108.1                                  */
/*          Work/Save Area Vector Tables                             */
/* WSMA     IHAWSMA  IEA2D520 109.1                                  */
/*          Wait State Message Area                                  */
/* WWB      IHAWWB   IEA2D520 110.1                                  */
/*          Write To Operator Wait Block Mapping                     */
/* XCPS     IECDXCPS IEA2D520 111.1                                  */
/*          Channel Program Scan Program List/Work Area              */
/* XDBA     IECDXDBA IEA2D520 112.1                                  */
/*          EXCP Debugging Area                                      */
/* XMD      IHAXMD   IEA2D520 113.1                                  */
/*          CROSS MEMORY DIRECTORY                                   */
/* XQSRD    ILRXQSRD IEA2D520 114.1                                  */
/*          ASM Quick Start Record Extension                         */
/* XSA      IEEXSA   IEA2D520 115.1                                  */
/*          EXTENDED SAVE AREA                                       */
/* XSB      IHAXSB   IEA2D520 116.1                                  */
/*          EXTENDED STATUS BLOCK                                    */
/* XTLST    IHAXTLST IEA2D520 117.1.1                                */
/*          Extent List                                              */