*COPY MONBLOKS 00001000 PUSH PRINT @VA04958 00001200 AIF ('&SYSPARM' NE 'SUP').MON01 @VA04958 00001400 PRINT OFF,NOGEN @VA04958 00001600 .MON01 ANOP 00001800 MONCOM DSECT 00002000 SPACE 00003000 *** MONCOM - VM MONITOR COMMUNICATIONS AREA 00004000 * 00005000 * 0 +-----------------------+-----+-----+-----------+ 00006000 * | MONARDB | M*1 | M*2 | MONDVNUM | 00007000 * 8 +-----------------------+-----+-----+-----------+ 00008000 * | MONDVLST | MONRSV1 | 00009000 * 10 +-----------------------+-----------------------+ 00010000 * | MONAIOB | MONATRB | 00011000 * 18 +-----------------------+-----------------------+ 00012000 * | MONCLOCK | 00013000 * 20 +-----------------------+-----------------------+ 00014000 * | MONSUSCK | 00015000 * 28 +-----------------------+-----------------------+ 00016000 * | MONSUSCT | MONRSVD1 | 00017000 * 30 +-----------------------+-----------------------+ 00018000 * | | 00020300 * = MONSAVE1 = 00020400 * | | 00020500 * 70 +-----------------------------------------------+ 00020650 * | | 00020700 * = MONSAVE2 = 00020800 * | | 00020900 * B0 +-----------------------------------------------+ 00021050 * | MONUSER | 00021100 * B8 +-----------------------+-----------------------+ 00021250 * | MONSPLCT | MONSFB | 00021252 * C0 +-----------------------------------------------+ 00021254 * | MONCURV | MONNXTV | 00021256 * C8 +-----------------------------------------------+ 00021258 * | MONCURR | MONNXTR | 00021260 * D0 +-----------------------------------------------+ 00021262 * | MONDASA | MONDASB | 00021264 * D8 +-----------------------------------------------+ 00021266 * | MONDAS | M3 | M4 | MONBUFNO | 00021268 * E0 +-----------------------------------------------+ 00021270 * | MONCURBF | MONCRSLT | 00021300 * E8 +-----------------------------------------------+ 00021352 * | MONIOBF | MONIOSLT | 00021400 * F0 +-----------------------------------------------+ 00021452 * | MONSKLST | MONSACT | 00021453 * F8 +-----------------------+-----------------------+ 00021454 * | MONCHPTR | MONUTRB | 00021455 * 100 +-----------------------+-----------------------+ 00021456 * | MONBUF1 | 00021500 * +-----------------------+ 00021550 * | MONBUF1V | 00021552 * +-----------------------+ 00021554 * 00027000 *** MONCOM - VM MONITOR COMMUNICATIONS AREA 00028000 SPACE 00029000 MONARDB DS 1F ADDRESS OF MONITOR TAPE REAL DEVICE BLK 00030000 MONFLAG1 DS 1X M*1 MONITOR FLAGS 00031000 MONFLAG2 DS 1X M*2 WORK BYTE 00032000 MONDVNUM DS 1H NUMBER OF ENTRIES IN REAL DEVICE LIST 00033000 MONDVLST DS 1F ADDRESS OF THE REAL DEVICE LIST 00034000 MONRSV1 DS 1F RESERVED 00035000 MONAIOB DS 1F ADDRESS OF MONITOR TAPE I/O BLOCK 00036000 MONATRB DS 1F ADDRESS OF MONITOR TIMER REQUEST BLOCK 00037000 MONCLOCK DS 1D TOD CLOCK STAMP FOR EACH RECORD 00038000 MONSUSCK DS 1D TOD CLOCK OF LAST SUSPENSION 00039000 MONSUSCT DS 1F SYSPENSION COUNT 00040000 MONRSVD1 DS 1F RESERVED 00041000 MONSAVE1 DS 16F MONITOR INTERNAL SAVE AREA FOR CPU 00044200 MONSAVE2 DS 16F MONITOR INTERNAL SAVE AREA FOR APU 00044300 MONUSER DS 8C USER STARTING/STOPPING THE MONITOR 00044400 MONSPLCT DS 1F COUNT OF RECORDS ON SPOOL FILE 00044402 MONSFB DS 1F ADDRESS OF SFBLOK FOR SPOOL FILE 00044404 MONCURV DS 1F VIRT ADDRESS OF FIRST VIRTUAL BUFFER 00044406 MONNXTV DS 1F VIRT ADDRESS OF SECND VIRTUAL BUFFER 00044408 MONCURR DS 1F REAL ADDRESS OF FIRST VIRTUAL BUFFER 00044410 MONNXTR DS 1F REAL ADDRESS OF SECND VIRTUAL BUFFER 00044412 MONDASA DS 1F ADDRESS OF NEXT DASD BUFFER 00044414 MONDASB DS 1F ADDRESS OF PREVIOUS DASD BUFFER 00044416 MONDAS DS 1F ADDRESS OF DASD BUFFER FOR SPOOL FILE 00044418 MONEX DS 1C FLAG BYTE 00044420 MONFLAG3 DS 1C FLAG BYTE 00044422 MONBUFNO DS 1H RESERVED FOR IBM USE 00044424 MONCURBF DS 1F ADDRESS OF CURRENT MON BUFFER 00045000 MONCRSLT DS 1F CORRESPONDING SLOT ADDRESS 00045100 MONIOBF DS 1F ADDRESS OF MON BUFFER GOING TO TAPE 00045200 MONIOSLT DS 1F CORRESPONDING SLOT ADDRESS 00045300 MONSKLST DS 1F ADDR SEEKS DEV LIST 00045310 MONSACT DS 1F LIMIT COUNT FOR REAL TIME MONITOR 00045320 MONCHPTR DS 1F ADDR OF CHANNEL SAMPLING DATA 00045330 MONUTRB DS 1F ADDR OF I/O UTILIZATION TRB 00045340 MONBUF1 DS 1F MONITOR BUFFER ADDRESSES - ONE 4 00045400 * BYTE ENTRY FOR EACH MONITOR BUFFER. THE 00045500 * LAST ADDRESS FIELD CONTAINS X'FFFFFFFF'. 00045600 MONSIZE EQU (*-MONCOM) SIZE OF DSECT 00046100 MONBUF1V EQU MONBUF1+4 00046110 SPACE 1 00046112 * FLAGS IN DMKSYSAT AS DEFINED BY THE SYSMON MACRO 00046114 * 00046116 AUTGO EQU X'80' AUTOMATIC MONITORING ENABLED 00046118 AUTOSPL EQU X'40' STOP MONITOR WHEN SPOOL LIMIT REACHED 00046120 MONSLMT EQU X'20' SAMPLING FOR REAL TIME MONITOR 00046121 * 00046122 * FLAGS IN MONEX 00046124 * 00046126 CLCMD EQU X'80' INDICATES SPOOL FILE CLOSED BY COMMAND 00046128 * 00046130 * FLAGS IN MONFLAG3 00046132 * 00046134 CLSUS EQU X'08' INDICATES TO SUSPEND WHILE CLOSING 00046136 EXHAUST EQU X'04' INDICATES SYSTEM OUT OF DASD SLOTS 00046138 CL EQU X'02' INDICATES NEED TO SUSPEND 00046140 SPOOLED EQU X'01' INDICATES SPOOL MONITORING ACTIVE 00046142 SPACE 1 00046144 SPACE 1 00047000 * BITS DEFINED IN MONFLAG1 00048000 MONSYSVM EQU X'80' FLAG USED BY USER CLASS ROUTINE 00049000 CFSTOP EQU X'20' MONITOR STOP COMMAND HAS BEEN ISSUED 00051000 TRUN EQU X'10' TAPE REWIND-UNLOAD CCW HAS BEEN SCHEDULED 00052000 ERROR EQU X'08' TAPE ERROR HAS OCCURRED, STOP MONITOR 00053000 MONTIINT EQU X'04' HANDLING TIMER INTERRUPT 00054000 MONLSTBK EQU X'02' HANDLING "LAST BLOCK" 00054100 MON1BUF EQU X'01' ONLY 1 BUFFER FOR MONITORING 00054200 SPACE 1 00054210 * BITS DEFINED IN MONFLAG2: 00054220 SUSPEND EQU X'80' MONITOR HAS BEEN SUSPENDED 00054230 MONMIAPG EQU X'40' DMKMIA IS BEING PAGED IN @VA08826 00054235 SPACE 1 00054240 * FLAGS IN 3RD BYTE OF MONITOR TAPE BUFFER AND 00054252 * 9TH BYTE OF MONITOR SPOOL BUFFER 00054254 MONBUFIO EQU X'00' NOT COLLECTING, IN USE FOR I/O 00054260 MONBUFAV EQU X'01' NOT COLLECTING, NOT IN USE FOR I/O 00054270 MONBUFAC EQU X'03' COLLECTING, NOT IN USE FOR I/O 00054280 SPACE 1 00055110 * FLAGS IN 10TH BYTE OF MONITOR SPOOL BUFFER 00055120 * 00055130 TRAP EQU X'80' LAST SPOOL FILE BUFFER AWAITING I/O 00055140 UNFIN EQU X'40' BUFFER LENGTH TO BE COMPUTED 00055150 * 00055160 * 00056000 * THIRD BYTE OF CR8: 00057000 * 00058000 PERFCL EQU X'80' SAMPLE HARDWARE/SOFTWARE UTILIZATIONS 00059000 RESPCL EQU X'40' TRACE RESPONSE CLASS 00060000 SCHEDCL EQU X'20' TRACE SCHEDULER ACTIVITY CLASS 00061000 TIMECL EQU X'10' EXECUTION TIMING CLASS 00062000 USERCL EQU X'08' SAMPLE USER RESOURCE USAGE CLASS 00063000 PRIVCL EQU X'04' PRIVOPS CLASS 00064000 DASDCL EQU X'02' SAMPLE DASDS UTILIZATIONS CLASS 00065000 SEEKCL EQU X'01' TRACE DASD SEEK ACTIVITY 00066000 SPACE 00067000 * 00068000 * FOURTH BYTE OF CR8 00069000 * 00070000 SPROFCL EQU X'80' TRACE SYSTEM PROFILE CLASS 00071000 MNDEVLST DSECT 00071010 SPACE 00071020 *** MNDEVLST DSECT 00071030 * 00071040 * 0 +-----------------------+-----------+-----------+ 00071050 * | MNRDEVB | MNCUBSY | MNDVBSY | 00071060 * 8 +-----------------------+-----------+-----------+ 00071070 * 00071080 * MNDEVLST DSECT 00071090 SPACE 00071100 MNRDEVB DS 1F RDEVBLOK ADDRESS 00071110 MNCUBSY DS 1H C.U. BUSY COUNT 00071120 MNDVBSY DS 1H DEV. BUSY COUNT 00071130 MNDEVLEN EQU *-MNDEVLST DEVICE ENTRY LENGTH 00071140 * 00071150 MNCHSAMP EQU 2 CHANNEL SAMPLE ENTRY LENGTH 00071160 DEFINTVL EQU 5 DEFAULT UTILIZATION INTERVAL 00071170 MNCHSIZE EQU 5 DOUBLE WORDS FOR CHANNEL SAMPLES 00071180 EJECT 00072000 MNHDR DSECT HEADER RECORD, PRECEEDS EVERY TAPE RECORD 00073000 SPACE 00074000 *** MNHDR - VM MONITOR RECORD HEADER 00075000 * 00076000 * 0 +-----------+-----------+-----+-----------+-----+ 00077000 * | MNHRECSZ | RESERVED | M*1 | MNHCODE | | 00078000 * 8 +-----------+-----------+-----+-----------+-----+ 00079000 * | MNHTOD | 00080000 * C +-----------------------+ 00081000 * 00082000 *** MNHDR - VM MONITOR RECORD HEADER 00083000 SPACE 00084000 MNBHDLEN EQU 4 LENGTH OF THE BLOCK HEADER (VB FORMAT) 00085000 SPACE 00086000 MNHRECSZ DS 1H RECORD SIZE 00087000 DS 1H RESERVED 00088000 MNHCLASS DS 1X M*1 MONITOR CLASS 00089000 MNHCODE DS XL2 MONITOR CODE 00090000 MNHTOD DS XL5 CURRENT TOD CLOCK VALUE 00091000 MNHDRLEN EQU *-MNHDR LENGTH OF THE RECORD HEADER 00092000 SPACE 5 00093000 MN097 DSECT TAPE HEADER, FIRST RECORD OF TAPE FILE 00094000 SPACE 00095000 *** MN097 - VM MONITOR TAPE HEADER RECORD 00096000 * 00097000 * 0 +-----------------------------------------------+ 00098000 * | MN097CPU | 00099000 * 8 +-----------------------------------------------+ 00100000 * | MN097LEV | 00101000 * 10 +-----------------------------------------------+ 00102000 * | MN097DAT | 00103000 * 18 +-----------------------------------------------+ 00104000 * | MN097TIM | 00105000 * 20 +-----------------------------------------------+ 00106000 * | MN097UID | 00107000 * 28 +-----------------------+-----------------------+ 00108000 * | MN097CR8 | MN097NUC | 00109000 * 30 +-----------------------+-----------------------+ 00109100 * | MN097FSS | MN097DPA | 00109200 * 38 +-----------------------+-----------------------+ 00109300 * | MN097TTS | MN097VR | 00109400 * 40 +-----------------------+-----------------------+ 00109500 * | MN097CPL | MN097APL | 00109600 * 44 +-----------+-----------+ 00109700 * 00111000 *** MN097 - VM MONITOR TAPE HEADER RECORD 00112000 SPACE 00113000 MN097CPU DS XL8 CPU SERIAL / MODEL NUMBER 00114000 MN097LEV DS CL8 SYSTEM LEVEL 00115000 MN097DAT DS CL8 CURRENT DATE 00116000 MN097TIM DS CL8 CURRENT TIME 00117000 MN097UID DS CL8 USER STARTING THE MONITOR 00118000 MN097CR8 DS 1F VALUE OF CR8 00119000 MN097NUC DS 1F NUCLEUS SIZE 00119100 MN097FSS DS 1F FREE STORAGE SIZE 00119200 MN097DPA DS 1F DYNAMIC PAGING AREA SIZE 00119300 MN097TTS DS 1F TRACE TABLE SIZE 00119400 MN097VR DS 1F V=R AREA SIZE 00119500 MN097CPL DS 1H CPU LOGICAL ADDRESS 00119600 MN097APL DS 1H APU LOGICAL ADDRESS 00119700 MN097LEN EQU *-MN097 LENGTH OF THE TAPE HEADER RECORD 00120000 EJECT 00121000 MN098 DSECT TAPE TRAILER, LAST RECORD OF TAPE FILE 00122000 SPACE 00123000 *** MN098 - VM MONITOR TAPE TRAILER RECORD 00124000 * 00125000 * 0 +-----------------------------------------------+ 00126000 * | MN098UID | 00127000 * 8 +-----------------------------------------------+ 00128000 * 00129000 *** MN098 - VM MONITOR TAPE TRAILER RECORD 00130000 SPACE 00131000 MN098UID DS CL8 USER STOPPING THE MONITOR 00132000 MN098LEN EQU *-MN098 LENGTH OF THE TAPE TRAILER RECORD 00133000 SPACE 5 00134000 MN099 DSECT 00135000 SPACE 00136000 *** MN099 - VM MONITOR SUSPENSION RECORD 00137000 * 00138000 * 0 +-----------------------------+-----------------+ 00139000 * | MN099TOD | MN099CNT | 00140000 * 8 +-----+-----------------------+-----------------+ 00141000 * | | 00142000 * 9 +-----+ 00143000 * 00144000 *** MN099 - VM MONITOR SUSPENSION RECORD 00145000 SPACE 00146000 MN099TOD DS XL5 TOD CLOCK AT SUSPENSION 00147000 MN099CNT DS XL4 COUNT OF SUSPENSIONS 00148000 MN099LEN EQU *-MN099 LENGTH OF THE SUSPENSION RECORD 00149000 EJECT 00150000 MN000 DSECT 00151000 SPACE 00152000 *** MN000 - VM MONITOR PERFORM CLASS RECORD 00153000 * 00154000 * 0 +-----------------------------------------------+ 00155000 * | MN000WID | 00156000 * 8 +-----------------------------------------------+ 00157000 * | MN000WPG | 00158000 * 10 +-----------------------------------------------+ 00159000 * | MN000WIO | 00160000 * 18 +-----------------------------------------------+ 00161000 * | MN000PRB | 00162000 * 20 +-----------------------+-----------------------+ 00163000 * | MN000PSI | MN000CPA | 00164000 * 28 +-----------------------+-----------------------+ 00165000 * | MN000NFL | MN000PSN | 00166000 * 30 +-----------------------+-----------------------+ 00167000 * | MN000PRC | MN000RPC | 00168000 * 38 +-----------------------+-----------------------+ 00169000 * | MN000SPC | MN000FLF | 00170000 * 40 +-----------------------+-----------------------+ 00171000 * | MN000CPT | MN000SS | 00172000 * 48 +-----------------------+-----------------------+ 00173000 * | MN000PFF | MN000PRF | 00174000 * 50 +-----------------------+-----------------------+ 00175000 * | MN000PCS | MN000NXR | 00176000 * 58 +-----------------------+-----------------------+ 00177000 * | MN000CPR | MN000CVI | 00178000 * 60 +-----------------------+-----------------------+ 00179000 * | MN000CCW | MN000ITI | 00180000 * 68 +-----------------------+-----------------------+ 00181000 * | MN000PTI | MN000CKI | 00182000 * 70 +-----------------------+-----------------------+ 00183000 * | MN000CSV | MN000CPG | 00184000 * 78 +-----------------------+-----------------------+ 00185000 * | MN000CIO | MN000CDS | 00186000 * 80 +-----------------------+-----------------------+ 00187000 * | MN000CDA | MN000CDB | 00188000 * 88 +-----------------------+-----------------------+ 00189000 * | MN000CSC | MN000EK | 00190000 * 90 +-----------------------+-----------------------+ 00191000 * | MN000IK | MN000MS | 00192000 * 98 +-----------------------+-----------------------+ 00193000 * | MN000LP | MN000DI | 00194000 * A0 +-----------------------+-----------------------+ 00195000 * | MN000SI | MN000SF | 00196000 * A8 +-----------------------+-----------------------+ 00197000 * | MN000TI | MN000CI | 00198000 * B0 +-----------------------+-----------------------+ 00199000 * | MN000HI | MN000HD | 00200000 * B8 +-----------------------+-----------------------+ 00201000 * | MN000TC | MN000MN | 00202000 * C0 +-----------------------+-----------------------+ 00203000 * | MN000MO | MN000LR | 00204000 * C8 +-----------------------+-----------------------+ 00205000 * | MN000CP | MN000CH | 00206000 * D0 +-----------------------+-----------------------+ 00207000 * | MN000TE | MN000CE | 00208000 * D8 +-----------------------+-----------------------+ 00209000 * | MN000CT | MN000PE | 00210000 * E0 +-----------------------+-----------------------+ 00211000 * | MN000PT | MN000EP | 00212000 * E8 +-----------------------+-----------------------+ 00213000 * | MN000IP | MN000PB | 00214000 * F0 +-----------------------+-----------------------+ 00215000 * | MN000RR | MN000TCL | 00216000 * F8 +-----------------------+-----------------------+ 00217000 * | MN000LCL | MN000CS | 00218000 * 100 +-----------------------+-----------------------+ 00219000 * | MN000CD | MN000HDI | 00220000 * 108 +-----------------------+-----------------------+ 00221000 * | MN000NDU | MN000NAU | 00222000 * 110 +-----------------------+-----------------------+ 00223000 * | MN000PRD | MN000PWR | 00224000 * 118 +-----------------------+-----------------------+ 00225000 * | MN000NPP | MN000SWS | 00226000 * 120 +-----------------------+-----------------------+ 00227000 * | MN000Q1N | MN000Q2N | 00228000 * 128 +-----------+-----------+-----------+-----------+ 00229000 * | MN000Q1E | MN000Q2E | MN000INT | MN000PPA | 00230000 * 130 +-----------+-----------+-----------+-----------+ 00231000 * | MN000PPC | | MN000ISD | 00232000 * 138 +-----------+-----------+-----------------------+ 00232100 * | MN000GTM | MN000DQM | 00232200 * 140 +-----------------------+-----------------------+ 00232300 * | MN000SWP | MN000EXT | 00232400 * 148 +-----------------------+-----------------------+ 00232500 * | MN000NXT | MN000ATT | 00232600 * 150 +-----------------------+-----------------------+ 00232700 * | MN000CNT | 00232800 * 154 +-----------------------+ 00232900 * 00234000 *** MN000 - VM MONITOR PERFORM RECORD 00235000 SPACE 00236000 MN000WID DS XL8 TOTAL SYSTEM IDLE WAIT TIME 00237000 MN000WPG DS XL8 TOTAL SYSTEM PAGE WAIT TIME 00238000 MN000WIO DS XL8 TOTAL SYSTEM I/O WAIT TIME 00239000 MN000PRB DS XL8 TOTAL SYSTEM PROBLEM STATE TIME 00240000 MN000PSI DS 1F NO. PAGING SIO'S 00241000 MN000CPA DS 1F NO. CALLS TO DMKPAG 00242000 MN000NFL DS 1F NO. OF PAGE FRAMES CURRENTLY ON FREE LIST 00243000 MN000PSN DS 1F NO. OF PAGES CURRENTLY BEING SWAPPED 00244000 MN000PRC DS 1F NO. OF PAGES FLUSHED BUT RECLAIMED 00245000 MN000RPC DS 1F NO. OF RESERVED PAGES 00246000 MN000SPC DS 1F NO. OF SHARED SYSTEM PAGES 00247000 MN000FLF DS 1F NO. OF TIMES THE FREE LIST WAS EMPTY 00248000 MN000CPT DS 1F NO. OF CALLS TO DMKPTRFR 00249000 MN000SS DS 1F NO. OF PAGES STOLEN FROM IN Q USERS 00250000 MN000PFF DS 1F NO. OF PAGES SWAPPED FROM THE FLUSH LIST 00251000 MN000PRF DS 1F NO. OF PAGES EXAMINED IN STEALING A PAGE 00252000 MN000PCS DS 1F NO. OF FULL SCANS DONE IN STEALING PAGES 00253000 MN000NXR DS 1F NO. OF REAL EXTERNAL INTERRUPTS 00254000 MN000CPR DS 1F NO. OF CALLS TO DMKPRVLG 00255000 MN000CVI DS 1F NO. OF CALLS TO DMKVIOEX 00256000 MN000CCW DS 1F NO. OF CALLS TO DMKCCW FROM DMKVIO 00257000 MN000ITI DS 1F NO. OF INTERVAL TIMER INT. REFLECTED 00258000 MN000PTI DS 1F NO. OF CPU TIMER INT. REFLECTED 00259000 MN000CKI DS 1F NO. OF CLOCK COMP INT. REFLECTED 00260000 MN000CSV DS 1F NO. OF SVC INT. REFLECTED 00261000 MN000CPG DS 1F NO. OF PROGRAM INT. HANDLED 00262000 MN000CIO DS 1F NO. OF I/O INTERRUPTS HANDLED 00263000 MN000CDS DS 1F NO. OF CALLS TO DMKDSP (MAIN ENTRY) 00264000 MN000CDA DS 1F NO. OF FAST REFLECTS IN DMKDSP 00265000 MN000CDB DS 1F NO. OF DISPATCHES FOR NEW PSW'S 00266000 MN000CSC DS 1F NO. OF CALLS TO DMKSCHDL 00267000 MN000EK DS 1F INST COUNT FOR X'08' SSK 00268000 MN000IK DS 1F INST COUNT FOR X'09' ISK 00269000 MN000MS DS 1F INST COUNT FOR X'80' SSM 00270000 MN000LP DS 1F INST COUNT FOR X'82' LPSW 00271000 MN000DI DS 1F INST COUNT FOR X'83' DIAG 00272000 MN000SI DS 1F INST COUNT FOR X'9CX0' SIO 00273000 MN000SF DS 1F INST COUNT FOR X'9CX1' SIOF 00274000 MN000TI DS 1F INST COUNT FOR X'9DX0' TIO 00275000 MN000CI DS 1F INST COUNT FOR X'9DX1' CLRIO 00276000 MN000HI DS 1F INST COUNT FOR X'9EX0' HIO 00277000 MN000HD DS 1F INST COUNT FOR X'9EX1' HDV 00278000 MN000TC DS 1F INST COUNT FOR X'9F' TCH 00279000 MN000MN DS 1F INST COUNT FOR X'AC' STNSM 00280000 MN000MO DS 1F INST COUNT FOR X'AD' STOSM 00281000 MN000LR DS 1F INST COUNT FOR X'B1' LRA 00282000 MN000CP DS 1F INST COUNT FOR X'B202' STIDP 00283000 MN000CH DS 1F INST COUNT FOR X'B203' STIDC 00284000 MN000TE DS 1F INST COUNT FOR X'B204' SCK 00285000 MN000CE DS 1F INST COUNT FOR X'B206' SCKC 00286000 MN000CT DS 1F INST COUNT FOR X'B207' STCKC 00287000 MN000PE DS 1F INST COUNT FOR X'B208' SPT 00288000 MN000PT DS 1F INST COUNT FOR X'B209' STPT 00289000 MN000EP DS 1F INST COUNT FOR X'B20A' SPKA 00290000 MN000IP DS 1F INST COUNT FOR X'B20B' IPK 00291000 MN000PB DS 1F INST COUNT FOR X'B20D' PTLB 00292000 MN000RR DS 1F INST COUNT FOR X'B213' RRB 00293000 MN000TCL DS 1F INST COUNT FOR X'B6' STCTL 00294000 MN000LCL DS 1F INST COUNT FOR X'B7' LCTL 00295000 MN000CS DS 1F INST COUNT FOR X'BA' CS 00296000 MN000CD DS 1F INST COUNT FOR X'BB' CDS 00297000 MN000HDI DS 1F DIAGNOSE DISK I/O SIMULATION COUNT 00298000 MN000NDU DS 1F NO. OF USERS DIALED TO A VIRT MACH 00299000 MN000NAU DS 1F NO. OF USERS LOGGED ON 00300000 MN000PRD DS 1F NO. OF PAGE READS 00301000 MN000PWR DS 1F NO. OF PAGE WRITES 00302000 MN000NPP DS 1F NO. OF SYSTEM PAGABLE PAGES 00303000 MN000SWS DS 1F SUM OF WORKING SETS OF IN-Q USERS 00304000 MN000Q1N DS 1F NO. OF USERS IN Q1 00305000 MN000Q2N DS 1F NO. OF USERS IN Q2 00306000 MN000Q1E DS 1H NO. OF USERS ELIG FOR Q1 00307000 MN000Q2E DS 1H NO. OF USERS ELIG FOR Q2 00308000 MN000INT DS 1H MONITOR SAMPLING INTERVAL (SECS) 00309000 MN000PPA DS 1H NO. OF ALLOC. PAGE+SPOOL PSEUDO CYLINDERS 00310000 MN000PPC DS 1H NO. OF USED PAGE+SPOOL PSUEDO CYLINDERS 00311000 DS 1H RESERVED 00311100 MN000ISD DS 1F COUNT OF MINI IOB STACK DEPLETES 00311200 MN000GTM DS 1F COUNT OF MINI IOB ENQUEUES 00311300 MN000DQM DS 1F COUNT OF MINI IOB DEQUEUES 00311400 MN000SWP DS 1F COUNT OF SIO'S ON ALTERNATE PATH 00311500 MN000EXT DS 1F COUNT OF FREE STORE EXTENDS 00311600 MN000NXT DS 1F COUNT OF FREE STORE UNEXTENDS 00311700 MN000ATT DS 1F COUNT OF TYSPLIT ATTEMPTS 00311800 MN000CNT DS 1F COUNT OF SUBPOOL SPLITS 00311900 MN000LEN EQU *-MN000 RECORD LENGTH IN BYTES 00312000 EJECT 00312100 MN001 DSECT 00312105 SPACE 00312110 *** MN001 - VM MONITOR PERFORM CLASS RECORD 00312115 * - APU DATA 00312120 * 00312125 * 0 +-----------------------------------------------+ 00312130 * | MN001WID | 00312135 * 8 +-----------------------------------------------+ 00312140 * | MN001WPG | 00312145 * 10 +-----------------------------------------------+ 00312150 * | MN001WIO | 00312155 * 18 +-----------------------------------------------+ 00312160 * | MN000PRB | 00312165 * 20 +-----------------------------------------------+ 00312170 * | MN001NXR | MN001CSV | 00312175 * 28 +-----------------------------------------------+ 00312180 * | MN001PRD | MN001PWR | 00312185 * 30 +-----------------------------------------------+ 00312186 * | MN001SSY | MN001NSY | 00312187 * 38 +-----------------------------------------------+ 00312188 * | MN001SFR | MN001NFR | 00312189 * 40 +-----------------------------------------------+ 00312190 * | MN001SRN | MN001NRN | 00312191 * 48 +-----------------------------------------------+ 00312192 * | MN001STM | MN001NTM | 00312193 * 50 +-----------------------------------------------+ 00312194 * | MN001SDP | MN001NDP | 00312195 * 58 +-----------------------------------------------+ 00312196 * | MN001NFL | MN001NFS | 00312197 * 60 +-----------------------------------------------+ 00312198 * | MN001NSD | MN001NVD | 00312199 * 68 +-----------------------------------------------+ 00312200 * | MN001NRU | 00312201 * +-----------------------+ 00312202 * 00312203 *** 00312204 SPACE 00312205 MN001WID DS XL8 APU IDLE WAIT TIME 00312210 MN001WPG DS XL8 APU PAGE WAIT TIME 00312215 MN001WIO DS XL8 APU I/O WAIT TIME 00312220 MN001PRB DS XL8 APU PROBLEM STATE TIME 00312225 MN001NXR DS 1F NUMBER OF EXT INT'S TO APU 00312230 MN001CSV DS 1F NUMBER OF SVC'S REFLECTED BY APU 00312235 MN001PRD DS 1F NUMBER OF PAGE READS BY APU 00312240 MN001PWR DS 1F NUMBER OF PAGE WRITES BY APU 00312241 MN001SSY DS 1F TOTAL TIME SPIN ON SYSTEM LOCK @V4M0221 00312242 MN001NSY DS 1F TOTAL NO. SPINS FOR SYSTEM LOCK @V4M0221 00312243 MN001SFR DS 1F TOTAL TIME SPIN ON DMKFRE LOCK @V4M0221 00312244 MN001NFR DS 1F TOTAL NO. SPINS FOR DMKFRE LOCK @V4M0221 00312245 MN001SRN DS 1F TOTAL TIME SPIN ON RUNLIST LOCK @V4M0221 00312246 MN001NRN DS 1F TOTAL NO. SPINS FOR RUNLIST LOCK @V4M0221 00312247 MN001STM DS 1F TOTAL TIME SPIN ON TIMER REQ LOCK@V4M0221 00312248 MN001NTM DS 1F TOTAL NO. SPINS FOR TIMER REQ LCK@V4M0221 00312249 MN001SDP DS 1F TOTAL TIME SPIN ON DISP LOCK @V4M0221 00312250 MN001NDP DS 1F TOTAL NO. SPINS FOR DISP LOCK @V4M0221 00312251 MN001NFL DS 1F NO. TIMES CPFRELK SET @V4M0221 00312252 MN001NFS DS 1F NO. TIMES CPFRESW SET @V4M0221 00312253 MN001NSD DS 1F NO. TIMES SYS LOCK REQ DEFERRED @V4M0221 00312254 MN001NVD DS 1F NO. TIMES VMBLOK LOCK DEFERRED @V4M0221 00312255 MN001NRU DS 1F NO. OF DMKDSPRU ENTRIES @V4M0221 00312256 MN001LEN EQU *-MN001 LENGTH OF RECORD 00312260 EJECT 00313000 MN10X DSECT 00314000 SPACE 00315000 *** MN10X - VM MONITOR RESPONSE CLASS RECORDS 00316000 * 00317000 * 0 +-----------------------------------------------+ 00318000 * | MN10XUID | 00319000 * 8 +-----------+-----+-----------------------------+ 00320000 * | MN10XADD | M*1 | MN10YIO = 00321000 * +-----------+-----+-----------------------------+ 00322000 * 00323000 *** MN10X - VM MONITOR RESPONSE CLASS RECORDS 00324000 SPACE 00325000 MN10XUID DS CL8 USERID 00326000 MN10XADD DS 1H TERMINAL LINE ADDRESS 00327000 MN10XLEN EQU *-MN10X SHORT RECORD LENGTH 00328000 SPACE 00329000 MN10YCNT DS 1X M*1 BYTE COUNT FOR THE FOLLOWING LINE 00330000 MN10YLEN EQU *-MN10X LONG RECORD, HEADER LENGTH 00331000 MN10YIO EQU * INPUT/OUTPUT LINE STARTS HERE 00332000 EJECT 00333000 MN20X DSECT 00334000 SPACE 00335000 *** MN20X - VM MONITOR SCHEDULE CLASS RECORDS 00336000 * 00337000 * 0 +-----------------------------------------------+ 00338000 * | MN20XUID | 00339000 * 8 +-----------------------+-----------------------+ 00340000 * | MN20XNPP | MN20XSWS | 00341000 * 10 +-----------------------+-----------------------+ 00342000 * | MN20XQ1N | MN20XQ2N | 00343000 * 18 +-----------+-----------+-----------+-----+-----+ 00344000 * | MN20XQ1E | MN20XQ2E | MN20XWSS | M*1 | M*2 | 00345000 * 20 +-----------+-----------+-----------+-----+-----+ 00346000 * | MN20YTTI | 00347000 * 28 +-----------------------+-----------------------+ 00348000 * | MN20YVTI | 00349000 * 30 +-----------+-----------+-----------+-----------+ 00350000 * | MN202PRI | MN202PRG | MN202APR | MN202REF | 00351000 * 38 +-----------+-----------+-----------+-----------+ 00352000 * | MN202RES | MN202PST | MN202IOC | 00353000 * 40 +-----------+-----------+-----------------------+ 00354000 * | MN202PNC | MN202LIN | 00355000 * 48 +-----------------------+-----------------------+ 00356000 * | MN202CRD | M*3 | 00357100 * 4D +-----------------------+-----+ 00357200 * 00359000 *** MN20X - VM MONITOR SCHEDULE CLASS RECORDS 00360000 SPACE 00361000 MN20XUID DS CL8 USERID BEING ADDED / DROPPED FROM QUEUE 00362000 MN20XNPP DS 1F NO. OF SYSTEM PAGABLE PAGES 00363000 MN20XSWS DS 1F SUM OF WORKING SETS OF IN-Q USERS 00364000 MN20XQ1N DS 1F NO. OF USERS IN Q1 00365000 MN20XQ2N DS 1F NO. OF USERS IN Q2 00366000 MN20XQ1E DS 1H NO. OF USERS ELIGABLE FOR Q1 00367000 MN20XQ2E DS 1H NO. OF USERS ELIGABLE FOR Q2 00368000 MN20XWSS DS 1H USERS NEW PROJECTED WORKING SET SIZE 00369000 MN20XQNM DS 1X M*1 QUEUE BEING ADDED / DROPPED TO / FROM 00370000 MN20XPRC DS 1X CP TRACE TABLE PROCESSOR ID 00371000 MN203LEN EQU *-MN20X LENGTH OF CL 2 CODE 3 RECORD (ADD Q) 00372000 EJECT 00373000 MN20YTTI DS XL8 CURRENT VMTTIME (CP SIMULATION TIME) 00374000 MN20YVTI DS XL8 CURRENT VMVTIME (USER VIRTUAL TIME) 00375000 MN204PRI DS 1F ELIGABLE LIST PRIORITY 00376000 MN204LEN EQU *-MN20X LENGTH OF CL 2 CODE 4 RECORD (DROP Q) 00377000 SPACE 00378000 ORG MN204PRI BACK-UP TO PRIORITY FIELD 00379000 MN202PRI DS 1H DISPATCH PRIORITY 00380000 MN202PGR DS 1H PAGES READ WHILE IN QUEUE 00381000 MN202APR DS 1H SUM OF PAGE READS RES. AT EACH PAGE 00382300 MN202REF DS 1H NO. OF PAGES REFERENCED WHILE IN Q 00383000 MN202RES DS 1H CURRENT NUMBER OF PAGES RESIDENT 00384000 MN202PST DS 1H NO. OF PAGES STOLEN WHILE IN Q 00385000 MN202IOC DS 1F VIRTUAL NON SPOOL SIO COUNT 00386000 MN202PNC DS 1F VIRTUAL CARDS PUNCHED 00387000 MN202LIN DS 1F VIRTUAL LINES PRINTED 00388000 MN202CRD DS 1F VIRTUAL CARDS READ 00389000 MN202LPR DS 1X M*3 LAST PROCESSOR EXECUTED ON 00389100 MN202LEN EQU *-MN20X LEN OF CL 2 CODE 2 REC (ADD ELIG LIST) 00390000 EJECT 00391000 MN400 DSECT 00392000 SPACE 00393000 *** MN400 - VM MONITOR USER CLASS RECORD 00394000 * 00395000 * 0 +-----------------------------------------------+ 00396000 * | MN400UID | 00397000 * 8 +-----------------------------------------------+ 00398000 * | MN400TTI | 00399000 * 10 +-----------------------------------------------+ 00400000 * | MN400VTI | 00401000 * 18 +-----------------------+-----------------------+ 00402000 * | MN400PGR | MN400PGW | 00403000 * 20 +-----------------------+-----------------------+ 00404000 * | MN400IOC | MN400PNC | 00405000 * 28 +-----------------------+-----------------------+ 00406000 * | MN400LIN | MN400CRD | 00407000 * 30 +-----+-----+-----+-----+-----+-----+-----+-----+ 00408000 * | M*1 | M*2 | M*3 | M*4 | M*5 | M*6 | M*7 | M*8 | 00409000 * 38 +-----+-----+-----+-----+-----+-----+-----+-----+ 00410000 * | M*9 | M*10| M*11| M*12| M*13| M*14| MN400RES | 00411000 * 40 +-----+-----+-----+-----+-----+-----+-----------+ 00412000 * | MN400WSS | MN400PDR | MN400PDK | MN400INT | 00413000 * 48 +-----------+-----------+-----------+-----------+ 00414000 * |M*15 | 00414100 * 49 +-----+ 00414200 * 00415000 *** MN400 - VM MONITOR USER CLASS RECORD 00416000 SPACE 00417000 MN400UID DS CL8 USERID 00418000 MN400TTI DS XL8 CURRENT VMTTIME (CP SIMULATION TIME) 00419000 MN400VTI DS XL8 CURRENT VMVTIME (USER VIRTUAL TIME) 00420000 MN400PGR DS 1F TOTAL PAGE READS - THIS USER 00421000 MN400PGW DS 1F TOTAL PAGE WRITES - THIS USER 00422000 MN400IOC DS 1F VIRTUAL NON SPOOLED SIO COUNT 00423000 MN400PNC DS 1F VIRTUAL CARDS PUNCHED 00424000 MN400LIN DS 1F VIRTUAL LINES PRINTED 00425000 MN400CRD DS 1F VIRTUAL CARDS READ 00426000 MN400RST DS 1X M*1 USER RUNNING STATUS 00427000 MN400DST DS 1X M*2 USER DISPATCH STATUS 00428000 MN400OST DS 1X M*3 USER OPERATING STATUS 00429000 MN400QST DS 1X M*4 USER QUEUING STATUS 00430000 MN400PST DS 1X M*5 USER PROCESSING STATUS 00431000 MN400EST DS 1X M*6 USER EXECUTION STATUS 00432000 MN400TST DS 1X M*7 USER TRACING CONTROL STATUS 00433000 MN400MLV DS 1X M*8 USER MESSAGE LEVEL 00434000 MN400QLV DS 1X M*9 USER QUEUE LEVEL 00435000 MN400CLV DS 1X M*10 USER COMMAND LEVEL 00436000 MN400TLV DS 1X M*11 USER TIMER LEVEL 00437000 MN400PND DS 1X M*12 INTERRUPT PENDING STATUS 00438000 MN400UPR DS 1X M*13 DIRECTORY OR 'SET' PRIORITY 00439000 MN4RSV1 DS 1X M*14 RESERVED 00440000 MN400RES DS 1H NO. OF PAGES RESIDENT 00441000 MN400WSS DS 1H ESTIMATED WORKING SET SIZE 00442000 MN400PDR DS 1H DRUM ALLOCATED PAGE FRAMES 00443000 MN400PDK DS 1H DISK ALLOCATED PAGE FRAMES 00444000 MN400INT DS 1H MONITOR SAMPLING INTERVAL (SECS) 00445000 MN400LPR DS 1X M*15 LAST PROCESSOR EXECUTED ON 00445100 MN400LEN EQU *-MN400 LENGTH OF CL 4 CODE 0 RECORD 00446000 EJECT 00447000 MN500 DSECT 00448000 SPACE 00449000 *** MN500 - VM MONITOR INSTSIM CLASS RECORD 00450000 * 00451000 * 0 +-----------------------------------------------+ 00452000 * | MN500UID | 00453000 * 8 +-----------------------+-----------------------+ 00454000 * | MN500INS | MN500VAD | 00455000 * 10 +-----------------------+-----------------------+ 00456000 * | MN500OVH | 00457000 * 18 +-----------------------------------------------+ 00458000 * 00459000 *** MN500 - VM MONITOR INSTSIM CLASS RECORD 00460000 SPACE 00461000 MN500UID DS CL8 USERID 00462000 MN500INS DS 1F PRIVLGED INSTRUCTION 00463000 MN500VAD DS 1F VIRTUAL STORAGE ADDR OF THE INSTRUCTION 00464000 MN500OVH DS XL8 CURRENT TOTAL OF CP SIMULATION TIME 00465000 MN500LEN EQU *-MN500 LENGTH OF CL 4 CODE 0 RECORD 00466000 SPACE 5 00467000 MN600HDR DSECT HEADER PORTION, PRECEEDS DEVICE PKGS 00468000 MN600NUM DS 1H NUMBER OF DEVICE DATA PKGS WHICH FOLLOW 00469000 MN600HLN EQU *-MN600HDR LENGTH OF THE HEADER 00470000 SPACE 2 00471000 MN600DEV DSECT DEVICE PACKAGE, ONE FOR EACH DEVICE 00472000 SPACE 00473000 *** MN600DEV - VM MONITOR DASTAP CLASS DEVICE PORTION 00474000 * 00475000 * 0 +-----------+-----------+-----------------------+ 00476000 * | MN600ADD | MN600TY | MN600SER | 00477000 * 8 +-----------+-----------+-----------+-----------+ 00478000 * | | MN600CNT | 00479000 * E +-----------+-----------------------+ 00480000 * 00481000 *** MN600DEV - VM MONITOR DASTAP CLASS DEVICE PORTION 00482000 SPACE 00483000 MN600ADD DS 1H DEVICE ADDRESS 00484000 MN600TY DS 1H VM/370 DEVICE TYPE/CODES 00485000 MN600SER DS CL6 VOLUME SERIAL NUMBER 00486000 MN600CNT DS XL4 DEVICE ACCUMULATED I/O COUNT 00487000 MN600DLN EQU *-MN600DEV LENTH OF EACH DATA RECORD 00488000 SPACE 00489000 MN600MAX EQU (4096-MNBHDLEN-MNHDRLEN-MN600HLN)/MN600DLN MAX DEV COUNT 00490000 MN600MXS EQU (4096-MNBHDLEN-16-MNHDRLEN-MN600HLN-8)/MN600DLN @VA09588 00490200 ** MAX DEV COUNT ON SPOOLING TIME @VA09588 00490400 EJECT 00491000 MN602HDR DSECT HEADER PORTION, PRECEDES DEV PKGS 00491010 MN602SAM DS 1H NO. SAMPLES FOR INTERVAL 00491020 MN602HLN EQU *-MN602HDR LENGTH OF THE HEADER 00491030 SPACE 2 00491040 MN602DEV DSECT DEVICE PACKAGE, 1 PER DEVICE 00491050 SPACE 00491060 *** MN602DEV - VM MONITOR DASTAP CLASS UTILIZATION RECORD 00491070 * 00491080 * 0 +-----------+-----------+-----------+-----------+ 00491090 * | MN602ADD | MN602CHB | MN602CUB | MN602DEB | 00491100 * 8 +-----------+-----------+-----------+-----------+ 00491110 * | MN602CHQ | MN602CUQ | M*1 | 00491120 * D +-----------+-----------+-----+ 00491130 * 00491140 *** MN602DEV - VM MONITOR DASTAP CLASS I/O UTILIZATION 00491150 SPACE 00491160 MN602ADD DS 1H DEVICE ADDRESS 00491170 MN602CHB DS 1H NO. TIMES CHANNEL BUSY 00491180 MN602CUB DS 1H NO. TIMES CONTROL UNIT BUSY 00491190 MN602DVB DS 1H NO. TIMES DEVICE BUSY 00491200 MN602CHQ DS 1H I/O TASKS QUEUED ON CHANNEL 00491210 MN602CUQ DS 1H I/O TASKS QUEUED ON CONTROL UNIT 00491220 MN602DVQ DS 1X M*1 I/O TASKS QUEUED ON DEVICE 00491230 MN602DLN EQU *-MN602DEV LENGTH OF DEVICE PORTION 00491240 MN700 DSECT 00492000 SPACE 00493000 *** MN700 - VM MONITOR SEEKS CLASS RECORD 00494000 * 00495000 * 0 +-----------------------------------------------+ 00496000 * | MN700UID | 00497000 * 8 +-----------+-----------+-----------+-----+-----+ 00498000 * | MN700ADD | MN700CYL | MN700CCY | M*1 | M*2 | 00499000 * 10 +-----+-----+-----------+-----------+-----+-----+ 00500000 * | M*3 | M*4 | 00501000 * 12 +-----+-----+ 00502000 * 00503000 *** MN700 - VM MONITOR SEEKS CLASS RECORD 00504000 SPACE 00505000 MN700UID DS CL8 USERID 00506000 MN700ADD DS 1H DEVICE ADDRESS 00507000 MN700CYL DS 1H CYLINDER SEEKING TO 00508000 MN700CCY DS 1H CYLINDER CURRENTLY POSITIONED UPON 00509000 MN700QDV DS 1X M*1 I/O TASKS QUEUED ON THE DEVICE 00510000 MN700QCU DS 1X M*2 I/O TASKS QUEUED ON THE CONTROL UNIT 00511000 MN700QCH DS 1X M*3 I/O TASKS QUEUED ON THE CHANNEL 00512000 MN700DIR DS 1X M*4 SEEK DIRECTION 00 = LOWER, 01 = HIGHER 00513000 MN700LEN EQU *-MN700 LENGTH OF CL 7 CODE 0 RECORD 00514000 EJECT 00515000 MN802DEV DSECT HEADER PORTION, PRECEEDS COUNTER PORTION 00516000 MN802NUM DS 1H NO. OF DEVICE BLOCK COUNTERS WHICH FOLLOW 00517000 MN802DLN EQU *-MN802DEV LENGTH OF THE HEADER 00518000 MN802CNT DS XL4 DEVICE I/O COUNT 00519000 SPACE 2 00520000 MN802CTR DSECT COUNTER PORTION 00521000 SPACE 00522000 *** MN802DEV - VM MONITOR SYSPROF CLASS COUNTER PORTION 00523000 * 00524000 * 0 +-----------------------+-----------------------+ 00525000 * | MN802NAU | MN802PGR | 00526000 * 8 +-----------------------+-----------------------+ 00527000 * | MN802PGW | MN802NPP | 00528000 * 10 +-----------------------+-----------------------+ 00529000 * | MN802WID | 00530000 * 18 +-----------------------------------------------+ 00531000 * | MN802WPG | 00532000 * 20 +-----------------------------------------------+ 00533000 * | MN802WIO | 00534000 * 28 +-----------------------------------------------+ 00535000 * | MN802PRB | 00536000 * 30 +-----------------------------------------------+ 00537000 * 00538000 *** MN802DEV - VM MONITOR SYSPROF CLASS COUNTER PORTION 00539000 SPACE 00540000 MN802NAU DS 1F NO. OF LOGGED ON USERS 00541000 MN802PGR DS 1F TOTAL SYSTEM PAGE READS 00542000 MN802PGW DS 1F TOTAL SYSTEM PAGE WRITES 00543000 MN802NPP DS 1F NO. OF SYSTEM PAGABLE PAGES 00544000 MN802WID DS XL8 TOTAL SYSTEM IDLE WAIT TIME 00545000 MN802WPG DS XL8 TOTAL SYSTEM PAGE WAIT TIME 00546000 MN802WIO DS XL8 TOTAL SYSTEM I/O WAIT TIME 00547000 MN802PRB DS XL8 TOTAL SYSTEM PROBLEM TIME 00548000 MN802CLN EQU *-MN802CTR LENGTH OF EACH DATA ENTRY 00549000 EJECT 00550000 POP PRINT @VA04958 00551000 SPACE 00552000