TITLE 'IRARMRMR - SYSTEM RESOURCES MONITOR RESOURCE MANAGEMENT*00001000 T ' 00002000 IRARMRMR CSECT , 0001 00003000 @PROLOG BALR @12,0 0001 00004000 @PSTART DS 0H 0001 00005000 USING @PSTART,@12 0001 00006000 * /* 00007000 ENTRY IRARMRM1 00008000 IRARMRM1 DS 0H 00009000 STM @00,@14,000+000(@13) SAVE INVOKING RTNE REGS 00010000 ST @01,RRPAEPA(,RRPAPTR) INDICATE NEW CURRENT RMEP 00011000 LA @12,IRARMRM1-@PSTART DISPLACEMENT TO MODULE BASE 00012000 LCR @12,@12 NEGATIVE FOR SUBTRACT 00013000 ALR @12,@15 SETUP MODULE ADDRESSABILITY 00014000 * RCVUICC=RCVUICC+MCVSTCRI; /* ACCUMULATE HIGHEST SYSTEM UIC */ 00015000 LH @07,MCVSTCRI(,RMCTPTR) 0043 00016000 AL @07,RCVUICC(,RMCTPTR) 0043 00017000 ST @07,RCVUICC(,RMCTPTR) 0043 00018000 * RCVCPUC=RCVCPUC+CCVUTILP*I256; /* ACCUMULATE RECENT CPU 0044 00019000 * UTILIZATION @ZA29103*/ 00020000 LH @07,CCVUTILP(,RMCTPTR) 0044 00021000 SLA @07,8 0044 00022000 AL @07,RCVCPUC(,RMCTPTR) 0044 00023000 ST @07,RCVCPUC(,RMCTPTR) 0044 00024000 * RCVASMQ=RCVASMQ+(ASMIORQR-ASMIORQC);/* ACCUMULATE ASM QUEUE 0045 00025000 * LENGTH */ 00026000 L @07,CVTPTR 0045 00027000 L @07,ASMVTPTR(,@07) 0045 00028000 L @15,ASMIORQR(,@07) 0045 00029000 SL @15,ASMIORQC(,@07) 0045 00030000 AL @15,RCVASMQ(,RMCTPTR) 0045 00031000 ST @15,RCVASMQ(,RMCTPTR) 0045 00032000 * DO DMDTPTR=RMCTDMDT /* SCAN THE DOMAIN TABLE */ 00033000 * BY LENGTH(DMDT) /* */ 00034000 * TO RMCTDMDE; /* */ 00035000 L DMDTPTR,RMCTDMDT(,RMCTPTR) 0046 00036000 B @DE00046 0046 00037000 @DL00046 DS 0H 0047 00038000 * DMDTRUC=DMDTCMPL+DMDTOUTU+DMDTRUC;/* ACCUMULATE THE NUMBER OF 00039000 * READY USERS FOR EACH DOMAIN */ 00040000 LH @07,DMDTCMPL(,DMDTPTR) 0047 00041000 AH @07,DMDTOUTU(,DMDTPTR) 0047 00042000 AL @07,DMDTRUC(,DMDTPTR) 0047 00043000 ST @07,DMDTRUC(,DMDTPTR) 0047 00044000 * END; 0048 00045000 AL DMDTPTR,@CF01096 0048 00046000 @DE00046 C DMDTPTR,RMCTDMDE(,RMCTPTR) 0048 00047000 BNH @DL00046 0048 00048000 * RCVCTMC=RCVCTMC+I1; /* INCRUMENT SAMPLE COUNTER */ 00049000 LA @07,1 0049 00050000 AH @07,RCVCTMC(,RMCTPTR) 0049 00051000 STH @07,RCVCTMC(,RMCTPTR) 0049 00052000 */* ? IRACTLEP ENN(RM1) */ 00053000 * 0050 00054000 * GEN CODE EXIT NOSEQFLOW; 0050 00055000 * /* 00056000 LM @00,@14,000+000(@13) RELOAD INVOKING RTNE REGS 00057000 BR RTNREG RETURN TO INVOKER 00058000 * 0051 00059000 */********************************************************************/ 00060000 */* */ 00061000 */* ENTRY POINT NAME = IRARMRM2 */ 00062000 */* */ 00063000 */* DESCRIPTIVE NAME = RESOURCE MONITOR MPL ADJUSTMENT PROCESSING */ 00064000 */* */ 00065000 */* FUNCTION = COMPUTE THE AVERAGE SYSTEM RESOURCE UTILIZATION */ 00066000 */* AND DETERMINE IF THE SYSTEM MPL SHOULD BE RAISED */ 00067000 */* OR LOWERED. */ 00068000 */* */ 00069000 */* */ 00070000 */* CALLER = IRARCCTL - SRM CONTROL MODULE */ 00071000 */* TIME QUEUE PROCESSOR */ 00072000 */* */ 00073000 */* INPUT = R2 = RCCT ADDRESS */ 00074000 */* R3 = RRPA ADDRESS */ 00075000 */* */ 00076000 */* OUTPUT = NONE */ 00077000 */* */ 00078000 */********************************************************************/ 00079000 */* ? IRACTLEP EPN(RM2) */ 00080000 * 0051 00081000 * DCL 0051 00082000 * IRARMRM2 ENTRY INT; 0051 00083000 * GEN CODE REFS(RRPAEPA) DEFS(IRARMRM2) NOEXIT SEQFLOW; 0052 00084000 * /* 00085000 ENTRY IRARMRM2 00086000 IRARMRM2 DS 0H 00087000 STM @00,@14,000+000(@13) SAVE INVOKING RTNE REGS 00088000 ST @01,RRPAEPA(,RRPAPTR) INDICATE NEW CURRENT RMEP 00089000 LA @12,IRARMRM2-@PSTART DISPLACEMENT TO MODULE BASE 00090000 LCR @12,@12 NEGATIVE FOR SUBTRACT 00091000 ALR @12,@15 SETUP MODULE ADDRESSABILITY 00092000 * WMSTPTR=RMCTWMST; /* POINT TO CURRENT WMST @ZA18867*/ 00093000 L WMSTPTR,RMCTWMST(,RMCTPTR) 0053 00094000 * OUCBPTR=RMCTINQE->OUCBFWD; /* GET START OF IN QUEUE @ZA18867*/ 00095000 L @07,RMCTINQE(,RMCTPTR) 0054 00096000 L OUCBPTR,OUCBFWD(,@07) 0054 00097000 * DO WHILE OUCBSCN='0'B; /* SCAN TO ITS END @ZA18867*/ 00098000 B @DE00055 0055 00099000 @DL00055 DS 0H 0056 00100000 * IF OUCBATR='1'B& /* IS THERE A TRANSACTION 0056 00101000 * @ZA18867*/ 00102000 * OUCBINC='1'B&OUCBTMW^=I0& /* AND AN INIT. IS ATTACHED 0056 00103000 * @ZA18867*/ 00104000 * RRPATOD-OUCBTMA>RMPTWMET /* AND SERVICE NOT RECENTLY 0056 00105000 * CALCULATED @ZA18867*/ 00106000 * THEN /* THEN CALL WM1 TO UPDATE 0056 00107000 * SERVICE VALUES @ZA18867*/ 00108000 TM OUCBATR(OUCBPTR),B'10000001' 0056 00109000 BNO @RF00056 0056 00110000 L @07,OUCBTMW(,OUCBPTR) 0056 00111000 LTR @07,@07 0056 00112000 BZ @RF00056 0056 00113000 L @07,RRPATOD(,RRPAPTR) 0056 00114000 SL @07,OUCBTMA(,OUCBPTR) 0056 00115000 CL @07,RMPTWMET(,RMCTPTR) 0056 00116000 BNH @RF00056 0056 00117000 */* INVOKE WM1 SUBROUTINE @ZA18867 */ 00118000 */* ? IRACTLCL EPN(WM1) */ 00119000 * 0057 00120000 * CALL RMSBWM1->IRARMRTN; /* INVOKE WM1 SUBRTN */ 00121000 L @15,RMSBWM1(,RMCTPTR) 0057 00122000 BALR @14,@15 0057 00123000 * OUCBPTR=OUCBFWD; /* BUMP TO NEXT IN QUEUE @ZA18867*/ 00124000 @RF00056 L OUCBPTR,OUCBFWD(,OUCBPTR) 0058 00125000 * END; /* @ZA18867*/ 00126000 * 0059 00127000 @DE00055 TM OUCBSCN(OUCBPTR),B'00000001' 0059 00128000 BZ @DL00055 0059 00129000 * /*****************************************************************/ 00130000 * /* */ 00131000 * /* COMPUTE THE AVERAGE SYSTEM RESOURCE UTILIZATION */ 00132000 * /* */ 00133000 * /*****************************************************************/ 00134000 * 0060 00135000 * RCVUICA=RCVUICC/RCVCTMC; /* GET AVERAGE SYSTEM UIC */ 00136000 LH @07,RCVCTMC(,RMCTPTR) 0060 00137000 L @00,RCVUICC(,RMCTPTR) 0060 00138000 SRDA @00,32 0060 00139000 DR @00,@07 0060 00140000 STH @01,RCVUICA(,RMCTPTR) 0060 00141000 * RCVCPUA=RCVCPUC/(RCVCTMC*I16); /* GET AVERAGE CPU UTILIZATION 0061 00142000 * @ZM43098*/ 00143000 LR @15,@07 0061 00144000 SLA @15,4 0061 00145000 L @00,RCVCPUC(,RMCTPTR) 0061 00146000 SRDA @00,32 0061 00147000 DR @00,@15 0061 00148000 STH @01,RCVCPUA(,RMCTPTR) 0061 00149000 * RCVAVQC=MCVAVQC-RCVAVQP; /* GET NUMBER OF AVQ LOWS FOR THE 00150000 * LAST INTERVAL */ 00151000 L @15,MCVAVQC(,RMCTPTR) 0062 00152000 LR @14,@15 0062 00153000 SL @14,RCVAVQP(,RMCTPTR) 0062 00154000 STH @14,RCVAVQC(,RMCTPTR) 0062 00155000 * RCVAVQP=MCVAVQC; /* SAVE BASE AVQ LOW COUNT */ 00156000 ST @15,RCVAVQP(,RMCTPTR) 0063 00157000 * RCVASMQA=RCVASMQ/RCVCTMC; /* GET AVERAGE ASM QUEUE LENGTH */ 00158000 * 0064 00159000 L @00,RCVASMQ(,RMCTPTR) 0064 00160000 SRDA @00,32 0064 00161000 DR @00,@07 0064 00162000 STH @01,RCVASMQA(,RMCTPTR) 0064 00163000 * /*****************************************************************/ 00164000 * /* */ 00165000 * /* COMPUTE THE PAGE FAULT RATE PER SECOND OVER THE LAST INTERVAL */ 00166000 * /* */ 00167000 * /*****************************************************************/ 00168000 * 0065 00169000 * RMTIME=RMCTTOD-RCVBPTTM; /* GET INTERVAL TIME */ 00170000 L @07,RMCTTOD(,RMCTPTR) 0065 00171000 LR @15,@07 0065 00172000 SL @15,RCVBPTTM(,RMCTPTR) 0065 00173000 ST @15,RMTIME 0065 00174000 * RMNEWPT=PVTNPIN+PVTNPREC; /* GET NUMBER OF PAGE FAULTS */ 00175000 L @01,CVTPTR 0066 00176000 L @14,PVTPTR(,@01) 0066 00177000 L @09,PVTNPIN(,@14) 0066 00178000 AL @09,PVTNPREC(,@14) 0066 00179000 ST @09,RMNEWPT 0066 00180000 * RCVPTR=((RMNEWPT-RCVBPTCT)*RMTFMCT)/RMTIME;/* COMPUTE THE PAGE 0067 00181000 * FAULT RATE PER SECOND */ 00182000 LR @00,@09 0067 00183000 SL @00,RCVBPTCT(,RMCTPTR) 0067 00184000 LR @09,@00 0067 00185000 M @08,@CF02132 0067 00186000 DR @08,@15 0067 00187000 STH @09,RCVPTR(,RMCTPTR) 0067 00188000 * RCVBPTCT=RMNEWPT; /* SAVE BASE PAGE FAULT COUNT */ 00189000 L @15,RMNEWPT 0068 00190000 ST @15,RCVBPTCT(,RMCTPTR) 0068 00191000 * RCVBPTTM=RMCTTOD; /* SAVE BASE PAGE FAULT TIME */ 00192000 * 0069 00193000 ST @07,RCVBPTTM(,RMCTPTR) 0069 00194000 * /*****************************************************************/ 00195000 * /* */ 00196000 * /* COMPUTE THE AVERAGE NUMBER OF READY USERS PER DOMAIN */ 00197000 * /* */ 00198000 * /*****************************************************************/ 00199000 * 0070 00200000 * DO DMDTPTR=RMCTDMDT /* SCAN THE DOMAIN TABLE */ 00201000 * BY LENGTH(DMDT) /* */ 00202000 * TO RMCTDMDE; /* */ 00203000 L DMDTPTR,RMCTDMDT(,RMCTPTR) 0070 00204000 B @DE00070 0070 00205000 @DL00070 DS 0H 0071 00206000 * DMDTRUA=(((DMDTRUC+RCVCTMC-1)/RCVCTMC)+DMDTRUA+1)/2;/* GET 0071 00207000 * AVERAGE NUMBER OF READY USERS 00208000 * FOR EACH DOMAIN */ 00209000 LH @07,RCVCTMC(,RMCTPTR) 0071 00210000 L @08,DMDTRUC(,DMDTPTR) 0071 00211000 ALR @08,@07 0071 00212000 BCTR @08,0 0071 00213000 SRDA @08,32 0071 00214000 DR @08,@07 0071 00215000 LR @14,@09 0071 00216000 AH @14,DMDTRUA(,DMDTPTR) 0071 00217000 AL @14,@CF00090 0071 00218000 SRDA @14,32 0071 00219000 D @14,@CF00188 0071 00220000 STH @15,DMDTRUA(,DMDTPTR) 0071 00221000 * DMDTRUC=I0; /* CLEAR THE DOMAIN ACCUMULATOR */ 00222000 SLR @07,@07 0072 00223000 ST @07,DMDTRUC(,DMDTPTR) 0072 00224000 * END; 0073 00225000 AL DMDTPTR,@CF01096 0073 00226000 @DE00070 C DMDTPTR,RMCTDMDE(,RMCTPTR) 0073 00227000 BNH @DL00070 0073 00228000 * RCVUICC=I0; /* CLEAR THE UIC ACCUMULATOR */ 00229000 SLR @07,@07 0074 00230000 ST @07,RCVUICC(,RMCTPTR) 0074 00231000 * RCVCPUC=I0; /* CLEAR THE CPU UTILIZATION 0075 00232000 * ACCUMULATOR */ 00233000 ST @07,RCVCPUC(,RMCTPTR) 0075 00234000 * RCVASMQ=I0; /* CLEAR THE ASM QUEUE LENGTH 0076 00235000 * ACCUMULATOR */ 00236000 ST @07,RCVASMQ(,RMCTPTR) 0076 00237000 * RCVCTMC=I0; /* CLEAR THE SAMPLE COUNTER */ 00238000 * 0077 00239000 STH @07,RCVCTMC(,RMCTPTR) 0077 00240000 * /*****************************************************************/ 00241000 * /* */ 00242000 * /* SCAN THE LCH ENTRIES TO DETERMINE A POSSIBLE CONTENTION ON */ 00243000 * /* LOGICAL CHANNELS. @ZM43083*/ 00244000 * /* */ 00245000 * /*****************************************************************/ 00246000 * 0078 00247000 * RESPECIFY 0078 00248000 * (LCHPTR, 0078 00249000 * RLCTPTR) RESTRICTED; 0078 00250000 * LCHPTR=CVTILCH; /* POINT TO FIRST IOS LCH ENTRY 00251000 * @ZM43083*/ 00252000 L @09,CVTPTR 0079 00253000 L LCHPTR,CVTILCH(,@09) 0079 00254000 * TOTDEFER=I0; /* ZERO UTILIZATION ACCUMULATOR 00255000 * @ZM43083*/ 00256000 SLR @09,@09 0080 00257000 STH @09,TOTDEFER 0080 00258000 * RCVIOUSE='0'B; /* RESTORE LCH CONTENTION 0081 00259000 * INDICATOR @ZM43083*/ 00260000 NI RCVIOUSE,B'01111111' 0081 00261000 * NUMBLCHS=I0; /* ZERO ACTIVE LCH COUNT @ZM43083*/ 00262000 STH @09,NUMBLCHS 0082 00263000 * DO RLCTPTR=RMCTRLCT TO ICCLCLST BY RLCHLEN;/* LOOK AT EACH 0083 00264000 * LOGICAL CHANNEL ENTRY @ZM43083*/ 00265000 L RLCTPTR,RMCTRLCT(,RMCTPTR) 0083 00266000 B @DE00083 0083 00267000 @DL00083 DS 0H 0084 00268000 * IF RLCTUTIL>RCCLCHUT THEN /* IS THIS CHANNEL ABOVE 0084 00269000 * THRESHOLD @ZM43083*/ 00270000 LH @09,RLCTUTIL(,RLCTPTR) 0084 00271000 CH @09,RCCLCHUT(,RMCTPTR) 0084 00272000 BNH @RF00084 0084 00273000 * DO; /* YES DO @ZM43083*/ 00274000 * IF RLCTRQRT>RCCLCHRR THEN /* REQUEST RATE ABOVE LIMIT 0086 00275000 * @ZM43083*/ 00276000 LH @09,RLCTRQRT(,RLCTPTR) 0086 00277000 CH @09,RCCLCHRR(,RMCTPTR) 0086 00278000 BNH @RF00086 0086 00279000 * RCVIOUSE='1'B; /* YES, INDICATION FOR A 0087 00280000 * POTENTIAL LOWERING OF THE MPL 00281000 * @ZM43083*/ 00282000 OI RCVIOUSE,B'10000000' 0087 00283000 * END; 0088 00284000 @RF00086 DS 0H 0089 00285000 * IF RLCTUTIL^=0 THEN /* IF DEFERRED UTILIZATION NOT 0089 00286000 * ZERO @ZM43083*/ 00287000 @RF00084 LH @09,RLCTUTIL(,RLCTPTR) 0089 00288000 LTR @09,@09 0089 00289000 BZ @RF00089 0089 00290000 * DO; /* THEN DO @ZM43083*/ 00291000 * NUMBLCHS=NUMBLCHS+I1; /* NUMBER LCH ACTIVE PLUS ONE 0091 00292000 * @ZM43083*/ 00293000 LH @15,NUMBLCHS 0091 00294000 LA @15,1(,@15) 0091 00295000 STH @15,NUMBLCHS 0091 00296000 * TOTDEFER=TOTDEFER+RLCTUTIL;/* TOTALIZED PERCENTAGE DEFERRED 00297000 * UTILIZATION @ZM43083*/ 00298000 AH @09,TOTDEFER 0092 00299000 STH @09,TOTDEFER 0092 00300000 * END; 0093 00301000 * END; 0094 00302000 @RF00089 AH RLCTPTR,RLCHLEN 0094 00303000 @DE00083 C RLCTPTR,ICCLCLST(,RMCTPTR) 0094 00304000 BNH @DL00083 0094 00305000 * RCVTOTDF=TOTDEFER/MAX(I1,NUMBLCHS);/* COMPUTE AVERAGE PERCENTAGE 00306000 * OF DEFERRED LCH'S UTILIZATION, 00307000 * SYSTEM WIDE @ZM43083*/ 00308000 LH @09,NUMBLCHS 0095 00309000 LA @00,1 0095 00310000 CR @09,@00 0095 00311000 BNL *+6 00312000 LR @09,@00 0095 00313000 LH @14,TOTDEFER 0095 00314000 SRDA @14,32 0095 00315000 DR @14,@09 0095 00316000 STH @15,RCVTOTDF(,RMCTPTR) 0095 00317000 * IF RCVTOTDF>RCCTOTUT THEN 0096 00318000 CH @15,RCCTOTUT(,RMCTPTR) 0096 00319000 BNH @RF00096 0096 00320000 * RCVIOUSE='1'B; /* IF AVERAGE DEFERRED 0097 00321000 * UTILIZATION ABOVE LIMIT - SET 00322000 * INDICATION FOR A POTENTIAL 0097 00323000 * LOWERING OF THE MPL @ZM43083*/ 00324000 OI RCVIOUSE,B'10000000' 0097 00325000 * RESPECIFY 0098 00326000 * (LCHPTR, 0098 00327000 * RLCTPTR) UNRESTRICTED; 0098 00328000 * 0098 00329000 @RF00096 DS 0H 0099 00330000 * /*****************************************************************/ 00331000 * /* */ 00332000 * /* SCAN THE DOMAIN TABLE ENTRIES COMPUTING THE CONTENTION FOR */ 00333000 * /* THOSE DOMAINS THAT CAN HAVE THIER MPLS ADJUSTED */ 00334000 * /* */ 00335000 * /*****************************************************************/ 00336000 * 0099 00337000 * MAXDOM=I0; /* INITIALIZE MAX CONTENTION 0099 00338000 * INDEX */ 00339000 SLR @08,@08 0099 00340000 STH @08,MAXDOM 0099 00341000 * MINDOM=I32767; /* INITIALIZE MINIUM CONTENTION 00342000 * INDEX */ 00343000 MVC MINDOM(2),@CH02126 0100 00344000 * DMPTRMAX=I0; /* CLEAR POINTER TO HIGH 0101 00345000 * CONTENTION DOMAIN */ 00346000 SLR DMPTRMAX,DMPTRMAX 0101 00347000 * DMPTRMIN=I0; /* CLEAR POINTER TO LOW 0102 00348000 * CONTENTION DOMAIN */ 00349000 ST @08,DMPTRMIN 0102 00350000 * DO DMDTPTR=RMCTDMDT /* SCAN THE DOMAIN TABLE */ 00351000 * BY LENGTH(DMDT) /* */ 00352000 * TO RMCTDMDE; /* */ 00353000 L DMDTPTR,RMCTDMDT(,RMCTPTR) 0103 00354000 B @DE00103 0103 00355000 @DL00103 DS 0H 0104 00356000 * IF DMDTRUA>=DMDTMPLT-I1 THEN /* IF THIS DOMAIN IS USED 0104 00357000 * @ZM43082*/ 00358000 LH @08,DMDTRUA(,DMDTPTR) 0104 00359000 LH @07,DMDTMPLT(,DMDTPTR) 0104 00360000 LR @00,@07 0104 00361000 BCTR @00,0 0104 00362000 CR @08,@00 0104 00363000 BL @RF00104 0104 00364000 * DO; 0105 00365000 * 0105 00366000 * /***********************************************************/ 00367000 * /* */ 00368000 * /* CALCULATE DOMAIN CONTENTION INDEX */ 00369000 * /* */ 00370000 * /***********************************************************/ 00371000 * 0106 00372000 * RCVTMM=DMDTRUA*DMDTWT/ /* CALCULATE DOMAIN */ 00373000 * MAX(DMDTMPLT,I1); /* CONTENTION INDEX */ 00374000 SLR @15,@15 0106 00375000 IC @15,DMDTWT(,DMDTPTR) 0106 00376000 MR @14,@08 0106 00377000 LA @14,1 0106 00378000 CR @14,@07 0106 00379000 BNL *+6 00380000 LR @14,@07 0106 00381000 LR @00,@15 0106 00382000 SRDA @00,32 0106 00383000 DR @00,@14 0106 00384000 ST @01,RCVTMM 0106 00385000 * IF RCVTMM>MAXDOM /* IS THIS THE HIGHEST CONTENTION*/ 00386000 * &DMDTRUA>=DMDTMPLT /* USERS READY @ZM43091*/ 00387000 * &DMDTMPLTDMDTLO THEN /* AND NOT AT MINIMUM MPL */ 00404000 @RF00107 L @08,RCVTMM 0112 00405000 CH @08,MINDOM 0112 00406000 BNL @RF00112 0112 00407000 LH @07,DMDTMPLT(,DMDTPTR) 0112 00408000 SLR @15,@15 0112 00409000 IC @15,DMDTLO(,DMDTPTR) 0112 00410000 CR @07,@15 0112 00411000 BNH @RF00112 0112 00412000 * DO; 0113 00413000 * DMPTRMIN=DMDTPTR; /* SAVE PTR TO DOMAIN TABLE ENTRY*/ 00414000 ST DMDTPTR,DMPTRMIN 0114 00415000 * MINDOM=RCVTMM; /* SAVE CONTENTION INDEX */ 00416000 STH @08,MINDOM 0115 00417000 * END; 0116 00418000 * END; 0117 00419000 * ELSE 0118 00420000 * 0118 00421000 * /*************************************************************/ 00422000 * /* */ 00423000 * /* LOWER THE TARGET MPL FOR THOSE DOMAINS THAT NOT BEEN FULLY*/ 00424000 * /* UTILIZATED DURING THE LAST INTERVAL */ 00425000 * /* */ 00426000 * /*************************************************************/ 00427000 * 0118 00428000 * DMDTMPLT=MAX(I1, /* SET MPL TO ONE */ 00429000 * DMDTLO, /* OR MINIUM MPL */ 00430000 * (DMDTMPLT-I1)); /* OR TARGET MPL MINUS ONE */ 00431000 B @RC00104 0118 00432000 @RF00104 SLR @08,@08 0118 00433000 IC @08,DMDTLO(,DMDTPTR) 0118 00434000 LA @07,1 0118 00435000 CR @08,@07 0118 00436000 BNL *+6 00437000 LR @08,@07 0118 00438000 LH @07,DMDTMPLT(,DMDTPTR) 0118 00439000 BCTR @07,0 0118 00440000 CR @08,@07 0118 00441000 BNL *+6 00442000 LR @08,@07 0118 00443000 STH @08,DMDTMPLT(,DMDTPTR) 0118 00444000 * END; 0119 00445000 @RC00104 AL DMDTPTR,@CF01096 0119 00446000 @DE00103 C DMDTPTR,RMCTDMDE(,RMCTPTR) 0119 00447000 BNH @DL00103 0119 00448000 * 0120 00449000 * /*****************************************************************/ 00450000 * /* */ 00451000 * /* DETERMINE IF THE SYSTEM MPL SHOULD BE RAISED OR LOWERED */ 00452000 * /* */ 00453000 * /*****************************************************************/ 00454000 * 0120 00455000 * IF RCVUICA>RCCUICTH& /* IF UIC GREATER THAN HIGH */ 00456000 * RCVCPUARCCCPUTH| /* AND CPU OVER UTILIZED */ 00499000 * RCVASMQA>RCCASMTH| /* OR ASM BACKED UP */ 00500000 * RCVPTR>RCCPTRTH| /* OR PAGE FAULT RATE HIGH */ 00501000 * (RCVIOUSE='1'B&RCVCPUAMINDOM THEN /* AND HIGH GREATER THAN LOWER */ 00557000 B @RC00125 0130 00558000 @RF00125 SLR @08,@08 0130 00559000 CR DMPTRMAX,@08 0130 00560000 BE @RF00130 0130 00561000 L @07,DMPTRMIN 0130 00562000 CR @07,@08 0130 00563000 BE @RF00130 0130 00564000 LH @08,MAXDOM 0130 00565000 CH @08,MINDOM 0130 00566000 BNH @RF00130 0130 00567000 * DO; 0131 00568000 * DMDTPTR=DMPTRMAX; /* POINT TO HIGH CONTENTION 0132 00569000 * DOMAIN */ 00570000 LR DMDTPTR,DMPTRMAX 0132 00571000 * DMDTMPLT=DMDTMPLT+I1; /* INCREASE TARGET MPL */ 00572000 LA @15,1 0133 00573000 AH @15,DMDTMPLT(,DMDTPTR) 0133 00574000 STH @15,DMDTMPLT(,DMDTPTR) 0133 00575000 * DMDTPTR=DMPTRMIN; /* POINT TO LOW CONTENTION DOMAIN*/ 00576000 LR DMDTPTR,@07 0134 00577000 * DMDTMPLT=DMDTMPLT-I1; /* DECREASE TARGET MPL */ 00578000 LH @07,DMDTMPLT(,DMDTPTR) 0135 00579000 BCTR @07,0 0135 00580000 STH @07,DMDTMPLT(,DMDTPTR) 0135 00581000 * END; 0136 00582000 * 0136 00583000 */* ? IRACTLEP ENN(RM2) */ 00584000 * 0137 00585000 * GEN CODE EXIT NOSEQFLOW; 0137 00586000 @RF00130 DS 0H 0137 00587000 @RC00125 DS 0H 0137 00588000 @RC00120 DS 0H 0137 00589000 * /* 00590000 LM @00,@14,000+000(@13) RELOAD INVOKING RTNE REGS 00591000 BR RTNREG RETURN TO INVOKER 00592000 * END IRARMRMR 0138 00593000 * 0138 00594000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00595000 */*%INCLUDE SYSUT5 (IRASTCOM) */ 00596000 */*%INCLUDE SYSLIB (IRAREGS ) */ 00597000 */*%INCLUDE SYSLIB (IRACNSMP) */ 00598000 */*%INCLUDE SYSLIB (IRARMCT ) */ 00599000 */*%INCLUDE SYSLIB (IRACCT ) */ 00600000 */*%INCLUDE SYSLIB (IRAICT ) */ 00601000 */*%INCLUDE SYSLIB (IRAMCT ) */ 00602000 */*%INCLUDE SYSLIB (IRARCT ) */ 00603000 */*%INCLUDE SYSLIB (IRARMPT ) */ 00604000 */*%INCLUDE SYSLIB (IRARMCA ) */ 00605000 */*%INCLUDE SYSLIB (IRARMEX ) */ 00606000 */*%INCLUDE SYSLIB (IRARMSB ) */ 00607000 */*%INCLUDE SYSLIB (IRAEPAT ) */ 00608000 */*%INCLUDE SYSLIB (IRAEPDT ) */ 00609000 */*%INCLUDE SYSLIB (IRAEPST ) */ 00610000 */*%INCLUDE SYSLIB (IRARRPA ) */ 00611000 */*%INCLUDE SYSLIB (IHAASCB ) */ 00612000 */*%INCLUDE SYSLIB (IRAOUCB ) */ 00613000 */*%INCLUDE SYSLIB (IHAOUXB ) */ 00614000 */*%INCLUDE SYSLIB (IRARMEP ) */ 00615000 */*%INCLUDE SYSLIB (IRADMDT ) */ 00616000 */*%INCLUDE SYSLIB (IHAPVT ) */ 00617000 */*%INCLUDE SYSLIB (ILRASMVT) */ 00618000 */*%INCLUDE SYSLIB (IHAPSA ) */ 00619000 */*%INCLUDE SYSLIB (CVT ) */ 00620000 */*%INCLUDE SYSLIB (IRARLCT ) */ 00621000 */*%INCLUDE SYSLIB (IRAWMST ) */ 00622000 */*%INCLUDE SYSUT5 (IRARMSWA) */ 00623000 */*%INCLUDE SYSUT5 (IRARMRM1) */ 00624000 */*%INCLUDE SYSUT5 (IRARMRM2) */ 00625000 * 0138 00626000 * ; 0138 00627000 @DATA DS 0H 00628000 @CH02126 DC H'32767' 00629000 DS 0F 00630000 DS 0F 00631000 @CF00090 DC F'1' 00632000 @CF00188 DC F'2' 00633000 @CF01096 DC F'20' 00634000 @CF02132 DC F'974' 00635000 DS 0D 00636000 DMPTRMIN DS F 00637000 RCVTMM DC F'0' 00638000 RMTIME DC F'0' 00639000 RMNEWPT DC F'0' 00640000 RLCHLEN DC AL2(36) 00641000 TOTDEFER DC H'0' 00642000 NUMBLCHS DC H'0' 00643000 MAXDOM DS H 00644000 MINDOM DS H 00645000 RCVFLAGS DS BL1 00646000 ORG RCVFLAGS 00647000 RCVIOUSE DS BL1 00648000 RCVRESRV EQU RCVFLAGS+0 00649000 ORG RCVFLAGS+1 00650000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00651000 @01 EQU 01 00652000 @02 EQU 02 00653000 @03 EQU 03 00654000 @04 EQU 04 00655000 @05 EQU 05 00656000 @06 EQU 06 00657000 @07 EQU 07 00658000 @08 EQU 08 00659000 @09 EQU 09 00660000 @10 EQU 10 00661000 @11 EQU 11 00662000 @12 EQU 12 00663000 @13 EQU 13 00664000 @14 EQU 14 00665000 @15 EQU 15 00666000 DMPTRMAX EQU @09 00667000 R0 EQU @00 00668000 R1 EQU @01 00669000 RMCTPTR EQU @02 00670000 RRPAPTR EQU @03 00671000 OUCBPTR EQU @04 00672000 ASCBPTR EQU @05 00673000 OUXBPTR EQU @06 00674000 SVEREG EQU @13 00675000 RTNREG EQU @14 00676000 NTRREG EQU @15 00677000 RTNCOD EQU @15 00678000 DMDTPTR EQU @11 00679000 RLCTPTR EQU @08 00680000 WMSTPTR EQU @10 00681000 LCHPTR EQU @07 00682000 PSA EQU 0 00683000 FLCRNPSW EQU PSA 00684000 FLCROPSW EQU PSA+8 00685000 FLCICCW2 EQU PSA+16 00686000 FLCCVT EQU FLCICCW2 00687000 PSAEEPSW EQU PSA+132 00688000 PSAESPSW EQU PSA+136 00689000 FLCSVILC EQU PSAESPSW+1 00690000 PSAEPPSW EQU PSA+140 00691000 FLCPIILC EQU PSAEPPSW+1 00692000 FLCPICOD EQU PSAEPPSW+2 00693000 PSAPICOD EQU FLCPICOD+1 00694000 FLCTEA EQU PSAEPPSW+4 00695000 FLCPER EQU PSA+152 00696000 FLCMCLA EQU PSA+168 00697000 FLCIOEL EQU FLCMCLA+4 00698000 FLCIOA EQU FLCMCLA+16 00699000 FLCFSA EQU FLCMCLA+80 00700000 PSASUPER EQU PSA+552 00701000 PSASUP1 EQU PSASUPER 00702000 PSASUP2 EQU PSASUPER+1 00703000 PSASUP3 EQU PSASUPER+2 00704000 PSASUP4 EQU PSASUPER+3 00705000 PSACLHT EQU PSA+640 00706000 PSALKSA EQU PSA+696 00707000 PSAHLHI EQU PSA+760 00708000 PSADSSFL EQU PSA+836 00709000 PSADSSF1 EQU PSADSSFL 00710000 PSADSSF3 EQU PSADSSFL+2 00711000 PSADSSF4 EQU PSADSSFL+3 00712000 PSARSVT EQU PSA+896 00713000 IRARMRTN EQU 0 00714000 RMCT EQU 0 00715000 RMCTWMST EQU RMCT+24 00716000 RMCTRLCT EQU RMCT+28 00717000 RMCTINQE EQU RMCT+112 00718000 RMCTTOD EQU RMCT+124 00719000 RMCTFLGS EQU RMCT+148 00720000 RMCTDMDT EQU RMCT+180 00721000 RMCTDMDE EQU RMCT+184 00722000 CCT EQU RMCT+192 00723000 CCVUTILP EQU CCT+110 00724000 CCTFLG1 EQU CCT+124 00725000 ICT EQU RMCT+320 00726000 ICCLCLST EQU ICT+20 00727000 ICTFLAGS EQU ICT+84 00728000 MCT EQU RMCT+408 00729000 MCVSTCRI EQU MCT+56 00730000 MCVAVQC EQU MCT+60 00731000 MCTSFLGS EQU MCT+64 00732000 MCTOFLGS EQU MCT+65 00733000 RCT EQU RMCT+504 00734000 RCCUICTL EQU RCT+4 00735000 RCCUICTH EQU RCT+6 00736000 RCCCPUTL EQU RCT+8 00737000 RCCCPUTH EQU RCT+10 00738000 RCCPTRTL EQU RCT+12 00739000 RCCPTRTH EQU RCT+14 00740000 RCCASMTL EQU RCT+16 00741000 RCCASMTH EQU RCT+18 00742000 RCCTOTUT EQU RCT+20 00743000 RCCLCHUT EQU RCT+22 00744000 RCCLCHRR EQU RCT+24 00745000 RCVCTMC EQU RCT+36 00746000 RCVUICA EQU RCT+38 00747000 RCVCPUA EQU RCT+40 00748000 RCVAVQC EQU RCT+42 00749000 RCVASMQA EQU RCT+44 00750000 RCVPTR EQU RCT+46 00751000 RCVUICC EQU RCT+48 00752000 RCVCPUC EQU RCT+52 00753000 RCVAVQP EQU RCT+56 00754000 RCVASMQ EQU RCT+60 00755000 RCVBPTCT EQU RCT+64 00756000 RCVBPTTM EQU RCT+68 00757000 RCVTOTDF EQU RCT+72 00758000 RMPT EQU RMCT+592 00759000 RMPTWMET EQU RMPT+48 00760000 RMCA EQU RMCT+664 00761000 RMCAFLGS EQU RMCA+36 00762000 RMCASRC EQU RMCA+124 00763000 RMEX EQU RMCT+832 00764000 RMEPBEVT EQU RMEX 00765000 RMEPBCTL EQU RMEX+16 00766000 RMSB EQU RMCT+896 00767000 RMSBWM1 EQU RMSB+52 00768000 EPAT EQU RMCT+1016 00769000 EPDT EQU RMCT+1416 00770000 EPST EQU RMCT+1512 00771000 RMEPBWM3 EQU EPST 00772000 RMEPBIL3 EQU EPST+16 00773000 RMEPBCL3 EQU EPST+32 00774000 RMEPBCSO EQU EPST+48 00775000 RMEPBCSI EQU EPST+64 00776000 RRPA EQU 0 00777000 RRPAINC EQU RRPA 00778000 RRPAVPGN EQU RRPAINC+2 00779000 RRPAFLG0 EQU RRPAVPGN 00780000 RRPAINP EQU RRPA+4 00781000 RRPAFLG EQU RRPA+8 00782000 RRPATOD EQU RRPA+12 00783000 RRPAINS EQU RRPA+16 00784000 RRPAEPA EQU RRPA+20 00785000 ASCB EQU 0 00786000 ASCBSUPC EQU ASCB+16 00787000 ASCBRSM EQU ASCB+52 00788000 ASCBRSMF EQU ASCBRSM 00789000 ASCBFW1 EQU ASCB+100 00790000 ASCBRCTF EQU ASCBFW1+2 00791000 ASCBFLG1 EQU ASCBFW1+3 00792000 ASCBDSP1 EQU ASCB+114 00793000 ASCBFLG2 EQU ASCB+115 00794000 ASCBLKGP EQU ASCB+128 00795000 ASCBSRQ EQU ASCB+180 00796000 ASCBSRQ1 EQU ASCBSRQ 00797000 ASCBSRQ2 EQU ASCBSRQ+1 00798000 ASCBSRQ3 EQU ASCBSRQ+2 00799000 ASCBSRQ4 EQU ASCBSRQ+3 00800000 OUCB EQU 0 00801000 OUCBFWD EQU OUCB+4 00802000 OUCBTMA EQU OUCB+12 00803000 OUCBQFL EQU OUCB+16 00804000 OUCBSFL EQU OUCB+17 00805000 OUCBSCN EQU OUCBSFL 00806000 OUCBYFL EQU OUCB+18 00807000 OUCBAFL EQU OUCB+19 00808000 OUCBTFL EQU OUCB+20 00809000 OUCBATR EQU OUCBTFL 00810000 OUCBINC EQU OUCBTFL 00811000 OUCBEFL EQU OUCB+21 00812000 OUCBUFL EQU OUCB+23 00813000 OUCBTMW EQU OUCB+48 00814000 OUCBCSW EQU OUCB+84 00815000 OUCBCFL EQU OUCBCSW+2 00816000 OUCBPSS EQU OUCB+112 00817000 OUXB EQU 0 00818000 RMEP EQU 0 00819000 RMEPEPB EQU RMEP 00820000 RMEPFLG EQU RMEPEPB+8 00821000 RMEPSCH EQU RMEP+16 00822000 DMDT EQU 0 00823000 DMDTLO EQU DMDT+1 00824000 DMDTHI EQU DMDT+2 00825000 DMDTWT EQU DMDT+3 00826000 DMDTMPLT EQU DMDT+4 00827000 DMDTRUA EQU DMDT+6 00828000 DMDTCMPL EQU DMDT+10 00829000 DMDTOUTU EQU DMDT+12 00830000 DMDTRUC EQU DMDT+16 00831000 PVT EQU 0 00832000 PVTFLAG1 EQU PVT 00833000 PVTFLAG2 EQU PVT+1 00834000 PVTNPIN EQU PVT+248 00835000 PVTNPREC EQU PVT+276 00836000 PVTQS EQU PVT+304 00837000 PVTWSAX EQU PVT+344 00838000 ASMVT EQU 0 00839000 ASMFLAG1 EQU ASMVT 00840000 ASMFLAG2 EQU ASMVT+1 00841000 ASMSTAGQ EQU ASMVT+32 00842000 ASMIORQR EQU ASMVT+40 00843000 ASMIORQC EQU ASMVT+44 00844000 ASMPCCWQ EQU ASMVT+64 00845000 ASMLSAI EQU ASMVT+144 00846000 ASMGOSQS EQU ASMVT+152 00847000 ASMWKSA1 EQU ASMVT+368 00848000 ASMWKSA2 EQU ASMVT+448 00849000 ASMWKSA3 EQU ASMVT+528 00850000 ASMWKSA4 EQU ASMVT+608 00851000 ASMWKSA5 EQU ASMVT+688 00852000 ASMPOOLS EQU 0 00853000 ASMCPAVQ EQU ASMPOOLS+8 00854000 ASMCPRSQ EQU ASMPOOLS+16 00855000 CVTMAP EQU 0 00856000 CVTDAR EQU CVTMAP+72 00857000 CVTFLGS1 EQU CVTDAR 00858000 CVTDCB EQU CVTMAP+116 00859000 CVTIOQET EQU CVTMAP+120 00860000 CVTILCH EQU CVTMAP+140 00861000 CVTIERLC EQU CVTMAP+144 00862000 CVTHEAD EQU CVTMAP+160 00863000 CVTSV76C EQU CVTHEAD 00864000 CVTOPTA EQU CVTMAP+182 00865000 CVTOPTB EQU CVTMAP+183 00866000 CVTGTF EQU CVTMAP+236 00867000 CVTGTFST EQU CVTGTF 00868000 CVTGTFS EQU CVTGTFST 00869000 CVTSTATE EQU CVTGTFST 00870000 CVTTMODE EQU CVTGTFST 00871000 CVTFORM EQU CVTGTFST 00872000 CVTAQAVT EQU CVTMAP+240 00873000 CVTTCMFG EQU CVTAQAVT 00874000 CVTVOLM2 EQU CVTMAP+244 00875000 CVTTATA EQU CVTVOLM2 00876000 CVTTSKS EQU CVTTATA 00877000 CVTVOLF2 EQU CVTTSKS 00878000 CVTTAT EQU CVTTATA+1 00879000 CVTATER EQU CVTMAP+248 00880000 CVTEXT1 EQU CVTMAP+252 00881000 CVTPURG EQU CVTMAP+260 00882000 CVTQMSG EQU CVTMAP+268 00883000 CVTDMSR EQU CVTMAP+272 00884000 CVTRSV37 EQU CVTDMSR 00885000 CVTDMSRF EQU CVTRSV37 00886000 CVTERPV EQU CVTMAP+316 00887000 CVTINTLA EQU CVTMAP+320 00888000 CVTAPF EQU CVTMAP+324 00889000 CVTEXT2 EQU CVTMAP+328 00890000 CVTHJES EQU CVTMAP+332 00891000 CVTPGSIA EQU CVTMAP+348 00892000 CVTA1F1 EQU CVTMAP+356 00893000 CVTSYSK EQU CVTMAP+357 00894000 CVTVOLM1 EQU CVTMAP+380 00895000 CVTVOLF1 EQU CVTVOLM1 00896000 CVTATMCT EQU CVTMAP+388 00897000 CVTXTNT1 EQU 0 00898000 CVTXTNT2 EQU 0 00899000 CVTDSSV EQU CVTXTNT2 00900000 CVTFLGBT EQU CVTXTNT2+5 00901000 CVTQID EQU CVTXTNT2+24 00902000 CVTRV400 EQU CVTXTNT2+52 00903000 CVTRV409 EQU CVTXTNT2+53 00904000 CVTATCVT EQU CVTXTNT2+64 00905000 CVTRV429 EQU CVTXTNT2+84 00906000 CVTRV438 EQU CVTXTNT2+85 00907000 CVTRV457 EQU CVTXTNT2+112 00908000 CVTRV466 EQU CVTXTNT2+113 00909000 CVTFIX EQU 0 00910000 CVTRELNO EQU CVTFIX+252 00911000 RLCT EQU 0 00912000 RLCTUTIL EQU RLCT+26 00913000 RLCTRQRT EQU RLCT+30 00914000 RLCTFLGS EQU RLCT+34 00915000 WMST EQU 0 00916000 IRARMNTR EQU 0 00917000 RMEPPTR EQU RRPAEPA 00918000 CVTS01 EQU CVTPGSIA 00919000 CVTPVTP EQU CVTS01+8 00920000 CVTLPDIA EQU CVTS01+12 00921000 CVTDIRST EQU CVTLPDIA 00922000 CVTSLIDA EQU CVTS01+24 00923000 CVTCTLFG EQU CVTS01+50 00924000 CVTASMVT EQU CVTS01+356 00925000 CVTRV210 EQU CVTS01+424 00926000 CVTRV219 EQU CVTS01+425 00927000 CVTRV228 EQU CVTS01+426 00928000 CVTRV237 EQU CVTS01+427 00929000 CVTMFRTR EQU CVTS01+452 00930000 CVTRV262 EQU CVTS01+468 00931000 CVTRV271 EQU CVTS01+469 00932000 CVTRV280 EQU CVTS01+470 00933000 CVTRV289 EQU CVTS01+471 00934000 CVTGSDA EQU CVTS01+600 00935000 PVTPTR EQU CVTPVTP 00936000 ASMVTPTR EQU CVTASMVT 00937000 ASM1WKSV EQU ASMWKSA1 00938000 ASM1RGSV EQU ASM1WKSV 00939000 ASM1WRKA EQU ASM1WKSV+60 00940000 ASM2WKSV EQU ASMWKSA2 00941000 ASM2WRKA EQU ASM2WKSV+52 00942000 ASM2FLGS EQU ASM2WRKA+12 00943000 ASM3WKSV EQU ASMWKSA3 00944000 ASM4WKSV EQU ASMWKSA4 00945000 ASM4RGSV EQU ASM4WKSV 00946000 ASM5WKSV EQU ASMWKSA5 00947000 ASM5RGSV EQU ASM5WKSV 00948000 PSARSVTE EQU PSARSVT 00949000 CVTPTR EQU FLCCVT 00950000 FLC EQU PSA 00951000 PCPTR EQU CVTASMVT 00952000 AGO .@UNREFD START UNREFERENCED COMPONENTS 00953000 PSARSAV EQU PSARSVTE+60 00954000 PSARSTK EQU PSARSVTE+56 00955000 PSAESAV3 EQU PSARSVTE+52 00956000 PSAESTK3 EQU PSARSVTE+48 00957000 PSAESAV2 EQU PSARSVTE+44 00958000 PSAESTK2 EQU PSARSVTE+40 00959000 PSAESAV1 EQU PSARSVTE+36 00960000 PSAESTK1 EQU PSARSVTE+32 00961000 PSAPSAV EQU PSARSVTE+28 00962000 PSAPSTK EQU PSARSVTE+24 00963000 PSAMSAV EQU PSARSVTE+20 00964000 PSAMSTK EQU PSARSVTE+16 00965000 PSASSAV EQU PSARSVTE+12 00966000 PSASSTK EQU PSARSVTE+8 00967000 PSANSTK EQU PSARSVTE+4 00968000 PSACSTK EQU PSARSVTE 00969000 ASM5FLGS EQU ASM5WKSV+64 00970000 ASM5AIA EQU ASM5WKSV+60 00971000 ASM5GCTR EQU ASM5WKSV+56 00972000 ASM5SR14 EQU ASM5WKSV+52 00973000 @NM00007 EQU ASM5RGSV+4 00974000 ASM5RG2 EQU ASM5RGSV 00975000 @NM00006 EQU ASM4RGSV+4 00976000 ASM4RG2 EQU ASM4RGSV 00977000 ASM3SR13 EQU ASM3WKSV+28 00978000 ASM3R14B EQU ASM3WKSV+24 00979000 ASM3R14A EQU ASM3WKSV+20 00980000 ASM3GRPA EQU ASM3WKSV+16 00981000 ASM3TMPA EQU ASM3WKSV+12 00982000 ASM3PIOP EQU ASM3WKSV+8 00983000 ASM3GENQ EQU ASM3WKSV+4 00984000 ASM3SWPQ EQU ASM3WKSV 00985000 ASM2SR14 EQU ASM2WRKA+16 00986000 @NM00005 EQU ASM2WRKA+13 00987000 ASM2WFLG EQU ASM2FLGS 00988000 ASM2RFLG EQU ASM2FLGS 00989000 ASM2DUPQ EQU ASM2WRKA+8 00990000 ASM2CAQ EQU ASM2WRKA+4 00991000 ASM2PAQ EQU ASM2WRKA 00992000 ASM2RGSV EQU ASM2WKSV 00993000 ASM1NXTA EQU ASM1WRKA+4 00994000 ASM1ASCB EQU ASM1WRKA 00995000 ASM1RG15 EQU ASM1RGSV+56 00996000 @NM00004 EQU ASM1RGSV+4 00997000 ASM1RG1 EQU ASM1RGSV 00998000 CVTRV628 EQU CVTS01+728 00999000 CVTRV627 EQU CVTS01+724 01000000 CVTRV626 EQU CVTS01+720 01001000 CVTRV625 EQU CVTS01+716 01002000 CVTRV624 EQU CVTS01+712 01003000 CVTRV623 EQU CVTS01+708 01004000 CVTRV622 EQU CVTS01+704 01005000 CVTRV621 EQU CVTS01+700 01006000 CVTIHASU EQU CVTS01+696 01007000 CVTSUSP EQU CVTS01+692 01008000 CVTT6SVC EQU CVTS01+688 01009000 CVTCDAL EQU CVTS01+684 01010000 CVTTCTL EQU CVTS01+680 01011000 CVTRSUME EQU CVTS01+676 01012000 CVTJTERM EQU CVTS01+672 01013000 CVTASMRM EQU CVTS01+668 01014000 CVTTCASP EQU CVTS01+664 01015000 CVT0PT03 EQU CVTS01+660 01016000 CVT0PT0E EQU CVTS01+656 01017000 CVTRV609 EQU CVTS01+652 01018000 CVTCGK EQU CVTS01+648 01019000 CVTRAC EQU CVTS01+644 01020000 CVTHSM EQU CVTS01+640 01021000 CVTRV605 EQU CVTS01+636 01022000 CVTRV604 EQU CVTS01+632 01023000 CVTEFF02 EQU CVTS01+628 01024000 CVTCBBR EQU CVTS01+624 01025000 CVTSSCR EQU CVTS01+620 01026000 CVTEVENT EQU CVTS01+616 01027000 CVTCRCA EQU CVTS01+612 01028000 CVTTPIO EQU CVTS01+608 01029000 CVTADV EQU CVTS01+604 01030000 CVTGSDAB EQU CVTGSDA 01031000 CVTQV3 EQU CVTS01+596 01032000 CVTQV2 EQU CVTS01+592 01033000 CVTQV1 EQU CVTS01+588 01034000 CVTRPT EQU CVTS01+584 01035000 CVTSSRB EQU CVTS01+580 01036000 CVTCSDRL EQU CVTS01+576 01037000 CVTEXP1 EQU CVTS01+572 01038000 CVTRMPMT EQU CVTS01+568 01039000 CVTRMPTT EQU CVTS01+564 01040000 CVTVPSA EQU CVTS01+560 01041000 CVTVSTOP EQU CVTS01+556 01042000 CVTGTFR8 EQU CVTS01+552 01043000 CVTQUIT EQU CVTS01+548 01044000 CVTVACR EQU CVTS01+544 01045000 CVTWTCB EQU CVTS01+540 01046000 CVTSTPRS EQU CVTS01+536 01047000 CVT0PT02 EQU CVTS01+532 01048000 CVTDARCM EQU CVTS01+528 01049000 CVTIRECM EQU CVTS01+524 01050000 CVTJRECM EQU CVTS01+520 01051000 CVTVEMS0 EQU CVTS01+516 01052000 CVTSPFRR EQU CVTS01+512 01053000 CVTRLSTG EQU CVTS01+508 01054000 CVT0TC0A EQU CVTS01+504 01055000 CVTGMBR EQU CVTS01+500 01056000 CVTLFRM EQU CVTS01+496 01057000 CVTRMBR EQU CVTS01+492 01058000 CVTVIOP EQU CVTS01+488 01059000 CVTRV307 EQU CVTS01+486 01060000 CVTRV306 EQU CVTS01+484 01061000 CVTRV305 EQU CVTS01+482 01062000 CVTRV304 EQU CVTS01+480 01063000 CVTRV303 EQU CVTS01+478 01064000 CVTRV302 EQU CVTS01+476 01065000 CVTTRCA EQU CVTS01+472 01066000 CVTRV297 EQU CVTRV289 01067000 CVTRV296 EQU CVTRV289 01068000 CVTRV295 EQU CVTRV289 01069000 CVTRV294 EQU CVTRV289 01070000 CVTRV293 EQU CVTRV289 01071000 CVTRV292 EQU CVTRV289 01072000 CVTRV291 EQU CVTRV289 01073000 CVTRV290 EQU CVTRV289 01074000 CVTRV288 EQU CVTRV280 01075000 CVTRV287 EQU CVTRV280 01076000 CVTRV286 EQU CVTRV280 01077000 CVTRV285 EQU CVTRV280 01078000 CVTRV284 EQU CVTRV280 01079000 CVTRV283 EQU CVTRV280 01080000 CVTRV282 EQU CVTRV280 01081000 CVTRV281 EQU CVTRV280 01082000 CVTRV279 EQU CVTRV271 01083000 CVTRV278 EQU CVTRV271 01084000 CVTRV277 EQU CVTRV271 01085000 CVTRV276 EQU CVTRV271 01086000 CVTRV275 EQU CVTRV271 01087000 CVTRV274 EQU CVTRV271 01088000 CVTRV273 EQU CVTRV271 01089000 CVTRV272 EQU CVTRV271 01090000 CVTRV270 EQU CVTRV262 01091000 CVTRV269 EQU CVTRV262 01092000 CVTRV268 EQU CVTRV262 01093000 CVTRV267 EQU CVTRV262 01094000 CVTRV266 EQU CVTRV262 01095000 CVTRV265 EQU CVTRV262 01096000 CVTRV264 EQU CVTRV262 01097000 CVTRV263 EQU CVTRV262 01098000 CVTVFP EQU CVTS01+464 01099000 CVTVSI EQU CVTS01+460 01100000 CVTVPSIB EQU CVTS01+456 01101000 CVTMFACT EQU CVTMFRTR 01102000 CVTMFCTL EQU CVTS01+448 01103000 CVTPVBP EQU CVTS01+444 01104000 CVTPWI EQU CVTS01+440 01105000 CVTRV254 EQU CVTS01+438 01106000 CVTRV253 EQU CVTS01+436 01107000 CVTRV252 EQU CVTS01+434 01108000 CVTRV251 EQU CVTS01+433 01109000 CVTRV250 EQU CVTS01+432 01110000 CVTRV249 EQU CVTS01+431 01111000 CVTRV248 EQU CVTS01+430 01112000 CVTRV247 EQU CVTS01+429 01113000 CVTRV246 EQU CVTS01+428 01114000 CVTRV245 EQU CVTRV237 01115000 CVTRV244 EQU CVTRV237 01116000 CVTRV243 EQU CVTRV237 01117000 CVTRV242 EQU CVTRV237 01118000 CVTRV241 EQU CVTRV237 01119000 CVTRV240 EQU CVTRV237 01120000 CVTRV239 EQU CVTRV237 01121000 CVTRV238 EQU CVTRV237 01122000 CVTRV236 EQU CVTRV228 01123000 CVTRV235 EQU CVTRV228 01124000 CVTRV234 EQU CVTRV228 01125000 CVTRV233 EQU CVTRV228 01126000 CVTRV232 EQU CVTRV228 01127000 CVTRV231 EQU CVTRV228 01128000 CVTRV230 EQU CVTRV228 01129000 CVTRV229 EQU CVTRV228 01130000 CVTRV227 EQU CVTRV219 01131000 CVTRV226 EQU CVTRV219 01132000 CVTRV225 EQU CVTRV219 01133000 CVTRV224 EQU CVTRV219 01134000 CVTRV223 EQU CVTRV219 01135000 CVTRV222 EQU CVTRV219 01136000 CVTRV221 EQU CVTRV219 01137000 CVTRV220 EQU CVTRV219 01138000 CVTRV218 EQU CVTRV210 01139000 CVTRV217 EQU CVTRV210 01140000 CVTRV216 EQU CVTRV210 01141000 CVTRV215 EQU CVTRV210 01142000 CVTRV214 EQU CVTRV210 01143000 CVTRV213 EQU CVTRV210 01144000 CVTRV212 EQU CVTRV210 01145000 CVTRV211 EQU CVTRV210 01146000 CVTLCCAT EQU CVTS01+420 01147000 CVTPCCAT EQU CVTS01+416 01148000 CVTIPCRP EQU CVTS01+412 01149000 CVTIPCRI EQU CVTS01+408 01150000 CVTIPCDS EQU CVTS01+404 01151000 CVTAIDVT EQU CVTS01+400 01152000 CVTSSAP EQU CVTS01+396 01153000 CVTEHCIR EQU CVTS01+392 01154000 CVTEHDEF EQU CVTS01+388 01155000 CVTDAIR EQU CVTS01+384 01156000 CVTPERFM EQU CVTS01+380 01157000 CVT044R2 EQU CVTS01+376 01158000 CVTFETCH EQU CVTS01+372 01159000 CVTRSTWD EQU CVTS01+368 01160000 CVTSPOST EQU CVTS01+364 01161000 CVTIOBP EQU CVTS01+360 01162000 CVTRECRQ EQU CVTS01+352 01163000 CVTWSAC EQU CVTS01+348 01164000 CVTRV149 EQU CVTS01+344 01165000 CVTWSAL EQU CVTS01+340 01166000 CVTSPSA EQU CVTS01+336 01167000 CVTGLMN EQU CVTS01+332 01168000 CVTVEAC0 EQU CVTS01+328 01169000 CVT062R1 EQU CVTS01+324 01170000 CVTRPOST EQU CVTS01+320 01171000 CVTDQIQE EQU CVTS01+316 01172000 CVTCSD EQU CVTS01+312 01173000 CVTLKRMA EQU CVTS01+308 01174000 CVTRSPIE EQU CVTS01+304 01175000 CVTRENQ EQU CVTS01+300 01176000 CVTLQCB EQU CVTS01+296 01177000 CVTFQCB EQU CVTS01+292 01178000 CVTQCS01 EQU CVTS01+288 01179000 CVTAPFT EQU CVTS01+284 01180000 CVTPARRL EQU CVTS01+280 01181000 CVTVWAIT EQU CVTS01+276 01182000 CVTGSPL EQU CVTS01+272 01183000 CVTLSMQ EQU CVTS01+268 01184000 CVTGSMQ EQU CVTS01+264 01185000 CVTEXPRO EQU CVTS01+260 01186000 CVTOPCTP EQU CVTS01+256 01187000 CVTSIC EQU CVTS01+252 01188000 CVTTPIOS EQU CVTS01+248 01189000 CVTRTMS EQU CVTS01+244 01190000 CVTSDBF EQU CVTS01+240 01191000 CVTSCBP EQU CVTS01+236 01192000 CVTSDMP EQU CVTS01+232 01193000 CVTSV60 EQU CVTS01+228 01194000 CVTRTMCT EQU CVTS01+224 01195000 CVTASCBL EQU CVTS01+220 01196000 CVTASCBH EQU CVTS01+216 01197000 CVTGDA EQU CVTS01+212 01198000 CVTASVT EQU CVTS01+208 01199000 CVTVVMDI EQU CVTS01+204 01200000 CVTAQTOP EQU CVTS01+200 01201000 CVTIOSCS EQU CVTS01+196 01202000 CVTSDRM EQU CVTS01+192 01203000 CVTOPTE EQU CVTS01+188 01204000 CVTSTXU EQU CVTS01+184 01205000 CVTQUIS EQU CVTS01+180 01206000 CVTPARS EQU CVTS01+176 01207000 CVTS1EE EQU CVTS01+172 01208000 CVTFRAS EQU CVTS01+168 01209000 CVTQSAS EQU CVTS01+164 01210000 CVTCRAS EQU CVTS01+160 01211000 CVTCRMN EQU CVTS01+156 01212000 CVTDELCP EQU CVTS01+152 01213000 CVTFRECL EQU CVTS01+148 01214000 CVTGETCL EQU CVTS01+144 01215000 CVTBLDCP EQU CVTS01+140 01216000 CVTAUTHL EQU CVTS01+136 01217000 CVTSCAN EQU CVTS01+132 01218000 CVTRV144 EQU CVTS01+130 01219000 CVTMAXMP EQU CVTS01+128 01220000 CVTSTCK EQU CVTS01+124 01221000 CVTRV139 EQU CVTS01+123 01222000 CVTDSSAC EQU CVTS01+122 01223000 CVTRV513 EQU CVTS01+121 01224000 CVTIOSPL EQU CVTS01+120 01225000 CVTPTGT EQU CVTS01+116 01226000 CVTCSPIE EQU CVTS01+112 01227000 CVTSMFEX EQU CVTS01+108 01228000 CVTOLT0A EQU CVTS01+104 01229000 CVTSRBRT EQU CVTS01+100 01230000 CVTPUTL EQU CVTS01+96 01231000 CVTASCRL EQU CVTS01+92 01232000 CVTASCRF EQU CVTS01+88 01233000 CVTRV326 EQU CVTS01+84 01234000 CVTRV325 EQU CVTS01+80 01235000 CVTRV324 EQU CVTS01+76 01236000 CVT0VL01 EQU CVTS01+72 01237000 CVTSHRVM EQU CVTS01+68 01238000 CVTRV332 EQU CVTS01+64 01239000 CVTTAS EQU CVTS01+60 01240000 CVTRSCN EQU CVTS01+56 01241000 CVTTRAC2 EQU CVTS01+54 01242000 CVTTRACE EQU CVTS01+52 01243000 CVTAPG EQU CVTS01+51 01244000 CVTSDTRC EQU CVTCTLFG 01245000 CVTGTRCE EQU CVTCTLFG 01246000 CVTNOMP EQU CVTCTLFG 01247000 CVTRSV79 EQU CVTCTLFG 01248000 CVTDSTAT EQU CVTCTLFG 01249000 CVTRSV78 EQU CVTCTLFG 01250000 CVTRV333 EQU CVTCTLFG 01251000 CVTRV323 EQU CVTCTLFG 01252000 CVTSPVLK EQU CVTS01+49 01253000 CVTRSV77 EQU CVTS01+48 01254000 CVTRV331 EQU CVTS01+44 01255000 CVTRV330 EQU CVTS01+40 01256000 CVTRV329 EQU CVTS01+36 01257000 CVTRV328 EQU CVTS01+32 01258000 CVTRV322 EQU CVTS01+28 01259000 CVTSLID EQU CVTSLIDA+1 01260000 CVTSYLK EQU CVTSLIDA 01261000 CVTRV321 EQU CVTS01+20 01262000 CVTRV320 EQU CVTS01+16 01263000 CVTLPDIR EQU CVTLPDIA+1 01264000 CVTRSV69 EQU CVTDIRST 01265000 CVTRSV68 EQU CVTDIRST 01266000 CVTRSV67 EQU CVTDIRST 01267000 CVTRSV66 EQU CVTDIRST 01268000 CVTRSV65 EQU CVTDIRST 01269000 CVTRSV64 EQU CVTDIRST 01270000 CVTRSV63 EQU CVTDIRST 01271000 CVTDICOM EQU CVTDIRST 01272000 CVTLPDSR EQU CVTS01+4 01273000 CVTGETL EQU CVTS01 01274000 WMSTEND EQU WMST+112 01275000 WMSTIPM EQU WMST+108 01276000 WMSTIPI EQU WMST+104 01277000 WMSTIPC EQU WMST+100 01278000 WMSTSECB EQU WMST+96 01279000 WMSTNWST EQU WMST+92 01280000 WMSTSTCB EQU WMST+88 01281000 WMSTSET EQU WMST+84 01282000 WMSTRSVD EQU WMST+81 01283000 WMSTREAL EQU WMST+80 01284000 WMSTMSO EQU WMST+76 01285000 WMSTIOC EQU WMST+72 01286000 WMSTCPU EQU WMST+68 01287000 WMSTDMNC EQU WMST+66 01288000 WMSTPGPC EQU WMST+64 01289000 WMSTPGHI EQU WMST+62 01290000 WMSTWLHI EQU WMST+60 01291000 WMSTDMDE EQU WMST+56 01292000 WMSTDMVS EQU WMST+52 01293000 WMSTDMVT EQU WMST+48 01294000 WMSTDMDS EQU WMST+44 01295000 WMSTDMDT EQU WMST+40 01296000 WMSTPODS EQU WMST+36 01297000 WMSTPODT EQU WMST+32 01298000 WMSTPOVS EQU WMST+28 01299000 WMSTPOVT EQU WMST+24 01300000 WMSTPGDS EQU WMST+20 01301000 WMSTPGDT EQU WMST+16 01302000 WMSTPGVS EQU WMST+12 01303000 WMSTPGVT EQU WMST+8 01304000 WMSTWLLO EQU WMST+6 01305000 WMSTID EQU WMST+4 01306000 WMSTNAME EQU WMST 01307000 RLCTEND EQU RLCT+36 01308000 RLCTRSRF EQU RLCTFLGS 01309000 RLCTUNDR EQU RLCTFLGS 01310000 RLCTOVER EQU RLCTFLGS 01311000 RLCTRVUF EQU RLCT+32 01312000 RLCTUTDA EQU RLCT+28 01313000 RLCTDDCT EQU RLCT+24 01314000 RLCTPDCT EQU RLCT+22 01315000 RLCTRQCT EQU RLCT+20 01316000 RLCTURT2 EQU RLCT+18 01317000 RLCTURT1 EQU RLCT+16 01318000 RLCTUMWA EQU RLCT+12 01319000 RLCTUSR2 EQU RLCT+8 01320000 RLCTUSR1 EQU RLCT+4 01321000 RLCTBIT EQU RLCT 01322000 CVTLEVL EQU CVTRELNO+2 01323000 CVTNUMB EQU CVTRELNO 01324000 CVTMDL EQU CVTFIX+250 01325000 @NM00033 EQU CVTFIX+248 01326000 @NM00032 EQU CVTFIX 01327000 CVTRV482 EQU CVTXTNT2+128 01328000 CVTRV481 EQU CVTXTNT2+124 01329000 CVTRV480 EQU CVTXTNT2+120 01330000 CVTRV479 EQU CVTXTNT2+118 01331000 CVTRV478 EQU CVTXTNT2+117 01332000 CVTRV477 EQU CVTXTNT2+116 01333000 CVTRV476 EQU CVTXTNT2+115 01334000 CVTRV475 EQU CVTXTNT2+114 01335000 CVTRV474 EQU CVTRV466 01336000 CVTRV473 EQU CVTRV466 01337000 CVTRV472 EQU CVTRV466 01338000 CVTRV471 EQU CVTRV466 01339000 CVTRV470 EQU CVTRV466 01340000 CVTRV469 EQU CVTRV466 01341000 CVTRV468 EQU CVTRV466 01342000 CVTRV467 EQU CVTRV466 01343000 CVTRV465 EQU CVTRV457 01344000 CVTRV464 EQU CVTRV457 01345000 CVTRV463 EQU CVTRV457 01346000 CVTRV462 EQU CVTRV457 01347000 CVTRV461 EQU CVTRV457 01348000 CVTRV460 EQU CVTRV457 01349000 CVTRV459 EQU CVTRV457 01350000 CVTRV458 EQU CVTRV457 01351000 CVTRV456 EQU CVTXTNT2+108 01352000 CVTRV455 EQU CVTXTNT2+104 01353000 CVTRV454 EQU CVTXTNT2+100 01354000 CVTRV453 EQU CVTXTNT2+96 01355000 CVTRV452 EQU CVTXTNT2+94 01356000 CVTRV451 EQU CVTXTNT2+92 01357000 CVTRV450 EQU CVTXTNT2+90 01358000 CVTRV449 EQU CVTXTNT2+88 01359000 CVTRV448 EQU CVTXTNT2+87 01360000 CVTRV447 EQU CVTXTNT2+86 01361000 CVTRV446 EQU CVTRV438 01362000 CVTRV445 EQU CVTRV438 01363000 CVTRV444 EQU CVTRV438 01364000 CVTRV443 EQU CVTRV438 01365000 CVTRV442 EQU CVTRV438 01366000 CVTRV441 EQU CVTRV438 01367000 CVTRV440 EQU CVTRV438 01368000 CVTRV439 EQU CVTRV438 01369000 CVTRV437 EQU CVTRV429 01370000 CVTRV436 EQU CVTRV429 01371000 CVTRV435 EQU CVTRV429 01372000 CVTRV434 EQU CVTRV429 01373000 CVTRV433 EQU CVTRV429 01374000 CVTRV432 EQU CVTRV429 01375000 CVTRV431 EQU CVTRV429 01376000 CVTRV430 EQU CVTRV429 01377000 CVTRV428 EQU CVTXTNT2+80 01378000 CVTRV427 EQU CVTXTNT2+76 01379000 CVTRV426 EQU CVTXTNT2+72 01380000 CVTRV425 EQU CVTXTNT2+68 01381000 CVTATACT EQU CVTATCVT 01382000 CVTRV423 EQU CVTXTNT2+62 01383000 CVTRV422 EQU CVTXTNT2+60 01384000 CVTRV421 EQU CVTXTNT2+58 01385000 CVTRV420 EQU CVTXTNT2+56 01386000 CVTRV419 EQU CVTXTNT2+55 01387000 CVTRV418 EQU CVTXTNT2+54 01388000 CVTRV417 EQU CVTRV409 01389000 CVTRV416 EQU CVTRV409 01390000 CVTRV415 EQU CVTRV409 01391000 CVTRV414 EQU CVTRV409 01392000 CVTRV413 EQU CVTRV409 01393000 CVTRV412 EQU CVTRV409 01394000 CVTRV411 EQU CVTRV409 01395000 CVTRV410 EQU CVTRV409 01396000 CVTRV408 EQU CVTRV400 01397000 CVTRV407 EQU CVTRV400 01398000 CVTRV406 EQU CVTRV400 01399000 CVTRV405 EQU CVTRV400 01400000 CVTRV404 EQU CVTRV400 01401000 CVTRV403 EQU CVTRV400 01402000 CVTRV402 EQU CVTRV400 01403000 CVTRV401 EQU CVTRV400 01404000 CVTICB EQU CVTXTNT2+48 01405000 CVTSKTA EQU CVTXTNT2+44 01406000 CVTCCVT EQU CVTXTNT2+40 01407000 CVTRSV98 EQU CVTXTNT2+36 01408000 CVTRSV97 EQU CVTXTNT2+34 01409000 CVTRSV96 EQU CVTXTNT2+32 01410000 CVTOLTEP EQU CVTXTNT2+28 01411000 CVTQIDA EQU CVTQID+1 01412000 CVTRSV95 EQU CVTQID 01413000 CVTRSV94 EQU CVTXTNT2+20 01414000 CVTRSV93 EQU CVTXTNT2+16 01415000 CVTRSV92 EQU CVTXTNT2+12 01416000 CVTDEBVR EQU CVTXTNT2+8 01417000 CVTRSV91 EQU CVTXTNT2+6 01418000 CVTRSV9H EQU CVTFLGBT 01419000 CVTRSV9G EQU CVTFLGBT 01420000 CVTRSV9F EQU CVTFLGBT 01421000 CVTRSV9E EQU CVTFLGBT 01422000 CVTRSV9D EQU CVTFLGBT 01423000 CVTRSV9C EQU CVTFLGBT 01424000 CVTVME EQU CVTFLGBT 01425000 CVTNPE EQU CVTFLGBT 01426000 CVTNUCLS EQU CVTXTNT2+4 01427000 CVTDSSVA EQU CVTDSSV+1 01428000 CVTRSV89 EQU CVTDSSV 01429000 CVTRSV88 EQU CVTXTNT1+8 01430000 CVTRSV87 EQU CVTXTNT1+4 01431000 CVTFACHN EQU CVTXTNT1 01432000 CVTRV488 EQU CVTMAP+412 01433000 CVTRV487 EQU CVTMAP+408 01434000 CVTRV486 EQU CVTMAP+404 01435000 CVTRV485 EQU CVTMAP+400 01436000 CVTACTAP EQU CVTMAP+396 01437000 CVTAUTH EQU CVTMAP+392 01438000 CVTATMCA EQU CVTATMCT+1 01439000 CVTATMST EQU CVTATMCT 01440000 CVTRSV61 EQU CVTMAP+384 01441000 CVTVOLT1 EQU CVTVOLM1+1 01442000 CVTVOLI1 EQU CVTVOLF1 01443000 CVTSTOA EQU CVTMAP+376 01444000 CVTRSV58 EQU CVTMAP+374 01445000 CVTRSV57 EQU CVTMAP+372 01446000 CVTDDCE EQU CVTMAP+368 01447000 CVTPNWFR EQU CVTMAP+364 01448000 CVTSMF EQU CVTMAP+360 01449000 CVTSULK EQU CVTMAP+358 01450000 CVTSLKO EQU CVTSYSK 01451000 CVTSLKP EQU CVTSYSK 01452000 CVTSLKQ EQU CVTSYSK 01453000 CVTSLKR EQU CVTSYSK 01454000 CVTRSV56 EQU CVTSYSK 01455000 CVTRSV55 EQU CVTSYSK 01456000 CVTRSV54 EQU CVTSYSK 01457000 CVTRSV53 EQU CVTSYSK 01458000 CVTRSV52 EQU CVTA1F1 01459000 CVTRSV51 EQU CVTA1F1 01460000 CVTRSV50 EQU CVTA1F1 01461000 CVTRSV49 EQU CVTA1F1 01462000 CVTRSV48 EQU CVTA1F1 01463000 CVTRSV47 EQU CVTA1F1 01464000 CVTSRSW EQU CVTA1F1 01465000 CVTPFSW EQU CVTA1F1 01466000 CVTPCVT EQU CVTMAP+352 01467000 CVTRSV46 EQU CVTMAP+344 01468000 CVTRSV45 EQU CVTMAP+340 01469000 CVTRSV44 EQU CVTMAP+338 01470000 CVTRSV43 EQU CVTMAP+336 01471000 CVTHJESA EQU CVTHJES+1 01472000 CVTRSV42 EQU CVTHJES 01473000 CVTEXT2A EQU CVTEXT2+1 01474000 CVTRSV41 EQU CVTEXT2 01475000 CVTAPFA EQU CVTAPF+1 01476000 CVTRSV40 EQU CVTAPF 01477000 CVTRV518 EQU CVTINTLA 01478000 CVTRV517 EQU CVTERPV 01479000 CVTEORM EQU CVTMAP+312 01480000 CVTMCHPR EQU CVTMAP+308 01481000 CVTTZ EQU CVTMAP+304 01482000 CVTJEPS EQU CVTMAP+300 01483000 CVTJESCT EQU CVTMAP+296 01484000 CVTMODE EQU CVTMAP+292 01485000 CVTPTRV EQU CVTMAP+288 01486000 CVTREAL EQU CVTMAP+284 01487000 CVTRSV39 EQU CVTMAP+280 01488000 CVTRSV38 EQU CVTMAP+276 01489000 CVTDMSRA EQU CVTDMSR+1 01490000 CVTRV634 EQU CVTDMSRF 01491000 CVTRV633 EQU CVTDMSRF 01492000 CVTRV632 EQU CVTDMSRF 01493000 CVTRV631 EQU CVTDMSRF 01494000 CVTRV630 EQU CVTDMSRF 01495000 CVTRV629 EQU CVTDMSRF 01496000 CVTUDUMP EQU CVTDMSRF 01497000 CVTSDUMP EQU CVTDMSRF 01498000 CVTQMSGA EQU CVTQMSG+1 01499000 CVTRSV36 EQU CVTQMSG 01500000 CVTAMFF EQU CVTMAP+264 01501000 CVTPURGA EQU CVTPURG+1 01502000 CVTRSV35 EQU CVTPURG 01503000 CVTCBSP EQU CVTMAP+256 01504000 CVTATERA EQU CVTATER+1 01505000 CVTSYST EQU CVTATER 01506000 CVTVOLT2 EQU CVTTAT 01507000 CVTVOLI2 EQU CVTVOLF2 01508000 CVTAQAVB EQU CVTAQAVT+1 01509000 CVTRSV34 EQU CVTTCMFG 01510000 CVTRSV33 EQU CVTTCMFG 01511000 CVTRSV32 EQU CVTTCMFG 01512000 CVTRSV31 EQU CVTTCMFG 01513000 CVTRSV30 EQU CVTTCMFG 01514000 CVTRSV29 EQU CVTTCMFG 01515000 CVTLDEV EQU CVTTCMFG 01516000 CVTTCRDY EQU CVTTCMFG 01517000 CVTGTFA EQU CVTGTF+1 01518000 CVTRSV27 EQU CVTGTFST 01519000 CVTRNIO EQU CVTGTFST 01520000 CVTUSR EQU CVTGTFST 01521000 CVTRV318 EQU CVTFORM 01522000 CVTRV317 EQU CVTTMODE 01523000 CVTRV316 EQU CVTSTATE 01524000 CVTRV315 EQU CVTGTFS 01525000 CVTGTFAV EQU CVTGTFS 01526000 CVT0SCR1 EQU CVTMAP+232 01527000 CVTRV515 EQU CVTMAP+228 01528000 CVTRMS EQU CVTMAP+224 01529000 CVTPATCH EQU CVTMAP+220 01530000 CVTTSCE EQU CVTMAP+216 01531000 CVTLNKSC EQU CVTMAP+214 01532000 CVTQABST EQU CVTMAP+212 01533000 CVTMDLDS EQU CVTMAP+208 01534000 CVTUSER EQU CVTMAP+204 01535000 CVTABEND EQU CVTMAP+200 01536000 CVTSMCA EQU CVTMAP+196 01537000 CVTRSV18 EQU CVTMAP+192 01538000 CVTQLPAQ EQU CVTMAP+188 01539000 CVTQCDSR EQU CVTMAP+184 01540000 CVTRSV17 EQU CVTOPTB 01541000 CVTRSV16 EQU CVTOPTB 01542000 CVTFP EQU CVTOPTB 01543000 CVTAPTHR EQU CVTOPTB 01544000 CVTNLOG EQU CVTOPTB 01545000 CVTTOD EQU CVTOPTB 01546000 CVTCTIMS EQU CVTOPTB 01547000 CVTPROT EQU CVTOPTB 01548000 CVTXPFP EQU CVTOPTA 01549000 CVTASCII EQU CVTOPTA 01550000 CVTRSV13 EQU CVTOPTA 01551000 CVTRSV12 EQU CVTOPTA 01552000 CVTNIP EQU CVTOPTA 01553000 CVTDDR EQU CVTOPTA 01554000 CVTAPR EQU CVTOPTA 01555000 CVTCCH EQU CVTOPTA 01556000 CVTSNCTR EQU CVTMAP+180 01557000 CVTQMWR EQU CVTMAP+176 01558000 CVTQOCR EQU CVTMAP+172 01559000 CVT1EF00 EQU CVTMAP+168 01560000 CVTMZ00 EQU CVTMAP+164 01561000 CVTSV76Q EQU CVTSV76C 01562000 CVTRSV11 EQU CVTMAP+156 01563000 CVT0PT01 EQU CVTMAP+152 01564000 CVTMSER EQU CVTMAP+148 01565000 CVTRV516 EQU CVTIERLC 01566000 CVT0DS EQU CVTMAP+136 01567000 CVTFBOSV EQU CVTMAP+132 01568000 CVTNUCB EQU CVTMAP+128 01569000 CVTIXAVL EQU CVTMAP+124 01570000 CVTSV76M EQU CVTIOQET 01571000 CVTDCBA EQU CVTMAP+117 01572000 CVTMVS2 EQU CVTDCB 01573000 CVT6DAT EQU CVTDCB 01574000 CVT4MPS EQU CVTDCB 01575000 CVTRSV09 EQU CVTDCB 01576000 CVT4MS1 EQU CVTDCB 01577000 CVT2SPS EQU CVTDCB 01578000 CVT1SSS EQU CVTDCB 01579000 CVTRSV08 EQU CVTDCB 01580000 CVTSTB EQU CVTMAP+112 01581000 CVTQTD00 EQU CVTMAP+108 01582000 CVTQTE00 EQU CVTMAP+104 01583000 CVTCUCB EQU CVTMAP+100 01584000 CVTSJQ EQU CVTMAP+96 01585000 CVTPBLDL EQU CVTMAP+92 01586000 CVTTPC EQU CVTMAP+88 01587000 CVTSVDCB EQU CVTMAP+84 01588000 CVTBRET EQU CVTMAP+82 01589000 CVTEXIT EQU CVTMAP+80 01590000 CVT0FN00 EQU CVTMAP+76 01591000 CVTDARA EQU CVTDAR+1 01592000 CVTRSV07 EQU CVTFLGS1 01593000 CVTRSV06 EQU CVTFLGS1 01594000 CVTRSV05 EQU CVTFLGS1 01595000 CVTRSV04 EQU CVTFLGS1 01596000 CVTRSV03 EQU CVTFLGS1 01597000 CVTRSV02 EQU CVTFLGS1 01598000 CVTRSV01 EQU CVTFLGS1 01599000 CVTDMPLK EQU CVTFLGS1 01600000 CVTXITP EQU CVTMAP+68 01601000 CVTZDTAB EQU CVTMAP+64 01602000 CVTMSLT EQU CVTMAP+60 01603000 CVTDATE EQU CVTMAP+56 01604000 CVTBTERM EQU CVTMAP+52 01605000 CVTSYSAD EQU CVTMAP+48 01606000 CVTXTLER EQU CVTMAP+44 01607000 CVTILK2 EQU CVTMAP+40 01608000 CVTILK1 EQU CVTMAP+36 01609000 CVTPRLTV EQU CVTMAP+32 01610000 CVTPCNVT EQU CVTMAP+28 01611000 CVT0VL00 EQU CVTMAP+24 01612000 CVTXAPG EQU CVTMAP+20 01613000 CVTBUF EQU CVTMAP+16 01614000 CVTJOB EQU CVTMAP+12 01615000 CVTLINK EQU CVTMAP+8 01616000 CVT0EF00 EQU CVTMAP+4 01617000 CVTTCBP EQU CVTMAP 01618000 CVT EQU CVTMAP 01619000 ASMCPRES EQU ASMCPRSQ+4 01620000 ASMCPTAK EQU ASMCPRSQ 01621000 ASMCPCNT EQU ASMCPAVQ+4 01622000 ASMCPAVL EQU ASMCPAVQ 01623000 ASMCPEXT EQU ASMPOOLS+6 01624000 ASMCPSIZ EQU ASMPOOLS+4 01625000 ASMCPID EQU ASMPOOLS 01626000 ASMRSV12 EQU ASMVT+1000 01627000 ASMSAVE EQU ASMVT+928 01628000 ASMWKSA7 EQU ASMVT+848 01629000 ASMWKSA6 EQU ASMVT+768 01630000 ASMACEPC EQU ASMVT+344 01631000 ASMSWKPC EQU ASMVT+328 01632000 ASMBWKPC EQU ASMVT+312 01633000 ASMIOEPC EQU ASMVT+296 01634000 ASMRSV10 EQU ASMVT+280 01635000 ASMPVACE EQU ASMVT+276 01636000 ASMPIOFR EQU ASMVT+272 01637000 ASMPVACQ EQU ASMVT+268 01638000 ASMPMSGS EQU ASMVT+264 01639000 ASMPMSG0 EQU ASMVT+260 01640000 ASMPFRLG EQU ASMVT+256 01641000 ASMPRLG EQU ASMVT+252 01642000 ASMPACT EQU ASMVT+248 01643000 ASMPSAV EQU ASMVT+244 01644000 ASMPCMP EQU ASMVT+240 01645000 ASMPCMPA EQU ASMVT+236 01646000 ASMPCMPN EQU ASMVT+232 01647000 ASMPCMPD EQU ASMVT+228 01648000 ASMPEX EQU ASMVT+224 01649000 ASMVRMTR EQU ASMVT+220 01650000 ASMPSRBC EQU ASMVT+216 01651000 ASMPSRMT EQU ASMVT+212 01652000 ASMPSWPD EQU ASMVT+208 01653000 ASMPTM EQU ASMVT+204 01654000 ASMPFRSW EQU ASMVT+200 01655000 ASMPFRSL EQU ASMVT+196 01656000 ASMPQIOE EQU ASMVT+192 01657000 ASMRSV8 EQU ASMVT+188 01658000 ASMVSAMW EQU ASMVT+184 01659000 ASMTASCB EQU ASMVT+180 01660000 ASMRLGWQ EQU ASMVT+176 01661000 ASMRLGRQ EQU ASMVT+172 01662000 ASMTMECB EQU ASMVT+168 01663000 ASMTCBPT EQU ASMVT+164 01664000 ASMREQCT EQU ASMVT+160 01665000 ASMGOSWK EQU ASMGOSQS+4 01666000 ASMGOSWT EQU ASMGOSQS 01667000 ASMLSAIH EQU ASMLSAI+4 01668000 ASMLSAIL EQU ASMLSAI 01669000 ASMCINV EQU ASMVT+140 01670000 ASMSTGXA EQU ASMVT+136 01671000 ASMLGVT EQU ASMVT+132 01672000 ASMSLOTV EQU ASMVT+128 01673000 ASMERRS EQU ASMVT+124 01674000 ASMNVSC EQU ASMVT+120 01675000 ASMVSC EQU ASMVT+116 01676000 ASMSLOTS EQU ASMVT+112 01677000 ASMBKSLT EQU ASMVT+108 01678000 ASMRSV7 EQU ASMVT+92 01679000 ASMPSRB EQU ASMVT+88 01680000 ASMSRBCT EQU ASMVT+84 01681000 ASMIOCNT EQU ASMVT+80 01682000 ASMBURST EQU ASMVT+76 01683000 ASMPCCWN EQU ASMVT+72 01684000 ASMPCCWC EQU ASMPCCWQ+4 01685000 ASMPCCWA EQU ASMPCCWQ 01686000 ASMRSV6 EQU ASMVT+48 01687000 ASMSTAGL EQU ASMSTAGQ+4 01688000 ASMSTAGF EQU ASMSTAGQ 01689000 ASMRSV5 EQU ASMVT+28 01690000 ASMMSGBF EQU ASMVT+24 01691000 ASMEREC EQU ASMVT+20 01692000 ASMTRPAG EQU ASMVT+16 01693000 ASMGOS EQU ASMVT+12 01694000 ASMPART EQU ASMVT+8 01695000 ASMSART EQU ASMVT+4 01696000 ASMDSSFS EQU ASMVT+2 01697000 ASMWARM EQU ASMFLAG2 01698000 ASMQUICK EQU ASMFLAG2 01699000 ASMNOTPT EQU ASMFLAG2 01700000 ASMNOTMR EQU ASMFLAG2 01701000 ASMNOSAV EQU ASMFLAG2 01702000 ASMCALLQ EQU ASMFLAG2 01703000 ASMPLPAS EQU ASMFLAG1 01704000 ASMCOMMF EQU ASMFLAG1 01705000 ASMPLPAF EQU ASMFLAG1 01706000 ASMNODPX EQU ASMFLAG1 01707000 ASMRSV1 EQU ASMFLAG1 01708000 ASMNOLCL EQU ASMFLAG1 01709000 ASMNOCWQ EQU ASMFLAG1 01710000 ASMDUPLX EQU ASMFLAG1 01711000 PVTEND EQU PVT+1848 01712000 PVTTASID EQU PVT+1846 01713000 PVTXXXXX EQU PVT+1844 01714000 PVTMVCLC EQU PVT+1840 01715000 PVTSPARE EQU PVT+1838 01716000 PVTCHUIC EQU PVT+1836 01717000 PVTCOMFX EQU PVT+1834 01718000 PVTSQAFX EQU PVT+1832 01719000 PVTCNTFX EQU PVT+1830 01720000 PVTDEFFX EQU PVT+1828 01721000 PVTFIXOK EQU PVT+1826 01722000 PVTPEROK EQU PVT+1824 01723000 PVTMAXFX EQU PVT+1822 01724000 PVTPERFX EQU PVT+1820 01725000 PVTRSRB EQU PVT+1776 01726000 PVTRESV5 EQU PVT+1773 01727000 PVTSRBS EQU PVT+1772 01728000 PVTSSRB EQU PVT+1768 01729000 PVTACA EQU PVTWSAX+1400 01730000 PVTSAVE EQU PVTWSAX+1328 01731000 PVTWSA18 EQU PVTWSAX+1256 01732000 PVTWSA17 EQU PVTWSAX+1184 01733000 PVTWSA16 EQU PVTWSAX+1112 01734000 PVTWSA15 EQU PVTWSAX+1040 01735000 PVTWSA14 EQU PVTWSAX+968 01736000 PVTWSA13 EQU PVTWSAX+896 01737000 PVTWSA12 EQU PVTWSAX+824 01738000 PVTWSA11 EQU PVTWSAX+752 01739000 PVTWSA10 EQU PVTWSAX+672 01740000 PVTWSA9 EQU PVTWSAX+592 01741000 PVTWSA8 EQU PVTWSAX+504 01742000 PVTWSA7 EQU PVTWSAX+432 01743000 PVTWSA6 EQU PVTWSAX+360 01744000 PVTWSA5 EQU PVTWSAX+288 01745000 PVTWSA4 EQU PVTWSAX+216 01746000 PVTWSA3 EQU PVTWSAX+144 01747000 PVTWSA2 EQU PVTWSAX+72 01748000 PVTWSA1 EQU PVTWSAX 01749000 PVTCIOQL EQU PVTQS+36 01750000 PVTCIOQF EQU PVTQS+32 01751000 PVTGFADL EQU PVTQS+28 01752000 PVTGFADF EQU PVTQS+24 01753000 PVTFPCBL EQU PVTQS+20 01754000 PVTFPCBF EQU PVTQS+16 01755000 PVTSQAQL EQU PVTQS+14 01756000 PVTSQAQF EQU PVTQS+12 01757000 PVTCFQL EQU PVTQS+10 01758000 PVTCFQF EQU PVTQS+8 01759000 PVTRSRVL EQU PVTQS+6 01760000 PVTRSRVF EQU PVTQS+4 01761000 PVTAFQL EQU PVTQS+2 01762000 PVTAFQF EQU PVTQS 01763000 PVTSPFR EQU PVT+302 01764000 PVTCFMCT EQU PVT+300 01765000 PVTSPREC EQU PVT+296 01766000 PVTCAREC EQU PVT+292 01767000 PVTCAOUT EQU PVT+288 01768000 PVTCAIN EQU PVT+284 01769000 PVTNSWPS EQU PVT+280 01770000 PVTSPOUT EQU PVT+272 01771000 PVTSPIN EQU PVT+268 01772000 PVTVAMR EQU PVT+264 01773000 PVTVAMO EQU PVT+260 01774000 PVTVAMI EQU PVT+256 01775000 PVTNPOUT EQU PVT+252 01776000 PVTPRSET EQU PVT+244 01777000 PVTFRSLT EQU PVT+240 01778000 PVTPAGIO EQU PVT+236 01779000 PVTSWPIO EQU PVT+232 01780000 PVTPSWPP EQU PVT+228 01781000 PVTPPREF EQU PVT+224 01782000 PVTPOPBR EQU PVT+220 01783000 PVTPRELF EQU PVT+216 01784000 PVTPRELV EQU PVT+212 01785000 PVTPFREE EQU PVT+208 01786000 PVTPRELS EQU PVT+204 01787000 PVTPOUT EQU PVT+200 01788000 PVTPFXLD EQU PVT+196 01789000 PVTPITAS EQU PVT+192 01790000 PVTPSRBP EQU PVT+188 01791000 PVTPDSEG EQU PVT+184 01792000 PVTPCSGB EQU PVT+180 01793000 PVTPCSEG EQU PVT+176 01794000 PVTPINV EQU PVT+172 01795000 PVTPSWPC EQU PVT+168 01796000 PVTPSOUT EQU PVT+164 01797000 PVTPSWIN EQU PVT+160 01798000 PVTPRCV EQU PVT+156 01799000 PVTPRCFI EQU PVT+152 01800000 PVTPRCF EQU PVT+148 01801000 PVTPVRC EQU PVT+144 01802000 PVTPVRIN EQU PVT+140 01803000 PVTPVRLS EQU PVT+136 01804000 PVTPVEQR EQU PVT+132 01805000 PVTPPIOI EQU PVT+128 01806000 PVTPVRPO EQU PVT+124 01807000 PVTPRFR EQU PVT+120 01808000 PVTPFP2 EQU PVT+116 01809000 PVTPFP EQU PVT+112 01810000 PVTPFTE EQU PVT+108 01811000 PVTPCB EQU PVT+104 01812000 PVTREP2 EQU PVT+100 01813000 PVTPIOCP EQU PVT+96 01814000 PVTPIOP EQU PVT+92 01815000 PVTPGFAD EQU PVT+88 01816000 PVTPGFA EQU PVT+84 01817000 PVTPSQA EQU PVT+80 01818000 PVTPSINT EQU PVT+76 01819000 PVTPSIB EQU PVT+72 01820000 PVTSRBID EQU PVT+68 01821000 PVTPCIWA EQU PVT+64 01822000 PVTHQSA EQU PVT+62 01823000 PVTLQSA EQU PVT+60 01824000 PVTOROOT EQU PVT+56 01825000 PVTPRCA EQU PVT+52 01826000 PVTREUS EQU PVT+48 01827000 PVTSQNPC EQU PVT+47 01828000 PVTSQVRC EQU PVT+46 01829000 PVTRSUS EQU PVT+44 01830000 PVTVROOT EQU PVT+40 01831000 PVTPCBLO EQU PVT+38 01832000 PVTPCBCT EQU PVT+36 01833000 PVTDFRS EQU PVT+34 01834000 PVTRSQA EQU PVT+32 01835000 PVTPTLB EQU PVT+31 01836000 PVTPCBNO EQU PVT+30 01837000 PVTSRBNO EQU PVT+29 01838000 PVTSQDC EQU PVT+28 01839000 PVTLCSA EQU PVT+26 01840000 PVTLPRIV EQU PVT+24 01841000 PVTLVR EQU PVT+22 01842000 PVTFVR EQU PVT+20 01843000 PVTLPFN EQU PVT+18 01844000 PVTFPFN EQU PVT+16 01845000 PVTPFTP EQU PVT+12 01846000 PVTSSPIN EQU PVT+11 01847000 PVTPCBS EQU PVT+10 01848000 PVTPOOL EQU PVT+8 01849000 PVTAFCOK EQU PVT+6 01850000 PVTAFCLO EQU PVT+4 01851000 PVTAFC EQU PVT+2 01852000 @NM00003 EQU PVTFLAG2 01853000 PVTRSMGM EQU PVTFLAG2 01854000 PVTDUMP EQU PVTFLAG1 01855000 PVTSIT EQU PVTFLAG1 01856000 PVTLSI EQU PVTFLAG1 01857000 PVTAPREF EQU PVTFLAG1 01858000 PVTPCBLT EQU PVTFLAG1 01859000 PVTSRBIU EQU PVTFLAG1 01860000 PVTBGMS EQU PVTFLAG1 01861000 PVTPMSG EQU PVTFLAG1 01862000 DMDTEND EQU DMDT+20 01863000 DMDTINCU EQU DMDT+14 01864000 DMDTGOOU EQU DMDT+8 01865000 DMDTNO EQU DMDT 01866000 RMEPSND EQU RMEP+32 01867000 RMEPINT EQU RMEPSCH+12 01868000 RMEPTME EQU RMEPSCH+8 01869000 RMEPBCK EQU RMEPSCH+4 01870000 RMEPFWD EQU RMEPSCH 01871000 RMEPEND EQU RMEP+16 01872000 RMEPPRV EQU RMEPEPB+12 01873000 RMEPACN EQU RMEPFLG+3 01874000 RMEPTMD EQU RMEPFLG+3 01875000 RMEPRCR EQU RMEPFLG+3 01876000 RMEPVFL EQU RMEPFLG 01877000 RMEPERA EQU RMEPEPB+4 01878000 RMEPEPA EQU RMEPEPB 01879000 OUXBEND EQU OUXB+144 01880000 OUXBTSW EQU OUXB+140 01881000 OUXBFIXC EQU OUXB+138 01882000 OUXBNVC EQU OUXB+136 01883000 OUXBUIC EQU OUXB+134 01884000 OUXBVSC EQU OUXB+132 01885000 OUXBILS EQU OUXB+128 01886000 OUXBRSV1 EQU OUXB+126 01887000 OUXBWCT EQU OUXB+124 01888000 OUXBPRS EQU OUXB+120 01889000 OUXBSTD EQU OUXB+116 01890000 OUXBITD EQU OUXB+112 01891000 OUXBMSS EQU OUXB+104 01892000 OUXBCPS EQU OUXB+96 01893000 OUXBAET EQU OUXB+92 01894000 OUXBTRR EQU OUXB+88 01895000 OUXBJBR EQU OUXB+84 01896000 OUXBTRT EQU OUXB+80 01897000 OUXBTRS EQU OUXB+76 01898000 OUXBJBT EQU OUXB+72 01899000 OUXBJBS EQU OUXB+68 01900000 OUXBTRC EQU OUXB+64 01901000 OUXBNQT EQU OUXB+60 01902000 OUXBIOSM EQU OUXB+56 01903000 OUXBSTC EQU OUXB+54 01904000 OUXBIOS EQU OUXB+52 01905000 OUXBSTCT EQU OUXB+48 01906000 OUXBCAPR EQU OUXB+44 01907000 OUXBCAPI EQU OUXB+40 01908000 OUXBVAMR EQU OUXB+36 01909000 OUXBVAMO EQU OUXB+32 01910000 OUXBVAMI EQU OUXB+28 01911000 OUXBPREC EQU OUXB+24 01912000 OUXBPOUT EQU OUXB+20 01913000 OUXBPIN EQU OUXB+16 01914000 OUXBRSW EQU OUXB+12 01915000 OUXBMET EQU OUXB+8 01916000 OUXBPET EQU OUXB+4 01917000 OUXBNAME EQU OUXB 01918000 OUCBEND EQU OUCB+136 01919000 OUCBNTSP EQU OUCB+134 01920000 OUCBNDS EQU OUCB+132 01921000 OUCBTIO EQU OUCB+128 01922000 OUCBTCP EQU OUCB+124 01923000 OUCBPST EQU OUCB+120 01924000 OUCBPS2 EQU OUCBPSS+4 01925000 OUCBPS1 EQU OUCBPSS 01926000 OUCBIOSM EQU OUCB+108 01927000 OUCBTMP EQU OUCB+104 01928000 OUCBR03 EQU OUCB+102 01929000 OUCBIOR EQU OUCB+100 01930000 OUCBCRV EQU OUCB+98 01931000 OUCBIRV EQU OUCB+96 01932000 OUCBWMR EQU OUCB+92 01933000 OUCBCMRV EQU OUCB+88 01934000 OUCBCF2 EQU OUCBCFL 01935000 OUCBRSM EQU OUCBCFL 01936000 OUCBRDY EQU OUCBCFL 01937000 OUCBACN EQU OUCBCSW 01938000 OUCBACT EQU OUCB+80 01939000 OUCBWSS EQU OUCB+78 01940000 OUCBPSO EQU OUCB+76 01941000 OUCBTMO EQU OUCB+72 01942000 OUCBTMS EQU OUCB+68 01943000 OUCBMSO EQU OUCB+64 01944000 OUCBIOC EQU OUCB+60 01945000 OUCBCPU EQU OUCB+56 01946000 OUCBWMS EQU OUCB+52 01947000 OUCBIMCB EQU OUCB+44 01948000 OUCBASCB EQU OUCB+40 01949000 OUCBSWC EQU OUCB+38 01950000 OUCBSRC EQU OUCB+37 01951000 OUCBDMN EQU OUCB+36 01952000 OUCBDMO EQU OUCB+34 01953000 OUCBWMG EQU OUCB+32 01954000 OUCBPGP EQU OUCB+31 01955000 OUCBR40 EQU OUCB+30 01956000 OUCBR30 EQU OUCB+29 01957000 OUCBSPG EQU OUCB+28 01958000 OUCBRDP EQU OUCB+27 01959000 OUCBNDP EQU OUCB+26 01960000 OUCBRPG EQU OUCB+25 01961000 OUCBNPG EQU OUCB+24 01962000 OUCBUF7 EQU OUCBUFL 01963000 OUCBUF6 EQU OUCBUFL 01964000 OUCBUF5 EQU OUCBUFL 01965000 OUCBTSWC EQU OUCBUFL 01966000 OUCBTSWP EQU OUCBUFL 01967000 OUCBRSWP EQU OUCBUFL 01968000 OUCBJSAS EQU OUCBUFL 01969000 OUCBJSFS EQU OUCBUFL 01970000 OUCBNQC EQU OUCB+22 01971000 OUCBMWT EQU OUCBEFL 01972000 OUCBQSC EQU OUCBEFL 01973000 OUCBQSS EQU OUCBEFL 01974000 OUCBNQF EQU OUCBEFL 01975000 OUCBCIM EQU OUCBEFL 01976000 OUCBOWT EQU OUCBEFL 01977000 OUCBTRM EQU OUCBEFL 01978000 OUCBLWT EQU OUCBEFL 01979000 OUCBINP EQU OUCBTFL 01980000 OUCBMAR EQU OUCBTFL 01981000 OUCBPCH EQU OUCBTFL 01982000 OUCBRTR EQU OUCBTFL 01983000 OUCBNTR EQU OUCBTFL 01984000 OUCBSTR EQU OUCBTFL 01985000 OUCBASW EQU OUCBAFL 01986000 OUCBNWT EQU OUCBAFL 01987000 OUCBR02 EQU OUCBAFL 01988000 OUCBJSR EQU OUCBAFL 01989000 OUCBCPL EQU OUCBAFL 01990000 OUCBRMA EQU OUCBAFL 01991000 OUCBAPG EQU OUCBAFL 01992000 OUCBAF0 EQU OUCBAFL 01993000 OUCBFXS EQU OUCBYFL 01994000 OUCBDTA EQU OUCBYFL 01995000 OUCBAXS EQU OUCBYFL 01996000 OUCBPSTR EQU OUCBYFL 01997000 OUCBMNT EQU OUCBYFL 01998000 OUCBLOG EQU OUCBYFL 01999000 OUCBSTT EQU OUCBYFL 02000000 OUCBPSTE EQU OUCBYFL 02001000 OUCBENQ EQU OUCBSFL 02002000 OUCBPVL EQU OUCBSFL 02003000 OUCBNSWI EQU OUCBSFL 02004000 OUCBINV EQU OUCBSFL 02005000 OUCBBIB EQU OUCBSFL 02006000 OUCBCTI EQU OUCBSFL 02007000 OUCBNSW EQU OUCBSFL 02008000 OUCBQF7 EQU OUCBQFL 02009000 OUCBQF6 EQU OUCBQFL 02010000 OUCBOUT EQU OUCBQFL 02011000 OUCBOFF EQU OUCBQFL 02012000 OUCBQF3 EQU OUCBQFL 02013000 OUCBGOB EQU OUCBQFL 02014000 OUCBGOI EQU OUCBQFL 02015000 OUCBGOO EQU OUCBQFL 02016000 OUCBBCK EQU OUCB+8 02017000 OUCBNAME EQU OUCB 02018000 ASCBEND EQU ASCB+208 02019000 ASCBSRBT EQU ASCB+200 02020000 ASCBSWTL EQU ASCB+196 02021000 ASCBRS14 EQU ASCB+195 02022000 ASCBSMCT EQU ASCB+194 02023000 ASCBRS12 EQU ASCB+192 02024000 ASCBPCTT EQU ASCB+188 02025000 ASCBVGTT EQU ASCB+184 02026000 ASCBRV43 EQU ASCBSRQ4 02027000 ASCBRV42 EQU ASCBSRQ4 02028000 ASCBRV41 EQU ASCBSRQ4 02029000 ASCBRV40 EQU ASCBSRQ4 02030000 ASCBRV39 EQU ASCBSRQ4 02031000 ASCBRV38 EQU ASCBSRQ4 02032000 ASCBRV37 EQU ASCBSRQ4 02033000 ASCBRV36 EQU ASCBSRQ4 02034000 ASCBRV35 EQU ASCBSRQ3 02035000 ASCBRV34 EQU ASCBSRQ3 02036000 ASCBRV33 EQU ASCBSRQ3 02037000 ASCBRV32 EQU ASCBSRQ3 02038000 ASCBRV31 EQU ASCBSRQ3 02039000 ASCBRV30 EQU ASCBSRQ3 02040000 ASCBRV29 EQU ASCBSRQ3 02041000 ASCBRV28 EQU ASCBSRQ3 02042000 ASCBRV27 EQU ASCBSRQ2 02043000 ASCBRV26 EQU ASCBSRQ2 02044000 ASCBRV25 EQU ASCBSRQ2 02045000 ASCBRV24 EQU ASCBSRQ2 02046000 ASCBRV23 EQU ASCBSRQ2 02047000 ASCBRV22 EQU ASCBSRQ2 02048000 ASCBRV21 EQU ASCBSRQ2 02049000 ASCBRV20 EQU ASCBSRQ2 02050000 ASCBRV19 EQU ASCBSRQ1 02051000 ASCBRV18 EQU ASCBSRQ1 02052000 ASCBRV17 EQU ASCBSRQ1 02053000 ASCBRV16 EQU ASCBSRQ1 02054000 ASCBRV15 EQU ASCBSRQ1 02055000 ASCBRV14 EQU ASCBSRQ1 02056000 ASCBRV13 EQU ASCBSRQ1 02057000 ASCBSTA EQU ASCBSRQ1 02058000 ASCBJBNS EQU ASCB+176 02059000 ASCBJBNI EQU ASCB+172 02060000 ASCBMCC EQU ASCB+168 02061000 ASCBRTWA EQU ASCB+164 02062000 ASCBIQEA EQU ASCB+160 02063000 ASCBXMPQ EQU ASCB+156 02064000 ASCBRS01 EQU ASCB+154 02065000 ASCBFMCT EQU ASCB+152 02066000 ASCBOUXB EQU ASCB+148 02067000 ASCBOUCB EQU ASCB+144 02068000 ASCBMECB EQU ASCB+140 02069000 ASCBQECB EQU ASCB+136 02070000 ASCBLSQH EQU ASCBLKGP+4 02071000 ASCBLOCK EQU ASCBLKGP 02072000 ASCBTCBS EQU ASCB+124 02073000 ASCBNVSC EQU ASCB+122 02074000 ASCBVSC EQU ASCB+120 02075000 ASCBSRBS EQU ASCB+118 02076000 ASCBSSRB EQU ASCB+116 02077000 ASCBRV06 EQU ASCBFLG2 02078000 ASCBRV05 EQU ASCBFLG2 02079000 ASCBRV04 EQU ASCBFLG2 02080000 ASCBSNQS EQU ASCBFLG2 02081000 ASCBS2S EQU ASCBFLG2 02082000 ASCBCEXT EQU ASCBFLG2 02083000 ASCBPXMT EQU ASCBFLG2 02084000 ASCBXMPT EQU ASCBFLG2 02085000 ASCBRF07 EQU ASCBDSP1 02086000 ASCBRF06 EQU ASCBDSP1 02087000 ASCBRF05 EQU ASCBDSP1 02088000 ASCBRF04 EQU ASCBDSP1 02089000 ASCBRF03 EQU ASCBDSP1 02090000 ASCBRF02 EQU ASCBDSP1 02091000 ASCBFAIL EQU ASCBDSP1 02092000 ASCBNOQ EQU ASCBDSP1 02093000 ASCBSWCT EQU ASCB+112 02094000 ASCBASXB EQU ASCB+108 02095000 ASCBTMCH EQU ASCB+104 02096000 ASCBNSWP EQU ASCBFLG1 02097000 ASCBTYP1 EQU ASCBFLG1 02098000 ASCBSTND EQU ASCBFLG1 02099000 ASCBABNT EQU ASCBFLG1 02100000 ASCBTERM EQU ASCBFLG1 02101000 ASCBS3S EQU ASCBFLG1 02102000 ASCBCMSH EQU ASCBFLG1 02103000 ASCBTOFF EQU ASCBFLG1 02104000 ASCBRF01 EQU ASCBRCTF 02105000 ASCBTMLW EQU ASCBRCTF 02106000 ASCBOUT EQU ASCBRCTF 02107000 ASCBWAIT EQU ASCBRCTF 02108000 ASCBRV08 EQU ASCBRCTF 02109000 ASCBFQU EQU ASCBRCTF 02110000 ASCBFRS EQU ASCBRCTF 02111000 ASCBTMNO EQU ASCBRCTF 02112000 ASCBAFFN EQU ASCBFW1 02113000 ASCBDUMP EQU ASCB+96 02114000 ASCBRV44 EQU ASCB+92 02115000 ASCBUBET EQU ASCB+88 02116000 ASCBECB EQU ASCB+84 02117000 ASCBJSTL EQU ASCB+80 02118000 ASCBEWST EQU ASCB+72 02119000 ASCBEJST EQU ASCB+64 02120000 ASCBTSB EQU ASCB+60 02121000 ASCBCSCB EQU ASCB+56 02122000 ASCBRSMA EQU ASCBRSM+1 02123000 ASCBRV54 EQU ASCBRSMF 02124000 ASCBRV53 EQU ASCBRSMF 02125000 ASCBRV52 EQU ASCBRSMF 02126000 ASCBRV51 EQU ASCBRSMF 02127000 ASCBVEQR EQU ASCBRSMF 02128000 ASCBN2LP EQU ASCBRSMF 02129000 ASCB1LPU EQU ASCBRSMF 02130000 ASCB2LPU EQU ASCBRSMF 02131000 ASCBLDA EQU ASCB+48 02132000 ASCBSTOR EQU ASCB+44 02133000 ASCBDP EQU ASCB+43 02134000 ASCBRV07 EQU ASCB+42 02135000 ASCBIOSM EQU ASCB+40 02136000 ASCBSEQN EQU ASCB+38 02137000 ASCBASID EQU ASCB+36 02138000 ASCBCPUS EQU ASCB+32 02139000 ASCBSPL EQU ASCB+28 02140000 ASCBIOSP EQU ASCB+24 02141000 ASCBSYNC EQU ASCBSUPC+4 02142000 ASCBSVRB EQU ASCBSUPC 02143000 ASCBCMSF EQU ASCB+12 02144000 ASCBBWDP EQU ASCB+8 02145000 ASCBFWDP EQU ASCB+4 02146000 ASCBASCB EQU ASCB 02147000 ASCBEGIN EQU ASCB 02148000 RRPAEND EQU RRPA+24 02149000 RRPARTN EQU RRPAINS 02150000 RRPARTC EQU RRPA+11 02151000 RRPAKEY EQU RRPA+10 02152000 RRPARCI EQU RRPAFLG+1 02153000 RRPARFI EQU RRPAFLG+1 02154000 RRPARTI EQU RRPAFLG+1 02155000 RRPACTL EQU RRPAFLG+1 02156000 RRPAF11 EQU RRPAFLG+1 02157000 RRPAIPS EQU RRPAFLG+1 02158000 RRPAWAR EQU RRPAFLG+1 02159000 RRPAF07 EQU RRPAFLG 02160000 RRPAOPT EQU RRPAFLG 02161000 RRPAF05 EQU RRPAFLG 02162000 RRPAF04 EQU RRPAFLG 02163000 RRPADSP EQU RRPAFLG 02164000 RRPASVC EQU RRPAFLG 02165000 RRPAENB EQU RRPAFLG 02166000 RRPADSB EQU RRPAFLG 02167000 RRPAVLU EQU RRPAINP 02168000 RRPACOD EQU RRPAINC+3 02169000 @NM00002 EQU RRPAFLG0 02170000 RRPANSWI EQU RRPAFLG0 02171000 RRPAASD EQU RRPAINC 02172000 EPSTEND EQU EPST+80 02173000 EPSTCSI EQU RMEPBCSI 02174000 EPSTCSO EQU RMEPBCSO 02175000 EPSTCL3 EQU RMEPBCL3 02176000 EPSTIL3 EQU RMEPBIL3 02177000 EPSTWM3 EQU RMEPBWM3 02178000 EPDTEND EQU EPDT+96 02179000 RMEPBRPS EQU EPDT+80 02180000 RMEPBHIT EQU EPDT+64 02181000 RMEPBUXB EQU EPDT+48 02182000 RMEPBIL4 EQU EPDT+32 02183000 RMEPBDEL EQU EPDT+16 02184000 RMEPBIPS EQU EPDT 02185000 EPATEND EQU EPAT+400 02186000 RMEPBPR1 EQU EPAT+368 02187000 RMEPBEQ1 EQU EPAT+336 02188000 RMEPBAP1 EQU EPAT+304 02189000 RMEPBCL1 EQU EPAT+272 02190000 RMEPBWM2 EQU EPAT+240 02191000 RMEPBIL1 EQU EPAT+208 02192000 RMEPBASM EQU EPAT+176 02193000 RMEPBMS2 EQU EPAT+160 02194000 RMEPBPR5 EQU EPAT+144 02195000 RMEPBMS6 EQU EPAT+112 02196000 RMEPBSQA EQU EPAT+96 02197000 RMEPBRM2 EQU EPAT+64 02198000 RMEPBRM1 EQU EPAT+32 02199000 RMEPBCAP EQU EPAT 02200000 RMSBEND EQU RMSB+120 02201000 RMSBRA9 EQU RMSB+116 02202000 RMSBIL0 EQU RMSB+112 02203000 RMSBCL0 EQU RMSB+108 02204000 RMSBRA6 EQU RMSB+104 02205000 RMSBNOP EQU RMSB+100 02206000 RMSBSET EQU RMSB+96 02207000 RMSBWR6 EQU RMSB+92 02208000 RMSBWR4 EQU RMSB+88 02209000 RMSBTRC EQU RMSB+84 02210000 RMSBWMY EQU RMSB+80 02211000 RMSBWMR EQU RMSB+76 02212000 RMSBWMQ EQU RMSB+72 02213000 RMSBWMO EQU RMSB+68 02214000 RMSBWMN EQU RMSB+64 02215000 RMSBWMK EQU RMSB+60 02216000 RMSBWM4 EQU RMSB+56 02217000 RMSBWM5 EQU RMSB+48 02218000 RMSBCRY EQU RMSB+44 02219000 RMSBCRN EQU RMSB+40 02220000 RMSBCRL EQU RMSB+36 02221000 RMSBI10 EQU RMSB+32 02222000 RMSBI09 EQU RMSB+28 02223000 RMSBR24 EQU RMSB+24 02224000 RMSBI07 EQU RMSB+20 02225000 RMSBI06 EQU RMSB+16 02226000 RMSBI05 EQU RMSB+12 02227000 RMSBI04 EQU RMSB+8 02228000 RMSBI03 EQU RMSB+4 02229000 RMSBI02 EQU RMSB 02230000 RMEXEND EQU RMEX+64 02231000 RMEXSRE EQU RMEX+60 02232000 RMEXXPE EQU RMEX+56 02233000 RMEXRR2 EQU RMEX+52 02234000 RMEXRR1 EQU RMEX+48 02235000 RMEXI48 EQU RMEX+44 02236000 RMEXCET EQU RMEX+40 02237000 RMEXCXX EQU RMEX+36 02238000 RMEXI01 EQU RMEX+32 02239000 RMEXCTL EQU RMEPBCTL 02240000 RMEXEVT EQU RMEPBEVT 02241000 RMCAEND EQU RMCA+168 02242000 RMCAR90 EQU RMCA+164 02243000 RMCAUSSC EQU RMCASRC+36 02244000 RMCAEXSC EQU RMCASRC+32 02245000 RMCANQSC EQU RMCASRC+28 02246000 RMCARQSC EQU RMCASRC+24 02247000 RMCADWSC EQU RMCASRC+20 02248000 RMCARSSC EQU RMCASRC+16 02249000 RMCAXSSC EQU RMCASRC+12 02250000 RMCALWSC EQU RMCASRC+8 02251000 RMCATISC EQU RMCASRC+4 02252000 RMCATOSC EQU RMCASRC 02253000 RMCACPW1 EQU RMCA+120 02254000 RMCACIUS EQU RMCA+118 02255000 RMCAR14 EQU RMCA+116 02256000 RMCAR13 EQU RMCA+112 02257000 RMCAWKA EQU RMCA+80 02258000 RMCAMAS EQU RMCA+76 02259000 RMCAR20 EQU RMCA+74 02260000 RMCABCPG EQU RMCA+73 02261000 RMCALGPG EQU RMCA+72 02262000 RMCAISV EQU RMCA+70 02263000 RMCAR11 EQU RMCA+68 02264000 RMCAINV EQU RMCA+64 02265000 RMCAR10 EQU RMCA+60 02266000 RMCARSV9 EQU RMCA+56 02267000 RMCACHU EQU RMCA+52 02268000 RMCACHP EQU RMCA+48 02269000 RMCARSV8 EQU RMCA+44 02270000 RMCARSV7 EQU RMCA+40 02271000 RMCARSVF EQU RMCAFLGS 02272000 RMCASAAF EQU RMCAFLGS 02273000 RMCARSV5 EQU RMCA+32 02274000 RMCARSV4 EQU RMCA+28 02275000 RMCARSV3 EQU RMCA+24 02276000 RMCATOI EQU RMCA+20 02277000 RMCATRS EQU RMCA+16 02278000 RMCATQS EQU RMCA+12 02279000 RMCARSV2 EQU RMCA+10 02280000 RMCARSV1 EQU RMCA+8 02281000 RMCAINUS EQU RMCA+6 02282000 RMCAR04 EQU RMCA+4 02283000 RMCANAME EQU RMCA 02284000 RMPTEND EQU RMPT+72 02285000 RMPTOPE EQU RMPT+66 02286000 RMPTOPI EQU RMPT+63 02287000 RMPTOPC EQU RMPT+60 02288000 RMPTIOET EQU RMPT+56 02289000 RMPTCPET EQU RMPT+52 02290000 RMPTSAET EQU RMPT+44 02291000 RMPTXCHT EQU RMPT+40 02292000 RMPTRSV3 EQU RMPT+38 02293000 RMPTRSV2 EQU RMPT+36 02294000 RMPTRSV1 EQU RMPT+32 02295000 RMPTTOL EQU RMPT+28 02296000 RMPTTOM EQU RMPT+24 02297000 RMPTTCS EQU RMPT+20 02298000 RMPTIMN EQU RMPT+16 02299000 RMPTERV EQU RMPT+12 02300000 RMPTIOC EQU RMPT+8 02301000 RMPTCPU EQU RMPT+4 02302000 RMPTNAME EQU RMPT 02303000 RCTEND EQU RCT+88 02304000 RCVRSVF3 EQU RCT+84 02305000 RCVRSVF2 EQU RCT+80 02306000 RCVTAPAD EQU RCT+76 02307000 RCVRSVF1 EQU RCT+74 02308000 RCCRSVF3 EQU RCT+32 02309000 RCCRSVF2 EQU RCT+28 02310000 RCCRSVF1 EQU RCT+26 02311000 RCTRCT EQU RCT 02312000 MCTEND EQU MCT+96 02313000 MCVRSVF3 EQU MCT+92 02314000 MCVRSVF2 EQU MCT+88 02315000 MCVRSVF1 EQU MCT+84 02316000 MCCINTMX EQU MCT+80 02317000 MCCPR1IN EQU MCT+76 02318000 MCCUICIN EQU MCT+72 02319000 MCCUICBD EQU MCT+68 02320000 MCTRSVB1 EQU MCT+67 02321000 MCTXRSVD EQU MCT+66 02322000 MCTFX2 EQU MCTOFLGS 02323000 MCTFX1 EQU MCTOFLGS 02324000 MCTSMS2 EQU MCTOFLGS 02325000 MCTSMS1 EQU MCTOFLGS 02326000 MCTAMS2 EQU MCTOFLGS 02327000 @NM00001 EQU MCTOFLGS 02328000 MCTASM2 EQU MCTOFLGS 02329000 MCTASM1 EQU MCTOFLGS 02330000 MCTSF04 EQU MCTSFLGS 02331000 MCTFAVQ EQU MCTSFLGS 02332000 MCTAVQ1 EQU MCTSFLGS 02333000 MCTSQA2 EQU MCTSFLGS 02334000 MCTSQA1 EQU MCTSFLGS 02335000 MCVFRCNT EQU MCT+58 02336000 MCCEND EQU MCT+56 02337000 MCCASMT2 EQU MCT+54 02338000 MCCASMT1 EQU MCT+52 02339000 MCCRSVH1 EQU MCT+50 02340000 MCCPLUS EQU MCT+48 02341000 MCCMS403 EQU MCT+44 02342000 MCCMS402 EQU MCT+40 02343000 MCCMS401 EQU MCT+36 02344000 MCCMS400 EQU MCT+32 02345000 MCCMS203 EQU MCT+28 02346000 MCCMS202 EQU MCT+24 02347000 MCCMS201 EQU MCT+20 02348000 MCCMS200 EQU MCT+16 02349000 MCCMS102 EQU MCT+12 02350000 MCCMS101 EQU MCT+8 02351000 MCCMS100 EQU MCT+4 02352000 MCTMCT EQU MCT 02353000 ICTEND EQU ICT+88 02354000 ICTRSVB3 EQU ICT+87 02355000 ICTRSVB2 EQU ICT+86 02356000 ICTRSVB1 EQU ICT+85 02357000 ICT003 EQU ICTFLAGS 02358000 ICTIOOT EQU ICTFLAGS 02359000 ICTIOL EQU ICTFLAGS 02360000 ICTDRSV4 EQU ICTFLAGS 02361000 ICVIRSV3 EQU ICT+80 02362000 ICVULCBT EQU ICT+76 02363000 ICVOLCBT EQU ICT+72 02364000 ICVLCBPT EQU ICT+68 02365000 ICVLUTBT EQU ICT+64 02366000 ICCEND EQU ICT+64 02367000 ICCRSV01 EQU ICT+62 02368000 ICCEDSUT EQU ICT+60 02369000 ICCSRSV2 EQU ICT+58 02370000 ICCSIGUP EQU ICT+56 02371000 ICCINDAT EQU ICT+52 02372000 ICCINLOT EQU ICT+48 02373000 ICCINHIT EQU ICT+44 02374000 ICCDAUTH EQU ICT+42 02375000 ICCLOUTH EQU ICT+40 02376000 ICCHIUTH EQU ICT+38 02377000 ICCDASF2 EQU ICT+36 02378000 ICCDASF1 EQU ICT+34 02379000 ICCMINRV EQU ICT+32 02380000 ICCMAXRV EQU ICT+30 02381000 ICCRVSCF EQU ICT+28 02382000 ICCMNIOR EQU ICT+26 02383000 ICCLCHN EQU ICT+24 02384000 ICCMNSWP EQU ICT+16 02385000 ICCMNUIN EQU ICT+12 02386000 ICCMXICT EQU ICT+8 02387000 ICCMRSV1 EQU ICT+4 02388000 ICTICT EQU ICT 02389000 CCVEND EQU CCT+128 02390000 CCTFLG2 EQU CCT+125 02391000 CCTCPUOT EQU CCTFLG1 02392000 CCTALL EQU CCTFLG1 02393000 CCVCPUCT EQU CCT+122 02394000 CCVENQCT EQU CCT+120 02395000 CCVLGFMC EQU CCT+118 02396000 CCVLGUTL EQU CCT+116 02397000 CCVR07 EQU CCT+114 02398000 CCVR06 EQU CCT+112 02399000 CCVR05 EQU CCT+108 02400000 CCVIMBBT EQU CCT+104 02401000 CCVEJST EQU CCT+100 02402000 CCVPGCPF EQU CCT+96 02403000 CCVRVSWF EQU CCT+92 02404000 CCVRBSTD EQU CCT+88 02405000 CCVR04 EQU CCT+84 02406000 CCVRBSWT EQU CCT+80 02407000 CCVR03 EQU CCT+76 02408000 CCCEND EQU CCT+76 02409000 CCCRSVH1 EQU CCT+74 02410000 CCCSCFC2 EQU CCT+72 02411000 CCCSCFC1 EQU CCT+70 02412000 CCCR02 EQU CCT+68 02413000 CCCSIGUR EQU CCT+66 02414000 CCCSIGDP EQU CCT+64 02415000 CCCSCFAC EQU CCT+62 02416000 CCCMINRV EQU CCT+60 02417000 CCCMAXRV EQU CCT+58 02418000 CCCLOSCF EQU CCT+56 02419000 CCCHISCF EQU CCT+54 02420000 CCCUTLOT EQU CCT+52 02421000 CCCUTHIT EQU CCT+50 02422000 CCCAPRHT EQU CCT+48 02423000 CCCAPRLT EQU CCT+46 02424000 CCCR01 EQU CCT+44 02425000 CCCAPGDP EQU CCT+42 02426000 CCCAPMDP EQU CCT+40 02427000 CCCAPLDP EQU CCT+38 02428000 CCCAPBDP EQU CCT+36 02429000 CCCAPROT EQU CCT+34 02430000 CCCAPDIV EQU CCT+32 02431000 CCCRSVF1 EQU CCT+28 02432000 CCCMNSIN EQU CCT+24 02433000 CCCMNUIN EQU CCT+20 02434000 CCCAPDEL EQU CCT+16 02435000 CCCAPMAX EQU CCT+12 02436000 CCCAPMIN EQU CCT+8 02437000 CCCAPMET EQU CCT+4 02438000 CCTCCT EQU CCT 02439000 RMCTEND EQU RMCT+192 02440000 RMCTR50 EQU RMCT+190 02441000 RMCTDMNC EQU RMCT+188 02442000 RMCTSRBT EQU RMCT+176 02443000 RMCTOUXB EQU RMCT+172 02444000 RMCTOUCB EQU RMCT+168 02445000 RMCTTOCI EQU RMCT+160 02446000 RMCTCPID EQU RMCT+156 02447000 RMCTTELM EQU RMCT+152 02448000 RMCTF09 EQU RMCTFLGS+1 02449000 RMCTMFS EQU RMCTFLGS+1 02450000 RMCTF07 EQU RMCTFLGS+1 02451000 RMCTF06 EQU RMCTFLGS 02452000 RMCTRSV2 EQU RMCTFLGS 02453000 RMCTSTW EQU RMCTFLGS 02454000 RMCTRSV1 EQU RMCTFLGS 02455000 RMCTINIT EQU RMCTFLGS 02456000 RMCTF03 EQU RMCTFLGS 02457000 RMCTCPS1 EQU RMCTFLGS 02458000 RMCTMFA EQU RMCTFLGS 02459000 RMCTRQSV EQU RMCT+144 02460000 RMCTALR EQU RMCT+140 02461000 RMCTALA EQU RMCT+136 02462000 RMCTTOC EQU RMCT+128 02463000 RMCTTBS EQU RMCT+120 02464000 RMCTR10 EQU RMCT+116 02465000 RMCTOTQE EQU RMCT+108 02466000 RMCTWTQE EQU RMCT+104 02467000 RMCTAQHD EQU RMCT+100 02468000 RMCTAQCT EQU RMCT+96 02469000 RMCTTMQE EQU RMCT+92 02470000 RMCTWAMT EQU RMCT+88 02471000 RMCTWAST EQU RMCT+84 02472000 RMCTEPPR EQU RMCT+80 02473000 RMCTFLTM EQU RMCT+76 02474000 RMCTEPET EQU RMCT+72 02475000 RMCTITT EQU RMCT+68 02476000 RMCTADJC EQU RMCT+64 02477000 RMCTEPBG EQU RMCT+60 02478000 RMCTEPAT EQU RMCT+56 02479000 RMCTEPDT EQU RMCT+52 02480000 RMCTEPPA EQU RMCT+48 02481000 RMCTRMSB EQU RMCT+44 02482000 RMCTRMEX EQU RMCT+40 02483000 RMCTRMPD EQU RMCT+36 02484000 RMCTRMSA EQU RMCT+32 02485000 RMCTRMCA EQU RMCT+20 02486000 RMCTRMPT EQU RMCT+16 02487000 RMCTMCT EQU RMCT+12 02488000 RMCTICT EQU RMCT+8 02489000 RMCTCCT EQU RMCT+4 02490000 RMCTNAME EQU RMCT 02491000 @NM00031 EQU PSA+3668 02492000 PSASTAK EQU PSA+3072 02493000 @NM00030 EQU PSA+1048 02494000 PSAUSEND EQU PSA+1048 02495000 PSARV062 EQU PSA+1044 02496000 PSACDAL EQU PSA+1040 02497000 PSAWTCOD EQU PSA+1036 02498000 PSAATCVT EQU PSA+1032 02499000 PSAPCPSW EQU PSA+1024 02500000 PSAPIR2 EQU PSA+1020 02501000 PSARV059 EQU PSA+1018 02502000 PSASVC13 EQU PSA+1016 02503000 PSALSFCC EQU PSA+1012 02504000 PSASFACC EQU PSA+1008 02505000 PSASTOP EQU PSA+992 02506000 PSASTART EQU PSA+976 02507000 PSARSPSW EQU PSA+968 02508000 PSASRPSW EQU PSA+960 02509000 PSARV045 EQU PSA+892 02510000 PSARV044 EQU PSA+888 02511000 PSARV043 EQU PSA+884 02512000 PSARV042 EQU PSA+880 02513000 PSARV041 EQU PSA+876 02514000 PSARV040 EQU PSA+872 02515000 PSARV025 EQU PSA+868 02516000 PSADSSED EQU PSA+868 02517000 PSADSSPR EQU PSA+864 02518000 PSADSSFW EQU PSA+860 02519000 PSADSS14 EQU PSA+856 02520000 PSADSSPP EQU PSA+848 02521000 PSADSSRP EQU PSA+840 02522000 PSADSS05 EQU PSADSSF4 02523000 PSADSS10 EQU PSADSSF4 02524000 PSADSSVE EQU PSADSSF4 02525000 PSADSSDE EQU PSADSSF4 02526000 PSADSSC0 EQU PSADSSF4 02527000 PSADSSIE EQU PSADSSF4 02528000 PSADSS12 EQU PSADSSF4 02529000 PSADSSRC EQU PSADSSF4 02530000 PSARV057 EQU PSADSSF3 02531000 PSARV056 EQU PSADSSF3 02532000 PSARV055 EQU PSADSSF3 02533000 PSADSSMC EQU PSADSSF3 02534000 PSADSSRW EQU PSADSSF3 02535000 PSADSSNM EQU PSADSSF3 02536000 PSADSSES EQU PSADSSF3 02537000 PSADSSGP EQU PSADSSF3 02538000 PSADSSF2 EQU PSADSSFL+1 02539000 PSADSSPI EQU PSADSSF1 02540000 PSADSSOI EQU PSADSSF1 02541000 PSADSSSP EQU PSADSSF1 02542000 PSADSSTP EQU PSADSSF1 02543000 PSADSSDW EQU PSADSSF1 02544000 PSADSSDD EQU PSADSSF1 02545000 PSADSSDM EQU PSADSSF1 02546000 PSADSSMV EQU PSADSSF1 02547000 PSADSSTS EQU PSA+816 02548000 PSADSSWK EQU PSA+812 02549000 PSADSSR3 EQU PSA+808 02550000 PSADSSR2 EQU PSA+804 02551000 PSADSSRS EQU PSA+800 02552000 PSASTOR EQU PSA+796 02553000 PSACPUSA EQU PSA+794 02554000 PSAVSTAP EQU PSA+792 02555000 PSAWKVAP EQU PSA+788 02556000 PSAWKRAP EQU PSA+784 02557000 PSAMCHIC EQU PSA+783 02558000 PSARV061 EQU PSA+782 02559000 PSASYMSK EQU PSA+781 02560000 PSAMCHFL EQU PSA+780 02561000 PSACR0 EQU PSA+776 02562000 PSAPSWSV EQU PSA+768 02563000 PSALITA EQU PSA+764 02564000 PSACLHS EQU PSAHLHI 02565000 PSALKR15 EQU PSALKSA+60 02566000 PSALKR14 EQU PSALKSA+56 02567000 PSALKR13 EQU PSALKSA+52 02568000 PSALKR12 EQU PSALKSA+48 02569000 PSALKR11 EQU PSALKSA+44 02570000 PSALKR10 EQU PSALKSA+40 02571000 PSALKR9 EQU PSALKSA+36 02572000 PSALKR8 EQU PSALKSA+32 02573000 PSALKR7 EQU PSALKSA+28 02574000 PSALKR6 EQU PSALKSA+24 02575000 PSALKR5 EQU PSALKSA+20 02576000 PSALKR4 EQU PSALKSA+16 02577000 PSALKR3 EQU PSALKSA+12 02578000 PSALKR2 EQU PSALKSA+8 02579000 PSALKR1 EQU PSALKSA+4 02580000 PSALKR0 EQU PSALKSA 02581000 PSARV023 EQU PSACLHT+52 02582000 PSALOCAL EQU PSACLHT+48 02583000 PSACMSL EQU PSACLHT+44 02584000 PSAOPTL EQU PSACLHT+40 02585000 PSATPACL EQU PSACLHT+36 02586000 PSATPDNL EQU PSACLHT+32 02587000 PSATPNCL EQU PSACLHT+28 02588000 PSAIOSLL EQU PSACLHT+24 02589000 PSAIOSUL EQU PSACLHT+20 02590000 PSAIOSCL EQU PSACLHT+16 02591000 PSAIOSSL EQU PSACLHT+12 02592000 PSASALCL EQU PSACLHT+8 02593000 PSAASML EQU PSACLHT+4 02594000 PSADISPL EQU PSACLHT 02595000 PSASRSA EQU PSA+636 02596000 PSARV050 EQU PSA+634 02597000 PSADSSGO EQU PSA+633 02598000 PSARECUR EQU PSA+632 02599000 PSAHLHIS EQU PSA+628 02600000 PSAIPCSA EQU PSA+624 02601000 @NM00029 EQU PSA+621 02602000 PSAIPCDM EQU PSA+620 02603000 PSAIPCD EQU PSA+616 02604000 @NM00028 EQU PSA+613 02605000 PSAIPCRM EQU PSA+612 02606000 PSAIPCR EQU PSA+608 02607000 PSAMCHEX EQU PSA+600 02608000 PSAMPSW EQU PSA+592 02609000 PSAEXPS2 EQU PSA+584 02610000 PSAEXPS1 EQU PSA+576 02611000 PSAPIREG EQU PSA+572 02612000 PSARSREG EQU PSA+568 02613000 PSAGPREG EQU PSA+556 02614000 PSARV022 EQU PSASUP4 02615000 PSARV021 EQU PSASUP4 02616000 PSARV020 EQU PSASUP4 02617000 PSARV019 EQU PSASUP4 02618000 PSARV018 EQU PSASUP4 02619000 PSARV017 EQU PSASUP4 02620000 PSARV016 EQU PSASUP4 02621000 PSARV015 EQU PSASUP4 02622000 PSARV014 EQU PSASUP3 02623000 PSAULCMS EQU PSASUP3 02624000 PSARV012 EQU PSASUP3 02625000 PSAESTA EQU PSASUP3 02626000 PSASPR EQU PSASUP3 02627000 PSAPSREG EQU PSASUP3 02628000 PSAPI2 EQU PSASUP3 02629000 PSAIOSUP EQU PSASUP3 02630000 PSALCR EQU PSASUP2 02631000 PSARTM EQU PSASUP2 02632000 PSAACR EQU PSASUP2 02633000 PSAIPCE2 EQU PSASUP2 02634000 PSAIPCES EQU PSASUP2 02635000 PSAIPCEC EQU PSASUP2 02636000 PSAGTF EQU PSASUP2 02637000 PSAIPCRI EQU PSASUP2 02638000 PSATYPE6 EQU PSASUP1 02639000 PSATCTL EQU PSASUP1 02640000 PSADISP EQU PSASUP1 02641000 PSALOCK EQU PSASUP1 02642000 PSAPI EQU PSASUP1 02643000 PSAEXT EQU PSASUP1 02644000 PSASVC EQU PSASUP1 02645000 PSAIO EQU PSASUP1 02646000 PSAAOLD EQU PSA+548 02647000 PSAANEW EQU PSA+544 02648000 PSATOLD EQU PSA+540 02649000 PSATNEW EQU PSA+536 02650000 PSALCCAR EQU PSA+532 02651000 PSALCCAV EQU PSA+528 02652000 PSAPCCAR EQU PSA+524 02653000 PSAPCCAV EQU PSA+520 02654000 PSACPULA EQU PSA+518 02655000 PSACPUPA EQU PSA+516 02656000 PSAPSA EQU PSA+512 02657000 FLCHDEND EQU PSA+512 02658000 FLCCRSAV EQU FLCMCLA+280 02659000 FLCGRSAV EQU FLCMCLA+216 02660000 FLCFPSAV EQU FLCMCLA+184 02661000 FLCFLA EQU FLCMCLA+88 02662000 FLCRGNCD EQU FLCMCLA+84 02663000 FLCFSAA EQU FLCFSA+1 02664000 @NM00027 EQU FLCFSA 02665000 @NM00026 EQU FLCMCLA+72 02666000 FLCMCIC EQU FLCMCLA+64 02667000 @NM00025 EQU FLCMCLA+20 02668000 FLCIOAA EQU FLCIOA+1 02669000 @NM00024 EQU FLCIOA 02670000 @NM00023 EQU FLCMCLA+15 02671000 @NM00022 EQU FLCMCLA+14 02672000 @NM00021 EQU FLCMCLA+12 02673000 FLCLCL EQU FLCMCLA+8 02674000 FLCIOELA EQU FLCIOEL+1 02675000 @NM00020 EQU FLCIOEL 02676000 FLCCHNID EQU FLCMCLA 02677000 @NM00019 EQU PSA+160 02678000 FLCMTRCD EQU PSA+157 02679000 @NM00018 EQU PSA+156 02680000 FLCPERA EQU FLCPER+1 02681000 @NM00017 EQU FLCPER 02682000 @NM00016 EQU PSA+151 02683000 FLCPERCD EQU PSA+150 02684000 FLCMCNUM EQU PSA+149 02685000 @NM00015 EQU PSA+148 02686000 FLCTEAA EQU FLCTEA+1 02687000 @NM00014 EQU FLCTEA 02688000 PSAPIPC EQU PSAPICOD 02689000 PSAPIMC EQU PSAPICOD 02690000 PSAPIPER EQU PSAPICOD 02691000 PSARV049 EQU FLCPICOD 02692000 FLCPILCB EQU FLCPIILC 02693000 @NM00013 EQU FLCPIILC 02694000 @NM00012 EQU PSAEPPSW 02695000 FLCSVCN EQU PSAESPSW+2 02696000 FLCSILCB EQU FLCSVILC 02697000 @NM00011 EQU FLCSVILC 02698000 @NM00010 EQU PSAESPSW 02699000 FLCEICOD EQU PSAEEPSW+2 02700000 PSASPAD EQU PSAEEPSW 02701000 @NM00009 EQU PSA+128 02702000 FLCINPSW EQU PSA+120 02703000 FLCMNPSW EQU PSA+112 02704000 FLCPNPSW EQU PSA+104 02705000 FLCSNPSW EQU PSA+96 02706000 FLCENPSW EQU PSA+88 02707000 FLCTRACE EQU PSA+84 02708000 FLCTIMER EQU PSA+80 02709000 FLCCVT2 EQU PSA+76 02710000 FLCCAW EQU PSA+72 02711000 FLCCSW EQU PSA+64 02712000 FLCIOPSW EQU PSA+56 02713000 FLCMOPSW EQU PSA+48 02714000 FLCPOPSW EQU PSA+40 02715000 FLCSOPSW EQU PSA+32 02716000 FLCEOPSW EQU PSA+24 02717000 @NM00008 EQU FLCICCW2+4 02718000 FLCICCW1 EQU FLCROPSW 02719000 FLCIPPSW EQU FLCRNPSW 02720000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 02721000 @RF00112 EQU @RC00104 02722000 @ENDDATA EQU * 02723000 END IRARMRMR,(C'PLS1730',0701,78095) 02724000