SY20 0884 3_VM370_Rel_6_Data_Areas_and_Control_Block_Logic_Mar79 3 VM370 Rel 6 Data Areas And Control Block Logic Mar79
User Manual: SY20-0884-3_VM370_Rel_6_Data_Areas_and_Control_Block_Logic_Mar79
Open the PDF directly: View PDF .
Page Count: 342
Download | |
Open PDF In Browser | View PDF |
File N-o. 8370-36 Order No. 8Y20-0884-3 IBM Virtual Machine Facility/370: Data Areas and Control Block Logic Systems I Release 6 PLC 1 This publication, together with the VM/370 System Logic and Problem Determination Guide, Volumes 1, 2, and 3, is intended for use by system programmers responsible for updating VM/370. This publication contains descriptions of the major data areas and control blocks used by three of the components of VM/370, the Control Progra...TTI (CP), the Conversational Monitor System (eMS), and the Remote Spooling Communications Subsystem (RSCS). To use this publication effectively and to understand it thoroug.llly, the following publications are prerequisite: IBM System/370 Principles of Operation Order No. GA22-7000 IBM OS/VS, DOS/VS, and VM/370Assembler Language, Order No. GC33-4010 --...--------- ----~ -- - - . --------.. -~- -~- This is a aajor revision of, and obsoletes. 5120-0884-2 and Technical Bewsletters 5B25-0413, 5125-0453, and 5125-0466. This edition applies to ~~!~ § R1~ 1 (Prograa Level Change) of the IE! Virtual !achine Facility/370, and to all subsequent releases unless otherwise indicated in new editions or Technical Bewsletters. Technical changes and additions to text and illustrations are indicated by a vertical bar to the left of the change. Changes are periodically aade to the inforaation herein; before using this publication in connection with the operation of IB! systeas, consult the latest I~~ ~st~!Ll1Q ~!Qli2[raphy, Order Ro. GC20-0001, for the editions that are aFplicable and current. Publications are not stocked at the address given below; requests for copies of IB! publications should be aade to your IE! representative or to the IB! branch office serving your locality. A fora for readers' coaaents is provided at the back of this publication. If the fora bas been reaoved, co.aents aay be addressed to IE! corporation, Y!/370 Publications, Dept. D58, Eldg. 706-2, P.O. Box 390, Poughkeepsie, lew york 12602. IB! aay use or distribute any of the inforaation yOu supply in any way it believes appropriate without incurring any Obligation whatever. Iou aay, of course, continue to use the infor.ation you supply. © copyright International 1979 Business !achines corporation 1916, 1977, Preface This publication contains descriptions of major data areas and control blocks used by the three major components of V"/370. The three cOllponents are: I • The Control Prograll (CP) I • The Conversational Monitor System (CMS) I • I The Remote Spooling Subsystem (RSCS) • • Facil!llL37.Q: Service Routi!!es 19qic, Order No. SY20-0882. RELATEr PUBLICATIONS Comllunications There are three sections appendixes, as follows: • 8afl!in~ £IQgIg~ and This putlication conjunction with: should be used in five "Section 1. CP Data Areas and Control Blocks" contains information about CP data areas and control blocks. "Section 2. CMS Data Areas and Control BloCKS" contains information on CMS data areas and control blocks. "Section 3. RSCS Data Areas and Control Blocks" contains information on RSCS data areas and control blocks. 1 Control Pr.Q.9!U (Q), Order No. 5Y20-0886 !olum~ !oly!~ (CM~), ~X~~~~ l Conversatienal MCni!.Q£ sys!~ Order No. Sy20-0887 ~~~2~~~~~~ Guide, Order No. GC20-i807 • "Appendix A. CP and RSCS Equate Symbols" contains assembler language equate symbols used by CP and RSCS to reference data. • "Appendix B. RSCS Control Areas" contains RSCS control areas that define constants and variables used during execution. • "Appendix C. RSCS Request Elements" contains RSCS request eleaents that are the tables used by RSCS for task-to-task communication. • "Appendix D. CMS Equate contains CMS equate symbols. • "Appendix E. Data Areas and Control Block References" contains information on the modules that reference data areas and control blocks. For information on how to use the fourth component interactive problem centrol system -- and its facilities, the hardware and software support perscnnel or the installation system programmer should use: IEM Virtual Machine Facility/370: !n!~~£!!ve pro~le~ CO~lrol system (IP~~) .!!§~I~ Guide, Order No. GC20-1823,. Symbols" OTHER VM/370 DATA AREAS AND CONTROL BLOCKS Some data areas and control blocks that affect VM/370 service and support programs are not included in this publication. Information on these data areas and control blocks can be found in the I~~ ViItua! This publication addresses and describes the major control blocks associated with CP, CMS, and RSCS. Generally, data areas, or scratch areas that are created and exist only during the execution ef a particular module are not described in this publication. In this publication, the data areas and control blocks are arranged in alphabetical order by DSECT name. The CMS and RSCS cOllponents operate under control of CP. Each component creates, updates, and erases its own control blocks and data areas. Preface iii Control blocks and data areas are blocks of related information applicable to one or aore system functions. They are usually defined by the DSECT instruction. The blocks can reflect current status, history information, or combinations of both, applicable to VM/310 functions. Control blocks and data areas provide the linkage and information for the user, the hardware, and the programs to vork as one entity for the successful execution of a job, task. or process. The following terms in this publication, refer to the indicated support devices: For every data area or control block, a statement is given that defines the use of the data area or control block. This statement is followed by a formatted block showing the fields defined in the data area or control block and the displacement into the DSECT of that field. • "2305" refers to IB! 2305 Fixed Storage, Models 1 and 2. Bead • "210x" refers to IB! 2101, 2102, and 2103 Transmission Control Units or the Integrated Communications Adapter (ICA) on the System/310 Model 135. • "2141" refers to the IBM 2141 and the 3161, unless otherwise specified. • "3210" refers to a series of display devices, namely, the IBM 3275, 3216, 3211, and 3218 Display Stations. A specific device type is used only when a distinction is required between device types. Information about display terminal usage also applies to the IBM 3138, 3148, and 3158 Display Consoles when used in display mode, unless otherwise noted. The formatted blocks for CP and CMS control areas are 8 bytes wide, showing two fullwords per line. RSCS control blocks are 4 bytes vide. Any information pertaining to the IEM 3284 or 3286 Printer also pertains to the IBM 3281, 3288, and 3289 printers, unless otherwise noted. !2te: One exception to this width rule is the formatting for PSA, where the control areas are given in 16-byte width. When the name of a field is too large to f it in t 0 the forIa_t.t_e_dli.ne, ap_oin.ter to the definition of the field is used instead of the name of the field. This pointer usually takes the form A*1, A*2, etc. When there is a particularly large field (one that uses mere than three or four lines of the formatted block), ellipses are used in the block to show that the displacement of this field is larger than can be shown in the block. • "3330" refers to the IBM 3330 Disk Stor age, .Mo.dels 1, 2, or 11; the IE! 3333 Disk Storage and Control, Models 1 or 11; and the 3350 Direct Access Storage operating in 3330/3333 Model 1 or 3330/3333 Model 11 compatibility mode. • "3340" refers to the IBM 3340 Disk Storage, Models A2, B1, and B2, and the 3344 Direct Access Storage Model B2. The use of slashes in a field indicates that the field is reserved for IBM's use. • "3350" refers to the IBI! 3350 Access Storage Models A2 and native mode. • "310x" refers to IEM 3704 Communications Controllers. • The term "3105" refers to the 3105 I and the 3705 II unless otherwise noted. The formatted block is followed by listing-related information such as the hexadecimal displacement of the field into the DSECT, the name of the field and its definition in the listing, and a brief description of the contents and meaning of the field,. iv IBM VM/310 Data Areas and Control Blocks Logic and Direct E2 in 3105 Contents SU~MARY OF AMENDBENTS •• 1.% SECTION 1. CP DATA AREAS and CONTROL BLOCKS. • • • • • • •• • • • • .1 ACCTELOK: User Accounting Block. • • .2 ACBTELOK: Accounting Card Buffer Block •• 2 ALOCBLOK: DASD Cylinder Allocation Block .4 ESCBLOK: Binary Synchronous Communication Control Block • • • • • • • • • _ • • • • 6 BUFFER • • • • • • • • • _ • • • • • ____ .8 CCHREC: Channel Check Handler Record. _ .9 CCFARM: Communications Controller Parameter List • • • • • • ~ • • • • • • 11 CHIBLOK and CHYBLOK: Virtual Channel-to-Channel Adapter Control Elocks •• _• • • • • • • _ • • • _ • • • 12 CKPBLOK: Telecommunications Checkpoint Block • '. '. _ • • • • _ • • • 14 CONTASK: Console I/O Package • • • • • • 15 CORTABLE: Storage Allocation ~able • _ • 17 CPEIELOK: CP Execute Block . . . . . . . . 18 DDRREC: Reconfiguration Macro • • • • • • 19 D!PINREC: Dump File Information Record • 20 DMPKYREC: Dump File Key Storage Record • 21 D!PTEREC: Dump File Symbol Table Record. 21 ECBLOK: Extension to VMBLOK for Virtual !achine with Relocate • _ • • _ • 22 ERRELOK: Error Block Used to Build OBR/MDR • _. • .. • • • .. .. .. • • • 24 IOBLOK: I/O Task Control Block • • • • • 25 IOERBLOK: IIO Error Information Block. - 27 IRMBLOK: Intensive Error Recording Mode Elock. • • • • • • • • • •• • • • 31 JPSCELOK: Journaling and Password Suppression Control Block • • • • • • • 32 LOCKELOK: Userid Lock Control Block. 33 MCH!RE!: Machine Check Save Area • • • • 34 !CRECORD: Machine Check Handler Record 37 MDRREC: Miscellaneous Data Recording Record. _ • • • • ~ • .. • • • • • • • .. 38 MICBLOK: Virtual Machine Pointer List for VM/370 Hardware Assist . . . . . . . . 39 MIHREC: Missing Interrrupt Handler Error Record. • • • • • • • • • • • • • • • • 40 MNHDR: VM/370 Monitor Record Header • • • 41 MNOOO: VM/370 Monitor Perform Class Record. • • • • • • • • . . . . . . . . . 42 MN001: VM/370 Monitor Perform Class Record. • • • • • • ~ • • • • • • • • • 45 MI097: VM/370 Monitor Header Records •• 46 MN098: VM/370 Monitor Trailer Record • '. 46 MN099: VM/370 Monitor Suspension Record. 47 M110I: VM/370 Monitor Response Class Records _ _ • • • • • • _ • • • • • • _ 47 MN20I: VM/370 Monitor Schedule Class Records • • • • • • • • • • • • • • • • 48 M1400: VM/370 Monitor User Class Record. 49 MN500: VM/370 Monitor Instruction Simulation Class Record • • • 50 MN600: VM/370 Monitor DASTAP I/O Count Records • • • .. • • • .. • • • • • • • • 51 MN602: Vft/370 ftonitor DlST!P Utilization Record • • • • • • • • • • • • • • • • • 52 M1700: VM/370 Monitor Seeks Class Record 53 MN802: VM/370 Monitor System Profile Class • • • • • • • • • • • • • • • •• 54 MNDEVLST: VM/370 Monitor Class 6 (DASTA P) Device List. • • • • • • • • • 55 MCNCOM: VM/370 Monitor Communications Area • • • • • • • _. • • • • • • • .56 MSSCOM: MSS Communications Control Block 59 NCPTBL: Named 3701 Control Program Table 60 NICBLOK: Network Interface Control Block 61 IPBTBL: Named 3800 Image Library Table. 63 OBBRECN: Unit Check Error Record (long Outboard Record). • • • • • • • • • • • 64 OBBREC: Unit Check Error Record (Short Cu tb oa rd Rec 0 rd). • • .. • • • • • • • • 66 OWIDLIST: CP-Owned Volumes List • • • • • 67 PAGTABLE : Translation Page Table • • • • 67 PGBLOK: Pseudo Page Fault Stack Block •• 68 PSA: Prefix Storage Area (Low Storage Lcca tions). • • • • • • • • • • • • 69 PWDIBLOK: Password Invalid Block • 78 REAL I/O CONTROL BLOCKS. • • • 79 Beal Channel Control Blocks. 79 Beal Control Unit Blocks • • 79 Beal Device Control Blocks • • 79 Input/Output Blocks. • • • • • _ .. 79 Network I nterface Control Block '. • 80 RCHBLOK: Real Channel Block. • • • • 81 RCUBLOK: Beal Control Unit Block • • 82 RCWTASK: Translated Virtual I/O CCWoo 84 RDEVBLOK: Real Device Block • • • • • • • 85 RECBLOK: DASD Page (Slot) Allocation Block • • • • • • • • • • • • • _ _ • • 89 RECPAG: Error Recording Page Record. 90 RSFLCTL: Beal Spooling Control Bloc~ 91 RSPIELOK: tteai Device Extens10n EloCK •• 91 SAVEAREA • .• • • • • • • • • • • • • 92 SAVTABLE: First Page on Saved system DASD . . . . . . . . . . . . . . . oo. 93 SDRBLOK: Statistical Data Recording Block • • • • • .. • • • • • • • • • • • 94 SEGTABLE: Translation Segment Table • • • 95 SFBLOK: SFool File Block • • • • • • 96 SHCBLOK: Spool Hold Queue Block • • • • • 98 SHETABLE: Named-Shared Segment Systems Table • • • • • • • • • • • • • • • • • 99 SFLINK: SFool Page Buffer Linkage Block.1eO SWPTABLE: Swap Table for Virtual Machine Paging • • • • • • • • • • • • • 101 SYSLOCS: System Low Storage Information Block. • • • • • • • • • •• • •• 102 SYSTBL: Named System Table. • • .103 TNSREC: "T" Type Record Format (Environmental Recording) • • • • .104 TREIT: Virtual Machine Tracing Extension to VMBLOK • .. • • • • • • • .105 TECBLOK: TOD Clock Comparator Request •• 107 UDBFBLCK: User Directory Buffer Block •• 108 UDEVBLOK: User Device Block. • .109 UDIRBLOK: User Directory Block • • • • • 110 Contents v UMACELOK: user Machine Block. .111 VIRTUAL I/O CONTROL BLOCKS. • .113 Virtual Channel Blocks. • • .113 Virtual Control Unit Blocks • • • • • • 113 Virtual Device Blocks. • • • • • 113 VCHBLOK: Virtual Channel B l o c k . 1 1 4 VCONCTL: Virtual Console Control Block .115 VCUBLOK: virtual Control unit Block • • • 116 VDEVBLOK: Virtual Device Block • . • • • • 117 VFCBELOK: virtual Forms Control Buffer Elock • • • • • • • • • • • • • • • • • 120 VMABLOK: Shared Systems Control Addition to VMBLOK • • • • '• • • • • • • 120 VMBLOK: Virtual Machine Control Block • • 121 VMCBLOK: Virtual Machine Communication Block. _ • • • • • • • • • • • .128 VMCMHDR: VMCF Message Header • • • _ •• 129 VMCPARM: VMCF Parameter List • • • _ • • 130 VRRBLOK: Virtual ReservejRelease Block .131 VSPLCTL: Virtual Spooling Control Block.132 VSPXELOK: virtual Spool Extension Block.133 IINTELOK: External Interrupt Block • • • 134 IOBR3211: Extended Outboard Recording Block. • • • • • • • • • • • • • • 135 SECTION 2. CMS DATA AREAS AND CONTROL BLOCKS. .• • • • • • • • • • • ,• • • 137 AETAB: Abend Termination option Table •• 138 AEWSECT: Abend Recovery Workspace. ..139 AtTSECT: Active Disk Table _ • • • • • • 140 AFTSECT: Active File Table • ~ • • • • . • 143 ANCHSECT: Anchor Table • • • • • • _ •• 145 EATLSECT: CMS Batch USEr Job L i-a its .... ,,146 EEOI: Boundary Box • • • • • • • • • • • 146 EGCOM: DOS/VS Partition Communication Region • • • • • • • • • • • • • • • • • 147 CMSTAXE: Terminal Attention Exit Element • • • • • • • • _ • • • • • • • 149 CVTSECT: Communication Vector Table as supported by CMS • • • • • • • • • • • • 150 DEGSECT: Debug Work Area. '• • • • • • • 152 DEVSECT: Device Table DSECT • • • • • • . • 156 DFVTAE: Device Table • • • • • • • • • • 157 DIOSECT: Disk I/O Work Area • • • • • • • 160 DMSCCB: Command Control Block. .162 tOSSECT: DOS Simulation Control Block •• 164 EDCB: Edit Control Block • • • • • • • • 166 ERDSECT: Error Handling Routine DSECT •.• 174 EXTSECT: External Interrupt Work Area •• 177 EXTUAREA: External User Area • • • • • • 179 FCBSECT: Simulated OS Control Blocks •• 180 FCBTAB: Fetch Table. • • • • • • • .184 FICL: First In Class Block • • • • • • • 185 FRDSECT: Free Chain Element Header Elocks. • • • • • • • • • • • • • .• 186 FSCBD: File System Control Block • .188 FSTD: File Status Table Entry DSECT •• .189 FSTSECT: File Status Table • • • • • • • 190 FVSECT: Fixed Variable Storage Work Area for CMS File System • • • • • • • • 191 IHADECB: Data Event Control Block • • • • 195 IOSECT: I/O Interrupt Save Area • • • • • 196 KEYSECT: Disk Key Table DSECT for BDAM Simulation • • • • • • • • • • • • • • • 197 LtRST: Loader Storage Area • • • • • • • 198 LUETAB and LUEPR: Logical Unit Block Table • • • • • • • • • • • • • • 202 vi NICL: Number in Class. • • • • • • .204 NUCON: Nucleus Constant Area • • • .205 OFSECT: Major CSECT for all I/O Operation Lists • • • • • • • • • • • • 219 OSFST: OS File Sta tus Tatle. • • • .222 OVSECT: Describes the First Few Lccations of DMSOVS • • • • • • • • • • 224 PCTAB: Progra II Check Option Tabl e. .224 PDSSECT: Directory Table for EPAM Simulation. • • • • • • • • • • • .225 FGMSECT: Program Interrupt Work Area •• 226 PIBADR: Program Information Block • • • • 227 PIB2TAB: Program Information Block Extension • • • • • • • • • • • • • • • 228 PUBADR: Physical Unit Block Table • • • • 229 PUBOWNER: Physical Unit Elock Ownership Table. • •• • • • • • • • • •• 230 SSAVE: System Save Area. • • • • • .231 SUBSECT: Subset Work Are a. • • • • • • .233 SVCSECT: SVC Interrupt Storage . • • • • • 234 SVEARA: LTA and PP Save Area DSECT • • • 238 SYSC08: System Communication Region • • • 239 SYSNA8ES: Saved Systems Names. .242 TSCBLKS: TSO Control Blocks. .243 USAVE: User Save Area. • • • • • • • 245 USERSECT: User Work Area • • • .245 SECTION 3. RSCS DATA AREAS AND CONTROL BLOCKS. • • • • • • • • • • • • • • 247 ASINE: Asynchronous Exit Element • • • • 248 BUFDSECT: SML Telecommunications Buffer.249 COMDSECT: Address Constants as Pointers.250 DEVTABLE: NPT Device Table • • • • • • • 251 FR-EE-E·:-·A Free·Blelle-at on the SupervisorElement Cueue • • • • • • • • .252 GIVE Request Table • • • • • • • .253 GIVEE: A GIVE Element. • .253 IOE: An I/O Element. • • .254 IOTABLE: An I/O Table. • .255 LINKTABL: Link Table • • • • • • • .256 RE CBLOCK: NPT Request Block. .258 ROUTE: Routing Table Entry. .259 SVECTORS: Low Storage Definitions. .260 TAG: RSCS File Descriptor. • • • • .263 TAGAREA. • •• • • • • • • • • .265 TAKE Request Table • • • • • • • .265 TANKDSEC: S8L Unit Record Tank .266 TAEEA: A Task Save Area. • • .267 TASKE: A Task Element. .269 TCTDSECT: Task Control Tatle .270 AFPENDIXES • • • • • • • • • • • • • • • 273 AFFENDIX A. CP and RSCS EQUATE SY8BOLS .275 VM/370 Device Classes, Types, 8odels, and Featurese 276 VM/370 EQUATE SYMBOLS -- Machine Usage .278 VM/370 EQUATE SYMBOLS -- Extended Centrel Registers • • • • • • • • • • • 279 VM/370 EQUATE SYMBOLS -- CP usage • • • • 280 VM/370 Registers • • • • .283 e AFPENDIX E. AIS Moniter REX Monitor SML Moniter IBM VM/370 Data Areas and Control Block Logic e ••••••••••• RSCS CONTROL Control Area Control Area Centrol Area AREAS • •• • .285 • • • • 286 • • • 287 • .288 • 291 AFPENtIX C. RSCS REQUEST ELEMENTS. • 292 Command ALERT Element Format A1. .292 Cper ational Notes. • • • • • 293 Command ALERT Element Format A2 • • • 293 Operational Notes • • • • • .294 Command ALERT Element Format LO • • .294 Operational Notes • • • • • Command ALERT Element Format L1 • • .296 .296 Operational Notes • • • • • .297 Command ALERT Element Format L2. .297 Operational Notes • • • • • Command ALERT Element Format L3 (also .298 Message Alert Element). .298 Operational Notes • • • e e 299 Command Request Element. .299 Operational Notes • • File Request Element • • • • • • 300 Operational Notes • • .300 Line Alert Element • • • • • • • 302 Operational Notes • • • • • • • 302 MeEsage Bequest Element • .303 CFeratienal Notes • • • • • • • • • • • 303 Pert Table • • • • • • • • • • • • • • • 304 CFeraticnal Notes • • • • • • 304 Terminate Request Element • .305 CFeratienal Notes. • • .305 APFENDIX D. CMS EQUATE SYMEOLS • • • • • 307 CMS Usage Equates. • • • • • .308 CMS Register Equates. • • • • • • • 309 AFFENDIX E. DATA AREAS AND CONTROL BLeCK REFERENCES. • • • • • • .311 Cf Control Bleck References. .312 CMS Contrel Elock References • • 321 RSCS Control Elock References. • • • 326 Contents vii FIGURES Figure 1. Figure 2. viii CP Control Block Relationships ••••••••••••••• ~.1 CftS Control Block Relationships •••••••••• _ •• ~.137 IBft Vft/370 Data Areas and Control Block Lcgic Summary of Amendments for SY20-0884-3 VM/370 Release 6 PLC 1 3800-1 PRINTER SUPPORT of the active Monitor spool file frequently enough to support real time data reduction and display. Be!: Documentation and Program Support VM/370 now offers support for the 3800-1 unit as a dedicated virtual machine printer. The 3800~1 is also as a VM/370 spooling device. 3850-2 VIRTUAL MACHINE MSS SUPPORT !~!: Program and Documentation VM/370 now supports the 3850-2 MSS to permit most operating systems that are running in the virtual machine environment access to data on ftSS virtual volumes. SECURITY JOURNALIIG SUPPCRT !~; Program Feature VH/370 now supports the journaling of LOGONs and AUTOLOGs specifying invalid passwords and the journaling of all linkages. This is accomplished via the generation of type 04, OS, and 06 accounting records. The new support is specified in the SYSJRL macro in DMKSYS. 4331 AND 4341 PROCESSOB SUPPOBT PASSWORD-ON-THE-COMMAID-LIIE SUPPRESSION !~: !~!: program Feature Vft/370 now supports the suppression of the entering of passwords on the command line for LOGON, AUTOLOG, and LIIK. The intent is to force passwords to be typed upon a mask. The new support is specified via the SYSJRL macro in DMKSYS. It is optional and must be implemented at system generation time. Privilege class A users can use the JOURNAL operand of either the SET or QUERY commands. MULTIPLE ALTERNATE CONSOLE SUPPOBT !~!: program and Documentation VM/370 supports 4331 and 4341 processors offering compatibility with the new model IDs as well as the S/370 BAS funciton subset. MISCELLANEOUS !~: Documentation and Program The following features and enhancements are now supported by VM/370. • 3203-5 Unit • Special Messages facility • Trace Table size generation option • Modification handling • 3031 Alternate Processor • 12 and 16 Megabyte Processors • Directory hooks Program and Documentation VM/370 supports the specification of multiple alternate consoles at system generation time. MONITOB ENHANCEMENTS SUPPORT of as a Shared system Segment Ne!: Program and Documentation VM/370 supports the enhancement to the Monitor module which permits the analyst the option to specify periodic closing Summary of Amendments ix Suamary of Aaendments for SY20-0884-2 as updated by SN25-0461 VM/370 Release 5 PLC 12 VARY PROCESSOR SUPPORTED BY VM/370 !~!: Documentation and Program Support When a system h~s been generated for attached processor operations, use of a command, VARY PROCESSOR new ONLINE/OFFLINE, facilitates the transition to or from uniprocessor mode on the main processor. This command can be used to vary a specified processor offline or online without any serious disruption to systea users. x IBM VM/370 Data Areas and Control Blocks Logic summary of Amendments for SY20-0884-2 as updated by SN25-0453 VM/370 Release 5 PLC 6 ALTERNATE TRACK FOR 3340/3344 NOW SUPPORTED BY VM/370 Mew: Documentation and Program Support New code has been added for VM/370 support of 3340;3344 alternate track facility~ These changes affected the following modules: IOBLOK IOERBLOK Summary of Amendments xi xii IBM VM/370: Data Areas and Control Blocks Lcgic "'IiI .... t-i \0 Ul~ ~. ~ 1'1 .... gUl eUl PSA (Prefix Storage Areal (1) ASYSVM -I--- --- Ul (1) r+~ n CORTI\BLE n CORVM CORFPNT CORBPNT I:I"~. (1)0 1'11:1 I'd (1)0 0 1:1 ..... 0 PI 1:1 r+ r+r+ 1'1 CORFPNT 0 ..... ~'PI o CORBPNT 1:1" ..... CORFPNT ~·OI CORBPNT 0 ~(1) 0 CORSWPNT CORPGPNT ~ Ul Ul ---1---_ 0 01'1 !XI /-t)~. (1) ..... O~ r+ 1:10 o PI 0 1:1 Main 1/0 Link Ul I:J" ..... 0 t:f/-t) .~ vc.U'WK. 8K. ~. I'd Ul ..... r+ 01:1" ECBLOK ~(1) UlEl en PI r+w. (1) 0 r+ 00 (1) 1'1 PIn EXTCPTRQ ~. 0 1:1 001 r+~ n ~PI It1 t::I PI S.HADOW r+ PI ~ 1'1 IT) PI Ul PI 1 ___ n_" IL--J n r+ 1'1 0 ..... tJj ..... NICBLOK ~ 'J' SHADOW SEGTABLE SEGPAGE I . :::l ...Jr, ("') ." C HPI 1'1 Q) PI Q) (1) Ul PI 1:1 OJ 0 0 1:1 ti· H 0 1-' b" 1-' 0 n ="" rn r+ » ... CD Q) en Q) :::l C. ("') 0 :::l r+ ... • 2- ~ txJ 0 0 X" ~ n O· g.1'd .... 0 1:1 ~. r+1:I ~Ul ~. 01 • Ul Ul ttl 1:1 ~ 1:11:1 ~. Ul \,Q .... (D ,:::: H 0" (') " en ACCTBLOK, ACNTBLOK lCCTBLOK provides header information points to ACCTBLOK. for spool files. o ACCTUSER 8 ACCTACNO 10 ACCTDIST Field Name Hexadecimal Displacement 0 8 10 The VMACCUBT field in the VMELCK Field Description, Contents, Meaning ACCTUSER DS ACCTACNO DS ACCTDIST DS CL8 CL8 CL8 ACCTLENG EQU (*-ACCTBLOK)/8 Size of ACCTBLOK in doublevords (X'03') Virtual machine identification Virtual machine accounting number Virtual machine distribution number ACNTBLOK provides accounting and statistical information on each user that bas used VM/370 facilities. The ARSPAC field in the Prefix Storage Area (PSA) Foints to the start of the chain ef ACNTBLOKs. o ACNTCCW ACNTNEXT 8 ACNTDATA r 58 Hexadecimal Displacement ------------ 2 ACNTBACK I Field Name Field Description, Contents, Meaning -------------------------------------- 0 8 C ACNTCCW DS ACNTNEXT DS ACNTDATA DS D F CL80 Punch CCW fer accounting card Address of next ACBTBLOK in chain Accounting information (see "Fermat for Oser Cards") Address of previous ACNTBLCK in chain 5C ACBTBACK DS F ACNTSIZE EQO C*-ACBTBLOK) /8 Size of ACN'IBLOK in doublewcrds (X'OC') IBM VM/370 Data Areas and Control Block Logic ACNTBLOK • Format for User Cards The fields below represent the 80 bytes defined by ACNTIATA in the ACNTBLCK data area. ACNTUSER 8 10 ACNTOSER (cont.) 10 ACNTNOM (cont.) 20 ACNTNOM ACNTSTOP 28 ACNTCONT ACNTTIME 30 ACNTVTIM ACNTPGRD 38 ACNTPGWT ACNTIOCT 40 ACNTPNCH ACNTLINS 48 I IIIIIII/IACNTR SV 111/11/1/11111 ACNTCRDS 50 --------------------------------------------------------1 III ACNTRSV1 (cont.)IIIIIIIIII/II/ACNTRSV2111/1111111111 58 III A*1 Hexadecimal Displacement ----------- IIIII ACNTCODE Field Name Field Description, Cont~=~s, Meaning C 14 1C 28 2C 30 ACNTOSER ACNTNOM ACNTSTOP ACNTCONT ACNTTIME ACNTVTIM ORG DS DS DS DS DS DS ACNTDATA CL8 CL8 CL12 1F 1F 1F Virtual machine identification virtual machine accounting number Date and time of accounting MMDDYYHHSS Number of seconds connected Milliseconds of processor time used Milliseconds of virtual processor time used 2C 30 ORG ACNTDEVC DS ANCTNCYL DS ACNTTIME XL4 1H Device code (CTF!); see the DEVTYPE copy file Number of cylinders of T-disk sFace 34 38 3C 40 44 48 4C 54 5A ACNTPGRD ACNTPGWT ACNTIOCT ACNTPNCH ACNTLINS ACNTCRDS ACNTRSV1 ACNTRSV2 ACNTCODE 1F 1F 1F 1F 1F 1F 2F XL6 1H Total page reads Total page writes Virtual 510 count for nonsFooled 1/0 Virtual card count for spocled Funch Virtual line count for spooled Frinter Virtual card count for spooled reader Reserved for IBM use Reserved for IBM use Accounting card identification code £g!£ DS DS DS DS DS DS DS DS DS £gg~§ DC DC DC DC fg! ACNTCODE C'Co'C'x1' C'x2' C'x3' User User User User formatted accounting card virtual machine accounting card dedicated device accounting card temporary disk space accounting card where: X---C x =0 if the card is initiated via a DIAGNOSE Code X'4C' if the card is initiated via CP command Frocessing Section 1. CP Data Areas and Control Blocks 3 ALOCBLOK ALOCBLOK provides information on the temporary disk space availatle to a virtual machine. The RDEVALLN field in the RDEVBLOK points to the ALOCELCK. o 8 10 Hexadecimal Displacement o 4 6 8 ALOCPNT ALOC8AI i 1 ------------------------------------------------------1 ALOCNTMP t//////////////////////////////////////////I ------------------------------------------------------1 ALOC!UP 1 Field Name Field Description, Contents, 8eaning ALOCPNT ALOCUSED ALOCMAI ALOCNTMP DS DS DS DS DS 1F 18 18 18 38 Pointer to next lLOCELOK on chain Number of nontemporary cylinders Maximum number of cylinders available Number of nontemporary cylinders Reserved for IBM use ALOCMAP DS OF Cylinder allocation bit mat A 10 ALOCUSED Bits defined in ALOCMIP (j-;;-cylinder is available 1 = Cylinder has been assigned Note: The size of ALOCftAP is ~ariable and depends uton the number of cylInders on the device. Generally. the size of the lLOCELCK is determined by the following formula: No. of Cylinder (ALOCIUI+63) ALOCSIZE(doublevords) = -----------64 + 2 = ------------------Bits per doublevord + vhe!~: lLOCM11 for for for for for for for for for for for for 2305-1 2305-2 2314 3330-1 3330-2 3330-11 3333-1 3333-11 3340-35 3340-70 3350 all others = = = = = = = = = = 48 cylinders 96 cylinders 203 cylinders 404 cylinders 404 cylinders 808 cylinders 404 cylinders 808 cylinders 349 cylinders 698 cylinders 555 cylinders 1 cylinder Note that any bits in the map that represent cylinders nct present on the device are set to 1. 4 6 ORG ALOCCYL1 DS ALOCCYL2 DS ALOCUSED 1H 1H First cylinder of T-disk area Last cylinder of T-disk area ~I!~ g~!ined !D !~OCMIP X·OO· = Cylinder is available 4 IBM VM/370 Data Areas and Control Block Logic header lLCCBLOK I'AA' = Cylinder has been allocated Note: The size of the T-disk ALCCMAP is variable aDd depends upon the nu.ber of cylinders in the range ALOCCYL1 to ALOCCYL2. Generally, the size of a given block is determined by the following formula: (ALOCCYL2-ALOCCYL1+1+7} ALOCSIZE(doublevords) = { ------------~--------- +2 = + header { ~~~~::-~:-:::~~~::~~~::~:~~:~--} Bytes per doublevord Note that bytes for cylinders that are not available are marked assigned. Section 1. CF Data Areas and Centrol Elocks 5 BSCBLOK ESCBLOK provides status, control information buffers (necessary for polling and addressing), and channel progra.s for 3270 re.ote equipment. The BDEVESC field in the RDEVBLOK points to the BSCBLOK. o BSCSCCW1 8 BSCSCCW2 10 BSCSCCW3 18 BSCPCCW1 20 BSCPCCW2 28 BSCPCCW3 30 BSCPCCW4 38 BSCECCW1 40 BSCECCW2 48 BSCUECCW 50 BSCSEL 58 B*2 1 B*3 I 60 1 BSCINDEX B*1 I//////////BSCRISVD/////////// I BSCSPTR BSCAUSER 1----------------------------------------------------BSCUCOPY BSCRSTRT 1----------------------------------------------------1 BSCCNT 1 BSCSENSE BSCRCVD BSCSEND 1--------------------------------------------------1//////BSCUSER1///////////1 BSCRROBN 1----------------------------------------------------I BSCTMRQ BSCRESP 68 1 70 78 80 I------------------------------------~ 88 I 6 BSCREAD IBM VM/370 Data Areas and Control Block Logic ESCELOK Hexadecimal Displacement o 8 10 18 20 28 30 38 40 48 50 57 Field Name BSCSCCi1 BSCSCCi2 BSCSCCW3 BSCPCCi1 BSCPCCi2 BSCPCCi3 BSCPCCi4 BSCECCi1 BSCECCi2 BSCUECCi BSCSEL BSCFLAG Field Description, Contents, !eaning DS DS DS DS DS DS DS DS DS DS DS DS 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 7X 1X B*1 §it§ g~!ined in BSCF1!G BSCRVI EQU -1-;80-;-BSCENQ EQU X'40' BSCCOPY EQU X'20' BSCOPIED EQU X'10' BSCREGEN EQU X'08' BSCTSTRQ EQU X'04' BSCLOG EQU X'02' BSCSCAN EQU X'01' 58 BSCFLAG1 DS ~it§ g~!!~Q BSCETB BSCIGN BSCPA 1 BSCINBID BSCFORCE BSCHALT EQU EQU EQU EQU EQU EQU 1X B*2 BSCELOK flags in BSCFLAG1 Station transmitted tlock record Ignore block record Indicator to call DMKCF!BK Initial bid sequence required User FORCE in progress Halt I/O has been issued fcr this device X'40' X'20' X'10' X'08' 1'04' BSCLINE DS BSCINDEX DS 1X 1H 5C 60 BSCRESVD DS BSCSPTR DS 4X 1F 64 68 6C 70 72 74 76 78 7C 80 84 86 BSCAUSER BSCUCOPY BSCRSTRT BSCCNT BSCSENSE BSCRCVD BSCSEND BSCUSER 1 BSCRROBN BSCTMRQ BSCRESP BSCREAD 1F 1F 1F 1H 1H 1H 1H 1F 1F 1F 1H CL264 BSCSIZE1 EQU BSCSIZE2 EQU BSCSIZE EQU Sending RVI response Enqueued in data from station COPY function is active Initiate COpy function Regeneration error Ignore input precessing Eypass FORC! message at logoff Second scan for write request -X'80-'-- 59 5A DS DS DS DS DS DS DS DS DS DS DS DS CCi for write reset operation CCW for addressing or selection CCli for read response to selection CCli for write reset operation CCli for general/specific polling CCli for NOP command CCli for read text CCW for write error response CCW to transfer control to read CCW CCW for read response on time-out Addressing/polling entry ESCELOK flags B*3 Line coordinate for input area Index value for available space in inFut buffer Reserved for IBM use Write CCi string address and/cr address of buffer Address of active resource Address of COpy requestor's NICELOK Address of restart CCli string Retry count Sense bytes from remote staticn Expected received ACK (ACK-0/ACK-1) Sending ACK (ACK-0/ACK-1) Reserved for IB! use Address of active user in queue Pointer to TRQBLOK for poll delay Response buffer for selecticn Read buffer for polling *- (ESCREAD+ 1) Read buffer size in bytes (BSCREAD-BSCBLOK) ESC header size in bytes (*-ESCBLOK+7)/8 ESC blocksize in doublewords (X'19') Secticn 1. CP Data Areas and Control Elocks 7 BUFFER BUFFER is a buffer area that contains console inFut to te used by CP. in the VCONCTRL block points to BOFFERM o BOFIN BUFNXT 88 Bexadeciaal Displacement -----------0 88 8C EUFCNT Field Naae BUFIN BUFNXT BUFCNT Field Description, Ccntents, !eaning DS DS DS CL136 1F 1F Input line Pointer to next byte in BUFFER Count of characters in input line Bits defined in BUFCNT BUFINLTHEOU --L'BUffi' BUFSIZE 8 The VCONREOF field EOU (*- BUFFER) Size of input line in bytes (136) /8 Size of console buffer in doublevords (X'12') IBM VM/370 Data Areas and Control Block Logic CCBREC CCBREC provides statistical data for error recovery and/or error recording previously Ferfor.ed channel operation that did not successfully complete. o i C*1 1 C*2 I C*3 C*4 10 CCB!DL CCCPUID 18 CCPROGID 20 FAILADD 30 FAILCCW 38 FAILCSW CCBCUA C*7 CCB!CEL CCBCHCUA CCBCLCGL CCBLOG 50 Bexadecimal Displacement I/C*6//1 CCDIVTYP FAILECSW 40 o 1///CCSW2REV//1 C*5 CCDATE 8 48 related to a Field Name Field Description, Contents, !eaning CCRECTIP CCOPSIS CCSW1 CCSW2 CCSW2REV DS DS DS DS DS 1X 1X 1X 1X 2X t:. CCRECNT DS 1! 7 8 10 14 CCRECNT1 CCDATE CCCPUID CCBMDL DS DS DS DS 1X 1D 1F 1B 16 CCB!CEL DS 1B 18 20 30 38 40 CCPROGID FAILADD FAILCCW FAILCSW FAILECSW DS DS DS DS DS 1D SB 1D 1D 1F Record type Operating system Switch 1 switch 2 Reserved for IB! use Record count Reserved for IB! use Date and time Processor identification Processor model number (for example, 0158, 0168, etc.) Maximum length of machine extended logout area (model dependent) User identification Active I/O units Failing CCW Failing CSW Failing ECSW 40 ORG FAILECSW IGPRGFLG DS CL1 Program flag bits 1 2 3 4 U ~it§ g~fined CCBSIOB CCBINTB CCBTIO CCBBIO CCBSNSB CCBCNTB CCBNRIB EQU EQU EQU EQU EQU EQU EQU C*1 C*2 C*3 C*4 C*5 C*6 in IGPRGFLG -X'SO' X'40' X'20' X'10' X'04' X'02' X'01' Start I/O bit Interrupt bit Test I/O bit Halt I/O bit Sense data stored bit count valid bit No retry bit Section 1. CP Data Areas and Centrol Elocks 9 ~CHREC Hexadecimal Displacement 41 42 43 Field Name IGBLAME Field Description, Contents, Meaning DS CL1 Probable source of error Bits defined in IGBLAME CCHCPU--EQU --X'8-0-'-CCHCHIL EOU X'40' CCHSCUB EOU X'20' CCHSTG EOU X'10' CCHINTFC EOU X'OS' Processor is source of error Channel is source of error Storage control unit is source of error Storage is source of error Control unit is source of error IGVALIDB DS Validity indicator bits CL1 J!it§ g~fi~g in IGVALIDB CCHINTFV EOU -X'SO' CCHRCV X'10' EOU CCHUSV X'OS' EOU CCHCMDV EOU X'04' CCHCAV X'02' EOU CCHDAV X'01' EOU Interface address valid Sequence code valid Unit status valid Command address valid Channel address valid Device address valid IGTERMSO DS Termination/sequence code bits CL1 J!it§ g~fi!led 1.n IG!ERMSg COMPSYS EOU X'CO' COMPSEL EOU X'SO' COMPFES EOU X'40' CCHIOH EOU X'10' COMPID EOU X'OO' CCHDI X'OS' EOU 44 4S 49 4C 4E 50 50 50 50 54 54 10 syste. reset Selective reset stop, Stack, or nor.al termination I/O interface inoperative Interface disconnect I/O et"ror alert Seguence RTCODEO RTCODE1 RTCODE2 RTCODE3 RTCODE4 RTCODE5 RTCODE6 RTCODE7 Code Bits EOO X'OO' X'01' EOU X'02' EOU X'03' EOU X'04' EOU X'05' EOO X'06' EOU EQU X'07' CCDEVTYP CCHANID CCHCUA CCHCHCUA CCHCLOGL DS DS DS DS DS 1F CL1 CL3 2X 2X CCHSIZE EOU (*-CCHREC) /S Size in doutlevords (X'OB') CCHLOGSO CCHLOG70 CCHLOG60 CCHADDR DS DS DS DS OCL 112 OCL24 OCL24 1F 2SS0 2870 2S60 Unit CCHSIZE1 EOU (*-CCHREC) Size in bytes for integrated channel CCHLOG45 DS CCHLOG35 DS OCL96 OCL24 Model 145 integrated channEl (96 bytes) Model 135 integrated channel (24 bytes) Retry code values for the constructed ECSW C*7 CP dEvice type Channel identification Actual failing device address Address fro. .achine location X'EA' Length of channel logout IBM VM/370 Data Areas and Control Block Logic channel channel channel address - 112 bytes - 24 1:ytes - 24 tytes stored 1:y integrated channel CCPABl! CCPABM provides control information used for loading and controlling the 370X Communication Controller Network Control Program, Emulation Program, and Partitioned Emulation Program and their attached resources. o CCPNAl!E 8 10 18 20 CCPADDB CCPSIZE CCPPSIZB CCFENTBY C*2 CCPHBFSZ C*3 CCPHBFNO 28 Hexadecimal Displacement -----------0 8 2 10 14 18 C*5 C*6 I CCPMAXID CCPBBSID Field Nalle CCPNAME CCPADDB CCPSIZB CCPPSIZB CCPBNTBY CCPTYPB Field Description, Contents, l!eaning DS DS DS DS DS DS Ct8 1F 1F 1F 1F 1X CPNAl!E specified in NAl!ENCf macro Origin of centrol program image Control program size in bytes Parameter list size in bytes Control program entry point address Control program type flag C*1 Bits defined in CCPTYPE CCPTNCP--EQU--X'O'-'CCPTBP EQU X'02' CCPTPEP BQU X'03' 19 1A CCFSTOB I/C*4//1 CCPCAONE DS CCPCATiO DS 1X ;1 Network control program 270x emulation program Partitioned emulation program C*2 C*3 First channel adapter type flag Second channel adapter tYPE flag Bits defined in CCPAONB and CCPATiC CCPTYPE1 BQU X'01' Channel adapter type 1 CCPTYPE2 BQU X'02' Channel adapter type 2 1B 1C 20 22 24 25 CCPBSV1 CCPSTOR CCPHBFSZ CCPHBFNO CCPPADO CCPPAD1 DS DS DS DS DS DS 1X 1F 1H 1H 1X 1X Beserved for IBl! use 370x storage size specified (in bytes) Euffersize from HOST macre Number of buffers in read list First buffer pad count (in bytes) Subsequent kuffer pad count C*4 C*5 C*6 BI CCPVPAD1 EQU 34 ~]2rt for 370x 34-tyte pad in first bisynchrenous transmitter buffer 34-byte pad in subsequent buffers 26 28 CCPIUXID DS CCPRBSID DS 1H 1F Highest resource ID defined Besource ID definition 28 29 2A ORG CCPRSTYP DS CCPRSTAT DS CCPRSTEP DS CCPBBSID 1X 1X 1H Definition kreakdown Resource type flag Resource initial status flags Subchannel address wben in EF mode HOSl !glyes ~~gui!~Q CCPVPADO BQU 34 !J!L370 Section 1. CP Data Areas and Centrol Blocks 11 CBXBLOK,CBYBLOK CBXBLOK and CBYBLOK provide the necessary control for a virtual machine using a virtual channel-to-channel adapter (CTCA). The VDEVBEAL field in the VDEVBLCK points to CBIELOK and CBYBLOK fer virtual CTCAs. 0 8 CBXOTBB X*l CBYOTBR X*2 , X*3 I X*4 Y*l I Y*2 10 CBXNCCW CBYNCCli 18 CBIBCNT CHYRCNT 20 CBXSTAT CBXYADD CBYSTAT 28 CBXIDAW CBYIDAli 30 CBXCNCT CHYCNCT 38 CHXDATN CHYDATN Y*3 Y*4 CBYXIDD lote: As indicated in the illustrated block, the CBIBLOK and CHYELCK are interleaved with a 4-byte displacement. The X-side VDEVELOK points to the +0 slot, the Y-side VDEVBLOK points to the +4 slot; however, once the virtual connection is made, either side can be the X-side or the Y-side since this interleaved arrangement makes the contrel block references completely symmetrical. The dual DSICT definition allows the active adapter (defined to be the I-side, arbitrarily) to reference beth adapter sides concurrently wi-thout knowing whether i t i s at +0 or +4. Bexadecimal tisplacement o 8 Field Name Field Description, Contents, Meaning CBXBLOK I-side channel adapter block CBXOTBB CBXFLAG DS DS ~it§ g~!!~g 9 A CBBl!NOP CBBM370 CHBATTN CBBREST CBBEOFL CBBBIO CBBWAIT CBBCENT EQU EQU EQU EQU EQU EQU EQU EQU CBXCMDB CBXCMDT DS DS ~!!§ g~!!~g CBBCTNL CBBRDBK CBBWEOF CBBSCMD CBBSADS CBBREAD CBBWRIT 12 EQU EQU EQU EQU EQU EQU EQU 2F lX X*l Vl!ELCK address of Y-side adapter user Internal processing flags in CBIFLIG -X'80'- Modified NOF command issued (also in CMDT) CTCA operating in Systea/370 mede Attention pending from Y-side CTCA has been reset I-side and Y-side Force EOF to next READ instruction Halt I/O or halt device issued CPEXELOK available--for channel reconnect Channel end has b.~n preserved en SIO X'40' X'20' X'10' X'08' X'04' X'02' X'Ol' lX lX X*2 X*3 Active CCW command byte buffer Active CCli command type (Rt, WB, etc.) in CBICMDT -X'40'X'20' X'10' X'08' X'04' X'02' X'Ol' Control, other than NOP Read backward Write EOF Sense command byte Sense adapter status Bead write IBM VM/370 Data Areas and Control Block Logic CBXBLOK,CBYELCK Hexadecimal Displacement -----------B C 10 18 20 22 24 28 30 38 Field Name . Field Description, Contents, eeaning CBXIDAW CBXCNCT CBXDATN DS DS DS DS DS DS DS DS DS DS 1X 4X 2F 2F 1B 1B 2B 2F 2F 2F CBBSIZE EQU (*-CBXBLOK)/8 CHXPKEY CHXNCCW CHIRCNT CBXSTAT CHXYADD X*4 CBYBLOK o 8 CBYOTBR CBYFLAG 9 DS DS CBBMNOP CBBM370 CBBATTN CBBREST CBBEOFL CBBBIO CBBWAIT CBBEENT EQU EQU EQU EQU EQU EQU EQU EQU CHYCMDB CBYCMDT DS DS 2F 1X Y*1 Modified NOF command issued (also in CMDT) CTCA operating in System/370 mode Attention pending from X-side CTCA has been reset X-side and Y-side Force EOF to next READ instruction Halt 1/0 or halt device issued CPEXELOK availatle for channel reconnect Channel end has been preserved cn SIO X'40' X'20' X'10' X'08' X'04' X'02' X'01' 1X 1X Y*2 Y*3 -x''4o'- B CHYPKEY 10 18 20 22 24 28 30 38 CHYNCCW CBYRCNT CBYSTAT CHYXADD CBYIDAW CBYCNCT CBYDATN DS DS DS DS DS DS DS DS DS DS VMELCK address of X-side adaFter user Internal processing flags in CBYFLAG --X'SO'- Bit§ Q~!!!!ed in CBYCMDT CBBCNTL EQU CBBRDBK EQU X'20' CBBWEOF EQU X'10' CBBSCMD EQU X'08' CHBS!DS EQU X'04' X'02' CBBREAD EQU CBBWRIT EQU X'01' C Total block size in doublewords (X'08') Y-side channel adapter block ~it§ Q~!!~Q A Virtual CAW protection key "Other" adapter control flags Next CCW fetch address (real) Remaining CCW data count tevice status accumulation field Virtual address of Y-side adaFter "Other" adaFter control flags Active indirect data list word CPEXELOK for channel reconnect IOELCK address for deferred I/O interruFt 1X 4X 2F 2F 1B 1B 2B 2F 2F 2F Active CCW command tyte buffer Active CCW command type (Rt, WB, etc.) Control, other than NOP Read tackward Write EOF Sense command byte Sense adapter status Bead write Y*4 Virtual CAW protection key "Other" adapter control flags Next CCW fetch address (real) Bemaining CCW data count Device status accumulation field Virtual address of X-side adaFter "Other" adaFter control flags Active indirect data list word CPEXELOK for channel reconnect IOELCK address for deferred I/O interruFt Section 1. CP Data Areas and Centrol Blocks 13 CKPBLOK CKPBLOK provides checkpoint information needed for VM/370 warm start recovery for 3704/3705 Communication Controllers and enabled lines and resources. Tbe RDEVCKPT field of the RDEVBLOK points to CKPBLOK. o a 10 Hexadecimal Displacellent -----------0 2 4 8 10 I CKPSIZE 1//////////CKPRSV1//////////1 --------------------------------------------------------1 CKPNAME 1 ------------------------------------------------------1 CKPBITS I Field Nalle CKPSIZE CKPRMAX CKPRSV1 CKPNAME CKPBITS Field Description, Contents, Meaning DS DS DS DS DS CKPBKSZ EQU 14 CKPRMAX 1H 18 1F CLa OD Size of checkpoint block in dcublewords Number of resources checkpcinted Reserved for IBM use 370x control program reference nalle Bit map of enabled lines or rescurces (CKPBITS-CKPBLOK)/a Header size in doublewcrds IBM VM/370 Data Areas and Control Block Logic CONTASK CONTASK contains data and control information pertinent to the control and communication between virtual and real terminal console tasks and command streams. The RDEVCON field of the RDEVBLOK and the NICQPNT field of the NICELOK point to CONTASK. 0 8 CONRE'lN CONPNT CONUSER C*1 I C*2 I CONTSKSZ 10 CONCCW1 18 CONCCW2 20 CONCCW3 28 CONCCW4 30 CONDATA (Variable Length) Hexadecimal Displacement o 4 8 Field Name CONPNT CONRETN CONSTAT Field Description, Contents, Meaning DS DS DS 1F 1F 1X C*1 liit§ ~~fi!!~~ in CONSTAT -X'80'-- Pointer to next CONTASK Pointer to SAVEAREA for return CONTASK status control flags Generate CONTASK output Respcnse expected from this CCNTASK CONTASK is active on real device This is a centrol CONTASK cnly CONTASK contains device deFendent data Retry operation in progress Output data being split via RDEVLLEN CONTASK for synchronization enly CONOUTPT CONRESP CONACTV CONCNTL CONESCP CONRTRY CONSPLT CON SYNC EQU EQO EQO EQO EQO BQU EQO EQO 9 CONPARM DS 11 A C CONTSKSZ DS CONOSER DS CONCCi1 DS 1H 1F 1D DMKQCN parameter flags (see "APFendix A. CP and RSCS Equate Symbels") CONTASK size in doublewords Address of VMBLOK for destination user First console I/O CCll 16 CONADDR CONFLAG CONDiC CONCNT ORG DS DS DS DS CONCCi1 1F 1X 1X 1H CCi data CCi flag DIAGNOSE CCll t:yte 10 ORG CONCOMND DS CONADDR 1X CCi command code 18 20 28 30 CONCCi2 CONCCi3 CONCCW4 CONDATA 1D 1D 1D OC Second console I/O CCll Third console I/O CCli Fourth console i/O CCll Output data area (variable length) (*-CONTASK)/8 CONTASK size in doublewords 10 10 14 15 DS DS DS DS CONTSIZE EQU X'40' X'20' X'10' X'08' X'02' X'01' C*2 address bits write control count Section 1. CP Data Areas and Centrol Blocks 15 CONTASK Hexadeci.al Displace.ent Field Name !!.i:!.§ 2A 2C 2E 30 31 32 34 35 36 31 33 33 34 35 36 16 ~defill!i!g CONSRID CONDEST CONRTAG CONSISR CONEXTR CONTCMD CONFUNC CONDFLG CONDCNT §.i:!.§ 30 Field Description, Contents, 8eaning ORG DS DS DS DS DS DS DS DS DS !!i!g!i!fi~g ORG CON LABEL DS DS CONSTX CON ESC DS CONCMD DS CONiCC DS CONSBA DS DS in CONCCi fo! J10x Network Control Progra. CONCCW3+2 1H Source identifier 1H Destination resource ID 1H Request tag for this CONTA5K 1X 370x system response byte 11 370x extended response byte 1H Eisynchronous terminal co •• and modifier 11 Easic device function contrel flags 11 Easic device data control flags 1H Text data length fo! 3270 CONCCi4 1x 11 11 1X 11 11 1H Return index value Start text character Esca~e character Command code for remote station Write control character Start buffer address Euffer address IBM VM/370 Data Areas and Control Block Logic CORTAELE CORTABLE maintains the status and ownership of each page frame of real sterage for use by page management routines. The ACOBETBL field of the PSI points to CORTAELE. o 8 Displacement o C*1 CORFPNT COREPNT CORSWPNT CORPGPNT Field Name CORFPNT Field Description, Contents, DS 1F En!!!, gefini!ion !2! Rgg~ ORG CORFPNT CORVM DS 1F C CORBPNT DS CORSWPNT DS CORPGPNT DS 8 COR FLAG 4 6 ORG DS ~eanin9 Pointer to next CORTABLE entry in queue Q~!shiE Pointer to VMBLOK of page ewner 1F 1F 1F Pointer to Frevious CORTAELE entry in queue Pointer to SWPTABLE for Fage Pointer to PAGTAELE for page CORSWPNT 11 C*1 CORTAELE entry status flags ~i!§ defined in CORFLAG CORIOLCK EQU --X'80-'- CORCFLCK CORFLUSB COR FREE CORSBARE CORRSV CORCP CORDISA EQU EQU EQU EQU EQU EQU EQU X'40' X'20' X'10' X'08' X'04' X'02' X'01' Page locked for IIC or CORLCNT is greater than 0 Page locked by console functien Page is in FLUSH list Page is in FREE list Page is shared Page is reserved Page belongs to the control Frogram Page disatled, not available ~nt!! ~~!initi~.!l 4 CORLCNT ORG DS i! gage Is Locked CORBPNT 1F Page lock count for CORIOLCK i! Rage !§ in Tran§it CORFLAG 1X C*1 DASD operation code for ~nt!I ~~!initi.Q.!l 8 CORCODE ORG DS D~KPAGIO Section 1. CP Data Areas and Centrol Blocks 17 CPEXBLOK CPEXBLOK maintains register values and addressing infor.ation (module address or entry point address) to handle a delayed transfer of centrol. Stacked CPEXELCKs are queued off DMKDSPRQ. o CPEXFPNT CPIXBPNT 8 CPEXMISC CPIXADD 10 Hexadecimal Displacement -----------0 4 8 CPEXREGS Field Nalle Field Description, contents, !eaning CPEXFPNT DS CPEXBPNT DS CPEXMISC DS 1F 1F 1F Pointer to next CPEXBLCK Pointer to previous CPEXBLCK Use varies with stacker Defin!!!2] !~ DM!~TK and DMKDSP ORG CPEXMISC CPEXTYPE DS 1X Type of block on CPEXBLOK chain in CPEITYPE CP_RXDEFR _EQU -X'80' CPEXPRIO EQU X'40' CPEXLPSi EQU X'20' DS 1X CPEXPROC DS 18 ~!!§ g~fi~g C 10 CPEXADD DS CPEXREGS DS !2! 10 14 18 1C 20 24 28 2C 30 34 38 3C 40 44 48 4C Return address Execute registers £~~XR~~~ !!~g CPEXRO CPEXR1 CPEXR2 CPEXR3 CPEXR4 CPEXR5 CPEXR6 CPEXR7 CPEXR8 CPEXR9 CPEXR10 CPEXR11 CPEIR12 CPEXR13 CPEIR14 CPEIR15 ORG DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS CPEXSIZE EQU 18 IF 16F Deferred interrupt request CPEXELOK with priority Load PSi to go to execution address Reserved for IBM use Address of processor related to block CPEXREGS 1F IF 1F 1F IF 1F IF 1F IF 1F IF 1F 1F 1F IF 1F Registers 0 through 15 (*-CPEXBLOK)/8 Size in doutlewords (X'OA') IBM VM/370 Data Areas and Control Block Logic tDRREC DDRREC is used in the SVC 76-initiated error recording process for tYFe 60 tlSD dumF restore (DDR) dynamic device reallocation records~ The reallocation recerds contain the replacement of the virtual "FROM" and "TO" control unit addresses (CUI) by the real addresses of the real DlSD devices. 0 DDRKEYB DtBTftEB DDRDTEB 8 10 DDRCPlD is nnll"lnl:l IJU.a.'Uv~ tDRVCL2 20 DDRVOL1 28 DDRVOL2 (cont.) ID*5 tDRCU11 30 DDRDEV1 ID*6 tDRCU12 38 DDRDEV2 Hexadecimal Displacement -----------0 2 3 4 5 6 8 C 10 I I D*1 I/D*2/I/D*3/I/t*4/1//tDRSPE1////////1 Field Balle DDRKEYB DDRSWS1 DDRSWS2 DDRSWS3 DDRRECBT DDRSPE1 DDRDTEB DDRTftEB DDRCPlD Field Description, Contents, Beaning DS DD DS DS DS DS DS DS DS 1H 1C 1C 1C 1C 1H 1F 1F 2F D*1 D*2 D*3 D*4 Type and operating system Switch byte Reserved f~r lBB use Reserved for IBM use Reserved for lBB use Reserved for lBB use Date' Time Processor identification and model number R~ice 18 20 26 2C 2D 30 34 35 38 Dependn! Rgta 81 DDRJOB DS 61 DDRVOL1 DS DDRVOL2 DS 61 11 DDRDEVP1 DS DDRCU11 DS 31 DDRDEV1 DS 41 11 DDRDEVP2 DS DDRCUA2 DS 31 DDRDEV2 DS 41 DDRSlZE EQU D*5 D*6 (*-DDRREC) Job using FROft device Voluae serial FROB device Voluae serial TO device Device identification of FRCB DlSD Primary CUI of FROB device Device type FROB de~ice Device identification TO DASD Primary CUI of TO device Device type of TO device DDR record size Section 1. CP Data Areas and Centrol Blocks 19 DMPINREC DMPINREC retains vital system register and CPDUMP file. See also DMPKYREC. o DMPCRS 80 DMPFPRS AO DMPTODCK A8 DMPCPUTft BO DMPCKCOft S*1 I/S*2//1 DMPLCORE 1CO DlJPPRFRG o AO A8 BO B8 nf!PABEND DMPPGfUP lC8 40 80 for the DlJPSYSRV DlJPPROCA 1 co Bexadeciaal Displacement values necessary DMPGPRS 40 B8 stcrage location Field Naae Field Description, Contents, f!eaning DMPGPRS DMPCRS DMPFPRS DS DS DS 16F 4D DMPTODCK DMPCPUTM DMPCKCOM DMPFLAG DS DS DS DS lD 1D 1D 1X l6F S*1 16 general registers 16 control registers Pour floating-point registers (if floating-Foint feature is installed on machine) Time-of-day clock Processor tiaer Tiae-of-day clock coaparatcr Flag byte Bits defined in DMPFLAG HiLFPiG~EQU B9 BA BC CO 1CO 1C4 1C8 20 DMPRSV1 DMPPROCA DMPSYSRV DMPLCORE DMPPRFRG DftPABEND DMPPGMAP DS DS DS DS DS DS DS --X'80'--1X 1H 1F 256X 1F 1F 4096B When on, last record in DU!P file is 2K S*2 Reserved for IB! use Abending processor address System generated storage size Absolute storage locations 0 through 255 Prefix register Abend code for failing processor Eit aap indicating Which pages aFpear in the DU!P file (each tit represents a 4K block) IBM VM/370 Data Areas and Control Block Logic DMFKYREC, DMPTBREC DMPKYREC contains the storage keys of each 2K block of main storage at the time of SVC 0 or a PSi restart condition. DMPKYREC and DMPINR!C are used for debugging operations. I I S*1 o 1---..1 DMPKEYS (4096 bytes) Field Nalle Hexadecimal Displacement ------------ Field Description, contents, Meaning 0 DMPKEYS DS 4096X 0 DMPKEY eRG DS DMPKEYS 1X Main storage keys S*1 Storage key for each 2K block DMPTBREC is a listing of all entry points in the system and their locations. o DMPSYMNM DMPSYMVA 8 10 Hexadecimal Displacement DMPSYMEN Field Name Field Description, Contents, Meaning C DMPSYMEN DS 341XL12 Symbol table entries 0 8 eRG DMPSYMNM DS DMPSYMVA DS DMPSYMEN CL8 A CSECT or entry point name Location in main storage of this symbol Section 1. CP Data Areas and centrol Blocks 21 ECBLOK ECBLOK provides an extension to the VMELOK for virtual machine operaticn extended control mode. The VMECEIT field of the VMBLOK points to ECELCK. o EITCRO EITCR1 8 EITCR2 EITCR3 10 EITCR4 lI'ICR5 18 EITCR6 EI 'lCR1 20 EITCR8 EI'ICR9 28 EITCR10 lITCR11 30 EITCR12 EI'ICR13 38 EITCR14 ll'ICR15 40 EXTSHCRO EI'ISHCR1 48 EITSHLER I EITVSEGS EI'lSTOLD 50 EITSHSEG EI'ISlGLR EI'IARCH 58 EXTPERAD EITPERCD EITCOPY 60 in syste./310 EITCPTftR 68 EITCPTRC EI'ICCTRQ Hexadecimal Displacement Field Naae o EXTCRO DS 1F 4 EITCR1 DS 1F Virtual control register 0; architecture controls Virtual control register 1; segment table pointer 8 EITCR2 EXTCR3 EXTCR4 EITCR5 EXTCR6 EITCR1 EXTCR8 EXTCR9 EXTCR10 EXTCR11 EXTCR12 EXTCR13 EXTCR14 EXTCR15 DS DS DS DS DS DS DS DS DS DS DS DS DS DS 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F Virtual control registers 2 thrcugh 15 C 10 14 18 1C 20 24 28 2C 30 34 38 3C 22 Field Description, Contents, Beaning IBB VM/310 Data Areas and Control Block Logic ECELOK Eexadecimal Displacement 40 44 48 4A 4C 50 54 56 58 5C 5E 60 68 6C Field Name EXTSHCRO EXTSHCRl EXTSHLEN EXTVSEGS EXTSTOLD Field Description, Contents, Meaning DS DS IF IF DS DS DS lH 1H EITSHSEG EITSEGLN EXTARCH EITPERAD EITPERCD EITCOPY EITCPTMR EITCPTRQ EXTCCTRQ DS DS DS DS DS DS DS DS DS 1F lH lH EITSIZE EQO Shadcw control register 0 Shadow control register 1 Length of shadow SEGTAELE in bytes Length of virtual SEGT!BLE in bytes Control register 1 value ccrresFcnding tc tatles Real address of shadow SEGTAELE Length of shadow SEGTAELE in doublewords Architecture control index Address of instruction PIR interrupt PER code to be reflected Length code from active SEGTAELE entry Virtual processor timer Address of TRQBLOK for processor timer Address of TRQBLOK for clock comFarator IF IF 1H 1H 1D IF IF (*- ECBLOK) /8 ECELCK size in doutlevords (I'OE') Secticn 1. CP Data Areas and Control Elocks 23 ERRBLOK ERRBLOK contains data describing an error condition such as a channel failure or a device failure. I o ERR KEY I/E*1//I//////////ERRRSV2////////////1 ERRDATE ERRTIME 8 10 ERRCCW 18 20 ERRPARl'I 30 ERRIOB 70 ERRIOER Hexadecimal Displacement o Field Na.e I E*2 I E*3 Field Description, Contents, !eaning 1F 1F 1F Key used to determine OBR/!DR precessing Reserved for IB! use Reserved for IB! use Time record vas built Date record vas built ERRHEADR EQU (*-ERRBLOK) Size of header in bytes 10 ERRCCW 1D Failing CCW 10 ORG ERR!UOB DS ERRMIOER DS ERRCCW (IOBSIZE) D (IOBRSIZE) D Copied IOBLeK Copied IOERELOK 10 10 ERRCCNT ERRCONT ORG DS DS ERRCCW 21 OC Size of CONTASK data buffer CONTASK data buffer (variable length) 18 1E 1F 20 30 70 ERRVOLID ERRSDR ERRCORR ERRPARM ERRIOB ERRIOER DS DS DS DS DS DS 61 2D (IOBSIZE) D (IOERSIZE) D Volid of failing device SDRILAGS from SDRBLOK Correlation count for !DR record Device dependent parameter string Copied IOELCK, see ICBLOK fer details Copied IOERELCK, see IOERBLCK fer details ERR SIZE EQU (*-ERRSIZE)/8 ERRELOK size in doublewords 3 4 8 C 24 ERRVOLID ERRKEY ERRSV1 ERRRSV2 ERRTIME ERRDATE DS DS DS DS DS DS 31 11 11 11 E*1 E*2 E*3 IBM VM/370 Data Areas and Control Block Logic IOBLOK IOBLOK contains information required to perform I/O operations. The I/O request initiator fer the I/O operation is either a CF-initiated or virtual machine-initiated event. There are five pointers to the IOBLOK: RCHFICB field of the BCHELOK, RCHFIOE field of the RCUBLOK, RDEVAIOB field of the Rt!VBLOK, VDEVFIOB field cf the VDEVBLOK, RDEVFIOB field of the RDEVBLOK. 0 r IOBRADD IOEEPNT IOBFPNT 8 10 IOBCYL IOBMI5C IOBVADD 18 IOBUSER IOBIRI 20 IOBCAW IOERCIW IOBCSW 28 30 38 Hexadecimal Displacement -----------0 2 IOBLINK 11* 1 11*2 IOBMI5C2 IOBIOER 1*3 1*4 1//IOBRSV2//I//////////1OBR5V3//////////// Field Name IOBRADD lOB FLAG Field Description, Contents, Meaning DS DS 1B 1X 1*1 Bit§ g~fi!!~g in IOBFLAG IOBCP EQO -X'8o.IOBRSTRT EQO X'40' IOBSPLT EQO X'20' EQO IOBPAG X'10' IOBRELCU EQU X'08 i IOBERP EQO X'04' IOBRES EQO X'02' EQO IOBBVC X'01' 3 IOBSTAT DS 1X ~it§ g~!!!!~g in IOBSTAT IOBFATAL EQU --X'80-'-IOBFLT EQU X'40' IOBPATBF EQU lOB MINI EQO IOBALTSK EQU X'20' X'08' X'04' EQU EQU EQO EQO X'03' X'02' X'01' X'OO' IOBCC3 1OBCC2 IOBCC1 IOBCCO Real device address for SIC IOBLCK flags CP-generated I/O operation Restarted oFeration - IOBRCAW DISC - CP split seek operation IOBLCK created for paging I/O Control unit released at initiation I/O task is under control cf ERP I/O task has been reset I/O initiated via DIAGNOSE instruction 1*2 IOBLCK status Unrecoverable error in this I/O operaticn IOELOK queued pending completion of a MSS cylinder fault Path is fixed, use IOBRADD value This is a mini-IOBLOK DASt channel program has seek tc alternate track processing CC 3, not available processing CC 2, channel busy processing CC 1, csw stored processing I/O interrupt Section 1. CP Data Areas and Centrel Blocks 25 IOBLOK Hexadecimal Displacement -----------4 8 C 10 12 14 18 1C 20 24 28 30 34 38 Field Name IOBLINK IOBFPNT IOEBPNT Field Description, Contents, Meaning 1F 1F 1F Pointer for multipath IOELCK chain Pointer to next IOBLOK in queue Pointer to previous IOBLOK in queue IOBMSIZE EOO (*-IOBLOK) /8 Multiple path IOBLOK size in dcublewcrds (X'02') IOBCYL IOBVADD IOBMISC IOBOSER IOBIRA IOBCli IOBRCAi IOBCSi IOBIOER IOBMISC2 lOB SPEC 1H 1H 1F 1F 1F 1F 1F 1D 1F 1F 1X DASt - seek cylinder for tbis ICELOK Virtual device address Ose varies according to caller Pointer to VMBLCK of user IOELCK interrupt return address Pointer to CCIl chain Pointer to restart CCIl chain Real CSIl for I/O operation Pointer to IOERBLOK with sense byte Ose varies according to caller IOELCK special requests flag DS DS DS DS DS DS DS DS DS DS DS DS DS DS 1*3 Bit§ def!~Q in IOBSPEC IOBTIO EOO --X'80-'IOBBIO EQO X'40' IOBSIOF EQO X'20' IOBIMSTK EQO X'10' IOBONSL EOO X'08' IOBCOPY EQO X'04' IOBSENS EQO X'02' IOBTRPND EOO X'01' 39 IOBSPBC2 DS 1X IOELCK request for a TIO IOBLCK request for a HIO Virtual SIO fast release Shut down StR function IOELCK resulting fro. unsolicited interrupt I/O block associated with a COpy request Sense operation for COpy request Virtual trace pending on tbis I/O block I-*4 IOB-LOK spe-cial req-uests flag-secoDdbyte ~it§ Q~fi~Q in IOESPEC2 IOBiRIP EQO --X'80-'- IOBCLN EOO X'40' IOBONREL EQO X'20' 31 3C IOBOC EQO IOBSNSIO EOO IOBREL EQO X'10' X'08' X'04' Input/output task for AOTOPCLL wrap list VDEVELOK locked when CCIl gct control Input/output task contains release, DMKONT must process Onit check status Nor.al sense operation in Frogress Channel program contains CP release IOBRSV2 IOBRSV3 1B 1F Reserved for IBM use Reserved for IBM use IOBSIZE 26 EOO (*-IOBLOK)/8 IOELOK size in doublewords (X'OS') fE IOBLOK§ ORG IOBVADD 1H IOBRCNT DS 1.Q£ 12 DS DS Retry count IBM VM/370 Data Areas and Control Block Logic IOERELCK IOERELOK contains information related to I/O and channel errors. This entails error retry, operator .essage information, and SDR (Statistical Data Recording) IOERELOK related to I/O equipment. There are three Fointers to the ICERBLCK: RDEVIOER field of the RDEVBLOK, VDEYIOER field of the VDEVBLOK, IOEIOER field of the ICBLCK. 0 ICERLCC IOERPNT 8 IOERftSG IOERDW 1*1 10 IOERADR 18 IOERCSli 20 IOERCCli 28 IOEREIT IOERCCB 30 I 1*4 ! 1*2 ! 1*3 !/////IOERSV1/////// IOERDATA 50 Additional Sense Data Area -- or -XOBR3211 Extension -- or -- Channel Check Reflection Extension Bexadeci.al Displacement ------------ Field Name Field Description, Contents, Meaning 0 4 8 IOERPNT IOERLOC IOERDW DS DS DS 1F 1F 1B A IOERftSG DS IL3 A ORG rOERNUft DS IOERIND3 DS B §i!§ g~fined IOERIGN IOERETRY IOERCAN IOEREC IOERDlSD IOERDEC IOERIIFO IOERICT EQU EQU EQU EQU EQU EQU EQU EQU IOERMSG 1X 11 in IOERIND3 1'80' X'40' X'20' X'10' X'08' 1'04' X'02' X'01' Pointer to next IOERBLOK Address of CClis used in recovery Size (in doublewords) of storage needed to construct CClis Communications with error recording processor and message writer Ereakdown for DMKftSW Message nuater for message routine Indicators for message routine Allow IGNORE response Allow RETRY response Allow CANCEL response Error occurred during recovery action Home address is present Operator decisien is necessary Infermational message Operator action is required Section 1. CP Data Areas and Centrel Blocks 27 IOERELOK Hexadecimal Displacement C Field Name Field Description, Contents, Meaning IOERIND4 DS 1X Indicators for message writer ~j!~ de!!ned in IOERIND4 IOERIGNR EQU --X'80.---IOERSTRT EQU X'40' IOERCNCL EQU X'20' D IOERFLG1 DS 1X Operator responded "ignore" Operator responded "retry" Operator responded "cancel" 1*1 Bits defined in IOERFLG1 IOERPENDEQU --X'80-'-IOERCLN IOERERP IOERFSR IOERDEPD IOERBSR IOERDERD IOERERG IOERXERP IOERORA IOERSUPP IOERVLD E EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU IOERFLG2 DS Bit~ de!!~g IOERSTAT EQU IO"E1UU- "EQU IOERCAL EQU IOERECF EQU IOERRBK EQU IOERREW EQU IOERCYLR EQU IOERMSW EQU IOERCEMD EQU IOERVOL1 EQU DS DS DS DS 1*2 in IOERFLG2 --x'ao.--X'20' X'10' X'10' X'08' X'04' X'04' X'02' X'01' IOERWRK IOERADR IOERCSW IOERCCW 1X 1D 1D 1D 20 26 ORG IOERVSER DS IOERLEN DS IOERCCW CL6 1H 2C IOERFLG3 DS 1X Second flag byte for error recovery program use Statistical data being unleaded last h-ow"e -address being rea d Standalone recalibrate being executed Error correction function Read backward cemmand Tape rewind being executed Cylinder (in sense byte) has been relocated Message writer is active Intensive recording mode DASt volid teing read X-'40' 10 18 20 F pending device end interru~t from interrupt request Tape cleaning in progress Spooling - error routine in centrol Forward space record being executed Spooling - waiting for device end Eackspace record being executed Spooling - device end received Erase gap command in progress Spooling - error routine getting OBR data Opposite recovery action in ~rogress CCW has suppress data transfer bit on Read opposite recovery successful X'40' X'40' X'20' X'20' X'10' X'10' X'08' X'08' X'04' X'02' X'01' 1X Flag byte for error recovery routines 1*3 Miscellaneous work byte Home address for DISD devices CSW associated with error Sense CCW used to sense the real device Ereakdown of sense CCW field Volume serial number for statistical data Nuaber of sense bytes present 1*4 Third flag byte for SDR use ~it~ g~!!~~g 28 in IOERFLG3 IOERREAD EQU --X'80'-IOERALTR EQU X'40' IOERRDRO EQU X'20' SDR READ operation flag Alternate track retry is in progress Read home address, read only is in progress 2D IOERSV1 XL3 Reserved for IBM use 30 30 IOERSNSZ EQU IOERDATA DS 321 (IERSNSZ/8) D Number of sense bytes su~ported Sense bytes associated with error 30 34 ORG IOERECSW DS IOERCHAN DS IOERDATA 1F 1X Breakdown fer channel check handler ECSW information from channel lcgout Channel type flag IOEREND OF Label for end of IOERBLOK DS DS IEM VM/370 Data Areas and Control Block Logic 10ERBLCK Hexadecimal Displacement Field Description, Contents, eeaning IOBR3211 50 • Field Name Area where additional sense bytes may be appended to IOERBLOK. The format for one of these is described in "ICER3211: Extended Outbcard Recording Elock" later in this section. Channel Check Reflection Extension 50 IOERCCRL 58 10ERC01D IOERCCRA 10ERCftDL 60 IOERUID 68 10ERFAtD 78 10ERCCCW 80 IOERCCSW 88 90 IOERZCSW IOERI!COA Field Name Field Description, Contents, I!eaning 50 IOERCEXT DS OD 50 54 58 5C 10ERCCRL IOERCCRA IOERCOID IOERCI!DL DS DS DS DS F F F H 5E IOERftCEL DS H 60 68 78 80 88 8C 90 IOEROID IOERFADD IOERCCCW IOERCCSW IOERZCSi IOERDTYP IOERCH1D DS DS DS DS DS DS DS D ~hg~ls defined in IOERCHID EOU---X'05' EOO X'06' EOO X'07' EOO 1'08' IOER2860 IOER2870 IOERB80 IOERS80 91 94 96 IOERLOGL IOERCLOG 98 Hexadecimal Displacement IOERDTYP 10ERCCOA 1*5 I IOERftCEL IOERCCOA DS IOERftCOA DS IOERLOGL DS 8H D D F F CL1 CL3 CL2 CL2 1*5 Extension used only for channel check reflection Length of channel check record Address of channel check recerd Processor identification Processor model number (for examFle, 0158, 0168, etc.) ftaximum length of machine check extended logout area (model-dependent) Oser identification Active input/o~tput units Failing CCW Failing CSi Failing ECSli CP device type Channel identification Stanaalone selector (2860) Stanaalone multiplexer (2870) Stanaalone tlock multiplexer (2880) Selector channel (2880) Actual failing device aadress Address fro. processor locaticn I'BA' Length of channel logout Section 1. CP Data Areas and Centrel Blocks 29 IOERBLOK Bexadeci.al Displacement ---~-------- 30 Field Halle Field Descripticn, contents, I!eaning F -------------------------------------Channel logout area 98 IOERCLOG DS 98 IOERCLOG ORG IOERLG80 DSCL112 2880 channel (112 bytes) 98 ORG IOERLG70 DS IOERCLOG CL24 2870 channel (24 bytes) 98 ORG IOERLG60 DS IOERCLOG CL24 2860 channel (24 bytes) 98 9C ORG IOERADDR DS IOERLG33 DS IOERCLOG F CL640 Unit address stored ty integrated channel 3033 channel (640 bytes) 9C ORG IOERLG45 DS IOERLG33 CL96 145 integrated channel (96 bytes) 9C ORG IOERLG35 DS IOERLG33 CL24 135 integrated channel (24 bytes) IOERSIZE EQU (*-IOERBLOK)/8 IOERELOK size in doutlevords' IBM VM/370 Data Areas and Control Block Logic IR8ELCK IRMBLOK provides the information necessary for the implementation of intensive recording mode via CP SET RECORD command. Intensive recerding mode allows the recerding of unit check errors from a specified device whose sense data matches the values selected. I o 1/////IR8FWPTR////////////1 8 Hexadecimal Displacement -----------0 4 6 8 9 A B C E F IR8RLADD IReL8T 1-----------------------------------------------------IR8L8TCT 1*5 1 1*6 1 1*1 1 1*2 1 1*3 1 1*4 Field Name IR8FWPTR 1R8RLADD IR8LMT 1R8BYT1 1R8B1T1 1RMBYT2 1R8B1T2 1R8LMTCT 1RM8AXCT IRMFLG Field Description, Contents, DS DS DS DS DS DS DS DS DS DS 1F 1H 1H 1X 1X 1X 1X 1H 1X 1X ~eaning -------------------------------------1*1 1*2 1*3 1*4 1*5 1*6 Reserved for IBI! use Device address to te monitered Limit count - record every ]!tb error First sense byte specified Sense bit within first sense byte Second sense byte specified Sense bit within second sense byte Summary count for lillit detectien count of recordings made fer this request Flag tyte Bit§ g~!!ned in IR8FLG IR8AND EQO --X'80'-IRMOR EQO X'40' AND conditien specified OR cendition specified IR8SIZE 1R8ELOK size in doutlewords (X'02') EQO (*-IR8BLOK)/8 Section 1. CP Data Areas and Centrel Blocks 31 JPSCBLOK The JPSCBLOK is a part of DMKSYS. It is referenced via the EXTERNAL symbel DBKSYSJR. It is used to centrol the LOGON/AUTOLOG/LINK Journaling and Password-cn-the-coaaand-line Suppression functions. o JPSLOGU S JPSLNKU 10 1S Hexadecimal Displacement ------------ JPSPCHN Field Nalle Field Description. Contents, Beaning JPSLOGU DS CLS S JPSLNKU DS CLS JPSPCHN DS JPSFLIGS DS 1F 1X -------------------------------------- J*1 j!it§ g~fi1!~g in JPSFLG LOGONJRL EOU X '80--LI1fKJRL EQU 1--40' LIHKJRL1 EOU X'20' JRLSQOK EQU X'10' !!ASKLOG EQU X'OS' MASKLINK EOU X'04' 32 J*2 RESERVED J*5 I J*6 I J*7 0 10 14 J*1 LOGON/AUTOLCG journaling OJ SuccessfulL:INK journalingCI Invalid password LINK journaling ON SET/CUERY JCURNAL enabled Suppress LOGON password Suppress LIBK password 15 JPSLOGAR DS 1X J*2 16 17 1S 19 1A 1B JPSLOGMS JPSLOGDS JPSLNKAR JPSLNKMS JPSLNKDS 1X 1X 1X 1X 1X XL5 J*3 J*4 J*5 J*6 J*7 DS DS DS DS DS DS Userid for LOGON/IUTCLOG threshold aessages Userid for LINK threshold messages Anchor for FWDIBLOKs Control flags LOGON/AUTOLOG accounting record threshold aessages LOGON/AUTOLCG message threshcld LOGON/AUTOLCG disable threshold LINK accounting record threshold LINK message threshold LINK disable threshold Reserved for IB! use IBM VM/370 Data Areas and Control Block Logic LOCKBLCK LOCKELOK is used to synchronize execution for sections of nonreenterable code. Locked users are returned to the CPEXBLCK queue when the function teing executed coapletes or no longer requires nonreenterable resources. LOCKELOKs are queued eff DMKSYSLE. o r I , LOCKNEXT LOCKQUE I 1------------------------------------------------1 LOCKNAME I 8 I Hexadecimal Displacement -----------0 4 8 Field Field Description, Contents, Meaning Name Pointer to the next lock centrol block Pointer to CPEXELOK queue The name being locked LOCKNEXT DS LOCKQUE DS LOCKNAME DS 1F 1F 1D LOCKSIZE EQU C*-LOCKELOK)/8 LOCKELOK size in doutlevords (X'02') Section 1. CP Data Areas and Centrol Elocks 33 MCHAREA MCHAREA provides CP with statistical data that relates to malfuncticns of the real processor, tc its buffers, to processor storage for damage assessment, and to the recovery of VM/370. o 8 10 MCHDAMLN M*1 I M*2 I M*3 M*5 2 4 8 C D 10 10 I M*7 I M*8 1*6 I 1*7 I 1*8 MCHLSUM N*1 1*2 I N*3 I N*4 N*5 MCHFSAR MCEFSAV 50 MCHFSEAV MCBPDARI Field Name Field Description, Contents, Meaning MCHDAMG:E DS OH Damage MCHDAMLN MCHPROCA MCHREC MCHCPEX MCHMODEL 1H XL2 1F 1F 1X Length of damage assessment area Processor address Machine check record address Machine check CPEXBLCK address Model numter for the machine DS DS DS DS DS L*1 ~ssE!ssment ar.~Ci Bits defined in MCHMODEL iiODEL2QO-EQU --X'18'--MODEL210 EQO X'18' MODEL200 EQU X'18' MOD3033 EQU X'14' MOD3032 EQU X'14' MOD3031 EQU X'14' MODEL168 EQU X'10' MODEL165 EQU X'10' MODEL158 EQU X'OC' MODEL155 EQU X'OC' MODEL148 EQU X'08' MODEL145 EQU X'08' MODEL138 EQU X'04' MODEL135 EQU X'04' NOMODEL EQU X'OO' ID ID ID ID It ID ID ID ID ID ID ID ID ID No MCHRESEV DS MCHDAMFL DS MCHFLAGO DS Reserved for IBM use Damage assessment data System status 3X OBL8 1X Bits defined in MCHFLAGO iiCHOHDWi-EQO --X'80'-MCHOSFTR EQO X'40' MCHOUSAD EQO X'20' MCB1GERR EQU X'10' MCHOTERM EQO X'08' MCBOQUIT EQU X'04' 34 I I M*6 48 Bexadecimal tisplacement o o MCBREC --------------------------------------------------------1 MCHCPEX L*1 I////I/MCBRESEV//////I 18 40 I MCHPROCA M*1 number for the 240 machine number for the 210 machine number for the 200 machine number for the 3033 processor number for the 3032 processor number for the 3031 processor number for the 168 machine number for the 165 machine number for the 158 machine number for the 155 machine number for the 148 machine number for the 145 machine number for the 138 machine number for the 135 machine support for machine Hardware recovery Software recovery User abnormally terminated Channel inoperative Operating system termination Quiet mode in effect IBM VM/370 Data Areas and Control Block Logic MCHAREA Hexadecimal Displacement 11 Field Name Field Description, Contents, Meaning MCHFLAG1 DS !!it§ g~f11!gg MCH1MAIN MCH1BUFF MCH1COST MCH1GERR MCH1PROC MCH1TODC MCH1SYSD 12 13 BQU EQU EQU EQU EQU EQU EQU 1X Main storage Euffer Control storage Indicates channel is inoperative if bit is on Processor Time-of-day clock System damage X'40' X'20' X'10' X'08' X'02' X'01' 1X 1X .:_ !!it 2 g~~!1!~g .Lll 14 M*3 M*4 1X Intermittent error Solid error Data error Protect error M*5 Bits defined in MCHFLAG4 MCH4TOLO-EQU --X'80'--MCH4REPA EQU X'40' MCH4STRE EQU X'20' MCH4BURE EQU X'10' 15 MCHFLAG5 DS 1X MCHFLAG6 DS MCHFLAG7 DS !!i!§ 18 40 40 41 1X 1X MCH7SMCR MCH7VRTM MCH7SYST MCH70PSW MCH7VEQR MCH7SUP in MCHFLAG7 EQU --X'80'-EQU X'40' EQU X'20' EQU X'10' EQU X'08' EQU X'04' MCHLSUM MCHPDAR MCHPDARO MCHPDAR1 DS DS DS DS M*6 M*7 M*8 MCHPDAR2 MCHPDAR3 MCHPDAR4 MCHPDAR5 MCHPDAR6 DS DS DS DS DS 1X 1X 1X 1X 1X RMS wait state suffix DMKMCH status Second machine check recursion Terminate the virtual machine Terminate the system Machine check old PSi in problem state Terminate the virtual=real user DMKMCH under the glotal system lock Summary N*1 N*2 Bits defined in MCHPDAR1 MCHP1 SDE-EQU --X'80'--MCHP1IDEEQU X'40' MCHP1SKE EQU X'20' MCHP1IKE EQU X'10' 42 43 44 45 46 RMS information status Invalid hardware logout Invalid machine check interrupt code Invalid failing storage address gg!i1!~g XL40 OBL8 1X 1X RMS action data Time-out loop Repair Storage reconfiguration Buffer reconfiguration Bits defined in MCHFLAG5 MCH5INLG-EQU -X'80'-MCH5INMC EQU X'40' MCH5IFSA EQU X'20' 16 17 Damage area (continued) Error type M,..tl"'T""'~ J:J'-UJ:JJ.t1u.:J EQU --X'80'--EQU X'40' EQU X'20' EQU X'10' MCHFLAG4 DS Damage area in MCHFLAG1 --x'SO'--- MCHFLAG2 DS MCHFLAG3 DS MCH3INTE MCH3S0LD MCH3DATA MCH3PROT M*2 Acticn taken Failure type Solid storage data error Intermittent storage data errcr Solid SPF key error Intermittent SPF key error N*3 N*4 N*5 N*6 N*7 Operating system status Location of failure Location of failure Requested operator awareness Flag byte Section 1. CP Data Areas and Control Blocks 35 MCHAREA Hexadecimal Displacement Field Name Field Description, Contents, Meaning ~!!§ g~!!~g in MCBPDAR6 MCBP6CBA EQU --X'80-'- - 47 MCBPDAR7 DS 1X Bits defined in MCBPDAR7 MCB7STCK-EQU --X'80'--MCH7GSTR EQU X'40' MCB7PURG EQU X'20' MCB7LOGO EQU X'lO' MCB7EXIT EQU X'08' MCH7RSRE EQU X'04' MCB7IOEM EQU X'02' 48 4C 50 54 36 Change bit active N*8 Flag byte Interfaces Interfaces Interfaces Interfaces Interfaces Interfaces Interfaces for for for for for for for STACK routine GETMAIN routine PURGE routine V=R logoff routine exit to CP RELEASE and RESET routines the recorder MCBFSAR MCHFSAV MCBFSEAV MCHPDARI DS DS DS DS 1F IF 1F 1F Failing location real address Instruction address at failure End of the failing location End of the failing virtual stcrage address MCHLENl MCHLEN MCHFIX EQU EQU EQU *MCHDAMAGE *MCHRESEV 280+48 Length of damage assessment area Length of area to be cleared Length of the fixed logout and the header record for machine check handler IBM VM/370 Data Areas and Control Block Logic ftCRECOBD MCRECORD provides the necessary processor and main storage. 0 ft*1 1 ft*2 1 ft*3 extended logout information ftl..SiITCH M*4 8 ftCDATE 10 ftCCPUID 18 MCPROGID 20 MCJOBID 28 ftCOLDPW 30 ftCFIDLOG 148 ftCEITLOG for error recording of I ft*5 l/ft*6//1 (Variable Length) I!CHDlftAG (80 bytes) Hexadecimal Displacement Field Name o o MCREC DS OD ftCRECTYP MCOPSYS MCSiONE I!CSWTWO I!CSiITCH MCRECCNT MCRECCC I!CDATE I!CCPUID MCPROGID MCJOBID I!C01DPW I!CFID10G DS DS DS DS DS DS DS DS DS DS DS DS DS 11 11 11 11 21 11 11 118 118 118 118 Its 35D FID1G1H EQU (*- !!CFIDtOG) Length of machine check fixed logout area I!CEIT10G EQU * MCHDII!AG EQU * Beginning of machine check extended logout (the extended logout length is variable length and machine dependent) Damage assessment area (80 bytes) 1 2 3 4 6 7 8 10 18 20 28 30 148 Field Description, contents, fteaning ft*1 ft*2 ft*3 ft*4 ft*5 ft*6 ftachine check record type Operating system Record independent switch Record dependent switch Unused switches Record count Reserved for IBft use Date and ti.e Processor identification and .odel number Program identity Job identity (unused) ftachine check old PSi ftachine check fixed logout Section 1. CP Data Areas and Control Blocks 37 MtRREC MDRREC retains information for the VM/370 error recording cylinders. o I MDRKEYB I M*1 I/M*2//I/B*3/1 M*4 10 18 MDRCPID MDRCUA1 MDRVOL 20 Hexadecimal o 2 3 4 5 6tR'I'MEN MDRDTEN 8 I////ftDRSPE1////1 MDRSENS Field MDRKEYN MDRSllS1 MDRSllS2 MDRSWS3 MDRRECNT 1B 1C 1C 1C 1C DS DS DS DS DS M*1 M*2 M*3 6*4 Type and operating system Switch byte 0 Reserved for IBM use Reserved for IBM use Sequence (4 bits) and record (4 bits) Used for sequence number Indicates the record total 6 8 C 10 18 1A 20 MDRSPE1 MDRDTEB MDRTMEB MDRCPID Reserved for IBM use Date Time Processor identification and model number MDRCUA1 MDRVOL MDRSENS DS DS DS Q2ta 21 61 241 primary CUA of device Volume serial number of device Sense byte data MDRSIZE EQU (*-MDRREC) MDR record size §,YEEQrt MDRCUA1 21 11 11 21 21 21 Line address Control unit address Device address Sense and status informaticn Resource identification Reserved for IBM use §,YE.EQrt MDRCUA1 21 81 21 Device address Userid Resource identification 18 1A 1B 1C 1E 20 I.Qf JIQ.2 38 1B 1F 1F 2F Q~ic~ Q~£~~g~~! I.Qf JlIQ 18 1A 22 DS DS DS DS Re'!Q!~ ORG DS DS DS DS DS DS Re)g!~ ORG DS DS DS IBM VM/370 Data Areas and Control Block Logic IHCBLCK MICBLOK contains pointers to control registers, the segment table, and other values required by the virtual machine assist feature and the VM/370 Extended Control-Program Support (ECPS). This information is needed for the handling of certain instructions and privileged operations requested by the virtual machine. The VMMICRO field of the VMBLCK points to MICBLOK. o MICRSEG IHCCREG 8 MICVPSW MICWORK 10 MICVTMR MICACF Hexadecimal Displacement o Field Name Field Description, Contents, Meaning 4 8 MICRSEG MICCREG MICVPSW DS DS DS 1F 1F 1F Real segment table pointer Virtual control register pointer Virtual PSW pointer 8 l'IICVIP ORG DS MICVPSW 1X Virtual interrupt pending bit Virtual interrupt is pending; therefore, the virtual machine assist feature is net to handle change of PSW channel masks or external mask from disabled to enabled. All other bits in this byte must be O. 9 DS 3X Address of virtual PSW 10 MICWORK MICVTMR DS DS 1F 1F 14 MICACF DS 1F Workspace pointer Location to be decremented when the virtual interval timer assist feature of VM/370 ECPS is being used Assist controls 14 MICEVl'IA ORG DS MICACF 1X Expanded virtual machine assist control bits C !!i!§ g~!i1!gg MICLPSW MICPTLB MICSCSP l'IICSIO l'IICSTSM IHCSTPT l'IICTCH 15 l'IICSIZE EQU EQU EQU EQU EQU EQU EQU in MICEVl'IA --X'80'-X'40' X'20' X'10' X'08' X'04' X'02' LPSW simulation PTLE simulation SCKC, SPT simulation SIO simulation STNSM, STOSM. and SSM simulation STPT simulation TCH simulation DS 3X Reserved for IBM Use EQU (*-MICBLOK)/8 Size of tSECT in doutlewords (X'03') Section 1. CP Data Areas and Control Blocks 39 MIHREC MIHREC is used in the SVC 76-initiated error Interrupt Handler) records. recording process of tYFe 70 MIH (Missing I 0 MIHKElN 8 I 1*1 I/A*2//I/A*3//I/l*4//I///MIHSPE1////1 10 MIHCPID 18 MIHJOB MIHCUl2 28 MIHVOL (cont. ) Hexadecimal Displacement 2 3 4 5 6 8 C 10 40 IHBDEVT MIHINT Field Name MIHKElN MIHSiS1 MIHSiS2 MI!I$WS3 MIHRECNT MIHSPE1 MIHDTEN MIHTMEN MIHCPID Field Description, Contents, Meaning DS DS DS DS DS DS DS DS DS 1H 1C 1C 1C 1C 1H 1F 1F 2F Q~xic~ Q~Fend!A! 18 20 23 26 2C 30 MIHVOL MIHCUl1 20 30 o MIHTMEN MIHDTEN 1*1 1*2 1*3 1*4 Type and operating system Switch byte 0 Reserved for IBM use Reserved for IBM use Reserved for IBM use Reserved for IBM use Date Time Processor identification and model number Qatg MIHJOB MlijCUl2 MIHCUl1 IHHYOL IUHDEYT MIHINT DS DS DS DS DS DS 8X 3X 3X 61 41 8X IHHSIZE EQU (*-MIHREC) Job whose I/O request is pending CUI used to address the device Primary device address Volume serial number of device Device type Time interval used to check Fending interrupt MIH record size in deublewcrds (X'07') IBM VM/370 Data lreas and Centrol Block Logic HNBDB MNBDR provides header information for following monitor records. o MIBRECSZ I///RSVD////I M*1 elHCODE MIHTOD (cont.) 8 L Hexadecimal Displacement ------------ Field Name Field Description, Contents, eeaning -------------------------------------- 0 aNBHDLEN BQU Of Length of 0 MIHRECSZ RSVD MNHCLASS BNHCODE BIHTOD 1B 1H 11 IL2 ILS Record size Reserved for IBe use Bonitor class Bonitor code Current TOD value 2 4 S 7 DS DS DS DS DS BNHDRLEI EQU II *-BNHDR B*1 B*2 401."", '-41"" ~'''',.1r .IJ."" . . . . .n. header ,. 1171:1 ~ .... "" ........ , -F,.. ...... ",,+\ Length of header record Section 1. CP Data Areas and Control Blocks 41 MNOOO MNOOO provides an area for the accumulation of records dealing with privilege operations, paging, dispatching, and interrupt activity. 01• I 81 I 101 I 18 r-- MNOOOWlD MNOOOHl MNOOOHD MNOOOTC MNOOOMN MNOOOWlO EOI I ESI I CO MNOOOMO MNOOOIR MNOOOPRB C8 MNOOOCP MNOOOCH MNOOOWPG 20 MNOOOPSl MNOOOCPA DO MNOOOTE MNOOOCE 28 MNOOONFL MNOOOPSN DE MNOOOCT MNOOOPE 30 MNOOOPRC MNOOORPC EO MNOOOPT MNOOOEP 38 MNOOOSPC !!NOOOFLF ES MNOOOlP !!NOOOPB 40 MNOOOCPT MNOOOSS FO MNOOORR MNOOOTCL 48 MNOOOPFF MNOOOPRF FS MNOOOLCL !!NOOOCS 50 MNOOOPCS !!NOOONXR 100 ENOOOCD l!NOOOHDl 58 MNOOOCPR !!NOOOCVl 108 !NOOONDU l!NOOONAU MNOOOCCW MNOOOlTl 110 !!NOOOPRD l!NOOOPWR !!NOOOPTl !!NOOOCKl 118 I'lNOOONPP MNOOOSWS MNOOOCSV MNOOOCPG 12C l!NOOOQ1N l!NOOOC2N "NOOOClO !!NOOOCDS 12S MNOOOQ1E IMNOOOQ2E ,!!NOOOlNT IMNOOOPPA MNOOOCDA MNOOOCDB 13CIMNOOOPPC 1/////////1 !!NOOOCSC MNOOEK MNOOOlK MNOOOMS MNOOOLP MNOOODl MNOOOSl MNOOOSF MNOOOTl MNOOOCl 601 t 68, I 701 I 781 I 80, , 881 I 901 I 981 I AOI I A81 Hexadecimal Displacement -----------0 8 10 18 20 24 28 2C 30 42 Field Name MNOOOWlD DS !!NOOOWPG DS MNOOOWIO DS MNOOOPRB DS MNOOOPSI DS MNOOOCPA DS MNOOONFL DS MNOOOPSN -DS MNOOOPRC DS PlNOOOlSD 1-----------------------------------1381 MNOOOGTM MNOOODQM 1----------------------------------1401 l!NOOOSWP !!NOOOEXT 1-----------------------------------1481 MNOOONXT !!NOOOATT ,15CII------------------------------------~ l!NOOOCNT , Field Description, Contents, Meaning XL8 IL8 XL8 XL8 1F lF 1F 1F 1F Total system idle wait time Total system page wait time Total system I/O wait time Total system problem state time No. of paging SIOs No. of calls to DftKPAG No. of page frames currently cn free list No. of pages currently being swapped No. cf pages flushed but reclaimed IBM VM/370 Data Areas and Control Block Logic l!NOOO Hexadecimal Displacement -----------34 38 3C 40 44 48 4C 50 54 58 5C 60 64 68 6C 10 74 78 7C 80 84 88 8C 90 94 98 9C AO A4 A8 IC BO B4 B8 Be CO C4 C8 CC DO D4 D8 DC EO B4 B8 BC FO F4 F8 FC 100 104 108 10C 110 114 118 Field Na.e l!NOOORPC l!NOOOSPC l!NOOOFLF l!NOOOCPT MNOOOSS MNOOOPFF MNOOOPRF l!NOOOPCS MBOOONXR MNOOOCPR l!NOOOCVI MNOOOCCi l!NOOOITI MNOOOPTI MNOOOCKI !NOOOCSY MBOOOCPG MBOOOCIO MBOOOCDS l!BOOOCDA l!NOOOCDB MBOOOCSC MBOOOEK MNOOOIK MBOOOMS MBOOOLP MBOOODI MNOOOSI liNOOOSF l!NOOOTI liNOOOCI MNOOOHI MNOOOHD l!NOOOTC MNOOOI!N MBOOOMO MNOOOLR liNOOOCP MNOOOCB MNOOOTE MNOOOCE l!NOOOCT MNOOOPE MNOOOPT MNOOOEP l!NOOOIP MNOOOPB MNOOORR MNOOOTCL l!BOOOLCL MNOOOCS MNOOOCD MNOOOBDI l!NOOOBDU MNOOOBAU liNOOOPRD MNOOOPiR MNOOONPP Field Descripticn, Contents, l!eaning DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS 1F 1F 1F 1F 1F 1F 1F 1F 1F IF 1F IF 1F 1F 1F 1F 1F IF 1F 1F IF 1F 1F IF IF IF 1F lF IF IF 1F 1F 1F IF 1F IF 1F IF 1F IF IF 1F IF 1F IF IF IF IF IF IF 1F 1F IF 1F IF 1F IF 1F -------------------------------------No. No. No. No. Bo. No. Bo. No. No. Bo. No. No. Bo. Bo. cf cf of cf cf of cf cf of cf cf cf cf of of reserved pages shared system pages times the free list was empty calls to D!KPTBFB pages stolen from in-queue users pages swapped fro. the flush list pages examined in stealing a Fage full scans done in stealing pages real external interruFtions calls to Dl!KPRVLG calls to DMKVIOEX calls to DftKCCi from DMKVIO interval timer interruptiens reflected processor timer interruptions reflected clock comparator interruFtions .... NOe No. v.L SVC interruptions reflected No. cf program interruptions handled No. of I/O interruptions handled No. of calls to Dl!KDSP (main entry) Bo. of fast reflects in Dl!SDSF Bo. cf dispatches for new FSis Bo. of calls to DMKSCBDL Instruction count for X'08' SSK Instruction count for X'09' ISK Instruction count for X'80' SSM Instruction count for X'82' LFSi Instruction count for X'83' DIAG Instruction count for 1'9CXO' SIO Instruction count for X'9CX1' SIOF Instruction count for X'9DXO' TIO Instruction count for X'9DX1' CLRIO Instruction count for X'9EXO' BIC Instruction count for X'9EX1' BDV Instruction count for X'9F' TCB Instruction count for X'AC' STNSM Instruction count for X'AD' STOSM Instruction count for X'Bl' LRA Instruction count for X'E202' STIDP Instruction count for X'E203' STIDC Instruction count for X'E204' SCK Instruction count for X'B206' SCKC Instruction count for X'B207' STCKC Instruction count for X'E208' SFT Instruction count for X'E209' STPT Instruction count for X'E20A' SPKA Instruction count for X'E20E' IPK Instruction count for X'E20D' PTLB Instruction count for X'E213' RRE Instruction count for X'E6' STCTL Instruction count for X'E7' LCTL Instruction count for X'EA' CS Instruction count for X'EB' CDS Diagnose disk I/O simulaticn count No. of users dialed to a virtual machine Bo. of users logged on Bo. cf page reads No. cf page writes No. of system pageable pages ~4='".,.~,,;I ..a...",;;;;~""'~'-''''''IIi;U _6: Section 1. CP Data Areas and Centrol Blocks 43 MNOOO Hexadecimal tisplacement Field Name Field Description, Contents, !!eaning 11C 120 124 128 12A 12C 12E MNOOOSWS ftNOOOQ1N MNOOOQ2N MNOOOQ1E MNOOOQ2E ftNOOOINT ftNOOOPPl DS DS DS DS DS DS DS 1F 1F 1F 1H 1H 1H 1H 130 132 134 138 13C 140 144 148 14C 150 ftNOOOPPC DS DS MNOOOISD DS MNOOOGTM DS !!NOOODftQ DS MNOOOSWP DS !!NOOOEIT DS MNOOONXT DS !!N0001TT DS MNOOOCNT DS 1H 1H 1F 1F 1F 1F 1F 1F 1F 1F Sum of working sets of in-queue users No. of users in Q1 No. of users in Q2 No. of users eligible for C1 No. of users eligitle for C2 !!ONITOR sampling interval (in seconds) Pseudo-cylinders' of allocated temporary space Pseudo-cylinders 1 of systea temporary space Reserved for IB!! use Count of mini I/O tlock stack deFletes Count of m1n1 I/O tlocks in the queue Count of mini I/O tlocks processed Count of SIOs on alternate path Count of free storage extensions Count of release of free storage extensions Count of TRYSPLIT attempt Count of sutpool splits MNOOOLEN EQU *-!!NOOO Record length in bytes lA pseudo-cylinder comprises 100 available page slots for all system-owned volumes. total available pseudo-cylinders per device is determined by the formula: (number of cylinders X number of records per cylinder for a device) 100 44 IBM VM/310 Data Areas and Control Block Logic The ftN001 ftN001 gives information on the Ferformance of the Attached Processor. a ftN001WID 8 ftN001WPG 10 ftN001WIO 18 ftN001PRB 20 MNOOlNXR ftNOC1CSV 28 I!IOO1PRD ftNOC1PWR 30 ftN001SSY ftNOC1NSY 38 ftN001SFR ftNOC1NFR 40 ftN001SRN ftNCC1NRN 48 ftN001STft ftNOC1NTft 50 ftN001SDP ftNOC1NDP 58 ftN001NFL ftNOC1NF~ 60 ftN001NSD ftNOC1NVD 68 ftN001NRU Hexadeciaal Displaceaent o Field Naae Field Description, Contents, fteaning 10 ftN001WID DS ftN001WPG DS ftN001WIO DS 18 i!i1i001PRB DS 20 ftN001NR DS 1F 24 ftN001CSV DS 1F 28 2C ftN001PRD DS ftN001PWR DS 1F 1F 30 34 38 3C 40 44 48 4C 50 54 58 5C 60 64 68 ftN001SSY ftN001NSY !!N001SFR ftN001NFR ftN001SRN ftN001NRN ftN001STft ftN001NTft ftN001SDP ftN001NDP ftN001NFL ftN001NFS !!N001NSD ftN001NVD ftN001NRU 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F L8 Attached processor idle wait time L8 Attached processor page wait time L8 Attached processor I/C wait time L8 Attached processor problem state time Number of external interru~ts tc the attached processor Number of SVCs reflected by the attached processor Nuaber of page reads by attached Frocessor Number of page writes by the attached processor Total time spin on systea lock Total number of spins for systea lock Total time spin on D!KFRE lock Total number of spins for tftKFRE lock Total time spin on RUNLIST lock Total number of spins for RUNLIST lock Total time spin on timer request lock Total number of spins for timer request lock Total time spin on displacement lock Total number of spins for ais~lacement leck Number of times CPFRELK set Number of times CPFRESW set Number of times system lock request deferred Number of times VftBLCK leck deferred Number of D~KDSPRU entries *-ftN001 Length of record 8 DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS ftN001LEN EQU Section 1. CP Data Areas and Contrel Blocks 45 MN097, MN098 MN097 provides header information for a file that Monitor. This is the first record of the file. o MN097CPU 8 ftN097LEV 10 MN097DAT 18 MN097TIM 20 MN097UID contains data accu.ulated 28 MN097CR8 MN097NUC 30 MN097FSS MN097DPA 38 MN097TTS MN097VR 40 MN097CPL MN097APL Field Name Hexadecillal Displacement -----------0 8 10 18 20 28 2C 30 34 38 3C 40 42 MN097CPU MN097LEV MN097DAT MN097TIM MN097UID MN097CR8 MN097NUC MN097FSS MN097DPA MN097TTS MN097VR MN091CPL MN091APL by Vft/370 Field Description, Contents, fteaning DS DS DS DS DS DS DS DS DS DS DS DS DS MN091LEN EQU -------------------------------------- Processor serial numter and .odel number Prograa level change Current date Current time Userid of user who invoked !!CIUTOH Value of control register 8 Size of nucleus Size of free storage Size of dyna.ic paging area Size of trace table Size of V=R area Logical address of main prccessor Logical address of alternate Frccessor IL8 CL8 CL8 CL8 CL8 1F 1F 1F 1F 1F 1F 1H 1H *-MN097 Length of header record MN098 contains the userid of the user who has terminated current V!!/370 !!enitor activity. This is the last record of the file. o Hexadecimal Displacement o 46 MN098UID Field Name Field Description, Contents, fteaning MN098UID DS CL8 ID of user stopping the V8/370 ftonitor MN098LEN EQU *-MN098 Length of trailer record IBM VM/370 Data Areas and Control Block Logic MN099, MN10X MN099 contains information recorded when VM/370 Monitor activity is sus Fended because all tuffers are full and are queued for output. f o I MN099CNT MN099TOD I------------------------------------------------------~ 8 I Hexadecimal Displacement M*1 Field Naae Field Description, Contents, Meaning DS DS 115 MN099CNT MN099LEN EQU *-MN099 5i099TOD 0 5 MN10X contains information for a given userid. XL4 Length of the suspension record on the number of o 8 TOD clock value at suspensicn Count of suspensions M*1 inFut or cutput console line transmissions MN10XUID MN10XADD M*1 MN10YIO Hexadeciaal Displacement o a A B Field Name Field Description, Contents, l!eaning -------------------------------------- MN10XUID DS MN10XADD DS CLa 1H MN10XLEN EQU *-MN10X l!N10YCNT DS 1x MN10YLEN EQU *-MN10X Long record, header length MN10YIO * Input/output line starts here EQU Userid Terminal line address Short record length l!*1 Eyte count for the following line Section 1. CP Data Areas and Control Blocks 47 MN20X MN20X contains VM/370 and spool activity. Monitor data on CP's scheduler activity, o MN20XNPP MN201SWS 10 MN20XQ1N MN201Q2N MN20XQ1E MN2CIWSS MN20YTTI 28 MN20YVTI 30 MN204PBI MN202PGB 38 MN202BES MN202PST 40 MN202PNC 48 MN202CRD MN202APR MN202BEF MN20210C MN202LIN Field Na.e Field Description, Contents, Meaning 10 14 18 1A 1C 1E MN20XOID MN20XNPP MN20XSWS MN20XQ1N MN20XQ2N MN20XQ1E MN20XQ2E MN20XWSS MN20XQNM 1F MN20XPRC DS 11 MN203LEN EQO *-MN20I Length of class 2 code 3 record (ldd queue) 20 28 30 MN20YTTI DS MN20YVTI DS MN204PBI DS Its Its 1F Current VMTTIME (CP simulation time) Current VMVTIME (user virtual ti.e) Eligible list priority 30 32 OBG MN202PRI DS MN202PGB DS MN204PBI 1H 1H MN204LEN EQO *-MN20X 34 MN202APB DS 1H 36 MN202BEF MN202BES MN202PST MN202IOC MN202PNC MN202LIN MN202CBD MN202LPB 1H 1H 1H 1F 1F 1F 1F 1X 8 C 38 3A 3C 40 44 48 4C DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS MN202LEN EQO 48 MN20XQ2E 20 Hexadecimal Displacement o MN20IUID 8 18 dispatch queues, paging, CL8 1F 1F 1F 1F 1H 1H 1H 1X M*1 M*2 *-MN20X Userid being added and/or drcFped fro. queue No. of system pageable pages No. cf working sets of in-queue users No. of users in Q1 No. of users in Q2 No. of users eligible for C1 No. cf users eligitle for C2 User's projected working set size Queue wherein additions and/or deletions are being made CP TRACE tatle processor identification Dispatch priority Pages read Whi~~__ ~~queue I Length of class 2 code 4 record (DroF queue) M*3 Sum cf pages-read that are -Yesiae-n-{-----at each paging operation No. of pages referenced While in queue Current numter of pages resident No. cf pages stolen while in queue Virtual nonspooled 510 count Virtual cards punched Virtual lines printed Virtual cards read Last processor on which execution tock Flace Length of class 2 code 2 reccrd eligible list) IEM VM/370 Data Areas and Control Block Logic (add to the ftN400 ftN400 provides user virtual machine statisticse 0 ftN400UID 8 ftN400TTI 10 ftN400VTI 18 MN400PGR ftN400PGW 20 ftN400IOC ftN4COPNC 28 ftN400LIN MN4COCRD 30 ft*1 ft*2 ft*3 M*4 ft*5 38 ft*9 ft*10 ft*11 M*12 ft*13 1/!*14/1 40 48 Hexadecimal Displacement o !N400PDR !N400WSS 8*6 MN4COPDK ft*7 I !*8 ftN400RES !N400INT ft*15 Field Name Field Description, contents, fteaning 8 MN400UID MN400TTI DS DS CL8 XL8 10 MN400VTI DS XL8 Userid Current V!TTI!E (in V!ELCK); CP simulatien time Current V!VTI!E (in V!ELOK); user virtual 18 1C 20 24 28 2C 30 31 32 33 34 35 36 37 38 39 3A 3B 3C 3D 3E 40 42 44 46 48 MN400PGR MN400PGW MN400IOC MN400PNC MN400LIN DS DS DS DS DS 1F 1F 1F 1F 1F 1F 1X 1X 1X 1X 1X 1X 1X 1X 1X 1X 1X 1X 1X 1X 1H 1H 1H 1H 1H 1X Total page reads for this user Total page writes for this user Virtual nonspooled SIO count Virtual cards punched Virtual lines printed Virtual cards read User running status User dispatch status User operating status User queuing status User processing status User execution status User tracing control status User message level User queue level User command level User timer level Interrupt pending status Directory or SET priority Reserved for IBft use Number of pages resident Estimated working set size Drum allocated page frames Disk allocated page frames Monitor sampling interval (in seconds) Last processor on which executien toek place ti:e MN400CRD DS MN400RST HN400DST MN4000ST MN400QST MN400PST MN400EST MN400TST MN400MLV MN400QLV MN400CLV MN400TLV !N400PND ftN400UPR MN4RSV1 MN400RES MN400WSS MN400PDR MN400PDK MN400INT MN400LPR DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS MN400LEN EQU *-ftN400 ft*1 ft*2 M*3 M*4 ft*5 !*6 !*7 ft*8 !*9 M*10 M*11 M*12 M*13 M*14 M*15 Length of class 4 code 0 record Section 1. CP Data Areas and Centrel Elocks 49 MN500 MN500 provides data on instructions simulated by CP. o MN500UID MN500lNS 8 10 Hexadecimal Displacement -----------C 8 C 10 50 MN5COVID MN500VH Field Name Field Description, Contents, Meaning CL8 1F 1F XL8 MN500UID MN500lNS MN500VAD MN5000VH DS DS DS DS MN500LEN EQU *-MN500 Userid privileged instruction Virtual storage address cf the instruction Current total of CP simulaticn time Length of class 4 code 0 reccrd IBM VM/370 Data Areas and Centrol Block Logic MN600 I • Header Record I MN600HDR header record provides the number of device data packages. o Hexadecimal Displacement MN600NUM Field Name o ,. r I Field Description, Contents, Meaning Number of device data packages that follow length of header ~N600NUM DS 1H MN600HLN EQU *-MN600HDR Length of header I/O Count Record MN600DEV inFut/output data packages. o r I count record provides MN600ADD information for each device in the device MN600S:ER MN600TY I----------------------------------------------------~ MN600CNT 8 I Hexadecimal Bisplacement -----------0 2 4 A Field Naae Field Description, Contents, Meaning 1H 1H CL6 IL4 Device VM/370 Volume Device MN600DLN EQU *-MN600DEV Length of each data record MN600MAI EQU (4096-MNBHDLEN-MNHIRLEN-MN600HLN)/MN600DLN Maximum device count MN600ADD MN600TY MN600SER MN600CNT DS DS DS DS address device type and/or codes serial number of device accumulated I/O count Section 1. CP Data Areas and Control Blocks 51 MN602 I • Header Keccrd MN602HDR provides the number of sa.ples for intervals of device packagese o Hexadecimal Displacement Field Name o I • MN602SAM Field Description, Contents, Meaning 8N602SAM DS 1H Number of samples for interval Utilizaticn Record MN602 provides, via CP MONITOR co.mand, There is one record for each device. 0 8 Hexadeci.al risplacement -----------0 2 4 6 8 A C for DlSD and tape devices. r--------------------------------------------------------, MN602ADD MN602CHB MN6C2CUE 8N602DVB I MN602CHQ MR602CUQ 8*1 Field Name MN602ADD MN602CHB MN602CUB MN602DVB MN602CHQ MN602CUQ 8N602DVQ Field Description, Contents, Meaning DS DS DS DS DS DS DS MN602DLN EQU 52 utilization data 1H 1H 1H 1H 1H 1H 1C 8*1 *-MN602DEV Address of the device Number of times channel is busy Number of times control unit is busy Number of times device is busy Input/output tasks queued en channel Input/output tasks queued cn the control unit Input/output tasks queued cn device Length of device portion in dcublevords IBM VM/370 Data Areas and Control Block Logic MN100 MN700 provides, via CP DASD. MONITOR, the I/O tasks and cylinder seek o 8 10 MN700UID MB700ADD M*3 n ......... _;I!,...".;.".!!!II1 l1~Aa.U.~"""""_Q."'" Field tisplacement Halle -----------0 a A C E F 10 11 activity cf a specified MN7CCCCY MN700CYL M*l I M*4 MB700UID MN700ADD MN700CYt MN700CCY MN700QDV MN700QCU MN700QCH 8N700DIR Field DescriptioD# Contents s Meaning DS DS DS DS DS DS DS DS 8B700tEB EQU cta 1H 1H 1H 11 11 1X 1X *-MN100 -------------------------------------- 8*1 8*2 8*3 8*4 Userid Device address Cylinder l:eing sought Current cylinder I/O tasks queued on the device I/O tasks queued on the contrcl unit I/O tasks queued on the channel Seek direction: OO=lower, 01=bigber Length of class 7 code o record section 1. CP Data Areas and Ccntrel Blocks 53 MN802 I • Header Reccrd MN802HDR provides the number of device block counters. o Hexadecimal Displacement o 2 I. r--------------------------------------------------------" MN802NUM MN802CNT I Field Name Field Description, Contents, !eaning Number of dev1ce block counters MN802NUM DS 1H that follow MN802CNT DS IL4 Device I/O count MN802DLN RQU Length of the header *-MN802CTR System Profile Data MN802CTR provides, via CP MONITOR command, additional system profile data. The monitor data includes: the I/O activity for each device, the number of logged en users, number cf page read/writes, and the total system I/O, page wait, and proble. state times. MN802NIU MN8C2PGR 8 MN802PGW MN8C2NPP 10 MN802WID 18 MN802WPG 20 MN802WIO 28 MN802PRE Hexadecimal Displacement -----------0 4 8 C 10 18 20 28 , o Field Name MN802NAU MN802PGR MN802PGW MN802NPP MN802WID MN802WPG MN802WIO MN802PRB Field Description, Contents, Meaning DS DS DS DS DS DS DS DS MN802CLN EQU 54 -------------------------------------- 1F 1F 1F 1F 118 XL8 118 IL8 No. of logged on users Total system page reads Total system page writes No. cf system pageable pages Total system idle wait time Total system page wait time Total system I/O wait time Total system problem time *-MN802CTR Length of each data entry IBM VM/370 Data Areas and Control Block Logic MNDEVLST MNDEVLST prevides information on device activity. Pointed to by MCNDVLST, it (MNDEVLST) contains a list of RDEVBLOK addresses to be used ty class 6 (DASTAP) data collection, together with bins: for each device, in which the high frequency sampler (tMKENTTI) can accumulate centrol unit and device busy counts during each monitor interval. Note that channel busy counts are accumulated in a separate area pointed to by MONCBPTR, 5 deublewords and 2 bytes per entry. o MNRDEVB Hexadecimal Field Lisplacement Naiie o 4 6 MNRDEBV MNCUBSY MNDVBSY MNCUESY MNDVBSY Field Description, contents. !eaning DS DS DS MNDEVLEN BQU 1F 1B 1B Address of RDEVBLOK Control unit busy count Device busy count *-MNDEVLST Device entry size in doutlewcrds (1'01') Section 1. CP Data Areas and Centrol Blocks 55 !ORCO! !ONCO! provides drive. o the control link for CP's monitoring activity, i !ONARDB i 0*1 i 0*2 nONDVNUn i 28 -----------------------------------------------------1 MONDVLST 1/////////!OBRSV1///////////1 ---------------------------------------------------1 MOIIIOB !ONITRB 1 -----------------------------------------------------1 MONCLOCK 1 -----------------------------------------------------1 MONSUSCK 1 -----------------------------------------------------1 MONSUSCT 1/////////!OBRSVD1//////////1 30 MONSAVE1 70 !ONSAVE2 BO MONUSER 8 10 18 20 B8 ftORSPLCT !OBS-FB CO !OBCURV MOBBXTV C8 !OBCURR l'IONIUTR DO MOBDASA MONDASB D8 MONDAS EO MOBCURBF MOBCRSLT E8 MOBIOBF MORIOSLT FO MOBSKLST MOBSACT F8 MOBCBPTR MOBUTRB 100 M*3 M*4 MOBBUFBO l'IORBUF1 MORBUF1V (Variable nu.her of buffers) (Last address field) 56 the user, and IBM VM/370 Data Areas and Control Block Logic the tape MCNCOM Hexadecimal Displacement o 4 Field Name Field Description, Contents, Meaning Bi!§ g~!1:~g KONSYSVK EQU CFSTOP EQU TRUN EQU ERROR EQU l!ONTIINT EQU KONLSTBK EQU l!ONIBUF EQU 5 1F 11 KONARDB DS MONFLAG1 DS KONFLAG1 1:11 i'isQI- l!ONFLAG2 DS 1X 10 14 18 20 28 2C 30 70 EO E8 BC CO C4 C8 CC DO D4 D8 DC EQU -i'aoe-- KONDVNQl! MONDVLST KONRSV1 MONAIOE DS DS DS DS DS :PS DS DS DS DS DS 1H 1F 1F 1F 1F 1D 1D 1F 1F 16F 16F DS DS DS DS DS DS DS DS DS DS 8C 1F 1F 1F ~ONATRB l!ONCLOCK KONSUSCK KONSUSCT MONRSiD1 MONSAlE1 MONSAVE2 MONUSER MON;5PLCT MONSFB MONCURV MONNXTv MONCURR MONNXTR MONDASA MONDASB KONDAS MONEX K*2 MONFLAG2 SUSPEND Work byte VK/370 monitor bas been suspended iF 1F 1F 1F 1F 1F ii*3 DS Address of monitor tape real device block Monitor flag Flag used by user class routine MONliOR STOP command has been issued Tape rewind-unload CCW has been scheduled Tape error has occurred -- step VK/370 menitor Handling timer interruption Handling the last tlock Only one buffer for VM/370 menitoring 1'20' X'10' X'08' X'04' X'02' X'01' ~it§ ggfi~ed i~ 6 8 C M*1 Numter of entries in real device list Address of the real device list Reserved for IBM use Address of monitor tape l/C block Address of monitor timer request block TOD clock stamp for each record TOD clock value at last suspension Suspension count Reserved for IBM use Monitor internal save area fer main processor 8onitor internal save area for attached precessor User starting/stopping the V8/310 monitor Number of records on spool file Address of SFBLCK for spool file Virtual address of first virtual buffer Virtual address of secend virtual buffer Real address of first virtual buffer Real address of second virtual buffer Address of next DASD buffer Address of previous DASD buffer Address of IASD buffer for tbe spocl file Flag lyte Spool file closed ty command DD l!ONFLAG3 DS §it§ g~!1:!}~g CLSUS EQU EXHAUST EQU CL EQU SPOOLED EQU 8*4 1:11 Flag tyte MONFLAG3 i'sO'X'40' 1'20' 1'10' DE EO E4 E8 MONBUFNO MONCURBF MONCRSLT KONIOBF DS DS DS DS 1H 1F 1F 1F EC FO F4 F8 FC 100 KONIOSLT MONSKLST MONSACT MONCHPTR l!ONUTRB KONBUF1 DS DS DS DS DS DS 1F 1F 1F 1F 1F 1F Suspend during close Spool DASI slots exhausted Suspension necessary 8onitor to spool active Reserved for IBM use Address of current V8/370 menitor buffer Corresponding slot address Address of 1M/370 monitor buffer going to tape Corresponding slot address Address for device list seeks Limit count for real time .enitor Address of channel sampling data Address of I/O utilization First VM/37C monitor buffer address Section 1. CP Data Areas and Centrel Blocks 57 MOBCOM Hexadecimal Displacement 104 Field Bame Field Description, Contents, Meaning MOBBUF1V EQU MOBBUF1+4 First buffer address of remaining variable number of buffers. There is one 4-tyte entry for each monitor buffer. The last field contains X'FFFFFFFF' ftOBSIZB (*-MOBCOM)/8 Size of DSECT in doutlewords BQU !lag§ !~ DftKSYSAT AUTOGO EQU----X' 80' AUTOSPL BQU X'40' ftOBSLMT BQU ftOBBUFAV BQU ftOBBUFAC BQU X'20' SISMON setting for AUTODISK cn Stop monitor when spool file record limit is reached Sampling for real time Monitor X'01' X'03' FIM in Byt~ 1 of ~uff~ of Buff~ !£!: .§pool Not collecting; being used fer output Available fcr use Current active collector l1~it~! ~uffe!: Co~!!ol TRAP UBFIB BQU BQU Fl~g !~ ~Egg! SFBeOB 58 EQU X'80' X'40' Flag in Byt~ 1Q of Spool Buffer Last buffer queued for I/O Close occurred tefore the buffer was full File Control ]lock (~!BFL!G2) l!onitor sFocl file ide-ntifier --ii 01' IBM VM/370 Data Areas and Centrol Block Logic l!SSCOl! MSSCOM contains information necessary to request a l!SS volume mount, request a MSS volume demount, or ccmplete processing when a pack change interrupt is received on a l!SS device. The MSSCOM tlocks are chained frcm location DaKS~SMQ in module D!KSSS. r HSSSER 0 I I 8 I////////MSSRSRVD/////////I I MSSTASK2 10 I I 18 I MSSNEXT I HSSUSER (cont.) 20 I Hexadecimal Displacement ------------ Field Name 8SSVUA MSSTASK1 MSSTASK3 aSSUSEB MSSFLAGS Field Description, Contents, Meaning 0 MSSSER DS CL6 6 8 C MSSVUA DS MSSRSRVD DS HSSTASK1 DS XL2 1F 1F 10 MSSTASK2 DS 1F 14 MSSTASK3 DS 1F 18 1C MSSNEXT MSSUSER DS DS 1F CLS 24 MSSFLAGS DS X12 Volume serial number of the l!SS volume to te mounted or demounted Device address for the volume Beserved for IBl! use Pointer to a CPEXBLOK for a pending MS~ pack change interrupt Pointer to a CPEXBLOK for a pending MSC return on mount or demount Pointer to a CPEXBLOK for an I/C request to a volume being mounted Next entry in the chain, or zere Name of the virtual aachine that requires the ~SS activity Einary flags representing the status of the request MSSERR in MSSFLAGS EQU -X'8000'EQU X'2000' EQU X'400' RQENT EQU X'SO' MQENT EQU X'40' INPROC aSGPROC EQU EQU X'20' X'10' MSSSIZE EQU (*-MSSSER)/8 asscoa size in doublewords ~i!§ g~!!!!~g MOUNT DEMOUl~T Mount volume aSSSER on address HSSVUA Demount MSSSER from MSSVUA The l!SC detected an error while attempting the requested action This request is waiting to be passed to the l!SC This request has been passed to the l!SC, and is awaiting a pack change interrupt This request being processed by the l!SC The esc has completed for this request and message DMKSSS0881 is being sent Section 1. CP Data Areas and centrel Elocks 59 NCPTBL NCPTBL entries provide description information en Cp-owned volumes. 0 NCPSIZE NCPVOL 18 ------------ 1*1 NCPPAGCT NCPSTART Field lame I I 1//U*2///1 I I Field Description, Contents, 0 4 8 10 NCPPNT NCPSIZE NCPIAftE NCPVOL DS DS DS DS lF CL8 CL6 16 NCPFLAG DS lX IF ~eaning Displacement to next entry 370x storage size required for load Control program reference name Volume identification of DASt containing saved image N*l CPTYPE flag hyte !!it§ g~!i~g !1! !~.fFLAG NCPTNCP EQU X'Ol' NCPTCEP EQU X'02' NCPTPEP EQU X'03' Netwcrk Control Program 270x Emulation Control Prograa Partitioned Emulation prograa NCPRSV1 DS NCPSTART DS 1X 18 lC NCPPAGCT DS IF Res~r~ed f6t 1~~ use Pointer to first page (CCPt) cn HCPveL of saved NCP Total number of pages saved NCPSIZE (*-NCPSIZE)/8 NCPTEL size in doutlewords (X'04') 17 60 ! I NCPNAftE 10 saved en I ICPPIT 8 Hexadecimal Displacement 370x control program images EQU N*2 IF IBft VM/370 Data Areas and Control Block Logic NICBLOK NICBLOK contains control lines, and display screen NICBLOK. information related to 3704/3705 resources, teleprocessing status information. The RDEVNICL field of RDEVELOK Foints to o NICNAME NICEPAD 8 NICRCNT NICVRID 10 o 2 4 Field Name N*4 NICQPNT NICNAME NICEPAD NICSTAT Field Description, Contents, DS DS DS 1H 1H 1X NICFLAG DS 1X !!!i§ g~f!~g in NICFLAG NICSESN EQU --X'80'NICATTN EQU X'40' NICPSUP EQU X'20' NICATOF EQU X'10' NICENAB EQU X'08' NICDISB EQU X'02' NICMTA EQU X'01' NICFMT EQU X'80' NICDIAG EQU X'40' NICALRM EQU X'10' NICCARD EQU X'04' NICPROCN EQU X'01' 6 7 N*3 I NICDSP !!!i§ g~f!neg in NICSTAT NICERLK EQU --X'80'NICNTRL EQU X'40' NICDISA EQU X'20' NICSWEP EQU X'10' NICEPMD EQU X'08' NICLTRC EQU X'02' NICDED EQU X'01' EQU NICTRQ X'80' NICHOLD EQU X'10' NICMORE EQU X'08' NICRUNN EQU X'04' NICRE!D EQU 1'02' NICCPNA EQU X'01' 5 N*2 I NICTlUT NICUSER 18 Hexadecimal Displacement N*1 I NICLLEN NICTYPE DS DS 1X 1X !!it§ g~f!~g in NICTYPE NICCTLR EQU --X'OO'NICLINE EQU X'80' NICTERM EQU X'40' NICLGRP EQU X'20' ~eaning 370x NCP resource name Subchannel address when in EP mode N*1 Resource status flags Device error lock is set Control operation is active Resource inactive (offline) Resource is switchable to EP mode Resource now in emulator mode NCP line trace active Resource is dedicated Graphic device - timer request Fending Graphic device - screen full; in HOLD status Graphic device - screen full; in MORE status Graphic device - screen in running status Graphic device - read pending fer screen input Graphic device - last input not accepted N*2 Interface control flags Session is active for this device Attention handling in progress Resource has print suppress feature Suppress attention signal character Resource is active and enabled Resource to be disabled as soon as possible Multiple terminal access resource Graphic device - screen formatted VM/370 online Graphic device - screen written with DIAGNOSE Graphic device - screen has an alarm message Graphic device - data from card reader Graphic device - process centrol task now N*3 Terminal output line length N*4 Resource type and/or features Resource Resource Resource Resource is is is is the 370x a teleprocessing line a terminal device a logical line group Section 1. CP Data Areas and Control Blocks 61 NICBLOK Hexadecimal Displacement Field Name Field Description, Contents, Meaning ------------ !!.!1§ g~f!1!~g in NICTYPE (cont.) X'08'--LINE - Synchronous data link control NICSDLC EQU NICLBSC EQU X'04' LINE - Binary synchronous line control NICSWCH EQU X'02' LINE - Switched line interface NICMLTP EQU X'01' LINE - Multiple-drop leased line NICTELE EQU X'10' TERM - Telegraph line adapter NICCIBM EQU X'08' TERM - Selectric-based terminal NICRCPU EQU X'04' TERM - Bisynch remote computer NICRSPL EQU X'02' TERM - Bisynch remote spool device NICGRAF EQU X'01' TERM - Bisynch remote graphics NIC3271 EQU X'08' Graphic device - 3271 control unit NIC3275 EQU X'04' Graphic device - 3275 standalone display station NICOPRDR EQU X'10' Graphic device - card reader feature 8 A C 10 14 18 NICRCNT NICVRID NICTMAT NICUSER NICQPNT NICDSP 1H 1H 1F 1F 1F 1D DS DS DS DS DS DS Retry count for BTO errors Virtual resource ID when dedicated TOD clock value when attached VMBLeK address of associated user Pointer to input BTU chain Remote 3270 information ORG NICDSP 1X NICRSV1 DS NICDTYPE DS 1X ~!1§ g~fi~ !~ NICD3277 EQU NICD3275 EQU NICDTYPE 1'04'--X'02' 3277 display station 3275 display station NICMDL NICRSV2 NICRSV3 DS DS DS 1X 1X 1X Display station model Reserved for IBM use Reserved for IBM use NICSIZE EQO (*-NICBLOK)/8 Size of block in doublewords (X'03') Q~ic~ Q~£gDQ~~1 ~2!2 2 3 Reserved for IBM use Display station type NICCORD NICTMCD 127Q - ORG NICEPAD DS 1X DS 1X ~~ ~!1!2II ~1!chronQ~ Li~~§ Current line coordinates Terminal mode ~it§ Q~!.!neQ 8 A C NICTABF NICSIO NICAPL NICTEXT in NICTMCD EQU - X ' 8 0 ' EQU X'40' EQO X'20' EQO X'10' Second scan of screen's input area DIAGNOSE issued to input area APL cn for 3270 remote Text feature on for 3270 remote NICSELT NICPOLL NICATRB ORG NICRCNT DS 18 DS 1H DS 1F Remote station selection characters Remote station polling characters Timer request block address ~gJ!at~ ~lmb~!§ f~! WRITBRK RDBOFLN RDBUFNO EQU EQU EQO ~~se ~.!!§ IPLREQ ABORT 62 EQU EQU VML37.Q X'09' 96 6 (§~D~ ~1!~ X'02' X'01' of !.!!~ l1 0x Write break CCW operation code Length of host read buffers Numher of host read buffers ~Y.EEQ!! Q) Peculiar to the 370x ----IPL-required==3705 inactive Buffer depletion--transfer terminated IBM VM/370 Data Areas and Control Block Logic NPRTEL NPRTBL lists saved image. by naae all o pages saved and NPRVOL 18 o 10 16 17 18 lC contains the lIPRNI!!E 10 4 8 DASD volume that NPRRSV1 NPRPNT 8 Hexadecimal Displacement indicates the N*l N*2 NPRPIGCT NPRSTART Field Name Field Description, contents, Meaning NPRPNT NPRRSV1 NPRNAME NPRVOL DS DS DS DS NPRCNT NPRRSV2 NPRSTART NPRPAGCT DS DS DS DS 1F 1F C18 CL6 1X 1X 1F 1F N*l N*2 Chain pointer to next entry Reserved for IBM use Reference name for image library Volume of DISD containing the saved image Number of 3800s active on this image Reserved for IBM use CCPI of first page on NPRVCL Number of pages saved Section 1. CP Data Areas and Control Blocks 63 OERRECN (Long OBR) OERRECN provides error, sense, and other statistical data needed for errcr recording on a specified channel-attached I/O device. o I OBRKEYN OBRSWSN 1/IIIIIIIIIOBRSPE1/1//I//I//' OBRDTEN 8 OER'IMEN 10 OBRCPIDN 18 OERPGMN 20 OERFCCWN 28 OERCSWN 30 OBRCUAIN S*1 38 OBRCUAPR 40 Hexadeci.al Displacement ------------ OERtEVTN OERIORTY CBRSNSCT Device Dependent rata Field Na.e Field Description, Ccntents, Meaning l~-~1~ !!~g~! ~££rd 0 OBRKEYN OBRSiSN 2 Byte Bits defined ill '0--------OBRMORE OBRTOD Byte 4 8 C 10 18 20 28 30 31 64 1H 1H DS DS BQU BQU Bits defined in "1------ Record type Switches Q!U~SWSN X'80' X'40' More records to follow TOD clock instruction issued Q~RSWSN OBREOD OBRTBMP OBRSHOBR OBRDEMNT EQU BQU EQU BQU X'80' 1'40' X'20' X'04' SDR counters dumped at ECD Temporary error Short record Volume demounted OBRSPE1 OBRDTEN OBRTMEN OBRCPIDN DS DS DS DS 1F 1F 1F 2F Reserved for IBM use Date Tille Processor identifier and serial number OBRHSIZE EQU (*-CBRRECN) Size of OER header OBRPGMN OBRFCCWN OBRCSWN OBRDDCNT OBRCUAIN 2F 2F 2F 11 3C DS DS DS DS DS Job identification Failing CCli Failing CSW S*1 Number of doublewords in record Address of failing device IEM VM/370 Data Areas and Control Elock Logic CEBRFCN (Long OER) Hexadecimal Displacement -------------34 38 39 3C 3E Field Name OBRDEVTN OBRSDRCT OBRCUAPR OBRIORTY OBRSNSCT Field Descripticn, Contents, Meaning DS DS DS DS DS OBR1SIZE EQU 40 48 50 All DASD OBRVOLN OBRLSKN OBRHID 1F 1X 3C 2X 2X (*-OBRRECN) Units DS ac DS ax ax DS ~Jj4/2112 !~!!at 58 62 -------------------------------------- Device type S*2 Number of SIR work area bytes primary unit address Number of retries Number of sense bytes Size of long OBR record base voluae identification Last seek address Home address OBRSDRiK DS OBRSENSN DS 101 6C SDR work area Sense data OBR2SIZE EQU (*-OBRRECN) Maximum size of 2314/2319 reccrd J35QL1J~QLllJQL23Q~ For!!~! 58 ORG OBR33SNS DS OBRSDRWK 24C 3350/3340/3330/2305 sense data OBR3SIZE EQU (*-OBRRECN) Maximum size of 3330/3340/2305 record yni! 40 4A R~£g!g IgE!!~! ORG OBRURST DS OBRURSNS DS OBRVOLN 101 1C SDR work area Unit record sense data 150.2L1.2~.2 40 lQilat ORG OBRVOLN OBR3505S DS 1C 3505/3525 sense data 40 41 48 52 J20J !grmat ORG OBRCORRL DS DS OBRSDR03 DS OBR3203S DS OBRVOLN 11 71 101 24C Correlation number Reserved for IBM use SDR work area 3203 sense data 40 41 48 52 J21j 12!1!~! ORG OBRCORL DS DS OBRSDR32 DS OBR3211S DS OBRVOLN 11 71 10X 6C Correlation number Reserved for IBM use SDR work area 3211 sense data ~400 TaE~ 48 52 19rma! ORG OBRLSKN OBRTAPST DS 101 OBRTAPSN DS 24C J42QLJ~jQ %gE~ 48 58 6C ORG OBRDVDEP DS OBR342ST DS OBR3420S DS !.2.!.!at OBRLSKN 16C 201 24C SDR work area 'rape sense data Device dependent data SDR work area 3420 sense data Section 1. CP Data Areas and Ccntrol Blocks 65 OERREC (Short OBR) OERRECN provides error, sense, and other statistical data needed for error recording on a sFecified channel-attached 1/0 device. 18 20 I OBRDEVSH I 0*1 OBRCUA I -----------------------------------------------------1 OBRSDRIN I I I I II/IIIIIIIOBR SV1 1111/111111 I I 30 I L Hexadecimal tisplacement Field Name !9!~: 18 1C Field Description, Contents, fteaning The 24-byte Header Record for the Short OER is identical tc that of the Long OER, the description of which precedes this block. OBRDEVSH DS OBRSDRSH DS OBRSIZE EQU (*-OBRRECN) 0*1 £evice type Number of SIR work area bytes Size of short OBR record base OBRSIZE 1 EQU f*-OBR-R-ECN+1-) 18 Si-ze in doutlevords (X'04') 1D 20 OBRCUA DS OBRSDRIN DS 3X 20X Channel and unit address SDR work area 20 2A ORG OBRSSDR 1 DS OBRSSDR2 DS OBRSDRIN 10X 10X SDR work area SDR work area 34 OBRSV1 DS OBRSIZE2 EQU 66 1F 1X 1F Reserved for IBft use (*-OERRECN+7)/8 Size in doutlewcrds (X'07') IBM VM/370 Data Areas and Control Block Logic CiNDLIST. PAGTIELE OiNDLIST contains a list of all the system owned DAsr volumes that are used for paging, sFooling, and temporary disk storage activity. Each entry specifies the vclume identity and its preferred use (that is. paging/spoolin9/~-disk space). This block is generated by the SYSOiN macro at system generation. o OWNDVSER Field Naae Bexadeciaal tisplacement ="'----------- CWNDRDEV Field Description, Contents, fteaning 0 OiHDVSER DS C16 6 OWNDRDEV DS 1H Volu.e serial number Displacement of RDEVBLOK fer the volume 6 ORG OiNDPREF DS OWNDRDEV 1H Allocation preference PAGTABLE is used by CP for allocating and referencing storage. It is referenced by the segment table (SEGTABLE) data area and contains a pointer to the swaF table (SWPTABLE) which~ in turn, is related to a DASD cylinder location. The SWPPAG field of SWFTAELE points to PAGTABLE. -8 PIGSTMP o PAGSHR 8 Eexadecimal Displacement ------------ Field Name Field Description, Contents, fteaning §-~n~ !!~g£~ DS DS 1F 1H -2 PAGTOT DS 1H 0 PAGSHR PAGSWP DS DS 1F 1F 4 PAGSWP PAGCORE PAGSTMP PIGACT -8 -4 PAG'lOT PIGACT Page table time stamp Count of active segment tahle entries for this segment Count of total segment table entries for this segment Pointer to NAME table (SBRTAELE) Pointer to swap tatle (SiP'lAELE) Section 1. CP Data Areas and Control Blocks 61 PAGTABLE, PGBLOK Hexadecimal Displacement Field Name Field Description, Contents, Meaning PAGCORE 8 DS 1H Real page address (start of page table fer hardware) PAGTJELE entry invalid page has teen referenced prg~! E.!!E~!! PAGBMP for ~hared Seg!ents (PAGCORE-PAGSTMP.16*L'PAGCCBE) length of a full 16 entry page table (PAGiSWP+(SiPFLAG-SWPVM)+16* (SWPCOtE-SWPFLAG.1).8) length of a contiguous page and swap table EQU PGBLOK is used by VM/VS Handshaking_ The tlock is created and stacked when a multiprogramming or multitasking VS1 program interropt occurs when a referenced page is net available in storage. The VMPGPNT field in the VMELOK points to PGELCK. o PGPNT Hexadecimal Displacement Field Name 0 PGPNT PGADDR DS DS PGESIZE EQU -----------4 68 PGADDR Field Description, Contents, Meaning 1F 1F (*-PGELOK+7)/8 Pointer to next page tlock cn the stack Virtual page fault address PGELCK size in doutlewords (X'01') IBM VM/370 Data Areas and Control Elock Logic PSA PSA is the primary control block for controlling CP and virtual machine activity. This centrol blcck centains the normal low core 1PL, logout, and PSi infermation; the processor medel and type and features of the prccessor; and save areas used by EALR and FREE. This bleck also contains monitor and trace data and the necessary linkages to virtual machines, real devices, and spool files. Note: All fields reside in real PSA unless otherwise specified. Fields residing in atsolute PSI are specifically identified. For uniprocessor operation, real PSA equals absolute PSA (or 0). If the system was running in AF mode when a catastroFhic errcr occurred, the Attached Processor will no longer be running. System recovery is in uniprocessor mode and the real PSA will no longer be zero. Page 0, Machine Usage r O! , IPLP Si IPLCCi 1 I 1-----------------------------------1 101 IPLCCi2 EIOPSi I I 1 201 SVCOPSi PROPSW I I I 301 MCOPSi IOOPSi I I I 401 CSi CAW IQUANTUMR 1------------------- 501 TIMER IQUANTUM EINPSW 1-----------------------------------SVCNPSW PRNPSW 601 1-------------------------MCNPSi IONPSi 701 1-------------------------CPULOG 801 1------------------------------FIDLOG 1001 i------------------------FPRLOG 1601 1-------------------------------GPRLOG 1801 1-----------------------------------CRLOG 1COI 1----------------------------TEMPSAVE , I 31CICPlD ICPABEND IF*3 IP*4 I ASISV!! I 38CIARSPPR I 39C AR10PR IARSPPU IARSFRD IAR10RD IF*5 If*6 IARSPAC 3AC AVMREAL IASYSABND IASYSLC I ASYSOP 3fC ARlOC'I IAR10CH IARICCU IARICDV 3CC ARIOCC IARIOUC IARleDC I ACORETEL 3DC APAGCF ICPCREGO ICFCREG6 ICPCREG8 IARICPU 3EC TlMEDISP IASVCLIST I AV!!1LIST ILASTUSER 3FCIPAGECUR I MONNEIT IFAGENt IPAGENIT I 4CCITRACEFLG ITTSEGCNT 1//////1/////////// i 1/////11111111111/1 1/////////I///I///PSARSV15///////////// 1------------------------------- 430lINSTiRD1 IINSTiRD2 IINSTiRD3 IINSTiRD41 I I 44C I Constants Feol I 2001 1----------------------------------BALRSAVE 2401 1----------------------------FREESAVE 2801 1-----------------------------------FREEWORK 2COI 1----------------------------DATE TODATE 1-------------------------------STARTIME CPUID 3001 2FOI I 4tC I APTRLK I 4ECIIPAGNUM 1 4FCIAQCNi'I I 50ct INOADD II4CFFS IIRIGHT16 IAFREE IADSPCH IAFTRAN DUMPSAVE I IIRIGBT241 I IAFRET I 1 II2048ENti I I I----~----------------------------- 3101 lDLEilIT PAGEiAlT I--------~------------------------- 3201 IONTilIT PROBTII1E 1------------------------------RUNPSi IRUNUSER IDSPLPSi 1------------------------------340lRUNCRO IRUNCR1 ICPSTAT ICPRESTRT 1--------------------------------350lPGREAD IPGiRITE PGiAITIM t 1-----------------------------------SlGSAVE 5401 3301 1-----------------------------------LCKSAVE 58CI I I 3601////PGiAlTPG///////IPSASVCCT IP*1 IP*21 Section 1. CP Data Areas and Centrel Blocks 69 PSA , , MFASAVE 5COI I 6fCI CHGREGS I/I///RESERVED///III 1-------------------------------------1 6COI UNSHRVM IP*10IP*11111///RESERVED/////1 1-------------------------------------SiTHSAVE 6001 1-------------------------------------LOCKSAV 1-------------------------------------SVCREGS 6501 6401 1-----------------6601 PREFIXA I PREFIXBI I 1 6DCI STACKVM IUNSHRVM2 IADMKCFE IRESERVEt/1 1 1 6EOI/////////I/RESERVED (cont)////////////I 6FC 70C 71C -------------------------------------1 ALOKUM IRESERVE I ALCKSF I IEXTSP 1 -------------------------------------1 ITMRSN I////I/I/I/RESERVED//////////I -------------------------------------1 MCNREGS I I PSACPXBFI//RESVD// 1--------------------------------------1I 6701 iAITSTRT iAITEND 1 6S01 PiTPAGESIACTIVTRQI EMSPEND 1 EMSREC 1 1 I I 6901 XCPEND IP*7IP*8 IP*91 AFSTATUS I I I 6AOIL -AMCHAREAISHRLKCNTI -___________________________________ PROBSTRT __I Hexadecimal tisplacement Field Name 8 ORG RSRTNPSi DS RSRTOPSi DS IPLPSW 1D 1D Restart new PSi Restart old PSi IPLCCi1 IPLCCi2 1D 1D IPL CCi IPL CCi DS DS IPLCCi1 1F 1F 10 TRACEND DS 1F 14 TRACCURR DS 1F 18 20 28 30 38 40 48 4C 50 54 58 60 EXOPSi SVCOPSi PROPSi MCOPSi IOOPSi CSi CAi QUANTUMR TIMER QUANTUM EXNPSW SVCNPSi PRNPSi MCNPSi IONPSi 1D 1D 1D 1D 1D 1D 1F 1F 1F 1F 1D 1D 1D 1D 1D C 68 70 78 70 IPL start PSi ORG PSARSV3 DS TRACSTRT DS 8 LOKSAVE2 Field Description, Contents, Meaning o 10 7SC DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS Reserved for IBM use Address of start of trace table. Note that TRACSTRT is in absolute PSA Address of end of trace table. Note that TRICEND is in absolute PSI Address of next available trace table entry. Note that TRACCURR is in absolute PSA External old PSi SVC old PSi Program old PSi Machine check old PSi 1/0 cld PSi Channel status word Channel address word Interval timer value at last interruFt 13-microsecond interval timer Interval timer value at last disFatch External new PSi SVC new PSi Program new PSW Machine check new PSi I/O new PSi IBM VM/370 Data Areas and Control Block Logic 1?SI Hexadecimal Displacement 80 80 84 Field Name CPULOG INTEXF Field Description, Contents, Meaning DS 16D ORG CPULOG DS 1F DS lF INTSVCL INTSVC INTPRL INTPR TREXADD MONCLASS PERCODE PER ADD MONCODE DS DS DS DS DS DS DS DS DS DS CHANID DS IOELPNTR DS ECSWLOG DS DS INTKFLIN DS lH lH lB lB lF 1H lB IF IF lD IF 1F IF 1F 1F SVC instruction length code (ILC) SVC interrupt code Program instruction length code (ILC) program interrupt code Translation exception address Moniter class PER code to be reflected Address of instruction causing PER interruFt Monitor code Reserved for IBM use Channel It I/O extended logout (IOEL) Feinter Limited channel logout (ECSW) Reserved for IBM use I/O interrupt key, flags, and interface address I/O interrupt device address (halfword) EA BC E8 FO F4 Reserved for IBn use External interrupt code (fullword) External interrupt code (half word) 86 88 8A 8C 8E 90 94 96 98 9C AO A8 AC BO B4 B8 Processor and storage logout area INTMC INTRC DS DS DS DS 11F 1D IF 1X F5 DS F8 FC FAILSTAD DS REGNCODE DS IF 1F 100 160 FXDLOG FPRLOG 12D 4D .. nn GRLOG DS 16F lCO 200 CRLOG CPU SAGE DS DS 16F OB Fixed logout area Floating-point register log cut area General register logout area Control register logout area End cf machine usage; start ef C1? usage 200 ORG TEMPSAVE DS CPU SAGE 16F Temporary save area IOV 200 204 208 20C 210 214 218 21C 220 224 228 22C 230 234 238 23C TEMPRO TEMPR1 TEMPR2 TEMPR3 TEMPR4 TEMPR5 TEMPR6 TEMPR7 TEMPR8 TEMPR9 TEMPR10 TEMPR 11 TEMPR12 TEMPR13 TEMPR14 TEMPR15 DS DS Reserved for IBM use Machine check interrupt code Reserved for IBM use External damage reason code Reserved for IBM use Failing storage address Regien code ORG DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS TEM1?SAVE 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F Registers 0-15 Sectien 1. CP Data Areas and Centrel Blecks 71 PSA Hexadecimal Displacement Field Description, Contents, 16F EALR linkage save area BALRSAVE 1F 1F Registers 0-15 ~eaning 240 BALRSAVE DS 240 244 24C 250 254 258 25C 260 264 268 26C 270 274 278 27C BALRO BALR1 BALR2 BALR3 BALR4 BALR5 BALR6 BALR7 BALR8 BALR9 BALR10 BALR11 BALR12 BALR13 BALR14 BALR15 280 FREESAVE DS 280 284 288 28C 290 294 298 29C 2AO 2A4 2A8 2AC 2BO 2B4 2B8 2BC FREERO FREER1 FREER2 FREER3 FREER4 PREER5 FREER6 FREER7 FREER8 FREER9 FREER10 FREER 11 FREER12 FREER13 FREER14 FREER15 ORG DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS FREESAVE 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 2CO 2FO 2F8 300 308 FREEiORK DATE TODATE STARTIME CPOID DS DS DS DS DS 12F CL8 1D 1D 1D tMKFRE work area Date - mm/dd/yy - edited BECDlC TOD clock at hh.mm.ss today - local time Date and time started - TOt clock value Processor identification field 308 309 30C 30E CPOVERSN CPUSER CPO MODEL CPOMCELL ORG DS DS DS DS CPOlD 1X 3X 2X 1H Version code Processor serial numler - ~acked unsigned Processor model number Maximum length in lytes of MCEL 310 318 320 328 330 338 33C 340 344 IDLEiAIT PAGEiAIT IONTiAIT PROBTIME RUNPSi RUNOSER DSPLPSi RONCRO RUNCR1 DC DC DC DC DS DS DS DS DS X'7FFFFFFFFFFFFOOO' iotal system idle wait time X'7FFFFFFFFFFFFOOO' iotal system page wait time X'7FFFFFFFFFFFFOOO' Total system I/O wait time X'7FFFFFFFFFFFFOOO' iotal system problem state time 1D PSi last loaded by dispatcher 1F Address of dispatched V!ELCK 1F Load PSi instruction used to disFatch 1F Control register 0 at dispatch 1F Control register 1 at dispatch 248 72 Field Name ORG DS DS DS 1F DS DS DS DS DS DS DS DS DS DS DS DS DS 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 16F tMKFRE save area Registers 0-15 IBM VM/370 Data Areas and Control Block Logic PSA Hexadecimal tisplacellent Field Nalle 348 CPSTAT 348 ORG CPSTATUS DS ------------ Field Description, Contents, l!eaning DS -------------------------------------- 1F CP running status CPSTIT 1X CP running status in CPSTATOS EQO -X'80'-EQU X'40' EQU X'20' EQU X'10' EQU X'OS' ~it§ g~!i1!~g CPiAIT CPRUB CPEX CPFVRUN CPSUPER 349 XTNDLOCK DC 1X 34A CPSTAT2 1X 34B DC CP in wait state CP running user in RUNOSBR CP executing stacked request Reserved for IBM use Processor is executing in supervisor state System extending free storage if it is equal to IlPF'. Note that XTNDLOCK is 1D absolute FSa. Flag byte !!i!§ g~!i1!gg in CPSTAT2 CP1UCAVL EQU --X'80'-CPIUCON EQU X'40' CPSBRLK EQU X'20' CPASTAVL EQU X'OS' CPASTON EQU X'04' Virtual machine assist available on processor Virtual machine assist is cn for system CP processing shared named system page CP assist available on processor CP assist is on for system CPSTAT3 Wait time accounting flag DS 1X !!i!§ g~!!~g in CPSTAT3 CPT IDLE EQU --X'80'-CPTPAGE EQU X'40' CPTIOBT EQU X'20' Timer contains idle time Timer contains page wait time Timer contains I/O wait time 34C CPRESTRT DS 1F 350 354 358 PGREAD DS PGWRlTE DS PGWAlTIM DS 1F 1F 1D 360 368 36C 36E PGWAlTPG PSASVCCT PAGELOAD PAGERATE DS DS DS DS 1D 1F 1B 1B 370 370 PSENDCLR DS CPID DS OF 1F 374 378 378 37A 37C 380 384 388 38C 390 394 398 39A CPA BEND PSTARTSV SYSIPLDV PGSRATlO ASYSVM ARSPPR ARSPPU ARSPRD ARIOPU ARIOPR ARIORD lPUADDR PSAl!SS 1F OF 1B F*3 B'O' P*4 V (D MKSYSVM) V(DMKRSPPR) V(D MKRSPPU) V (DMKRSPRD) V(D MKRIOPU) V CD MKRlOPR) V(D MKRlORD) 1B P*5 1H P*6 DS DS DS DC DC DC DC DC DC DC DC DS DS P*1 P*2 Restart address if external interrupt marks page invalid Total numter of page reads Total number of page writes Time spent in page wait, multiplied by number of pages waiting Reserved for IB! use Total number of user SVCs Page wait percent, last measurement Paging rate, pages per seccnd Note that PAGERATE is in absolute PSA. End of area cleared by D!KCFINT CP running identifier. Note that CPID is in absolute PSA. CP abend code Start of save/restored code Device address of system lft device Page steals/total replenished Address of system V!BLCK Address of system printer file chain. Address of system punch file chain. Address of system reader file chain. Address of system punch table. Address of system printer table. Address of system reader table. Instruction processing address Address of !SS volume The !SS is online and the !SS communicator has been initialized Section 1. CP Data Areas and Centrel Blocks 73 PSA Hexadecimal Displacement 39C 3AO Field Name Field Description, Contents, Meaning ARSPAC AVMREAL DC DC v (DMKRSPAC) A (0) 3A4 3A8 3AC 3BO 3B4 3BS 3BC 3CO 3C4 3CS 3CC 3DO 3D4 3DS 3DC 3EO 3E4 3ES ASYSABND DC A (0) ASYSLC DC ASYSOP ARIOCT ARIOCH ARIOCU ARIODV ARIOCC ARIOUC ARIODC ACORETBL APAGCP CPCREGO CPCREG6 CPCREGS TIMEDISP ASVCLIST AVMALIST DC DC DC DC DC DC DC DC DC DC DC DC DC DS DC DC v (DMKSYSLC) V (DMKSYSOP) V (D MKRIOCT) V (DMKRIOCH) V (D MKRIOCU) V (D MKRIODV) V (D MKRIOCC) V (DMKRIOUC) V (DMKBIODC) V (D MKSYSCS) A(X'FFFFFF') X'SOSOOSCO' F'O' F'O' 1F V (D MKSVCNS) V (DMKPRVMA) 3EC 3FO LASTUSER DC PAGECUR DS V (DMKSYSVM) 1F 3F4 MONNEXT DS 1F 3FS PAGEND DS 1F 3FC PAGENXT DS 1F 400 TRACEFLG DS 1F 400 ORG TRACEFLG TRACFLG1 DS 1X J1!!§ g~!!l!~Q in TRACFLG1 TRACOl TRAC02 TRAC03 TRAC04 TRAC05 TRAC67 TRACOS TRAC09 401 EQU EQU EQU EQU EQU EQU EQU EQU TRACFLG2 DS --X'80'--- Address of system accounting chain VMELCK address of virtual=real user. Note that AVMREAL is maintained in both PSAs Address of system abend Frinter Address of SYSLCCS information Address of system operator VMELCK Address of real channel index table Address of first RCHBLCK Address of first RCUBLOK Address of first RDEVBLCK Address of count of real system channels Address of count of real system control units Address of count of real system devices Address of system CORTABLE Address of first pageable Frogra. CP architecture control and external mask CP assist and virtual machine assist mask MONI!OR CALL enable mask Timer displacement for charge Address of CP assist pointer list Address of expanded virtual machine assist pointer list Last user te be dispatched Current monitor buffer page address. Note that PAGECUR is in absolute PSA. Next availatle address in .eniter buffer. Note that MONNEXT is in abselute PSA. Last address in current moniter buffer page. Note that PAGEND is in absclute PSA. Alternate '-cnitoi l:tiffer-page address. Note that PAGENXT is in absclute PSI. Trace table flags Trace table flag X'40' X'20' X'10' X'OS' X'04' X'02' X'01' External interrupt tracing en SVC interruFt tracing en Program interrupt tracing CD Machine check tracing on I/O interruFt tracing en FREE/FRET call tracing on Enter dispatch tracing on Queue drop tracing on 1X Trace table flag Bits defined in TRACFLG2 TRicOi---EQU --X'80'--TRACOC TRACOD TRACBEF TRAC10 TRACll TRAC12 TRAC13 74 EQU EQU EQO EQU EQU EQU EQU X'40' X'20' X'10' X'OS' X'04' X'02' X'01' Run user tracing on Unstack I/O interrupt tracing on Virtual CSW stored tracing en SIO, !IO, and EDV tracing en Unstack IOBLOK or TRQBLOK tracing on Trace BTU activity for 370x NCP Lock spin tracing active Signal processor tracing active 402 TRACFLG3 DS lH Reserved for IBM use 404 TTSEGCNT DS lF 40S 430 PSARSV15 DS INSTWRD1 DC 5D P'O' count of total page/swap tables in system. Note that TTSEGCNT is in absolute PSA. Reserved for IBM use Reserved for installation use IBM VM/370 Data Areas and Control Block Logic PSI Hexadecimal Displacement 434 438 43C 440 470 478 440 480 484 488 48C 490 494 498 49C 4AO 4A4 4A8 4AC 4BO 4B4 4B8 4BC 4CO 4C4 4C8 4CC Field Name Field Description, Contents, Meaning INSTWRD2 DC INSTWRD3 DC INSTWRD4 DC bis! 2! F7 F8 F9 F10 F15 F16 F20 F24 F60 F240 F255 F256 F409S F4096 DC DC DC EQO DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC 6D'0' 8X'40' 8X'FF' ZEROES F'1' F'2' F 1 3' F'4' FIS' F'6' F'7' F'8' F'9' F'10' F' 15' F' 16' F'20' F'24' F'60' F'240' F'255' F'256' F'4095' F'4096' APTRLK NOADD X40FFS XRIGHT24 XPAGNOM XRIGHT16 AFREE AFRET AQCNWT DC DC DC DC DC DC DC DC DC V (D MKPTRLK) X'PFOOOOOO' X'40FFFFFF' X'OOFFFFFF' X'OOFFFOOO' X'OeOOFFFF' V (DMKFREE) V (D l!KFRET) V (DMKQCNWT) 4F4 iDSPCH DC 4F8 4FC APTRAN DC X2048BND DC 500 PSBCLR2 DS OF 500 540 580 5CO 600 640 650 660 664 668 DUMPSAVE SIGSAVE LOKSAVE BFASAVE SWTHSAVE LOCKSAV SVCREGS PREFIXA PREFIXB PSACPXBP DS DS DS DS DS DS DS DC DC 16F 16F 16F 16F 16F 4F 4F F'O' F'O' 66C 670 678 680 684 RESVD WAITSTRT WAITEND PiTPAGES ACTIVTRQ DS DS DS DC DC 4DO 4D4 4D8 4De 4EO 4E4 4E8 4EC 4FO ZEROES BLANKS FFS FO F1 F2 F3 F4 F5 F'O' F'O' F'O' F6 tc V (D~KDSPCHj V (DMKPTRAN) X'00FFF800' A (0) 1F D D F'O' A (0) Reserved for installation use Reserved for installation use Reserved for installaticn use Also -1 Also = X'CCCCOOOF' Also Also Also Also Also Also = X'COCCOOFO' = X'CCCOOOFF' X'CCC00100' = X'CCCOOF!F' = X'CCC01000' X'CCC0003C' C' 0' Entry to lock a page in stcrage Frequently used work value Frequently used work value Isolate right 24 bits Isolate the page numrer Isolate the right 16 bits Entry to allocate free storage Entry to release free storage Entry to write a terminal message Entry to the VM/370 dispatcher Entry to the paging supervisor Locate a half-page boundary Start of second area cleared by CP initialization (DMKCPI) Save area for dump routine Save area fer DMKEXT DMKLCK save area Save area for malfunction alert DMKVMASW save area LOCK macro save area SVC save area Prefix valUE of this processor Prefix value of other prccessor Address of CPEXBLOK for switcb SVC. Note that PSACPXEP is in absolute PSA. Reserved for IBM use Timer value at start of wait Timer value at end of wait Pages in PGWAIT at start of wait Address of active transit queue Section 1. CP Data Areas and Control Blocks 75 PSA Hexadecimal Displacement -----------688 68C Field Nalle EftSPEND Field Description, Contents, fteaning DC Emergency signal pending flags F'O' !t!!§ g~t~!.n~g in EftSPEND EftSPQUI EQU --X'80'-EftSPEXT EQU X'40' EftSPSYNC EQU X'20' EftSPSHD EQU X'10' EftSPCLKC EQU X'08' EftSINQSC EQU X'Ol' Quiesce pending Extend pending Synchronization pending Shutdown pending Highcrder TOD synchronization pending Processor is quiesced EftSREC Emergency signal received flags DC F'O' Jlit§ g!!!!~g in EMSREC E!SRQUI EQU -X'80'E1!SREXT EQU X'40' EftSRSYNC EQU X'20' EftSRSHD EQU X'10' EftSRCLKC EQU X'08' 690 XCPEND DC Quiesce request received Extend request received Synchronization request received Shutdown request received High order TOD synchronization received FlO' External call pending flags Jlit§ g~!!~g in XCPEND XCAPR EQU --X'8~ XCRES EQU X'40' XCWAK EQU X'20' XCDISP EQU X'10' 694 696 698 69A IPUADDRX LPUIDDR LPUADDRX APSTATUS DC DC DC DS H'O' H'O' H'O' 6X 69A APSTATl ORG DC APSTATUS X'OO' Jlit§ g~!!.n~g in APSTATl APUOPER EQU --X'80'-PROCIO EQU X'40' APUNONLN EQU X'20' 69B P*7 P*8 P*9 Processor address of other Frocessor Logical address of this processcr Logical address of other prccessor Attached processor status bytes Attached processor status ftPFEAT CPINITD EQU EQU X'10' X'Ol' Attached processor operational Processor has I/O capability System generated for attached processor mode but running in uniprocessor mcde ftultiprocessing feature is installed System initialization complete APSTAT2 DC X'OO' Second flag byte Jlit§ g~!!.n~g in APSTAT2 CPftCHLK EQU --x'"1o'-- CPPTLBR 76 Automatic processor recovery pending Resume request pending Wakeup request pending Dispatch request pending EQU X'02' 69C CPTERMLK DC X'OO' 69D CPFRELK DC X'OO' 69E FRLKPROC DC X'OO' 69F CPFRESW DC X'OO' 6AO 6A4 AftCHAREA DC SHRLKCNT DC F'O' F'O' 6A8 PROBSTRT DS lD Machine check processing pending (for ECPS only) PTLE required for processor DMKMCT system termination is in progress. Note that CPTERMLK is in absolute PSA. Free storage extend pending. Note that CPFRELK is in absOlute PSA. Logical processor identification for CPFRELK. Note that FRLKPROC is in absolute PSA. DftKFRE must transfer execution to the attached processor. Note that CPFRESW is in absolute PSA. Address of IMKMCH work area Count of times CPSHRLK is set (used to clear CPSHRLK) Virtual machine time out queue at dispatch IBM VM/370 Data Areas and Control Block Logic PSI Hexadecimal Displacement Field Name Field Description, Contents, Meaning 6BO 6BS 6CO CHGREGS DS RESERVED DS UNSHRV!! DC 2F 2F Save area for charge synchronization Reserved for IBM use V!ELeK for pending D!KV!IPs call (attached processor only) 1(0) 6C4 TRACPROC DC X'OO' 6C5 APSTAT DS 3X Processor identifier for CF trace table entries Bore attached processor status flag bytes 6C5 APSTAT3 ORG DC APSTAT X'OO' Third attached processor status flag byte P*10 Bits defined in APSTAT3 CPSYSLK--EQU --X'SO' ORG 6C6 APSTAT4 DC iPSTAT X'OO' Other processor is spinning en leck P*11 llit§ g~i1led in APSTAT4 CPLOKFL EQU --X'8-0-'RECMODE EQU X'40' CP!CHSE EQU X'20' PROCSCHK EQU CPAPRPND EQU POFFLINE EQU X'10' X'08' X'04' RESERVE DS STACKV! DC UNSHRV!2 DC 1(0) 1(0) 6DC AD!KCPE DC RESERVED DS PSECLR2 DS V (D!KCPE) 5F OF 6FO 6F4 6FS 6FA 700 70Q 710 750 ALOKV! RESERVED ALOKSP AEXTSP AT!RSN RESERVED !OBREGS LOKSAVE2 DC DC DC DC DC DC DC DC V (D !KLOKV!) 1F V (DMKLOKSP) V (D!KEXTSP) V (D!KT!RSN) 3F'0' 16F 16F PSAEND DS OD 6C8 6DO 6D4 6D8 2F Fourth attached processor status flag byte DMKLeK enabled for external interrupts Processor will record soft machine checks !achine check processing pending (CP!CHSE is the replacement of CP!CHIK in APSTIT2) TOD synchronous check received Automatic processor recovery Fending Vary processor function in use Reserved for IB! use R11 for disFatcher unstacking R2 value for pending VMAPs call (attached processor only) Address of t!KCPE for IPCS use Reserved for IB! use End of second area cleared by Cp initialization (DMKCPI) Entry to lock V!BLOK Reserved for IB! use Entry to spin on lock Entry to signal processor routine Entry to charge synchrcnizaticn routine Reserved for IBM use Register save area for Monitor call Save area for switching to virtual machine in DMKLOK End of page 0 usage Section 1. CP Data Areas and Contrel Blocks 77 PiDIBLOK The PiDIBLOK is used to retain information and AUTOLOG cemmands. o 8 10 18 Hexadecimal Displacement -----------0 8 E 14 18 1C 1D I ---------------------------------------------------1 PiDDATE PiDTlftE I ------------------------------------------------------1 PiDTIME (cont.) PitTERftA 1 ---------------------------------------------------1 PiDCBAIN P*1 I P*2 IIIIRESERVED//III Field Nalle PiDUSRID PiDDATE PiDTIME PiDTERMA PiDCBAIN PWDINYCT PiDFLAGS PiDLOG PWDALOG 78 with LOGeN i PiDUSRID Field Description, Contents, fteaning DS DS DS DS DS DS DS CL8 CL6 CL8 CL4 F 1X 1X in PiDFLAGS EQU --X'8'O'-EQU X'40' ~!!§ g~!!~~g 1E about invalid passwords sUFFlied DS XL2 P*1 P*2 Userid attellpting LOGON or AUTOLOG Date (Illlddyy) Tille (hh:III1:SS) Terminal address Address of next PWDIELOK Invalid password count Flags This block for LOGeN This block for AUTOLCG Bes~rved IBM VM/370 Data Areas and Control Block Logic for IBM use Real I/O Control Blocks In order to centrol the activity of the I/O devices of the system and schedule I/O requests uFon them, I/O control uses several tYFes cf control blocks. These l:locks can l:e separated into two basic types: • Static blocks that describe components of the I/O system. the • Dynamic l:lccks that represent active and pending requests for I/O operations. The I/O cemponents of the real system are described by one control block for each channel, control unit, and device available to the control program. Units present but not represented by control blocks are not available for either user-initiated or centrol program-initiated operations. REAL CHANNEL CONTROL BLOCKS For each channel attached to the system there exists a Real Channel Control Block (RCHELOK) which contains: • The channel Fortion of its attached units, the address of • Status flags indicating the ayailability for scheduling. • A two-way queue anchor pointing to the list of I/O requests waiting to use the channel. channel's In additien, each RCHBLOK contains 32 halfword indexes, arranged in ascending address order, that represent the displacement into the Real Central Unit table of the control blocks for the control units attached to the channel. The 32 entries are required because the control unit address may be made up of five bits from the unit address. To locate the control tlock for a given unit: BEAL CONTROL UNIT BLCCKS The Real Control Unit Table is composed of Real Control Unit Blocks (RCUBLOK), one for each control unit on the system. These blecks are similar to the RCHELOK in that they contain the control unit portion of the address and status flags, and a peinter to a queue of I/O requests. In addition, the RCUBIOK contains a pointer te the RCEELOK for the channel to which it is attached. The RCOBLOK ccntains a table of 16 halfwerd entries that represent the displacment into the Real Device Table of its attached devices. This table is referenced in the same manner as the table in the RCEBLOK. REAL DEVICE CCNTROL BLCCKS Each device and 3270 remote communications line in the system is represented by a Real tevice Control Block (REEVELCK), contains the device portion of the unit address and status flags similar to those in RCHBLCK and RCUELCK. There is alse a pointer fer those operations that are waiting fer the device to become available. Fields that appear in the RDEVBLOK and not in the othe';c blocks include a pointer te the I/O requeb~ that is currently active en the device, SIC counts, and a pointer te error and sense information. The RDEVELCK contains a pointer to the RCUELCK for the control unit to which it is attached and fields of device dependent information which do net affect the operation of I/C control~ If the RDEVBLOK is associated with 3270 remote communications line, then the REEVELOK contains a pointer to NICBLCKs that represents the resources on that line. INPUT/OUTFUT BLOCKS 1. Index into the table in the RCHBLOK a displacement equal to twice the control unit address. I/O requests that are active in the system are represented ~y Input/Output Elocks (ICELOK) • There 1S one ICELOK for each operation (that is, channel program) to te executed. The IOBLOK is ccnstructed by the requesting task and contains such information as: 2. Load the index value. • The identity of the requestor 3. Add the value to the base address of the Real Control Unit Table. • The address of the channel program to be executed Section 1. CP Data Areas and Centrel Elocks 79 The address to which centrol is to be returned upon coapletion of the operation In addition, the IOBLOK contains status flags that indicate the current state of the operation (such as, whether or not an error has occurred, if an errcr recovery ~rocedure (ERP) is in control~ and the condition returned fro. the 510) and the CSW associated with the interrupt that signals the end of the operation. Since IOBLOKS are queued off various I/O control tlocks, they also contain forward and backward queue pOinters. DMKIOS builds in thea the real device address of the unit on which the operation is started. In general, the IOBLOK representing a given operation progresses through the system by being queued, in turn, from device, control unit, and channel blocks until a path is at last free to the device. A 510 is then issued. After the operation is complete, the IOBLOK is dequeued fro. the RDEVBLOK and stacked on a queue maintained in the dispatcher, D!KDSP. Each tiae the dispatcher is entered, the entries on the queue are unstacked and control is 80 passed to the point sFecified in the Interrupt Return Address (IOEIBA). After I/e contrel stacks the ICELCK for the given task, it attempts to restart all of the components that have been freed by the completion of the operation. NEiWOBK INTERFACE CONTBOL fLOCK There is one Network Interface Centrol Elock (NICBLOK) for each defined 370% and each resource attached to a 3270 bisynchronous line. The NICELOK provides the correspondence between the line or device address and the Fhysical resource connected to that line. This block not only defines the identity of the terminal type, line, or control unit but it also contains flags and status information pertaining to that resource. If the defined resource is a remote 3270 component, the NICELOK ccntains the current line coordinates l polling and selection characters information as veIl. The remainder of this secticn describes the real I/O control blocks. IBM VM/370 Data Areas and Control Block Logic RCHELCK RCHBlOK contains status and tYFe information for the sFecified channel. The linkage to I/O tasks oFerated on by that channel and to the contrel units attached tc that channel is also maintained. The ARIOCH field of the P~A points to the first RCHELOK, which is generated in contiguous storage. o ~-------------------------------------------------------, R*1 RCHFIOB 8 10 I RCHlOCK RCHADD BCHQCNT RCHLICB RCHSTIDC R*3 I R*4 I R*5 I R*6 18 R*2 RCHRSTQ RCHOPER 20 RCHCUTBL (Variable Length) Hexadecimal tisplacement -----------0 2 4 Field Name BCHADD RCHlOCK RCHSTIT Field Description, Contents, Meaning DS 1)S DS 1H 1H 1X R*1 ~!!§ Q~!!1!~g 5 RCHBUSY RCHSCED RCHDED in RCHSTAT EQU --X'SO,-EQU X'40' EQU X'01' RCHTYPE DS 1X Channel tusy IOE scheduled on channel Channel dedicated R*2 ~it§ Q~!!~Q RCHSEl RCHBMX RCHBPX RCH370 in RCHTYPE EQU -X'SO,-EQU X'40' EQU X'20' EQU X'01' 10 11 12 13 14 RCHQCNT RCHFIOB RCHlIOB RCHDTCK RCHCCCK RCHIFCC RCHCHCK RCHSTIDC DS DS DS DS DS DS DS DS 18 1C 20 RCHRSTQ DS RCHOPER DS RCHCUTBl DS 1F 1F 32H RCH5IZE (*-RCHBlOK)/8 6 8 C EQU 1H 1F 1F 1X 1X 1X 1X 1F Channel address Channel lock Channel status Channel type Selector channel Elock multi Flexer channel Eyte multiplexer channel 5/37C type channel (5/370 I/C instructicn sUFPort) R*3 R*4 R*5 R*6 Number of ICBLOKs queued off channel Pointer to first IOBLOK queued Pointer to last IOBLOK queued Channel data check count Channel control check count Interface centrol check ceunt Channel chaining check count Result of STIDC instruction issued at CP initialization; if cc = 3, the content is X'FFFFFFFF' Address of channel to be restarted IOELCK operational on channel time Control units attached - RCUSTART index (The index values must be multiplied by 8 and added to the beginning of the RtEVELOK table (ARIODV).) RCHELOK size in doublewords (X'OD') Section 1. CP Data Areas and Ccntrol Elecks 81 RCUBLOK RCUBLOK provides control and status information en a defined real control unit. Linkages are provided to queued IOBLOKs. The ABIOCU field of the PSI points to tbe first RCUELOK, wbich is generated in ccntiguous storage. o RCUADD RCULOCK B*1 I R*2 RCUOCNT RCUFIOB RCULIOB 10 RCUCHI BCUCEB 18 RCUCHC BCUCED 20 RCURSTQ BCUOFER 8 RCUDVTBL 28 (Variable Length) Hexadecimal tisplacement -----------0 2 4 Field Name RCUIDD RCULOCK RCUSTIT Field Description, Contents, I!eaning DS DS DS ~i!§ g~!i1!~g 5 RCUBUSY RCUSCED RCUDISI RCUCHAOF RCUCHBOK RCUCHCOF RCUCHDOF EOU EOU EOU EOU EOU EOU EOU RCUTYPE DS 1H 1H 1X R*1 in RCUSTIT --x'eo'-- 1X Control unit address Control unit lock Control unit status Control unit busy IOE scheduled on control unit Control unit disabled BCUCEA to BCBBLCK path is not RCUCEE to RCBBLCK path is not RCUCBC to BCHBLCK path is not RCUCBI to BCHBLOK path is not X'40' X'20' X'08' X'04' X'02' X'01' Bits defined in RCUTYPE RCU5HRD--EQU --X'80-'-- B*2 available available available available Control unit type RCUSUB RCU2703 RCU2702 RCU2701 EOU EOU EOU EQU X'40' X'03' X'02' X'01' This control unit can be attacbed to only cne sutchannel This is a subordinate contrel unit TCU is a 2703 TCU is a 27C2 TCU is a 27C1 8 C 10 RCUQCNT RCUFIOB RCULIOB RCUCHI DS DS DS DS 1H 1F 1F 1F Number of ICBLOKs queued off control unit Pointer to first ICBLOK queued Pointer to last IOBLOK queued Pointer to RCBBLCK - patb I 10 ORG RCUPRlME DS RCUCHA 1F Pointer to the primary contrcl unit 6 82 -------------------------------------- IBM VM/370 Data Areas and Control Block Logic RCUELCK Hexadecimal Displacement 14 18 1C 20 24 28 Field Name Field Description, Contents, Meaning RCUCBB RCUCHC RCUCHD RCURSTQ RCUOPER RCUDVTBL DS DS DS DS DS DS 1F 1F 1F 1F 1F 16B Pointer to BCHELOK - path E Pointer to RCBBLCK - path C Pointer to RCBBLOK - path I Address of control unit to be restarted IOELCK operational on control unit time Devices attached - RDVSTART index (the index values must be multiplied by 8 and added to the teginning of the RDEVELOK table (ARIODV).) RCUSIZE EQU (*-RCUBLOK)/8 RCUELOK size in doublewords (X'08') Section 1. CP Data Areas and Contrel Blocks 83 RCWT1SK RCWT1SK contains the virtual-to-real CCW translation and other data related to a virtual machine's I/O operation. 1 pointer is maintained to the virtual CCW operaticn. The first CCW-16 points to the beginning of RCWTASK. o 8 RCWPNT RCWVCNT RCWVC1W RCWRCNT 10 RCWBE1!: RCWCCNT RCWCCW (Variable Length) Hexadecimal Displacement o 4 8 A C E 10 10 14 15 Field Name Field Description, Contents, !eaning RCWPNT RCWVCAW RCWVCNT RCWRCNT RCWHE1D RCWCCNT RCWCCW DS DS DS DS DS DS DS 1F 1F 1H 1H 1H 1H 1D RCW1DDR RCW-FLAG RCWCTL ORG DS DS DS RCWCCW 1F ~it.§ g~li'yed S4 RCiIO RCiGEN RCWHMR RCiREL RCiIS1M RCi2311 RCWINVL RCiSHR BQU EQU EQU EQU EQU EQU EQU EQO 16 RCWCNT DS 10 ORG RCWCOMND DS 11 1X Pointer to next RCWT1SK Virtual address of CCi chain Virtual CCi count Real CCi count RCiTASK header mark X'FFFF' RCiTASK control vord count One or more CCWs for device I/O CCi data address celi flag tits CCW CP-control tits in RCWCTL --X'80'X'40' X'20' X'10' X'OS' X'04' X'02' X'01' I/O data page locked CP-generated CCi tMKONT must relocate hoae address/record RO CCi address relocatatle if CCis moved IS1! modifying CCi TIP2311T-E pseudo 2311 on 2314 CCi operation code or address is invalid Shared user page vas copied 1H CCW tyte count RCW1DDR 11 CCW command code IBM VM/370 Data Areas and Control Block Logic RDEVBLOK RDEVELOK is generated by the RDEV macro at system generation. There is cne RDEVELCK for each real device and one for each binary synchronous line. The tlock ccntains status and device parameters aPFlicable to I/O instruction processing. The ARIOIV field of the PSI and the VDEVREAL field of the VDEVBLOK point to the first RDEVELCK, which is generated in ccntiguous stcrage. 0 RDEVADD 8 10 I RDEVLOCK RDEVCUA RDEVCUB 28 RDEVUSER RDEVAIOE RDEVITT 30 RDEVCYL RDEVSER 38 0 2 4 I R*4 RDEVQUED RDEVIOCT RDEVLNKS RDEVTCTL (8 device dependent bytes) 40 RDEVTl4JAT 48 RDEVIOER ------------ I R*3 RDEVLIOE 20 Hexadecimal Displacement R*2 RDEVFIOB 18 50 R*1 R*5 I R*7 I R*8 RIEVCTRS RDEVNAME 1//RDEVRSV1///1 Field Name RDEVADD DS RDEVLOCK DS RDEVSTAT DS R*6 RDEVIOBL Field Description, Contents, Meaning 1a 1H 1X !!it,2 g§!!neg in RDEVSTIT RDEVBUSY EQU -X'80'-RDEVSCED EQU X'40' RDEVDISA EQU X'20' RDEVRSVD EQU X'10' RDEVIRM EQU X'08' RDEVNRDY EQU X'04' RDEViAII EQU X'02' RDEVDED EQU X'01' R*1 Device address Device lock Device status Device busy IOE scheduled on device Device disatled (offline) Device reserved Device in intensive error recording mode Device intervention required GRI! - IOELCK pending, queue requests Dedicated device (attached to a virtual machine) Section 1. CP Data Areas and Contrel Elocks 85 RDBVELOK Hexadecimal tisplacement 5 Field Name Field Description, contents, Meaning RDBVFLAG DS §.i1.§ g~!!1!~g RDBYSKUP BQU RDBVPRBF BQU DASD - ascending order seek que~ing tASt - volume preferred for Fag1ng tAS! - volu~e attached to system DAst - Cp-owned volume tASt - volume mounted, not attached DASt - volume dedicated as 3330V :CASI - device selected for ~SS fount Console - terminal has print sUFFress Consele - terminal executing FREPARB command Console - ICBLOK pending; queue request Console - 2741 terminal cede identified Console - device is enabled Console - next interrupt from a Halt I/O Console - device is to be disabled Console - 370x NCP resource in EP mode Spooling - device output drained Spooling - device output terminated Spooling - device busy with acceunting Spooling - force printer te single sFace Spooling - restart current file Spooling - tackspace the current file Spooling - print/punch job seFarator Spooling - UCS buffer verified Special - network control Frogram active Special - 270x Bmulatien program active Special - 370x in buffer slowdown mode _Sl>_e_cJaJ - allt_o_m.aticdJlm-p/l_cad.~Ra.bled Special - ICBLOK pending; queue requests Special - emulator lines in use by system Special - automatic dump/lcad process active Special - BTU trace requested X'40' EQU X'20' BQU BQU BQU BQU BQU BQU BQU BQU BQU BQU BQU BQU EQU EQU BQU EQU BQU EQU EQU BQU EQU BQU BQU _E_QtJ BQU BQU BQU EQU X'10' X'OS' X'04' X'02' X'SO' X'40' X'20' X'10' X'OS' X'04' X'02' X'01' X'SO' X'40' X'20' X'10' X'08' X'04' X'02' X'01' X'SO' X'40' X'20' X_'10' X'OS' X'04' X'02' X'01' 6 RDEVTYPC DS 1X R*3 7 RDEVTYPE DS 1X R*4 8 C RDBVFIOB RDBVLIOB RDEVCUA RDBVCUB RDBVQUED RDEVIOCT RDBVAIOB RDBVUSER RDEVATT RDBVCYL RDBVSER RDEVLNKS RDBVTCTL RDEVTf!AT RDEVQCNT 1F 1F 1F 1F 1D 1F 1F 1F 1H 1H CL6 1H SX 1F 1X R*5 10 14 18 20 24 28 2C 2B 30 36 38 40 44 DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS Device flags, device dependent in RDEVFLAG RDBVOWN RDBVf!OUT RDBV333V RDBVSBL RDBVPSUP RDBVPRBP RDBVACTV RDBVIDNT RDEVBNAB RDEVHIO RDEVDISB RDEVEPMD RDEVDRAN RDEVTERf! RDEVACNT RDEVSPAC RDBVRSTR RDEVBACK RDEVSBP RDEVLOAD RDBVLNCP RDEVLCBP RDEVSLOW RD_BJAU_~() R*2 --X'80'-- RDEVSYS RDBVWAIT RDEVBPLN RDEVRCVY RDEVTBTU 86 1X Device type class (see "Appendix A. CP and Rses Equate Symbols") Device type (see "Appendix A. CP and RSCS Equate Symbols") Pointer to first IeBLOK queued Pointer to last IOELeK queued Pointer to RCUBLOK - interface A Pointer to RCUBLOK - interface E IOELeK queued time - TOD clock units Device I/O count Active IOELeK Pointer to VMBLeK of dedicated user Attached virtual address DASI - current cylinder location Device volume serial number DASI - number of links to this disk S device-dependent terminal ccntrol bytes Device attached time - TCD clcck word 0 Number of queued ICBLeKs IBf! VM/370 Data Areas and Control Block Logic RDEVELCK Hexadecimal Displacement 45 Field Name Field Description, Contents, !eaning RDEVSTA2 DS 1X R*6 !!it§ g~!!ned in RDEVSTA2 RDEVRACT EQU -xi 8o.-RDEVBUCH EQU X'40' RDEVCONC EQU X'20' RDEVDROP EQU X'10' RDEVALT EQU x'08' RDEVSYBC EQU X'04' RDEVPURG EQU X'02' RETRYSi EQU X'01' 46 47 48 4C 50 52 54 RDEVMDL RDEVFTR RDEVIOER RDEVCTRS RDEVNAME RDEVRSV1 RDEVIOBL DS DS DS DS DS DS DS RDEVSIZE EQU 1X 1X IF 1F 1H 1H 1F tevice status (byte 2) Active device is being reset Device is busy with the channel Contingent connection present Logdrop or loghold indicated Alternate path device Attention signal during active I/O 3800 - Purge files in error Retry count switch R*7 R*8 tevice model number Device feature code Pointer to IOERELOK for last CP error Pointer to error counter centrol block Real device name Reserved for IB! use IOELCK queue lock (*-RDEVELOK)/8 RDEVELOK size in doutlevords (X'OB') ~9f CP-2!!!~g Q~vi£~§ 38 3C 40 ORG RDEVALLN DS RDEVCODE DS ORG RDEVPAGE DS RDEVRECS DS RDEVPNT DS RDEVUSER 1F 1H RDEVTCTL 1F 1F 1F Anchor for RECBLCK chain fer faging Anchor for RECBLOK chain fcr speoling Pointer to next RDEVELCK fer allecation 3C RDEVDCTL DS 1F Pointer to tRU!TIBL control block 28 2C Anchor for ALOCELOK chain fer this device Device code - SYSOWNED index ~9f §f~Ehic Q~vic~§ 2E 30 ORG RDEVCORD DS RDEVGRTB DS RDEVCYL 1H 1F Current line coordinates Address of table of CCis and data streams ~9f ~E29!!!!g Unit !!~rd 28 2C 2D 2E 2F ORG RDEVSPL DS RDEVCLAS DS ORG RDEVDELP DS RDEVCURP DS DS RDEVlUXP DS RDEVFSEP DS RDEVQUED 1F 4C RDEVUSER A 1X 1X 1X 1X 30 RDEVXSEP DS CL4 34 38 40 RDEVEXTN DS RDEVIMAG DS RDEVOVLY DS 1A CL8 CL4 18 1C X9f 18 1C 38 Pointer to active RSPLCTL bleck Device class(es) Anchor for delay purge queue Current page length in half inches Reserved for IB! use Maximum numter of entries in delay purge queue Function control block for sefarator page (6, 8, or 12) Name of character arrange.ent table fer the separator page Pointer to the 3800 extension Name of current image library Name of current forms overlay I~f.!!nal Devi£~ CRG RDEVCON DS RDEVAIRA DS ORG RDEVRCNT DS RDEVQUED 1F 1F RDEVTCTL 1H Pointer to CONTASK list Attention interrupt return address Start/stop line retry count Section 1. CP Data Areas and Centrol Blocks 87 RDEVBLOK Hexadecimal Displacement 3A Field Name lield Description, Contents, Meaning RDEVTFLG DS 1X Additional terminal flags ~~!~ g~!~~g RDEVLOG in RDEVTFLG EQU --X'8'O-'-- RDEVREST EQU RDEVATOF EQU X'40' X'20' TERM and GRll - Logon precess has been initiated TER! - Terminal in reset process TERM - Suppress attention signal RDEVLOG RDEVMORE RDEVRUN RDEVREAD RDEVCPNA RDEVTRQ RDEVCTL RDEVHOLD EQU EQU EQU EQU EQU EQU EQU EQU X'SO' X'40' X'20' X'10' X'OS' X'04' X'02' X'01' GRll GRAl GRll GRll GRll GRll GRAP GRll 3B 3C 3D 3E 3F RDEVGRTY RDEVLLEN RDEVATNC RDEVBASE RDEVRSV3 DS DS DS DS DS 1X 1X 1X 1H 1X Display alternate screen size index Device line length Device attention count 370x base address for emulator line Reserved for IBM use 46 ORG RDEVTMCD DS RDEVMDL 1X Terminal code in RDEVTMCD EQU -X'20'-EQU X'10' EQU X'OC' EQU X'08' EQU X'04' EQU X'OO' - Logon process has been initiated Screen full; more data waiting Screen in running status Read pending for screen input Last input not accepted Timer request pending Control function interrupt pending Screen full; in hold status Bit~ g~!!ned RDEVTEXT RDEVUSC8 RDEYAPLC RDEVAPLP RDEVCORR RDEVPTTC 47 RDEVSADN DS 1X 3270 Text character set ISCII-8 level keyboard APL Correspondence keyboard IPL PTTCjEBCD keyboard Correspondence keyboard PTTCjEBCt keyboard Terminal set-address number J1Q!Ll1Q~ ~2~~ic~!!2~~ ~2ntfQ!ler 1C 2E 30 38 3C ORG RDEVEPDV DS ORG RDEVMAX DS RDEVNCP DS RDEVNICL DS RDEVCKPT DS X2f 30 34 S8 ll1Q RDEV!IR! 1F RDEVCYL 1H CL8 1F 1F Start of free RDEVBLOK list for EP line Highest valid NCP resource name Reference name of active 3704 NCP Pointer to network control list Pointer to CKPBLOK for re-enable S~~2!~ ~YEEQrt ORG RDEVBSC DS RDEVPDLY DS RDEVNCP 1F 1F Pointer to binary synchroneus centrol block Poll delay timer interval IBM VMj370 Data Areas and Control Block Logic RECELCK RECBLOK maintains the correlation of DISD storage pages to a specific cylinder location. Also maintained is a bit map to indicate the page slots available for data page storage. The RDEVRECS field and the BDEVPAGE field of the RDEVELCK point to BECELCK. o BECPNT RECCYL I R*1 I B*2 RECMAP 8 (128 pages maximum) .~'------------------------------------------------------~ Hexadecimal Displacement -----------0 4 6 7 8 Field Name BECPNT RECCYL RECUSED RECMAX BECMAP Field Description, Contents, Meaning DS DS DS DS DS 1F 1B 1X 1X 1L -------------------------------------R*1 B*2 Pointer to next RECBLOK on cbain Cylinder address for pages in this block Number of pages currently in use Maximum numter of pages available Page allocation bit map (128 Fages maximum) Bits defined in RECMAP O-=-page-is-available 1 - Page has been assigned Although the size of RECMIP is fixed, the maximum number of pages available on a cylinder is device dependent. Bits corresponding to pages not physically present on a cylinder are set to 1. !ot~: RECSIZE EQU (*-BECB10Kj/8 BECELOK size in doutlewords Section 1. CP Data Areas and Centrel Blocks 89 RECPAG RECPAG retains up to 4K bytes of error recording specified errcr recording cylinder. o RECCCPD data for RECNXT I R*1 eventual placement en the I R*2 8 RECDATA (4088 bytes) Hexadecimal 1Jisplacellent -----------0 4 6 Field Name Field Description, Contents, Meaning RECCCPD DS DS RECNXT RECFLAG1 DS 4X 2X 1X R*1 1!it§ g~fi~g in RECFLAG1 RECPAGIO EQO -X'80-'-RECPAGFR EQO X'40' RECPAGFL EQO X'20' RECPAGER EQO X'10' RECPAGFA EQO X'08' 7 RECFLAG2 DS 1X Page Page Page Next Page R*2 1!.!!§ g~fill~g in RECFLAG2 RECPAGFM EQO --X'80'--RECPAGDN EQO 8 RECDATA DS RECPAGSZ EQU 90 CCPE of the record 1Jisplacement to next error record Record usage flags contains valid data is cleared is full of error records page is unreadakle (I/C error) contains page frame reccrds Record for. at flag X'OO' Set in page 1 of a recording cylinder when the cylinder is teing formatted. This flag bit is reset when all pages are cleared. Cylinder formatted 4088C Data area (*-RECPAG) /8 Size of page in doublewords (X'512') IBM VM/370 Data Areas and Control Block Logic RSPLCTL, RSPXBLOK RSPLCTL is used in conjunction with SFBLOK RBEVSPL field of RDEVBLCK points to RSPLCTL. 0 RSPRSTRT 8 RSPVPAGE 10 RSPMISC 18 RSPDPAG2 20 RSPRPAG2 Eexadccimal Displacement Field Name o RSPRSTRT RSPDPAGE RSPVPAGE RSPRPAGE RSPMISC RSPSFBLK RSPDPAG2 RSPVPAG2 RSPRPAG2 RSPFLAG1 4 8 C 10 14 18 1C 20 24 25 RSPXBLOK: fer processing closed RSPtPAGE R*1 sFcol files. The I I I RSPRPAGE I I RSPSFBLK I I RSPVPAG2 I I !////I/RSPRSVD//////I Field Description, Contents, Meaning DS DS DS DS DS DS DS DS DS DS 1F 1F 1F 1F 1F 1F 1F 1F 1F 1X Restart CAW - CCW address BASB location (DCER) of current Fage buffer Virtual address of page kuffer Real address of page buffer Use varies according to caller Pointer to SFBLCK for file BAst locaticn of second Fage buffer if any Virtual address of second Fage buffer if any Real address of second page buffer if any Real spooling control flag byte Bits defined in RSPFLAG1 RSPBF1IOEQU --X'80'---RSPBF2IO EQU 1'40' RSPBF1VL EQU 1'20' RSPBF2VL EQU 1'10' I/O Fending I/O Fending Buffer 1 is Buffer 2 is RSPRSVD DS 3X Reserved for IBM use RSPSIZE BQU (*-RSPLCTL) /8 Size in doutlewords (X'05') on kuffer 1 on kuffer 2 full of data tc Frint full of data tc Frint REAL DEVICE EXTENSION BLOCK RSPXBLOK is used with the RDEVBLOK to accommodate the 3800 requirements. Hexadecimal Displacement o RSPXCHR RSPXCRWC 8 RSPXCMOD RSPXFCB Pield Name Field Description, Contents, Meaning ----------0 4 8 C RSPXCHR RSPXCRWC RSPXCMOD RSPXFCB DS DS DS DS RSPXSIZE EQU CL4 4X CL4 CL4 Character arrangement table now in 3800 Current contents of WCGMs Copy module now in 3800 FCB now in 3800 (*-RSPXBLOK)/8 RSPXBLOK size in doublewords (X'Ol') Section 1. CP Data Areas and Centrol Blocks 91 SAVEAREA SAVEAREA is used to save the registers of .odule. Register 13 points to SAVEAREA. o SAVERETN SAVER12 8 SAVER13 SAVEWRK1 10 SAVEWRK2 SAVEWRK3 48 SAVEWRK4 SAVEWRK5 50 SAVEWRK6 SAVEWRK7 58 SAVEWRK8 SAVEWRK9 Field Na.e Field Description, Ccntents, !eaninq SAVERETN DS 1F R~gefi~i!!g~ g{ 2!!~~~TN I~ -ORG -SAVERE'!'N Active SAVEAREI (caller's return address) In£lud§ ~f2~§§QE Address 1 SAVEPROC DS SAVERTN DS 11 31 Active SAVlAREA processcr address Active SAVEAREA -- return address o ORG SAVENEIT DS SAVERETN 1F Inactive SAVEIREA (next SAVEABEA address) 10 SAVER12 SAVER13 SAVEWRK1 SAVEREGS DS DS DS DS 1F 1F 1F 12F Caller's tase (R12) Caller's SAVEAREA (R13) Called routine's work area Caller's registers (RO to R11) 10 14 18 1C 20 24 28 2C 30 34 38 3C 40 44 48 4C 50 54 58 5C SAVERO SAVER1 SAVER2 SAVER3 SAVER4 SI VER5 SAVER6 SAVER7 SAVER8 SAVER9 SAVER10 SAVER11 SAVEWRK2 SAVEWRK3 SAVEWRK4 SAVEWRK5 SAVEiRK6 S1VEWRK7 SAVEiRK8 SAVEWRK9 ORG DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS SAVEREGS 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 11 11 11 1F 1F 1F 1F 1F 4 8 C SAVESIZE EQU 92 has called another SAVEREGS 40 Hexadecimal tisplacement o a module when that module Called routine's work area (8 fullwords) (*-SAVEAREA)/8 Size in doutlewords (X'OC') IBM VM/370 Data Areas and Control Block Logic SAVTAELE SAVTABLE is used in the initial program loading of saved virtual machine na.ed systems. It is created by the na.e system generation process (SIVESYS macro/SlVES1S co.mand). o SAVPSW 8 SAVGREGS 48 SAVFPRES 68 SAVCREGS A8 SAVKEYS Bexadeci.al Displacement -----------0 8 48 68 A8 Field Nalle Field Description, Contents, ~eaning SliPSi DS iD PSi c£ virtual machine at SiiESYS ti.e SAVGREGS SAVFPRES SAVCREGS SAVKEYS DS DS DS DS 16F 4D 16F 1H General registers Floating-point registers Control registers Two-tyte entry for each saved page containing storage keys fer each page Section 1. CP Data Areas and Centrel Blocks 93 SDRBLOK Contains counters to record temporary errors on a given I/O device. o 8 SDRRDEV S*1 5*2 S*3 S*4 SDRCUA S*5 SDBCTBS 10 SDRCTRS1 18 Hexadecimal Displacement -----------0 4 Field Nalle Field Description, Contents, Meaning SDRRDEV DS SDRFLAGS DS 1F 1X S*1 Bits defined in SDRFLAGS SDRSHRT-EQU- --X'80'-SDRRECD EQU X'40' SDRMAX 5 6 7 8 9 C 16 94 EQU SDRPRMCT SDRFLCT SP~.9Y:F.Ji K SDRLNGTH SDRCUA DS DS DS DS DS Short OBRRECB to be written Long OERRICB to be recorded cn counter overflow Maximum nu.ters of SDR counters handled X'20' 1X 1X 1X 1X 3X Address of associated RD!VELCK SDRELOK flags S*2 S*3 S*4 S*5 Parameter list counter Full tyte counter Statistical update work tyte Lenciflitby·t"es) of-SDR counters primary CUA of device being used SDRBSIZE EQU (*-SDRBLOK) SDRELOK tase size, in tytes SDRCTRS DS 10X SDR error counters SDRSIZE EQU (*-SDRELOK+7)/8 Size in doutlewords (X'03') SDRCTRS1 DS 10X Additional SDR error counters for devices that use .ore than 10 SDR ccunters. SDRSIZE1 EQU (*-SDRELCK)/8 Size in doutlevords (X'04') IBM VM/370 Data Areas and Control Block Logic SEGTAELE SEGTABLE is used in conjunctien with the page table (PAGTAELE) and swap table (SWPTAELE) by the page management routines. The VMSEG field of the VMELOK points to SEGTAELE. o Hexadecimal Displacement ------------ SEGPAGE S*l I Field Nalle Field Description, contents, !eaning 0 SEGPAGE DS lF 0 SEGPLEN ORG DS SEGPAGE BL.4 Bits defined in SEGPAGE.3 SEGIUY--EQU --X'01'-SEGMIG EQU X'10' SEGENQ EQU X'40' Pointer to page tatle (PAGTAEtE) S*l Page table length (Total pages half of byte) - 1) (in left Segment invalid Segment migrated if pointer is equal to 0 Segment is enqueued if pointer is equal to 0 Section 1. CP Data Areas and Centrol Blocks 95 SFBLOK SFBLOK retains all the information relating to a spool file. A pointer provides a linkage to the next SFBLOK in the chain. The VSPSFBLK field of VSPLCTL and the RSPSFBLK field of RSPLCTL point to the SPBLOK. o SPBPNT SFBS'IART 8 SPBUSER 10 SPBORIG 20 SFERECSZ SPBRECNO 18 34 SPEPIAME --------------------------~ SPBFTYPE 40 SPBtATE 48 SFBTI!! 50 SFECOPY SFBLAST 58 Hexadecimal Displacement o 8 10 18 1C 1E 20 SFBFLASH S*5 Field Name 96 I S*4 SFBPNT SFBSTART SFBUSER SFBORIG SFBRECNO SFBRECSZ SFBFILID SFBFLAG SFBTYPE SFBMISC1 SFBRECS SFBlIAME I//////SFERSVD////// Field Description, Contents, Meaning DS DS DS DS DS DS DS DS 1F 1F CL8 CL8 1F 1H 1H 11 S*1 !!!!§ g~!!ned in SFEFLAG SFBINUSE EQU -1'80'--SFBRECOK EQU X'40' SFBUHOLD EQU X'20' SFBDUMP EQU X'10' SlBOPEN EQU X'08' SFBSHOLD EQU X'04' SFBEOF EQU X'02' SFBRECER EQU X'01' 21 22 24 28 I S*3 SFBDIST 60 4 SPERECS S*1 I S*2 I SFEMISC1 28 SFBPILID DS DS DS DS 11 1H 1F CL12 Pointer to next SFBLeK tAS! location (CCPD) of first page buffer VMUSER identification of file o~ner VMUSER identification of file origin Number of data records in file Logical record size - excluding CCis Einary system file number SFELCK control tits File being processed Allocation records complete File in user hold status File is a CP systea du.p Input file has been opened File in system bold status Input file bas reached EOF SFEREC chain incomplete S*2 Device type for speol output Use varies according to caller Pointer to RECBLOKs for active file Filename IBft VM/310 Data Areas and Control Block Logic SFBLCK Hexadecimal Displacement 34 40 48 50 54 56 57 Field Name Field Description, Contents, SFBFTYPE SFBDATE SFBTIME SFBLAST SFBCOPY SFBCLAS SFBFLAG2 DS DS DS DS DS DS DS CL12 CL8 CL8 1F 1H 1X 1X S*3 S*4 ~eaninq Filetype Creation date of spool file Creation time of spool file DASD location (CCPD) of last page buffer Number of copies requested Spool file class character SFELOK flag (byte 2) Bits defined in SFBFLAG2 SFBHOLD--EQU --X'80'---SFBNOHLD EQU SFBFLNMT EQU !~!~: Save input file, or hold output file Delete input file, or do net hold output file File not empty if on X'40' X'20' SFBHOLD and SFBNOHLD override options in VDEVBLOK. SFBREQUE SFBRSTRT SFBTICER SFBPURGE SFBFIRST SFBMON EQU EQU EQU EQU EQU EQU X'20' X'10' X'08' X'04' X'02' X'01' Requeue spool file Restart in progress Buffer TIC error Purge open spool file Indicate first page written Monitor spool file 58 SFBDIST DS CL8 Distribution code 60 64 65 SFBFLASH DS SFBSTCPY DS SFBRSVD DS CL4 1X XL3 SFBSIZE (*-SFBLOK) /8 EQU S*5 Overlay name for 3800 is flashing Current starting copy number Reserved for IBM use Size in doutlevords (X' OB' ) Section 1. CP Data Areas and centrol Blocks 97 SHQBLOK SHQBLOK provides a holding function for another user cr to a real output device. o 8 Hexadecillal tisplacement -----------0 4 4 5 S*1 I S*2 Field Name to I///SHQSPARE///I SHQPNT SHQFLAGS SHQUHOLD SHQSHOLD Field Description. Contents. !eaning DS DS DS DS EQU EQU SHQSPARE DS SHQUSER DS SHQBSIZE EQU 98 Frevent output ---------------------------------------------------1 SHQUSER I TYPPRT TYPPUN 6 files to I SHQPNT 1F OCL4 11 11 ~i!§ de!i~ed !~ ~H~QHQLD 8 identified spool Printer Punch S*1 S*2 9Rg 21 CL8 (*~SHQBLOK) Address of next SHOBtOK Length User USER HeLD flag tyte User SISTI! HOLD flag byte ~~~~]~~] See "Appendix A. CP and RSCS Equate Symbcls" See "Appendix A. CP and RSCS Equate symbols" Reserved for IB! use Virtual machine user identification of file owner /8- Size in doul:lewords (I' 02' ) IBM VM/370 Data Areas and Control Elock Logic SHRTAfLE SBRTABLE contains pointers to the segment locations of named systems for beth the shared and nonshared user. This block is used in paging. IPt. and virtual machine assist o~erations. PAGTABLE-8 points to SHRTAELE. o SHRFFNT S*l SHRNA!E 8 10 SHRTSIZE I SHROSECT 18 Hexadecillal Displacement ------------ SBRFAGE Field Name Field Description, Contents, fteaning SHRFPNT DS 1F 0 1 SHRFLAG SHRFPNT ORG DS DS SHRFPNT 1X 3X !!i!§ g~!!ll~g SHRNOPRT EQO DS DS DS 14 18 DS DS 1F CL8 1H 1H 1F 1F 1C SHRPAGE DS 1F DS Pointer to next SHRTABLE S*l Shared segment flag kyte Pointer to next SHRTABLE in SHRFLAG -x''4'O,-- SHRBPNT SHRNA!E SHRTSIZE SHRUSECT SHRSEGCT SHRSEGN! ;2 SBRSEGCT SHRSEGN! 0 4 8 10 SBRFPNT Nonprotected shared segments Pointer to previous SHRTABLE Name of saved system Size of SBRTABtE in doublewords Number of users using this segment name Number of shared segments Contains shared segment nuabers; up to four segment numbers per word Pointers to each of the shared {age tables. There is ene word for each shared segment. The entry is the same as S*1 SEGPAGE in "5!GTAftE: Segment Table." In attached processor (AP) mode, there will be two sets of page tables (FAGTAEt!) for each shared segllent; one for the main processor, one for the attached processor. SBRPAGE will point to the page tables for the lIain processor. The page tables fer the attached processor will be at a fixed displacement (P1GE!P) froll those of the main processor. !~te: Section 1. CP Data Areas and Ccntrol flocks 99 SPLIIK SPLIIK resides in auxiliary storage and contains one Fage (4096 bytes) of unit record sFeol inforaation consisting of data and all required eCis. The RSPVPAGE field and the RSPRPAGE field in RSPLCTL point to SPLIIK. o SPNXTPAG SPPRIPAG 8 SPR!HSC SPRECIU!! 10 Spool Buffer Data Area (4032 bytes) 1 FDO SPCHAR SPRSVD1 FD8 SPC!OD SPFCBS FEO SPRSVD2 FF8 Bexadeci.al tisplacellent -----------0 4 8 C FDO FD4 FEO FE4 FE8 FF4 FF5 I S*1 I Field Name SPRSVD3 -------------------------------------- SPNXTPAG SPPREPAG SPRftISC SPRECIUM DS DS DS DS IF IF IF IF SPSIZE EQU (*-SPLINK) Size in bytes (Xll01) SPCHAR SPRSVDl SPFCB SPCMOD SPRSVD2 SPFLSHC SPFLAGl ORG DS DS DS DS DS DS DS SPLIRK+4096-48 CL4 CL12 CL4 CL4 CL12 lX S*l lX S*2 End of first DASD tuffer 3800 character arrangement table for file Reserved for IBM use 3800 function centrol tleck fer file 380e copy module for file Reserved for IBM use 3800 flash count 3800 flag byte SPRSVD3 SPFILID SPTI!!E DS DS DS SPERDSIZ EQU IFirst DASD buffer only. 100 I Field Description, Contents, Beaning l!it§ g!!!!1!~g in SPFLAGl SPCOPYFG EQU --X'80'FF6 FF8 FFA ~*2 tASt location (DCHR) of next Fage buffer DASt location (DCHR) of previcus page buffer Use varies according to caller lu.her of data records in buffer If flag is set, aultiple cCFies can be done in one transmission 2X 1H CL6 Reserved for IBft use File identifier used for vErificatien SFETI!!E -- used for verification *-SPCHAR End-ef-buffer size in tytes All others comprise 40ee bytes. IB!! V!!/370 Data Areas and Control Block Logic SiPTIELE SWPTIBLE is used in conjunction with the page table (PIGTIBLE) and the segment table (SEGTABLE) by the CP page management routines for relating the virtual storage to tlSD slots and real storage. The PAGSWP field of the PAGTABIE points to SWETIELE. o SiPV!! S*2 8 Hexadecimal Displacement -----------0 4 S*7 S*3 S*4 Field Name Bit§ Q~!i~ed SiPAPP EQU 1F 1X i~ SWPFLAG2 SiPPIG ORG D5 SWPFLAG2 1F 8 SiPFLAG DS 1X ~.!!§ Q~!i~ed 9 B C E F SiPVPAGE SWPKEY1 SWPKEY2 SiPCYL SiPDPAGE SiPCODE S*6 BQU EQU EQU EQU EQU EQU Pointer to Fage tatle 5*1 Swap table flag bits in SWPFLAG EQU DS DS DS DS DS DS 1X 1X 1X 1H 1X 1X ll'''" Attached processor's shared Fage table and swap tatle --X'80'-X'40' X'20' X'10' X'08' X'04' X'02' X'01' .u'¥u Pointer to V!!BLCK Swap table FLIG2 bits X'80-"- 4 A S*5 Field Description, contents, eeaning SiPV!! DS SWPFLIG2 DS SiPTRINS SWPREC!!P SWPILLOC SiPSHR 5iPREF1 SiPCHG1 SiPREF2 SiPCHG2 SWPCYL SWPFAG Page in transit Page permanently assigned Page enqueued for allocaticn Page shared First half-page referenced First half-page changed Second half-page referenced Second half-page changed S*2 S*3 S*4 S*5 S*6 Virtual page number within the segment Virtual storage key, first 2048 bytes Virtual storage key, second 2048 bytes DASt cylinder address DAsr page number on cylinder RDEVELOK device code (The device code is used as an index into the list of Cp-owned paging volumes pOinted to ty D!!KSYSOW) !ote: For each SWPTABLE there is only one doutleword that consists of SiPV!! and SWPFIG followed by 16 entries (one for each PIGTAELE entry) that consist of S*1, S*2, S*3, S*4, SiPCYL, S*5, and S*6. Thus, the total size of the SWPTIBLE is 17 doublewcrds. Section 1. CP Data Areas and Contrel Blocks 101 SYSLOCS SYSLOCS contains user logon and dial statistics, values, and line edit values. 0 DHKSYSDT 8 DMKSYSTM 10 DMKSYSLW log message 20 DMKSYSNM DMKSYSMI 28 DMKSYSMU DMKSYSND 30 DMKSYSLB DMKSYSUD 38 DMKSYSPL 1//////1//////////1//1/1//1// 40 48 50 58 Hexadecimal Displacement ------------ data, TOD DMKSYSLG 18 --------------------------------------------------------, DMKSYSDW I -,----------------------------1 1 s* 1 1 S*2 1 S*3 1 S*4 1 ------------------------------------------------------1 S*5 1////////1111/////////////1////1/////1 ---------------------------------------------------------1 DMKSYSCK 1 Pield Name Pield Description, Contents, Meaning 0 8 10 DMKSYSDT DC DMKSYSTM DC DMKSYSLW DC CL8'MM/DD/YY' Date of system log message CL8'HH:MH:SS' Time of system log message X'00',X'00',CL10' , Weekday of system log messages 1C 20 24 28 2C 30 34 38 3C 40 DMKSYSLG DMKSYSNM DMKSYSMI DMKSYSMU DMKSYSND DMKSYSLB DMKSYSUD DMKSYSPL DC DC DC DC DC DC DC DC DC DMKSYSDW DC Pointer to first log message block Current numter of users on the system Maximum numter of users allowed cn the system Maximum numter of users on the system Number of dialed users on the system Pointer to user directory lock block 1(0) 1(0) Pointer to start of user directory on SYSRES Pointer to a list of virtual page buffers 1(0) 1(0) Reserved for IBM use X'OO',X'OO', CL 1 O· Day of week in hexadecimal and EBCDIC 4C 4D 4E 50 DMKSYSLE DMKSYSLD DMKSYSCD DMKSYSES DMKSYSLL X'7B' S*1 Terminal line-end symbol X'4A' S*2 Terminal line-delete symbol X'7C' S*3 Terminal character-delete symbol X'7P' S*4 Terminal escape symbol AL 1 ( 1 30, 1 2 9, 72, 8 0) S*5 Default line lengths for 3210 and 3215 2741 and 1050 - 3270 and 3066 terminals 53 58 DC DMKSYSCK DC 4F 102 time/date and DC DC DC DC DC 1(0) P'O' P'O' P'O' P'O' XL5'O' D'O' Reserved for IBM use TOD clock value last stored by accounting, DUMP, or machine check IBM VM/370 Data Ireas and Control Block Logic SYSTEL SYSTBL contains the system and DASD informaticn required to load a saved system by name. SYSTEL is built during system generation in DMKSNT using the NAMESYS macro. 0 8 10 18 20 28 SYSPNT SYSSIZE -----, I ---------------------------------------------------------1 SYSNAME I ---------------------------------------------------------1 VSYSRES SYSVADDR I --------1 SYSVOL SYSCYL 1 -------------------------------------------------------1 SYSSTART SiSPAGCT SYSPAGLN I/S*1/1 S*2 SYSPAGNM (Variable Length) SYSSEGLN SYSHRSEG (Variable Length) Hexadecimal tisplacement Field Name Field Descripticn, Contents, Meaning ==~======--~~ 0 4 8 10 SYSPNT SYSSIZE SYSNAME VSYSRES DS DS DS DS 1F 1F CL8 CL6 16 SYSVADDR J,joJ TIC 111 18 SYSVOL DS CL6 1E SYSCYL DS 1H 20 24 28 2A 2B SYSSTART DS SYSPAGCT DS SYSPAGLN DS DS SYSFLAG DS 1F 1F 1H 1X 1X ~it§ g~!!~g SYSPROT in SYSFLAG EQU --X'8QI- SYSPAGNM DS 1F SYSSEGLN DS SYSHRSEG DS 1H 1X S*1 S*2 Chain pointer to next entry Minimum storage size needed to run system System name Volume identification number of DASD containing user's system Virtual address of VSYSRES Volume identification number of DASD ccntaining saved pages Cylinder on VSYSRES of user's system. Same as VDEVRELN CCPD of first page on SYSVCL Total number of pages saved Number of entries in SYSPAGNM Reserved for IBM use Named system flag Unprctected shared segments One fullword entry for each range of pages to be saved Numbers of entries in SYSHRSEG One tyte for each segment to be shared Section 1. CP Data Areas and Control Blocks 103 TNSREC TNSRlC is used by DMKIOE to record miscellaneous data records on CP's I/O error recording cylinders~ The record contains sense data applicable tc a specific l/C device. o 8 10 18 20 I TNSKEYN T*1 I/T*2//I/T*3/1/!*4/1///TNSSPE1/11111/1 ------------------------------------------------------1 TNSDTEN TNSTMEN 1 -------------1 1 TNSCPIDN --------------------11 TNSDEVAD TNSVOLID ------------------------------------------------------1 Sense Data 1 (Variable Length) Hexadecimal Displacement o 2 3 4 5 6 8 C 10 18 1A 20 38 50 68 80 98 EO 104 Field Name Field Descripticn, Contents, Meaning TNSKEYN TNSSWS1 TNSSWS2 DS DS DS TNSS~S3 DS TNSRECNT DS TNSSPE1 DS TNSDTEN DS TNSTMEN DS TNSCPIDN DS 1H 1X 11 1X 1X 1H 1F 1F 2F ~~!ic~ ~~~nd~~! ~!!! ~NSDEVAD TNSVOLID TNSSNS1 TNSSNS2 TNSSNS3 TNSSNS4 TNSSNS5 TNSSNS6 TNSSNS1 DS DS DS DS DS DS DS DS DS 1H 6X 24X 241 241 24X 24X 24X 24X T*1 T*2 T*3 T*4 Class source 90=T type N/S NCN TPER Switch byte 0 Reserved for IBM use Reserved for IEM use Reserved for IBM use Reserved for IBM use Date Ti.e Prccessor identification and .odel number Device address request is ~ending Vclume identification number 24 Sense bytes 24 Additional sense tytes 24 Additional sense bytes 24 Additional sense tytes 24 Additional sense tytes 24 Additional sense tytes Last 24 sense bytes IEM VM/370 Data Areas and Centrol Block Logic TREXT TREXT facilitates the tracing of virtual machine program instructions and interrupts. This block is used whenever the CP TRACE command is invoked. The VHTREXT field of the VHELOK points to TREXT 0 TREXIN1 8 TBEXIN2 TREXSVC1 I TREXSVC2 T*1 I T*2 TREXLOCK TREXEERC TREXLCNT 10 TREXPERA 18 TREXANSI TREXCR9 20 TREXCR10 TREXCR11 28 Hexadecimal Displacement ------------ TREXBUFF (10 douhlewords) Field Name Field Description, Contents, Heaning 0 4 8 A TREXIN1 TREXIN2 TREXSVC1 TREXSVC2 0 1F 1F 1H 1H First address - replaced instruction Second address - replaced instruction Displaced halfword - instruction 1 Displaced halfword - instruction 2 A ORG TREXPSi DS TREXINTL DS TREXINTC DS TREXIN1 1D 1H 1H Old ESW for pending SVC interrupt Instructicn length code Interrupt cede for pending interrupt C TREXFLAG DS 1X 8 It!!§ DS DS DS DS .Q~!~1!~.Q TREXRUN 1<()n -"'~ TREXVAT EQU TREXNDSP EQU D TREXOUT DS TREXLOCK DS TREXPERA DS 10 TREXNSI 14 16 18 TREXPERC DS TREXLCNT DS TREXANSI DS ORG DS Prevent CFWAIT between events Call DMKVATRN to put back virtual instruction DSP should not call TRCIT X'40' X'20' 1X EQU --X'80'--EQU X'40' E 10 Tracing control flags in TREXFLAG --X'80'---- ~~!§ .Q~!~~.Q in TREXOUT TREXPRT TREXCON T*1 T*2 Trace output controls Output to the virtual spool printer Cutput to user virtual machine terminal 18 1F Indicates tracing when set Address of instruction causing PER interrupt TREXPERA 6X Redefinition for TRACE use Actual next (or last) sequential instruction 18 18 1A PER code to be reflected Printed output line count Address of next (or last) sequential instructien Section 1. CP Data Areas and Control Blocks 105 TREXT Bexadecimal ~isplacement Field Name 1C TREXCR9 1C ORG TREXCTL DS TREXCTL1 DS TREXCTL2 DS 1D !!.!!§ DS OF Shadew control registers fer PER trace TREXCR9 OB 1X 1X Redefinition for TRACE use Balfwcrd holding tracing centrol bits: First byte = same as VMTRCTL in VMBLOK Secend byte = remaining control bits .9~!'!~.9 in TREXCTL2 --x'ao'-- TREXCCW TREXCSW TREXBRAN TREXINST BQU EQU EQU EQU 1C 1E 20 1E 20 TREXPER TREXPREG TREXCR10 TREXPRNT TREXTERM DS DS DS DS DS 22 TRBXRUNF DS 1B 24 TREXPNTR DS 1F 24 TREXCR11 DS TREXBUFF DS 1F 10D Address range ending value Consele/printer output buffer (80 bytes) TREXSIZE BQU (*-TREXT) /8 TREX! size in dcublevords (X'OF') 28 106 Field Descripticn, Contents, Meaning X'40' X'20' X'10' XL2 1B 1F 1B 1B Trace Trace Trace Trace virtual and real eCis virtual and real CSWs successful branches all instructions PER control field PER register mask field Address range starting value Printer flag bits corresponding to TREXCTL Terainal flag bits correspending to TRlXCTL Run/ncrun flag bits corresFonding to TRlXCTL Pointer to first stacked TRACE request, if any IBM VM/310 Data Areas and Centrol Block Logic TBQELOK TRQBLOK manages the timing facilities of VM/370. r 0 I I 8 I I 10 I I 18 I I 20 I Hexadecimal Displacement TRQBVAL TRQBFPNT TRQEBPNT TRQBTOD TRQBUSER TRQEIBA TRQEQUE Field Name Field Description, contents, Meaning ------------ -------------------------------------TRQBVAL TBQBFPNT TRQBBPNT TRQBTOD TRQBUSER TRQBIRA TRQBQUE 0 8 C 10 18 1C 20 DS DS DS DS DS DS DS TRQBSIZE EQU I • 1D 1F 1F 1D 1F 1F 1D TOD clock comparator value for interrupt Pointer to next TRQBLOK Pointer to previous TBQBLCK TOD clock value when TRQBLCK is queued Address of VMBLOK for user Interrupt return address Time left in queue; tracking virtual processor tiller (*-TRQBLOK)/8 Size in doutlewords (X'05') Local Graphic Device Support The following continuation of the TRQBLOK tuilt, referenced, and released by DMKGRF. r 28 I Hexadecimal Displacement 28 2C 2E local graphic device support is T*2 Field Description, Contents, Meaning TRQBCRT DS TRQBDEV DS TRQBFLAG DS ~~~§ ~~!1~~~ 2F TRQEDEi TRQBCRT Field Name CRTFMT CRTDIAG CRTALRM CRTiNG CRTCARD CRTTAB2 CRTAPL CRTSIO CRTAIO DSECT for EQU EQU EQU EQU EQU EQU EQU EQU EQU TRQBLINE DS 1F 1H 1X lD T*1 %~2~rLAQ X'80' X'40' X'20' X'10' X'08' X'04' X'02' X'01' CRTSIO 1X Graphic device return IRA Graphic device device address Graphic device flags Screen formatted VM/370 online Screen written with Diagnose Screen has alarm message Screen has MORE ••• warning Data from card reader Second pass flag for tab function APL read buffer allocated User issue tiagnose to input area Timer interrupt pending after I/O co.pletes T*2 Line coordinate for input area Section 1. CP tata Areas and Centrel Blocks 107 TBQBLOK, UDEFELOK I • Bemote Graphic Device Support The following continuation of the TBQBLOK DS!CT for remote graphic built, referenced, and released by DMKRGA and DMKRGE. 28 Hexadecimal tisplacement TRQBCRT Field Nalle -----------28 2C 2E as DS DS DS EQU lF lH lH X'FF' a buffer o 0 38 3C 108 GraFbic device return IRA GraFhic device line address Rescurce identification Timer interrupt for general FoIl for user device block data in user directory access UDBFWOBK 38 ------------ TRCNA!!E Field Descriptien, Centents, Meaning TBQBCRT TRQBDEV TRQNAME TRQBPOLL urEFELOK is used oFerations. Hexadecimal Displacement TaCEDEV device support is UDEFDASD UDBFVADD Field Nalle Field Descripticn, Contents, Meaning UDBFWORK DS UDBFVADD DS UDBFDASD DS 7D UDBFSIZE EQU (*-UDBFBLOK)/8 UDEFELOK size in doutlewords (X'08') IF IF Euffer work space used by the caller Virtual address of the last directory page DASD address of the last direct cry page IEM VM/370 Data Areas and Centrol Block Legic UDEVBLCK UDEVBLOK supplies the information about the virtual machine's virtual devices# the operational parameters for its use# such as DASI access passwords# read/write link mode# spool device# T-disk space versus dedicated device space# as well as other Farameters. , o UDEVADD UDEVDISP 8 U* 1 I U*2 U*3 I U*4 10 U*5 I U*6 I UDEVPASR 20 UDEVPASi 28 UDEVPASM ------------ Field Name UDEVADD UDEVDISP UDEVDASD UDEVSTAT Field Descriptien, Contents# Meaning DS DS DS DS 1H 1H 1F 1X -~------------------------------------ U*1 ] it.§ g~!JJl~g in UDEVSTAT UDEVDED EQU --X'80'---UDEVTDSK EQU X'40' UDEVLONG EQU X'20' "TI lO'lJT 1l'T'I11 X'10' RQU UDEVSPOO EQU X'08' UDEV3158 EQU X'04' UDEVVRR EQU X'02' U~.I.II 9 • .£,I,I.\.,IJ. UDEVMODE DS 1X UDEVTYPC UDEVTYPE UDEVFTR UDEVMDL DS IS IS DS 1C 1C 1C 1C Virtual device address Displacement of the next block DASI address of the next block Device status information Device to be dedicated te this user T-disk to be allocated Device block is full length (6 doublewords) Device is te be linked (at legon) Device is a spool device Device is a 3158 console Virtual reserve/release requested U*2 ]!1.§ g~!!!!~g in UDEVMODE EQU --X'80'--UDEVLR UDEVLW EQU X'40' UDEVLM EQU X'20' UDEVR 00 EQU UDEVRR 04 EQU UDEVW 08 EQU UDEVWR EQU 12 EQU UDEVM 16 UDEVMR EQU 20 EQU UDEVMW 24 A E C D UDEVNCYL UDEVVSER UDEVRELN 18 Hexadecimal Displacement 0 2 4 8 unEVDAS!) Access mode information Read links allowed Write links allcwed Multiple write links allowed Device to be in R link mode for owner Device to be in RR link mode for owner Device to be in W link mode for owner Device to be in liR link mode for owner Device to be in M link mode for owner Device to be in MR link mode for owner Device to be in MW link mode for owner U*3 U*4 U*5 U*6 Virtual device class Virtual device type Device feature codes Device model number D E 10 ORG UDEVCLAS DS UDEVLINK DS UDEVLKID DS UDEVMDL 1C 1H 1D User device block (short) Speel device output class User link tc disk User link tc userid E 10 12 UDEVNCYL DS UDEVRELN DS UDEVVSER DS 1H 1H 6C Virtual DASD size Virtual DASt cylinder relocation Volume identification number Section 1. CP Lata Areas and Centrel Elocks 109 U~EVELOK, UDIRBLOK Hexadecilllal tisplacelllent Field Nallle -----------18 20 28 Field Descriptien, Contents, Meaning UDEVPASR DS UDEVPASW DS UDEVPASM DS 1D 1D 1D Passwerd for read access Password for write access Passwerd for multiple access UDEVSIZE EQU (*-UDEVBLOK)/8 UDEVELOK size in doutlewor~s U~IRELOK contains data describing the user's ce.mand privilege machine options, terminal line edit values, and ether values. o (X'06') classes, special virtual r,---------------------------------------------------------, 1//UDIRRSV1///1 UDIRDISP 1 UDIRDAsr 1 1---------------------------------------------------1 8 1 UDIRUSER 1 1 I 10 1 UDIRPASS I Hexadecillal I:isplacement -----------0 2 4 8 10 Field Name UDtRR-SV1 UDIRDISP UDIRDASD UDIRUSER UDIRPASS Field Description, Centents, Meaning DS DS DS DS DS UDIRSIZE EQU 110 lH 1H 1F 1D 1D Reserved for IBM use DisFlacement of the user's UMACELOK DASI: address of the user's UMACELOK Userid User Fassword (*-UDIRBLOK)/8 UDIRELOK size in doutlewords (X'03') IBM VM/370 Data Areas and Centrol Block Legic U1UCBLCK UMACELOK contains the logon parameters for one virtual machine user. This block Frovides, in addition to the linkage to the user's defined virtual machine device UDEVELOK, the command privilege class, assigned line edit values, as well as other virtual machine °Ftions. o UMACDVCT UMACDISP 8 U* 1 I U*2 U*3 I U*4 10 UMACACCT 20 UMACDIST 28 UMACIPL ------------ UMACPUID U*9 1/////////UMACRSV2/////////// Field Name UMACDVCT UMACDISP UMACDASD UMACCLEV Bi!§ Field Description, Contents, Meaning 1H 1H 1F 1C DS DS DS DS .§gt!~§g UMACCLA UMACCLB UMACCLC UMACCLD UMACCLE UMACCLF UMACCLG UMACCLH 9 A UMACMCOR 18 Hexadecimal tisFlacement 0 2 4 8 U*5 I U*6 I U*7 , U*8 UMACCORE 30 , UMACDASD ~ ~ ..Loll -------------------------------------U*1 TlMlI,.,.T li'V u,u.'O ............. ~.J.J. ... EQU --X'80'---EQU X'40' EQU X'20' EQU X'10' EQU X'08' ErlTt \o!u X'04' EQU EQU X'02' X'01' 1X 1X UMACPRIR DS OMICOPT DS ~.!!§ g~!.!1!~g UMACISIM UlU CECO P UMACRT UMACVROP UMACACC UMACRSV4 UMACNSVC EQU EQ U EQU EQU EQU EQU EQU UMICBMX EQU 111 Num1:er of devices DisFlacement of the next block DASI: address of the next block Command level flags !!~!~Q~1 X'80' X'40' X'20' X'10' X'08' X'04' X'02' X'01' Privilege Privilege Privilege Privilege Privilege Privilege Privilege privilege U*2 U*3 Class Class Class Class Class Class Class Class A B C D E functions functions functions functions functions F functions G functions H functions Virtual machine priority Virtual machine option flags ISAM CCW checking option Extended control mode optien Real timer eption Virtual = Real storage option Accounting card option Reserved for IBM use SVCs not handled by virtual machine feature Virtual block multiplexer channel assist Section 1. CP I:ata Areas and Centrel Elocks 111 UMICBLOK Hexadecimal Displacement B Field Name Field Description, contents, peaning UMACOPT2 DS lC U*4 Processor identification number on option statement VMSAVE on oFtion statement U!UCVMSV EQU X'10' DS DS DS DS DS DS DS DS DS DS 1C lC 1C 1C 1F 1F 1D 1D 1D XL3 0*5 U*6 U*7 U*8 10 14 18 20 28 30 UMICLEND UMACLDEL UMICCDEL UlUCES UMACCORE UMACMCOR UMICICCT UMICDIST OMICIPL OMICPOID 33 UMACAFF DS lX U*9 C D E F Virtual machine option flags Terminal line end symbol Terminal line delete symbol Terminal character delete symbol Edit escape symbol Virtual storage size in bytes Maxi.um virtual storage size in bytes Accounting information User machine distribution information Name of system to te IPLed at logon Processor identification number in tinary Affinity and processor address Affinity specified Processor address for "affinity 34 112 UMACRSVR DS 1F UMACSIZE EQU (*-UMACBLOK)/8 UMACELOK size in doutlevords (X'06') Reserved for IBM use IBM VM/370 Data Areas and Control Block Logic Virtual I/O Control Blocks The base fer locating the I/O block structure is the user's Virtual Machine Central Block (VMBLOK) • The VMELOK contains a pointer to the start of three control block tables, and a table of 16 channel indexes. The control block tables contain one block for each of the virtual channels, control units, and devices that are defined for the user's virtual machine. The entries in the channel index table (VMCHTBL) contain the pointers to each channel defined for the user in the table of Virtual Channel Blocks (VCHBLOKs). Each VCHBLOK contains a table of pointers that peint to the Virtual Control Unit Blocks (VCUELOKs) for the control units attached to that virtual channel. Each VCUBLOK contains pointers to the Virtual Device Elocks (VDEVBLOK) attached to the control unit. Thus, if given the unit address of any component in the form cuu, the appropriate control blocks representing each component in the subchannel path to the given unit is located via the indexing scheme. VIRTUAL CHANNEL BLOCKS There is ene Virtual Channel Block (VCHELOK) for each virtual channel connected te the user's virtual processor. Each VCHBLOK contains the channel address and flag indicating the channel type (selector, byte multiplexer, or block multiplexer). The status of the channel and its attached units are represented by several status and mask bytes. • A status byte (VCHSTAT) indicates whether the channel is busy or has a channel class interrupt pending. • A halfword unit address identifies the unit causing the channel-class interrupt (if it is present). • A halfword mask (VCHCUINT) contains a bit map of the attached control units that have interrupt status pending. Following these status flags and masks is the table of indexes pointing to the attached VCUELeKs; index entries reFresenting addresses at which no control unit is attached have a value of -1. VIBTUAL CCNTROL UNIT ELOCKS There is one Virtual Centrol Unit Block (VCUBLOKj for each contrcl unit in the virtual configuration. These blocks are arranged in a table, each contains: in addition to its base address, status flags similar te those in the VCHELCK and a table of indexes to attached VDEVBLOKs. The status flags defined for the VCUBLCK differ frem these for the VCHELCK ,in that they can centain status for the centrol unit and alse for a subchannel. For example, if the VCUELOK representing a 2803 taFe control unit is attached to a virtual selector channel, both the VCHBLCK and the VCUBLeK are marked busy. However, if the VCUBLCK is attached to a virtual byte multiplexer channel and is for a central unit on a selector subchannel of the multiplexer, the busy status of the channel is reflected in the VCUBLOK only. Thus, the virtual byte multiplexer appears nonbusy te operations on other, nonshared subchannels. VIBTUAL DEVICE BLOCKS There is one Virtual Device Block (VrEVBLCK) in the configuration for each virtual device defined by the user. Each VtEVBLOK contains the device portion of the unit address, device status, and the virtual CSW for the last interrupt taken by the device. In addition, the VDEVBLCK contains device type specific information that allows the I/O translation and simulation routines te interpret the channel programs presented by the user. IS!!: The VCHBLCK, VCUELOK, VDEVBLCK, VFCEBLOK, and VSPXELOK DSECTs are all contained in the VELOKs COpy file. Section 1. CP tata Areas and Contrel Blocks 113 VCHBLOK VCHBLOK contains information providing linkage between the virtual machine and one ef its virtual channels. SUPFlied in this block, in addition to channel status and type information, are the reflected interrupts from attached virtual centrol units.. The VMCHSTRT field of the VMBLOK points to the first VCHELeK. o 8 VCHADD VCHCUINT VCHCEDEV -------., I V*l 1 V*2 I ------------------------------------------------1 VCHCUTBL 1 -------' Hexadecimal I:isplacement ------------ Field Nalle Field Description, Contents, Meaning 0 2 4 VCHADD DS VCHCUINT DS VCHCEDEV DS 1H 1H 1H 6 VCHSTAT 1X DS V*l ~~!!.!!~g in VCHSTAT VCHBUSY EQU --X'80'--VCHCEPND EQU X'40' VCBDED EQU X'Ol· It!!§ 7 VCHTYPE !!!!§ 114 1X Virtual channel busy Virtual channel class interruft pending virtual channel dedicated V*2 in VCHTYPE EQU --X'80'--EQU X'40' ~~!!.!!~g VCHSEL VCHBMX 8 DS Virtual channel address VCUELOK with interrupt-bit map Virtual device address with channel class interrupt Virtual channel status Virtual channel type Virtual selector channel Virtual block multiplexer VCHCUTBL DS 16H Contrel units attached - VCHSIZE (*-VCHBLOK) /8 VCHEIOK size in doublewords (X'OS') EQU IBM VM/370 Data Areas and Centrol Block Legic V~CUSTRT index VCONCTL VCONCTL contains CCW and data buffer informaticn for the communicaticns of ccnsole. The VDEVCON field of the VDEVBLOK points to VCONCTL. o r the virtual , 1 VCONCAW VCONBUF 1 1---------------------------------------------------1 8 1 VCONCCW 1 1 1 10 I/V*1//1 V*2 I/V*3//I/ V*4//1 VCONIDAP 1 1 18 1 "'" VCONRBUF 1 ~v Hexadecimal tisplacement o Field Name DS DS DS 1F 1F 1D ORG DS DS DS DS VCONCCW 1F E VCONADDR VCONFLAG VCONDWC VCONCNT ORG VCONCOMD DS VCONADDR 8 10 11 12 13 14 VCONRSV1 VCONBFSZ VCONRSV2 VCONRSV3 VCONIDAP DS DS DS DS DS 1X 1X 1X 1X 18 1C 1E 1F 20 24 26 27 VCONRBUF VCONRCNT VCONRBSZ VCONRSV6 VCONWBUF VCONWCNT VCONWBSZ VCONRSV8 DS DS DS DS DS DS DS DS 1F 1H 8 8 C D VCCNRCNT V*5 1//V*6//1 VCCNWCN'I V*7 IIIV*8//1 1 Field Descripticn, Contents, VCONCAW VCONBUF VCONCCW 4 1 VCONSIZE EQU Virtual address of user CCw Pointer tc data buffer Current user ccw CCW data CCW flag Diagnose CCW byte 1X 1X 1H 1X V*1 V*2 V*3 V*4 V*5 V*6 1F 1H 1X 1X address bits write control count CCW command code 1F 1X 1X ~eaning V*7 V*8 (*-VCONCTL)/8 Reserved for IBM use Data buffer size in doublewords Reserved for IBM use Reserved for IBM use For indirect data addressing pointer to current IDAW Address of read data buffer Data count in read buffer Read buffer size in doublewcrds Reserved for IBM use Address of write data buffer Data count in write buffer Write buffer size in doublewords Reserved for IBM use VCONe'lL size in doublewords (X 1 05 1 ) Section 1. CP tata Areas and Contrel Blocks 115 VCOBLOK VCOBLOK contains status information relating to the virtual channel, and the status and features of the virtual control unit. The VftCOSTRT field of the VftELCK foints to the first VCUELOK. o VCODVINT I VCUADD -----------0 2 4 6 Field Nalle VCOADD VCODVINT VCOINTS VCOSTAT VCUTYPE DS DS DS DS 1H 1H 1H 1X V*1 DS 1X 116 virtual ccntrol unit address VDEVELOK with interrupt - bit map Virtual control unit interrupt status Virtual centrol unit status Virtual suhchannel busy Interrupt pending in suhchannel Virtual control unit busy Virtual control unit interrupt pending Virtual centrol ufiitend pending Virtual centrol unit active V*2 1!1!§ g~!!J1~g in VCUTYPE VCOSHRD EQO --X'80'--VCUCTCA EQU X'40' 8 I I I Field Descriptien, centents, fteaning 1!it§ g~!1~g in VCOSTAT VCOCHBSY EQO -X'80'-VCUCEPND EQO X'40' VCUBUSY EQO X'20' VCUPEND EQU X'10' VCUCOEPN EQO X' 08·' VCUACTV EQU X'04' 7 -------, I V*1 I V*2 VCUDVTBL 8 Hexadecimal risplacement VCOIBTS virtual centrol unit type Virtual centrol unit on shared subchannel Virtual centrol unit is a channel-to-channel adapter VCUDVTBL DS 16H Devices attached - VftDVSTRT index VCUSIZE C*-VCUBLOK)/8 VCUELCK size in doublewords (X'CS') EQU lEft VM/370 Data Areas and Contrel Elock Logic VDEVELCK VtEVELOK maintains status and interrupt conditions field of the VMBLOK points to the first VDEVBLOK. 0 VDEVA:CD VDEVINTS for one virtual device. The VMDVSTBT V*1 I V*2 I V*3 I V*4 VDEVCSW 8 10 VDEVPCSN VDEVBND VDEVRELN 18 VDEVQUED VDEVOFER 20 VDEVLINK VDEVREAL 28 VDEVIOCT VDEVUSER 30 VDEVIOER VDEVICB 1/////VDEVRES1/////1 VDEVRRB 38 V*5 L-- Eexadecimal :Cisplacement o 2 4 5 6 Field Name VDEVA-DD VDEVINTS VDEVTYPC VDEVTYPE VDEVSTAT Field Description, Contents, DS DS DS DS DS ~it§ g~!:!.n~g VDEVCHBS VDEVCHAN VDEVBUSY VDEVPEND VDEVCUE VDEVNRDY VDEVCATT VDEVDED 7 EQU EQU EQU EQU EQU EQU EQU EQU VDEVFLAG DS ~:!1§ g~!:!.n~g VDEVRDO VDEVENAB VDEVTDSK VDEVDIAL VDEVCSPL VDEV231T VDEV231B VDEVCCW1 VDEVSAS VDEVDLY VDEVDET VDEVPOST VDEVRSRL VDEVUC EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU 1H 1H 1X 1X 1X V*1 V*2 V*3 Virtual Virtual Virtual Virtual Virtual device device device device device ~eaning address interrupt status type class type status in VDEVSTAT --X'80'---- Virtual subchannel busy Virtual channel interrupt rending Virtual device busy Virtual device interrupt pending Virtual control unit end Virtual device not ready Virtual device attacbed by console function VDEVREAL is dedicated device RDEVBLOK X'40' X'20' X'10' X'08' X'04' X'02' X'01' 1X V*4 Virtual device flags in VDEVFLAG -X'80'--X'80' X'40' X'40' X'40' X'20' X'10' X'10' X'08' X'08' X'04' X'02' X'02' X'01' DASD - read-only Virtual 270x - line enabled DASt - T-disk space allocated by CP Virtual 270x - line connected Conscle - activity spooled DAS:C - 2311 simulated on tcp balf of 2314 DASt - 2311 simulated on bcttom half of 2314 Conscle and spooling - processing first ccw DASt - Executing standalone seek Ccnscle - delay spooling Virtual device is being detached Fresent attention with a single interrupt Reserve/release are valid CCW 0Feraticn codes Virtual device sense bytes present Secticn 1. CP :Cata Areas and Contrcl Blocks 117 VtEVELOK Hexadecimal Displacement Field Name Field Description, Contents. Meaning 1D 1H 1H 1F 1F 1F 1F Virtual channel status word Virtual DASt cylinder relocation Virtual DAst size (in cylinders) Virtual DASD seek position Virtual SIO to real SIO queued time Device operational time Link to virtual shared devices ORG VDEVTMAT DS VDEVLINK 1F T-disk attached time (TOD clock word 0) 24 28 2C 30 VDEVREAL VDEVIOCT VDEVUSER VDEVIOER 1F 1F 1F 1F Pointer Virtual Pointer Pointer 30 34 ORG VDEVSNSE DS VDEVFCBK DS VDEVIOER 1F 1F Sense bytes for spool device Address of forms control block (VFCBELOK) 34 38 VDEVIOB DS VDEVFLG2 DS 1F 1X 10 12 14 18 1C 20 VDEVCSi VDEVRELN VDEVBND VDEVPOSN VDEVQUED VDEVOPER VDEVLINK 20 8 DS DS DS DS DS DS DS DS DS DS DS V*5 to real device RDEVELCK device I/O count to VMBLOK of VDEVBLeR owner to IOERELOK for last error Pointer to active IOELOK virtual device flag tyte 2 ~1!~ g~!1]~g VDEVRRF VDEVRES VDEVODE 39 3C in VDEVFLG2 EQU --X'80'---EQU X'40' EQU X'20' VDEVCPEX EQU X'10' VIRTUAL X'01' EQU Process virtual RESERVE/RELEASE commands Minidisk reserved by VDEVUSER VDEVELOK to get device when minidisk is released Virtual I/O waiting for release of minidisk Viri~aldevice is known by t~e virtual machine as a 3330V VDEVRES1 DS VDEVRRB DS 3X 1F Reserved for IBM use Address of VRRELOK for RESERVE/RELEASE VDEVSIZE EQU (*-VDEVBLOK)/8 VDEVELOK size in dQutlewords (X'07') ~EQQJ1]gL~Q~£J~ Q~~1f~~ 10 14 18 1C 20 21 22 24 26 VDEVEXTN VDEVSPAR VDEVCON VDEVSPL VDEVCLAS VDEVKEY VDEVUNIT VDEVCOPY VDEVCFLG ORG DS DS DS DS DS DS DS DS DS VDEVRELN 1F 1F 1F 1F 1C 1X 1H 1H 1X Pointer to spool extension block Spare pointer tc sFool extension block Pcinter to VCONCTL console control Pointer to VSPLCTL sFool centrol SFocl outFut class Storage key in user's CAW Spool output directed device address Number of copies requested Conscle - virtual console flags ~1!§ g~!i~~g in VDEVCFLG VDEVATTN EQU --X'80'---VDEVTIC EQU X'40' VDEVTRAN EQU X'20' VDEVVCF EQU VDEVAUCR EQU 118 X'10' X'08' User pressed Attention key two or more times Last CCi precessed was a TIC Data transf€r occurred during this channel Fregram Virtual censole function in Frogress Automatic carriage return en first read IBM VM/370 Data Areas and Centrel Block Legic VDEVBLCK Eexadecimal Eisplacement -----------27 Field Name Field Description, Contents, Meaning VDEVSFLG DS lX in VDEVSFLG 12.!!§ Q§!.!]§Q --x -;1i'0-;---VDEVFEED EQU VDEVXFER VDEVCONT VDEVHOLD VDEVFOR VDEVEOF VDBVTERM VDEVCFCL VDEVPURG VDEVDIAG VDEVSVC EQU EQU EQU EQU BQU BQU EQU BQU EQU BQU X'80' X'40' X'20' X'10' X'08' X'08' X'04' X'02' X'02' X'Ol' Spcol - virtual spool flags Spool reader - last command was a feed spool output - transferred to VDEVXUSR Spocl device - continuous cperation Hold cutput - save input Spool output - for user and distribution spool input - set unit exceFtion at EOF Terminal output required fcr spooled console Device closed by console function Spool output - purge file at close Spocl input - device opened by DIAGNOSE Spool device busy by CP Section 1. CP Data Areas and Control Blocks 119 VFCBELOK, VMAELOK VFCBBLOK is exclusively used for virtual 3211 printer carriage contrcl forms activity. , 0 VFCBCNT V*1 8 VFCBSPAR V*3 V*2 I VFCEWORK 10 • I I I I VFCBLOAD Hexadecimal tisplacement Field Name Field Description, Contents, Meaning -----------VFCBCNT DS VFCBFLAG DS 0 2 1H 1X V*1 Current Fointer to carriage column Working flag byte ~i!§ g~!iQgg 3 4 8 A E VFCBEOF VFCBCMD in VFCBFLAG EQU --X'80'---EQU X'40' VFCBCHL VFCBWORK VFCBSPAR VCFImD-EX VFCBLOAD DS DS DS DS DS VFCBSIZE EQU 1X 1F 2X 1X CL181 End-cf-forms passed once Forms control given V*2 V*3 Channel numler or space count Work area Spare Index byte value Forms control buffer area (*-VFCEELOK) /8 Size in doullewords (X' 18') VMABLOK contains the name of a shared system, a pointer to the share table (SHRTAELE), and a pointer to the next VMABLOK. The VMA55IST field in the VMEICK Foints to the VMABLOK. o VMAFPNT VMANAME 8 Hexadecimal tisplacement -----------0 4 8 Field Name Field Description, Contents, Meaning VMAFPNT DS VMASHREK DS VMANAME DS VMASIZE 120 VMA5HRBK 1F 1F CL8 EQU (*-VMABLOK) /8 Forward pointer to next VM!ELCK Address of share table (SHRTAELE) Identification of named shared system VMAELCK si ze in dour lewords (X' 02') IBM VM/370 Data Areas and Central Block Logic VMELCK VMELOK is used as the primary control block for almost all activities related to a single virtual machine. This block contains the following information: the disFatch and priority level of the virtual machine, the virtual machine's processor registers, preferred virtual machine option values, and otber values significant tc virtual machine oFerations. The ASYSVM field of the PSA points tc the system VMELOK. , I 0 VMQFPNT VMQBPNT 1201 8 VMPNT VMECEIT 128 10 VMSEG VMSIZE 13C VMiCN'! 10 TFM"'U~""l'lm lfI:J\..U.;I.LU.L VMCUSTRT i3E VMIOCNT VMPNCH 20 VMDVSTRT VMTERM 14C VMLINS VMCRDS IV VMDIS'I VMPGREAD VMPGWRIT IVMSEGDSP VMSTOR 28 VMVTERM IVMTRMID IV*1 IV*2 IV*3 IV*4 148 30 VMCHCNT IVMCOCNT IVMDVCNT 15C /VMFDROM/I/VMPDISK/IVMPAGES IVMIOACTV VMCHTBL 381 158 VMDEBCH 1 581V*5 IV*6IV*7 IV*8 IV*9 IV*10IV*11IV*12 I VMLOCKER 60IV*13IV*14IV*15IV*161 I 68IV*19IV*20IVMIOINT 1 VMVTIME 70! 78 VMTMOOTQ 80 VMTTIME 88 VMTMINQ 90 VMTODINQ VMCOMND IVMQPRIOR IVMWSPROJ IVMSTEALS 16C VMTIMEON VMTRQBLK 1E8 VMACCONT VMRDINQ 17C VMPGRINQ VMEPRIOR 178 VMSTKO VMMICRO 18C VMPFONC VMPXINT 188 VMDELAY VMRPRIOR 19C VMPGPNT VMNDCNT IVMSBRSYS VMTIMER 198 V*21IV*22IV*26IV*271 98 AO VlHNST IVMPRGIL VMASSIST 1AC VMCPNT VMCPOID I/V*25/ 1A8 VMLOCK VMDFTPNT 1EC VMOSER1 VI10SER2 1E8 VMOSER3 VI10SER4 1ce VMOBS VMPCKP IV*17IV*18 VMTREIT VMADSTOP A8 VMPSW EOI VMGPRS 1C8 1------------------------------------VMFPRS FOI 1------------------------------------VMOSER 1101 1------------------------------------1181 VMACNT VMXPG 1 1DCI I c* 1 1C*2 VMSWPMIG VMSTKCNTI VI1PRRCT IC*3IC*4IV*28 IV*29 1------------------------------------VMCPTIME 1D81 1-----------------------------------VMAFTIM! 1EC, 1------------------------------------IV*30IHSVDI VI1CONLN 1E81 VMAC'IDEVI I 1FCI V~FLPAG VMCONBOF IV*311//RESERVED/// Section 1. CP Data Areas and Control Blocks 121 VMBLOK Hexadecimal Displacement -----------a 4 8 C 10 14 18 1C 20 24 28 2A 2C 2D 2E 2F 30 32 34 36 38 58 Field Nalle Field Description, Ccntents, Meaning VMQFPNT VMQBPNT VMPNT VMECEXT DS DS DS DS 1F 1F 1F 1F Pointer to next VMELCK in queue Pointer to previous VMELCK in queue Pointer (CYCLIC) to next VMELCK VMBLCK extended control pointer - ECELOK VMVCRO EQU VMECEXT Virtual control register virtual machine VMSEG VMSIZE VMCHSTRT VMCUSTRT VMDVSTRT VMTERM VMVTERM VMTRMID VMTLEND VMTLDEL VMTCDEL VMTESCP VMCHCNT VMCUCNT VMDVCNT VMIOACTV VMCBTBL VMRSTAT DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS 1F 1F 1F 1F 1F 1F 1H 1H 1C 1C 1C 1C 1H 1B 1H 1H 16H 1X Pointer to VMSEGTBL Virtual temporary storage size in bytes Pointer to VCHBLOK table Pointer to VCUBLOK table Pointer to VDEVBLOK table Pointer to BDEVELOK for user terminal Displacement to virtual console VDEVBLOK Resource ID of real terminal if 370x Terminal line end symbol Terminal line delete symbol Terminal character delete symbol Terminal escape symbol Virtual channel count Virtual control unit count Virtual device count Active channel mask Channels attached - VMCHSTBT index Virtual machine running status V*1 V*2 V*3 V*4 V*5 a for non-EC mcde ~i!§ g~!!~~g in VMRSTAT VMCFWAIT EQU --X'80'--Waiting - Executing console function i-KPGi.AITE-Q-U-X'40 ~W-aitin-g. - P-ag.ingop_e.r_ation (s) VMIOWAIT EQU X'20' Waiting - Scheduled IOELOK start VMPSWAIT EQU X'10' Waiting - Virtual PSW wait state VMEXWAIT EQU X'08' Waiting - Instruction simulation VMLOGON EQU X'04' User not logged on VMLOGOFF EQU X'02' User logging off VMIDLE EQU X'01' Virtual machine in idle wait state VMCPWAIT EQU VMCFWAIT+VMPGWAIT+V~IOWAIT+VMEXWAIT+VMLCGCFF+VP.LOGON VMNORUN EQU VMCPWAIT+VMPSWAIT VMLONGWT EQU VMCFWAIT+VMLOGON+VMLCGOFF+VMIDLE 59 VMDSTAT DS ~i!§ g~!!~~g VMDSP VMTSEND VMQSEND VMTIO VMRUN VMINQ VMELIG VMPAZAPL 122 1X in VMDSTAT EQU --X'80'-EQU X'40' EQU X'20' EQU X'10' EQU X'08' EQU X'04' EQU X'02' EQU X'01' V*6 Virtual machine dispatching status Virtual machine is dispatched run user Virtual machine is compute bound Virtual machine in-queue time slice end Virtual machine is in TIO busy loop Virtual machine runnable Virtual machine in a queue Virtual machine in eligible list Use dispatch path DMKDSPCH IBM VM/370 Data Areas and Control Block Logic VMBLCK Hexadecimal tisplacement SA Field Name VMOSTAT Field Description, Ccntents, Meaning DS ~i 1X V*1 t§ g~:t!~g in VMOSTAT VtISYSOp EQU VMSHR EQU X'40' VMSLEEP EQU X'20' VMDISC EQU X'10' VMCFRUN EQU X'OS' 5B --xiaoi-- VMVIRCF EQU X'04' VMCF VMKILL EQU EQU X'02' X'01' VMQSTAT DS 1X ~it§ g~!!1!~Q 5C VMPRIDSP VMAUTLOG VMWSERNG VMDLDRP VMWSCHG VMINHMIG VMCFREAD VMPA2APL EQU EQU EQU EQU EQU EQU EQU EQU VMPSTAT DS ~it§ g~!!1!~Q VMISAM VMV310R VMRPAGE VMREAL EQU EQU EQU EQU VMt~OTRAt~ EQU VMNSHR EQU VMACCOUN EQU VMPAGEX EQU 5D VMESTAT DS Virtual machine is system eFerator Virtual machine running shared system Virtual machine is in SLEEf state Virtual machine console disconnected Virtual machine running in console function mode Virtual machine executing virtual console function Virtual machine executing censole function Virtual machine is to te legged off V*S !11 !!i~21!1 X'SO' X'40' X'20' X'10' X'OS' X'04' X'02' X'01' 1X V*9 Virtual machine processing status Virtual machine has ISAM CCW checking Virtual machine can use extended format Virtual machine can reserve Fages Virtual machine has virtual=real option No ccw translation fer virtual=real user Running nonshared named saved system Virtual machine may Funch account cards Virtual machine receiving Fseude page faults V*10 ~!!§ g~!!1!~Q in VMESTAT 5E Virtual machine queueing status Virtual machine eligible fcr queue 1 Autologged user is in discennect mode Last working set errcr was negative Delayed queue drop flag Force a new working set en queue entry Page migration switch Virtual machine with console function read on Reflects external interrupts to machine !11 !!1R21!1 X'SO' X'40' X'20' X'10' X'08' X'04' X'02' X'01' 1X Virtual machine operating status Virtual machine control status VMSHADT VMPERCM VMBADCRO VMMICSVC EQU --X'80'--EQU X'40' EQU X'20' EQU X'10' VMEXTCM VMNEWCRO VMINVSEG VMINVPAG VMECZAP EQU EQU EQU EQU EQU X'OS' X'04' X'02' X'01' 255-VMMICSVC Shadew tatles are Fresent Virtual CP fER active Virtual control register 0 is invalid User wants SVCs done by virtual machine assist feature Virtual machine in extended control mode Virtual control register 0 has changed All shadow tables invalid Shadow page tables invalid All tits except VMMICSVC VMTRCTL DS 1X Virtual machine tracing contrel ~!!§ g~!!1!~Q VMTRPER VMTRSVC VMTRPRG VMTRIO VMTREX VMTRPRV VMTRSIO VMTRBRIN in VMTRCTL EQU --X'80'--EQU X'40' EQU X'20' EQU X'10' EQU X'OS' EQU X'04' EQU X'02' EQU X'01' VMTRINT EQU V*11 Virtual PER tracing active Trace user SVC instructions Trace virtual program interruFts Trace virtual I/O interrupts Trace external interrupts Trace user Frivileged instructions Trace virtual I/O instructions Trace successful branches er all instructicns VMTRSVC+VMTRPRG+VMTBIO+VMTREX Trace all user interrupts Section 1. CP rata Areas and Control Blocks 123 VMBLOK Hexadecimal Displacement 5F Field Name Field Description, Contents, Meaning 1X VMMLEVEL DS V*12 !t!1§ g~!.!!l~g in VMMLEVEL VMMSGON EQU --X'80'---VMWNGON BQU X'40' VMMCODE BQU X'20' VMMTEXT BQU X'10' VMMLINBD BQU X'08' VMMACCON BQU X'04' VMMCPENV EQU X'02' VMMSTMP BQU X'01' 60 VMQLEVEL DS ~.!1§ g~!.!!l~g 61 1X !ll EQU EQU EQU EQU EQU EQU EQU VMDROP1 EQU X'02' VMFS EQU X'01' VMCLEVEL DS Receiving messages Receiving warnings Receiving error message codes Receiving texts of error messages Line editing on Receiving accounting information Terminal in CP .ode Time stamp desired on conscle output V*13 !11~1~!!1 VMQ1 VMCOMP VMHIPRI VMLOPRI VMAEX VMAEXP VMQ3 V*14 in VMCLEVBL EQU --X'80'---EQU X'40' EQU X'20' BQU X'10' EQU X'08' BQU X'04' EQU X'02' BQU X'01' ~.!1§ g~!.!!l~g VMCLASSA VMCLASSB VMCLASSC VMCLASSD VMCLASSE VMCLASSF VMCLASSG VMCLASSH 62 VMTLEVEL DS 1X Queue level Virtual machine is interactive Virtual machine is compute bound Virtual machine is highest Friority Virtual machine is lowest Frierity Virtual machine is assured execution Virtual macbine is assured percentage Virtual machine using multiple Q2. Note that this bit is used only by the fair share scheduler. Virtual machine droPIed frem Q1. This bit is used only by the standard scheduler. Using more than fair share flag X'80' X'40' X'20' X'10' X'08' X'04' X'02' 1X Message level Command level Privilege Class A functions privilege Class B functions privilege Class C functions privilege Class D functions privilege Class E functions Privilege Class F functions Privilege Class G functions Reserved for IBM use V*15 Timer level ~it§ g~!!!l~g in VMTLBVEL VMTON EQU --X'80'---VMRON EQU X'40' VMCPUTMR BQU 1'20' 124 VMSTMPI EQU VMSTMPT BQU VMTMRINT EQU X'08' X'04' X'01' ~.!1§ !~g~!.!!l~g VMTIDLE VMTPAGE EQU BQU !2! ~1§!~.!!! VMTON VMRON VMTIONT BQU VMSTMPI Virtual timer running Virtual real timer running Virtual processor timer in real processor ti.er Virtual interval timer request queued Virtual processor timer request queued Interrupt from processor real timer pending !MBLQ~ Processor timer contains idle wait state time Processor timer contains systell Fage wait time Processor timer contains I/O wait state time IBM VM/370 Data Areas and Control Block Logic VMBLeK Hexadecimal tisplacement 63 Field Name VMPEND Field Description, Contents, Meaning DS ~i!.§ g~!1!!~£ VMDEFSTK VMPERPND VMPRGPND VMSVCPND VMPGPND VMIOPND VMEXTPND 64 68 EQU EQU EQU EQU EQU EQU EQU VMLOCKER DS VMFSTAT DS ~.!!§ £~!.!lt~£ 69 VMFBMX VMFAUTO VMFVTMR VMNPiDCL EQU EQU EQU EQU VMMLVL2 DS 1X V*16 Interrupt pending summary flag in VMPEND =-x·~rO'-- Deferred task wait fer system lock Virtual PER interrupt pending Virtual program interrupt deferred Virtual SVC interrupt deferred Virtual pseudo page fault pending Virtual I/O interrupt pending Virtual external interrupt pending X'40' X'20' X'10' X'08' X'02' X'01' 1F 1X V*19 Ease address of holder of VMLCCK Virtual machine feature status in VMFST1T --X'80'--- Virtual block multiplexer channels Autcpcll handshake option in use User requested virtual timer assist enabled Virtual machine requests password suppression X'40' X'20' X'04' 1X V*20 Additional message handling information Receiving all informational messages 1H 1F 1D 1D 1D 1D I/O interruFt pending flags Virtual timer value - X'50' Virtual processor time used Time remaining in queue 1 and/or queue 2 Total time while in supervisor state VMTTIME value at entry to queue VMTSOUTQ EQU VMTMINQ Supervisor time allowed (redefine label) 90 98 VMTODINQ DS VMINST DS 1D 3H 9E 9F AO A4 A8 BO FO 110 118 120 128 12C 130 132 VMUPRIOR DS VMPSiDCT DS VltTREXT DS VMADSTOP DS VMPSi DS VMGPRS DS VMFPRS DS VMOSER DS VMACNT DS VMDIST DS VMPGREAD DS VMPGiRIT DS VMiCNT DS VMSEGDSP DS 1H 1X 1F 1D 16F 4D CL8 CL8 CL8 1F 1F 1H 1H 134 138 13C 140 144 148 150 152 154 156 158 15A 15C VMSTOR VMIOCNT VMPNCH VMLINS VMCRDS VMCOMND VMPDRUM VMPDISK VMPAGES VMPRGIL VMDEDCH VMQPRIOR VMiSPROJ 1F 1F 1F 1F 1F CL8 1H 1H 1H 1H 1H 1H 1H TOD clock time stamp at queue entry Virtual machine privileged er tracing instruction User priority from directory Invalid LINK password count Address of extended trace control block Address of address stop control block Virtual machine PSi Virtual machine general purFose registers Virtual machine floating-peint registers Virtual machine identification Virtual machine accounting number Virtual machine distribution code Total page reads Total page writes Page wait count Displacement of virtual machine SEGTABLE from start of tlock Permanent storage size (in bytes) Virtual SIO count for nonspooled I/O Virtual card count - spooled punch Virtual line count - spooled Frinter Virtual card count - spooled reader Last CP command executed Reserved for IBM use Reserved for IBM use Number of real pages currently resident ILC for latest program interrupt Mask for dedicated channel priority in dispatching queue Projected working set size 6A 6C 70 78 80 88 VMIOINT VMTI!!ER VMVTIME VMTMOUTQ VMTTIME VMTMINQ DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS iF V*17 V*18 Section 1. CP tata Areas and Contrel Blocks 125 VMBLOK Hexadecimal Displacement Field Name Field Descriptien, Contents, Meaning 15E 160 164 168 16C 170 VMS TEALS VMTIMEON VMTRQBLK VMACOUNT VMRDINQ VMPGRINQ DS DS DS DS DS DS lH lF lF IF IF IF 174 178 17C VMEPRIOR DS VMSTKO DS VMMICRO DS IF IF IF 17C VMMCR6 ORG DS Number of waits for stolen pages Logon time -- TOD clock word 0 Address of TRQBLOK for real timer Address of user ACCTELOK Page read tetal (VMPGREAD) at queue entry Sum ef virtual machine pages count at each page read Eligible list priority Conscle function output stack peinter Virtual machine assist - real central R6 VMMICRO Cant reI register 6 - hardware flag byte 11 ~i!§ g~!i~~g 17D lao- 184 188 18C 190 194 196 198 199 VMMFE VMMPROB VMMNOSK in VMMCR6 EQU --X'80'-EQU X'40' EQU X'20' VMM360 EQU X'10' VMMSVC VMMSHADT VMMCPAST VMMVTMR EQU EQU EQU EQU X'08' X'04' X'02' X'Ol' VMMADDR DS 3X Contrel register 6 - address ef virtual machine's pointer list (~ICELOK) V!t-F-FUNC DS 'tF VMPXINT VMDELAY VMRPRIOR VMPGPNT VMNDCNT VMSHRSYS VMRESC VMCXSTAT DS DS DS DS DS DS DS DS 1F 1F IF 1F 1H lH 1X lX -table Extended external interrupt stack pOinter TRQELOK for delayed SLEEP cr LOGOFF Run list dispatching priority Peinter to list of pages in PGBLOK Nondeferred page read count Number of shared named ~ystems Remote display line count VMCF status byte Virtual machine assist feature enabled Virtual machine in problem state Virtual machine assist dOes not handle SSK, or ISK S/360 operations only; no EC mode operations allowed Virtual machine assist does net handle SVCs Shadew tatles present (EC mode and translate) CP assist feature enabled Virtual interval timer assist feature enabled ~Fn-nfu-n-ct len V*21 V*22 ~i!§ g~!!~~g in VMCXSTAT VMBCAUTH EQU --X'80'---VMIOLOG EQU X'20' 19A VMCF active I/O logout mask bit from control register 14. Referenced through VMVCRI4 .• VMVCRl4 EQU VMCXSTAT V*22 Contains I/O logout mask bit from control register 14 (for both EC and BC mode). During EC mode, control register 14 data is alsc kept in the ECBLOK. VMAFF DS lX Affinity request field V*26 ~!!§ g~!!~~g 19B 19C lAO lA4 lA7 lA8 lAC lBO lB4 126 VMAFFON VMAFFAD in VMAFF EQU -X'40'-DS OBL6 VMLSTPRC VMASSIST VMCPNT VMCPUID VMNOECPS VMLOCK VMDFTPNT VMUSERl VMUSER2 DS DS DS DS DS DS DS DS DS lX IF 1F Affinity set on Precessor aadress V*27 31 lX 1F IF IF IF V*25 Last processor executed in problem state Pointer to list of VMAELOKs VMCELOK anchor Processor identificatien number in binary Reserved for IBM use Lock word fer compare and swap locking Deferred task pointer Reserved for installation use Reserved for installation use IBM VM/370 Data Areas and Central Block Logic VMBLCK Hexadecimal Displacement Field Name Field Description, Contents, Meaning 1F 1F 1F 1B8 1BC 1CO 1C4 1C8 1CA 1CB 1CC 1CE 1DO 1D4 1D5 1D6 VMUSER3 VMUSER4 VMUHS VMPCKP VMXPG VMQ2CNT VMQ3CNT VMSTKCNT VMPRRCT VMSiPMIG VMFVRF VMCRTO VMSHRPRC DS DS DS DS DS DS DS DS DS DS DS DS DS 1D7 Vl'lGRFTAB VMCPTIME VMAPTIME VMACTDEV DS DS DS DS VMFLPAG DS 1D 1D 1H lH VMSPMFLG DS 11 1D8 1EO 1E8 lEA 1EC 1ED 1EE 1FO 1F4 1F5 1F 1H 1X 1X 1H 1H 1F 1X 1X 1X C*3 C*4 V*28 11 V*29 C*1 C*2 V*30 Reserved for installation use Reserved for installation use Recent history of user processor utilization User page read checkpoint Maximum virtual machine pages count in-queue Consecutive queue 2 count Count of consecutive Q2s allowed Count of stacked ICB plus CPEXBICKs Processor related stacked CPEXBICKs Pointer to pseudo page table SET FAVORED percentage for user COMPUTE/ELAPSED ratio Processor (main or attached) wbose shared segments were last used GRAF virtual console logical tab Main processor supervisor time Attached processor supervisor time Virtual device address for last virtual SIC Count of nonshared flushed pages VMCF special message flag §it§ g~!!y~g in VMSPMFLG VMSPMON EQU --X'40'---VMSMSGON EQU X'20' Receiving special messages processing special messages RESERVED VMCONLN VMCONBUF VMPSWDCA RESERVED DS DS DS DS DS 1X 1H 3X Reserved for IBM use Bytes left in response buffer Virtual address of response buffer Invalid AUTCLOG password ceunt Reserved for IBM use VMBSIZE EQU (*-VMBLOK) /8 VMELOK size in doutlewords (X'38') 1F 1X V*31 Section 1. CP Lata Areas and Contrel Blocks 127 VMCBlOR VMCBlOK contains data transfer and status information used by the Virtual Machine Communicaticn Facility (VMCF). The VMCPNT field of the VMBLOK points to VMCELOK. 0 V*1 VMCFUNC I V*2 VMCUSER 8 10 VMCVADA VMCLENA 18 VMCVADE VMCLENB VMCUSE 20 VMCFPNT 28 I V*3 Hexadecimal ~isplacement I V*4 I V*5 I/V*6// VMCTOD 30 o VMCIHD Field Name VMCSTAT I I Field Description, Contents, Meaning DS 1X V*1 VMCElOK user status ~1!§ g~!1~~Q 1 2 4 8 10 14 18 1C 20 28 2C 2D VMCRESP VMCRJCT VKCPRTY in VMCSTAT EQU --X'80'--EQU X'40' EQ-U . X:' 2'()' . VMCEFlG VMCFUNC VMCMID VMCUSER VMCVADA VMClENA VMCVADB VMClENB VMCUSE VMCFPNT VMCKEY VMCCSTAT DS DS DS DS DS DS DS DS DS DS DS DS 1X 1H 1F 1D 1F 1F 1F 1F 1D 1F 1X 1X Final response interrupt Message rejected pri.c.ri tym.essag.e V*2 V*3 V*4 Data transfer return code Subfunction code Message identifier Source and/or sink userid (VMUSER) Vaddr of message buffer Length of message Vaddr of reFly buffer (SENI/RECV only) Length of reply buffer (SENt/BECV only) User-supplied dcubleword Address of next VMCBLOK User PSi key VMCElOR control status ~1!§ g~!1D~g in VMCCSTAT VMCCXINT EQU --X'80'---VMCCRECP EQU X'40' VMCCBUSY EQU X'20' 2E VMCASTAT DS 1X External interrupt VMCELOK TranEacticn processed VMCELOK busy V*5 ~1!§ g~!1D~Q in VMCASTAT VMCAAUTS EQU --X'80'---VMCAPRTY EQU X'40' VMCAQIES EQU X'20' 2F 30 V-MCRSB1 VMCTOD DS DS VMCBSIZE EQU R~g~!1D1!igD VMCACNT 128 EQU 1X 1D Authcrized specific Authcrized Friority User is quiescent V*6 (*-VMCBlOR)/8 !g! VMCELOR authorization status Reserved for IBM use TOD at authcrization and/or build operation VMCELCK size in doublewords ~g§!~! !~~~1Q! VMCFUNC Active message count IBM VM/370 Data Ar.eas and Control Block Logic VMCMHDH VMCMHDR provides information to identify the sFecial VMeF external interrupts. o V*1 VMCMFUNC I V*2 VMCMEID VMCMUSER 8 10 VMCMVADA VMCI1LENA 18 VHCMVADB VMC~LENE 20 VMCMUSE 28 VMCMBUF (Optional Message Euffer) Hexadecimal tisplacement o Field Name Field Description, Contents, Meaning VMCMSTAT DS 1X V*1 Message status tyte ~i!§ g~!i~~g in VMCMSTAT VMCMRESP EQU --X'80'---VMCMRJCT EQU X'40' VMCMPRTY EQU X'20' 1 2 4 8 10 14 18 1C '1n £v 28 VMCMEFLG DS VMCMFUNC DS VMC~MID DS VMCMUSER DS VMCMVADA DS VMCMLENA DS VMCMVADB DS VMCMLENB DS VMCMUSE DS VMCMBUF DS ox Data transfer return code subfunct~on c?d; (original request) Message 1dent1f1er Source and/or sink userid (VMUSER) Virtual buffer address Message length Virtual reply buffer address Reply buffer length USer supplied doubleword Opticnal SENDX data tuffer VMCMLEN (*-VMCMHDR) VMCMEDR size in bytes EQU 1X 1H 1F 1D 1F 1F 1F 1F Final response interrupt Message rejected pricrity message V*2 11'\ • .u Section 1. CP rata Areas and Centrol Blocks 129 VMCPARM VMCPARM contains the user-supplied parameters when a VMCF Register 1 in the Diagnose instruction points to VHCPAR!!. o V*1 I/V*2//1 VMCPUSER 10 VMCPVADA VHCPLENA 18 VMCPVADE Vf!CPLENE Hexadecimal Displacement o executed. VMCPMID VMCPFUNC 8 20 subfuncticn is VMCPUSE L - -______.____________________________________________.____ Field Name VMCPFLG1 ~ Field Description. Contents, Meaning DS 1X V*1 V.HCPARM flag byte Bits defined in VMCPFLG1 VKCPAUTS--EQU--X'SO'---1 2 VMCPPRTY VMCPSMSG EQU EQU X'40' X'20' VMCPFLG2 VMCPFUNC DS DS 1X 1H Authcrize specific request Priority message Receiving special messages V*2 Reserved for IBM use Sub function code Bits defined in VMCPFUNC VKCPRJCT--EQU--X'OOO~ VMCPIDEN VMCPRESM VMCQUIE VMCPREPL VMCPCANC VMCPRECV VMCPSENX VMCPSENR VMCPSEND VMCPUAUT VMCPAUTH EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU X'OOOA' X'0009' X'0008' X'0007' X'0006' X'OOOS' X'0004' X'0003' X'0002' X'0001' X'OOOO' 10 14 18 VMCPMID VMCPUSER VMCPVADA V.HCPLENA VMCPVADB DS DS DS DS DS 1F 1D 1F 1F 1F 1C 20 VMCPLENB VMCPUSE DS DS 1F 1D 4 8 VMCPLEN 130 EQU (*-VMCPARM) REJECT IDENTIFY RESU!!F QUIESCE REPLY CANCEL RECEIVE SENDI SENt/RECEIVE SENt UNA U'IHORIZE AUTHCRIZE Message identifier Target userid Virtual address of message buffer Length of message Virtual address of reply buffer (SEND/RECEIVE only) Length of reply buffer (SENt/RECEIVE only) User supplied doubleword Length of VMCPARM (bytes) IBM VM/370 Data Areas and Centrol Block Legic VRRBLCK VRRBLOK is linked to the VDEVBLOK and contains VDEVRRB field of the VDEVBLOK Foints to VRRBLOK. o usage. The r--------------------------------------------------------, VRRAtD I V*1 I/V*2/ I VRBCPEX I -----------1 8 Hexadecimal tisplacement informaticn about minidisk VRRUSER 1//////////VRRRSV2//////////1 Field Name Field Descripticn, Contents, !eaning -----------0 2 VRRADD VRRSTAT DS DS iH 1X V*1 Minidisk is reserved 2 8 VRRRSV1 VRRCPEX VRRUSER C VRRRSV2 3 4 Reserved virtual device address Virtual RESERVE/RELEASE status flags VRRSIZE DS 1X 1F DS 1F DS reserved DS 1F EQU V*2 (*-VRRBLOK)/8 Reserved for IBM use Queued request for the minidisk V!ELCK of the user who has the minidisk Reserved for IBM use Size in doutlewords (X'02') Secticn 1. CP Bata Areas and Control Blocks 131 VSPLCTL VSPLCTL is linked to the VDEVBLOK and contains information for VtEVSPL field of the VDEVBLOK points to VSPLCTL. o VSPCAW VSFDPAGE 8 VSPVPAGE VSFRECNO 10 VSPNEXT VSPIDACT 20 Hexadecimal Displacement o 4 8 C 10 12 14 18 20 24 28 29 2C VSFSFBLK VSPBUFBK VSFMISC VSPIDAL V*1 I VSFIDAW2 Field Name VSPCAW VSPDPAGE VSPVPAGE VSPRECNO VSPNEXT VSPIDACT VSPSFBLK VSPCCW VSPBUFBK VSPMISC VSPIDASW VSPIDAL VSPIDAW2 Field Description, Contents, Meaning DS DS DS DS DS DS DS DS DS DS DS DS DS VSPSIZE EQU VSPBUFSZ EQU 132 The VSPCCW 18 28 opened spool files. 1F 1F 1F 1F 1H 1H 1F 1D 1F 1F 1X 3X 1F V*1 (*-VSPLCTL) 18 (200) 18 Virtual address of user CCW tASt locaticn (DCHR) of current page buffer Virtual address of page buffer Reccrds remaining in current buffer Displacement in buffer of next record start Data byte count of in~irect data address ccw Pointer to SFBLCK for file Current user CCW Address of a buffer area Use varies according to caller Indirect data address work flag Address of indirect data list Contains IDAW2 Size in doutlewords (X'06') Size in doutlewords (X'19') IBM VM/310 Data Areas and Control Block Logic VSPXBLOK VSPXBLOK serves as an extension to the virtual spool control block (VSPLCTL). It contains the user named destination of the file as well as RSCS tag information used by the Remote Spooling Communications Subsystem. o I V*1 I V*2 I V*3 I V*4 I/////////VSPISPAR////////////I 8 VSPXDIST 10 VSPXXUSR 18 VSPXCHAR VSPXFCB 20 VSPXCl!lOD VSPIOVLY 28 Hexadecimal Displacement o 1 2 3 VSPXTAG Field Name VSPILEN VSPXTGLN VSPXFLSH VSPXFLG1 Field Description, Contents, l!leaning DS DS DS DS 11 11 11 1X V*1 V*2 V*3 V*4 VSPXELOK length (doublewords) VSPITAG data length (bytes) 3800 flash count 3800 flag byte If this D1~ 1S set, mu~t1ple copies can be sent in one transmission 10 VSPXSPAR DS VSPXDIST DS VSPXXUSR DS XL4 CL8 CL8 18 1C 20 24 VSPXCHAR VSPXFCB VSPICl!lOD VSPIOVLY CL4 CL4 CL4 CL4 4 8 DS DS DS DS Reserved for IBl!l use Virtual device distribution code Virtual machine user to whom the file transferred 3800 character arrangement table 3800 forms control buffer 3800 copy modification Name of flash overlay to be used is (*-VSPIBLOK)/8 VSPXBLOK header in doublewords 28 VSPXTAG DS VSPXSIZ2 EQU CL136 Tag application data area (*-VSPXBLOK)/8 VSPIBLOK size in doublewords Section 1. CP Data Areas and Control Blocks 133 XINTELOK XINTELOK saves the various types of external interrupts that are presented to the virtual machine. If multiple external interrupt conditions are simultaneously [resented, as indicated by values presented in the block, code exists for handling the interruFts in their defined hierarchical order. The VMPXINT field of the VMBLeK points to XINTBLOK. o 8 Hexadecimal tisplacement -----------0 4 6 8 A C XINTNEXT XINTCODE I XINTMASK Field Nalle XINTNEIT XINTSORT XINTCPUA XINTCODE IINTMASK XINTPARM I lINTCPUA XINTFARM Field Description, Contents, Meaning DS DS DS DS DS DS XINTSIZE EQU 134 XIN~SORT 1F 1H 1H 1H 1H 1F Address of next external interruFt block Left half of interrupt collating key Right half of interrupt collating key External interrupt code Control register 0 mask (bits 16-31) External interrupt parameter word (*-XINTBLOK)/8 XINTELOK size in douklewords (X'02') IEM VM/370 Data Areas and Control Block Logic XOBR3211 XOBR3211 is aFpended to the IOERBLOK to contain sense data and other data associated with I/O errors and error recovery for devices that generate more than 24 bytes of sense information. 50 XOBRCCW1 58 XOBRCCW2 60 XOBRCCW3 68 XOBRCCW4 70 XOERIUS2 XOBRMIS1 X*1 I X*2 I 78 XOBR512 278 XOBR180 XOBR010 330 r 1/////////////////XCERVS1///////////////// .J Hexadecimal tisplacement -----------50 58 60 68 70 Field Name Field Descriptien, Centents, Meaning XOBRCCW1 DS XOERCCW2 DS XOBRCCi3 DS XOBRCCW4 DS XOBRFLAG DS 1D 1D 1D 1D 1X -------------------------------------- X*1 ~!1§ Q~t!!!~Q in XOERFLAG XOBRT1 XOERT2 XOBRT3 71 EQU --X'80'--EQU X'40' EQU X'20' XOBRSTAT DS 1X Bits defined in XOBRSTAT XOBBRT1--EQU --X'80'---XOBRRT2 EQU X'40' XOBRRT3 EQU X'20' XOBRRT4 EQU X'10' XOBRRT5 EQU X'08' XOBRRT6 EQU X'04' XOERRT7 EQU X'02' XOERRT8 EQU X'01' CCW used used CCW used CCW used Outbeard cei to read OBR information to read OER information to read OEB infcr:ation to read OBR information recording flag byte T1 Euffer type information Fresent T2 Euffer type inforllation present T3 Euffer type information present X*2 Outbeard recording status tyte Perferm Perferm Perform Perferm Perferm Perferm Perferm Perferm routine routine routine routine routine routine routine routine 1 2 3 4 5 6 7 8 in in in in in in in in error error error error error error error error module module module module module module module module Secticn 1. CP rata Areas and Contrcl Blocks 135 XOBR3211 Hexadeciaal Displacellent ------------ Field Balle Field Description, Contents, Meaning 72 74 78 278 330 331 XOBRMIS1 XOBRMIS2 XOBR512 XOBR180 XOBR010 XOERSV1 DS DS DS DS DS DS 1H 1F CLS12 CL184 CL10 CL6 Used cy the error routine Used cy the errcr routine Space for USCB data Space for FCB data Space for first ten error characters Reserved for IBM use 278 XOBR150 ORG DS XOBR180 CL150 Redefinition for PLB check Space for PLB check data XOBRSIZE EQU XOBREXT EQU 136 IB~ V~/370 (*-IOERBLOK) /8 Size of IOER and XOBR in dcublewords (X'67') (*-XOBRCCW 1) /8 Size of XOBR3211 in double words (X'SE') Data Areas and Control Block Logic Section 2. CMS Data Areas and Control Blocks This section contains CMS data areas and control blocks. relationships between the control blocks and data areas of CMS. Figure 2 shows the Section 2. CMS tata Areas and Central Blocks 137 DMSNUC Free Storage - - - - - - - CMSCB DECB FREELIST I CMSAVE I EJ MAINLIST TXTDIRL MACDIR PRECMND LASTCMND Legend: The projection of SYSREF is a sampling of areas within NUCON. NUCON (See Legend) SYSNAME INSTALID SYSTEMID Figure 2. CMS Control Block Relationships AETAE AETAE contains one 8-byte entry for the background partition. Bytes 0-3 contain the address of the entry point of the user's abnormal terminatien routine. Eytes 4-7 centain the address of a 72-byte save area used by the supervisor to store the interrupt status information and the contents of the general registers. The IJBABTAE field in the SYSCCM tlock in the DOSCON CSECT of NUCON points to the ABTAE tlock. o Hexadecimal Displacement -----------0 4 138 r-----------------------------------------.----------------, AESAVE ABROUT I Pield Nalle Pield Description, Contents, Meaning ABROUT ABSAVE DC DC P'O' P'O' Address of user termination routine Address of supervisor save area ABTAB EQU *-8 Abend option tatle IBM VMj370 Data Areas and Central Block Logic AEWSECT AEWSECT describes the fields used for saving registers and other data during abend' recovery. V-constants in D!SABN, DMSDEG, D!SFRE, D!SITI, DMSITP, and tMSITS point to the AEWSECT block. ABWSECT is defined in module DMSAEW. 0 ABNREGS AENPSW 40 48 ABNRR II,.. "t~ ABNPAS13 90 Hexadecimal tisplacement o 40 48 4C 94 4C Field Name Field Description, Ccntents, Meaning ABNREGS ABNPSW ABNRR ABNPAS13 §£g~ !2f DS DS DS DS 16F D F 18F Registers at time of abend PSi at time of abend Tempcrary save area Area passed to nucleus rcutines ~~§!SS g1I§~ ORG ABNERLST DS ABNPAS13 471 Secticn 2. CMS tata Areas and Control Blocks 139 AI:TSECT ArTSECT describes the attributes of virtual disks (A-G, S, Y, Z) accessed by a virtual machine via the ACCESS command. Space is allocated for the ADT when DMSNUC is assembled. In the ADT, certain fields are defined for use ty both CMS and OS. Fer example, ADTBECT field at displacement 1C (hexadecimal) into AIT5ECT is also defined as eSADTVTl for use by OS simulation routines. lDTSECT is invoked by the ArT macro. 0 6 1*1 8 ADTPTR lDTDTA 10 ADTFDA ADTMFDN 18 ADTMFDA lDTBECT 20 ADTFSTC ADTCBEA 28 ADTCFST lDT1ST 30 ADTNUM lDTUSEI 38 ADTLEFT lDTLAST 40 ADTCYL 48 ADTMSK ADTQQM 50 ADTPQM1 ADTPQM2 58 ADTPQM3 ADTLBBA 60 ADTLFST 68 ADTXNREC Hexadecimal Iisplacement o ADTID A*3 AtTNACW ADTID ADTFLG3 A*5 I A*6 ADTRES ADTXAREC Field Name !§~deg 1*4 A*2 Field Description, Contents, Meaning !2f ~~gg-Q~lY DS CL6 DS 1X ~!§!§ g~g ReggLWr!!~ A*1 Dis!§ Disk identifier (label) Third flag tyte Bits defined in ADTFLG3 iDTFUiiD'-EQU --X'80'--ADTFXCBN ADTFRWOS ADTFSORT ADTFORCE ADTFNOAB EQU EQU EQU EQU EQU X'40' X'20' X'10' X'08' X'04' 10 14 ADTFTYP ADTPTR ADTDTA ADTFDA ADTN DS DS DS DS DS 1X 1A 1A 1A 1F 18 1C 1C ADTMFDA DS OSADTVTA DS ADTBECT DS 1A OF 1F 7 8 C 140 First half of DMSAUD has been called Extra chain link(s) to be returned Read/write CS or Des disk All FST hyperblocks and FST entries sorted CMS/reS/os disk forced to a read-only For rMSAUI routine: Do not abend if it is a disk error A*2 Filetype flag byte Pointer to next ADT tlock in chain Device tatle address in NUCCN File directory (PSTAT) address Number of doublewords in master file directory Master file directory address VTOC address of OS pack FST byperblock count IEM VM/370 Data Areas and Centrol Block Logic ADTSECT Hexadecimal Displacement ------------ Field Name Field Description, Contents, 20 24 24 28 28 2C ADTFSTC OSADTFST ADTCHBA OSADTVTB ADTCFST ADT1ST DS DS DS DS DS DS 1F OF 1A OF 1F 1F 30 30 34 34 38 3C 40 44 45 46 OSADTDSK ADTNUM OSADTSV1 ADTUSED ADTLEFT ADTLAST ADTCYL DS DS DS DS DS DS DS ADT!! DS ADTMX ADTFLG1 DS DS OF 1F OF 1F 1F 1F 1F 1C 1C 1X A*3 A*4 A*5 ~:!!§ Q~!:!1!~Q in ADTFLG1 47 ADTFSF ADTFRO ADTFRW ADTFFSTF ADTFFSTV ADTFQQF ADTROX ADTFMIN EQU --X'8'O'-EQU X'40' EQU X'20' EQU X'10' EQU X'08' EQU X'04' EQU X'02' EQU X'01' AFTFLG2 DS 1X ~eaning Number of FST 40-byte entries (files) Address of first OS FST Pointer to current.FST hyperblock Upper VTOC address of OS pack Displacement of current FSi entry Displacement of first word in bit mask with "hole" OS disk address (cuu) Number of records (NUMTRKS) Save area Number of records in use (~TUSEDP) Number of records left (QTLEFTP) Displacement of last nonzero byte in bit mask Number of cylinders cn disk (NUMCYLP) Mode letter (A;B;C; ...... ;S;Y;Z) Extension-of-mode letter (A,E,C, ••• ,S,Y,Z) First flag tyte ADT tlock in free storage CMS read-only disk (attached and ready) CMS read/write disk (attached and ready) First FST hypertlock is in free storage FST hypertlocks are of varying lengths 200-tyte QQ~SK is in free storage This disk has read-only extension(s) ADT tlock is minimum size A*6 Secend flag byte ~:!!§ Q~!:!1!~Q in ADTFLG2 ADTPSTM ADTFROS ADTFDOS MFD is in storage EQU --X'8'O'--EQU X'40' All filenames are in storage li20; All filetypes are in storage EQU EQU X'10' Modes 1 through 5 are in storage EQU ADTFMDRO.X'08' All medes (0 through 5) are in storage EQU ADTFMFD+ADTFALNM+AriFALTY+ADTFALMD All UFD is in storage EQU X'02' ADT fSTAT chain modified Xi 04 i EQU Indicates this is an U~ Q1sk EQU Indicates this is a DOS disk X'01' ADT2ND DS ADTFMFD ADTFALNM ADTFALTY ADTFMDRO ADTFALMD ADTFALUF 48 !!g~deQ !Q! OD !!~~QL!!:!te 48 4C 50 ADTMSK ADTQQM ADTPQM1 54 ADTPQM2 DS 1F 58 5C 60 ADTPQM3 ADTLHBA ADTLFST DS DS DS 1F 1A 1F 64 66 ADTNACW ADTRES DS 1H 1H !!Q!~ 68 DS DS DS rs 1A 1A 1F Di§!§ 800-tyte (P~MSK) bit-mask address 200-tyte (P~QMSK) bit-mask address PQMSIZ equals number of bytes in PQMSK is greater than 215 PQMDUM equals number of 80C-byte records for PQ"SK RONU~ equals number of doublewords in PQMSK Pointer to last FST hyperblock (see Note) Displacment of last FST in last hyperbleck (see Note) Number of active write files -- halfword Reserve count (RESRVCNT) -- halfword Applies to all CMS disks except fer the S-disk. ADTXNREC DS 1F Number of doublewords of extra chain link records Section ~. eMS rata Areas and Contrel Blocks 141 ADTSECT Hexadecimal Displacement 6C Field Name Field Description, Contents, eeaning 1F ADTLBM ADTLDM EQU EQU ADT2ND-ADTSECT Length of minimum ADT block (in bytes) ADTLBM/8 Length of minimum ADT blcck in dcublevords ADTLB ADTLD EQU EQU *-ADTSECT (ADTLB+7)/8 Q!her Parameters ADTRL ---EQU---aoo ADTMIBML EQU 10 ~Q£ON Q~!!f~ DTAD DTADT DTAS 142 Address of tlock of extra chain link records ADTIAREC DS EQU EQU EQU Table --0-3 4 Length of full ADT block (in bytes) Length of full ADT block in dcublevords Lcgieal reccrd length Maximum bit map length (number ef records) for 3330 Q!§E1gf~~~!§ Device number Device type byte 5ymbelic device name IBM VMj370 Data Areas and Central Block Logic AFTSECT AFTSECT is used te describe a file currently open for a read or write. The AFT is created when a file is opened. Space fer up to five AFTs is availatle in tMSNUC; any others must reside in free storage. AFTSECT is invoked via the AFT macro. o 8 r--------------------------------------------------------, AFTCLD AFTCLN AFTCLA AFTDBD AFTDBN 10 60 AFTCLB AFTFCLA A*2 80 AFTT AFTD AFTIC AFTIL AO AFTADT Hexadecimal Displacement ------------ AFTID AF'I'FCLX AFTCLDX AFTiP AFTM 98 AFTIN 1/////////////////////////// AFTN 90 0 2 4 8 A C 10 AFTOCLDX 1/////1 78 88 0 0 A4 A8 14C 150 1F4 1F8 29C 2AO 344 348 AFTPFST A*1 68 70 AFTDBA AFTRP AFTFCL AFTtEC A*3 A*4 AFTYR AFTPTR Field Name Field Description, Contents, ~eaning !f1i!~ Xile !~bl~ 12!gf~ AFT START DS OD DC 41F'0' DC A (*+4) DC 41F'0' DC A (*+4) DC 41F'0' DC A (*.4) DC 41F'0' DC A (*+4) DC 41F'0' DC A (0) DC 2F'0' !f1iv~ Xil~ !~Bl~ AFTCLD AFTCLN AFTCLA AFTDBD AFTDBN AFT DBA AFTCLB DS DS DS DS DS DS DS H H F H H F XL80 First AFT l:lock Second AFT l:lock Third AFT block Fourth AFT tlock Fifth AFT block Address of next AFT tlock (in free storage) Reserved for IBM use Disk address of current chain link Numter of current chain link Address of chain link buffer Disk address of current data block Number of current data block Address of current data tlcck Chain link tuffer frcm first chain link Section 2. C~S Data Areas and Contrel Blocks 143 lFTSECT Hexadecimal Displacement Field Name 60 AFTFLG Field Description, Contents, Meaning DS x A*1 ~.!!§ ~~!.!1l~~ in AFTFLG EQU --X'80'- AFTICF AFTFBA AFTDBF AFTWRT AFTRD AFTFULD EQU EQU EQU EQU EQU EQU X'40' X'20' X'10' X'08' X'04' X'02' X'01' AFTPFST AFTIN lFTID AFTFCLA AFTFCLX AFTCLDX AFTFLG2 DS DS DS DS DS DS DS 1FT USED 61 64 66 68 6C 6E 70 Active file table l::lock in use Reserved for IMB use First chain link in storage Full l::uffer assigned Data block in storage Active write Active read Full disk special case 3X H H F H H X A*2 ~.!!§ ~~!.!1l~~ in AFTFLG2 AFT NEW AFTOLDCL AFTCLX SA!UEN 71 72 74 78 78 80 88 8C 8E 90 92 94 96 97 98 9C 9E AO A4 EQU EQU EQU EQU DS AFTOCLDX DS DS --X'80'--- Pointer to (static) FST entry Current item number Displacement of current item in data block Address of first chain link Disk address of swapped FCl Disk address of swapped chain link Seccnd flag byte New file Current chain link existed previously Alternate chain link assigned/implied Force same length update X'40' X'20' X'01' 1X 1H Reserved for IBM use Old value (if any) of AFTCLDX Reserved for IBM use F f9EI 9! f§I AFTFST AFTN AFTT AFTD AFTWP AFTRP AFTM lFTIC AFTFCL AFTFV AFTFB AFTIL AFTDBC AFTYR AFTADT AFTPTR DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS ~.!! ~~!.!!!~g lFTFSF A8 AFTLB AFTLD 144 Flag l::yte D D F H H H H H C X F H H F F in AFTPTR A*3 A*4 Filename Filetype Date/time last written Write pointer (item no.) Read pointer (item no.) File.ode Item count First chain link Fixed (F)/varial::le(V) flag FST flag byte (Maximum) item length 800-l::yte data block count Year Pointer to active disk table Pointer to next AFT l::lock in chain X'40'- Indicates in free storage DS OD End cf DSECT EQU EQU *-AFTSECT AFTLB/8 Length of AFT block in bytes Length of AFT block in doul::lewords EQU IBM VM/370 Data Areas and Control Block Logic ANCHSECT This DSECT is used by DMSDCS when a CDLOAD ANCHSECT defines the DOS/VS anchor table. (SVC 65) is issued, and the phase is not found in either the CMSVSAM or CMSAMS segment. In this case, the specified phase is loaded either from a CMS DOSLIB or a tOS core image library, and the name, load point, entry point, and the length in bytes, of the phase are saved in an available slot in the anchor table. ANCHSECT is invoked by the ANCHTAE macro,. 0 ANCHENDA 8 ANCHCBS , 11/11/1/1111/1111/1///1////11 ANCHOAL 10 ANCHPHNM 18 20 Hexadecimal tisplacement o 4 8 C 10 18 1C 20 ANCHLDPT A*1 ANCHENTP ANCHPHLN Pield Name ANCHENDA DC DC ANCHCBS DC lNCHOAL DC Pield Description, Contents, Meaning A (0) P'O' A (0) A (0) End address of anchor table Reserved for IBM use Pointer to VSAM AMCB table Pointer to VSAM OAL (OPEN ACE) table, which is followed by one or more Anchor Tatle entries Fermat !l!fhof ~~~1~ Entries ana Their ---ANCHPHNM DC --CL8'-'--Phase name ANCHLDPT DC Load point A (0) ANCHENTP DC Entry point A (0) ANCHSTSW DC A*1 Status switc!i X'OO' BJ:!§ ~~~J:!!§g in ANCBSTSW ANCHMLOD EQU --X'OO'---ANCHINST EQU X'7F' ANCHRPJL EQU X'PP' 21 I I I I I I ANCHLENG EQU ANCHSIZ EQU 20 1024 Phase must te loaded Phase is already in storage Requested phase just loaded ty another task (only if AP=YES) Length of one anchor table entry Default size of anchor table (in bytes) ANCHPHLN DC AL3 (0) Length of phase in bytes Section 2. CMS Lata Areas and Control Blocks 145 EATLSECT 146 BBOX EATLSECT describes the fields in the user job limits AEATLIMT field in NUCON points to BATLSECT. a BATCPUL BATCPUC 8 BATPUNL BATPUNC Hexadecimal Displacement Field Nalle BATCPUL DC H'32767' 2 4 6 BATCPUC BATPRTL BATPRTC BATPUNL BATPUNC DC DC DC DC DC H'O' H'32767' H'O' H'32767' H'O' fEOX contains the begin and respectively. The IJBBOX field to the BBOX block. a 8 Hexadecimal Displacement 0 4 8 C The BATPRTC Virtual processor limit (in seconds) ; can be reset Current processor count; de not reset Number printed lines limit; can be reset Current line count; do not reset Number punched cards limit; can be reset Current card count; do not reset end addresses of the virtual and real partitions, in the SISCOM tlock in the DOSCCN CSECT of NUCON points ~---------------------------------------------------------, REALORP REALNDP 1 , -------------------------------------------------------------1 VIRTENDF VIRTORP Field Name REALORP REALNDP VIRTORP VIRTENDP ~gyat~§ ALTSDAR MINREALP MPGEPOOL ORIGVIRT FINVIRT 146 jobs. Field Description, Contents, Meaning a A CMS batch -------------------------------------- ------------ 8 BA'IPRTL table for Field Description, Contents, Meaning DS DS DS DS XL4 XL4 XL4 XL4 f£I !!~1g§ EQU EQU EQU EQU EQU Origin End of Origin End cf !Q ~~Q! REALORP REALNDP REALNDP+2 VIRTORP VIRTENDP of real partition real partition +1 of virtual partition virtual partition +1 Address of alternate area No. Fage frames in minimum real partition No. Fage frames in main page Fool Origin of virtual storage End cf virtual storage +1 IEM VM/370 Data Areas and Control Block Lcgic BGCOM BGCOM simulates the DOS/VS Partition Communicaticn Region (BGCOM).. NUCON points to the BGCOM block. 0 8 PPBEG EOSSP I UPSI 18 COMNAME 20 PPEND 28 HIPROG 30 EOCADR A*5 HIPHAS LAELEN A*1 A*6 A*7 48 FICLPT NICLPT LUEFT 58 LIOCSCOM 60 DIBPT 68 OCPT PIBPT 1//////////////1 PWTIMS JCBZCN PCP'IR ITPTR 1////////////1 SYSPAR 78 TODCOM PIE2PTR 80 IJLQTTAD BGCCMPT 88 COMEX PDTAEB A*10 A*11 A*12 I A*131 A*14 POVNAM Field Name UPSI COIBUME PPEND LTK JAPART PROCNAM (cont. from 8F) C 17 18 20 CHKF'IID 70 JOB DATE PPBEG EOSSP A*9 YYDtD 98 o TEBPT JIEFT MMDD I A*4 FCCLPT FAVPT 50 A*3 DALC PUBPT 90 8 A A*8 PIK A*2 40 Hexadecimal Displacement AEGCOM field in JOBDATE 10 38 The A*15 A*16 Field Description, Contents, Meaning DC DC DC DC DC DC DC C'OO/OO/OO' S (0) S (0) 11X'00' X'OO' CL8'CMS/DOS' A (0) Job date Supervisor end End ef storage protection User scratch area UPSI 1:yte Job name Highest storage address of partition Section 2. CMS rata Areas and Contrel Blocks 147 EGCOM Hexadecimal tisplacement 24 28 2C 2E 30 34 35 36 37 38 39 3A 3B 3C 3E 40 42 44 46 48 4A 4C 4E 4F 4F 53 58 5A 5C 5E 60 62 64 66 68 6A 6C 6E 70 74 78 7C 7E 80 84 86 87 88 8C 8D 8E 8F 97 98 9P 148 Field Name HIP HAS DC HIPROG DC LABLEN DC PIK DC EOCADR DC CON PIG DC LTACT DC SOB1 DC SOB2 DC JCSW1 DC JCSW2 DC JCSW3 DC JCSW4 DC DALC DC FOCLPT DC PUBPT DC PAiPT DC JIBPT DC TEBPT DC PICLPT DC NICLPT DC LUBPT DC SYSLINE DC SYSDATE DS MMDD DC YYDDD DC LIOCSCOM DC PIBPT DC CHKPTID DC JQBZONDC DIBPT DC DC PCPTR DC ITPTR DC DC OCPT DC PWTIMS DC LTK DC SYSPAR DC JAPART DC TODCOM DC PIB2PTR DC PDTABB DC IJLQTTAD DC BGCOMPT DC OPTNBYTE DC RMSROPEN DC COMEX DC STDOPT DC TEMOPT DC DISKCONF DC PROCNAM r:C r:C PSWTCH DC POiNAM DC INSIZE Field Description, Contents, Meaning A (0) A (0) H'O' 1'0010' A (0) B'11101000' B'00010000' B'11000100' B'11011010' B'11010000' B'OOOOOOOO' B'11000100' B'10000000' H'O' A*1 A*2 A*3 A*4 A*5 A*6 1*7 1*8 S (0) S (0) S (0) S (0) S (0) S (0) S (0) S (0) AL1(56) OCL9 XL4'00' XL5'OO' 2X'00' A*9 S (0) H'O' S (0) S (0) H'O' S (0) S (0) S (0) X'OOOC' H'O' S (0) P'O' P'O' A (0) S (0) S (0) A (0) S (0) X'OO' A*10 B'00000000'A*11 A (0) B'01000000'1*12 B'01000000'1*13 X'OO' 1*14 CL8' , X'O' A*15 CL 7' , X'O' A*16 End address of last phase loaded End address of longest phase leaded Length of problem program label area Program interrupt key End of virtual storage address Machine configuraticn byte System configuration byte Standard language translator options Standard supervisor options Job control byte Linkage control byte Nonstandard language translator options Job duration indicator byte Disk address of volume latel Address of POCL Address of PUB Address of PAVP Address of JIB Address of TEB Address of FICL Address of NICL Address of LUB SYSLST line count System date MfttI or DD~ft YYIID portion of date LICCS communication bytes Address of PIB Last checkpoint number Jol:z.one in minutes Eackground DIB pointer Reserved fer lEft use PC option table IT option table OC option table Key of program with IT support Reserved for lEft use Logical transient key Address of SYSFARft Address of job accounting table Address of TOD co.munications area Address of PIB extension Address of ftICR DTP table Address of QTA~ vector table Address of background COMREG Option indicator ryte System configuration byte 2 Pointer to SYSCOM option table Standard jeb control optien byte Temporary job control optien byte Disk configuration tyte Procedure name Interface tyte for catalog procedure Save area for statement name 81-tyte SYSIN indicator IEM VM/310 Data Areas and Control Block Logic CMSTAXE CMSTAXE defines the fields used in a Terminal Attention Exit Element (TAXE). The TAXE is used mainly by DMSCIT for processing attention interrupts. CMSTAXE is invoked via the TSOBLKS macro. The TAXEADDR field in NUCON points to C~STAXE. o r--------------------------------------------------------, TAXEEXIT TAXESPSi 8 TAXELNK TAXEIOL 10 TAXETSOF TAXERTNA 18 TAXEEXTS (Variable Length) TAXEIOiS 60 (Variable Length) 1-----------------------------------------------------TAXETAIE 88 I 1------------------------------------- 90 1///////////////////////////1 98 AO TAXEUSER 1-----------------------------------------------------------------TAIEIAD 1//TAIEMSGL//I/A*1/1////////1 1-------------------------------------------------------------------I TAIERSAV (Variable Length) Bexadeci.al tisplacement o Field Name Field Description, Contents, Meaning 1F TAXESPSW DS TAXEEXIT DS TAXESTAT DS A OX Left half PSi for ATTN return ATTN exit address Status of exit return TAXEFREQ EQU X'80' ATTN exit taken A 60 TAXELNK DS TAXEIOL DS TAXE TSOF DS TAXERTNA DS TAXEEXTS DS TAXEIOiS DS Next TAXE on queue Left half of I/O old PSi TSO flags saved here Return address ATTN exit routine save area DMSICW save area 8C 90 94 94 AI§g !!!~1!!!g1! TAXETAIE DS DS TAXEDEF DS TAXEUSER DS 4 8 8 C 10 14 18 1F 1F A 18F 11F Ex!! A 1F OX A ggf:~!~!~f: List Address of TAlE Reserved for IBM use Defer indicator User PLIST address Attention 11l!~f:£]E! ~1~~~1!! (I!11) Reserved for IBM use TAIEMSGL DS----2XTAIETGET DS 11 A*1 Reserved for IBM use DS 1X Reserved for IBM use Right half of I/O old PSi TAIEIAD DS A 16F Registers 0-15 of interrupted program TAIERSAV DS I~f:millg1 98 9A 9B 9C AO Section 2. CMS rata Areas and Centrol Blecks 149 CVTSECT CVTSECT simulates the as co •• unication Vector Table. macro. The ACMSCVT field in NUCON points to CMSCVT. o CVTSECT is invoked I CVTMDL 1////////////1 8 Not supported CVTDATE 40 Not supported 58 CVTEXIT CVTBRET Not supported 78 A*1 80 CVTR13 88 CVTNUCB Not supported AO CVTMZOO Not supported B8 CVTOPTA Not supported CVTUSEB Not supported 108 150 CVTAVIB IBM VM/370 Data Areas and Centrol Block Logic via the CMSCVT CVTSECT Hexadecimal Displacement o Field Name 2 CVTftDL 4 8 8 C5SCiT 40 44 50 54 58 5A 5C 7C 7D 80 84 88 8C AC BO BC BE CO C8 D4 D8 108 CVTDATE CVTEXIT CVTBRET CVTDCB CVTRi3 CVTNUCB CVTl!ZOO CVTOPTA CVTUSER CVTAVIB Field Descripticn, Contents, Meaning DC DC DC DS DC DC DC DC DC DC DC BC DC DC DC DC DC tC tC DC tC DC DC tC DC DC DC B'O' H'O' CL4'Cx.x' OD 14F'-1' PL4'0' 3F' -1' A (0) F'-1' XL2'OA03' XL2'07FE' 8F' -1' XL l' 40' FL3 '-1' P=O' FI-1' A (0) 8F' -1' A (0) 3F' -1' XL2'00' XL2'00' 2F' -1' 3A (0) F'O' 12F'-1' V(DMSVIB) A* 1 Reserved for IBft use Processor identification and model number CftS release number (latest release level) CiT start Not supported Current date in packed decimal Not supported Not supported Not supported A SVC 3 instruction (exit) A BCR 15,14 instruction Not supported System configuration = PCP Not supported R13 saved during OPEN Not supported Lowest storage address not in nucleus Not supported Highest storage address in machine Not supported Not supported Bit 7: extended prec~s1cn flcating point hardware in processor Not supported Not supported Field available to user Not supported Address of VSAl! interface bcotstrap Section 2. CMS rata Areas and Contrel Blocks 151 tEGSECT tEGSECT contains the files used by DEBUG for saving registers, breakpcints, PSis, and other data. V-constants in DMSDBD, DMSDBG, and tMSITE Foint to the DEEUG wcrk area. o r------------------------------------------------------, CCWPRINT SYMTAELE 8 108 SYMTBG BRKPNTBL 188 TELEND 190 ARGS 1B8 , 1*1 JFLAGS 1CO WIITRD WTRDCNT lC8 1DO ORG 1D8 DEC 1EO DECDEC 1E8 ARGSAV RETSIV 1FO EXIMLC EXAMLG 1F8 BEGAT STOPAT 200 SAVE1 SlVE2 208 DEGSAV1 248 DBGSIV2 _ _ _ _ .J 152 IBM VM/370 Data Areas and Ccntrol Block Logic DBGSECT 288 290 TSY! 298 XPSW 2AO LINE A*2 .-- 2A8 1 I LINE1 300 308 A*3 LINEA1 , 1 A*4 320 1 A*5 PLIST for DftSCWR 328 330 1 A*6 338 INPUTSIZ CONHCT 340 HEX 348 350 HEIHEX 358 BI1:S 360 r--- 1 A*7 380 388 390 ////////////////////////YPSW/////////////////////////// 1-----------------------------I//////////TBLINDX//////////I////ECR/////I////////////// 1-------------------------------------------------I/A*8//I/A*9/I/A*10/I/A*11//I/////////tEGIWK//////////// I 1 398 ,IDBGXWK(Ccnt) 1//////////////1 1 tr Section 2. CftS rata Areas and Ccntrcl Blocks 153 tEGSECT Hexadecimal tisplacement 0 8 108 10C 18C Field Name Field Description, Contents, Meaning ENTRY DBGSECT CCWPRINT CCW X'09',0,SILI,133 SYMTABLE SYMTBG BRKPNTBL TBLEND DS DC DC DC 32D F'O' 16F'0,-1' A (TBLEND) ARGS Constants fg! DS --oi)---DS 5D MVCNT1 MVCNT ARGMAX EQU EQU EQU *-ARGS MVCNT1-8 1B8 JFLAGS DS 6X ~~!LI! g~£ Co~!!ol Arguaents stored here Number of tytes in arguments Needed for SET GPR command End cf argument area * Flags corresponding to arguments. There is one flag for each parameter, as follows: 00 FO FF 1BE 154 (0 - 9) Hexadecimal (A - F, 0 - 9) Alphabetic (A - F) DS 1X MVCNT2 EQU *-ARGS For initializing to zero OD CL8'WAITRD' !(INPUT) C'U' X'OO' H'O' Parameter list to get input line A(input buffer) Clean up and logical carriage return F'O' Origin of rcutine teing examined WTRDCNT DS DC DC DC DC DC 1DO ORG DC 200 204 208 248 = Numeric ARGSCT 1CO 1CO 1C8 1CC 1CD 1CE 1D8 1EO 1E8 1EC 1FO 1F4 1F8 1FC DEBDU~P User-defined symbol table Symbcl tatle entries Ereakpoint table End address of breakpoint table ~!grag~ ~nd 190 190 Printer CCW for WAITRD I1!~ £:g11g!i~g !g!ig~!es A*1 Number of arguments in command line Byte count filled in here .Q§~£ ~l DE~.!!g 1D 1D 1F 1F 1F 1F 1F 1F g!!£ DEBD.QMP Binary word Decimal word Storage for argument location Storage for return address First location to te examined Length of field to be examined Eeginning parameter teing Frocessed Last Farameter location LASTLINE EQU DECDEC 32 bytes for last line dumped SAVE1 SAVE2 DBGSAV1 DBGSAV2 1F 1F 16F 16F DEEtOMP uses this area DEC DECDEC ARGSAV RETSAV EXAMLC EXAMLG BEGAT STOPAT DS DS DS DS DS DS DS DS DS DS DS DS for line count DEEUG EALR-call save Save area fer CCNWAI~/CONREAD IBM VM/370 Data Areas and Control Block Logic DBGSECT Hexadecimal Lisplacement Field Name Field Descripticn, Contents, Meaning TSYM XPSi OUTPT1 LINE LINE1 LINE1B LINE1A LINE1C LINE1D DS DS DC DC DC DC DC DC DC CL 11' 1 87X'40' C'*' 32X'40' C'*' X'40' DBGOUT INPUT INPUT1 EQU EQU EQU LINE LINE LINE+60 328 328 330 334 337 CONiR DS DC DC DC DC OD PLIS~ CL8'TYPLIN' AL1(1),AL3(DBGOUT) CL1'B',AL2(0) AL 1 (0) A*6 338 33A 33C 340 348 34C 350 358 359 INPUTSIZ DS DS DC CONHCT DC HEX DS DC HEX HEX DS DC BITS DC 288 298 2AO 2A1 2AC 303 304 324 325 CONiRL 361 36F 379 CONHXT 37F 4F 1D 1C i i 1*2 A*3 A*4 A*5 OutFut buffer Input buffer Hexadecimal pack area for D~SCWR to type outrut line PLIST continued PLIST continued PLIST continued PLIST continued 1H Size of typed-in input line 1H Reserved for IBM use F'O' X'FAFBFCFDFEFFOOOO' Translate tatle 1F Binary word X'FFFFFFFF' Fence 2F Printer graFhic word X'FF' Extra translate byte X'COCOCOCOCOCOCOCO' Scratch word ORG DC *+14 C'0123456789' DC C~ABCDEF' EQU CONHCT-C'A' DBGSiTCH DC Symbcl entry Execution PSi Byte count I/O tuffer Filler bytes Filler bytes Filler bytes Filler bytes Filler bytes X'OO' A*7 Translate table Translate table Translate table Internal LEEUG status flags in DBGSilTCH --X'80'---DBDEXIT DBDDMSG DBGSET DBGPERM DBGCOND 380 388 38C 38E 390 391 392 393 394 39A 1.h~ EQU EQU EQU EQU EQU 12JJ2!iIDl X'40' X'20' X'10' X'08' X'04' X'02' g~~ Reserved for IBM use Reserved for IBM use Exit from DEBDUMP Duplicate message in DEBDUfE SET command Reserved for IBM use Reserved for IBM use ~~§~~~~g !2~ 1]~ ]se YPSi TBLINDX BCR DS DS NOPR NOPR D F ILC ILC11 ILC0110 ILCOO DS DC DC 1C X'06' X'04' X'02' BAL BALR EQU EQU X'45' X'05' EAL operation code EALR operation code DBGXiK DS 3H Re-create instruction at BRKPT address LPSi 48 Give control to NSI DC o o PSi containing NSI Current BRKET table index NOPE to Fad DBGXiK when needed Additional NOPR (if needed) A*8 ILC ef instruction in DBGXiK A*9 3 halfword instructions (6 bytes) A*10 2 halfword instructions (4 bytes) A*11 1 halfword instructicns (2 bytes) Section 2. CMS Lata Areas and Contrel Blocks 155 tEVSECT tEVSECT describes the device information required for input/output routines. a DSECT corresponding to the data in a DEVTAE entry. o 8 Hexadecimal Displacement -----------0 2 3 4 8 C 156 DEVSECT is ~-------------------------------------------------------, DEVADDR 1 D* 1 DEVNAHE 1 D*2 I --------------------------------------------------------1 DEVIPRA 1 ~EVHISC Field Name Field Description, Contents, eeaning DEVADDR DEVFLAG DEVTYPE DEVNAHE DEVIPRA DEVMISC DS DS DS DS DS DS 1H 1X 1X 1F 1F 1F DEVSIZE EQU *-DEVSECT D*1 D*2 Virtual device address Device flags Device type Symtolic device name Interrupt processing routine address Miscellaneous -- device dependent Device table size (in bytes) IEM VM/370 Data Areas and Control Block Logic DEVTAE DEVTAB contains the entries for the various devices handled by C~S (disks, tapes, reader, punch, printer, and censole). DEVTAB is pointed to ty v-constants in tMSICW and DMSITI, and is also referenced indirectly by the ADEVTAE field in NUCON. -, I I I I I I I I CONSOLE a , BO READEB1 co PUNCH1 DO PRINTEB1 10 ADISK 20 BDISK 30 CDISK yon l:;V READEB2 40 DDISK FO PUNCH2 50 EDISK 100 PRINTER2 60 FDISK 110 TAPE1 70 GDISK 12C TAPE2 80 SDISK 13C TAPE3 90 YDISK 14C TAPE4 AO ZDISK 150 DU~~Y I ----' Hexadecimal Displacement -----------a 0 2 4 8 C 10 10 12 14 18 1C 20 20 22 24 28 2C 30 30 32 Field Name CONSOLE ADISK BDISK CDISK Field Description, Contents, Meaning DS DC DC DC DC DC DS DC DC DC DC DC DS DC DC DC DC DC DS DC DC OD XL2'009' XL2'0' CL4'CON1' VL4 (CONSI) XL4'0' aD XL2'191' XL2'O' CL4'DSK1' AL4 (0) XL4'O' aD XL2'000' XL2'O' CL4'DSK2' AL4 (0) XL4'0' aD XL2'OOO' XL2'O' Device tatle entry for console Device tatle entry for A-disk Device tatle entry for B-disk Device tatle entry for C-disk Sectien L. C~S Data Areas and Centrol Blocks 157 BEVTAE Hexadecimal Displacement -----------34 38 3C 40 40 42 44 48 4C 50 50 52 54 58 5C 60 60 62 64 68 6C 70 70 72 74 78 7C 80 80 82 84 88 8C 90 90 92 94 98 9C AO AO A2 A4 A8 AC BO BO B2 B4 E8 BC CO CO C2 C4 C8 CC DO DO D2 D4 D8 DC 158 Field Name DC DC DC DS DDISK DC BC DC DC DC EDISK DS DC DC DC DC DC DS FDISK DC DC DC DC DC GDISK DS DC DC DC DC DC DS SDISK DC DC DC DC DC YDISK DS DC DC DC DC DC DS ZDISK DC BC DC DC DC READER1 DS DC DC DC DC DC DS PUNCH1 DC DC DC DC DC PRINTER1 DS DC DC DC DC DC Field Description, Contents, Meaning CL4'DSK3' AL4 (0) XL4'0' OD XL2'192' XL2'0' CL4'DSK4' AL4 (0) XL4'0' OD XL2'000' XL2'0' CL4'DSK5' AL4 (0) XL4'0' OD XL2'000' XL2'0' CL4'DSK6' AL4 (0) XL4'0' OD XL2'000' XL2'0' CL4'DSK7' AL4 (0) XL4'0' OD XL2'190' XL2'0' CL4'DSK8' AL4 (0) XL4'0' OD XL2'19E' XL2'0' CL4'DSK9' AL4 (0) XL4'0' OD XL2'000' XL2'0' CL4'DSKO' AL4 (0) XL4'0' OD XL2'00C' XL2'0' CL4'RDR1' AL4 CO) XL4'0' OD XL2'00D' XL2'0' CL4'PCH1' AL4 (0) XL4"'0' OD XL2'00E' XL2'0' CL4'PRN1' AL4 (0) XL4'0' -------------------------------------Device ta1:le entry for D-disk Device ta1:le entry for E-disk Device ta1:le entry for F-disk Device ta1:le entry for G-disk Device ta1:le entry for S-disk Bevice table entry for Y-disk Device ta1:le entry for Z-disk Device ta1:le entry for REAtEB1 Device table entry for PUNCH1 Device ta1:le entry for PRINTER1 IBM VM/370 Data Areas and Control Block Logic DEVTAS Eexadecimal Displacement ------------ Field Name Field Description, contents, Meaning 1",,) DC 104 108 10C 110 110 112 114 118 11C 120 120 122 124 128 12C 130 130 132 134 138 13C 140 140 142 144 148 14C 150 150 152 154 158 15C 160 DC DC DC DS DC DC DC DC DC DS DC DC DC DC DC DS DC DC OD IL2'012' IL2'O' CL4'RDR2 i AL4 (0) IL4'O' OD IL2'013' IL2'0' CL4'PCH2' AL4 (0) IL4'0' OD IL2'010' IL2'0' CL4'PRN2' AL4 (0) IL4'0' OD IL2'181' IL2'0' CL4'TAP1' AL4 (0) XL4'0' OD XL2'182' IL2'O' CL4'TAP2' AL4 (0) XL4'0' OD XL2'183' XL2'0' EO EO E2 E4 E8 EC FO FO F2 F4 F8 FC 100 100 READER2 DS DC DC DC DC DC PUNCH2 DS DC DC DC DC DC PRINTER2 DS DC IV~ TAPE1 TAPE2 TAPE3 TAPE4 DUMMY TABEND DC CL4'TAP3' DC DC DS DC DC AL4 (0) XL4'0' OD XL2'184' XL2'0' DC CL4!TAP4' DC DC DS DC DC DC DC DC DS AL4 (0) IL4'O' OD IL2'OOO' IL2'0' CL4'XXXX' AL4 (0) XL4'O' OD -------------------------------------Device table entry for REA1ER2 Device table entry for PUNCH2 Device table entry for PRINTER2 Device table entry for TAPE1 Device table entry for TAPE2 Device table entry for TAPE3 Device table entry for TAPE4 Device table entry for DUMMY Section 2. CMS rata Areas and central Blecks 159 tIOSECT DIOSECT describes the fields used by DftSDIO as a work area when reading and writing actual blocks of data on CftS disks. DIOSECT is Iointed to ty a v-constant in DftSNUC, and referenced indirectly by IDIOSECT in HUCOH. 0 IOOLD 8 DIOCSi 10 PWIIT 18 QQDSK1 20 28 CCWl 30 CCW11 38 CCW2 40 CCW3 48 RWCCi 50 58 60 SECTNUft SEEKADR LASTHED L1STCYL t 1*1 SENSB A*2 18 80 SEHCCW 88 DOUBLE 90 IRSIVE ERRCODE C8 DO FREERO D8 SAVEIDT CCWI EO E8 160 DICFREE A*3 I 1*4 I 1*5 IBM VM/310 Data Areas and Centrol Block Logic _ _ _ _ _- - 1 DIOSECT Hexadecimal Displacement -----------0 0 8 10 10 18 1C 20 24 Field Name Field Description, Contents, Meaning DIOSECT IOOLD DIOCSi DSECT DC 1D'0' DC 1D'0' I/O cld PSW (from interrupt routine) CSW (from interrupt routine) gbIsT IQ ~~ll DMSIOW OP--DS PiAIT DC CL8'WAIT' DC C'DSK-' DC F'O' DC F'O' QQDSK1 DC F'O' QQDSK2 EQO Filled in to correct symbolic disk number First two bytes are always 0 QQDSK1+2 Halfword copy of 16th track disk address cell Chain 28 CCii----- CCii X!07!,SEEKADR,X'40',6 Seek 30 38 40 48 CCi1A CCW2 CCli3 RiCCW CCW CCW CCW CCli X'03',O,X'40',1 X'31',SEEKADR+2,X'40',5 X'08',*-8,0,1 X'00',*-*,X'20',*-* Seek or set sectcr Search TIC back to search Read or write data 50 SEEKADR DC XL7'00' Seek/search information (first 3 bytes are 0) 57 SECTNOM DC X'OO' Sector number 58 5C ILQ In!Q!:!~tiQn LASTCYL DC F'O' LASTHED DC F'O' 60 DEVTYP DC X'OO' A*1 01=2311, 08=2314, 09=3330 61 DIOFLAG DC X'OO' A*2 RDTK/WRTK flag: Becomes last cylinder number used Becomes last head number used ~11§ g~!!~~Q 62 7C 80 TOO BIG liRTKF QQTRK in DIOFLAG EQO --X'04'--EQU X'02' EQO X'01' Byte count is greater than 800 Writing first chain link Handling first chain link DIAGNUM EQU 24 Number assigned by CP for tIAGNOSE I/O SENSB DC DS CCli Sense information XL24'00' OF X'04',SENSB,X'20',24 REAt 24 BYTES SILl SENCCli (Scratch area, for CVD use, etc.) 88 !~~E !h~ ~QIIQ!!n9 Th!:~g 90 CC CF DO D4 D8 EO E8 E9 EA XRSAVE ERRCODE !~E !h~ !QllQ!!1!9 DC DC F'O' F'O' SAVEADT CCliX DIAGRET IOCOMM LASTREC DC CCW DC DC DC F'O' Handy place for an ADT address X'23',SECTNUM,X'40',1 Set sector X'OO' A*3 CP's tIAGNOSE return code if nonzero X' 00' A*4 Set to read (06) or write (05) X'OO' A*5 Number (1-14) of the last reccrd processed FREERO DIOFREE 15F AL3(0) AL1(*-*) !1! Order --Registers 0-14 saved here for RDTK/WRTK First 3 bytes of R15 error code Error code (in R15 at exit) DS DC DC I!Q in Order ----wo. cf doublewords of free storage (if any) Address of free storage for buffer or CCis Section 2. CMS tata Areas and Contrel Blocks 161 DMSCCB DMSCCE describes all fields of a DOS Co.mand Control Block (CCB). This DSECT is used by DMSXCP to map the CCB specified by a user for an SVC 0 (EXCP) and passes the address of CCB to DMSXCP. o I I ~CBCNT A*1 1*2 A*3 1*4 I A*5 A*6 1--------------------------------------------------------- 8 I 1*7 CCBCCW A*8 CCECSW I--------------------~-------------------------------10 I CCBLDITB CCBLCCWE 1-------------------------------------------------------A*9 CCEFSCCW 1----------------------------------------------------I CCBRDCCW CCBWTCCi 1------------------------------------------------I CCBLWCCW 1/////////////////////////// 1------,--------------------------------------------------1///////////////////////////1/////////////////////////// 18 1///////////////////////////1 20 28 30 1--------------------------------CCBNCCB 1/////////////////////////// 38 I Hexadecimal Displacement Field Name Field Description, Contents, Meaning CCBST CCBD EQU EQU * * Start CCB Command control block o o CCBL-Elf CCBCNT DS OCL16 XL2 lIapcftherOS CCB Residual count 2 2 CCBERMIP DS CCBCOM1 DS DS OXL4 XL1 1*1 Four bytes used to check errors Communications byte 1 Bits defined in CCBCOM1 CCBWAIT--EQU --X'80'-- 3 CCBEOF CCBIOERR CCBERROK CCBRDC CCBPDE CCBDCV CCBUERR EQU EQU EQU EQU EQU EQU EQU X'40' X'20' X'10' X'08' X'04' X'02' X' 01' CCBCOM2 DS XL1 !!i!§ g~r~!l!~g CCBDCCNT CCBTRKOV CCBEOC CCBDC CCBNOREC CCBRETRY CCBVER CCBCC 162 EQU EQU EQU EQU EQU EQU EQU EQU Traffic bit (set at CE) End cf file Unrecoverable I/O error AcceIt unrecoverable error Return data checks Post at device end Return data check RD/CHK User error routine 1*2 Communications byte 2 in CCBCOM2 -X'80'-X'40' X'20' X'10' X'08' X'04' X'02' X' 0 l' Data check in count area Track overrun End cf cylinder Data check No record found Retry no record found Verify error Command chain (retry) IBM VM/370 Data Areas and Control Block Logic DMSCCB Hexadecimal Displacement 4 Field Name CCBCSW1 !!i!.§ 5 Field Description, Contents, DS g~!i!!~g CCBATTN CCBSTMOD CCBCUE CCBBUSY CCBCE CCBDE CCBUC CCBUE EQU EQU EQU EQU EQU EQU EQU EQU CCBCSW2 DS XL1 A*3 6 7 8 9 C D 10 14 18 1C Attention Status modifier Control unit end Busy Channel end Device end Unit check Unit exception X'40' X'20' X'10' X'08' X'04' X'02' X'01' XL1 A*4 --x=ao:-- CCBPCI EQU CCBILEN CCBPROGM CCBPROT CCBCHAND CCBCHANC CCBICTRL CCBCHAIN EQU EQU EQU EQU EQU EQU EQU X'40' X'20' X'10' X'08' X'04' X'02' X'01' CCBSYMU CCBSUCLS CCBSUNUM CCBLIOBS CCBCCW CCBCOM3 DS DS DS DS DS DS OXL2 XL1 XL1 XL1 XL3 XL1 CSW status tit 2 program-controlled interruFt Incorrect length Program check Protection check Channel data check Channel central check Interface control check Chaining check A*5 A*6 1*7 A*8 Symbclic unit (SYSUN) U - LUB class N - LUB numter within class Reserved for tleES Pointer to start of channel Frogram Communication byte 3 CCBAPEND EQU X'40' APFendage exit at interrupt CCBCSW DS CCBLDATB DS CCBLCCWB DS DS CCBUFLGS DS XL3 Pointer to csw or to appendage routine Address of last data block Address of last CCi tlock Reserved for IBM use I/O manager CCB flags !!i!.§ 1D 20 24 28 2C status tit 1 in CCECSW1 --X'8'O'-- Bits defined in CCBCSW2 - - ------ 6 csw ~eaning A A F X £~!i~£ in CCEUFLGS A*9 CCBUEAIC CCBUEAC CCBURDCW CCBRPS EQU --X'SCj"i--EQU X'40' EQU X'20' EQU X'10' Error analysis in control Errer analysis complete Read CCW active RPS channel program candidate CCBFSCCW CCBRDCCW CCBWTCCW CCBLWCCW DS DS DS DS DS Save area fer first CCi address Address of first read CCW Address of first write ccw Address of the last write CCW Reserved for IBM use XL3 F F F 3F Note: CCBLWCCW chain field must have the same displacement as does FCECHIIN In-FCDB and also BKPFSTBK in BKPRD 38 3C CCBNCCB DS DS A F Address of next CCB block Reserved for IBM use Section 2. CMS tata Areas and Centrol Blocks 163 tOSSECT CMS/DOS envircnment. tOSSECT simulates the CMS File Control Elock (FCE) in the is invoked by the DOSCB macro~ The DOS Simulation Control Blocks are chained together. The DOSFIBST field points to the first DOSCB in the chain, or if no chain exists, contains zerc. o DOSNEXT tOSCBID 8 DOSDD 10 DOSOP 18 DOSDSNIM 20 DOSDSTYP 28 DOSDSMD DOSITEM 30 DOSBYTE 38 DOSREID 40 48 DOSBUFF DOSIORM 1*1 DOSCOUT I 1*2 DOSBLKSZ DOSWORK 1*3 1*4 1 1*5 50 DOSOSDSN 58 DOSEXTTB 60 DOSBUFSP 68 DOSUCNAM (cont. ) DoseSFs-r· 1*6 DOSVOLTE DOS5EBSE t 1*1 t 1*8 DOSUCIAft DOSSIVE 80 164 r-------------------------I 1*9 I A*10 11/11111//////1 IBM VM/310 Data Areas and Centrol Block Logic , DOSSECT in NUCCI DOSSECT Hexadecimal Displacement o Field Name DOSINIT 1lJ:!§ o 4 8 10 18 18 20 28 21 2C 30 34 36 38 3C 3D 3E lIn "tv 48 48 49 4A 4B Field Description, Contents, Meaning DS ox DOSCE flag l:yte g~!J:1!~g in DOSINIT --x''4o'--- DOSOS DOSDOS DOSCMS DOSDDCAT DOSPERM DOSJCAT DOSUCAT EQU EQU EQU EQU EQU EQU EQU DOSNEXT DOSCBID DOSDD DOSOP DOSTAPID DOSDSNAM DOSDSTYP DOSDSMD DOSITEM DOSBUFF DOSBYTE DOSFORM DOSCOUT DOSREAD DOSDEV DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS 1lJ:!§ DOSDUM DOSDSK in DOSDEV EQU --0-----EQU 20 DOSTAPMD DOSBLKSZ DOSWORK DOSYSXXX DOSSYS DOSXXX DOSEXT DOSEXTCT DS DS DS DS DS DS DS DS OS user-created bit Defined for non-CMS disk Defined fer eMS disk User catalog data set Permanent control l:lock Search VSAM job catalog Search VSAM user catalog X'20' X'10' X'08' X'04' X'02' X'01' A CL4 CL8 eL8 OX CL8 CL8 CL2 B F F CL2 B F X A*1 AL3 (next rOSCB) DLBL to distinguish from CMSCE Data definition name eMS operation Tape identification Data set name Data set type Data set mode Item (record) number A (input/output l:uffer) Size of buffer (data count) File format: fixed/varial:le Records per CMS physical block Numl:er of bytes actually read Device type code g~!J:1!~g II,.. "t ... DOSOSFST DS 50 54 58 5C 5E 5F 60 64 6C 84 85 86 88 DOSOSDSN DOSVOLTB DOSEXTTB DOSSENSE DOSVOLNO DOSEXTNO DOSBUFSP DOSUCNAM DOSSAVE DOSEXTCX DOSTYPE DOSEND DS DS DS DS DS DS DS DS DS DS DS DS DS DOSENSIZ EQU Dummy device Disk OD Tape mode set to save Elock size Work area Logical unit for CMS/DOS SYS/FROG unit: X'OO'=SYS, X'01'=PROG Number frem 000-255 associated with the unit Number of Des extents left to process Current DOS extent Pointer to CS PST Pointer to es dsname block A(volume ID table)--VSAM multivclume data set A(extent tatle) for VSAM data sFace I/O sense data No. cf volumes (entries in DOSVOLTB) No. of extents (entries in DOSEXTTB) Size of VSAM I/C buffer(s) VSAM user catalog ddname Tempcrary save area for re-entrant code Current extent (used by DMSXCF) Data set type (SAM=S, VSAM=A) Reserved for IBM use End address of this tlock (*-DOSSECT)/8 Size of block in doutlewords X A*2 B D OB 1X 1X 1X 1X A*3 A*4 A*5 A*6 F F F B X X F CL8 6F 1X 1C A*7 A*8 A*9 A*10 B Section 2. CMS rata Areas and Control Blecks 165 EDCB ErCB is used by all CMS EDIT modules to define common free storage control blocks. It is initialized by DMSEDX r the EDIT bootstrap routine, and built dynamically from user free storage each ti.e a user issues the EDIT command. o FNAME 8 FTYPE 10 FMODE 18 ZONE2 20 A*1 A*2 VERCOL1 TRUNCOL ZONE1 VERCOL2 VERLEN CARDINCR SCRBUFAD LMSTART 28 LMINCR A*3 TABS 48 SEQNAME 50 PADBUF (cont.) 58 A*5 PADBUF PTR1 60 • 681 I 701 PTR2 PTR3 AEXTEND CORITEfiI SPARES FP'IR ITEM AFSTFNRD FREELER FREEAD EDRET EDMSK I 781 I 801 I 881 I 901 MAINAD I I I C81 AUTOREG CARDNO I LMCURR DOl I D81 I I I I I I I EO, ,, COUNT BUFFL EUFFA CANSAV , 1001 166 IBM VM/370 Data Areas and Control Block Logic IiUALNOS EDCB DUALNOS (cant.) DECIMAL 1F8 HALF 200 REGSAVE 210 I 218 REGSAVX r-----------.-------------- REPeNT 220 SAVEAR 260 CHNGNUM XYCNT TIN 268 270 AEDLIN 278 A*6 TOUT 280 A*7 288 IOLIST 290 rOID 298 2AO IOAl: IOMODE BEes ')'110 ~ollU 2BO AL'!LIS'! 2B8 ALTLIST (cant. ) 2CO EDWORK (cant. ) AL'!MODE 2C8 2DO ALTMODE (cant. ) 2FO 2F8 300 !DliORK STACKAT STACKAT (cant.) STACKATL AT'!N Section 2. CMS l:ata Areas and Control Blocks 167 EtCB I 3081 ATTN (cant.) 310 ATTNLEN 318 RENLIS'! RENLIST (cant.) RPLIST 320 RPLIST 328 STRTNO INeRNO 330 AINCORE FSIZE 338 DECLTH 340 RANGE 348 /////////////////////////RESVD1///////////////////////// 350 A*8 BUFAD WRCOUNT A*10 358 BUFFLOC ALINELCC 360 ANUMLOC AFIAGLOC 368 TRNCNUM At'IOCNT IUTOCURR 370 CHNGCNT DITCNT EICT LINELoe 378 NUMLOC SIVCNT TVERCOL1 TVERCCL2 A*11 I A*12 380 J 388 3AO ABEA AREA (cant.) I 1*13 I A*14 _ _ _ _-----.J CHNGl!SG CHGTRUNC 318 3BO (unidentified) 3B8 CMODE 3CO FILEMS r , A*15 , A*16 3D8 A*17 JAR NEWNAl!E 428 NEWNAME (cant.) 430 NEWTYPE (cant.) 438 168 SERSAV (cant.) IBM VM/370 Data Areas and Central Block Logic NEWTYPE NEW MODE A*18 A*19 ELeE r--------------------------------------------·-----------,1 r 440lSERTSEQ (cont) 1 A*20 I A*211 I---------------------------~ 4481 A*22 1 1 A*23 1-----------------------------------------------------SCLNO 4601 A*24 1 A*25 1----------------------------------XABEA 4681 SCLNO (cent.) 1 A*26 I A*27 1 I----------------------------------·----~ 1 (Same length as EILIN) YAREA 1------------------------------------------------------4F8 (Same length as EILIN) 580 A*28 588 XXXCWD 590 SAVCWD 598 INVLDBDR SAO MACROBDR(cont) 1 INVLD MACROBDR MACRe 5A8 J 5BOI EDLIN 1------------------------------------------------------LINENO I A*29 6301 I----------------------------------------~ I LINE A*30 6D8 TABLIN Section 2. CMS Lata Areas and Control Blocks 169 EtCB Hexadecimal Displacement Field Name Field Description, Contents, Meaning DS OF BLOC EQU * 10 12 13 14 16 FNAME FTYPE FMODE FV CASESW TRUNCOL ZONEl DS DS DS DS DS DS DS CL8 CL8 CL2 CL1 CL1 18 1A 1C 1E 20 24 28 2A ZONE2 VERCOL 1 VERCOL2 VERLEN SCRBUFAD CARDINCR LMSTART LMINCR DS DS DS DS DS DS DS DS B B B B 2C 2D 2E FLAG FLAG2 TABS DS DS DS CL1 CLl 26AL1 ENDTABS EQU * SEQNAME PADCBAR DS DS CL3 CL1 END BLOC EQU * o 8 48 4B !21~: 4C 58 60 64 68 6C 70 74 78 7C 80 84 88 8C 90 94 170 B B F F B B A*3 A*4 End cf tabs A*5 Name, if any. for serializaticn '0' cn right, , , on left End cf blocks PADBUF must remain directly tehind FADCHAR PADBUF DS 9C Pad characters PTRCONS EQU * DMSEDI line pointers PTRl PTR2 PTR3 AEXTEND CORITEM SPARES FPTR ITEM AFSTFNRD FREELEN FREEAD EDRET EDMSK MAINAD DS DS DS DS DS DS DS DS DS DS DS DS DS DS 2F Pointer to top of file (for dummy top line) Current line pointer Pointer to tottom line Pointer to end of used area of storage Number of bytes for one liDe in storage Number of spare lines Free list pointer Item length Anchor for stacked lines upon entry Length of free storage Address of free storage CMS return address DMSSCR edit mask LOADSYS address; 0 if LOADMCD EPTRCONS EQU C8 CC DO D8 DC EO 104 1F8 1F8 A*1 A*2 Filename Filetype Filemode Record format Case setting Truncation column Eeginning zone initialized tc first column End zone Verify column 1 Verify column 2 Verify length Address of GET MAIN buffer Increment for serialization Where line numbers start Automatic line numters using default increment Flags for line monitoring Miscellaneous flags Maximum of 25 tabs is allowed AUTOREG CARDNO COUNT LMCURR BUFFL BUFFA CANSAV DUALNOS DECIMAL DS DS DS DS DS DS DS DS DS DS F F F F F F F F F F F F F * DMSEtI save areas and buffer pointers 13F Autocheck save area Save area for sequence number Numter of characters in EDLIN Prompter current line number Length of string (EDC) Address of string (EDC) Register save (EDC) Tempcrary string buffer (EtC) F F 2F F F 9F CL240 OD F Used by DECEIN and BINDEC IBM VM/370 Data Areas and Control Block Logic ELCB Hexadecimal Displacement 1FC 200 214 220 224 260 264 268 268 270 271 274 275 278 Field Name Field Description, Contents, Meaning HALF REGSAV REGSAVX REPeNT SAVEAR XYCNT CHNGNUM TIN DS DS DS DS DS DS DS DS DS DS AEDLIN DS CASEREAD DS DS TOUT DS ~/O ~r> DS ela 280 281 284 285 286 DS DS DS DS DS X H BINt!C only edits four characters Register save area Register save area FOB count DMSSCR save area X or Y execution count Number of lines to change WAITRI PLIS'I WAITRt '1' for console No.1 A(EILIN) Iefault to uppercase Length put here TYPLIN PLIS'I TYPLIN '1' for console No.1 Address goes here 'B' for black ribbon X'20' maximum length override Length goes here CRBIT EQU X'80' Suppress carriage return IOLIST DS DS DS DS DS DS DS DS DS DS OF CL8 CL8 CL8 CL2 DS F Initialization for state of source STAT! EDIT CMSOT1 A1 Item number for RDBUF Io not allow asterisks 133 (XINSCRIPT use LINE) F/V and null record indicator 1 (XINSCRIPT one line at a time) Number of bytes read from BDBUF DS DS DS DS DS OF CL8 CL8 CL8 CL8 DS CL8 DS DS DS DS STACKAT DS DS DS STACKATL DS ATTN DS DS DS ATTNLEN DS RENLIST DS DS RPLIST DS STRTNO DS INC RNa DS AINCORE DS FSIZE DS DS DECLTH RANGE DS RESVD1 DS CMDBLOK DS DS BUFAD FLG DS CL8 CL2 CL6 8X OF CL8 CL4 .... 288 288 290 298 2AO 2A2 2A4 218 2AC 2AE 2BO 2B4 2B4 2BC 2C4 2CC 2D4 2DC 2E4 2E6 2EC 2F4 2F4 2FC 300 304 304 30C 310 314 314 31C 328 32C 330 334 338 340 348 350 351 354 TYPFLG laID IOMODE lOAD RECS ALTLIST EDWORK ALTMODE F 5F 3F F 15F F F OF CL8 X 3X C A*6 3X OF 3X C X A*7 H CL4 F CL2 H RENAME EDIT CMSOT1 A1 New filename New filetype '*' New filemode FF fence PLIST to stack first in first out ATTN First in first out Length and address of line to stack F OF CL8 CL4 F OF CL8 CL12 F F F F D D D X A*8 3X X A*9 ATTN Last in first out Length and address of line to stack RENOM PLIST RENOM Fileid Starting number Increment number In-storage copy address Record length tMSSCR work area Message data areas Reserved for IBM use X'19' Buffer address CCW flag Section 2. CMS Iata Areas and Control Blocks 171 EDCB Hexadecimal Displacement 172 Field Name Field Description, Contents, !eaning 355 356 358 358 35C 360 364 368 36C 36E 370 372 CTL WRCOUNT GIOPLIST BUFFLOC ALINELOC ANUMLOC AFLAGLOC TRNCNUM AUTOCNT AUTOCURR CHNGCNT DITCNT DS DS DS DS DS DS DS DS DS DS DS DS X H OF F F F F F H H H 374 376 378 37A EDCT LINELOC NUMLOC SAVCNT DS DS DS DS H 37C 37E 380 381 382 38A 38B 38C 3AO 3A2 3AF 3B8 3BC 3D6 3D7 3D8 3D9 425 42D 435 437 43F 442 443 444 45E 45F 460 461 462 46A 46B 46C 46E 4F6 4F8 57F 580 586 587 588 590 TVERCOL1 TVERCOL2 ALCHAR1 ALCHAR2 AREA BYTE CHNGFLAG CHNGMSG DS DS DS DS DS DS DS DS DS CHGTRUNC DS DS CMODE DS FILEMS DS FLAGLOC DS GETFLAG DS HOLDFLAG DS JAR DS NEWNAME DS NEWTYPE DS NEWMODE DS SERSA V DS SERTSEQ DS SERTSW DS SIGNAL DS TEMPTAB DS UTILFLAG DS XYFLAG :os SCRFLGS DS SCRFLG2 DS SCLNO DS TWITCH DS TYPSCR DS XAREA DS DS YAREA DS DS H 598 INVLDHDR DS BLANK1 XXXCWD SA VCWD CNOP DS DS DS DS H H H H A*10 Control byte Write count DMSSCR PLIST for D!SGIO Buffer location Address of line location Address of number location Address of flag location Number of lines truncated Autosave parameter Current modification count Temporary area for change Count of lines stacked by the REUSE (=) subroutine Next char in EDLIN Display line number Display count Length of last saved request not beginning with either a 1 or Temporary area for verifying column 1 Temporary area for verifying coluan 2 A*11 Temporary byte used by ALTER A*12 Temporary byte used by ALTER EDIT instruction work A*13 Temporary byte (used by GET) A*14 Flag for change Lines changed aessage H C C CL8 X X CL20 2X C', • 13X C· ••• LINE (S) , 9X C'TRUNCATEt' CL4 Fileaode for MODECHK routine CL26 Retry message X 1*15 Flag for DMSGIO X A*16 Flag for GETFILE X 1*17 DMSSCR SCRFLGS (ENDBLOC-BLOC)AL1 Save area for preserve CL8 Naae area for FILE and SlVE commands CL8 Type area for FILE and SlVE co.mands CL2 Mode area for FILE and SlVE commands CL8 A*18 Identification number for save area CL3 A*19 Temporary byte identificaticn nu.ber area X A*20 Temporary byte used ty identification number X 1*21 Signal between routines (ENDTIBS-TIBS)lL1 Temporary spot for new tabs X A*22 DMSSCR utility flags X A*23 X/I active flag X A*24 Screen function flags X A*25 More screen function flags 8C Save LINE!ODE sequence number X A*26 Location flags X A*27 Display unit size index value H X length and request buffer CL135 (Same length as EDLIN) H I length and request buffer CL135 (Same length as EDLIN) 6,8 X X CL8 CL8 CL6 Alignment for XXXCWD Alignment for XXXCWD A*28 Blank for clearing EDIT XXXCWD EDIT token tuffer Location at which contents of XXXCWD are saved 1EDI~: (for invalid requEst aessage) IBM VM/370 Data Areas and Control Block Logic EDCE Eexadeciaal Displacement ------------ Field Nalle Field Description, Contents, !!eaning 59E 512 lUCROHDR DS DS INYLD 514 IUCRO 518 CL4 OCL6'?EDIT:' -------------------------------------EXEC for EDIT Ilacro stacking Location to store invalid header ORG DS INYLD+2 OCL4'EXEC' Location to hold macro beader (if invalid) ORG DS IUCRO+4 C Blank used for clearing EDLIN 519 630 635 636 EDLIN LINENO BLANK2 LINE DS DS DS DS CL135 CL5 X CL160 6D6 6Di BLAIK3 TABLli DS DS I 778 EDCBEND DS OD EDCBLTH EQU (EDCBEND-EDCB) Length of EtCB in doublevords CL160 Terminal input 1:uffer Line number for typeout 1*29 Blank for clearing line Current line is held here 1*30 Blank for ""'_ .... a...... ; ..... ,. T1ELI) Output froll spread ,,'.a~ ~.u':::J Section 2. CftS tata Areas and Control Blocks 173 ERDSECT ERDSECT describes the fields in a work area used for giving responses and error .essages via the DMSERR or LIDEDIT macros. A V-constant in DMSERR points to the DeSERT CSECT in DMSDUC. o ERT1 8 ERT2 10 18 ERSAVE 58 ERPAS13 AO A*1 I A*2 A8 ERPDUM BO ERPBFA B8 ERSBD CO ERSSZ D8 I A*6 A*4 I A*5 ERDCM ERSECT A*7 ERTEXT 160 174 ERPCS lRPSEA ERMESS EO 168 A*3 (Double word preceding text) C8 DO ERPTXA ERTPL ERTPLA ERTPLL IBM VM/370 Data Areas and Control Block Logic ERDSECT Hexadecimal Displacement -----------0 8 18 58 AO Field Nalle Field Description, Contents, Work Area !2f ERT1 DS DS ERT2 ~ll~ !f~~ ERSAVE ERPAS13 DS DS Reconstructed ERPF1----nS-- !H1~~lU~ D 2D Erf2f g~g!!~g R2Y!!~~ Doubleword workspace Two doublewords workspace 16F 18F Pass this save area in R13 to BALR-ed to-routines ~LI~% !f~~ B A*1 Bits defined in ERPF1 ERF1TX---EQU --x'fH)"iEQU ERF1HD X'40' ERF1BF EQU X'20' ERF1SB1 EQU X'10' ERF1SBN EQU X'08' A1 ERPF2 DS A*2 Bits defined in ERPF2 ERF2CM---EQU --x'SO' ERF2DT EQU X'40' ERF2DI EQU X'20' A4 A8 A8 AA AB BO ERPTXA ERPHDR ERPNUft ERPLET RRPCS ERPBFA DS DS DS DS DS DS ~!~g !!elg Error message Type S10 None Print CPCOMM OCL6 H A*3 CL3 A B4 B8 ERSBP DS A BC ERSBF DS B ~it§ g~!!~~g ERSFLST ERSFA ERSFL EQU EQU EQU in ERSBF --X'SO'X'40' X'20' Second flag byte Blank compression wanted Dot at end of line wanted HAL 'l=YES wanted A C First flag tyte Text address in PLIST Header in PIIST Buffer address in PLIST One substitution More than one sUbstitution B Last 3 Bits Indicate ERF2ER --EQU---O---ERF2TY EQU 1 EQU 2 ERF2S1 EQU 3 ERF2NO ERF2PR EQU 4 EQU 5 ERF2CP ~eaning A*4 Text address Error message header Message numter Message letter CSEC'! name Buffer address (for BUFFA) Pointer to first (next) group of substitution parameter in original PLIST Data address and/or value of current substitution parameter Flag byte for current substitution parameter The last sutstitution parameter A-type option Length specified Section 2. CMS rata Areas and Control Blocks 175 ERDSECT Hexadecimal Displacement Field Name Field Descripticn, Contents, Meaning La§! ~ Bits Give Q£!!on BRSFH --EQU---O BRSFD BQU 1 BRSFC EQU 2 BRSFH4 BQU 3 BRSFCS BQU 4 BD BRSBL DS x co ERSSZ DS A CS DO D3 D6 D9 DA DB 176 HEX or HEXA DEC or DECA CHARA HEX4A CHAR8! A*5 ~9~§!!~ct!9~ !~ Byte length for the current sUbstitution paraaeter Size of sUbstitution field is number of dots ainus 1 BRKBSS BRSBCT BRNUK BRLBT BRBL DS DC DC DC DC DC D C'DMS' C'MMM' C'NBN' C'L' C" ERTSIZE EQU 130 Maximua text size BRTBXT DS (ERTSIZE+1)C Message text area ~YPLI!Lg~I!I1H~ 160 160 16S 16C ~lEg ERTPL BRTPLA ERTPLL DS DC DS DS A*6 A*7 Need doublevord before text First letters of header DSECi naae Message num1:er Message level letter Blank PLIST Construction OP-------------- A!g~ CLS'TYPLIN AL1(1),AL3(ERMESS) Message text address C'R',AL3 Message length IBM VM/370 Data Areas and Control Block Logic EXTSECT EXTSECT describes the fields in the External Interrupt work area referenced EXTSECT is pointed to by the AEXTSECT field in NOCON. o EXSAVE 40 TYPLIST 48 TIftCCW 50 TIllCHAR 58 SCAW 60 0 40 48 4C 50 58 64 68 A8 IC BO B4 TIMINI'I- 68 EXSAVE1 A8 EITPSW BO SAVEXT B8 EITRET co JRO C8 STI!!EIIT Hexadecimal Displacement by DMSITE. JR1 1*1 Field Naae 11/11/11111111111111. Field Description, Contents, Meaning ~!~ra.9~ !~! ~!.!~ !!l!~!!J!E! EXSAVE DS 16F TYPLIST TIftCCi DC DC DC DC DC DC CL8'TYPLIN' A(TIMCHAR) C'B',X'81',AL2(1) X'FF',IL1'00' BLIP character(s) XL12'00' Saved CSW/CAW A(2000000/13) Value that sets tiaer equal to 2 seccnds TIft CHAR SCAi TIMIHIT ~:t~g.9~ !~! EISAVE1 EXTPSW SAVEIT DS DC DC DC DC External ---16P-- Saved external old PSW and/or contents of registers PLIS1 to type BLIP character (Q!h~! :th~!! l!!~!:> X'80000000' A(0) F'O' V (DMSDBG) .1!!terr,YE! Saved registers Filled-in PSi Transfer address for external interrupt Address in IEBUG for external interrupt Section 2. CMS Iata Areas and Ccntrcl Blocks 111 EXTSECT Hexadecimal Displacement Field Name .§togg~ !£! l~lP C4 JR1 DC STIMEXIT DC EXTFLAG DC A(0) A(0) X'OO' REALTIMR EQU X'80' Real timer indicator AL3 (0) Reserved for IBM use CD DC D F'22' YE Bl EXTRET JRO CC DS DC !!!~!!!g! !!!!~!!~E! ~~! B8 CO C8 178 Field Description, Contents, Meaning 1*1 Saved external old PSi 22 doublevords for floating-~oint and user save area Address of free storage Address of STIMER exit routine External flag IBM VMj370 Data Areas and Control Block Logic registers EXTUAIHA EXTUAREA is a 96-byte user area generated by the C!SAVE macro. The peinter to the user area is passed to the user via register 13. The USAVEFTR field in C~SAVE also Faints tc the user area. r o I 40 FRS 60 UEXTPSWO 68 USERAREA Hexadecimal Displacement -----------0 40 60 68 BO GRS Field Name GRS FRS UEXTPSWO USERAREA USEREAND Field Description, Contents, I!eaning DS DS DS DS DS DS OD 16F 4D 1D 18F OF -------------------------------------Registers at time of interruFt Floating-point registers at interrupt External old PSi at interrupt User save area End user area Section 2. CMS rata Areas and Contrel Blocks 179 FCBSECT FCBSECT consists of the CMS File Control Elock (FCE) (used for file management under CMS), the simulated OS Job File Control Block (JFCB), Input/Output Block (lOB), and Data Extent Block (DEB). FCBSECT is invoked via the CMSCE macro. FCBSECT is dynamically allocated from CMS free storage each time the FILEDEF command is issued. o FCBNEXT FCEPROC 8 FCBDD 10 FCBOP 18 FCBDSNIM 20 FCBDSTYP 28 FCBDSMD FCBITEM 30 FCBBYTE 38 FCBREID FCEFORM FCBCOUT FCBXTENT 1*2 40 FCBRECL 48 FCBMEMBR (cont.) I 1*3 FCEMEMBR I 1*4 FCBOSFST 50 FCBOSDSN PCER13 58 FCBKEYS . FCBPDS 60 JFCBftlSK 68 JFCBCRDT 70 1*7 JFCBXPtT JFCBUFL I A*8 JFCLIMCT (cont.) I 78 80 JFCLRECL JFCDSORG I 1*5 1*6 A*9 1*10 1//////1 1*11 A*12 1*13 JFCBLKSI I A*14 I A*15 1/////////////////////////// 88 DEBTCBAD SEBSIV 90 DEBOFLGS DEBCPITB 98 IOBNXTID IOBECB AO DEBDCBID IOBECBPT A8 IOBCSW BO • FCEBUFF IOBSTART IOBtCBPT Format of Location X'24' for Console Device FCBIOOUT 20 r 28 I FCBIOOUT (cont.) FCBIOBUF I----------------·------------------------------------~ 30 I 1*16 I A*17 I 180 FCBIOCNT IBM VM/370 Data Areas and Control Block Logic FCBSECT Hexadecimal Displacement o Field Name FCBINIT Field Description, Contents, Meaning DS ~!!§ g~!!!!~g ox Initialization flag tytes in FCBINIT --X'20'--- FCBDOSL FCBOS FCBOPCB FCBPERM FCBBITCH FCBCITML EQU EQU EQU EQU EQU EQU FCBNEXT FCBPROC FCBDD DS DS DS CL8 iO FCBOP DS Ct8 18 18 18 18 IHAJFCB JFCBDSNM FCBTIPID FCBDSNAM FCBDSTYP DS DS DS DS DS OD OX OX CL8 CL8 AL3 (next CMSCB) processing routine) Data definition name eMS operation Job file control block 44 bytes, data set name Tape identification Data set name Data set type FCBPRPU EQU FCBDSTYP+4 printer/punch command list 24 2C 30 31 32 FCBIOOUT FCBIOBUF FCBCONCR FCBCONMS FCBIOCNT ORG DS DS DS DS DS FCBDSTYP+4 CL8 28 FCBTBSP DS OX 28 FCBDSMD FeBITE!! FCBBUFF FCBBYTE FCBFORM FCBCOUT FCBREID FCBDEV DS DS DS DS DS DS DS DS CL2 o 4 8 20 21 2C 30 34 36 38 3C !!!!§ 3D 3E 40 42 43 44 4C 50 54 58 5C 60 68 6B g~!!~g FCBCRT FCBPCH FCBDSK FCBTAP FCBCON FCBRDR FCBPTR FCBDUM EQU EQU EQU EQU EQU EQU EQU EQU FCBMODE FCBXTENT FCBRECL IOBIOFLG FCBDCBCT FCBMEMBR FCBOSFST FCBOSDSN FCBR13 FCBKEYS FCBPDS JFCBMASK JFCBCRDT JFCBXPDT DS DS DS DS DS DS DS DS DS DS DS DS DS DS Concatenated DOSLIB data set FCB for OS formatted disk OPEN acquired this CMS block Permanent control tlock Special batch data set Concatenated MACLIB data set X'10' X'08' X'04' X'02' X'01' A A (special A 1 C X H Special I/O command list A(data buffer) A*16 Console color code A*17 Console miscellaneous information Length of data tuffer H F F CL2 H F I 1*1 in FCBDEV --28----- CRT Punch Disk Tape Console terminal Reader Printer DUllmy device 24 20 16 12 8 4 o X 1*2 H H X X 2F F F F 1 A 8X 3C 3C Tvo tytes for tape backspace count Data set mode Item identification number A(input/outFut tuffer) Data count File format: fixed/variatle records Records per CMS physical block Number of bytes actually read Device type code 1*3 1*4 Mode: 1, 2, 3, 4, and 5 Number of items in extent DCB LRECL at open time I/O flags No. of DCBs using this FCB OS prs member name Pointer to CS FST Pointer to as dsname block Save area vector R13 ACDtS in-storage key table) A(PtS in-storage directory) Various mask bits Data set creation date (YDD) Data set expiration date (YDD) Section 2. CMS rata Areas and Control Blecks 181 FCBSECT Hexadecimal Displacement 6E 6F 70 71 71 72 74 75 76 77 7A 7A 7C 7C 7D 7E 7E 80 80 82 Field Naae Field Description, Contents, !eaning JFCBIND1 JFCBIND2 JFCBUFNO JFCBFTEK JFCBFALN JFCBUFL JFCEROPT JFCKEYLE JFCLIMCT FCBDSORG JFCDSORG FCBRECFM JFCRECFM JFCOPTCD FCBBLKSZ JFCBLKSI FCBLRECL JFCLRECL FCBIOSi !!i::!:§ x X X X X X A*9 A*10 3X OX 2X OX A*11 X A*12 A*13 X OH H OH H X 1X !!!:!:§ g~!!!!~g in FCBIOSW2 FCBMVFIL EQU --X'08'---FCBMMV EQU X'02' FCBMVPDS EQU X'01' 84 84 88 8S 8C DEBLNGTH DS DS IHADEB DS DEBTCBAD DS SEBSAV DS 90 94 98 DEBOFLGS DS DEBOPATB DS IOBFLG DS !!!:!:§ 98 9C AO AO AO A4 g~!!!!~g IOBBFLG IOBOUT lOB IN IOBUPD EQU EQU EQU EQU IOBNXTAD IOBECB IHAIOB DEBDEBID DEBDCBAD IOBECBCC DS DS DS DS DS DS !!!:!:§ OX F OD A F 4X 4X OX in IOBFLG --0-----X'40' X'20' X'10' A F OF OX A OX g~!!!!~g in IOBECBCC IOBBECBC EQU --12------IOBBECBP EQU 12 182 A*8 H in FCBIOSW EQU --X'80'--EQU X'40' EQU X'20' EQU X'10' EQU X'OS' EQU X'04' EQU X'02' EQU X' 0 l' FCBIOSi2 DS A*5 A*6 A*7 OX X g~!!!!~g FCBCLOSE FCBCLEAV FCBPROCC FCBPROCO FCBCASE FCBPVMB FCBIOWR FCBIORD S3 DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS A*14 Indicator one Indicator two Number of buffers Buffering technique Buffer alignment Buffer length Error option Key length Reserved for IBM use EDAM search limit Data set organization Data set organization Record format Record format Option codes Block size Block size Logical record length Logical record length I/O operation indicator Switch turned on during CLCSE operation DISP=LEAVI during CLOSE operaticn GOTO FCBPROC during CLOSE cperation GO TO FCBPROC during OPEN oFeration ON=LOWER CASE console I/C PUT-MOVE-VAR-BLK WRI'II/PUT REAI/GET A*15 I/O operation indicators Move file is active Move PDS switch for FIND Switch for MOVEFILE with PIS option Length of DEB in doutlewords Reserved for IBM use Data extent block A(.ove-mode user buffer) Dynamic save for SEB return address (OS input/output simulation) Data set status flags OPEN/CLOSE option tyte Start of IOEPREFIX for nor.al scheduling Displacement of lOB flag in IeB WRI'II,PUT in progress RBAI,GBT in progress QSAM PUTX in progress A(next buffer to be used) BCE for QSAM normal scheduling Input/output block DEE identification A(data control block) ECB completion code Displacement of ECB code in ICB Displacement of ECB pointer in lOB IBM VM/370 Data Areas and Control Block Logic FCBSECT Hexadecimal Displacement A4 A8 Field Name Field Description, Contents, Eeaning IOBECBPT DS IOBFLAG3 DS A OX A(event control block) - see IBADECB DSECT I/O error flag IOBBCSW 16 Displacement of CSi in lOB 8X EQU A B4 IOBCSW DS IOBSTART DS IOBDCBPT DS A Last CCW stored (that is, residual ceunt) X'It-NEXT BUFFER',AL3(INITIAL BUFFER) A(data control rlock) B8 B8 IOBEND FCBEND ox aD End ef input/output tlock End of FCE, JFCB, DEB, and lOB blocks (*-FCBSECT)/8 Size of FCB entry in dourlewords A8 BO DS DS FCBENSIZ EQU Section 2. CES rata Areas and Contrel Blocks 183 FCHTAB FCHTAB contains a fetch/load parameter list that points to a 3q-tyte directory list. The fetch table is used when a DOS program issues a LOAt or FEtCH request without the LIST= para.eter~ The IJBFTTAB field in the SISCO! block in the DOSCON CSECT of NUCON points tc the fetch table. o FCHAPHNM 1 A*1 DIRNAftE 8 10 18 o q 5 8 10 13 14 16 1S DIRTTR A*3 DIRRR 28 DIRVEE 1A 1D 20 22 23 26 27 DIREEE DIRAAA 1*5 Field Naae 1/1*6//1 Field Description, Contents, Meaning §-~I!~ f~!~~~!~! ~!§! FCHAPHNM DC FCHOPT DC FCH1LSNM DS PO!!!!!Y to A (DIRNAME) X'OO' A*1 AL3 J!-fi!~ Q!!~£!.Q!I~!,§! DIRNAME DS CLS DS XL3 DIRTTR DS XL1 DIRN DS XL2 DIRTT DIRLL DS XL2 DIRC DS XL1 A*2 A*3 --X'SO' f!~£!2!I 1!st Address of phase name Options Address of listname Phase name Phase TTR No. of halfwords in direct cry No. of text blocks in phase Length last text block Flag byte SELFREL RELPHSE SVAELIG SVAPHSE PCLPHSE PNOTFND DACTIVE NOTEXT EQU EQU EQU EQU EQU EQU EQU EQU DIRT DIRPPP DIREEE DIRRR DIRR DIRAAA DIRK DIRVEE DS DS DS DS DS DS DS DS XL1 XL3 XL3 XL2 XL1 XL3 XL1 XL3 FCHLENG EQU *-FCHTAB Total length in bytes (X'2A') (FCHLENG+7)/8 Total length in doublewords FCHLENDW EQU 18q DIRLL DIRPPP ~!!§ g~!!ll~g in DIRC 19 DIRTT A*2 I/A*q//I 20 Hexadecimal Displacement FCHALSNM Phase self-relocatable Phase to be relocated Phase SVA eligible Phase in SVA Phase in private core image library Phase not found Phase directory active TEXT=NO specified X'40' X'20' X'10' X'OS' X'04' X'02' X'01' A*4 A*5 A*6 Reserved for IBM use Phase load point Phase entry point No. of RLU items in phase No. of additional RLD blocks Partition start address Reserved for IBM use Phase entry point in SVA IBM VM/370 Data Areas and Control Block Logic (X'06') FICL FICL is blocks. a 2-byte table used in CMS/DOS to address system and programmer logical unit Byte 0 of FICL Foints to the first system class logical unit in the LUB table. This is always the first entry in the LUB table. The second byte points to the first programmer class logical unit in the LUB table partition area. The FICLPT field in the BGCOM blcck points to the FICL block. o 1*1 I 1*2 J Hexadecimal Displacement o 1 Field Name SYSINDX DC PROGINDX DC Field Description, Contents, Meaning AL 1 (0) A11 (14) A*1 A*2 First BG system LUB index Programmer LUBs index Section 2. CMS tata Areas and Control Blocks 185 FRDSECT FRDSECT describes the fields used by D~SFRE to reference the four free chain element header blocks. FRDSECT is invoked by the macro D~SFRT. The D!SFRT DSECT is pointed to ty a v-constant in D~SFREE, and also by the lD!SFRT field in NUCCH. 0 r FREELN 8 FREELU 10 18 FREEHN 20 28 FREEHU 30 38 40 lFREET1B 48 lC1LL Hexadecimal Displacement o 10 20 30 Field Hame FRBELOW1 1*1 1*2 Field Description, Conte_nts, Beaning lhe !.Qll.Q!!1!g Are the Four Free Chain Element Header Blocks FREELH DC -3F'0';IL1(FLiu+FLPA:iuciEY:HUCCODE,0) -Lov-storage nucleus Low storage user chain FREELU DC 3F'0',AL1(0,USERKEY,USERCOIE,O) 3F'0',AL1(FLNU.PLHC,NUCKEY,HUCCODE,O) High storage nucleus FREEHN DC High storage user chain FREEHU DC 3F'O',AL1(FLHC,USERKEY,USERCODE,O) lh~ !.Q!l.Q!!1!g ~I!~.Q!!£ ~gyg!~§ ~~§£!!~~ !h~ !.Q~at of ~~£~ .Q£ the Four Free Chain Element Header Elocks pOliTEi--EQu---O------- ------Polnter to first free element NU! EQU 4 Number of elements in chain !AX EQU 8 !aximum size of an element FLAGSEQU 12 Flag byte ~!!§ g~!ij!~g FLCLH FLCLB FLHC FLHU FLPA EQU EQU EQU EQU EQU SKEY EQU ~!!§ g~!!j!~g USERKEY NUCKEY 186 EQU EQU in FLAGS --X'SO' X'qO' X'20' X'10' X'08' Cleanup flag Overlaid chain flag High storage flag Nucleus flag Page availatle on chain 13 Storage key for this chain in SKEY --x'io' X'FO' User storage key Nucleus storage key IBM VM/370 Data Areas and Control Block Logic FRnSECT Hexadecimal Displacement Field Nalle Field Description, Contents, !eaning TCODE EQO 14 FREETAB table code ~it§ g~!!1!~g USERCODE NOCCODE TRNCODE OSIRCODE SYSCODE IUXCODE in TCODE EQU --1----EQO 2 EQO 3 EQO 4 EQO 5 EQO 5 *ONOSED EQO BLOCKLEN EQO 15 16 44 AFREETAB DC FREELOW1 DS F 48 lCILL 1 40 Ilag§ 4C DS 2~! Symbolic length of block Address of PREETAB table Original value of FREELOWE (set by INIT2) Address of caller (for errors) A (0) !!I ~!~!!g!1!g FREEFLG1 DC User free storage page Nucleus free storage page Transient area page Oser area page System page Maximum possible code value SV~ BL1'0' 201 1*1 in FREEFLG1 EQO --X'SCj",---EQO X'40' EQO X'20' EQO X'10' EQO X'08' EQO X'04' EQO X'02' EQO X'01' ~.!!§ g~!!1!gQ FRF1C FRF1V FRF1N FRF1E FRF1L FRF1H FRF1M FRF1B %h~ 4D Conditional request Variable request Nucleus request FREE (vs FRFT) request Low storage is OK High storage is OK Messages wanted on error TYPCALL equals BALR in macro IQllQ!!.ng !!I!g !!Q1Q§ Il~g§ FREEFLG2 DC BL1'0' X'10' X'08' X'04' Free Chain Element POINTER--EQU---O-SIZE EQO 4 !g th~ ]2MSIRE ROy!.!~ Cleanup flag Variable pages request flag (SCHVPGE) Second initialization routine has not yet been called by DMSINS Do a check each time FREE or FRET is called Do a check this time Executing CHECK routine now ~~u EQO EQO EQO In!§!:~l A*2 !!.!!§ g~!!1!gg !.n I!!~~~LG~ lU"In FRF2CL 1'80' FRF2SVP EQO X'40' FRF2NOI EQO X'20' FRF2CKE FRF2CKT FRF2CKX Ha!.~!Q£g ~gde Qg§£!:!E!!Q~ Pointer to next FREE element Size of this element in bytes Section 2. CMS rata Areas and Control Blocks 187 FSCBD FSCBD is a PLIST defined for general use by routines that use the CMS file syste.. is generated when the user invokes the FSCBD .acro. o FSCBCO!! 8 FSCBFN 10 FSCBFT 18 o 1A 1C 20 24 25 26 28 188 FSCEBUFF FSCBlTNO 20 FSCBSIZE 28 FSCBNORD Hexadecimal Displacement 8 10 18 FFSCBFM F*1 Field Na.e FSCBCOMM FSCBFN FSCBFT FSCBFM FSCBlTNO FSCBBUFF FSCBSIZE FSCBF.' FSCBFLG FSCBNOlT FSCBNORD FSCED F*2 FSCBNOIT Field Description, Contents, Meaning DS DS DS DS DS DS DS DS EQU DS DS CL8 CL8 CL8 CL2 H F F CL2 FSCBFV ... 1 H A F*1 F*2 File system comaand (RDBUF, WRBUF, etc.) Filena.e Filetype Filellode Relative record number to be read/written Address of read/write buffer or of STATEFST Length of buffer RECFM -- C1J1 o~_C~y1 Flag byte Number of records to be read/written Number of bytes actually read IBM VM/310 Data Areas and Control Block Logic FSTD FSTD descrites the fields in a 40-byte file status table entry as found by STATE, STATEW, DftSLFS or DftSLFSW. FSTD is functionally equivalent to the FSTSECT DSECT. o FSTFHAftE 8 FSTFTYPE 10 FSTDATEW FSTTlftEW FS'IiRPNT FSTRDPHT 18 FSTFftODE FSTRECCT FS'IFCLPT F*1 FS'IELKCT FSTYEARW FSTLRECL 20 Hexadecimal Displacement -----------0 8 10 12 14 16 18 1A 1C 1E 1F Field Naae Field Description, Contents, Beaning FSTFNAftE FSTFTYPE FSTDATEW FSTTIl'!EW FSTWRPHT FSTRDPHT FSTFftODE FSTRECCT FSTFCLPT FSTRECFft FSTFLAGS DS DS DS DS DS DS DS DS DS DS DS 1D 1D 1H 1H 1H 1H 1H 1H 1H 1C 1X F*1 F*2 in FSTF1AGS EQU --X'CO'---EQU X'80' EQU X'40' EQU X'07' EQU X'04' 10' ~"'11"'" U1) EQU 1'02' FSTACTPT EQU X'01' FSTRODSK EQU X'OO' !!i!§ g~!!~g FSTXWDSK FSTRWDSK FSTXRDSK FSTFILEA FSTACTRD .&. 20 24 26 F*2 aJ.&.A""' .... n.l..,\ Filename Filetype Date last written - .addyy Time last written - hhmmss write pointer - item number Read pointer - item number File.ode - letter and number Number of logical records First chain link pointer Record format (F or V) FST flag byte Extension of read/write disk Read/write disk Extension of read-only disk File is active (one of the following) File active for reading File active for writing File active from a point Read-only disk Jlit§ !~g~!!~g FSTDIA EQU FSTDRA EQU FSTDNI EQU for use i'40'-X'01' X'OO' !!! RDBUF FSTLRECL DS FSTBLKCT DS FSTYEARW DS 1F 1H 1H Logical record length Number of 80Q-byte blocks Year last written FSTDSIZE EQU (*-FSTD) FST size in bytes ----Item availatle Previous record null Hull record Section 2. CftS Iata Areas and Control Blocks 189 FSTSECT FSTSECT defines the file status table (FST) which describes the attributes cf a file on a CMS virtual disk. FSTSBCT is invoked by the macro FSTB. The file status tables for all files on the disk are grouped into SOO-byte disk records referred to as file status table blocks (FSTEs). Each file status table block can accommodate up to 20 file status tables. o FSTN S FSTT 10 FSTD 1S FSTIC FSTM 20 Field Name 0 S 10 14 16 lS 1A 1C lE 1F FSTN FSTT FSTD FSTWP FSTRP FSTM FSTIC FSTFCL FSTFV FSTFB FS'IIEC 1*1 1*2 FSTYR Field Description, Contents, Meaning DS DS DS DS DS DS DS DS DS DS 1D 1D 1F 1H lH 1H 1H 1H 1C 1C A*1 A*2 2I!I! FSTFRWX EOU X'CO' FSTFRW FSTFROX EOU BOU X'SO' X'40' FSTFACT FSTFIR FSTFIW FSTFAP FSTFRO EQU EQU EQU EQU EOU X'07' X'04' X'02' X'01' X'OO' Filename Filetype Date/tille last written Write pointer (item number) Read pointer Cite. number) Filellode Item count First chain link Fixed (F)/variable (V) flag Flag byte (if used) (!EE11£!~lg g~lI 2! ~!IT!! £gll) to STA1!FST COp! £! FS1-~!!I Read-only extension of read/write disk Read/write disk Read-only extension of read-only disk File is active (one of the follcwing) File active for reading File active for writing File active fro. a designated point Read-only disk ~i!§ !~g~!1~~g FSTITAV EQU FSTRECAV BQU FSTNOIT EQU for use 1'40'-X'Ol' X'OO' FSTIL FSTDBC FSTYR DS DS DS 1F 1H 1H Maximum item length SOO-tyte data block count Year FSTL BQU *-FSTSECT Size of FST in bytes (X'2S') !~ !!IEg!!212£! Parameters 800------FSTFWDP EQU FSTBKWD EQU S04 E~I 190 FSTRP -------------------------------------- ~i!§ g~!i~gg 1~ E2IE~ ~ft~ §y££g§§!yl 20 24 26 FSTCL FSTIL Hexadecimal Displacement ------------ FS'IliP RDEUF ----Item availatle Previous record null Null record Forward pointer to next hyperblock in storage Backward pointer to previous hyperblock in storage IBM VM/370 Data Areas and Control Block Logic FVSECT FVSECT is used mainly by file management and I/O routines. FVS contains save areas, work areas, and commonly used constants. A typical use of FVS is when a reentrant I/O routine requires a work area or save area, since the routine cannot modify itself. FVSECT is invoked by the FVS macro. ~I--------------------------------------------'--------------' 01 DISK$SEG I I I------------------------~ REGSAV3 38! 1-------------------------------------------------------RWFSTRG 781 1-------------------------------------------------------ADTFVS 1------------------------------------------------------REGSAVO C81 COl I A*1 100 REGSAV1 108 148 F65535 FW4 150 VFREE F10C Section 2. CMS tata Areas and Contrel Blocks 191 FVSECT , 158 VFRET JSRO 160 JSR1 R1UHD 168 F800 170 FVSDSKI DSKLOC 178 RWCNT DSKIDR 180 ADTADD 188 FINISLST FFF 198 lAO FFD FFE lA8 //////1 1*5 1BO FVSER1Sl lB8 REIDCNT FVSERlS2 1/////////////////////////// FVSFSTN lC8 FVSFSTT 1D8 FVSFSTDT FVSFSTM A*3 I 1*4 FVSER1S0 I 1*7 1CO 1DO 192 1*6 SIGNAL FVSFSTIC 1EO FVSFSTIL lE8 FVSFSTID FVSFSTRP FV~FSTiP FVSFSTCL 1*8 FVSFSTYR FVF~TDB IBM VM/370 Data Areas and Control Block Logic I 1*9 FVSFSTAC FVSECT Eexadecimal Displacement ----------0 3C 78 CO C8 104 107 Field Name Field Description, Contents, DISK$SEG REGSAV3 RWFSTRG ADTFVS DS DS DS DC 15F 15F 1aF 2F'0' For FSTLKP, FSTLKW, ACTLKP, TBKIKP, CQTRK For RtEUF, WRBUF, FINIS, S~ATE, FOINT Remaining storage for RDEUF, WREUF, FINIS ADTLKP REGSAVO DS DC DC 15F AL3 (00) AL 1 (*-*) Saved RO-R15 First 3 bytes of return code Error code ERRCODO A*1 TRKLSAVE EQU REGSAVO For REGSAV1 ERRCOD1 F65535 FW4 DS DC DC DC DC 15F AL3 (00) AL 1 (*-*) F'65535' F'4' Register save area First 3 bytes of return code Error code = X'COOOFFFF' Constant value HW4 EQU FW4+2 Constant value 150 154 158 15C 160 VFREE Fl00 VFRET JSRO JSR 1 DC DC DC DC DC V (FREE) F'100' V (FRET) F'O' F'O' Constant value Constant value Address of FRET (into R15) RO saved here for FRET calls R1 saved here for FRET calls Address of l!FD 800 l:ytes 10a 144 147 148 14C 164 RiHFD DC i (*-*j 168 16C 170 FaOO DC DC DC F'aOO' A(HW4) A (*-*) 174 DSKLST DS OF i74 DSKLOC DS 178 17C 180 184 18C 194 19C RWCNT DSKADR ADTADD FINISLST DC DC DC DC DC DC DC A (*-*j A (*-*) A (*-*) A (*-*) CLa'FINIS' CL8'*' CL8'*' CL2'*' DS DC DC DC OH X'FFFF' X'FFFE' X'FFFD' 19E 19E 1AO 1A2 ~eaning FVSDSKA FFF FFE FFD A*2 ~RKLKP/X only when called by QQTRK/X Address of the active disk table All-purpose RDTK/WRTK PLIS~ Address of item to ~e read or written Byte count (usually 800) Disk address of item to l:e read or written Address of active disk table now in use PLIS~ to close all files Halfword constants Means no significant data Fast 215th byte 1968-era ~FI still supported on input only Newest signal for 2314 handling Section 2. CMS Iata Areas and Control Elocks 193 FVSECT Hexadecimal Displacement lA4 Field Name Field Description, Contents, SIGNAL DC SIGNAL H'O' ~eaning = Scratch halfword used by READMFD or ERASE = COCO, X'FFFP', X'llFE', or X'PFPD' 00, Fl, FE, or FD lA6 UFDBUSY !!i!§ DC X'OO' A*3 in UFDBUSY EQU --X'80'--EQU X'40' EQU X'20' EQU X'10' EQU X'08' g~!i1!~g WRBIT UPBIT FNBIT ERBIT DIOBIT Nonzero means UFD is being updated WREUF UPDISK - READMlD PINIS ERASE - ALTER - READFST RDTK/WRTK DMSAEN (atend recovery routine) tMSI1S (SVC handling routine) lA7 KXFLAG lAB lAC lBO lB4 lB8 lBC in KIP LAG EQU --X'80'-EQU X'Ol' FLGSAVE FVS:FLAG DC DC DC X'OO' X'OO' X'OO' ~i§~1.!gl!~2Y§ ~!2!gg~ ERSFLAG PVSERASO FVSERASl FVSERAS2 READCNT DC DC DC DC DC DC £:il~ ~!g!Q§ STATEFST FVSFSTN FVSFSTT FVSFSTDT FVSFSTWP FVSFSTRP FVSFSTM FVSFSTIC FVSFSTCL FVSFSTFV FVSFSTFB FVSFSTIL FVSFSTDB FVSFSTYR lE8 FVSFSTAD DC STATERO 194 A*4 g~!!1!~g lCO lCO lC8 lDO lD4 lD6 lD8 lDA lDC lDE lDF lEO lE4 lE6 lEC X'OO' KXWANT KXWSVC !!i!§ lA8 lA9 lAA DC DS DC DC DC DC DC DC DC DC DC DC DC DC DC EQU X'OO' F'O' P'O' P'O' P'O' P'O' Table ---aD (£:~~) D'O' D'O' 2H'0' H'O' H'O' H'O' H'O' H'O', C' X'OO' F'O' H'O' , 2C' A(0) HX wanted as soon as possible Hold HX until any SVC activity A*5 A*6 Reserved for IBM use Par scratch use (for example, by RELUPD) Par general use (as needed) ~RA~! (QI !!!1!AM~) Plag for use by ERASE or RENAME RO to/from FSTLKW (for ERASE) Rl to ACTLKP or PSTLKW (for ERASE) Address of free storage used by ERASE Current read count (DMSBRD) Reserved for IBM use £2.£1 from S'IATE -Pull-PST-of file (STATE) Pilename Piletype Date/time last written Write pointer Cite. ID) Read pointer (item ID) File.ode Numher of items in file tisk address (first chain link) A*8 Fixed (F)/variable(V) indicator A*9 Flag byte Length of largest item in file Number of data tlocks Year last written A(active disk table for this file) FVSFSTAD FVSFSTAC DC A(0) STATER 1 FVSFSTAC EQU HX flags A(real PST entry for this file) IBM VM/370 Data Areas and Control Block Logic IBADECE IHADECB, which is invoked via the CMSCB macro, is the simulated data event control blcck used for CMS processing of OS macros and OS access methods. The ICEECBPT field in FCBSECT points to IBADECB. o DECSDECB 8 DECDCBAD DECAREA 10 DECIOBPT DECKYADR 18 DECRECPT Hexadecimal Displacement -----------0 4 Field Name DEC'IYPE DECLNGTB Field Description, Contents, Meaning DECSDECB DS DECTYPE DS F H Event control block Type of I/O request ~!!§ Q~!!neQ 6 8 C 10 14 18 DECBRD DECBWR in DECTYPE BQU --X'80'--EQU X'20' Read SF Write SF DECLNGTB DECDCBAD DECAREA DECIOBPT DS DS DS DS B A A A Length of key and data V(data control tlock) V(key and data, buffer) V (IOE) A A V (key) V(block reference fieldj !m!~ ~!!g1!§!521! DECKYADR DS DECRECPT DS Fr~gy~1!!11 ~§~Q ~gy~!g§ DDNAM BLK BS DA FXD IS LOC MOV PS PO PREVIOUS QS UND VAR EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU FCBDSTYP X'10' X'20' X'20' X'80' X'80' X'08' X'10' X'40' X'02' X'80' X'40' X'CO' X'40' Filetype = data set name RECFM=blocked records !UCRF=BSAM DSORG=direct access RECFM=fixed-length records DSORG=indexed sequential MACRF=locate mode !UCRF=move mode DSORG=physical sequential DSORG=partitioned organization OFLGS=previous I/O operaticn MACRF=QSAM RECFM=undefined format records RECFM=variatle-length records Section 2. CMS rata Areas and Control Blocks 195 IOSECT IOSECT describes the fields used by DftSITI for save registers, I/O cld PSi, and other data when handling I/O interrupts. IOSECT is pointed to by the AIOSECT field in NUCON. o lOS AVE 40 AUSRITBL IONTABL AUSRILS7 48 50 OLDEST 60 NEXTO 70 IOPSi 78 IOCSi HOLD 80 88 Hexadeci.al Displace.ent o 40 44 48 4C 50 60 70 78 80 84 86 88 196 VSTRANGE 1///1////////// --------·------------------------------------~~~----I //////////////////////////////1/////////1///1//////////1, Pield Na.e IOSIVE DS IONTIBL DC AUSRITBL DC DC AUSRILST DC OLDEST DS NEXTO DS DS IOPSi DS IOCSi HOLD DC VSTRANGE DC DC DC Pield Description, Contents, !eaning 16P P'O' A (0) P'28' A (0) 4P 4P 2P 2P P'O' H'O' 1H' O· 2P'0' Register save area Size of user interrupt table in doublewords Address of user interrupt table Length of each entry Address of last entry in table Oldest I/O old PSi and CSi Next oldest I/O old PSi and CSi Newest I/O old PSi Newest CSli Holds entry pointer for device Unknown device address saved here Reserved for IB! use Reserved for IB! use IBM VM/370 Data Areas and Control Block Logic KEYSECT KEYSECT defines the key table used in os simulation KFYSECT is built dynamically from CMS free storage. KEYLNGTH 0 files for I/O by key. rATAINE 8 KEYOP 10 KEYNAME 18 KEYTYPE 20 of BDAM KEYMODE 28 KEYTBLNO KEY'IBLAD TBLLNGTH A*l 1*2 KEYCOUT 30 KEYTIELE Hexadecimal Displacement -----------0 4 8 10 18 20 22 24 28 2C 2D 2E 30 34 Field Name KEYLNGTH DATAEND KEYOP KEYNAME KEYTYPE KEYMODE KEYTBLNO KEYTBLAD TBLLNGTH KEYFORM KEYCHNG KEYCOUT Field Description, Contents, Meaning DS DS DS DS DS DS DS DS DS DS DS DS DS KEYTABLE DS 1F 1F 2F 2F 2F lH 1H IF 1F 1X 1X 1H 1F OF -------------------------------------- 1*1 A*2 Key length Pointer to last data item in file Start of PLIST for keys file Filename of keys file Filetype of keys file File!!!ode of keys file Item number of key table Address of key table Eyte size of key table Format of keys file Indicates change in key table Blocking factor of key table Number of bytes read Start of keys table (item number) Section 2. CMS rata Areas and Contrel Blocks 197 LDRST LDRST describes the fields of ottained and built by DMSLDR. storage. the work area used by the loader. The work area is LDRST is built dyna.ically ty D!SLDR fro. CMS free I o 8 10 18 20 28 I GPRSAV ~-------------------------I I LOCSAV ------------------------------------------------------1 RETT LCCCT I ------------------------------------------------------1 BRAD TELREF 1 ------------------------------------------------------1 A*1 A*2 TBLCT A*3 1//////1/////1///////1 ----------------------------------------------------1 /////////////1//////////////1/////1///////1/////////////1 30 RLDCONST 38 RETREG PARMLIST SPEC 358 360 ESIDTE 558 APSV 560 598 TEMPST SAO 5A8 FILE 5BO REAtEUF 5B8 FNAME 5CO FTYPE 5C8 5DO 198 CRDPTR TMPLOC RITEM FMODE RLENG RADD RFIX IBM VM/370 Data Areas and Control Elock Logic RNUM LDRST , NUKBYTE 5D81 I--------------------------~ FINIS 5EOI 1----------------------------------------------------A*4 1////////////////////1 5F81 I I 5FC SYSUT1 (44 bytes) 628 TYPLIN 630 TYPREAD 638 DSKLIN DSKAD 650 658 HEX CON 660 • IOUTPUT 670 OUTBUF PRVCNT 6DO 6D8 SAV67 ' .... n o.r.v ENTIA!!E 6E81 ENTADR K!ftBOUND 1--------·-------------------------------------------PLISTSAV 6FOI 1--------·-------------------------------------------REG13SAV A*5 8FOI Section 2. CftS tata Areas and Control Blocks 199 LDRST Hexadecimal Displacement o C 10 14 1S 1C 20 Field Name GPRSAV LOCSAV RETT LOCCT BRAD TBLREF FLAG1 Field Description, Contents, Meaning DS DS DS DS DS DS DS ~J::!;§ g~!i!l~g 21 ABSOLUTE FSTXTADR COIU!OBEI PREXIST ENDCDADR NOERASE WORKFILE NODUP EQU EQU EQU EQU EQU EQU EQU EQU FLAG2 DS ~i!§ g~!i!l~g 22 24 STRINITC NOIUP APRILB NOAUTO TYPE NOREP NOINV NOLIBE EQU EQU EQU EQU EQU EQU EQU EQU TBLCT FLAG3 DS DS 3F F F F F F X A*l R9 through R12 Base register contains A(D!SLDRA) Return register for D~SLSB (LOCeNT) next load location (STRT1DDR) start execution address (lLtRTBL) top of loader table Loader switches (permanent) in FLAGl -i'80'- Absolute loading First text address saved Common entries exist in loader table PR entries exist in loader table Allow end card address Do not erase the load map Work file (SYSUT1) exists Do not type message DMSLI0202W X'40' X'20' X'10' I'OS' X'04' X'02' X'01' x 1*2 Loader switches (permanent) in FLAG2 -i'80'-- Call STRINIT in LOAD MOD Do not create a load map REP card processing control No automatic text deck checking Type load map at terminal No REP card printing No invalid card typeout Bo automatic TXT library searching X'40' X'20' X'10' X'OS' X'04' 1'02' X'01' H X A*3 Number of entries in loader table flags ~ore Processing names from command list 25 26 30 34 3S 3C 3SC SSC S9C SAO SA4 SAS SBO SBS SCO SCS SCA SCC SDO SD4 SD6 200 DS DS RLDCONST DS PARMLIST DS RETREG DS SPEC DS ESIDTB DS APSV DS TEMPST DS TMPLOC DS CRDPTR DS FILE DS READBUF DS FNAME DS FTYPE DS FMODE DS RITEM DS RADD DS RLENG DS RFIX DS RNUM DS X SH F F F 200F 2568 16F F F F D 2F 2F 2F 8 H F F H H Reserved for IB~ use Reserved for IBM use Relocation constant Updated parameter list pointer Return register 10-card input buffer 256 ESD entries; otject deck Register save area for subroutine calls Temporary RLD routine storage Temporary storage Input card pointer Save location for DMSLIB Input read parameter list Filenalle Filetype File.ode Number of items Buffer address Buffer length Fixed/variatle flag byte Number of items IBM VM/310 Data Areas and Control Block Logic LDRST Hexadecimal Displacement 5D8 5DC 5F8 Field Name Field Description, Contents, Meaning NUMBYTE FINIS FLAGS DS DS DS F START ONEDYNA ESD1ST NOSLCADR SET LIB CLOSELIB LUNDEF RESET EQU EQU EQU EQU EQU EQU EQU EQU X'80' X'40' X'20' X'10' X'08' X'04' X'02' X"01" Start execution requested One call to dynamic loading per text file First ESt data item this card No address field in SLC card Set up for library searching Clear TXTLIE searching Undefined entries exist in loader table Reset "entry" specified DS DS DS DS DS DS DS 3X SYSUT1 TYPLIN TYPEAD DSKLIN DSKAD HEXCON 2F 2F 7F 13X 14X Library search work area peinter RLD work file PLISTs TYPLIN parameter list TYPLIN buffer address Disk parameter list for load map PACK UNPACK EQU EQU HEXCON HEXCON+5 66F 670 OUTPUT OUTBUF DS DS X 6D4 6D8 6EO PRVCNT SAV67 ENTNAME DS DS DS H 2F CL8 6E8 6EC 6FO SFO 8F4 SF8 ENTADR MEMBOUND PLISTSAV REG13SAV FRSTSDID END FREE DS DS F DS 64D DS DS DS F X NEED EQU 5F9 5FC 628 630 638 654 661 7F X A*4 l1F Number of bytes actually read FINIS parameter list Loader switches (nonpermanent) Hexadecimal constant Hexadecimal constant Hexadecimal constant 100X F A*5 Output buffer for load map and terminal printing Address of next PR load address Temporary save area of R6 and R7 Entry name (reset ENTRY or entry control card) Entry name's loader table location Low extend of free storage (FREELOiE) LOAD (INCLUrE; PLIST saved Address of LDRST First section definition identification OD (ENDFREE-LDRST)/8 The following equates refer to displacements and flags in the REFTABLE entry usually pointed to by register 12 !g!~: REFNAME REFLG1 REFPRB REFPRH REFPRF REFPRD REFUND REFCXD REFCOM REFiEX REF NOB REFLIB REFINFO EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU REFVAL REFLG2 REFCMD EQU EQU EQU o 8 X'7C' X'7D' X'7E' X'7F' X'80' X'81' X'82' X'83' X'90' X'10' 9 13 16 X'80' Displacement of 8-byte name field Displacement of flag byte 1 PR - byte alignment PR - halfword alignment PR - fullword alignment PR - doubleword alignment Undefined symbol Resolve CXD Define common area Weak external reference LIEE card - nonobligatory Single bit for nonobligatory LIBE card Displacement of relocation facter or maximum address Displacement of absolute or assigned value Displacement of flag byte 2 Command line name - must resolve Section 2. CMS rata Areas and Contrel Blocks 201 LUBTAB, LUBPR LUBTAB is a device table that has a 2-byte entry for each symtolic name used by CMS/DOS. The simulated LUB has 255 entries: 14 entries for the system logical units and 241 entries for Frogrammer logical units. System devices (SYSRDR, SYSIPT, SYSPCH, SYSLST, and SYSLOG) can be assigned to alternate devices. The system and programmer tables are defined with separate DSECTs: LUBTAB and LUBPR. LUBTAB is pointed to by the LUEPT field in BGCOM. The address of the first LUB entry is in the first tyte of the FICL control tlock. System (LUBTAB) I 0 I LUBRDR lUBIPT LUEPCH I 8 I lUB10G 1//1UB1NK/////1 LUERIS I 10 I LUBR1B 1//1UBUSE/////I//LUERIC//////1 I 18 1//1UBVIS////1 lUBCAT LUBLST LUBSLB LUBCLE Programmer (lUBPR) o lUB001 lUBOOO Hexadecimal Displacement o 2 4 6 8 A C E 10 12 14 16 18 1A o 2 4 6 8 1EO 202 LUB003 lUB004 through LU13239 8 1EO LU13C02 lUB240 LUB241 Field Name 2I.§te l! lUBRDR LUBIPT lUBPCH lUB1ST lUB10G lUB1NK lUBRES lUB51B lUBR1B lUBUSE lUBREC LUBC1B LUBVIS lUBCAT Field Description, Contents, Meaning 1!!~.§ DS DS DS DS DS DS DS DS DS DS DS DS DS DS f!.Qg!g.!!!!~! X12 X12 X12 X12 112 112 X12 112 X12 X12 112 112 X12 112 System virtual reader System virtual input device System virtual punch System virtual printer Terminal Reserved for IBM use Systea residence volume Private source statement library Private relocatable library Reserved for IBM use Reserved for IBM use Private core i.age library Reserved for IBM use VSAM catalog Programmer logical unit blcck Programmer logical unit blcck Programmer logical unit blcck Programmer logical unit block LU13CC4 through LUB239 are defined with DS and XL2. Each is a prograamer logical unit block. Programmer logical unit tlock lU!!§ LUBOOO LUB001 LUB002 LUB003 DS DS DS DS XL2 X12 X12 X12 LUB240 DS 112 IBM VM/370 Data Areas and Control Block Logic LUBTAB. LUEPB Eexadecimal Displacement Field Name lE2 LUB241 DS XL2 Programmer logical unit blcck LUBP LUBJ EQU EQU 0 1 Displacement to PUB pOinter Displacement to JIB pointer LUBL EQU *-LUB241 LUE length ------------ Field Description. Contents, Section 2. C~S ~eaning Iata Areas and Control Blocks 203 NICL Byte 0 of the Number In Class block (NICL) contains the numher of system class logical units. The second byte contains the number of programmer class logical units for the partition. The NICLPT field in the BGCOM block points to the NICL tlock. o A*1 A*2 .J Hexadecimal Displacement -----------0 1 204 Field Name BOSIS BOPROG Field Description, Contents, Meaning DC DC AL 1 (14) At 1 (242) A*1 A*2 Total number of system LUBs Total number of programmer LUEs IBM VM/370 Data Areas and Control Block Logic NUCCN NUCON is the nucleus constant area of CMS. o IPLPSW 8 IPLCCW1 10 IPLCCW2 18 EXTOPSW 20 SVCOPSW 28 PGiiOPSi 30 MCKOPSW 38 IOOPSW 40 CSW 48 CAW 1//////II/INUCRSV1////IIIII/ 50 TIMER 1//I/I/////NUCRSV2/1/11//111 58 EXTNPSW 60 SVCNPSW 68 PGMNPSW 70 MCKNPSW 78 IONPSW 80 CPULOG 88 I 90111////////NUCRSV4///////////1 MONCLASS PERCODE 1--981 PERADDR MCNCODE I AOII////////////////////////NUCRSV5//I/////////////I/11/11/ 11//////////////////////////////1//////1111///1/1//////// 1//1///////////////////////////1/1/////1/1//////11////III I I COl LOWSAVE I 1------------------------------------------------FPRLOG 1601 1--------·-----------------------------------------GPRLOG 1801 L -_________________________________________________ J Section 2. CMS Lata Areas and Centrel Blocks 205 NOCON I lCOI ECBLOG 1-----------------------------------------------------SYSTEMID 2001 1------------------------------------------------------INSTALID 2201 1------------------------------------------------------SYSNAME 1----------------------------------------------------D!VICE 2681 IPLADDB SYSADDB 2601 1 2701//////////NOCBSV6///////////1 1 ' 2781 FEIBM 1-----------------------------------------------------COBBDATE 1-----------------------------------------------------2881 COBBTIME 1-------------------------------------------------------COBRCPOT 2901 COBBVIBT 1----------------------------------------------------LASTCPUT 2981 LASTVIRT 1-----------------------------------------------------2AOJ LASTCMND 1------------------------------------------------------2A81 PBEVCMND 1-----------------------------------------------------2BOI LASTEXEC 1------------------------------------------------------2B81 PBEVEXEC 2801 1---------------------------------------------------LASTLMOD 2COI 2C8 LASTTMOD 2DO DATIPCMS 2D8 CLKVALMD 2EO MACDIBC 300 MACLIBL 1------------------------------------------------------MACLBSV TXLIBSV 1---------------------------------------------------------TXTDIBC TOTLIBS 3501 3481 ~------------------------------------------.--------~ 206 IBM VM/370 Data Areas and Control Elock Logic NUCCN TXTLlES 358 3AO GRS015 LOC0176 3A8 FlRSTDMP LASTDMP 3BO FRS06 DMPTlT 3B8 ////////////////////////////1 DMPTlTLE SVC$202 440 II////////GLBLTABL//////////I 448 1/////1///1/1/ ERR$202 ---------------------------------------------------1 A*1 1///1/1/111/11 AEAiPROC I A*2 ---------------------------------------------------1 ABATABND AEAiLIMT I ----------------------------------------------------1 AUSERST 1//1///1//1/1//111///1//11111 450 458 460 468 /1/1111111111111111///1111/11 tOSLBSV 1-------------------------------------------------DOSDIRC 4701 490· 4D8 DOSLIEL A*3 A*4 ALiASAVE 11///////////1 4EO ABGCOM ASYSCOM 4E8 ADOSDCSS SVC12SAV 4FO DOSFlRST 4F8 APPSAVE DOSTRANS 500 MAlNLlST MAINSTRT 508 FREELIST FREENUM 510 MAlNHlGH FR!ELOWE 518 FREELOWR FREEUPPR 520 ANUCEND AUSRAREA DOSNUM 11/1/11////// Section 2. CMS tata Areas and Control Blocks 207 NUCON 528 CURRS1VE 530 lDMSFRT VC1DTLKP 538 VCADTNXT VC1DTLKW 540 CURRIOOP PENDRE1D 548 PENDWRIT FS'IFINRD 550 LSTFINRD lINTRTBL 558 10UTRTBL 560 VMSIZE lLIRTBLS 568 STRTADDR PRSTLOC 570 LASTLOC LOCCNT 578 LDR1DDR LDRRTCD COtE203 NUMFINRD 580 NUMPNDWR PSi 588 590 PCTCMSFS LDRFL1GS TBENT I 1*5 598 PREOLD GE'I1 1*6 DSYM SAO JSYM A*7 I 5A8 ALIA SENT 5BO DYlilEliD 1/////////////////////////// SB8 ////////////////////////////1/////////////////////////// 5CO 208 FCBFIRST PCENUM 1//////1 A*8 SC8 ////////////////////////////1 LINKLAST SDO LINKSTRT TAXE1DDR SD8 ATSOCPPL tCBSAV SEO A*9 1*10 1*11 I 1*12 5E8 A*1S A*16 A*17 1///////1 1////////////1 1*13 ISYSBAMS SPO ACMSSEG AD!SLIO 5F8 VCFSTLKP VCFSTLKW 600 AFVS AOPSECT 608 ADEVTAB APSTLKP 610 AGETCLK APSTLKW IBM VM/370 Data Areas and Control Block Logic A*14 NUCCN 618 APIE AIADT 620 AUSER ARtTK 628 ASCANN !S5T!T 630 ATABEND ASOBSECT 638 AOSMODL 640 ASTRINIT IAtT 648 APREE AFRET 650 ADMSPIOC APGMSECT 658 A~U;;).r.\..J. A.&JD.r.l:lA .... "" 660 ADIOSECT AAENSVC 668 ADMSERL ADMSCRD 670 ADMSPREB ASVCSECT 678 AADTLKP AUPUFD 680 ASTATEXT A05RET 688 ACMSRET ASCANO 690 AEXEC AS'IART 698 AADTLKW AUSABRV 6AO AEXTSECT ASCBPTR 6A8 ADMSROS 6BO AACTLKP AACTNXT 6B8 AACTFREE AACTFRET 6CO AADTNXT ATRKLKP 6C8 ATRKLKPX AQQTRK 6DO AQQTRKX AERASE 6D8 ATYPSRCH AUPDISK 6EO AKILLEX ATFINIS 6E8 ARDBUF AWRBUF 6FO APINIS AS'IATE 6F8 ASTATEW APCINT .I AWRTK .. -r"",,.n,..m ~T\ .. n,;tV1:'ro LtMSROS CDMSROS Section 2. CMS tata Areas and Control Blocks 209 NUCON CONCCWS 700 708 710 CONINELK 718 CONINEUF 7AO CftNDLINE 848 CftNDLIST A60 CONSTICK BAO FREES AVE BEO BALRSAVE C20 WAITSAVE C60 C68 ----------------------------------------------------1 PCTVSlft 1//////////////1///////////////////////////1 ADIKQLAB -------1 NDIKQLAB I --------------------------------------------------1 C70 ARURTBL ADftSVIB I C78 ---------------------------------------------------1 IVIPWORK A*18 1////////////////////1 ---------------------------------------------------1 AVSAftSYS AAI!SSYS I ---------------------------------------------------1 C88 AVSREOJ AVSRWORK 1 ---------------------------------------------------1 C90 ACBLIST 1///////////////////////////1 ---------------------------------------------------1 C98 ////////////////////////////1///////////////////////////1 C80 I 210 IBM VM/370 Data Areas and Centrol Block Logic NUCCN Hexadecimal £isplacement o Field Name Field Description, Contents, Meaning l1gfhill~ !!.§g~ IPLPSW IPLCCW1 IPLCCi2 DS DS DS 1D 1D iD Initial program load of PSi Initial program load of CCi1 Initial program load of CCi2 10 14 RSTNPSW RSTOPSW ACMSCVT ASYSREF ORG DS DS DS DS IPLPSW 1D 1D 1F 1F PSi restart new PSi PSi restart old PSi Address of simulated as CVT Address of nucleus address table 18 20 28 30 38 40 48 4C 50 54 58 60 68 70 78 80 EXTOPSW SVCOPSW PGMOPSW MCKOPSW IOOPSW CSW CAW NUCRSV1 TIMER NUCRSV2 EXTNPSW SVCNPSW PGMNPSi MCKNPSi IONPSW CPULOG DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS 1D 1D 1D 1D 1D 1D 1F 1F 1F 1F 1D 1D 1D 1D 1D 48D External old PSi Supervisor call old PSW Program old PSi Machine-Gheck old PSi Input/output old PSi Channel status word Channel address word Reserved for IBM use Interval timer Reserved for IBM use External new PSi Supervisor call new PSi Program new PSi Machine-check new PSi Input/output new PSi Processor logout area 80 NUCRSV3 ORG DS CPULOG 2D Reserved for IBM use 90 DS DS DS DS DS DS DS DS DS DS 1F 1H 1H 1F 1F 4D XL160 4D 1CO NUCRSV4 MONCLASS PERCODE PERADDR MONCODE NUCRSV5 LOWSAVE FPRLOG GPRLOG ECRLOG 200 220 260 268 26A 26C 270 274 280 .§I.§te.! !!.§gg~ SYSTEMID DS INSTALID DS SYSNAME DS IPLADDR DS SYSADDR DS DEVICE DS NUCRSV6 DS FEIBM DC DIAGTIME DS CL32 System name and date CL64 Installation identification CL8 Name of saved system loaded (via IPL) 1H Address of device loaded (via IFL) 1H Address of system disk 1F Name of device causing last I/O interrupt 1F Reserved for IBM use CL12'FEIBM154067' FE service number CL24 Euffer for tIAGNOSE timer 280 ORG CURRDATE DS DIAGTIME CL8 Current date - mm/dd/yy CURRTIME CURRVIRT CURRCPUT LASTVIRT LASTCPUT LASTCMND PREVCMND LASTEXEC PREVEXEC CL8 1F 1F 1F 1F CL8' CL8' CL8' CL8' Current time - hh.mm.ss Current elaFsed virtual time used Current elapsed processor time used previous elapsed virtual time used Previous elapsed processor time used Last command issued Next to last command Last EXEC procedure Next to last EXEC procedure 8 10 o 8 94 96 98 9C AO CO 160 180 288 290 294 298 29C 2AO 2A8 2BO 2B8 DS DS DS DS DS DC DC DC DC Reserved for IBM use Monitor call class number Progra: event recorder code Program event recorder address MONliOR CALL code Reserved for IBM use Save area for first 160 bytes of storage Floating-point register logout area General-purFcse register lcgcut area Extended control register logout area 16F 16F • • • • Section 2. CMS tata Areas and Control Blocks 211 NUCON Hexadecimal Displacement 2CO 2C8 2DO 2D8 2EO 300 34S 34C 350 354 358 3AO 3AO 3A4 3A8 3AC 3BO 3B4 3B8 3BC 440 444 446 44S 44C 44E Field Name Field Description, Contents, !eaning LASTLMOD LASTTMOD DATIPCMS CLKVALMD !1~f!~ DC DC DC DC !!,ng !!!!! MACDIRC MACLIBL TXLIBSV ftACLBSV TOTLIBS TXTDIRC TXTLIBS DC DC DC DC DC DC DC CLS' , CL8'ACCESS' D'O' D'O' DS DC DC DC DC DC DC DC DMPTITLE DC GLBLTIBL DC DC SVCS202 SVC ERRS202 DC BR DC -------iddress of macro library directories 8A (0) 1SF'-1' Current macro library nalles Library save area for TXTLIES F'O' Library save area for MICLIES F'O' Total global chains (in bytes) F'O' A (0) Address of TEXT library directories Current TEXT library nalles 18F'-1' OD A(GPRLOG) A(LOWSAVE) A(O) A(O) A(FPRLOG) A(DMPTITLE) 4X 'FF' CL132" F'O' H'O' 202 A(*+4) 14 H' 0' 450 BATFLAG2 DC !!.!!§ 1X'00' Batch monitor running Loading batch processor Suppress user job execution Batch reader error CP co •• and executing User job executing MOVEPILE executing from terminal User job being flushed A*2 in BATPLAG2 EQU --X'80'---EQU X'40' EQU X'20' EQU X'10' EQU X'OS' EQU X'04' EQU X'02' EQU X'01' g~!.!1!~g BATXLIM BATXCPU BATXPRT BATXPUN BATDCMS BATIPLSS BATSTOP BATSYSAB 452 212 in BATFLIGS EQU --X'80'---EQU 1'40' EQU X'20' EQU X'10' EQU X'OS' EQU X'04' EQU X'02' EQU X'01' g~!.!1!!!g BATRUN BATLOAD BATBOEI BATRERR BATCPEX BATUSEX BATMOVE BATTERM 454 458 45C 460 464 DEEUG DUMP PLIST Address of GPR save area Address of low storage save area Address of first location to dumF Address of last location to dU.F Address of PPR save area Address of duap title line Reserved for IBft use DUllp title line Reserved for IBM use Used for alignment COli. on SVC for reentrant ccde User will fill if necessary Return to caller Reserved for IBft use Batch flags !!.!!§ 451 module LOADMOD into .ain storage module LOIDMOD into transient area (am/dd/yy) at last IPL C!S (STCK fora) at midnight (0000 hours) 1!~!!!!I Pointers Q~Ryg QY~f ~g!g!!!!!!!§ DUftPLIST GRS015 LOC0116 FIRSTDMP LASTDftP FRS06 DftPTIT Last Last Date Tille DC 2X'00' !!~!fh ~!~f~§§~! ~,n!!I R~!1!!§ ABATPROC ABATABBD ABATLlftT AUSERST DC DC DC DC DC A(O) A(O) A(O) A(O) 2F'0' More batch flags User job limit exceeded Processor time exceeded No. of printed lines exceeded No. of punched cards exceeded Disabled CMS co.mand called Batch loading (via IPL) saved system Batch stopping after current job System abnormal termination in process Reserved for IBM use Main entry User job abend entry User job limits table Virtual machine restart entry point Reserved for IBM use IBM VM/310 Data Areas and Control Block Logic NUCCN Hexadecimal Displacement Field Name Field Description, Contents, Meaning -----------46C 470 490 4D8 !!Q'§ b.!!!!~n DC DC DC DC DOSLBSV DOSDIRC DOSLIBL DOSFLAGS Pointers ---Fio'8A (0) 18F '-1 • X'OO' 1*3 ll.!!§ g~!.!!!~g in DOSFLAGS DOSMODE EQU --X'80'---DOSSVC EQU X'40' DOSVSAM EQU X'20' DOSCOMP EQU X'10' EQU DOSPIO X'08' VSMINSTL EQU X'-04' 4D9 4DA 4DC 4EO 4E4 4E8 4EC 4FO 4FO 4F6 4F8 4FC 500 504 508 SOC 510 514 518 51C 520 524 528 52C 52E 530 534 538 53C 540 544 548 54C 550 554 558 55C SSE DOSRC DC ALTASAVE ABGCOM ASISCOM ADOSDCSS SVC 12SAV DOSFIRST DOSNUM DOSKPART APPSAVE DOSTRANS DC DC DC DC DC DC DC DC DS DC DC fil~ ~!g!gg~ MAINLIST MAINSTRT FREELIST FREENUM MAINBIGH FREELOWE FREELOWR FREEUPPR ANUCEND AUSRAREA CURRSAVE CODE203 FRERESPG DC DC DC DC DC DC DC DC DC DC DC DC DS ADMSFRT VCADTLKP VCADTNXT VCADTLKW DC DS DC DC ~g1!sol~ CURRIOOP PENDREAD PEND WRIT FSTFINRD LSTFINRD AINTRTBL AOUTRTBL NUMFINRD NUftPNDiR DOS environment flag DOS SVC simulation flag DOS iSAft running flag DOS compiler running flag DOS printer indicator VSAft installation flag to relocate DCSS table X'OO' !*4 2X' 00' V (LTASAVE) V (BGCOM) V (SISCOM) A(0) F'O' A(0) B'O' B'O' V(PPSAVE) A(0) DOS return code to user Reserved for IBM use Address of LTA save area Address of partition communication region Address of system communication region Address of LOS DCSS Work area for SiC 12 Address of first DOSCB in chain Number of DOSCBs in chain Number of K-bytes in DOS partition Address of problem program save area Address of ros transient area Pointers --i(O)"-V (USERAREA) V(NUCEND) F'1' V(USERAREA) V(NUCEND) V (TRANSAR) A(0) V (NUCEND) V (INITSUB) A(0) BiOi B'2' V(DMSFRT) A(DMSLAD) A(DMSLADN) A(DMSLADW) Pointers UQ ---1(0)"DC DC DC DC DC DC DC DC DC Library save area for DOSLIES Address of ros library directories Current ros library names DOS simulation flags A(0) A(CONSTACK) A(0) A(0) A(0) A(0) H'O' B'O' Address of first block of user free storage Address of the start of user free storage Address of first block of system storage Number of blocks of system storage High extend of user free storage Low extend of systeM free storage Lower limit of system free storage Upper limit of system free storage Address of end of nucleus storage area Address of teginning of user area Address of current save area Code number of last SiC 203 Amount of user storage to reserve for CftS free storage (pages: >=2) DftSFRE work area EALR equivalent of ADTLKP EALR equivalent of ADTNXT EALR equivalent of ADTLKW Address of current I/O buffer Address of pending read operation Address of pending write oFeration Address of finished read buffer Address of last finished read buffer Address of user input translate table Address of user output translate table NUBber of finished read buffers Number of pending write operaticns Section 2. CMS Lata Areas and Control Blocks 213 NUCON Hexadecimal Displacement Pield Name Field Description, Contents, eeaning 1~gde! 560 564 568 56C 570 574 578 57C 580 588 58C 590 592 593 Information VMSIZE ALDRTBLS DC lP'O' STRTADDR DC lP'O' PRSTLOC DC lP'O' LASTLOC DC lP'O' LOCCNT DC lP' 0' LDRADDR DC IF'O' LDRRTCD DC lP'O' PSW DC lD'O' LDRPLAGS DC 1P'0' PRHOLD DC lP'O' TBENT DC H'O' UNRES DC X'OO' MODFLGS DC 1X • 00' !!.!!§ 594 598 5-AO 5A4 5A5 SAC 5BO 5B4 5CO 5CO 5C4 5C6 5C7 --ns----1P- g~!!1!gg EQU EQU EQU EQU EQU MDPCALL I10D6 I10D7 EQU EQU EQU X'04' X'02' X'Ol' GETl DSYM DC DC JSI-~ DC 1F ';0 , 2F· 0' P'O' C'Z' XL7'0' 1F'0' lP' 0' 3F DC DC ALIASENT DC DYNAEND DC DS Q~ ~i.lYlg!!.Q1! FCBTAB DS FCBFIRST DC FCBNUM DC DC OSSPLAGS DC ~i!§ g~!!!!~g 5C8 5CC 5DO 5D4 5D8 5DC 214 in MODPLGS --X'80'--- NOMAPFLG CLEAROP MODGNDOS MODGNALL SYSLOAD NXTSYM COMPSWT OSSMNU OSRESET OSWAlT DYLD DYLIBO DYLIBNOW DYMBRNM EQU EQU EQU EQU EQU EQU EQU EQU LINKLAST LINKSTRT TAXEADDR ATSOCPPL DCBSAV DC DC DC DC DC DC A*5 A*6 Virtual storage size Address of loader tatles I10dule starting address Module beginning address Module ending address Loader location counter Loader return address Loader return code User's starting PSW Loader flags Pseudo register counter Initialize table entries tc zeros Unresolved reference bit for CMS loader Flags NOMAP flag CLEAR option flag Module generated with DOS option Module generated with ALL option Allow load greater than FREELCWE or less than transient Indicate module called by DMseDI Reserved for IBM use Reserved for IBe use X'40' X'20' X'10' X'08' DMSLSY R1 save location DI1SL~Y work space -D1!-SI.-S1- -u-n-i q-u-e id-en t i f ier ba se A*7 First character of unique identifier Rest of unique identifier Alias entry point (dynamic load) Maximum load location (dynamic load) Reserved for IBe use Pointers -0i5----A (0) H'O' X'OO' X'OO' A*8 FCE chain anchor Address of first FCB Numter of FeBs in chain Reserved for IBe use OS simulation flags in OSSFLAGS --X'80'---X'40' 1'20' X'10' X'08' X'04' X'02' X'Ol' A (0) A (0) A (0) A (0) V (CPP) IF' 0' COlBpiler switch DMSSMN unconditional flag Reset for as Wait for as Dynamic loading in process Omit dynamic litrary scan Dynamic library scan Linked via member nalBe Reserved for IBe use Address of last OS linkage block Address of entry point of last module Terminal attention exit element address Address of !MP PLIST for TSC programs DCE restoration address IBM VM/370 Data Areas and Control Block Logic NUCCN Hexadecimal Displacement 5EO Field Name Field Description, Contents, Meaning OPTFLAGS DC 1X'00' A*9 in OPTFLAGS EQO --X i 80i ---EQU X'40' EQU X'20' EQU X'10' EQU X'08' EQU X'04' ~1!:§ g~!!!!gg NOIMPEX NOIMPCP NOSTDSYN NOABBREV NOPAGREL NOREAD 5E1 MISFLAGS DC No No No No No No A*10 1X'00' in MISFLAGS EQU --X'80'---EQU X'40' EQU X'20' EQU X'10' EQU X'08' EQU X'04' EQU X'02' EQU X' 0 l ' ~!!§ g~!!!!gg KXSWITCH KOSWITCH RELPAGES GRAFDEV QSWITCH NODDSK NEG ITS ATTNHIT 5E2 MSGFLAGS DC 1X'00' 5E3 A*11 in MSGFLAGS EQU --X'80'---EQU X'40' EQU X'20' EQU X'10' EQU X'08' EQU X'04' EQU X'02' EQU X'01' DBGFLAGS DC 1X'00' A*12 in DBGFLAGS EQU --X'80'---EQU X'40' 5E4 5E6 E"" \O!U VI"nw A-'V EQU EQU EQU EQU X'10' X'08' X'04' X'02' DC EXECFLAG DC 2X'00' 1X'00' Miscellaneous flags Message flags No typing - set by EXEC No typing - set by HT No ready message to te typed No time on ready message Error code to be typed in red No error messages to be tYFed No text on error messages Linefeed for typewriter CCli ~.!!§ g~!!1!~g DBGEXEC DBGPGMCK DBGEXINT DBGABN DBGNSHR DBGSHR DBGRECUR implied EXEC commands implied CP commands standard synonyms command abbreviations automatic page release automatic VMj370 console read Halt execution switch Halt tracing switch Release pages switch Graphics console Quiet switch for console read Do not access D-disk Negative return code from DMSITS Attention posted ~.!!§ gg!!1!~g NOTYPOUT NOTYPING NORDYMSG NORDYTIM REDERRID NOERRMSG NOERRTXT SPECLF Option flags DEEUG flags DEEUG routine executing DEEUG entered by a program check entered ""U.l.... an external -;n+crrnr+ ...... '-'--- - r DEEUG entered from DMSABN No shared segment present Shared segment present Recursion flag Tl1:'1Jn~ J.i..a.;. ..... v~ A*13 Reserved for IBM use EXEC flags EXEC command running 5E7 PROTFLAG DC 1X'00' ~.!!§ g~!!1!gg PRFPOFF PRFTSYS PRFUSYS 5E8 EQU EQU EQU QI TSOFLAGS DC ~.!! g~!.!1!gg TSOATCNL EQU g~Q!r1!~ TSOFLAGS X'80'--- Storage protection flags Storage protection is shut off System routine in transient area System routine in user area X'80' X'40' X'20' 1X'00' !1! A*14 A*15 TSO flag tyte Read canceled by attention Section 2. CMS rata Areas and Control Blocks 215 NUCON Eexadecimal Displacement SE9 Field Name Field Description, Contents, Meaning SUBFLAG !!J:!§ SEB SEC SFO SF4 SF8 SFC 216 A*16 --X'08'--- X'OO' EQU EQU EQU EQU EQU EQU EQU EQU ASYSNAMS ACMSSEG ADMSLIO VCFSTLKP VCFSTLKW DC DC DC DC DC DC SYSREF AFVS AOPSECT ADEVTAB AFSTLKP AGETCLK AFSTLKi APIE AIADT AUSER ARDTK ASCANN ASSTAT ATABEND ASUBSECT AOSMODL AWRTK ASTRINIT IADT AFREE AFRET ADMSPIOC APGMSECT AIOSECT ADMPEXEC ADIOSECT AABNSVC ADMSERL ADMSCRD ADMSFREB ASVCSECT AADTLKP AUPUFD ASTATEXT AOSRET ACMSRET CMS subset flag byte Subset Subset Subset Subset X'04' X'02' X'01' A*17 g~!J:.!!~g in DCSSFLAG DCSSAVAL DCSSLDED DCSSCPNV DCSSLDSD DCSSVTNA DCSSVTLD DCSSOVLP DCSSJLNS !Yfley§ 600 600 604 608 60C 610 614 618 61C 620 624 628 62C 630 634 638 63C 640 644 648 64C 650 654 658 6SC 660 664 668 66C 670 674 678 67C 680 684 688 EQU EQU EQU EQU DCSSFLAG DC !!J:!§ 1X'00' g~!J:.!!~g in SUBFLAG SUBREJ SUBRTN SUBINIT SUBACT SEA DC --X'80'---X'40' X'20' X'10' X'08' X'04' X'02' X'01' X'OO' V (SYSNAMES) F'O' V (DMSLIO) V (DMSLFS) V (DMSLFSW) DCSS indicators CMSS!G segment exists CMSS!G loaded CP or invalid command issued Loading S-disk DMSSVT not available DMSSVT is loaded virtual machine storage overlaid by ncss CMSS!G just loaded nonshared Reserved for IBM use Address of CMS saved segment EALR equivalent of FSTLKP EALR equivalent of FSTLKi Address Table -j)s----on---DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC command reject return initialization active V (FVS) V (OPSECT) V (DEVTAB) V (FSTLKP) V(DMSINM) V (FSTLKW) V (PIE) V (IADT) V (USERSECT) V (D ~SDIOR) V (D MSSCNN) A (0) V (TABEND) V (SUBSECT) A (0) V (D MSDIOW) V (D MSSTGST) V (ADTSECT) V (FREE) V (FRET) V (D MSPIOCC) V (PG MSECT) V (IOSECT) V (D~SDBD) V (DIOSECT) V(D~SABNUA) V (DMSERL) V (DMSCRD) V (DMSFREB) V (SVCSECT) V (ADTLKP) V (DMSAUDUP) A (0) V (OSRET) V (CMSRET) IBM VM/370 Data Areas and Control Block Logic NUCCN Hexadecimal Displacement -----------68C 690 694 698 69C 6AO 6A4 6A8 6AC 6AE 6BO 6B4 6BS 6BC 6CO 6C4 6CS 6CC 6DO 6D4 6DS 6DC 6EO 6E4 6ES 6EC 6FO 6F4 6FS 6FC 700 700 70S 710 714 715 716 .,,,n Field Nalle ASCANO AEXEC ASTART AADTLKW AUSABRV AEXTSECT ASCBPTR ADMSROS LDMSROS CDMSROS AACTLKP AACTNXT AACTFREE AACTFRET AADTNXT ATRKLKP ATRKLKPX AQQTRK AQQTRKX AERASE ATYPSRCH AUPDISK AKILLEI ATFINIS ARDBUF AWRBUF AFINIS ASTATE ASTATEW APOINT BAO BEO C20 C60 C62 C64 DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC V (DMSSCNO) V (D MSEXC) V (DMSLDRA) V (ADTLKW) V (USABRV) V (EXTSECT) V (SCBPTR) A(0) H'O' H'O' V (DMSLAF) V (DMSLAFNX) V (D MSLAFFE) V (D MSLAFFT) V (ADTNXT) V (DMSTRK) V (DMSTRKX) V (DMSTQQ) V (DMSTQQX) V (DMSERS) V (TYPSRCH) V (DMSAUD) V (KILLEX) V (DMSFNST) V (DMSBRD) V (DMSBWR) V (DMSFNS) V (DMSSTTE) V (DMSSTTW) V (POINT) Ig!:lIi1!§l Buffers DS----OD CONCCWS CONINBLK CONINBUF Iii V 7AO 840 840 84S A60 A60 Field Description, Contents, Meaning -------------------------------------- CMNDLINE CMNDLIST CONSTACK ~§!g cell O,O,X!60!,0 CCW DC DC DC DS DS DS DS DC DS DS DS 3,0,X'20',1 A (0) XL1'OA' AL1(134) CL134 !!:g!§ n ..... VlJ CL160 OD CLS'EXEC' CLS36 OD CL320 FREESAVE DS BALRSAVE DS WAITSAVE DS 16F 16F 16F PCTVSAM H'SO' 1H 1F DC DS DS Console read and write CCii NOP to get CE and DE together 50 percent for CMS/VSAM use Reserved for IBM use Reserved for IBM use Section 2. CMS rata Areas and Control Blocks 217 NUCON Hexadecimal Displacement C68 C6C C70 C74 C78 C7C Field Name ADIKQLAB NDIKQLAB ARURTBL ADMSVIB AVIPWORK VSAMFLG1 Field Description, contents, DC DC DC DC DC DC ~.!!§ g~f!Dgg C7D C80 C84 C88 C8C C90 C94 CAO 218 VSAMRUN VSJOBCAT VIPINIT VSIMSERV VIPSOP VIPTCLOS VSAMSOS EQU EQU EQU EQU EQU EQU EQU AVSAMSYS AAMSSYS AVSREOJ AVSRWORK ACBLIST DS DC DC DC DC DC DS DS ~eaning A(X'FFFFFF') Set to A(IKQLAB) when it is in storage Set to end of IKQLAB when in stcrage VSAM resource table address V(RURTBL) Address of VSAM interface bootstrap V(DMSVIB) A (0) Address of rMSVIP work area X'OO' A*18 VSAM information flag A (0) in VSAMFLG1 --X'80'---X'40' X'20' X'10' X'08' X'04' X'02' 3X A (0) A (0) V ($$BEOJ4) A (0) A (0) 3F OD VSAM system loaded VSAM job catalog active DMSVIP has teen initialized CMSAMS system loaded (AMSEBV running) OS interface SVC 2 call as TCLOSE call as AMSERV running Reserved for IBM use Address of VSAM saved system Address of CMSAMS saved system DMSVSR entry point from VSAM $$EACLOS Address of rMSVSR work area ACE list built ty OPEN/CLOSE Reserved for IBM use IBM VM/370 Data Areas and Control Block Logic OPSECT OPSECT describes the fields used by several programs as parameter lists for reading and writing on disks and other devices. The OPSECT CSECT is pointed to by the AOPSECT field in NUCON. o CMSOP 8 FILENAME 10 FILETYPE 18 FILE MODE FILEITEM FILEBUFF 20 FILEBYTE 28 FILEREAD SAVER14 30 SAVER15 SAVERO 38 SAVER1 CMSNAME 40 CMSNAME (cant.) 48 CONREAD (cant.) 50 CONRDCNT A*1 FILEFORM CONREAD CONRDBUF 1////////////1////////////// 58 WAITLIST 60 CONWRITE CONWRBUF 68 70 I A*2 CONWRCNT WAITLST 78 WAITDEV REALLST 80 READLST (cant.) 88 90 FILECOUT RDCCW RDCOUNT PUNCHLST (cant.) 98' AO PUNCOUNT RtBUFF PUNCHLST PUNEUFF PRINTLS'I A8 PRINTLST (cant.) BO PRCNT TAPELIS'I B8 TAPE LIST (cant.) TAPEOPER CO TAPEOPEB (cant.) TAPEDEV C8 A*3 TAPEBUFF PRBOF TAPE SIZE Section 2. CMS Lata Areas and central Blocks 219 OPSECT I DO I TAPECOUT CLOSIO 1--------·-------------------------------------------CLOSIO (cont.) CLOSIODV 1---------------------------------------------------EO I CLOSIODV (cont.) D81 I I E81////////////////////////////I/////////////////////////// • • ////////////////////////////1/////////////////////////// • • ////////////////////////////1/////////////////////////// • • ////////////////////////////1/////////////////////////1/. I I 118 I EXLEVEL IXF 1 I I 1 120 I EXNUM !XArD I I I 1281////////////////////////////1///////////////////////////1 I ' 130 I FCBIO A*4 Hexadecimal Displacement Field Nalle Pield Description, Contents, Meaning -----------0 0 8 10 18 1A 1C 20 24 26 28 2C 30 34 38 3C 1ig!.!! UQ PLIST CMSOP FILENAME FILETYPE FILEMODE QE~!~!io!! 1!§! FILEBUFF FILEBYTE PILEPORM FILECOUT PILEREAD DS DS DS DS DS DS DS DS DS DS DS POINTERS APST IOAREl IOLENGTH EQU EQU EQU EQU FILEITEM OD CL8 CL8 CL8 Cl2 P I/O operation command word Filename Piletype Filemode Itea identification number Input/output buffer Data count File format: fixed/variatle records Records per block Read data count FIlEITEM PILEBUFF FIlEBUPF FIlEBYTE Euffer area location Euffer length H F F Cl2 H !~~ed!~!~ ~~g!§te! ~~!~ !!~g SAVER14 SAVER15 SAVERO SAVER1 DC DC DC DC P'O' p'O'· P'O' P'O' Temporary Temporary Temporary Temporary CMSNAME DC CL8'PILE' Default filename R14 save R15 save RO save R1 save ~~.!!sol~ f~!g!~!~! 1!§!§ 44 DS ~~gg ~21!§Ql~ 44 4C 50 51 52 54 58 58 220 CON READ DC CONRDBUF DC CONRDCOD DC DC CONRDCNT DC DC ~21!sOl~ !~!! WAITLIST DS DC OF Cl8'WAITRD' V (CMNDLINE) C'U' A*1 X'O' AL2 (0) P'O' Terminal read Address of input buffer Translate code Data byte count Reserved for IBM use List --OF Cl8'CONWAIT' IBM VM/370 Data Areas and Control Block Logic OPSECT Hexadecimal Displacement 60 60 6S 6C 6D 6E 70 70 7S 7C SO S4 S4 SC 90 92 94 94 9C AO A4 A4 AC ",n DV B4 B4 BC ..CS.. ", \". C9 CC DO D4 D4 DC E4 E8 118 11C 120 124 12S 130 134 Field Nalle Field Description, Contents, j!ite £~1l§£!~ CONiRITE DS DC CONiRBUF DC CONiRCOD DC DC CONiRCNT DC C'B' X'OO' AL2 (0) jail fg!g!~!~! i1ITLST DS DC i1ITDEV DC DC DC List OF-CLS'WAIT' CL4'CON1' F'O' F'O' OF CLS'TYPLIN' A (0) A*2 Location of message text Color code Length of message text Address of IMSCiT Symbolic address of console Parameter List --i)s----OF---RE1DLST DC CLS'CARDRD' RDBUFF DC 1 (0) RDCCi DC H'O' RDCOUNT DC H'O' Euffer address CCi tyte count Eytes actually read Card Punch Parameter Li§! PUNCHLSi-i)s----oP--DC CLS'CARDPH' PUIBUPF DC 1(0) PUNCOUNT DC 1 (0) Punch buffer address Punch CCW count Printer Parameter List PRINTLST=nS----oP ---DC CLa'PRINTR' PRBUF DC A (0) In, DC PRCNT l \ VJ Printer buffer address Prillter data count %s.E~ fg!g!~!~! TAPELIST DS DC TAPEOPER DC TAPEDEV DC T1PEM1SK DC TAPEBUPP DC TAPESIZE DC T1PECOUT DC List OF-CLS'TAPEIO' CLS' , CL4'TAPP X'OO' 1*3 AL3 (0) F'O' P'O' Tape operation command Tape symbolic device Set mode Euffer location Tape counter Qy! ~~!i£~ ~~.E~nd~!!! 12lls ..§~! on ]ni! !t~.£grd DS OP Operation DC CLS'CLOSIO' CLOSIODV DC CLS" Device type DC 4X 'PF' Reserved for IBM use DC 6D' 0' £!g~ CLOSIO E!gfsg~ EXLEVEL EXFl EXIUM EXADD ..§to!gg~ !2f DC DC DC DC DC !2! FCBIO DC OSIOTYPE DC ~!~£ ~gg!stfg.E Egui.E.!~nt EXEC level Follows EXEC level Number of doublewords of free storage Address of EXECTOR in storage Reserved for IB~ use F'O' P'1' F'O' F'O' 2F'0' Q~ ~eaning Macro Simulation Routines 1(0)- ---------iddress-of last FCB used during I/O X'DD' 1*4 OS access method type Section 2. CMS rata 1reas and Control Blocks 221 OSFST OSFST describes the fields of an OS file status table. When an OS disk is accessed, DMSROS obtains storage from CMS free storage, builds and fills in an CSFST block, which is ccmparable to a CMS FST block. This block is released by DMSALU. o OSFSTFM 1///////////1 S OSFSTLRL 10 OSFSTNXT OSF~~BLK A*1 OSFSTFVF 1///////1 A*2 1 A*3 OSFSTCER 1S OSFSTEND .J 20 OSFSTDSN 4S 50 OSFSTXTN FO FS 100 lOS OSFS~DSK OSFSTNTE OSFSTTYP 1//////////////////// ------------------------------------------------------1 OSFSTTRK 1///////////////////////////1 ------------------------------------------------------1 ///////////////////////////1 OSFST!EM 1 110 OSFSTMEM (cont.) 1///////////////////////////1 I Hexadecimal Displacement o 2 4 6 S C D E Field Name OSFSTFM OSFSTBLK OSFSTFVF OSFSTLRL OSFSTRFM OSFSTFLG Field Description, Contents, Meaning DS DS DS DS DS DS DS DS 1H 1H lH 1H 1F lX 1X 1X A*1 A*2 !t!!§ gg!!1!gg in OSFSTFLG OSFSTALT OSFSTDBK OSFSTMVL OSFSTOMV OSFSTRSW F 10 14 222 EQO EQO EQO EQO EQO OSFSTXNO DS OSFSTNXT DS OSFSTCHR DS --X'80'---- Alternate track indicator Elock size not specified in DSCE Multiple volulle data set Onmoveable data set Indicates point+1 just issued X'40' X'OS' X'02' X'01' lX 1F 5X Disk lIode Reserved for IBM use Elock size Fixed/variatle flag Logical record size as record for.at Reserved for IBM use Flag byte A*3 Number of data extents on disk Next OS FST CCHHR of last I/O operation IBM VM/370 Data Areas and Control Block Logic OSFST Hexadeciaal Displacement -----------19 1E 4A Field Name OSFSTEND DS OSFSTDSN DS OSFSTITN DS Field Description, Contents, Meaning -------------------------------------51 44C 1701 Current extent end Data set name Data extents description Bits defined in OSFSTXTN OSFSTEXii-EQU --OSFSTXTN+30 F4 F6 Fa FD 100 104 10C 114 118 Location of fourth extent froll DSCB3 OSFSTDSK DS OSFSTTYP DS OSFSTNTE DS DS OSFSTTRK DS DS OSFSTMEM DS DS DS 1H 1H 51 3X 1F 2F CL8 IF OD tisk address (Ocuu) Disk device type (see OSADT fer type flags) Used to save CCEHR for NeT! macro Reserved for IBM use No. of tracks per cylinder Reserved for IBM use Partitioned data set mellber name Reserved for IBf! u.se OSFSTLTH EQO (*-OSFST) /8 OS FS'! length in doul:lewords (X'35') Section 2. CMS Iata Areas and Centrcl Blocks 223 OVSECT, PCTAB OVSECT is used by Ilodule DMSOVS to provide trace information requested by SVCTRACE. r---------------------------------------------------------, OVSGO AERR I r 0 I I 8 I -----------------------------------------------------1 AWAIT LENOVS I Eexadecillal Displacement Pield Name 0 4 OVSGO AERR AWAIT LENOVS -----------8 C Field Description, Ccntents, Meaning B DC DC DC *-* A(0) A{OJ A(0) Eranch to this point for TRICE lddress of fMSERR lddress of CONWAIT Length of DMSOVS doutlevords PCTAE is used by DOS/VS routines in the event of a progra. check. The address of PCTIE is in bytes X'64' andX'65' of the partition coaaunication region (BGCCI!). o Eexadecimal Displacement ------------ 224 PCROUT Pield Naae PCSIVE Field Description, Contents, Meaning -------------------------------------- PCTIB EQU *-8 Progra. check option table a PCROUT DC P'O' PCROUT 4 PCSIVE DC P'O' PCSAV! IBM VM/370 Data lreas and Control Block Logic = = a when no STIlT .acro vas issued address of user prograa check routine (indicat ing that the STIlT macro vas issued) co.ple.ent of the address of the user progra. check rcutine (indicating that specified routine in the user STIlT aacro vas already in use) a when no S'lilT .acro vas issued address of user save area (indicating that the STIlT macro vas issued) PDSSECT PDSSECT describes the fields of the in-storage directory that is used in CS simulation of BPAM. The in-storage directory is built dynamically ty DMSSVT froll ces free storage. o 8 Eexadeci!!!al Displacelient -----------0 6 8 9 A C E F 10 DIRNAeE DIRPTR I I ---------------------------------------------------1 prSELKSI CORE SIZE A*1 I 1*2 A*3 I111111I Field iialle Field Description, Contents, eeaning DIRNAeE DS DIRPTR DS TEMPBYTE DS 3H 1H 11 NEWBLKS CORESIZE PDSBLKSI CHNGBYTE 11 1H 1H 11 11 OF PDSDIR DS DS DS DS DS DS -------------------------------------A*1 A*2 A*3 IUCLIE identifier Item pointer to start of directory If byte has dollar sign ($) , then prs is in $PDSTEMP file No. of new tlocks added to FDS by STOW Size of dictionary in tytes Elock size of dictionary Indicates updates to dictionary Reserved for IBe use Start of in-storage dictionary Section 2. ces rata Areas and Control Blocks 225 PGMSECT PGMSECT describes the fields used by DMSITP for saving registers, old FSW, and other data for bandling frogram interrupts. The PGMSECT CSECT is pointed to by the APGMSECT field in NUCON. I 0 DEBPSW 8 PICADDR 10 OPSW (cont. ) 1/////1//////1//////////////1 OPSW 18 Registers 28 TEMPOLD 30 TEMPNEW 38 R13AREA PSAVE 40 78 80 SCBWORK SCESAV12 88 SCBSAV13 SCESAV14 90 AUPIE Hexadecimal Displacement o 4 8 8 C 14 28 30 38 3C 7C SCBPTR Field Name Field Description, Contents, Meaning ~!.Q!gg~ f.Q! DC DC PIE DS PICADDR DC DC OPSW DC *EPlE DEBPSW TEMPOLD TEMPNEW R13AREA PSAVE SCBPTR DC DC DC DC DC ~!!§ g§f!ll~g STAEBIT EQU STAIBIT EQU RETRYBIT EQU 80 84 88 8C 90 226 SCBWORK SCBSAV12 SCBSAV13 SCBSAV14 AUPIE DC DC DC DC DS f!.Qg!~~ !B!~!fYE! Routine (tMSITP) F' 0' , V (DMSDBG) 1F OD F'O' 2F' 0' 5F' 0' POint-to aetug 8X'00' 8X'00' F'O' 16F'0' F'O' Work area Work area Saved R13 Registers saved at interrupt time Pointer to first STAE control block Reserved for IBM use Program interrupt element PICA address from recent SFlE Old PSW after program interrupt Registers are: R14, R15, RO, R1, and R2 End program interrupt element in SCBPTR --X'80'-X'40' X'20' A (0) A(0) A (0) A (0) A Address Address Address Address Address IBM VM/370 Data Areas and Control Block Logic of of of of of work ar ea for STAB exit routine R12 save area fer DMSSAB R13 save area for DMSSAB R14 save area fer DMSSAE user's PIE, in SPIE exit PIEAtR PIBADR contains a save area address and interrupt information. PIEADB is invoked by the PIBTAB macro and is often referred to by this macro name. The FIEPT field in the EGCCM tlock points to the PIETAB CSECT. r--------------------------------------------------------~ o I A*1 Hexadecimal Displacement -----------0 1 2 4 8 D E F o 2 4 PIBSAV2 DS X A*1 DS DS DS X X12 X14 A*2 A*4 I A*5 I A*6 Flags Cancel code SYSLOG ID Address of save area g~~!1!gg in PIBSAVE ARFLG EQU --PIBADR+8 PIBSAV2 PIBPUBAS PIBLUBID PIBLUBNO PIBFLG2 DS DS DS DS DS X14 X X C C ORG PIBADR XL2 PIBCOMRA DS SYSLUBX DS XL2 INTINFO DS XL4 Save area address A*3 A*4 A*5 A*6 Address of system save area PUE assign flags LUE number of first problem program LUB Number of LUBs More flags PIE extension DSECT Communications region address System class LUB address Interrupt information g~~!1!gg SVCIC 8 A*3 Field Description, Contents, Meaning PIBFLG PIBCNCL PIBLOGID PIBSAVE J2i!§ C E PIESAVE Field Name J2i!§ C PIBLOGID A*2 I I 8 I PIBECB PIBPIK in INTINFO EQU -INTINFO+3 SVC interruption code DS DS DS ECE address Program interrupt key Reserved for IBM use XL4 XL2 XL2 Section 2. CMS tata Areas and Control Blocks 227 PIE2TAB PIB2TAB describes the entries in the PIE2TAE bleck, which is an extension of the PIETAE tlock. For each PIB table entry, an entry exists in the PIB table extension block (PIB2TAB) • The PIB2PTR field in the BGCOM block points to the PIE2iAB tloek. o 8 Hexadecimal Displacement -----------0 2 4 I PIBCOMR1 SYSLUEX 228 1 ---------------------------------------------------------1 PIBECB PIEPIK 1//////////////1 Field Name Field Description, Contents, Meaning PIBCOMR1 DS SYSLUBX DS INTINFO DS XL2 XL2 XL4 Address of communications region System LUE index Used for interruption code SVCIC in INTINFO EQU --INTINFO+3 SVC interrupt code PIBECB PIBPIK DS DS DS Address of termination ECB, if any program interrupt key Reserved for IBM use ~:!!§ g~!11!~g 8 C E INTINFO XL4 XL2 XL2 IBM VM/370 Data Areas and Control Block Logic PUEltB PUBIDR defines the fields of a physical unit routines. Both DSECTs define the same storage. I • block table as used by CMS and/or DOS For Use by CMS Routines (MIPPUB macro) The simulated PUBADR DSECT has eighteen 8-byte entries, one for each device sUPForted by CMS. The simulated PUBADR DSECT is invoked by the MIPPUB macro. o Hexadecimal Displacement PUBCUU 1//////1 A*1 I A*2 Field Name I • I A*4 I A*5 Field Description, Contents, Meaning -----------DS DS PUBDSKM DS PUBDEVT DS PUBTAPM1 DS PUBTAPM2 DS PUBTAP7 DS 0 2 3 4 5 6 7 I A*3 PUBCUU -------------------------------------- IL2 I I I I I I A*1 A*2 A*3 1*4 1*5 Channel and device number Reserved for IBM use Disk mode if assigned DASD Device type code CMS tape set mode attributes DOS tape set mode attributes 7-track indicator For Use by DOS/VS Routines (PUBTAE macro) The PUBADR DSECT is invoked displacement 1'40' of BGCOM. o PUBCH!NN by the !/!*1//! PUETIE !*2 !*3 macro. !*4 The !*5 address of PUBTIE is at !*6 1*7 Hexadecimal Displacement Field Name Field Description, Contents, Meaning -----------0 2 3 4 5 6 7 8 PUBCHANN PUBCHQPT PUBERR PUBDEVTY PUBOPTN PUBCSFLG PUBJCFLG NEITPUB DS DS DS DS DS DS DS DS I I X PUB WIT PUBPTR EQU EQU *-PUBADR NEXTPUB -------------------------------------- IL2 X X X X A*1 A*2 A*3 A*4 A*5 A*6 A*7 Channel and device number Reserved for IBM use Error retry counter or TEB point Device type code Set lIode command or other options Channel scheduler flags Job control flags First byte of next PUB entry Length of PUB table Pointer to original PUB Section 2. CMS tata Areas and Control Blocks 229 PUBOWNER PUBOWNER contains a 2-byte entry for each entry in the FUB table. For CMS/DOS~ there are eighteen 2-tyte entries. The address of the PUEOWNER table is in the SYSCO~ block in the DOSCON CSECT of NUCON. o PUBOWNER 20 Hexadecimal Displacement o Field Na.e Field Description, Contents, Meaning PUBOWNER DS DC o OH 18X'0001' PUB ownership table PUB owner PUBOWNER entries have the following meanings: Value X'OO' 1 230 1!~g!!!!!g The physical unit is reserved X'40' CMS is vaiting for the volume to be .ounted X' 0 l' . Backgrotind partition owns the physical unit IBM VM/370 Data Areas and Control Block Logic SSAVE SSAVE is used by DMSITS to saye the value of the SVC old PSi, the caller's registers, and other necessary control information required to Frocess the SVC and return to the caller. Since SVC calls can be nested, several of these save areas can exist at one time. The system save area is dynamically allocated in protected free storage. SSAVE is invoked via the CMSIVE macro. 0 A* 1 I 1*2 CODE CALLER 8 CALLEE 10 OLDPSW i8 NRIiRET ERRET 20 EGPRO EGPR1 28 EGPR2 EGPR3 30 EGPR4 EGPR5 38 EGPR6 EGPR7 40 EGPR8 EGPR9 48 EGPR10 EGPR11 50 EGPR12 EGPR13 58 EGPR14 EGPR15 60 EFPRO 68 EFPR2 70 EFPR4 78 EFPR6 80 CHKWRD 1 SSAVENXT 88 SSAVEPRV USAVEPTR 90 OSTEMP 98 KEYS (cant. ) XGPRO 10 XGPR1 XGPR15 A8 XCOUNT CHKiRD2 1*3 I KEYS Section 2. CMS Lata Areas and Contrel Blocks 231 SSAVE Hexadecimal Displacement o Field Name OVIND TYPFLAG Field Description, Contents, DS DS 1!!1~ g~!!n~g TPFERT TPFNS TPFROl TPFUSR TPFACB TPFSV3 TPFSVO EQU EQU EQU EQU EQU EQU EQU 4 8 10 18 1C 20 20 24 28 2C 30 34 38 3C 40 44 48 4C 50 54 58 5C 60 60 68 70 78 80 84 88 8C CODE CALLER CAL LEE OLDPSlf NRftRET ERRET EGPRS EGPRO EGPRl EGPR2 EGPR3 EGPR4 EGPR5 EGPR6 EGPR7 EGPR8 EGPR9 EGPR10 EGPR11 EGPR12 EGPR13 EGPR14 EGPR15 EFPRS EFPRO EFPR2 EFPR4 EFPR6 CHKlfRD1 SSAVENIT SS~ VEPRV USAVEPTR DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DC DS DS DS 90 OSTEftP DS 2 I BLl A*l A*2 ~eaning Override indicator: 0, 1, 2, and 3 SVC-type flag byte in TYPFLAG --1'80'--1'40' 1'20' 1'10' I'OS' 1'02' 1'01' H A D D A A OF F F F F F F F F F F F F F F F F OD D D D D C'ABCD' A A A F Error return desired No save area allocated Return callee's RO-R1 to caller User SVC call OS iSAM SVC request SVC 203 OS simulation SiC SVC 203 code value Address of SVC caller Name of routine being called SVC old PSlf of caller Address for normal return Address for error return General-purpose registers at entry to SVC RO R1 R2 R3 R4 RS R6 R7 RS R9 R10 R11 R12 R13 R14 R1S Floating-point registers at entry FPRO FPR2 FPR4 FPR6 Check word one Address of next SSAVE area Address of previous SSAVE area Address of corresponding user save area - see USAVE DSECT Temporary work area fer OS simulation routines Maximu. numter of keys in stack 94 95 KEYP KEYS 1'00' A*3 (KEYMAI) I Number of keys in stack Key stack Subroutine XGPRO----ns IGPR1 DS IGPR15 DS ICOUNT DS CHKlfRD2 DC F F F F C'EFGH' Extra Extra Extra Extra Check SSAVESZ (*-SSAVE+7)/8 Size of syste. save area in deublewords (1'1S') 11!~ 9C AO A4 A8 AC 232 DC DS 1.211.2!!ng EQU IBM VM/370 Data Areas and Control Elock Logic copy copy copy copy word of EGPRO of EGPR1 of EGPR1S of SVCOUNT two SUESECT SUBSECT defines the fields in the SUBSET work processing and abend recovery. area which is used by C~S SUBSET cemmand The SUBSECT block is pointed to by the ASUESECT field in NUCCN. o , RftSGBUF 28 C!!STIft 40 STARS ASUBRET 50 58 STAESAV SPIESAV 60 SWTCHSAV ASUBFST 68 ASUBSTAT 70 ERRNU~ 78 TIftBUF 90 Hexadecimal Displacement o 28 28 Field Name R~SGBUF CMSTIM 30 34 38 3C 40 40 48 50 54 54 58 5C 60 64 68 70 78 STARS ASUBRET STAESAV SPIESAV SiTCHSAV ASUBFST ASUBSTAT ERRNUM TIMBUF Field Description, Contents, DS DS DC DS DS DS DS DS DC DC DC DS DS DS DS DS DS DS DS DS ~eaning Buffer area for formatting time message PLIS7 to obtain time fro. D~SIN~ 10F OF CL8'C~STIME' F F A F OF CL8'*' CL8'*' CL2'*' OF F F F F F F D 4D Virtual machine time used Total processor time used (CF+C~S) Address of time buffer ~essage length (filled in by C~STI~E) PLISi for ACTLKP (used by SUESET) Subset address for storage areas Return address to caller STAE save area SPIE save area Work area fer error return code Work area for D~SINH to stcre date and time Section 2. CMS rata Areas and Contrcl Blecks 233 SVCSECT SVCSECT describes the fields used by DMSITS in handling SVC interrupts. An SVCSECT block is built dynamically when an SVC is issued. 1he first SVCSECT is pointed to by the ASVCSECT field in NUCON; if SVCs are nested, the chain of SVCSECT blocks is processed using the CURRALOC and LASTALOC fields. o JNUMB JFIRST 8 JF4 JLAST 10 A*1 1//////1 18 LASTALOC 20 ADMSOVS 28 OVAPF CURRALOC DEPTH OVEPF OVATF A*2 30 SVCSAVE 18 NRftSAV OVBTF 1//////////////////// SVCOUNT 158 ///////////////////////////1 160 SVCSTOP SVLAD 168 SVLADW SVLFS 110 LOADLIST 118 LOADNAftE 180 (Literals are loaded into this area) 188 (The literals here are from the origin) 190 LOADSTRT 198 (Hexadecimals are entered in this area) 1AO ///////////////////////////1/////1///11//////////////// 1A8 ftODLIST 1 BO DUftCOft 1B8 A*3 1CO ZER03 TRANSRT (cont.) 1C8 1DO 1D8 TRANSRT A*4 AtTRINS TEftP02 /////////////////1/////////1//1//////////1///////////// 1----------------------------------------------------1///////////////////////////1//1///1///1/1///1//1/////// I 1 EO I 234 SVCAB I RGPRO IBM VM/310 Data Areas and Control Block Logic RGPR 1 ,I SVCSECT 1E8 RGPR2 RGPR3 1FO RGPR4 RGPR5 1F8 RGPR6 RGPR7 200 RGPR8 RGPR9 208 RGPR10 RGPR11 210 RGPR12 RGPR13 218 RGPR14 RGPR15 220 RFPRO 228 RFPR2 230 RFPR4 238 RFPR6 240 NR!!USAV Hexadecimal Displacement o o 4 8 C Field Name Field Description# Contents, !eaninq USVCTBL DS OF User SVC tatle JFIRST JF4 JLAST DC DC DC ! (*-*) No. of douhlewords 1D SVC number table Address of first item (if any] in table Loop increment for BXLE Address of last item in table F'4' A (*-*) Bit§ g~f!!!~g in SFLAG SFSYS EQU --X'80'SFTRN EQU X'40' SFNue EQU X'20' SFREN EQU X'01' 11 12 14 18 1C 20 24 26 28 2A SVCAB CURRALOC LASTALOC DEPTH DC DC DC DC DC for SVCTRACE DC --A(O)"----BL2 n on DC BL2"on DC BL2"on DC DC BL2 n O" !nf.Qil§!!~.n ID!!SOVS OVBPP OVBTP OVAPP OVATP X'OO' H'O' A(0) A(0) P'O' Systell flag -- SVC protect key is zero Transient area routine -- system mask is off Nucleus routine -- system .ask is off Invalid reentry flag Reserved for IBft use SVC abend code if any Current allocated save area Last allocated save area Nested SVC depth Address of I!!SOVS nBefore print" flags nBefore type" flags nAfter print" flags nAfter type n flags Section 2. CftS Iata Areas and Control Blocks 235 SVCSECT Bexadeci.al Displacement 2C Field Na.e Field Description, Contents, Meaning OVF 10R OVF1GB OVF1GA OVF1GS OVF1PA OVF1F OVF1FS EQU EQU EOU EOU EOU EOU EOU X'SO' X'40' X'20' X'10' X'OS' XI 04' 1'01' Current option is set on GPRs before call wanted GPRs after call wanted GPRs returned fro. SVC callee PLIS'I wanted Floating-point registers wanted Floating-point registers returned callee OVF2ST OVF2CM OVF2NR OVF20S OVF2WA EOU EOU EOU EOU EOU I'SO' X'40' 1'20' X'10' X'OS' STOP wanted CftS SVC TRACE wanted Nor.al return CMS SVCs wanted OS SiCs wanted WAIT CftS SiCs wanted OVSTAT DC B'O' A*2 !!i!§ g~!i.!!~g in OVSTAT OVSOR EOU --X'80'-OVSPREV EOU X'40' OVSAFT EOU X'20' OVSBO X'10' EOU OVSSO X'OS' EOU 2D 30 7S 236 SVCSAVE NRMSAV DC DC DC fro. Current status of SVCTRACE Override options are On SVCTRACE SAME is valid After bit; set ty DftSITS BALT override flag SUSPEND override flag XL3'0' 1SF'0' 2SD'0' Reserved for IBM use INTSVC work area Bor.al standard information F'O' F'O' F'O' F F F CLS'LOAD' CLS' CLS ') , CLS'ORIGIN' CLS'O' SX'FF' 2F'0' Reserved for IBM use Current SVC count For tftSITS debugging Save R14 for DftSLAD Save R14 for DftSLADW Save R14 for DftSLFS 15S 15C 160 164 16S 16C 170 17S 1S0 18S 190 19S 1AO DC DC DC DS DS DS DC DC DC DC L01DSTRT DC DC DC 1AS 1AS 1BO lBS 1B9 1BC fLIST !2I ~~lling ~~~1~! (K~~E n~l! !i~ in §!~ict §§gy§~£§) DS OF ftODLIST DC CL8'LOADftOD' Routine name DUMCOM DC CLS' Module filename filled in here SSMOR DC X'FF' A*3 Fence; allows all interrupts ZER03 DC AL3(0) Address is 3-bytes long and set to zeros TRABSRT DC CL8' Bolds filenaae of transient routine SVCOURT SVCSTOP SVLAD SVLADW SVLFS L01DLIST LOADNAME Reserved for IBft use IBM VM/370 Data Areas and Control Block Logic SVC SVCSECT Hexadecimal Displacement ----------1C4 1C5 1C8 1DO lEO 1EO lEO 1E4 1E8 1EC 1FO 1F4 1F8 1FC 200 204 208 20C 210 214 218 21C 220 220 228 230 238 240 Field Naae TRANftSK ADTR1NS TEftP02 RGPRS RGPRO RGPR1 RGPR2 RGPR3 RGPR4 RGPF5 RGPR6 RGPR7 RGPR8 RGPR9 RGPR10 RGPR11 RGPR12 RGPR13 RGPR14 RGPR15 RFPRS RFPRO RFPR2 RFPR4 RFPR6 NRftUSA' Field Description, Contents, eeaning DC DC DC DC DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS AL1 (X'FF') 1*4 VL3 (TRANSAR) D'O' 4F'Oi OD OF F F F F F F F F F F F F F F F F OD D D D D 12D -------------------------------------For CVD and other scratch use Reserved for IBe use Beturned general-purpose registers BO B1 B2 B3 B4 R5 B6 R7 BS B9 R10 B11 B12 B13 B14 B15 Returned floating-point registers FPRO FPR2 FPR4 FPR6 NBftSAV user save area Section 2. CftS rata Areas and Contrcl Blocks 237 SVEARA SVEARA describes the fields in a DOS/VS Logical Transient Area (LTA) and problem Program (PP) save area. SVEARA is invoked via the nOSAVE macro. these areas are used by DOS/VS routines to save the value of the PSi and registers for purposes such as linkage to and from transient routines. , I 0 1///////////////////////////1///////////////////////////1 8 SVEPSi SV!PSi2 10 SVER09 SV!ROA 18 SVEROB SV!ROC 20 SVEROD SV!ROE 28 SVEROF SV!ROO 30 SVER01 SV!R02 38 SVER03 SV!R04 40 SVER05 SV!R06 48 SVER07 SV!R08 Hexadecimal ni"splacement -----------0 8 C 10 14 18 1C 20 24 28 2C 30 34 38 3C 40 44 48 4C 238 Field Nalle SVEPSi SVEPSi2 SVER09 SVEROA SVEROB SVEROC SVEROD SVEBOE SVEROF SVRROO SVER01 SVER02 SVER03 SVER04 SVER05 SVER06 SVER07 SVER08 Field Description, Contents, t!eaning DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS 2F F F F F F F F F F F F F F F F F F F -------------------------------------- Reserved for IBM use First half PSi Second half PSi Save area for register Save area for register Save area for register Save area for register Save area for register Save area for register Save area for register Save area for register Save area for register Save area for register Save area for register Save area for register Save area fer register Save area for register Save area for register Save area for register IBM VM/370 Data Areas and Control Block Logic 9 10 11 12 13 14 15 0 1 2 3 4 5 6 7 8 SYSCOM SYSCOM describes the fields in the SYSCOM block which is the CMS/DOS equivalent ef the DOS/VS System Communication Region (SYSCOM). The ASYSCOM field in NUCCN Feints to the SYSCOM block in DMSNUC. I 0 IJBERBLC 8 IJBERR19 IJEAREX IJBERR24 IJBFETCH IJEINTRT 18 IJBEXTRT IJELTA 20 IJBPPBEG IJECEINQ IJBQSIZE IJBQLNG IJENPART IJBRSAVE IJECCNSP 38 IJBSAB IJECENTB 1* 1 1*2 A*3 A*4 IJESTID 48 IJBPDADR IJETKHLD 50 IJBTIMER IJEAETAB 58 IJBLIK IJBTIK IJBTCAVT IJERFTAB 68 IJBEUECB IJEOLTEP 70 IJBRASLN IJETRTAB 78 IJBPBOWN IJEJATIB 80 IJBPMGR IJECCWT 88 IJBSAVSD IJELNSTB 90 IJBAMCOM IJEAPTA 98 IJBSBLKO IJESBLKX 1*5 1*6 I 1*7 , I I I ! IJBEXIT IJEPWR 60 AO I 1 1 1/////////////1 30 40 1 IJEPUBRS 10 28 I I 1*8 A*9 A*10 1///////////// ----------------------------------------------------1 18 ////////////////////////////1///////////////////////////1 -----------------------------------------------------1 BO ////////////////////////////1 IJEMVCAD I -----------------------------------------------------1 B8 ////////////////////////////1/////////////1/////////////1 I COl I C81 IJBMFCER A*11 I IJEPUBLN IJBAPNO I I I I Section 2. CMS Iata Areas and Control Blocks 239 SYSCO!! DO IJBSEGT IJBPFT D8 IJBPFTX IJBBOX EO IJBDPDTB 111111I111111I11111111111111 E8 IJBVIRAD IJBEOR FO IJBFTTAB IJBSVA F8 IJBSVIS IIIIIIIIIIIARPSLIIIIII/IIIII 100 -------------------------------------------------------1 1111////IARPSRIIIIIII///IIIII IJEDLAB I 1----------------------------------------------------1 1081 SYS$CODE I I 1101 Hexadecimal Displacement a 4 8 A C 10 14 18 1C 20 24 28 2A 2C 2E 30 34 38 3C 40 41 42 43 44 46 48 4C 240 Field Name IJBERBLC IJBAREX IJBERR19 IJBERR24 IJBPOBRS IJBFETCH IJBINTRT IJ13 E_XTRT IJBLTA IJBPPBEG Field Description, Contents, Meaning DC DC DC DC DC DC DC DC DC DC Address of error block Exit address for attention Cancel exit for attention Cancel exit for attention SYSRES POE address Address of fetch routine Address of 1/0 interrupt routine Address of external interrupt rcutine P()inter to logical ttansientarea Pointer to problem program area A (0) A (0) H'O' H'O' F'O' A (0) A (0) A(O) i(O) A (0) IJBFLPTR EQU * Free list pointer IJBCH.1NQ IJBQSIZE IJBQLNG IJBNP.1RT F'O' H'O' H'O' H'1' B'O' Pointer to channel queue Number of channel queue entries Length of one error queue entry Number of partitions Reserved for IBM use Pointer to channel buckets Address of CRT table Address of SAB table Address of channel control table Flags and switches Switch byte Flags and switches Flags and switches System task selection control field IJBRS.1VE IJBCONSP IJBS.1B IJBCHNTB IJBFLG01 IJBFLG02 IJBFLG03 IJBFLG04 IJBSTID DC DC DC DC DC DC DC DC DC DC DC DC DC DC A (0) A (0) A (0) A (0) X'OO' X'OO' X'OO' X'OO' B'O' A*1 A*2 .1*3 A*4 IJBSELCT EQU *-1 System task selection byte IJBEXIT DC IJBPDADR DC B'O' A (0) Pointer to task selection Pointer to PDAREA IJBTHPTR EQU *-1 Track hold ELPTR IJBTKHLD DC Address of track hold tatle IBM VM/370 Data Areas and Control Elock Logic SYSCOM Hexadecimal Displacement 50 54 58 SA 5C 60 64 68 6C 70 74 78 7C 80 84 88 8C 90 94 98 9C AO A1 A2 A3 A4 AS A6 BO B4 B8 BC BE CO CB CC CE DO D4 DS DC EO E4 E8 EC PO P4 F8 PC 100 104 108 Field Name IJBTIl!ER IJBABTAB IJBLIK IJBTIK IJBPlfR IJBTCAVT IJBRPTAB IJBEUECB IJBOLTEP IJBRASLN IJBTRTAB IJBPBOlfN IJBJATAB IJBPl!GR IJBCClfT IJBSAVSD IJBLNSTB IJBAl!COM IJBAPTA IJBSBLKO IJBSBLKX IJBSYSPT IJBRASPT IJBPl!RPT IJBSUPPT IJBCRTPT IJBERPPT DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC DC IJBMVCAD DC DC DC DC IJBMFCER DS IJBNERQ DC IJBPUBLN DC IJBAPNO DC IJBSEGT DC IJBPFT DC IJBPFTX IJBBOX DC IJBDPDTB DC DC IJBVIRAD DC IJBEOR DC IJBPTTAB DC IJBSVA DC IJBSVIS DC ARPSL DC ARPSR DC IJBDLAB DC SYS$CODE DC Pield Description, Contents, Meaning Address of timer request table Address of AB option table Key of task owning the LTA H'O' Task interrupt key X'0010' Pointer to Fower table A (0) Space for VTAl! address A (0) Pointer to RF table A (0) Pointer to EU and ECB table A (0) Address of OLTEP bucket A (0) Pointer to BAS linkage area A (0) Address of ASCII table A (0) Address of PUB ownership table A (0) Address of job accounting commen area A (0) Base address of programmer routines A (0) Address of celf transient werk area A CO) Pointer to SDAID common area A (0) Address of line mode table A (0) Address of VSAM common register A (0) Address of PTA A (0) Pointer to first system task block A (0) Pointer to current system task P'O' X'OO' A*5 For alignment AL 1 (0) A*6 Pointer to BAS task block AL 1 (0) A*7 Pointer for PMGR task block A11 (0) A*8 Pointer to SPVR task block AL 1 (0) A*9 Pointer to CRT task block AL 1 (0) A*10 Pointer to ERP task block Reserved for IBl! use 10X'00' Reserved for IBM use P'O' Pointer to MVCFLD A (0) Reserved for IBM use P'O' Beserved for IBM use H'O' Reserved for IBM use H'O' Information on !FC! and !FCU ERP 11X'00' AL 1 (0) A*11 Number of error queue entries Length of PUB table S (0) Number of active partitions H'1' Address of segment table A (0) Address of page frame table A (0) .. In, Pointer to page fra:e table extension A \ VI Pointer to boundary box A (0) Pointer to rPD table A (0) Reserved for IBM use P'O' Address of VIRTAD routine A (0) End of real storage P'O' Address of the fetch table A (0) Address of the SVA start A (0) Address of SVA GETVIS area A (0) Reserved for IBM use A (0) Reserved for IBl! use A (0) Pointer to system code name A(SYS$CODE) CL13'CMS/VSAM' System code name A (0) A CO) Section 2. CMS rata Areas and Control Blocks 241 SYSNAMES SYSNAMES defines the names of any saved systems which may te loaded by CMS routines. SYSNAMES describes the entries in the SYSNAftES table which is pointed to by the ASYSNAMES field in NUCON. 242 S CftSVSAM CMSAftS 1S CliSDOS -----------0 CMSSEG 10 Hexadecimal Displacement S 10 1S 20 o Field Name Field Description, Contents, Meaning CMSSEG CMSVSAM CMSAMS CMSDOS SYSNEND DC DC DC DC DS CLS'CMSSEG' CLS'CMSVSAM' CL8'CMSAMS' CLS'CMSDOS' OD CftS shared system name VSAM shared system name Access Method Services shared system name tos shared system name SYSNCNT EQU (SYSNEND-SYSNAMES)/€ Size in doublewords (X'04') IBM VM/370 Data Areas and Control Block Logic TSOBLKS TSOBLKS DSECi describes the entries in the T~OBLKS block which centains OS centrel information used by CMS, that is, the co.mand program parameters list (CPPL), user profile table (UPT), protected step control block (PSCB), and the environment centrel table (ECT). The ITSOCPPL field in NUCON points to TSOELKS block. I I 0 I CPPLOBUF I 8 I CPPLPSCB I 10 I11111111111111 I 18 I UPTUSER (cont.) I 20 I I 28 I I 30 I1111 1*5 11111 A*6 CPPLUPT CPPLECT UPTUSEB I 1*1 I 1*3 1//11111 I A*4 PSCBGPNM PSCBTCOL 50 PSCBBLGB 58 PSCBUPTL PSCBUPT PSCBRSZ 11/1111111111 60 PSCBU ECTBTCD A*7 "7In IV ECTIOWA ECTSMSG EC'IPC!!D 78 ECTPCMD (cont.) 80 ECTSCMD (cont.) ECTSCMD A*9 ECTDDNUM ECTUSER 88 Hexadecimal Displacement 1*2 PSCEUSEB 48 68 I I I I I I Field Name Field Description, Contents, Meaning -----------0 0 4 8 C 10 10 12 1C CPPL CPPLOBUF CPPLUPT CPPLPSCB CPPLECT DS DC DC DC DC OF lL4 (0) lL4 (UPT) AL4 (PSCB) AL4 (ECT) Q§g ~!2!!1~ Table UPT UPTUSEB UPTSWS !!!!§ (Qg~) DS ---OF DS CL2 DS CL10 DC X'OO' I!~!!!!~g in UPTSWS UPTNPRM UPTMID UPTNCOM Temporary PLIST to CP programs Address of command line Address of dummy UPT Address of dummy PSCB Address of dummy ECT EQU --X'80'-EQU X'40' EQU X'20' EQU 1'10' 1*1 Reserved for IBM use Reserved for installation use User's environment switch Beserved for IBM use No prompting is to be done Print message identifiers No user communication allowed via SEND Section 2. CMS tata Areas and Contrel Blocks 243 TSOBLKS Hexadecimal Displacement Field Name Field Description, Contents, !eaning ~~!§ ~§!!~§g lD lE IF 20 20 27 28 30 32 33 34 4C 50 54 58 SA 5C 60 68 68 69 6C 70 71 74 7C 84 UPTPAUS UPTALD EOU EOU UPTCDEL UPTDEL DC DC DS ~!,gte£!§g PSCB PSCBUSER PSCBUSRL PSCBGPN! PSCBATR1 !! Y~12!2(cont.) X'08' Pause for "1" when in noninterface mode X'04' ATTN has ~een specified as line delete X'OO' X'OO' CLl A*2 A*3 2!§R Control OF----- DS DC DC DS DS CL7' , X'OO' CL8 X ORG PSCBCTRL EOU PSCBACCT EOU PSCBJCL EOU PSCBATR1 X'80' X'40' X'20' DS PSCBATR2 DS DS DC X X X 6F'0' PSCBTCOL PSCBRLGB PSCBUPT PSCBUPTL 1F lL4 (0) lL4 (UPT) AL~ (16) BL.16 A CL8 PSCBRSZ PSCBU DS DS DC DC DS DS DS ~llir~.D!~.n! ECT ECTRCDF ECTRTCD ECTIOWA ECT!SGF DS DC DC DC DC ECTS!SG ECTPCftD ECTSCftD ECTSWS DS DC DS DC Control ---OP-- !,gtel 244 A*5 (~SC]) User ID padded Length of user Esoteric group 16-bit string reserved for with ~lanks ID name initialized by legon of user attributes; bits 3-15 IB! use Operator command user Account command user Submit co.mand user Reserved for IB! use 16-bit string reserved for installation use Six fullwords used initialized to 0 for TSC accounting; Pointer to the user profile table Length of the user profile.table Reserved for IB! use Region size requested in 2K units Reserved for installation use I§R!~ AL 1 (0) AL3 (0) AL4 (0) X'OO' AL3 CL8' , CL8 X'OO' ECTNOPD in ECTSWS EOU --X'80'-- ECTATRft * ECTLOGF ECTNMAL ECTNNOT EOU EOU EOU EOU EOU ECTDDNUft DC ECTUSER DS DS A*4 A*6 ~i!§ g§!!~~g 85 88 8C ~!~! Character delete character Line delete character Reserved for IB! use A*1 A*8 A*9 High-order tit indicates CF abended Return code from last control routine Address of I/O service routine werk area High-order tit means delete secend level messages (!ust be initialized by user at start of user's program) Address of second level message chain primary command name Subcommand name lCT switch X'20' X'40' X'10' X'08' X'04' If 0 bit is on, no operands exist in command buffer CP terminated by T!P DETACH with STAE Reserved for IB! use Logon/off requested T!P to log eff No user messages received at logon No broadcast notices to ~e received AL3 (0) A A Counter for generated temperary DDIA!S Reserved for installation use Reserved for IB! use For terminal attention exit element (TAXE), see the CftSTAXE DSECT. IBM VM/310 Data Areas and Control Block Logic USAVE/, USERSECT USAiE is used by DKSITS to allocate and free save areas for other routines during SVC processing; it is pointed to by the USAVEPTR field in SSAiE. USAVE is invoked via the SiCSAiE macro. I 01 581 Hexadecimal Displacement Field Naae o Field Description, Contents, Beaning DS 12D Scratch area passed to user via a pcinter in R13 USAVESZ EQU (*-USAiE) /8 Size cf user save area in dcublewords (X'OC') USERSECT describes the USER SECT block which is a general scratch storage for user-defined purposes .., It may be redefined to suit installation USERSECT is pcinted to by the AUSER field in NUCON. o area provided requirements. r I USCRTCH 40 Hexadecimal Displacement o Field Naae USCRTCH Field Description, Contents, eeaning DC 18F'0' User scratch area; lIay te redefined per installation requirements Section 2. ces tata Areas and Contrcl Blocks 245 246 IBM VM/370 Data Areas and Control Block Logic Section 3. RSCS Data Areas and Control Blocks Tbis section describes in detail each of the data areas used by RSCS. Unlike the CP and C!S format tlocks in this publication, the RSCS format tlocks are on fullword boundaries. This sectien of the publication contains only other contrel areas used by RSCS. ~SECTs. Appendixes E and C contain Section 3. RSCS tata Areas and Contrel Blocks 247 ASYNE ASYNE defines symbolic addresses for elements on an asynchronous exit queue. An asynchronous exit queue element contains information ty which a task requests that it handle asynchroncus interrupts. IOEXITQ, EXTQ, and ALERTQ in SVECTORS are the heads cf three asynchroncus exit queues. Each of these queues is comprised of supervisor elements defined by the ASYNE DSECT. IOEXITQ points to requests fer I/O exits, EXTC points to requests for external exit requests, and ALERTQ points to requests for ALER7 exits. 0 4 ASYlfTASK 8 ASYNEXIT C Hexadecimal Displacement ------------ 248 ASYlfCODE Field lfa.e 0 ASYlflfEXT DS 1F 4 ASYlfTASK DS 1F 8 ASYNEXIT DS 1F C ASYNCODE DS AL2 E ASYNSPAR DS 1X ASYlfID DS 1X F , ASYNNEXT I//ASYNSPAR///I I I , I , I ASYlfID I Field Description, Contents, I!eaning -------------------------------------Address of the next asynchronous interrupt exit request element Address of task elellent describing the task that requested the asynchron-ous interrupt Address of the requested asynchrcnous exit routine Address of the device for which asynchronous I/O interrupts are requested or interrupt bit code Reserved for IBM use 1-byte identification of the task owning the asynchronous exit routine IBM VM/370 Data Areas and Control Block Logic BUFDSECT BOFDSECT is used to transmit buffer programmable remote stations. control information and tuffer The buffer sent across the TP line starts at EUFSTARTi the first are used by the DMTSML line driver but are not transmitted. data to and frem 7 bytes of BUFDSECT $BUFPOOL in DMTSML points to a queue of available TP buffers; $INBOF in module DMTSML peints to a queue of TP buffers that have been received from a remote station and are waiting to be deblocked. $OUTBUF in DMTSML points to a queue of TP buffers that are ready for transmission to remote stations. o r---------------------------------------------------------, BUFCBAIN BUFCOUNT 4 8 BUFSTAT BUFSTART BUFBCB o o 4 6 Field Name BUFBEGIN BOFCHAIN BUFCOUNT BUFSTAT Field Descriptien, Contents, Meaning DS DC DS DS OF A (0) 1H 1C ~.!!§ g~!.!.n~g in BUFSTAT 7 9 A C EOFFCS BUFDATA C Hexadecimal Displacement BUFSTART Beginning of the buffer Buffer chain field count of bytes to transEit Buffer status byte BUFFAKE BUFRESP BUFNAK BUFTEXT BUFOCHEK EQU EQU EQU BQU EQU i'01'----X'02' X'08' X'10' Dummy buffer indicator Response only in buffer NlK response being sent Buffer contains text information Unit check expected BUFSTART BUFBCB BUFFCS BUFDATA DS DS DS DS CL2 1C CL2 OF Bisynchronous transmission control bytes Block control byte Function control sequence Data portion of TP buffer v,nll' A · V .... Section 3. RSCS tata Areas and Contrel Blocks 249 COMDSECT COMDSECT defines address constants used as pointers to subroutines co.mon to all RSCS modules. These subroutines are contained in module DMTCOM. COMDSECT is Fointed to by TCOM in SVECTORS. , 0 GLINKREQ 4 GPAGEREQ 8 FPAGEREQ C PMSGREQ 10 GMSGREQ 14 GTODEBCD Hexadecimal Displacement o 4 8 C 10 14 250 Field Na.e GLINKREQ GPAGEREQ FPAGEREQ PMSGREQ GMSGREQ GTODEBCD Field Description, Contents, Meaning DS DS DS DS DS DS 1A 1A 1A 1A 1A 1A Get link tatle entry routine Get Fage of main storage Free page of main storage Put .essage element into message stack Re.ove message ele.ent fro. .essage stack convert S/370 TOD to EBCDIC IBM VM/370 Data Areas and Control Block Logic DEVT1ELE DEVT1BLE defines virtual device information for an I/O operation. to the IOTAELE DSECT. o DEVLOCK , DEVSNREQ DEVADDR 4 8 DEVSTART C DEVCSW 14 This DSECT corresponds DEVSENSE DEVTYPE rEVFLAGS DEVNll!E 18 1C Hexadecillial Displacement -----------0 4 6 7 0 v C C 14 15 18 Field Name Field Description, Contents, !!eaning -------------------------------------DEVLOCK DEVADDR DEVSNREQ DEVTYPE DEVSTART DC DC DC DC DC F'O' lL2 (0) AL 1 (0) X'OO' F'O' DEVSIOCC DEVCSW DEVSENSE DEVFLAGS DEVNAME DC DC DC DC DC OX'OO' 2F'0' X'OO' 31'00', CL8' I/O request synch lock CUU address of I/O device Requested sense bytes Vl!/310 device type code Address start channel program for I/O handling Right-justified SIC condition code Ending CSW from last I/O oFeraticn Sense information on unit check Device status flags EEerle device address and name Section 3. RSCS rata Areas and Control Blocks 251 FREEE FREEE defines an element in the chain of elements that comprise the free element queue. FREEQ in SVECTORS the FREEE DSECT. points to the chain of free elements, each of which is defined by , 0 FREENEXT 4 FREESPAR I I I 8 FREEID C , , I I L Hexadecillal Displacement -----------0 "F 252 Field Name Field Description, Contents, eeaning FREENEXT DS 1F FREESPAR DS CL11 FREEID DS 1X Address of next element in free queue Spare field Standard taskid displacement, which is: ID=X'OO'=> free element lBe VM/310 Data Areas and Control Block Logic GIVE/TAKE §lVE ~~2Q~E1 1!~1] The format of a GIVE Request Table is: , I Synch Lock 0 I 4 Task name or A(GIVE Element) 8 A (GIVE Request Buffer) C A (GIVE Response Buffer) I I I I I .J When a task requests the services of another task via a GIVE request, the second field of the table above contains the task name of the task to which the task is to be sent. When DMTGIV builds a GIVE element for the request, it overlays this task name with the address of the GIVE element. The task Ferfor.ing the requested service builds a table, which corresponds to the GIVE request table. table called the TAKE request GIVEE defines symbolic addresses for items used in processing a GIVE request. GIVEQ in SVECTORS cOiimunicaticns. points to the queue of GIVE elements used in task-to-task The GIVEADDR field of this DSECT is the address of a GIVE request table, which, in turn, contains addresses of buffers for elements describing requests and resFonses to requests. These tables are described below; the elements that fill the buffers are described in "AFpendix C: RSCS Request Elements." , I GIVENEXT 0 I I 4 I I 8 I I GIVEADDR GIVENAME C I/////////GIVESPAR/////////I Hexadecimal Displacellent ------------ Field Name 1F 1F C E GIVENAME DS GIVESPAR DS GIVENID DS CL4 AL2 1X F GIVERID 1X 8 GIVENID GIVERID I I Field Description, Contents, Meaning GIVENEXT DS GIVEADDR DS 0 4 I I I I I DS Address of next GIVE element Address of GIVE request table in sending task's storage Task name of receiving task Reserved for IBM use 1-byte identification of receiving task after the TAKE request has been processed 1-byte identification of sending task Section 3. RSCS rata Areas and Contrcl Blocks 253 IOE IOE defines symbolic addresses operation requested by a task. of elements and other information associated MPIIOQ and SELIOQ in SVECTORS point to queues selector channels, respectively. The IOTABLEA field points to the address of described in this secticn. o lONEIT 4 IOSUBQ lOADDR C Hexadecimal Displacement ------------ an I/O table defined by IeTAELE, which is Field Name IOSECHAN IOID Field Description, Contents, Meaning 4 IONEIT IOSOBQ DS DS 1F 1F Address of next active I/O element Address of first inactive I/e element for a given subchannel 8 IOSTIT EQU * Statu~ ~lags 0 Bits defined in IOSTAT SENSING---EQO-X'80'--CHANDONE EQU X'40' C IOTABLEA IOADDR DS DS 1F AL2 E F IOSBCHAN IOID DS DS 1X 1X 8 254 of I/C elements for the multiplexer and IOTAELEA IOSTAT 8 with an I/O for current IIC operation (first tyte of IOTABLEA) Flag set to 1 while automatic sense is active Flag set to 1 when subchannel terminates Address of I/O request table in task storage Address (cuu) of the device requesting current I/O operation Subchannel address; 1-byte; assigned by MSUP ID of task associated with this I/O cperation is 1-byte and assigned by MSOP IBM VM/370 Data Areas and Control Block Logic ICTAELE IOTABLE defines symbolic addresses for items used in processing an I/C interrupt request. The first five fields are filled in by the task to convey information about the I/O request to the supervisor. The last three fields are filled in ty the supervisor to convey status infor.ation about the I/O operation to the task. o IOSYNCH DEVCUU 4 DEVCODE PROGADDR 8 c SENSREQ SIOCODE 10 ENDSENSE 14 Hexadecimal Displacement ------------ Field Name Field Description, contents, fteaning 0 4 IOSYNCH DEVCUU DS DS 1F AL2 6 7 SENSREQ DEVCODE DS DS AL1 AL1 8 PROGADDR DS 1F Synchronization lock for I/O operation Address (cuu) of device associated with this I/O operation Numter of sense bytes requested on unit check 1-byte Vft/370 device type code (not used by I/O manager) Address of channel program for the l/C operation 1-byte SIO condition code return information c D 14 SIOCODE ENDCSi DS END SENSE DS 2F AL1 SIO condition code Ending CSi with composite status return information Requested return sense informaticn on unit check CSi status ~i!§ g~!iD~g TYPPUN TYPPRT in ENDSENSE EQU 1'80'-----EQU X'40' V~/370 type code for the punch V8/370 type code for the printer Section 3. RSCS Iata Areas and ContrGl Blocks 255 LIRKTABL LINKTABL describes the status of a single link in the RSCS network; collectively, all the links defined for the system are referred to as the link tatle. An a-byte header precedes the first entry in the link table (that is, the first link defined by the LINKTABL DSECT). The TLINKS field in SVECTORS points to this header, which has the following format: o 4 total links 6 current links max ilium links total links is the total number of links defined for an RSCS installation via the GENLINK macro during system generation. (For information cn the GENLINK macro, see the !~LJ1Q ~I2!~! gIQg!g~~!~2 Gu~de.) maximum links is the maximum number of concurrently active links allowable. current links is the number of links active in RSCS at a given time. I o 1 LINKID I 4 1 1-----------------------------------------------------LDEFTNME 1-----------------------------------------------------C 1 8 I tlC~T~ME 10 LDEFDRVR 14 LACTDRVR 18 1C 20 LACTLINE LDEFLINE 24 LDRVRVAR 28 LDEFCLS1 LDEFCLS2 LDEFCLS3 LDEFCLS4 2C LACTCLS1 LACTCLS2 LACTCLS3 LACTCLS4 30 LTIMEZON LFLAG 34 LRESERVD LPENDING LTAKEN 38 LPOINTER 3C LMSGQ 40 LTRNSCNT 44 LTOCNT 48 LERRCNT LSPARE LNKCLOCK 4C 256 IBM VM/370 Data Areas and Control Block Logic LINKTAEL Hexadecimal Displacement o 8 C 10 18 20 22 24 28 29 2A 2B 2C 2D 2E 2F 30 31 Field Name LIN KID LDEFTNME LACTTN!'lE LDEFDRVR LACTDRVR LDEFLINE LACTLINE LDRVRVAR LDEFCLSl LDEFCLS2 LDEFCLS3 LDEFCLS4 LACTCLSl LACTCLS2 Field Description, Contents, DS DS DS DS DS DS DS DS DS DS DS DS DS DS CL8 CL4 CL4 CLa CL8 2X 2X 1F CLl CL1 CLl CLl CLl CLl LACTCLS3 DS CL1 LACTCLS4 DS LTIMEZON DS eLi 1X LFLAG 1X DS ~eaning EECtlC link identification Default task name Active task name Default driver identification Active driver identificaticn Default virtual line address Active virtual line address Line driver variable information Default spool file Class 1 Default spool file Class 2 Default spool file Class 3 Default spool file Class 4 Active spool file Class 1 Active spool file Class 2 Active spool file Class 3 Active spool file Class 4 Displacement of two complete time zones from Greenwich Mean Tille Link flag byte 1}it§ g~!.!l!.~g in LFLAG '80'--LACTIVE EQU LALERT EQU X'40' LHOLD EQU X'20' LDRAIN EQU X'10' LTRALL BQU X'08' LTRBRR BQU X'04' LHALT EQU 1'01' Link active AXS ALERT exit set Link hold set Link drain in progress Link transaction tracing (all) Link transaction tracing (error) Link to be forced inactive LINKLEN BQU Length of link table entry 32 34 36 38 LRBSBRVD LPENDING LTAKEN LPOINTER DS DS DS DS 1H 1H 1H 1F 3C LMSGQ LTRNSCNT LERRCNT LTOCNT LSPARE LNKCLOCK DS DS DS DS DS DS 1F 1H 1H 1H 1H 8X -x 40 42 44 46 48 *-LINKTABL Count of tag elements reserved Count of unaccepted tags Count of tag slots in use Address of start of the TAG queue for this RSCS link MSG queue pointer Link transaction count Error count Timeout count Spare half word Clock comparator value for this link Section 3. RSCS tata Areas and Control Blocks 257 REQBLOCK REQBLOCK defines line driver. data and information for a request for file processing by The first four fields of this DSECT form a GIVE request table, "GIVEE: A GIVE Element", in this section. the DMTMFT which is described in The next seven fields of this DSECT for a GIVE request tuffer in the format of a File Request Element, which is described in "Appendix C: RSCS Request Elements." 0 ---------------------------------------------------------, RDEVSYNC 4 RDEVREQN 8 RDEVREQ C RDEVRESP 10 RDEVRLEN RDEVFUN I///RDEVRESV///I 14 RDEVTAG 18 RDEVFIOA 1C 20 RDEVLINK 24 RDEVSOPT RDEVNAME f 28 RDEVSTYL 2C RDEVFLAGS Hexadecimal Displacement o 4 8 C 10 11 12 13 14 18 1C 24 27 2C 258 Field Name Field Description, Contents, Meaning Hexadecimal Locations 0 !hfQygh X ~Q~f!2§ lA~ !~1 GI!~ ~~gy~2! !~~1~ RDEVSYNC--DC--P'O'--- Synchronous lock RDEVREQN DC CL4'AXS' File access task RDEVREQ DC A(O) Request buffer address RDEVRESP DC AL1(0),AL3(0) Response buffer address Hexadecimal Locations 0 !h!QygA j1 ~Q!E!!§~ 1~~ ]~1 §1!~ ]~g~21 ~yff~! in-the-Pormat-of-i-Pile ]~gy~21 !l~ID~nl (~2 2~Q!~ l~ !EE§~~l! ~) RDEVRLEi--DC- 1L1(O,--Request length RDEVFUN DC AL1(0) Request function RDEVRESV DC lL1(0) Reserved for IBM use RDEVSOPT DC lLl(O) Subordinate option byte RDEVTIG DC A(O) Tag address RDEVFIOA DC A(O) File I/O area address RDEVLINK DC CL8' , Link name RDEVNAME DC C' Device name RDEVSTYL DC C' Device style RDEVFLAGS DC lL1(O,O,O,O) Device flags IBM VMj370 Data Areas and Centrol Block Logic ROUTE o ROUTDEST ROUTHEXT 8 ~------------------------------------------------------~ Hexadecimal Displacellent -----------0 a Field Nalle Field Description, Contents, !eaning ROUTDEST ROUTNEXT DS DS CLa CLa ROUTSIZE EQU *-ROUTDEST Final destination ID LINKID for indirect routing Length of a routing tatle entry Section 3. RSCS Iata Areas and Control Blocks 259 SVECTORS SVECTORS defines low storage for the RSCS storage: machine-defined and RSCS-defined. • virtual aachine.. It includes two types of MACHINE-DEFINED LOW STORAGE The SVECTORS aachine-defined low storage defines machine status data program execution and required by System/370 architecture. 0 4 , r IPLPSW I 40 44 CSW 50 TIflJER 1 1 1 48 CIW 1 I I 4C 1////1////////////////////////////////1 8 C IPLCCW 1 10 14 IPLCCW2 18 1C OLDEXT 54 OLDSVC 58 5C BEWEXT 20 24 OLDPROG 6C 6C BEWSVe 28 2C OLDMACH 7C 74 IIIEWflJlCH 30 34 OLDIO 78 7C BEWIO 38 3C Hexadeciaal Displacement -----------0 8 10 18 20 28 30 38 40 48 4C 50 54 58 60 68 70 78 260 referenced during Field Naae IPLPSW IPLCCW1 IPLCCW2 OLD EXT OLDSVC OLDPROG OLDMACH OLDIO CSW CAW DS DS DS DS DS DS DS DS DS DS DS DS TIMER DS NEWEXT DS NEWSVC DS NEWPROG DS NEWMACH DS NEWIO DS 1 ////1//////////////1/////////////////1 Field Description, Contents, flJeaning -------------------------------------- D X'00040000',V(DflJ7INI) D D External interrupt old PSW D Supervisor call old PSi D prograa check old PSW D Machine check old PSW D Input/output old PSW D Channel status word D Channel address word F Reserved for IBM use F TOn clock F 4X' FF' Reserved for IBM use F D X'00040000',V(DM7EXT) D X'OO040000',V(DflJ1SVC) D X'00040000',A(RIXOUCH) D X'00020000',A(OLtfIJACH) D X'OO040000',V(DflJ7IOMIB) IBM VM/370 Data Areas and Control Block Logic , , SVECTOBS • RSCS-DEFIBED LOi STORAGE RSCS-defined low storage begins at hexadecimal .location 200 and is defined specifically for the RSCS virtual aachine. It contains pointers to aodules that comprise the supervisor, supervisor control queues, and queues of requests for supervisor services. 248 DISP1IJCB 24C iAITRIQ 250 POSTREQ ACTIVE 254 IOREQ 214 !UIBMAP 258 TiSKREC 218 !lIBSIZE 2SC M1IBREQ 21C QUEUE 2EO ASYBRE(; 220 QUEUEBD 264 lLERTBEQ 224 FREEQ 268 GIVBRlQ 228 T1SKQ 26C TAKEREC 22C MPXIOQ 270 TVECTCBO 230 SELIOQ 2711 TVECTCB1 234 IOEXITQ 278 TVECTCB2 238 EXTQ 27C TVECTCB3 23C ALERTQ 280 TVECTCB4 2110 GIVEQ 284 TVECTCB5 244 QREQ 288 TVECTCB6 28C TVECTCB7 200 204 BEiPSll 208 20C SSAVE 210 Hexadecimal I:isplacement ------------ Field Bame Field Description, Contents, Meaning IUIBM1P ORG DS DS DS DS DS SVECTORS+X'200' D D'O' 2F 2F'0' X X'OO' AL3 lL3 (0) V (DMTMIPMS) MIIBSIZE DS F 200 208 210 BEiPSi SSlVE lCTIVE 214 218 , F'O' Leave rooa for machine extensions Dispatched PSi for last dispatcher General-purpose low storage save area Identifier of currently active task Address of task element for last dispatchee Address of start of main storage allocation map Total nuater of pages in aain storage Section 3. RSCS rata Areas and Contrel Blocks 261 SVECTORS Eexadecimal tisplacement 262 Field Name Field Description, Contents, ~eaning 21C 220 QUEUE QUEUEND DS DS v (SQUEUE) V (SQUEUEND) 224 228 22C 230 234 FREEQ TASKQ MPXIOQ SELIOQ IOEXITQ DS DS DS DS DS A (0) A (0) A (0) A (0) A (0) 238 EXTQ DS A (0) 23C ALERTQ DS A (0) 240 GIVEQ DS A (0) 244 QREQ DS V (DMTQRQ) 248 24C 250 254 258 25C 260 264 DISPATCH WAITREQ POSTREQ IOREQ TASKREQ MAINREQ SYNREQ ALERTREQ DS DS DS DS DS DS DS DS V(DMTDSP) V (DMTWAT) V (DMTPST) V (DMTIOMRQ) V (DMTASK) V (DMTSTO) V (DMTASY) A (DMTSIG) 268 26C GIVEREQ TAKEREQ DS DS V (DMTGIV) V(DMTAKE) Address of start of sUFervisor queue Address of end of last supervisor queue element Address of start of free element queue Address of start of task element queue Address of start of multiplexer I/O queue Address of start of selectcr I/O queue Address of start of asynchronous I/O request element queue Address of start of external request element queue Address of start of task asynchronous request element queue Address of start of GIVE request element queue Supervisor queue allocation request entry address Task dispatcher entry address Wait request entry address Post request entry address I/O request entry address Task management request entry address Main allocation request entry address Asynchronous interrupt request entry address Task asynchronous signal request) A(ALERT) entry address Task request GIVE request entry address Task request TAKE request entry address 270 274 278 27C 280 284 288 28C TVECTORO TVECTORl TVECTOR2 TVECTOR3 TVECTOR4 TVECTOR5 TVECTOR6 TVECTOR7 DS DS DS DS DS DS DS DS A (0) A (0) A (0) A (0) A (0) A (0) A (0) A (0) Task Task Task Task Task Task Task Task TLINKS TROUTE TPORTS TTAGQ TCOM EQU EQU EQU EQU EQU TVECTORO TVECTORl TVECTOR2 TVECTOR3 TVECTOR4 Link table address Reserved for IBM use Svitchable port table address Tag slot queue Common routine chain defined defined defined defined defined defined defined defined IBM VM/370 Data Areas and Control Block Logic field field field field field field field field TAG TAG describes a file enqueued fer processing by RSCS. The data in this area is built from the TAG record associated with a file via the CP tag command and from the CP speel file hlock (SFB) that describes the file. o TAG NEXT 4 TAGELOCK 8 TAGINLOC C TAGLINK 10 i4 TAGINTOD 18 1C TAGINVM 20 24 TAGRECNl! 28 2C TAGRECLN 30 TAGID 34 TAGFLAG T1GINI:EV T1GCL1SS TAGCOPY TAGFLAG2 till/IIII/RESERVED//III//ii/// TAG NAME 38 3C 40 TAGTYPE 44 48 4C TAGDIST 50 54 TAGTOLOC 58 5C TAGTOVM 60 64 68 TAG PRIOR TAGDEV Section 3. RSCS Iata Areas and Control Blocks 263 Hexadecimal Displacement o 4 8 10 18 20 28 2C 2E 2F 30 32 34 35 36 38 44 50 58 60 68 6A Field Name TAGNEXT TAG BLOCK TAGINLOC TAG LINK TAGINTOD TAGINVM TAGRECNM TAGRECLN TAGINDEV TAGCLASS TAGID TAGCOPY TAGFLAG TAGFLAG2 DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS TAG NAME DS TAG TYPE DS TAGDIST DS TAGTOLOC DS TAGTOVM DS TAG PRIOR DS TAGDEV DS TAG LEN 264 Field Description, Contents, Meaning 1F 1F CL8 CL8 CL8 CL8 1F 1H 1X CL1 1H 1H 1X 1X 1H CL12 CL12 CL8 CL8 CL8 CL2 2X EQU *-TAGNEXT Address of next active queue entry Address of associated I/O area Originating location Next location for transmission Time of file origin Originating virtual machine Number of records in file Maximum file data record length Device code of originating device File output class File number at origin location Number of copies required VM/370 SFELCK centrol flags (SFBFLAG) VM/370 SFELOK control flags (SFEFLAG) Reserved for IBM use Filename Filetype File distritution code Destination location ID Destination virtual machine ID Transmission priority Active file's virtual device address Length (in tytes) of the file TAG (X'OD') IBM VM/370 Data Areas and Control Block Logic TAGABEA TAGABEA in DMTAXS module contains tag queue pointers and other It is pointed to by TTAGQ in SVECTOBS. o TAGAFBEE 4 TAGACIN TAGACOUT 8 TAGAGOT C Hexadecimal tisplacement 'IAGAHOLI Field Name ------------ Field Description, Contents, Meaning -------------------------------------- 0 TAGAFREE DC A (0) 4 TAGACIN TAGACOUT TAGAGOT TAGAHOLD DC DC DC DC A (0) A (0) H'O' H'O' 8 C E tag ccntrol informaticn. Address of queue of free TAG slots elements) Pointer to queue of active inFut TAGs Pointer to queue of active cutput TAGs Number free slots left Number slots to be held (or The format of a TAKE request table is: n. V Task name of GIVE requestor 4 A(TAKE Request Buffer) 8 A(TAKE Response Buffer) The TAKE request table corresponds to the GIVE request table. It is built performing the requested service (via a GIVE request by another task). by the task Section 3. RSCS Iata Areas and Control Blocks 265 TANKDSEC TANKDSEC is used to reference buffer data and control information ccntained in tanks, which are unit buffers used to deblock the larger TP buffers. (TP buffers are defined by the needs of an individual remote station and their size varies from station to station.) $TANKPOL in mcdule DMTSML points to a queue of available tanks. o 4 8 r TANKCHN 1 1-------------------------------------------------------I TANKRCB I TANKSRCB TANKCNT 1-------------------------------------------------------I TANKDATA DO Hexadecimal Displacement o 4 5 6 8 DO 266 Field Name TANKCHN DC TANKRCB DC TANKSRCB DS TANKCNT DS TANKDATI DS TANKEND ·DS Field Descripticn, Contents, Meaning A (0) 1C 1C 1H CL200 OF Tank chain field Tank record control byte Tank subrecord control byte Count of data bytes in tank Data area in tank Forc~ next to word boundary IBM VM/370 Data Areas and Control Block Logic TAREA TAREA an area associated with each task. This area is used to save the contents of the task's PSi and general registers and to flag whether or not a task has infcrmation ready to pass. TAREA comprises the first 78 bytes of the storage area defined in each task's storage. 0 TPSW 4 8 TGREGO C TGREG1 10 TGREG2 14 TGREG3 18 TGREG4 lC TGREG5 20 TGREG6 24 TGREG7 28 TGREG8 2C TGREG9 30 TGREG10 34 TGREG11 38 TGREF12 3C TGREG13 40 TGREG14 44 TGREG15 48 TREQLOCK Section 3. RSCS Iata Areas and Control Blecks 267 TAREA Hexadeciaal Displacement -----------0 8 C 10 14 18 1C 20 24 28 2C 30 34 38 3C 40 44 48 268 Field Naae Field Description, Contents, !!eaning TPSW DS 1D TGREGO TGREGl TGREG2 TGREG3 TGREG4 TGREG5 TGREG6 TGREG1 TGREG8 TGREG9 TGREG10 TGREG11 TGREG12 TGREG13 TGREG14 TGREG15 TREQLOCK DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS IF 1F 1F 1F 1F 1F IF 1F IF 1F 1F 1F IF IF 1F 1F IF ~------------------------------------- PSI with which a teaporarily interrupted task resuaes execution Save area for general register 0 Save area for general register 1 Save area for general register 2 Save area for general register 3 Save area for general register 4 Save area for general register 5 Save area for general register 6 Save area for general register 1 Save area for general register 8 Save area for general register 9 Save area for general register 10 Save area fer general register 11 Save atea for general register 12 Save area for general register 13 Save area for general register 14 Save area for general register 15 Syncbronization lock used to signal wbether or not a task bas inforaation IBft Vft/310 Data Areas and Control Block Logic TASKE TASKE defines symbolic names of status information pertaining to an active task. The TASKQ field of SYECTORS points to a queue of task elements, each cf which is defined by this DSECT. The queue consists of one task element (~ASKE) for each active task. o TASKNEIT 4 TASKSAYE a TASKNA!!E c Hexadecimal Displacement ------------ 111///////T1SKSPIB/I///////1 Field Name TASKNEIT DS 1F 4 TASKSAYE TASKNA!E TASKSP!R TASKSTAT C E DS DS DS DS 1F CL4 lL2 11 !!.!!§ g§.t!!l§g in TASKSTIT WAITING EQO XtaO'-----LOCKLIST EQO 1'40' F TISKID Field Description, Contents, Beaning 0 a TISKSTIT LII;BO EQO IiOii TASKID DS 11 Address of the next element on the task elellent queue Address of this task's Task Save Area (TAREA) Task name specified ty the task; 4 bytes long Reserved for IBM use Status flags associated with the task Flag set to 1 when task is ncndispatchable Flag set to 1 while task is waiting fer the synchronous lock list Flag set to 1 wben a task is being terminated. Number ID fer the task; 1 byte is assigned by the supervisor when task is made active Section 3. RSCS tata Areas and Contrel Blocks 269 TCTDSECT TCTDSECT defines the format of six tables used by module D8TSML that are at labels $CCOM1, $WCO"1, $PCOM1, $RCOM1, $UCOM1, and $JCOM1. Each table corresponds to a DMTS8L input/output processor and is used by that processor to perform its l/C function. The GIVE request table and the GIVE request buffer used by D!TSML are e.bedded in the task control table at locations X'24' through 1'30' and 1'34' through 1'40', respectively. TCTEBTY TCTSTRT 0 TCTRTD 4 TCTtlTA 8 TCTCCW C TCTFLAG TCTOPCOD TCTCCliCT TCTECB TCTSTAT TCTliFE 10 14 TCTSAV1 18 TCTDEXT 1C TCTRCER I TCTRCET TCTFCS 20 TCTCOM 24 TDEVSYNC 28 TDEVREQN 2C TDEVREQ 30 TDEVRESP 34 TDEVRLEN TDEVFUD I///TDEVRESV//I 38 TDEVTAG 3C TDEVFIOA 40 '1'DEVLIBK TDEVSOPT 44 48 TSW1 4C TSi3 TSW2 TSli4 TCTTOVM 50 54 TCTTANK 58 TCTBUFER 5C 270 TCTTNKLM I TCTTNKCT TCTEUFLM IBM V"/370 Data Areas and Control Block Logic TCTBUFCT TCTDSECT Hexadecimal Displacement Field Nalle Field Description, Contents, Meaning -----------0 0 2 4 8 9 C D E 10 TTCT TCTSTRT TCTENTY TCTRTN TCTCCW TCTDATA TCTFLAG TCTOPCOD TCTCCWCT TCTECB DS DS DS DS DS DS DS DS DS DS OB CL2 CL2 CL4 CL1 AL3 CL1 CL1 AL2 CL1 Branch to proper processor entry Address portion modified by Frocessor Eranch to next Frocessor via commutator CCW for device operation code Address of data transferred Flags on CCli Save area for CCW operation code CCli count of data transferred Event control block ~it§ g~!:!1!~g 11 TCTBUSY in TCTECB EQU i'10'---- Device busy bit TCTSTAT DS Status flags CLl Bits defined in TCTSTAT TCT1052--EQU 1'10'-----TCTREL TCTOPEN TCTACT EQU X'04' EQU X'80' EQU X'40' TCT status flags for 1052 Interlock release request for console TCT open bit Action required on this TCl 12 14 18 1C 1E 1F 20 TCTWFB TCTSAV1 TCTNEXT TCTFCS TCTRCBR TCTRCBT TCTCOM DSAL1 DS 1F DS 1F DS AL2 DS CL1 DS CL1 DS, 1F Waiting for buffers Save area for processor routine Next TCT in chain Function control sequence mask RECV record control tlock Trans record control block Pointer back to commutator 24 28 2C 30 TDEVSYNC TDEVREQN TDEVREQ TDEVRESP DS DS DS DS 1F CL4 1A 1A Synch lock File access name Request buffer address Response tuffer 34 35 36 37 38 3C 40 48 49 4A 4B 4C TDEVRLEN TDEVFUN TDEVRESV TDEVSOPT TDEVTAG TDEVFIOA TDEVLINK TSW1 TSW2 TSW3 TSW4 TCTTOVM DS DS DS DS DS DS DS DS DS DS DS DS AL1 AL1 AL1 AL1 1A 1A CL8 AL1 AL1 AL1 AL1 CL8 Request length Request function Reserved for IBM use Subordinate option byte Tag address File I/O area Link name Device switch 1 Device switch 2 Device switch 3 Device switch 4 Virtual machine output destination 54 58 5C 5D 5E 5F TCTTANK TCTBUFER TCTTNKLM TCTTNKCT TCTBUFLM TCTBUFCT DS DS DS DS DS DS 1F 1F CL1 CL1 CL1 CL1 Next tank to generate output Address of current buffer Maximum numter of tanks assignable Current numter assigned Maximum numler of tuffers assignable Current numler assigned Section 3. RSCS tata Areas and Control Blocks 211 272 IB! V8/370 Data Areas and Control Block Logic Appendixes Information in the following appendixes supplements through 3 of this publication: the text in Sections 1 • "AFpendix A. CP and RSCS Equate Sy.1::ols" contains asse.bler symbols used in CP and RSCS to reference data. • "Appendix B. RSCS Control Areas" shows during execution of RSCS tasks. those constants and variables used • "AFpendix C. RSCS Request Elements" contains information on tables used during RSCS task-to-task communication. and formats of • "APFendix D. CMS Equate Symbols" used in CMS to reference data. • "Appendix E. Data Areas and Control Elock References" lists the names of CP, CMS, and RSCS control blocks. This appendix (1) shows module references to data areas and/or control blocks and (2) gives information on how certain data areas or control blocks are created and released. langua~e equate contains Assembler language equate symbols Appendixes 273 274 IBM VM/370 Data Areas and Central Block Logic Appendix A. This Appendix contains and RSCS data for: • • • • • VM/370 YM/370 YM/370 VM/370 VM/370 CP and RSCS Equate Sumbols Assembler language equate symbols used tc reference CF Device Classes, Types, Models, and Features Machine Usage Extended Control Registers CP Usage Registers Appendix A. CP and RSCS Equate sy.bols 275 !~L11~ ~~!!£~ £1!~§~§, Field Name ~X~~§, ~Q~~1§, !!~ !]!TU]!S Field Description, Contents, Meaning CLASTERM EQU X'80' Terminal device class TYP2700 TYP2955 TYPTELE2 TYPTTY TYPIBM1 TYP2741 TYP1050 TYPUNDEF TYPBSC TYP3210 TYP3215 TYP2150 TYP1052 EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU X'40' TYP2700 X'20' X'20' X' 10' X'18' X' 14' X, 1C' x'80' X'OO' TYP3210 TYP3210 TYP3210 2700 bisyncronous line 2955 communications line Telegraph terminal control type II Teletype terminal IBM terminal contrel type I 2741 communications terminal 1050 communications terminal Terminal device tYFe is undefined Bisyncronous line for 3270 remote stations 3210 console 3215 console 2150 console 1052 console FTRDIAL EQU X'01' Dial feature CLASGRAF EQU X'40' Graphics device class TYP2250 TYP2260 TYP2265 TYP3066 TYP1053 TYP3277 TYP3278 TYP3284 TYP3286 TYP3287 TYP3288 TYP3138 TYP3148 TYP3158 X'80' X'40' X'20' X'10' X'08' X'04' X'01' X'02' TYP3284 TYP3284 TYP3284 TYP3277 TYP3271 TYP3277 2250 2260 2265 3066 1053 3271 3278 3284 3286 3287 3288 3138 3148 3158 FTROPRDR EQU CLASURl EQU X'80' X'20' operator identification card reader Unit record input device class TYPRDR TYP2501 TYP2540R TYP3505 TYP1442R TYP2520R TYPTIMER TYPTR TYP2495 TYP2671 TYP1017 EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU X'80' X'81' X'82' X'84' X'88' X'90' X'40' X'20' X'21' X'22' X'24' Card reader device 2501 card reader 2540 card reader 3505 card reader 1442 card reader/punch 2520 card reader/punch Tiller device TaFe reader device 2495 magnetic tape cartridge reader 2671 paper tape reader 1011 paper tape reader CLASURO EQU X'10' Unit record output device class TYPPUN TYP2540P TYP3525 TYP1442P TYP2520P TYPPRT TYP1403 TYP3211 TYP3203 TYP1443 EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU X'80' X'82' X'84' X'88' X'90' X'40' X'41' X'42' X'43' X'44' Card punch device 2540 card punch 3525 card punch 1442 card punch 2520 card punch Printer type device 1403 printer 3211 printer 3203 printer (3211 and 14C3) 1443 printer 276 EQU EQU EQU EQU EQU EQU EQU EQO EQU EQU EQU EQU EQU EQU display unit display station display statien console printer display statien Model 2A system console printer printer printer printer system console system console system console IBM VM/370 Data Areas and Control Block Logic Field Name TYP3800 TYPTP TYP1018 FTRUCS FTR4WCGM Field Description, Contents, Meaning EQU EQU EQU EQU EQU X'45' X'20' X'24' XW01· X'80' 3800 Printing subsystem Tape punch device 1018 paper tape punch UCS feature 3800 has four WCGM availatle. Note that FTBEXTSB (X'40') is also used for a 3800 printer. CLASTAPE EQU X'08' Magnetic tape device class TYP2401 TYP2415 TYP2420 TYP3420 TYP3410 TYP3411 EQU EQU EQU EQU EQU EQU X'80' X'40' X'20' X' 10' X'08' TYP3410 2401 2415 2420 3420 3410 3411 FTR7TRK FTRDLDNS FTRTRANS FTRDCONV EQU EQU EQU EQU X'80' X'40' X'20' X'10' 7-track feature Dual density feature Translate feature Data conversion feature CLASDASD EQU X'04' Direct access storage device class TYP2311 TYP2314 TYP2319 TYP2321 TYP3330 TYP3333 TYP3350 TYP2301 TYP2303 TYP2305 EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU X'80' X'40' TYP2314 TYP2311 X' 10' TYP3330 X'08' TYP2311 TYP2311 X'02' 2311 2314 2319 2321 3330 3333 3350 2301 2303 2305 TYP3340 EQU X'Ol' 3340 disk storage facility FTRRPS FTREXTSN FTR2311T FTR2311B EQU EQU EQU EQU FTR35MB E"T' \lU FTR70MB FTRRSRL VIRTUAL SYSVIRT FTRVIRT EQU EQU EQU EQU EQU X'80' X'40' X'20' X'10' X'08! X'04' X'02' X'Ol' X'20' X'Ol' CLASSPEC EQU X'02' Special device class TYPCTCA TYP3704 TYP3705 TYP3851 TYPSRF TYPUNSUP EQU EQU EQU EQU EQU EQU X'80' X'40' TYP3704 X'20' X'04' X'Ol' Channel-to-channel adapter 3704 programmable communication control unit 3705 programmable communication control unit 3851 Mass Storage Controller SRF device (#7443) Device not supported by VM/370 FTRTYP1 FTRTYP2 FTRTYP3 FTRTYP4 EQU EQU EQU EQU X'10' X'20' FTRTYP2 FTRTYPl Type 1 channel adapter Type 2 channel adapter Treat as type 2 channel Treat as type 1 channel tape tape tape tape tape tape drive drive drive drive drive drive disk storage drive disk storage facility disk storage facility data cell drive disk storage facility disk storage facility disk storage facility parallel drum serial drum fixed head storage device Rotational positional sensing (RPS) installed (3340) Extended sense bytes (24 tytes) (= VDEV231T) Top half of 2314 used as 2311 (= VDEV231B) Bottom half of 2314 used as 2311 35 multibyte data module mounted (3340; 70 multibyte data module mounted (3340) Reserve/release are valid CCW operation codes Device is a 3330V virtual machine Device is a 3330V system virtual machine 3330 virtual (MSS) volume (370x) (370x) adapter (370x) adapter (370x) Appendix A. CP and BSCS Equate Symbols 277 Field Name Field Description, Contents, Meaning 12its .Q~!i.n~g EXTMODE EQU MCHEK EQU WAIT EQU PROBMODE EQU ~!g.nggfQL~!!~.ng~g PSW Bit 12-- extended lIode Bit 13 - machine check enabled Bit 14 - wait state Bit 15 - problell state X'08' X'04' X'02' X'01' in Extended f2! EQU --X'40'---EQU X'04' EQU X'02' EQU X'01' lU ts .Q~!i.n~g 12its ATTN SM CUE BUSY CE DE UC UE PCI IL PRGC PRTC CDC CCC g~!i.n~g lFCC RQll CEC EQU PERMODE TRANMODE IOMASK EXTMASK i.n EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU in Channel --X'80'--X'40' X'20' X'10' X'08' X'04' X'02' X'01' X'80' X'40' X'20' X' 10' X'08' X'04' X'02' X'01' Bit Bit Bit Bit 01 05 06 07 ~ta!~2 ~g!g Bit Bit Bit Bit Bit Bit Bit Bit Bit Bit Bit Bit Bit Bit Bit Bit 32 33 34 35 36 37 38 39 40 41 42 43 44 45 - (~~!) 4~ 47 - ]its .Q~!i.n~g in Channel Command Word CD EQU --X'80'--- ------Bit-32 CC Bit 33 EQU X'40' Bit 34 SILl EQU X'20' SKIP Bit 35 EQU X'10' PCIF Bit 36 EQU X'08' IDA Bit 37 EQU X'04' ~its .Q~!i.n~.Q CMDREJ INTREQ EUSOUT EQCEK tATACHK 278 EQU EQU EQU EQU EQU i1! ..§en2~ X'80' X'40' X'20' X'10' X'08' (gg~!g.n Bit Bit Bit Bit Bit 0 1 2 3 4 PER enabled translate mode summary I/O mask summary external mask - attention status modifier control unit end busy channel end device end unit check unit exceFtion program-control interrupt incorrect length program cbeck protection check channel data check channel control check interface control check chaining check (CCW) --chain data - command chain - suppress incorrect length indicator - suppress data transfer - program-control interrupt FETCH - indirect data address !g !g2! g~!if~2) command reject intervention required bus out equipment check data check IBM VM/370 Data Areas and Control Block Logic Field Nalle Field Description, Contents, Meaning ]1ts g~!in~.Q • BYTE 0 BLKMPI EQU SSl!SUPP EQU TODSYNC EQU X'80' X'40' X'20' Bit 00 - enable block aultiplexing Bit 01 - enable SSM suppression TOD synchronous control • BYTE 1 PAGE4K EQU PAGE2K EQU SEG1M EQU X'SO' X'40' X'10' Bit OS - use 4K pages Bit 09 - use 2K pages Bit 11 - use 1M segllents X'SO' X'40' X'10' X'OS' X'04' Bit 16 1"7 , Bit 18 Bit 19 Bit 20 Bit 21 • BYTE 3 INTMASK EQU KEYMASK EQU SIGMASK EQU X'SO' X'40' X'20' Bit 24 - mask on interval timer interrupt Bit 25 - mask on oFerator key interrupt Bit 26 - mask on external signals 2 througb 7 ]1ts g~!11!~.Q • BYTE 3 PERFCL EQU RESPCL EQU SCBEDCL EQU TIMECL EQU USERCL EQU PRIVCL EQU DASDCL EQU SEEKCL EQU X!SO' X'40' X'20' X'10' X'OS' X'04' X'02' X'01' Sample hardware/software utilizations Trace response class Trace scheduler activity class Execution timing class Sample user resource usage class Privileged operands class SallPle DASDs: utilizations class Trace DASD seek activity • BYTE 4 SPROFCL EQU X'SO' Trace system profile class EQU EQU EQU EQU X'SO' X'40' X'20' X'10' Bit Bit Bit Bit 00 01 02 03 - monitor monitor monitor monitor Bits defined ;-BYTE-O--BARDSTOP EQU SYNCLOG EQU IOLOG EQU RECOVRPT EQU CONFGRPT EQU DAMAGRPT EQU WARNGRPT EQU X'SO' X'40' X'20' X'OS' X'04' X'02' X'01' Bit Bit Bit Bit Bit Bit Bit 00 01 02 04 05 06 07 - check stop control synchronous logout control I/O logout control recovery report mask configuration report mask external damage report mask warning condition report mask • BYTE 1 ASYNELOG EQU ASYNFLOG EQU X'SO' X'40' Bit OS - asynchronous extended logout control Bit 09 - asynchronous fixed logout contrcl • BYTE 2 MFAlUSK EMSMASK XC5ASK SYNCMASK CKCMASK CPTMASK EQU EQU EQO EQU EQU EQU X;20; Bit . - malfunction alert Blask emergency signal iii ask - external call mask - TOD synchronous check mask - mask on clock comparator interrupt - mask on processor timer interruFt ~.!ts g~!in~.9 • BYTE 0 PERSUBR PERIFET PERSALT PERGPRS successful branches instruction fetches storage alteration register alteration Appendix A. CP and RSCS Equate Symbols 279 !~LJ1~ ~2Y!1~ ~!~B01§ Field Name Field Description, Contents, fteaning It! ts .Q~!!~.Q for TRANS EQU --X'SO'-ERING EQU X'40' DEFER EQU X'20' LOCK IOERETN EQU X'10' EQU SYSTEft X'08' VFAULT EQU X'04' ]guat~§ DELSEGS DELPAGES VRALOC PAGTONLY NEiPAGES BEiSEGS KEEPSEGS OLDVftSEG fOE ~g~s~et~E EQU X'80' EQU X'40' EQU X'20' EQU X'10' EQU X'08' EQU X'04' EQU X'02' EQU X'Ol' !~£E~ li~lg Bring requested page Defer execution until page in core Lock page for I/O cperaticn Return I/O errors to caller Call to DftKPTRAB for system virtual machine space DftKPTRAN call for virtual page. Caller will not utilize real address for Calls !2 ~lUS!1~~~L~~KE1!~1 --Release the segment tables Release the page/swap tables Attempt allocation of Virtual=Real area Only one page table and return Euild new page/swaF table Euild new segment table Retain information in old segment table yftSEG pOinter in VftELOK valid ].!ts .Q~!ine.2 for Terminal lLQ .Jis ~]KQC] Output - ftessage not a command response NOTRESP EQU --X' 4000'--Output - control program error message EBRftSG EQU X'0800' Output - return immediately after call BORET EQU X'0400' Output - FRET buffer after queueing DIRET EQU X'0200' Output - message for system operator OPERATOR EQU X'0100' Output - logoff and drop line after message LOGDROP EQU X'80' Output logoff and hold line after message LOGHOLD EQU X'40' Output - write this message i •• ediately PRIORITY EQU X'20' I/O reques-t generated 1:1 -virtualllacbin-e VftGENIO EQU X'10' Output - suppress automatic carriage return NOAUTO EQU X'04' ALARft EQU Output - sound the audible alar. X'02' Output - suppress time stamp on message NOTlftE EQU X'Ol' INHIBit EQU Input - prevent display of this data X'08' EDIT EQU Input - edit input data for corrections X'04' UCASE EQU Input - translate data to uppercase X'02' ]gyste§ for ~i221 l!.!~ CBGSHQ EQU X'0200' CBGRDV EQU X'0100' ACTSFB EQU X'80' OPBSFE EQU X'40' DELSFB EQU X'20' CBGSFB EQU X' 10' ADDSFB EQU X'08' PRTCHB EQU X'04' PCHCHN EQU X'02' RDRCHN EQU X' 01' S~£2!~~I ~2ytin~ ~9~~~~~ !~! §~~~ ~~~!~ SyftUBLOK EQU X'04' SyftNOUPD EQU X'02' SVftSTAY EQU X'Ol' 280 - ~ftKCKE Checkpoint a SHQELCK Change attributes cf real device File being printed or punched An open print-punch file Delete SFELOK from checkpoint Change existing SFELOK Add new SFELOK to recovery cylinder SFELOK goes on print chain SFBLOK goes on punch chain SFELOK goes on reader chain Unlock only the current virtual machine Lock virtual machine with NOUPDT option Stack CPEXBLOK for current processor IBft V8/310 Data Areas and Control Block Logic Field Name Field Description, Contents, Meaning ClE§§ and Code !2g!!1!!!!Q1!§ MNCLPERF EQU -X'OQ'-Monitor perform class ~.2ni!.2f EQU EQU EQU EQU EQU X'OOOO' X'0061' X'0062' X'0063' X'01' Perform Monitor Monitor Monitor Monitor MNCOBRD EQU MNCOWRIT EQU MNCOERD EQU X'OOOO' X'0001' X'0002' Response class, begin read code Response class, write code Response class, end read code MNCLSCH EQO x'02' Monitor schedule class MNCODQ MNCOAQ MNCOAEL EQU EQU EQU X'0002' X'0003' X'0004' Schedule class, drop queue code Schedule class, add to queue code Schedule class, add to eligible list code MNCLUSER EQU X'04' Monitor user class MNCOUSER EQU X'OOOO' User class, user data MNCLINST EQU X'OS' Monitor instruction simulation class MNCOSIM X'OOOO' Instruction class; instruction simulation cede MNCLDAST EQU X'06' Monitor DASD/tape class MNCODASH EQU MNCODAS EQU X'OOOO' X'0001' DASTAP class, first record DASTAP class, data records MNCLSEEK EQU X'07' Monitor DASD class MNCOCYL EQU X'OOOO' DASD class, seeks code MNCLSYS EQU X'08' Monitor system profile class MNCODA EQU X'0002' SYS class, DAS:C data MNCOSYS MNCOTH MNCOTT MNCOSUS MNCLRESP EQO class, system performance tape header record tape trailer record collection suspension record response class Appendix A. CP and RSCS Equate Symbols 281 Field Nalle Field Description, Contents, Meaning ~3YSte§ !Qf SIGSENSE SIGXC SIGEMS SIGSTART SIGSTOP SIGREST SIGIPR SIGPR SIGSSS EQU EQU EQU EQU EQU EQU EQU EQU EQU SIGIML SIGICR SIGCR ~l§!!b ~g£fQ X'01' X'02' X'03' X'04' X'05' X'06' X'07' X'08' X'Og' Sense order code External call order code Emergency signal order code Start order code Stop order code Restart order code Initial program reset order code Prograa reset order code Stop and store status order code EQU EQU EQU X'OA' X'OB' X'OC' Initial aicroprogram load order code Initial processor reset order code Processor reset order code emergency signals SIGQUI SIGEXT SIGSYNC SIGSHD SIGCLK EQU EQU EQU EQU EQU X'800' X'400' X'200' X'100' X'080' Quiesce emergency signal Extend emergency signal Clock synchronization emergency signal Shutdown emergency signal Clock check signal (external call signals) SIGAPR SIGRES SIGWAKE SIGDISP EQU EQU EQU EQU X'800' X'400' X'200' X'100' Automatic processor recovery (external call signal) Resume external call signal Wakeup external call signal Dispatch external call signal 2S2 IBM VM/370 Data Areas and Control Elock Logic !~nl.Q RE§l~l!!!~ Field Name Field Description, Contents, l!eaning -------------------------------------- ~I·b.Ql.!f R~.9.!2!~! !g.!lg!~2 RO Rl R2 R3 R4 R5 R6 R7 R8 7 8 Rl0 Rll R12 R13 R14 R15 EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU YO Y2 Y4 Y6 EQU EQU EQU EQU 0 2 4 6 CO Cl C2 C3 C4 C5 EQU EQU EQU EQU EQU EQU 0 1 2 3 4 5 C6 EQU 6 C7 C8 C9 Cl0 Cl1 EQU EQU EQU EQU EQU 7 8 C12 1:'1'\" 1') C13 C14 C15 EQU EQU EQU 13 14 15 R9 ""'\O!U 0 1 2 3 4 5 6 9 10 11 12 13 14 15 9 10 11 General register definitions I ) } Fleating-point register definitions Control register definitions ( .£ } Appendix A. CP and RSCS Equate Symbols 283 284 IBM VM/370 Data Areas and Centrol Block Logic Appendix B. RSCS Control Areas This appendix lists the control areas used during task processing. !nfcr:aticn such as lists of synchronous locks, channel Frogra.s, TAKE request tables and buffers, and various work constants are included in these areas. Appendix B. RSCS Centrel Areas 285 The AXS Monitor Control Area is a data area used by tMTAXS to set up synch locks, a TAKE request table, a TAKE request and response buffer, and an input tuffer. Field Name AisNAME REXNAME DC DC OF'0',CL4'AXS' OF'O',CL4'REX' !ie!g ]2!!§£!!E1!.Q1!, ~ont~.!!!§, Meaning Task name for AIS routine Task name for control monitor AXSLOCKS DC DC DC A (ARRLOCK) A (REQLOCK) X'80',AL3(CMDLOCK) File tag arrival synchronous lcck address Request arrival synchronous lock address Command synchronous lock address ARRLOCK CMDLOCK DC DC F'O' F'O' File tag arrival synchronous leek Command synchronous lock AXSTAKE DC DC DC DC OF'O' C14' • A11 (L'AXSREQ) AL3(AXSREQ) A (AXSRESP) TAKE request table Giver's task na.e Pointer to request tuffer (input) Pointer to response buffer (output) AXSREQ AXSRESP DC DC IL140'00' X1136'00' TAKE request buffer TAKE response tuffer CMDIN CMDINPGS DC DC C1122' , X'OO' Input buffer for command element Co.mand in progress switch AXSCSAVE DC 18F'0' Co •• cn routine save area 286 IBM VM/310 Data Areas and Control Block Logic The REX Moniter Control Area is a data area used by IMiREX to initialize the DMTAXS and DMTLAX modules, point to queues of system data (such as the link table chain and the chain of tag elements), set up a series of synch locks for REX processing function, set up a console element, read and write channel programs, a console tatle buffer, a message buffer, a TAKE request table, and buffer, and various work constants. Field !!,gme REXREX REXAXS REXLAX DC DC DC OF'0',CL4'REX' OF'0',CL8'DMTAXS' OF'0',CL8'DMTLAI' REXTVECT DC OF'O' REXEND REXLOCKS ATTNLOCK REXCONSL !l~lg ~~§crlE112~, ~2~!~nt§, ~~~~ing iask name AXSname LAXname DC V (DMTSYSLKj DC DC DC DC DC V (DMTSYSRT) V (DMTSYSPT) V (DMTSYSTQ) V (DMTCOMVC) V(DMTSYSND) LlnK. tat.le chain Route table chain Switchatle port chain iag slot queue Common routine vector End of REX initial load DC DC DC DC DC DC OF'O' I'00',AL3(REQLOCK) I'00',AL3(ATTNLOCK) I'40',AL3(REICONSL) I'80',AL3(PROGLOCK) OF'0',X'00',AL3(0) Main REX wait list Request arrival synchrenous lock address Console attention synchronous lock address Console I/O synchronous lock address Program check synchronous leck address Console attention lock DC DC DC DC DC DC F'O' AL2(CONSADDR) ALl (1) ALl (TYP3210) DC X'OO' DMTREXCN DC 31'00' EQU REXCONSL Synchronous lock for I/O operation CUU console device address Cne byte requested on unit check Console device type code Channel program address to be filled in S10 condition code and ending csw return information Sense return information on unit check Reserved for IBM use External name CONSADDR EQU X'009' Iefault console cuu REXREAD REXWRITE CCW I'OA',REXIN ,SILI,L'REXIN CCi X'09',REIOUT+2,SILI,0 Reader operator response iype a console message REIIN DC Console input buffer REIMSG DMTREXID REIOtlT DC CL11'M OP' EQU REIMSGt-2 DC CL 130' , MSG command start iransfer user identification Cutput l:uffer REITAKE DC DC OF'O' CL4' , DC AL1(L'REXREQ),AL3(REIREQ) DC A (REIRESP) Request TAKE table Sending task name filled in by TAKE manager Address and length of request buffer Address of response buffer REIREQ DC XL140'00' iAKE request buffer REIRESP DC AL 1 (0) Never any response messages A (0) 2F'O' CL 130' , Appendix E. RSCS Control Areas 287 The SML Monitor Control Area is used to define various constants, save areas, BSC centrel sequences, channel command words, and bit settings used during SMt processing. Field !!l!~ !!~lg ~~2cr!E!io1!, £g1!!~1!!2' ~~~1!!1!g Active communications buffer Last FCS transmitted tc HASP Standard FCS FCS compare area temporary storage Maximum repeated hlocks First byte of halfword Elock check count out Spacer Elock count character expected CBUFLAST CRESP CREGS CRETREGS $COMEXIT DC DC DC DC DC DC DC DC DC DC DC DC DC DS DS DC A (0) X'SFCF' X' SSC l ' AL2 (0) H'O' H'3' AL 1 (0) lL1 (X'SO') AL 1 (0) AL1 (X'SO') H'O' 10X'00' AL 1 (0) 3F 3F A ($START) CECB CSETBCB DC DC X'OO' X'OO' Last BCE sent for reset CCSW COLDRCB CUNITCMD DS DC DC DC OF XLS'OO' X'OO' X'OO' Force fullword alignment temporary storage for csw Last RCE sent Command code storage CLASTCAW DC F'O' CCW address save BUFSYNSW DC X'OO' Euffer synchronization switch $TPPNONE OFLSW GDQBUFS $COMBUSY CUWFAKE CACKSW l!!ts EQU EQU EQU EQU EQU EQU X'SO'-- AtAECB ADACUU AtCCWA DC DC DC F'O' Synchronous lock X'OOOO',AL1(1),AL1(TYP2700) A (CCTCCW) Adapter CCW addr AtASIOCC EQU * SIO condition code AtACSW ADASENSE AtSAV DC DC DC 2F'0' F"O' SF'O' Adapter ending CSW Adapter sense hyte $SIO register save area XSTXSEQ XETBSEQ XACKSEQ XNAKSEQ XSYNSEQ Cont!21 ~ggyg1!£g§ DC AL1(XLDR,XSTX) DC lL1(XTRL,XETE) DC lL1(XDLE,XACKO) DC AL1 (XSYN,XNIK) DC lL1(XSYN,XSYN,XSYN,XSYN) CEUFFER CFCSOUT CFCSSTD FCSCTEMP CTEMP CMAXDUP CECBCNTO CECBCNTI 28S defined !1! Save of start of last buffer Response character received Register save area Save area COMSUD initial entry peint l!!!I~I!SW X'40' X'20' X'10' X'OS' X'04' Stop all buffering Flush huffer Stop dequeuing buffers Communications inactive tummy read on for unit exception recovery ACK received Start-of-text sequence End-of-text-block sequence positive acknowlegement sequence Negative acknowlegement sequence Synchronization sequence IBM VM/370 Data Areas and Centrol Block Logic Field !!~Ile ~~g~~~J ~2~!g~g !2!Q§ CCiS CCiA CCiB CCiC Normal Data Write with Return Data Read CCW--l,ISYNSEQ:cD+SILI,4----- ---synchronization sequence write buffer CCi 1,O,CC+SILI,O CCW 1,XETBSEQ,CC+SIL1,2 Write ending sequence Read return data CCW 2,0,S1L1,0 CCiD CCW 2,0,S1L1.SK1P,65000 Iisable CCWOFF WRITE READ NOP SENSE SENSE DISABLE EQU EQU EQU EQU EQU EQU x; 0 i~ X'02' X' 03' X' 04' X' 04' X'2F' Adapter Adapter Adapter Adapter Adapter Adapter write command cede read command cede NOP command code sense command code sense command cede disable command cede Appendix B. RSCS Contrcl Areas 289 290 IBM VM/370 Data Areas and Control Block Logic Appendix C. RSCS Request Elements This a~pendix provides information en the format and use of BSCS request elements. These elements are used by RSCS tasks in task-to-task cc.munication. The information provided includes: • The name of the module that builds the element • The functicn performed by the element • A brief description of the element's usage • The format of the element • Any operational notes that might be is used useful in understanding how the element Appendix C. RSCS Request Elements 291 BUILT BY: DftTCftl lUWC!ION: Execate an lIS command DISCBIPTION: This ALERT element is passed via ALERT to the lIS task (DMTAIS) to request second-level processing of ORDER and PURGE commands. o Length (n-1) Function Code: 1'10',1'11' Response Code Modifiers linkid C spcolid count (n-I'E')/2 spoolid 10 spoolid spoolid OPERlTIOIAL tOTES The Iialid field specifies the affected link. The spoolid fields are binary halfwords and specifJ the files enqueued on the specified link which are to te reordered or purged. The sFoolid COWDt field is a binary halfword and specifies the total numter cf spoolid fields preseat. The meanings of the other fields follow. 2J~J f.tHiJi lUDcti0B Co •• : x'10' C••• Ii: 1'00' II ••• mt accepted for processing 1'10' Ile.ent rejected, busy • • lipO • • • lollifier.: 1'10' 1 •• poDse .essages go to local RSCS operator X'OO' lespoDse messages go to specified link. '.Betio. Code: X'11' Response Codes: X'OO' Ileaeftt accepted for processing 1'10' Ilement rejected, busy ftodifiers: I'SO' lesponse messages go to local RSCS operator 1'_0' farge all files enqueued on the specified link 1'00' Parge only specified files, response messages go to sFecified link 2~2 III '1/370 Data lreas and Control Block Logic BUILT BY: DMTCMX FUNCTION: Execute AXS command DESCRIPTION: This ALERT element is passed via ALERT tc the AXS task (DMTAXS) to request second-level processing of CHANGE commands. o ~--------------------------------------------------------, Length (X'33') Function Code: X'20' 10 Modifiers linkid 4 C I Response I Code priority spoolid HOLD COpy CLASS 14 Distribution Code 1C filename/filetype. dsname OPERATIONAL NOTES The linkid field specifies the link on which the object inactive file is enqueued. The spoolid field is a binary halfword and specifies the object file's VM/370 RSCS identifier. The following fields are specified only when the corresponding file attribute is to be changed. If the field is not specified, it is set to all 1 ~its (X'FF~~~')e • • • • • • priority halfword contains binary priority 0-S9 HOLD has the following: X'7F' -- set hold status (HeLD) X'3F' -- reset hold status (NOHOLD) CLASS 1-tyte EBCDIC class, A-Z, 0-9 COpy halfwcrd binary copy count, 1-99 Distributicn code S-byte EBCDIC spool file distribution code Filename/filetype, dsname, 24-byte EBCDIC spocl file filename or filetype or dsname The meanings of the other fields follow. Function Code: X'20' Response Codes: X'OO' Element accepted for processing X'10' Element rejected, busy Modifiers: X'SO' Response messages go to local RSCS operator X'OO' Response messages go to specified link Appendix C. RSCS Request Elements 293 EUILT BY: DMTCMX FUNCTION: Execute a line driver command DESCRIPTION: This ALERT element is passed via ALERT to a line driver task (DMTNFT, DMTSBL) to request second-level processing of START, DRAIN, FBEE, BOLD, and TRACE commands. o Length (X'OB') Function I Code: X'80,X'81',1 Response X'82',X'83',X'84'1 Code Modifiers 4 locid L-____________________________________________________ - - - - J OPERATIONAL NOTES The locid sFecifies the location that is the other fields follow. to receive response messages. Function Code: X'80' Response Codes: X'OO' Element accepted for Frocessing X'10' Element rejected, busy Modifiers: X'80' Start updated classes X'OO' Reset DRAIN status Function Code: X'81' Response Codes: X'OO' Element accepted for processing X'10' Ele.ent rejected, busy Modifiers: Unused 294 IBB VM/310 Data Areas and Control Block Logic The .eanings of Function Code: X'82' Response Codes: 1;00; Element acceptea tor processing X'10' Element rejected, busy ~odifiers: Unused Function Code: X'83' Response Codes: X'OO' Element accepted for processing X'10' Element rejected, busy Modifiers: X'80' HOLD Immediate X'OO' HOLD after file processing Function Code: X'84' Response Codes: X'OO' Element accepted for processing X'10' Element rejected, busy Modifiers: X'CO' TRICE end X'SO' TRICE errors X'OO' TRICE all lppendix C. RSCS Request Elements 295 BUILT BY: DMTCMX FUNCTION: Execute a line driver command DESCRIPTION: This ALERT element is passed via DMTSML) to request second-level commands. o Length (X' OF' ) Function Code: X'90',X'91' ALERT to a line driver task processing of BACKSFAC and Response Code (DMTNPT, FWDSPACE Modifiers 4 locid C Count OPERATIONAL NOTES The locid specifies the location that is to receive response messages. The count field is a binary fullword, and specifies the number of units to be backspaced or forwardspaced. The .eanings of the other fields follow. Function Code: X'90' Response Codes: X'OO' Element accepted for processing X'10' Element rejected, busy Modifiers: X'80' Backspace count X'OO' Backspace file (restart) Function Code: X'91' Response Codes: X'OO' Element accepted for processing X'10' Element rejected, busy Modifiers: Unused 296 IBM VMj370 Data Areas and Control Block Logic BUILT BY: DMTCMX FUNCTION: Execute a line driver command DESCRIPTION: This ALERT element is passed via ALERT to a line driTer task DMTSML) to request second-level processing of FLUSH coa.a~'s_ o Length (X' OD' ) Function Code: X'AO' Respcnse Code (DaI;if, Modifiers 4 C Spoolid OPERATIONAL NOTES The locid specifies the location that is to receive response messages. T~. speolii field is a binary halfvord, and specifies the VM/370 RSCS identifier of the actiYe file to b~ flushed. The meanings of the other fields follow. Function Code: X'AO' Response Codes: X'OO' Element accepted for processing X'10' Element rejected, busy Modifiers: X'80' Flush all cOFies, purge file X'40' Flush hold, keep file, do not decrement copy count X'OO' Flush, decrement copy count, purge file if nc copy count reaaimz Appendix C. RSCS Request Elements 297 BUILT BY: DMTCMX, DMTMGX FUNCTION: Execute a line driver command DESCRIPTION: This ALERT element is passed via ALERT to a line driver task (DMTNPT, DMTSML) to forward messages, and te request second-level processing ef CMD cOllllands. o Length (n-l) Function Code: X'BO',X'B1' Response Cede Modifiers 4 locid C Message/Coamand Text OPERATIONAL NOTES The locid specifies the locaticn that is to meanings of the other fields follow. receive the Function Code: X'BO' Response Codes: X'OO' Element acceFted for processing X'10' Element rejected, busy Modifiers: None Function Code: X'Bl' Response Codes: X'OO' Eleaent accepted for Frocessing X'10' Element rejected, busy Modifiers: One-byte binary RSCS severity code 298 IBM VM/370 Data Areas and Control Block Logic message or command text. The BUILT BY: DftTNPT, DMTSML FUNCTION: Execute an RSCS 0Ferator command tFSCRIPTION: This request element is passed by a line driver via GIVE/TAKE task in response to a command entry at a remote station. o Length (n-1) Function Code: X'OO' to the REX Unused 4 RSCS Operator Command Line Text ,, r OPERATIONAL NOTES No response text is returned. Command responses are distrituted via D~TMGX. Appendix C. RSCS Request Elements 299 BUILT BY: DMTNPT, DMTSML FUNCTION: Initiates or terminates processing of an input or output file. :CESCRIPTION: This request element is passed via GIVE/TAKE to drivers to effect local spool file access during remote station. o Length (X'13') I Function Code: I I X'01', X'02',1 I X'11', X'12' I Unused the AXS task by line communications with a ftodifiers 4 TAG Address 8 I/O Area Address C linkid OPERATIONAL NOTES The use and meaning of the various fields depends on the requested function, as described telow. Certain fields may be updated during request processing. The (updated) file request element is returned to the requestor as a GIVE response.. The meanings of the other fields follow. Function Code: X'01' Mcdifiers: Unused Tag Address: Response field that points to the opened file's active TAG in DMTSYS I/O Area Address: Response field that points to a virtual opened file's first VM/370 spool data buffer. page buffer linkid: Request field that specifies the requesting line driver's linkid. Response Post Codes: X'08' Terminal system error X'04' No file available X'02' Undefined linkid X'01' Previously open file returned 300 IBM VM/370 Data Areas and Control Block Logic containing the Function Code: X'11' Modifiers: X'80' Do not return possible Freviously opened file Tag Address: Request field which points to a constructed by the calling line dri~er~ prototype file TAG for the output file, I/O Area Address: Response field which pGints to a virtual page buffer ccntaining an I/O table, a write CCi, and a buffer for processing the output file. linkid: Request field which specifies the requesting line driver's linkid. Response post Codes: X'04' Error, file not opened A'U~' Undefined linkid X'01' previously open file returned Function Code: X'02' Modifiers: X'80' Do not purge copy or file X'40' Purge all copies, and purge file Tag Address: Request field by open input. which points to the file's active TAG in tMTSYS, as supplied I/O Area Address: Unused linkid~ Unused Response Post Codes: X'04' TAG not found, close failed Function Code: X'12' Modifiers: Unused Tag Address: Request field which points to a prototype file TAG for the output file, constructed by the calling line driver~ This TAG is used to update the parameters to be set for the output file. I/O Area Address: Request field which pOints to the file's I/C area, as supplied by open output,. linkid: Unused Response Post Codes: X'04' I/O area not found, close failed Appendix C. RSCS Request Elements 301 BUILT BY: DMTCMX FUNCTION: Request line port allocation DESCRIPTION: This ALERT element is passed via ALERT to the LAX and reserve line ports for links being activated command. o 4 Length (X'OF') Function I Code: X'Ol'l Response Code task (DMTLAX) to verify in response to a START Onused Unllsed Line Address 8 linkid OPERATIONAL NOTES Certain fields are updated during processing. The meanings of the fields follow. ResFonse Codes! X'08' Specified line address not attached (CC=3) X'04' Specified line address not BSC port device type X'02' Line not available Line Address: Request field specifying requested line address. Zero specification implies request for allocation of a switchable line from the port table. If successful, the port's line address is returned in this field as a resFonse. linkid: Response field specifying the ID of the link that has reserved requested line address (with response code X'02'). 302 IBM VM/370 Data Areas and Control Block Logic the particular BUILT BY: DMTREX, DMTCMX, DMTAXS, DMTNPT, FUNCTION: Issue an RSCS message rESCRIPTION: This request element is passed via GIVE/~AKE to the REX task, to specify the construction and distribution of an RSCS message (ty DMTMGX). o Length (n-1) Function Code: X'02' 4 Receiver DM~SML Routing Code , ___ .: Severity Code ;:I .LV~.LU C Receiver userid 14 18 Issuing Module Code Binary Message Number Action Code Unused 1C 8-byte Variable Sutstitution Values for Message Text OPERATIONAL NOTES The routing code and severity code from the message definition (in DMTMSG) are used when not supplied in the message request element. If the message is not defined in D~TMSG; it is constructed using the specifications in the message request element, and the "variable substitution values" become the message text, unmodified. Routing X'80' X'40' X'20' X'10' codes: Local RSCS console Remote addressee Local user Local VM/370 operator No response text is returned. Appendix C. RSCS Request Elements 303 BUILT BY: Assembly of DMTSYS at RSCS generation FUNCTION: Record allocation status of switch able line ports available te RSCS DESCRIPTION: The first double word of the table is reserved for control information. Each following halfword contains the virtual device address of a line Fort which may be dialed, and which is available to RSCS. o Nu.ber of Line Port Entries in Table 4 8 Virtual Line Address Virtual Line Address C Virtual Line Address Virtual Line Address Virtual Line Address Virtual Line Address 10 OPERATIONAL NOTES The line pert entries are entries to 1's. 304 marked "in use" by setting the IBM VM/370 Data Areas and Control Block Logic high-order feur bits of the BUILT BY: DftTNPT, DMTSML FUNCTION: Terminate line driver task DESCRIPTION: This request element is passed via GIVE/TAKE to the REX task, to terminate line driver operation in response to a tRAIN command. o r I I , Length (1) Function Code: X'03' OPERATIONAL NOTES Tbere are no error conditions for the terminate function, so no response is made. However, line driver tasks must issue a WAIT request following a call to GIVE fer terminate, because REX may not execute the request immediately. Appendix C. RSCS Request Elements 305 306 IBM VM/370 Data Areas and Control Block Logic Appendix D. This Appendix contains Assembler reference data for: language equate eMS Equate Symbols symbols used in eMS to • eMS usage • eMS registers Appendix D. eMS Equate Symbols 307 ~~~ ~~!§~ ~Q~!IES Field Nalle Field Description, Contents, Meaning ].!ts .9~!.!1l~.9 .!.!! !he f!gg!~! CHANO EQU X'SO' CHAN1 EQU X'40' CHAN2 EQU X'20' CHAN3 EQU X'10' CHAN4 EQU X'OS' CHANS EQU X'04' CHANM EQU X'02' EXTM EQU X'01' ~!~!y§ Bit Bit Bit Bit Bit Bit Bit Bit !grd (PSW) 00 - channel a mask 01 - channel 1 mask 02 - channel 2 mask 03 - channel 3 mask 04 - channel 4 mask OS - channel S mask 06 - input/output mask 07 - external mask BCMM MCKM WAIT PROB EQO EQO EQU EQO X'OS' X'04' X'02' X'01' Bit Bit Bit Bit 12 13 14 1S - extended control mode mask machine check mask wait state mask problem state mask FOFM DOFM EOFM SIGM EQU EQO EQU EQU X'OS' X'04' X'02' X' 01' Bit Bit Bit Bit 36 37 3S 39 - fixed-point overflow mask decimal overflow mask exponent under flew mask significance Ilask ].!ts ATTN SM COE BOSY CE DE O_C OE .9~!in~.Q EQO EQU EQO EQU EQU EQU EQJ} EQU 1!! !he EQU EQU EQU EQO EQU EQU EQU EQU PCI ICL PGC PTC CtC CCC ICC CHC ~.Qn2.!! ~l!gj1'!!~.! WRITE READ NOP SENSE WRDATA RtDATA SEEK TIC WRITE1 RDCONS SETSEC SEARCH EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU X'SO' X'40' X'20' X'10' X'OS' X'04' X'02' X'01' ~l!~~.!!~1 X'SO' X'40' X'20' X'10' X'OS' X'04' X'02' X'01' Status Word (CS!) -"BIt-32-=- attention Bit 33 - status lIodifier Bit 34 - control onit end Bit 3S - busy Bit 36 - channel end Bit 37 - device end .BJ1:.3S - unit .ch.eck Bit 39 - unit exception Bit Bit Bit Bit Bit Bit Bit Bit 40 41 42 43 44 4S 46 47 - program-centrolled interropt incorrect length - program check - protection check - channel data check - channel centrol check - interface control check - chaining check - Command x'Oi'-X'02' X'03' X'04' X'OS' X'06' X'07' X'OS' X'09' X'OA' X'23' X'31' Write Read No operation Sense Write data Read data Seek Transfer in channel Write and space 1 Read from console Set sector Search ID equal ~.!ts .9~!.!'!!~.9 CD CC SILl SKIP PCIF IDA 308 in a Channel Command Word (££!) EQU --x'SO'----- ----BIt 32-= chain data EQU Bit 33 - comlland chain X'40' EQU Bit 34 - suppress incorrect length X'20' EQU X'10' Bit 3S - suppress data transfer EQU Bit 36 - cause program control interrupt X'OS' EQU X'04' Bit 37 - indirect data address IBM VM/370 Data Areas and Control Block Logic ~~.§ 1!~§ISI~1! E;2J!!TE~ Field Name General RO---- Rl R2 R3 R4 R5 R6 R7 RS R9 Rl0 Ri 1 R12 R13 R14 R15 Field Description, Contents, Meaning EYf£~§~ !~g!§!~!§ EQU EQO EQO EQO EQO EQO EQO EQO EQO EQO EQO EQO EQU EQO EQO EQO 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 !.!oat.!.n.9-~.!.n! !~g.!§!~!§ FO F2 F4 F6 EQU EQO EQO EQO o 2 4 6 Extended control CO----EQU---O Cl C2 C3 C4 C5 C6 C7 CS C9 C10 Cll e12 C13 C14 C15 EQO EQO EQU EQO EQO EQO EQU EQO EQO EQO EQO EQO EQO EQO EQO reg!§!~!§ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 Appendix D. CMS Equate Symbols 309 310 IBM VM/370 Data Areas and Centrol Block Logic Appendix E. Data Areas and Control Block References This appendix -- a listing of CF, CMS, following: and R5CS control blocks -- contains the • Module references to data areas and control blocks. • Information on released. how certain data areas or control blocks are created and Appendix E. Data Areas and Control Block References 311 CCHREC ACCTBLOK ~yi!1 ~Y: ~gilt DftKHVD !~!~gsed ~Y: Rel~g2~g DMKHVD, DMKUSO R~!~E~~£~g ~y: DftKACO, DMKCKP, DMKSPL DKKHVD, Qy: DMKCCH, DftKIOE, DftKIOF B~f~~~g Qy: DMKCCH, DMKEIG, DftKSEV, DftKSII CCPARft ACNTBLOK ~gilt ~y: DMKACO, DMKHVD, DMKWRft ~ui!1 ~: R~!~gsed ~Y: DftKNLD, DftKSNC ]~!~2~g ~~: DftKACO QY: DftKACO, DMKCKP, DftKJRL, DftKRSE, DMKWRM ~ef~E~~g DftKNLD, DftKSNC DKKHVD, CHIBLOK ALOCBLOK ~Yi!1 QY: DftKCCH hY: DftKCPI, DMKVDC ~uilt ~Y: QY: DftKCPI, DMKVDC R~!~~g Ref~~~g QY: DMKCPI, DftKftON, Bel~~g DKKPGT, DMKTDK, DftKVDC DftKDIA Qj: DftKVCl Bef~£ed Qy: DftKVC1, DftKVSI DftKDIA, CHYBLOK BSCBLOK ~ui!1 ~: ~uilt DftKRGB R~!~gsed ~y: Qy: DftKDIl Bel~2gg DMKRGA R~!~E~~g ~y: DMKBSC, DftKRGA, DKKRGB Qy: DMKVCA ]~fgEgn£ed QY: DftKDIA, DftKVCA CKPBLOK BUFFER ~Yi!1 ~y: DMKCFM, DMKCPI, DKKERM, DftKGRF, DMKLNK, DMKLOG, DMKRGA, DMKRSP lluilt ~y: DftKRNH Rel~gg ~y: R~!~g2~g ~y: DMKCFM, DftKLNK, DMKRGA, DMKRSP Re!~Een£~g DMKCFM, DMKCSB, DMKCSU, DMKGRT, DMKRND, DftKWRM DftKCFP, DftKCQG, QY: DMKCFO, DMKCSO, DMKCSV, DMKLNK, DMKRSP, DMKCPI, DMKALG, DMKCDM, DMKCFS, DMKCPI, DMKCSP, DMKCSQ, DMKEMA, DMKERM, DMKMSG, DMKNMT, DMKSCN, DMKUDU, DMKGRF, R~fer~~£ed DKKCFG, DMKCPS, DMKCST, DMKGRF, DMKRGA, DMKVDC, DftKRNH £y: DftKRNH, DftKWRft CONTASK DftKGRF, QI: DftKCNS, DftKRGA, DMKRGB, DftKRNH ~ui!1 R~1~g2~g DftKQCN, QY: N/A R~fgE~n£ed ~I: DMKCNS, DftKGRF. DMKMON, DftKNES, DMKQCN, DMKRGA, DftKRGB, DftKRNH 312 IBM VM/370 Data Areas and Control Block Logic CORTABLE DKPKYREC Assembled in DMKSYS. ~uilt £y: DKKDKP ~£!~aseQ _________ Referenced _.L. b~?: DMKCCW, DMKCDS, DMKCPV, DMKDGD, DMKMCH, DMKKNI, DKKPTR, DMKRPA, DKKVMA DMKACO, DKKCFO, DKKDKP, DKKPAG, DKKUDR, DMKATS, DKKCPI, DMKFRE, DKKPGS, DKKUDU, 121: DMKDKP DMKBLD, DMKCPU, DMKMCC, DKKPSA, DMKUNT, DHPTBREC ~uilt 12y: DMKDMP !!el£~§~Q £y: DMKDMP CPEXBLOK £Y!1i ~£f~£~~££Q 121.: DKKACO, DMKDIA, DMKIOS, DMKPGT, DMKRNH, DMKUSO, DMKVKC DMKCDS, DKKGRF, DKKLOC, DKKPTR, DMKRPA, DMKVCA, £y: !!el~~sed DKKCFK, DMKIOE, DKKKCC, DKKQCN, DKKRSP, DMKVDC, DMKCPS, DMKCPS, DMKIOF, DMKMCH, DMKRGA, DMKSPL, DMKVDE, DMKDSP, DMKCPV, DMKIOG, DMKKON, DKKRGB, DMKSVC, DMKVMA, DMKIOF, DKKMON, DMKPTR !!~f~£~£~ DMKCDS, DKKCPB, DKKDIA, DMKGIO, DMKLNK, DMKMCT, DMKPAG; DMKPSA, DMKRNH, DKKSTK, DMKUNT, DKKVDC, gy: DMKCFK, DMKCPS, DMKDSB, DMKGRF, DMKLOC, DMKMIA, DKKPGS; DKKPTR, DKKRPA, DMKSVC, DKKUSO, DMKVD3, DMKACO, DMKALG, DKKCFO, DMKCFP, DMKCPU, DMKCPV, DMKDSP, DMKEXT, DMKIOE, DKKIOF, DMKMCC, DMKMCD, DKKKID, DKKKNI, DMKPGT ff DKKPRG ff DMKQCN, DKKRGA, DMKRSP, DMKSPL, DMKTAP, DKKTMR, DMKVAT, DKKVCA, DMKVKA, DKKVMC, DMKCCW, DKKCNS, DMKDGD, DKKFRE, DMKIOS, DMKMCH, DMKMON, DMKPRV, DMKRGB, DMKSSS, DKKTRD, DKKVDA, DKKVSI, £y: DMKDMP ECBLOK ~ui!~ £y: DMKBLD 12y: DMKELD, DMKCDB, DMKCFG, DftKCFH, DMKCFP, DftKEXT, DMKPRG, DMKPRV, DMKTKR, DMKTRC, DftKTRD, DI1KVKC ~£f~£~£~Q DMKCDS, DMKDSP, DftKSVC, DftKVAT, DMKCDft, DMKCFS, DMKSCH, DMKUSO, ERRBLOK ~.l!il~ £y: DMKIOE !!£l£~§£~ gy: DKKIOF £y: DKKIOE, DMKIOF !!£f£££~££~ DMKVSP IOBLOK DDRREC ~.l!!1~ £y: DKKVER R£l£~seg gy: DKKVER !!ef~£en£~Q !!y!lt DMKCNS, DMKCSP, DMKGRF, DMKRGB, DMKVDD, DMPINREC gy: DKKDMP R~l~~sed DMKCFP, DMKCSO, DMKGIO, DMKRGA, DftKVDC, DMKCFP, DftKCNS, DKKCSO, DMKDAS, D8KGRF, DKKHVC, DMKPAG, DKKRGA, DKKSEF, DMKTDK, DMKVDE, DftKVIO DKKCPB, DKKDGD, DKKIOS, DKKRGB, DftKV CA, DKKACO, DftKBSC, DMKCNS, DMKCPB, DMKCSC, DMKCSP, DMKDGD, DMKDIA, DKKGIO, DMKGRF, DMKIOS, DMKISM, DMKftON, DMKftSW, DMKPGT, DKKRGA, DftKCCH, DMKCPI, DMKCSU, DMKDIB, DMKHVC, DMKLOG, DMKNLD, DMKRGB, £y: DKKVER R£l£~§~Q ~.l!!lt DMKCCW, DMKACO, DMKCPB, DMKCPI, DMKCPS, DMKCSU, DMKDGD, DMKDIA, DMKHVC, DKKIOS, DMKNLD, DftKSPL, DKKTDK, DKKVCA, DKKVDE, DKKVDR, DKKVIO £y: £y: DKKDKP DKKCPI, DMKDIA, DMKMON, DKKRNH, DKKVDC, £y: DMKCPS, DKKGIO, DMKNLD, DKKRSP, DMKVDD, ~£fer£~£ed DMKCCW, DMKCPS, DKKCSV, DMKDSB, DMKIOE, DMKMCC, DHKNLE, £y: DMKCFP, DKKCSB, DKKDAS, DMKDSP, DMKIOG, DMKftNI, DMKPAG, Appendix E. Data Areas and Control Block References 313 DMKRNH, DMKSSS, DMKTRC, DMKUSO, DMKVDR, DMKRSE, DMKSTK, DMKTRD, DMKVCA, DHKVIO, DMKRSP, DMKTAP, DMKTRK, DMKVDC, DMKVSI DMKSEP, DMKTCS, DMKUDR, DMKVDD, DMKSPL, DMKTDK, DMKUNT, DMKVDE, MCRECORD j1uilt QY: DMKMCH gel~~~~ !U: N/A gef~£~B£ed ~Y: DMKMCH IOERBLOK ~ui!~ ~Y: DMKBSC, DMKCCH, DMKDAS, DMKDIA, DMKDIB, DMKIOE, DMKIOS, DMKRSE, DMKTAP, DMKVCA ~~!~~2£g DMKCFP, DMKDIA, DMKIOS, DMKRNH, ~Y: DMKCNS, DMKDIB, DMKMON, DMKRSE, DMKBSC, DMKCCH, DMKCCW, DMKCPS, DMKDAS, DMKDGD, DMKGIO, DMKGRF, DMKIOE, DMKNLD, DMKRGA, DMKRGB, DMKRSR, DMKTAP, DMKVIO R~!~£§!f~g ~y: DMKCFP, DMKDIA, DMKGRF, DMKNLD, DMKRSE, DMKTRK, DMKVIO, DMKCNS, DMKDIB, DMKIOE, DMKNLE, DMKRSP, DMKUNT, DMKVSI DMKBSC, DMKCCH, DMKCPS, DMKDAS, DMKDSB, DMKEIG, DMKIOF, DMKIOS, DMKRGA, DMKRGB, DMKSEV, DlUSIX, DMKVCA, DMKVDC, DMKCCW, DMKDGD, DMKGIO, DMKMSW, DMKRNH, DMKTAP, DMKVDE, IRMBLOK Buil! MDRREC j1uilt !U: DMKVER Bel~~~ !U: DMKVER Ref~£~~£~~ QY: DMKIOF, DMKVER MICBLOK j1uilt QY: DftKCFS, DMKLOG Rel~as~~ !U: DMKCFS, DMKLOG, DMKUSO DMKELD, DMKCFS, DMKDSP, Refer~~£ed Qy: DMKLOG, DMKliCH, DMKPTB, DMKBPA, DMKTBA MIBREC !U: DMKCFO, DftKCFS Rel~as~g ~y: ~uili DftKCFS, DMKIOE gy: Beleased D~KVER ~: R~f~ren2ed JPSCBLOK DMKVER QY: DMKVER !!NDEVLST Assembled as part of DMKSYS ~~!~~~g DMKLOG QY: DMKALG, DMKJRL, ~ui!i DMKLNK, QI: DMKENT Rg!~~§g~ Qy: DMKENT Rgf~y£~g QY: DMKENT LOCKBLOK MNHDR j1y!!i QY: DMKLOC ~~!~~§~g ~uil! ~Y: QY: DMKLOC Rgl~~§~g DMKMON QY: DMKMON Ref~£~~f~g QY: DMKMON MCHAREA MNOOO j1y!!~ ~y: R~!~~§~g DMKIOG R~!~£en£~g QY: DMKCCH, DMKCFO, DMKIOG, DMKMCH, DMKMCT 314 ~Y!l! QY: NIA QI: DMKMON R~!g~§gQ DMKCPU, QY: DMKMON R!fg£~~£~~ IBM VM/370 Data Areas and Control Block Logic QI: "DMKMON MN500 MN001 12~il1 £y: DMKMON Rglg~§gg £y: DMKMON 12~ilt £y: DMKMON ~gl£~§~g £1: DMKMON MN600 MN097 12uil! B1: DMKMON, DMKMNI E!!ili £1: DMKMNI Rgl~~seg Relg~§~g BY: DMKMON R~!g£g~f~g £1: DMKMON HI: DMKMNI MN602 12!!ilt £y: DMKENT MN098 ~!!ili HY: DMKMNI !~l~~§~g Rg!g~§gg £y: DMKENT £y: DMKMON R~!g£g~f~g HY: DMKMNI MN700 12~i!1 MN099 B1: DMKMON Rg!g~§gg gy: DMKMON 12!!il1 QY: DMKMON MN802 12!!ilt £y: DMKMON MN10X Rg!g~gg ~!!ili Rgl£~§gg QY: DMKMON !~!~££~f~g £y: DMKMON MONCOM 12~1!! MN20X BY: DMKMCC ~g!~§g~ ~~ili 21: DMKMON QY: DMKMON £y: DMKMON £1: DMKMON 2Y: DMKCPS, DMKDMP, DMKENT, DMKMCC, DMKMCD, DMKMIA, DMKMNI, DMKMON ~£!g~g~ced Relg~~Q HY: DMKMON MSSCOM 12uilt £y: DMKSSS MN400 ~!!ili £y: DMKMON R£l£~§£g £y: DMKMON Rgfg£en£gg £y: DMKMON ]elg~ed BY: DMKLNK, DMKLOG, DMKSSS, DMKVDA BY: DMKCPB, DMKDGD, DMKDSB, DMKLNK, DMKLOG, DMKMSS, DMKSSS, DMKVDA, DMKVSI ~~!~~en~g Appendix E. Data Areas and Control Block References 315 PAGTABLE NCPTBL ~Y1!i ~ui1i ~y: £y: DMKSNT ~~1~~2~£ ~~!~£~~£~£ ~Y: £1: DMKBLD, DMKPGS ]~!~~~g £y: N/A DMKBLD QY: DMKATS, DMKBLD, DMKCFG, DMKCPU, DMKPGS, DMKPTR, DMKVAT, DMKVMA ]ef~~~~£~£ DMKNLD, DMKSNC NICBLOK PGBLOK ~y11~ QY: DMKNLD ~el~~2~£ ~y: ~uilt ~y: DMKVAT DMKNLD ]g1~~2ed ~I: DMKCFP, DHKDSP Ref~£~~g ~Y: DMKACO, DMKBLD, DMKCFT, DMKCKP, DMKCPI, DMKCQR, DMKDIA, DMKHVD, DMKLOG, DMKNES, DMKNET, DMKNLD, DMKPSA, DMKQCN, DMKRGA, DMKRGB, DMKRNH, DMKWRM Refg£g~£gg Qj: DMKCFP, DMKDSP, DMKVAT PSA Assembled as part of nucleus. NPRTBL Q~!~!! Bui1i Qy: ]ef~~ced ~y: R~b~~sed ~Y: NfA Ref~£~g ~I: DMKTCS, DMKWRM DMKCKS, DMKCSO, DMKHVD, OBRRECN (Long OBR) ~uibi Qy: DMKIOF R~b~~~ QI: DMKIOF Rel~£~g~ QY: DMKIOC, DMKIOF, DMKVER OBRREC (Short OBR) ~yibi ~y: DMKIOF Rg1g~~~ ~I: DMKIOF OWNDLIST DMKATS, DMKCDB, DMKCFG, DMKCFS, DMKCNS, DMKCPV, DMKCQY, DftKCST, DftKDEF, DftKDRD, DftKERM, DMKGRF, DMKIOE, DMKJRL, DMKLOK, DMKMI A, DMKMSW, DtlKOPR, DMKPRV, DMKRGB, DMKSAV, DMKSIX, DMKSTK, DftKTHI, DMKTRK, DMKUSO, DMKVDA, DMKVDS, DMKVMI, DMKBLD, DftKCDft, DMKCFH, DMKCFT, DftKCPB, D!!1{CQG, DftKCSB, DMKCSU, DMKDGD, DMKDSB, DMKEXT, DMKGRT, DMKIOF, DMKLNK, DMKftCC, DftKMI D, DMKNES, DtlKPAG, DMKPSA, DMKRNH, DMKSCH, DMKSNC, DMKSVC, DMKTMR, DMKTRM, DftKVAT, DMKVDC, DMKVER, DMKVSI, DMKACO, DftKALG, DftKAPI, DftKESC, DftKCCH, DMKCCW, DftKCDS, DMKCFC, DMKCFD, DMKCFM, DMKCFO, DftKCFP, DMKCKP, DMKCKS, DMKCLK, DMKCPI, DMKCPS, DftKCPU, D!!KCQH, - -DMKCQP, - DMKCQR, DMKCSC, DftKCSP, DftKCSQ, DMKCSV, DMKCVT, DftKDAS, DftKDIA, DMKDIB, DMKDMP, DMKDSP, DMKEIG, DMKENT, DMKFMT, DMKFRE, DMKGIO, DMKHVC, DMKHVD, DMKIOC, DMKIOG, DMKIOS, DMKISM, DMKLOC, DMKLOG, DMKLOH, DMKMCD, DMKftCH, DMKMCT, DMKMNI, DMKMON, DMKMSG, DMKNET, DMKNLD, DMKNLE, DMKPGS, DMKPGT, DMKPRG, DMKPTR, DMKQCN, DMKRGA, DftKRPA, DMKRSE, DMKRSP, DMKSCN, DMKSEP, DMKSEV, DMKSPL, DMKSSP, DMKSSS, DMKTAP, DMKTCS, DMKTDK, DMKTR1, DMKTRC, DMKTRD, DMKUDR, DMKUDU, DMKUNT, DMKVCA, DftKVCH, DMKVCN, DMKVDD, DMKVDE, DMKVDR, DMKVIO, DMKVMA, DMKVMC, DMKVSP, DMKVSQ, DMKWRM Assembled into DMKSYS QY: DMKATS, DMKCKP, DMKCKS, DMKCPI, DMKCPU, DMKDRD, DMKPAG, DMKPGS, DMKPGT, DMKPTR, DMKSPL, DMKUDR, DMKVDA, DMKVDC, DMKWRM ~g!~£en£gg PWDIBLOK ~uilt ~y: DMKJRL Rel~~~g ~y: 316 IBM VM/370 Data Areas and Control Block Logic DMKSYS; part of CP DMKJRL RECBLOK RCHBLOK Assembled into CP nucleus module DMKRIO ~Yili £1: DMKCKS, DMKCPI, DMKRSP, DMKVSP, DMKWRM ftgl§!~~g g~!~Eens:~g DMKCPB, DMKDIA, DMKMNI, DMKSSP, 11y: DMKCPI, DMKDSB, DMKMON, DMKSSS, DMKCCH, DMKCFO, DMKCPS, DMKCPV, DMKENT, DMKIOG, DMKNES, DMKPRV, DMKVCH, DMKVMT DMKCKP, DMKCQP, DMKIOS, DMKSCN, DMKPGT, 12Y: DMKPGT, DMKSPL, DMKUSO RgfeE§!1!ced IIY: DMKCKP, DMKCKS, DMKCPI, DMKDMP, DMKPGT, DMKRSP, DMKSPL, DMKVSP, DMKWRM RECPAG RCUBLOK ~Y!l! ~y: DMKIOF, DMKIOG Assembled into CP nucleus module DMKRIO. ftelg~§.~~ gy: DMKIOF, DMKIOG Rg!gE~1!£§!g R~!~E~1!£~g DMKCKP, DMKCQP, DMKIOC, DMKNLD, DMKVCH 121: DMKCPB, DMKDIA, DMKIOS, DMKPRV, DMKCCH, DMKCCW, DMKCPI, DMKCPS, DMKDSB, DMKENT, DMKMNI, DMKMON, DMKSCN, DMKSSP, DMKCFO, DMKCPV, DMKGRF, DMKNES, DMKSSS, RSPLCTL ~Yil! QY: DMKRSP Rg!§!EgQ£ed gy: DMKCKP, DMKCQP, DMKRSP, DMKSPL, DMKTCS RCWTASK ~Y!li QY: DMKIOF, DMKIOG DMKCSO, 121: DMKCCW R~l~~~g 121: DMKCCW, DMKUNT R~!~E~s:~g SAVEAREA 12Y: DMKCCW, DMKCFP, DMKCPB, DMKHVC, DMKIOS, DMKISM, DMKTRD, DMKTRK, DMKUNT, DMKVDR liui li £1: DMKCPI, DMKSVC !!eleas~g, Built III: Assembled module DMKRIO III: ft§!!§!£~£§!g, DMKBSC, DMKCFH, DMKCKP, DMKCPS, DMKCQR, DMKDEF, DMKDSB, DMKHVD, DMKIOS, DMKMNI, DMKNLD, DMKPGT, DMKRGA, DMKSCN, DMKSSS, DMKTRM, DMKVDA, DMKVDS, 121: DMKACO, DMKALG, DMKATS, DMKBLD, DMKBSC, DMKCCH, DMKCDB, DMKCDM, DMKCDS·, DMKCFC, DEKCFO, DMKCFG, DMKCFH, DtiKCFE, DMKCFS, DMKCFT, DMKCKS, DMKCLK, DMKCPB, DMKCPS, DMKCPU, DMKCPV, DMKCQH, DMKCQP, DMKCQR, DMKCQY, DMKCSO, DMKCSP, DMKCSQ, DMKCST, DMKCSV, DMKDAS, DMKDDR, DMKDEF, DMKDIA, DMKDIB, DMKDIR, DMKDRD, DMKEIG, DMKENT, DMKERM, DMKFMT, DMKGRF, DMKGRT, DMKHVD, DMKIOC, DMKIOF, DMKIOG, DMKIOS, DMKISM, DMKLNK, DMKLOG, DMKLOH, DMKMCC, DMKMCH, DMKMIA, DMKMID, DMKMNI, DMKMSG, DMKMSW, DMKNEM, DMKNES, DMKNLD, DMKNLE, DMKPGS, DMKPTR, DMKRGA, DMKRGB, DMKRNH, DMKRPA, DMKRSP, DMKSET, DMKSEV, DMKSIX, DMKSPL, DMKSSP, DMKSSS, DMKSVC, DMKTCS, DMKTDK, DMKTHI, DMKTRA, DMKTRD, DMKTRK, DMKTRM, DMKUDR, DMKUNT, DMKUSO, DMKVAT, DMKVCA, DMKVDA, DMKVDC, DMKVDD, DMKVDE, DMKVDS, DMKVER, DMKVMA, DMKVMC, DMKWRM .Bg!~I~.!!s:~g RDEVBLOK ft§!l§!~§.ed 121: DMKSVC into CP nucleus N/A III: DMKCCH, DMKCFM, DMKCKS, DMKCPU, DMKCQY, DMKDGD, DMKDSP, DMKIOC, DMKLNK, DMKMON, DMKNLE, DMKPRV, DMKRGB, DMKSEP, DMKTAP, DMKUNT, DMKVDC, DMKVER, DMKACO, DMKATS, DMKCCW, DMKCFC, DMKCFO, DMKCFP, DMKCNS, DMKCPB, DMKCPV, DMKCQG, DMKCSB, DMKCSO, DMKDIA, DMKDMP, DMKENT, DMKGRF, DMKIOE, DMKIOF, DMKLOG, DMKLOH, DMKMSW, DMKNES, DMKOPR, DMKPAG, DMKPSA, DMKPTR, DMKRNH, DMKRSE, DMKSNC, DMKSPL, DMKTCS, DMKTDK, DMKUSO, DMKVCH, DMKVDD, DMKVDE, DMKVSI, DMKWRM DMKBLD, DMKCFG, DMKCFT, DMKCPI, DMKCQP, DMKDAS, DMKDRD, DMKGRT, DMKIOG, DMKMCC, DMKNET, DMKPGS, DMKQCN, DMKRSP, DMKSSP, DMKTRK, DMKVCN, DMKVDR, DMKAPI, DMKCCW, DMKCFD, ""UT:1""''t:\T"Io lJ01\I....£'r, DMKCNS, DMKCQG, DMKCSB, DMKCSU, DMKDGD, DMKDSB, DMKGIO, DMKIOE, DMKJRL, DMKMCD, DMKMON, DMKNET, DMKQCN, DMKRSE, DMKSNC, DMKTAP, DMKTRC, DMKUDU, DMKVCH, DMKVDR, DMKVSP, Appendix E. Data Areas and Control Block References 317 SAVTABLE SPLINK Assembled into CP pageable module DMKSNT ~!!!.li ~y: B~!~g2~g N/A Ql: N/A Ref~E~n~g ~y: DMKCKS, DMKCQH, DHKCSU, DMKDRD, DMKMIA, DMKRSP, DMKSPL, DMKTCS, DMKVSP, DMKVSQ SDRBLOK ~~!!i QY: QY: Re!~g~g SWPTABLE DMKIOF R~!~E~~g ~~!lt ~: DMKIOE QY: E~!~g2~g DMKIOE, DMKIOF DMKBLD, DMKVMA QY: DMKBLD QY: DMKATS, DMKBLD, DMKCFG, DMKCPU, DMKPGS, DMKPTR, DMKVAT# DMKVMA R~fg~~£gQ SEGTABLE ~~!!i QY: DMKBLD SYSLOCS QY: R~!~g2ed DMKBLD Assembled into CP nucleus module DMKSYS. R~!~Een£~g QY: DMKATS, DMKBLD, DMKPGS, DMKVMA Referenced QY: DMKACO, DMKBLD, DMKCFO, DMKCFT, DMKCKP, DMKLOC, DMKLOG, DMKLOH, DMKUDR, DMKUDU, DMKUSO SFBLOK ~!!!!!. QY: DMKCKS, DMKNLD, DI1KSPL,DKKWRM QY: R~!~g2~g DMKCKS, DMKRSP, DMKSPL, SYSTBL Assembled into DMKSNT. DMKUSO DMKATS, DMKCFG, !!~f~Een£~g DMKCQG, DMKCST, DMKMIA, DMKSEP, DMKVSQ, QY: DMKCQR, DMKCSU, DMKMNI, DMKSPL, DMKWRM DMKCKP, DMKCKS, DMKCSO, DMKCSP, DMKDMP, DMKCSV, DMKNLE, DMKRSE, DMKTCS, DMKUSO, DMKCPI, DMKCSQ, DMKDRD, DMKRSP, DMKVSP, DMKCFH, TNSREC ~!!!.li QY: E~!g~2gQ DMKIOF Ql: DMKIOF SHQBLOK Bui!i QY: R~!~g2~g DMKCSP, DMKWRM QY: DMKCSP TREXT Re!~E~£~g QY: DMKCKS, DMKCQR, DMKCSQ, ~~!.!!. DMKSPL, DMKiRM QY: E~!g~§gQ QY: g~!~g2~g DMKCFG QY: DMKPGS, DMKVMA QY: DMKATS, DMKCFG, DMKCPU, DMKPGS, DMKPTR, DMKVMA !!~f~E~n£~g 318 Ql: DMKTRA, DMKTRC, DMKUSO R~f~ren£ed £y: DMKCFM, DMKDSP, DMKPGS, DMKPRG, DMKPRV, DMKSVC, DMKTMR, DMKTRA, DMKTRC, DMKTRD, DMKVIO SHRTABLE ~~!li DMKTRA ~MKCFH, IBM VM/310 Data Areas and Control Block Logic VCHBLOK TRQBLOK ~y: DMKBLD, DMKCFC, DMKCFS, DMKCPI, DMKGRF, DMKLOG, DMKMCC 1 DMKQCN, DMKRGA Ey!11 £1: DMKCFM, DMKCFS, DMKDIA, DMKMCC, DMKLOG, DMKMON, DMKQCN, DMKRGA, DMKUSO E~f~£~nf~Q ~Qil1 g§l§g~ed R~i~£~~~ ~y: DMKCFM, DMKDIA, DMKMCC, DMKQCN, DMKTMR, DMKCFP, DMKDSP, DMKMID, DMKRGA, DMKUSO DMKBLD, DMKCDS, DMKCFS, DMKCPI, DMKENT, DMKGRF, DMKMNI, DMKMON, DMKRGB, DMKSCH, DMKCFC, DMKCPU, DMKLOG, DMKPSA, DMKSSS, ~Y: QY: DMKUSO gel~£~~g DMKCPB, DMKDEF, DMKLOG, DMKUSO, DMKVDD, DMKVDS £y: DMKCPV, DMKDI A, DMKPRV, DMKVCH, DMKVDS, DMKCFM; DMKCFP; DMKCKP; DMKCQG, DMKCSP, DMKCSU, DMKDSP, DMKCSV, DMKLNK, DMKSCN, DMKSPL, DMKSSS, DMKVCN, DMKVDA, DMKVDC, DMKVIC, DMKVSI, DMKVSP VCONCTL ~Yil1 QY: DMKVDS UDBFBLOK ~Y!!1 g~!~£~~g DMKDEF, DMKHVD, DMKSPL QY: DMKCFS, DMKDEF, DMKHVD, DMKLNK, DMKLOG, DMKSPL, DMKSSS, DMKUDR, DMKUDU UDEVBLOK VCUBLOK ~Y!11 ~y: gef~E~nfed DMKCPB, DMKCSV, DMKNLD, DMKUSO, DMK VDD, QY: DMKCSP, DMKUDR R~!~£seg DMKGRF, QY: DMKDEF, DMKHVD, DMKSPL R~i~£~f~g ~Y!!i £y: DMKALG, DMKCFP, DMKRGA, DMKVCN, DMKVDR ~~f~E~~f~£ gy: QY: DMKCSP, DMKUDR DMKVDS QY: DMKCPV, DMKDEF, DMKPRV, DMKVCH, DMKVDS, DMKCFM, DMKCFP, DMKCKP, DMKCQG, DMKCSP, DMKCSU, DMKDIA, DMKDSP, DMKr.OG, DMKSCN, DMKSPL, DMKSSS, DMKVCN, DMKVDA, DMKVDC, DMKVIO, DMKVSI, DMKVSP QY: DMKDEF, DMKDIR, DMKLNK, DMKLOG, DMKSCN, DMKUDR, DMKVDA, DMKVDS R~i~£enf~g VDEVBLOK UDIRBLOK ~yi!1 ~Yi!1 £y: DMKLOG, DMKVDS £y: DMKCSP B~f~E~.!!f~g QY: DMKCFS, DMKCPI, DMKCSP, DMKDEF, DMKDIR, DMKHVD, DMKLNK, DMKLOG, DMKSPL, DMKUDR, DMKUDU R~i~£~nf~g UMACBLOK Bu!!i QY: DMKDIR DMKCCW, DMKCKP, DMKCQP, DMKCSU, DMKDIA, DMKGRF, DMKLOG, DMKSCN, DMKTRD, DMKVCH, DMKVDR, D~KVSP, QY: DMKCFS, DMKDEF, DMKDIR, DMKHVD, DMKLOG, DMKSPL, DMKUDR, DMKUDU QY: DMKCFG, DMKCPB, DMKCSB, DMKCSV, DMKDIB, DMKHVC, DMKNLD, DMKSPL, DMKTRK, DMKVCN, DMKVDS, DMKVSQ DMKACO, DMKALG, DMKCFH, DMKCFM, DMKCPS, DMKCPV, DMKCSP, DMKCSQ, DMKDAS, D.MKDEF, DMKDRD, DMKDSP, DMKHVD, DMKIOS, DMKPRV, DMKQCN, DMKSSS, DMKTHI, DMKUNT, DMKUSO, DMKVDA, DMKVDC, DMKVZB, DMKVIO, DMKCCH, DMKCFP, DMKCQG, DMKCST, DMKDGD, DMK§IO, DMKLNK, DMKRGA, DMKTRC, D~KV CA, DMKVDD, DMKVS I, g~i~£~~g VFCBBLOK ~Y!!1 ~y: DMKCFG, DMKCSO Appendix E. Data Areas and Control Block References 319 VMCPARM VMABLOK ~Y!!i £1: DMKBLD, DMKCFG ~~il! ~y: R~l~~§gg g~i~E~Q£gg QY: DMKATS, DMKCFG, Virtual machine user gy: Virtual machine user DMKPGS, DMKVMA VRRBLOK VMBLOK ~~ilt 1!Y!!i Qy: DMKVDS DMKBLD ~y: ~gl~~§~g DMKUSO Ref~E~Q£~g DMKATS, DMKCDM, DMKCFH, DMKCFT, DMKCPI, DMKCQH, Dl'.IKCSO, DMKCSV, DMKDIB, DMKEXT, DMKHVC, DMKIOS, DMKLOH, DMKMCT, DMKMSG, DMKNLE, DMKPRG, Dl'.IKRGA, DMKRSP, DMKSPL, DMKTHI, DMKTRK, DMKVAT, DMKVDC, DMKVIO, DMKVSQ, DMKBLD, QY: R~l~~§~g QY: DMKBLD, DMKCDS, DMKCFM, DMKCKP, DMKCPS, DMKCQP, DMKCSP, DMKDAS, DMKDRD, DMKFRE, DMKHVD, DMKISM, DMKLOK, DMKMIA, DMKffS1f, DMKPAG, 'DMKPRV, DMKRGB, DMKSCH, DMKSSS, DMKTMR, DMKUDR, DMKVCA, DMKVDD, DMKVMA, DMKWRM DMKDIA, DMKACO, DMKALG, DMKCCH, DMKCCW, DMKCFC, DMKCFD, DMKCFO, DMKCFP, DMKCKS, DMKCNS, DMKCPU, DMKCPV, Dl'.IKCQR, DMKCQY, DMKCSQ, Dl'.IKCST, Dl'.IKDEF, DMKDGD, DMKDSP, DMKENT, DMKGIO, DMKGRF, DMKIOE, DMKIOF, DMKJRL, DMKLNK, DMKMCC, DMKMCD, DMKMID, DMKMNI, DMKNES, DMKNET, DMKPER, DMKPGS, DMKPSA, Dl'.IKPTR, DMKRNH, DMKRPA, DMKSCN, DMKSEP, DMKSTK, DMKSVC, DMKTRA, DMKTRC, DMKUDU, DMKUNT, DMKVCH, DMKVCN, DMKVDR, DMKVDS, DMKVMC, DMKVSI, DMKLOG, QY: DMKVDR R~!~E~D£~g QY: DMKCCW, DMKCFP, DMKGIO, DMKUNT, DMKVDS, DMKVSI DMKAPI, DMKCDB, DMKCFG, DMKCFS, DMKCPB, DMKCQG, DMKCSB, DMKCSU, DMKDIA, DMKERM, DMKGRT, DMKIOG, DMKLOG, DMKMCH, DMKMON, VSPLCTL ~~ilt ~y: R~l~~~£ DMKDRD, DMKVSP gy: DMKVSP £y: DMKCKP, DMKCSP. DMKDRD, DMKSPL, DMKVSP, DMKVSQ Ref~Qf~g VSPXBLOK DMKPGT, DMKQCN, DMKRSE, DMKSNC, DMKTCS, DMKTRD, DMKUSO, DMKVDA, DMKVER, DMKVSP, 1!ui!! Q1: DMKCST R~1~enfed BY: DMKCKP, DMKCQG, DMKCST, DMKSPL, DMKVDB, DMKVDS BY: Relea§ed DMKTMR £y: DMKVMC Rel~~§~g QY: DMKVMC R~!~E~D£~g DMKCFP. DMKDSP. QY: DMKDSP, DMKVMC XOBR3211 ~~il! ~y: ~y: N/A R~!~~~g ~1: 320 R~lg~§~g N/A DftKDSP, DftKSCH, QY: DMKCFP, DMKCPB, DMKDSP, DMKGRF. DMKRGA. DMKSCH. DMKTMR, DMKVMC R~f~£~D£ed VMCMHDR 1!Y!li DMKCSP, XINTBLOK BY: DMKCFP, DMKCPB, DMKGBF, DMKRGA, DMKSCH, DMKTMR 1!~ili DMKCSQ, DMKNLD, ~Y!l! VMCBLOK DMKDGD, DMKRSE Qj: DMKIOE Rg1~E~n£~g IBM VM/370 Data Areas and Control Block Logic QY: DMKIOF, DMKBSE AETAE BBOI Assembled as part of DKSNUC. ~~!~£~~g Assembled as part of DMSNUC. QY: DKSBAB, DMSDOS, DMSITP £y: No CMS references. This block is used by the DOS supervisor. ~ef~£~gced ABiSECT BGCOM Assembled as part of DKSNUC Assembled as part of ~~!~£~~Q QY: DnSABN, DnSDBG, DMSITI, DMSITP, DKSITS DMSNUC~ DMSFRE, Refe~g£ed DMSBOP, DMSDOS, DMSITP, DMSQRY, DMSSTG, ADTSECT QY: D!!SAMS, DMSASN, DMSDLE, DMSDLK, DHSFCH, DMSFET, DMSOPL, DMSOPT, DMSSET, DMSSMN, DMSICP DMSCLS, DMSDSV, DMSLLU, DMSRRV, DMSVSR, DMSBAB, DMSDMP, DMSINS, DMSPRV, DMSSRV, Assembled as part of DKSNUC. Re!~£~~g DMSACl1, Dl1SARX, DMSBWR, DMSDLK, Dl1SEIC, DMSINS, DMSLDS, DMSMVE, DMSSET, DMSTRK, QI: DMSABN, DMSACC, DKSARE, DMSAMS, DMSASN, DMSAUD., DMSCPY, DMSDIO, DKSEDX, DMSDSL, DMSFNS, DMSFOR, DMSLAF, DMSLBM, DMSLKD, DMSLLU, DMSQRY, DMSRNM, DMSSTT, DMSTPE, DMSICP DMSALU, DMSASM, DMSCMP, DMSDSK, DMSEXT, DMSLAD, DMSLFS, DMSPUN, DMSSOP, DMSUPD, DKSACF, DMSARN, DMSBOP, DMSDLB, DMSERS, DMSIFC, DMSLBT, DMSLST, DMSROS, DMSTQQ, CMSTAIE ~uil! ~y: R~!~as~g DMSSVT QY: DMSSVT R~f~£~g£~g £y: DMSCIT, DMSITE, DMSITI, DMSSVT CVTSECT Assembled as part of DMSNUC. AFTSECT Assembled as part of DMSNUC; also created and released dynalllically by DMSLAF. DBGSECT ~~!~£~f~g ~y: DMSBRD, DMSBiR, DMSCPY, DMSERS, DMSFNS, Dl1SINT, DMSLAF, Dl1SPNT, DMSRNM, DMSSOP, DMSSTT, DMSTPE Assembled as part of DMSNUC. ~~!er~nf~g ~I: DMSDBD, DMSDBG, DMSITE. !NCHSECT DEVSECT ~~ili QY: DMSSTG Assembled as part of DMSNUC. R~!~£~~g ~y: DMSDOS, DMSSTG DEVTAB B!TLSECT Assembled as part of DMSNUC. Assembled as part of DMSBTP. £y: DMSASN, DftSDBD, DMSEDX, DMSINI, DMSLLU, DMSSVT R~!~renfed Ref~£~nfgg QY: DMSCIO, DMSITE, DMSPIO DMSEDI, Appendix E. Data Areas and Control Block References 321 FCBSECT DIOSECT Assembled as part of DKSNUC. !!~i11 ~y: R~!~I~~£~g ~Y: DMSACM, DMSDIO, DMSFLD DMSFNS, ~elgasgg DMSIl'I £1: DMSFLD, DMSABN R~fere~£~£ ~I: DMSCCB DMSASM, DMSMVE, DMSSBS, DMSSVN, !!!!ili QY: NIA R~1~g§£g DMSALO, DMSARN, DMSDSL, DMSFCH, DMSFLD, DMSQRY, DMSROS, DMSSAB, DMSSCT, DMSSEE, DMSSOP, DMSSVT, DMSARX, DMSLDS, DMSSBD, DMSSQS, QY: NIA FCHTAB Assembled as part of DMSNUC. DOSSECT ~uili £y: DMSDLB R~l~~Q QY: DMSDLB, DMSABN FICL Re!~Ien£~g £y: DMSAMS, DMSBOP, DKSCLS, DMSDLB, DMSDLK, DMSDSV, DMSOPL, DMSQRY, DMSRRV, DMSSRV, DMSSVT, DMSVIP, DMSXCP Assembled as part of DMSNUC. Ref~gn£~g ~I: No CMS references. This block is used by the DOS supervisor. EDCB !!~ili QY: DMSEDX Rel~gsed FRDSECT QY: DMSEDI Re!~I~~g QY: DMSEDC, DMSEDI, Asse.bled as part of DMSNUC. DMSEDX, R~f~en~~ QI: DMSFRE, DMSSET DMSGIO" DMSSCR FSCBD ERDSECT !!~il1 .Qy: N/A Assembled as part of DMSNUC. Rgf~ren£ed ~y: D"SERD, DMSDLK, DMSIFC, DMSZAP, and user programs that access the CMS file syste. EXTSECT Assembled as part of DMSNUC. £y: DMSINS, DMSINT, DMSIOW, DMSITE, DMSQRY, DMSSET, DMSSTG, DMSSVN, DMSSVT R~!~I~~£§g FSTD !!Yil! .QI: N/A R~lgg2gg £y: NIA £y: DMSCPY, DMSEDX, DMSEXC, DMSFNS, DMSGND, DMSNCP, DMSSOP, DMSTPE R~f~I~n£~~ EXTUAREA Assembled as part of DMSNUC. No CMS references. 322 IBM VM/370 Data Areas and Control Block Logic FSTSECT LUBPR ~Yilt ~y: DMSACF !i.§1.§~§.§,Q ~y: 1!.§i.§E.§1l£.§,Q DMSARX, DMSCPY, DMSFNS, DMSLKD, DMSUPD, Assembled as part of DMSNUC DMSALU ~y: DMSASM, DMSDLK, DMSGND, DMSMVE, DMSXCP, DMSACF~ DMSBOP, DMSDSK, DMSIFC, DMSRNM, DMSZAP 's.§i,§,E.§l!£.§,Q DMSAMS, DMSBRD, DMSDSL, DMSLAF, DMSSTT, DMSARN, DM SBWR, DMSERS, DMSLBM, DMSTPE, ~Y: DMSDLK, DMSDSV LUBTAB Assembled as part of DMSNUC. R.§f.§E.§l!£,§Q ~y: DMSAMS, DMSBOP. DMSCLS, DMSDLB, DMSFCH, DMS LLU, DMSOPL, DMSPRV, DMSRRV, DMSSET, DMSSRV, DMSXCP FVSECT Assembled as part of DMSNUC ~ li.§i.§E.§l!£,§Q DMSACM, DMSBTP, DMSCWT, DMSFNS, DMSITS, DMSQRY, DMSTPE, ~y: DMSALU, DMSBWR, DMSDIO, DMSINT, DMSLAD, DMSRNM, DMSTQQ NICL DMSABN, DMSACC, DMSAUD, DMSBRD, DMSCIT, DMSCRD, DMSDOS, DMSDSK, DMSITE, DMSITI, DMSLFS, DMSMOD, DMSSLN, DMSSOP, DM SACF, DMSBTB, DMSCWR, DMSERS, DMSITP, DMSPNT, DMSSTT, Assembled as part of DMSNUC. li~f'§E'§!!£'§Q QY: DMSBOP, DMSCLS, DMSDLB, DMSLLU, DMSXCP NUCON Assembled as part of DMSNUC. IHADECB ~Yili R~f'§E'§1!£~Q hy: N/A li~!'§2.§.§f! hy: N/A li.§i.§E,§!!£,§Q hY: DMSSBD, DMSSBS, DMSSCT, DMSSEB, DMSSVT IOSECT Assembled as part of DMSNUC. E..§i.§E,§!!£,§Q hy: DMSITI, DMSABN, DMSHDI, DMSINT, DMSITI KEYSECT ~Y1lt hY: DMSSVT R.§!.§~§.§f! DMSACM, DMSARX, DMSBOP, DMSCAT, DMSCPF, DMSDBD, DMSDMP, DMSEDI, DMSEXT, DMSFOR, DMSHDI, DMSINM, hI: DMSSVT R.§i.§E.§!!£.§f! hI: DMSSBD, DMSSVT DMSLBM, DMSLGT, DMSLOA, DMSMOD, DMSOPT, DMSPNT, DMSRDC, DMSSAB, DMSSET, DMSSRT, DMSSVN, DMSTPE, DMSVIP, £y: DMSALU, DMSASM, DMSBRD, DMSCIO, DMSCPY, DMSDBG, DMSDOS, DMSEDX, DMSFCH, DMSFRE, DMSHDS, DMSINS, DMSITP, DMSLBT, DMSLIB, DMSLSB, DMSMVE, DMSOR1, DMSPRT, DMSRNE, DMSSBS, DMSSLN, DMSSRV, DMSSVT, DMSTQQ, DMSVSR, DMSABN, DMSACC~ DMSAMS, DMSARE, DMSASN, DMSAUD, DMSBTE, DMSBTP, DMSCIT, DMSCLS, DMSCRD, DMSCWR, DMSDIO, DMSDLB, DMSDSK, DMSDSL, DMSERR, DMSERS, DMSFET, DMSFLD, DMSGIO, DMSGLB, DMSIFC, DMSINA, DMSINT, DMSIOW, DMSITS, DMSLAD, DMSLDR, DMSLDS, DMSLIC, DMSLKD, DMSLST, DMSLSY, DMSNCP, DMSOLD, DMSOVR, DMSOVS, DMSPRV, DMSPUN, DMSRNM, DMSROS, DMSSCN, DMSSCT, DMSSMN, DMSSOP, DMSSSK, DMSSTG, DMSSYN, DMSTIO, DMSTYP, DMSUPD, DMSXCP, DMSZAP DMS ACF, DMS ARN, DMS BAB, DMS BW R, DMS CMP, DMSCWT, DMSDLK, DiiSDSV, DMSEXC, DMSFNS, DMSGND, DMS IN I, DMSITE, DcSLAF, DMSLFS, DMSLLU, DMSMDP, DMSOPL, DMSPIO, DMSQRY, DMSRRV, DMSS EB, DMSSQS, DMSSTT, DMSTPD, DMSVIB, OPSECT LDRST Assembled as part of DMSNUC. Built £1: DMSLDR E..§l~2.§ed hy: DMSLDR Rei.§E.§!!£.§f! hI: DMSLDR, DMSLGT, DMSLIO, DMSLSB, DMSOLD DMSLIB, E.§i.§rel!£.§f! QY: DMSCPY, DMSCRD, DMSEXC, DMSEXT, DMSSBD, DMSSBS, DMSSQS, DMSSVN, DMSABN, DMSARX, DMSCWR, DMSCWT, DMSINS, DMSINT, DMSSCT, DMSSEB, DMSSVT DMS AS M, DMS DBG, DMS ROS, DMSSOP, Appendix E. Data Areas and control Block References 323 OSFST PUBADR !!y!!!. 12y: DMSROS !~!~g§~g Assembled as part of DMSNUC. 12y: DMSALU ~ef~~£ed 121: DMSBOP, DMSCLS, DMSDSV, DMSLLU, DMSPRV, DMSXCP DMSDLK, 12y: DMSABN, DMSALU, DMSBOP, DMSDLK, DMSFCH, DMSMVE, DMSROS, DMSRRV, DMSSOP, DMSSRV, DMSSTT Ref~~~~g PUBOWNER Assembled as part of DMSNUC OVSECT R~!~~~£ed !~!~g§~g 121: DMSBOP, DMSCLS, DMSDLK, DMSLLU, DMSXCP Jiui!!. 121: NIA 121: NIA !~!~~~~g 121: DMSITS, DMSOVR SSAVE !!uilt ~1: DMSITS PCTAB Assembled as part of DMSNUC. !~f~!:~~£ed DMSDBG, DMSFRE, DMSOVS, DMSSTG, !U: DMSDLB, DMSIFC, DMSSAB, DMSSVN, DMSABN, DMSACC, DMSBAB, D8SDOS, DftSERR, DMSFLD, DMSITP, DMSITS, DMSLDR, DMSSLN, DMSSMN, DMSSOP, DMSSVT, DMSVIP, DMSXCP PDSSECT Jiui!i £1: DMSSVT !~!~gsed SUBSECT 12y: DMSSVT Assembled as part of DMSNUC. ~ef~!:~nced PGMSECT J11: DMSAEN, DMSINM, DMSINT SVCSECT Assembled as part of DMSNUC. Assembled as part of DMSNUC. Rg!g~~£gg £1: DMSSTG, DMSSVT DMSITP, DMSSAB, DMSSLN, PIBADR SVEARA Assembled as part of DMSNUC. Re!~~~£gg ~~fe!:~nced £1: DMSCIT, DMSFRE, DMSHDS, DMSINT, DMSITE, DMSITS, DMSLAD, DMSLFS, DMSQVR, DMSOVS, DMSSLN £1: DMSBAB, DMSDOS, DMSITP PIB2TAB Assembled as part of DMSNUC. Assembled as part of DMSNUC. ~~fg!:~n£ed !U: DMSBIB, DMSDOS, DMSITP SYSCOM Assembled as part of D8SNUC. R~fg!:gn£ed £1: DMSBAB, DMSBOP, DMSDOS, DMSFET, DMSITP, DMSQRY, DMSSTG, DMSSYN 324 IBM VM/370 Data Areas and Control Block Logic SYSNAMES USAVE Assembled as part of DMSNUC. !~!~£~Q£ed ~X: DMSAMS, DMSBOP, DMSBPT, DMSDOS, DMSEDX, DMSEXC, DMSINS, DMSINT, DMSITS, DMSQRY, DMSSET, DMSVIB, DMSVSR TSOBLKS Assembled as part of DMSNUC. USERSECT Assembled as part of DMSNUC. No CMS references. Appendix E. Data Areas and Control Block References 325 GIVEE ASYNE ~Y!!i ~Yi!i £y: DMTASY R~!~~§~g Bgl~~§~Q ~1: £y: DMTASY, DMTASK Re!~£~nf~Q £y: DMTASY, DMTEXT, £1: DMTGIV Refg~nced DMTIOM, DMTAKE, DMTASK £1: DMTAKE, DMTASK, DMTGIV DMTSIG IDE BUFDSECT ~Yi!! ~Yi!i £y: DMTSML R~l~~§~g Rg!~as~Q £y: DMTSML R~!~£~~f~Q DMTIOM £1: DMTIOM Bgf~£~~fed £y: DMTASK, DMTIOM, DMTREX £1: DMTSML IOTABLE COMDSECT ~yi!i gy: ~Yi!! Qy: DMTIOM, DMTREX, DMTSML £y: DMTCOM Rel~g§~g ~1: N/A Relea2~~ R~!~E~~f~g £1: DMTAXS, DMTCMX, DMTNPT, DMTREX, DMTSML DMTMGX, DMTCRE, DMTNPT, £1: DMTNPT, DMTSML Rgf~~nfed £1: DMTAXS, DMTCMX, DMTINI, DMTIOM, DMTREX, DMTSML DMTCRE, DEVTABLE ~Yili £y: DMTNPT R~!~~§~g ~y: LINKTABL Assembled into DMTSYS at system generation; also built by DMTCMX. DMTNPT £1: DMTASY, DMTAXS, DMTCMX, DMTCOM, DMTCRE, DMTEXT, DMTLAX, DMTMGX, DMTNPT, DMTREX, DMTSML R~fg~£~Q FREEE ~Yi!i £y: DMTQRQ R~!g~§~g ~y: DMTQRQ REQBLOCK R~!gE~nf~g £1: DMTASK, DMTINI, DMTQRQ ~uilt £1: DMTNPT Rgl~ea £1: DMTNPT GIVE Rgfg£g~~~ ~Yi!i £y: DMTSML, DMTNPT, DMTAXS, DMTREX R~l~s§~Q ~y: R~!~Egn£~g N/A £y: DMTSML, DMTNPT, DMTAXS, DMTREX 326 IBM VM/370 Data Areas and Control Block Logic £1: DMTNPT ROUTE TAKE Assembled in DMTSYS ~uilt QY: DMTSML, DMTNPT, DMTAXS, DMTREX liefgf~n£ed DMTREX QY: DoTSML, DMTNPT, DMTAXS, SVECTORS TANKDSEC Assembled into DMTVEC at system generation; resides in the RSCS nucleus. R~igren£~g DMTAXS, DMTEXT, DMTMGX, DMTSML, Q!: DMTCMX, DMTGIV, DMTNPT, DMTSTO, DMTAKE, DMT1SK, DMTCOM, DMTCRE, DMTIHI, DMTIOM, DMTQRQ, DMTREX, DMTSVC, DMTWAT DMTASY, DMTDSP, DMTL1I, DMTSIG, ~~i!i QY: DMTSML ~~!g~2gg Qy: DMTSML TARE! TAG Assembled into each task module. Built ~Y: DKTAXS Re!~~sed ~!: ~gig£~~g DMTAXS QI: DMTAXS, DMTCMX, DMTNPT, Bgfg£gn£gg QY: DMTAKE, DMTASK, DMTASY, DMTCOM, DMTCRE, DMTDSP, DMTEXT, DMTGIV, DMTIOM, DMTREX, DMTSIG, DMTSTO, DMTSVC DMTSML TASKE TAGAREA ~~i!i QY: DMTASK QY: DMTAKE, DMTASK, DMTASY, DMTAXS, DMTCOM, DMTDSF, DMTEXT, DMTGIV, DHTINI, DMTIOM, DMTNPT, DMTPST, DMTREX, ggi~£gn£gg nM~~T~ ~~~~~~, nM~~MT ~~~~~~, nM~~~~ ~~~u~~, nM~~V~ ~U~W.~I nM~U.~ uu~nA~ TCTDSECT ~~i!i QY: DMTSML g~!~~2~g ay: DMTSML Appendix E. Data Areas and Control Block References 327 328 IBM VM/370 Data Areas and Control Block Logic Reader's Comment Form Title: I BM Virtual Machine Facility/370: Data Areas and Control Block Logic Order No. SY20-0884-3 Please check or fill in the items; adding explanations/comments in the space provided. Which of the following terms best describes your job? [j Customer Engineer o o Engineer Instructor o o o Manager Mathematician Operator o o o Programmer Sales Representative Student/Trainee o o o Systems Analyst Systems Engineer Other (explain below) How did you use this publication? o Introductory text o Reference manual o Student/D Instructor text o Other (explain) _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __ ·. J: Did you find the material easy to read and understand? 0 Yes o No (explain below) Did you find the material organized for convenient use? 0 Yes o N 0 (explain below) e· ",. .... ~: aI· e· O· <: E: ~: Specific criticisms (explain below) Clarifications on pages Additions on pages Deletions on pages Errors on pages Explanations and other comments: Thank you for your cooperation. No postage necessary if mailed in thE; U.S.A. SY20-0884- 3 (") s. ~ """ c: 0 Reader's Comment Form ~ 0" :J OQ r 5' (II I I Fold and tape Fold and tape Please Do Not Staple 111111 NO POSTAGE NECESSARY IF MAILED IN THE UNITED STATES I I I I I I OJ s: < s: W -...I 0 ...c ell ell I BUSINESS REPLY MAIL I I FI RST CLASS PERMIT 40 ARMONK, NEW YORK » ... (1) ell en ell ::;:, Co (') ( OJ 0n POSTAGE WILL BE PAID BY ADDRESSEE: '1:' r 0 I nternational Business Machines Corporation Department 058, Building 706-2 PO Box 390 Poughkeepsie, New York 12602 cc (or ~ Attn: VM/370 Publications Fold a nd tape Please Do Not Staple Fold and tape I --I I I I ----- ---------~- .- --_ --------------.. ... International Business Machines Corporation Data Processing Division 1133 Westchester Avenue, White Plains, N.Y. 10604 IBM World Trade Americas/Far East Corporation Town of Mount Pleasant, Route 9, North Tarrytown, N.Y., U.S.A. 10591 IBM World Trade Europe/Middle East/Africa Corporation 360 Hamilton Avenue, White Plains, N.Y., U.S.A. 10601 I I I I I I I I ! ~. Sa.. ~. c en ?> CI) -< N 0 6CO CO f' w
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.3 Linearized : No XMP Toolkit : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37 Create Date : 2003:11:06 14:24:03-08:00 Modify Date : 2009:09:11 06:44:01-07:00 Metadata Date : 2009:09:11 06:44:01-07:00 Producer : Adobe Acrobat 9.13 Paper Capture Plug-in Format : application/pdf Document ID : uuid:b3bbb3b8-8b93-4efa-9a1d-935db6a47e72 Instance ID : uuid:c17d87c4-5062-4e82-9c29-51456410a4e4 Page Layout : SinglePage Page Mode : UseOutlines Page Count : 342EXIF Metadata provided by EXIF.tools