TITLE 'IEAVSWPC - SWAPOUT COMPLETION ROUTINE *00001000 ' 00002000 IEAVSWPC CSECT 00003000 USING *,R15 00004000 MODID 00005000 L R15,CVTPTR GET CVT ADDRESS 00006000 L R15,CVTPVTP(R15) GET PVT ADDRESS 00007000 STM R1,R14,PVTWSA18+12(R15) SAVE CALLER'S REGISTERS IN PVT 00008000 DROP R15 00009000 BASE1 BALR BASEREG,0 ESTABLISH BASE REGISTER 00010000 DS 0H 00011000 USING *,BASEREG 00012000 * PVTPTR=CVTPVTP; /* GET ADDRESS OF PVT */ 00013000 L @15,CVTPTR 0092 00014000 L PVTPTR,CVTPVTP(,@15) 0092 00015000 * RTNCODE=R0; /* SAVE RETURN CODE FROM ASM */ 00016000 LR RTNCODE,R0 0093 00017000 * AIAPTR=R1; /* SAVE INPUT AIA POINTER */ 00018000 LR AIAPTR,R1 0094 00019000 *ESTFRR: 0095 00020000 * GENERATE NODEFS REFS(PSACSTK,PSACSTK,FRRSCURR,PVTPTR,FRRSLAST, 0095 00021000 * FRRSELEN,FRRSENTR,FRRSFRRA,FRRSPARM,PVTPRCV) SETS(R4,R5,RCAPTR) 00022000 * NOFLOWS; 0095 00023000 ESTFRR DS 0H 0095 00024000 SETFRR A,FRRAD=PVTPRCV(PVTPTR),PARMAD=(RCAPTR),WRKREGS=(R4,R5), **00025000 RELATED=(RSM,IEAVSWPC(DELTEFRR)) 00026000 * RCACSECT=RCACSWPC; /* SET CSECT ID FOR SWPC */ 00027000 MVI RCACSECT(RCAPTR),X'12' 0096 00028000 * RCASWPC=ON; /* SET MODULE ENTERED BIT */ 00029000 OI RCASWPC(RCAPTR),B'00000010' 0097 00030000 * PVTPRCA=RCAPTR; /* STORE ADDRESS OF RCA */ 00031000 ST RCAPTR,PVTPRCA(,PVTPTR) 0098 00032000 * PCBPTR=AIAPTR-(LENGTH(PCB)-LENGTH(PCBAIA));/* CALCULATE THE PCB 00033000 * ADDRESS */ 00034000 LR PCBPTR,AIAPTR 0099 00035000 SL PCBPTR,@CF02181 0099 00036000 * RCAPARM0=PCBPTR; /* SAVE THE ADDRESS OF THE INPUT 00037000 * PCB IN CASE OF AN ERROR */ 00038000 ST PCBPTR,RCAPARM0(,RCAPTR) 0100 00039000 * RCARETAD=ADDR(SWPCEFRR); /* SET ADDRESS TO WHICH THE FRR 00040000 * WILL GIVE CONTROL */ 00041000 LA @15,SWPCEFRR 0101 00042000 ST @15,RCARETAD(,RCAPTR) 0101 00043000 * RSMHDPTR=PCBASCB->ASCBRSM; /* GET RSM HEADER ADDRESS */ 00044000 L @15,PCBASCB(,PCBPTR) 0102 00045000 L RSMHDPTR,ASCBRSM(,@15) 0102 00046000 * RFY 0103 00047000 * SOUTPARM BASED(SOUTPPTR); 0103 00048000 * SPCTPTR=RSMSPCT; /* GET SPCT PTR */ 00049000 L SPCTPTR,RSMSPCT(,RSMHDPTR) 0104 00050000 * RFY 0105 00051000 * SOUTPPTR RSTD; 0105 00052000 * SOUTPPTR=SPCTSWRT; /* GET THE ADDRESS OF THE SPECIAL 00053000 * PCB CONTAINING THE SRM 0106 00054000 * PARAMETER LIST */ 00055000 L SOUTPPTR,SPCTSWRT(,SPCTPTR) 0106 00056000 * IF SPCTPURG=ON THEN /* WAS PAGING PURGED DURING SWAP 00057000 * OUT? */ 00058000 * 0107 00059000 TM SPCTPURG(SPCTPTR),B'00100000' 0107 00060000 BNO @RF00107 0107 00061000 * /***************************************************************/ 00062000 * /* */ 00063000 * /* NOTE THAT BIT IS SET BY SWAP OUT WHEN THE ROOT COUNT IS */ 00064000 * /* DECREMENTED TO ZERO OR WHEN RESET IS CALLED */ 00065000 * /* */ 00066000 * /***************************************************************/ 00067000 * 0108 00068000 * OPTWAIT=ON; /* YES, INDICATE TO THE SRM THAT 00069000 * THERE IS WORK AVAILABLE IN 0108 00070000 * THIS ADDRESS SPACE */ 00071000 OI OPTWAIT(SOUTPPTR),B'00000001' 0108 00072000 * IF AIAPAGDS=ON THEN /* WERE THE LSQA PAGES ALLOCATED 00073000 * TO A SWAP SET DATA SET; */ 00074000 @RF00107 TM AIAPAGDS(AIAPTR),B'00000100' 0109 00075000 BNO @RF00109 0109 00076000 * SPCTPSET=ON; /* YES, INDICATE SO IN SPCT */ 00077000 OI SPCTPSET(SPCTPTR),B'00001000' 0110 00078000 * R1=ZERO; /* INDICATE TO IEAVINV TO DO 0111 00079000 * PTLB'S ONLY */ 00080000 @RF00109 SLR R1,R1 0111 00081000 * CALL IEAVINV; /* CALL INVALIDATE TO ISSUE 0112 00082000 * PTLB'S */ 00083000 L @15,PVTPINV(,PVTPTR) 0112 00084000 BALR @14,@15 0112 00085000 * IF RTNCODE=ZERO THEN /* WAS SWAP SUCCESSFUL */ 00086000 LTR RTNCODE,RTNCODE 0113 00087000 BNZ @RF00113 0113 00088000 * DO; /* YES, SWAP WAS SUCCESFUL. ZERO 00089000 * RETURN CODE WAS RECEIVED FROM 00090000 * ILRSWAP */ 00091000 * PVTSPOUT=PVTSPOUT+OPTSOUT; /* INCREMENT THE SWAPOUT COUNT */ 00092000 LH @15,OPTSOUT(,SOUTPPTR) 0115 00093000 AL @15,PVTSPOUT(,PVTPTR) 0115 00094000 ST @15,PVTSPOUT(,PVTPTR) 0115 00095000 * R1=ADDR(OPTLIST); /* SET UP PARMETER FOR SYSEVENT */ 00096000 LA R1,OPTLIST(,SOUTPPTR) 0116 00097000 * R0=PCBASCB->ASCBASID; /* GET ASID OF SWAPPED OUT 0117 00098000 * ADDRESS SPACE */ 00099000 L @15,PCBASCB(,PCBPTR) 0117 00100000 LH R0,ASCBASID(,@15) 0117 00101000 N R0,@CF02185 0117 00102000 * R13=ADDR(PVTSAVE); /* GET SAVE AREA ADDRESS FOR SRM */ 00103000 LA R13,PVTSAVE(,PVTPTR) 0118 00104000 * GENERATE CODE; 0119 00105000 SYSEVENT SWOUTCMP,ASID=(0),ENTRY=BRANCH 00106000 * END; /* END OF INITIAL PROCESSING OF A 00107000 * GOOD RETURN CODE FROM ILRSWAP */ 00108000 * ELSE 0121 00109000 * DO; 0121 00110000 * 0121 00111000 B @RC00113 0121 00112000 @RF00113 DS 0H 0122 00113000 * /*************************************************************/ 00114000 * /* */ 00115000 * /* CONTROL FALLS HERE WHEN IEAVSWPC IS ENTERED WITH A */ 00116000 * /* NON-ZERO RETURN CODE. A RECORDING ABEND IS ISSUED. */ 00117000 * /* */ 00118000 * /*************************************************************/ 00119000 * 0122 00120000 * RCAPTR=PVTPRCA; /* GET RCA ADDRESS */ 00121000 L RCAPTR,PVTPRCA(,PVTPTR) 0122 00122000 * RCARCRD=HEX1E; /* SET ERROR REASON CODE */ 00123000 MVI RCARCRD(RCAPTR),X'1E' 0123 00124000 * GENERATE CODE NOREFS SETS(R1); 0124 00125000 ABEND X'C0D',,,SYSTEM 00126000 * END; 0125 00127000 * SPCTPTR=RSMSPCT; /* GET SPCT ADDRESS */ 00128000 @RC00113 L SPCTPTR,RSMSPCT(,RSMHDPTR) 0126 00129000 * R1=SPCTSWRT; /* GET THE ADDRESS OF SPECIAL PCB 00130000 * CONTAINING THE SRM PARAMETER 00131000 * LIST */ 00132000 L R1,SPCTSWRT(,SPCTPTR) 0127 00133000 * R0=PCBFREQN; /* INDICATE TO PCB MANAGER THAT 00134000 * PCB IS TO GO TO THE FREE QUEUE*/ 00135000 LA R0,16 0128 00136000 * CALL IEAVPCB; /* CALL PCB MANAGER TO SEND 0129 00137000 * SPECIAL PCB TO THE FREE QUEUE */ 00138000 L @15,PVTPCB(,PVTPTR) 0129 00139000 BALR @14,@15 0129 00140000 * SPCTSWRT=ZERO; /* CLEAR PARMLIST PTR */ 00141000 SLR @15,@15 0130 00142000 ST @15,SPCTSWRT(,SPCTPTR) 0130 00143000 * SPCTOUT=OFF; /* INDICATE SWAP-OUT IS COMPLETE */ 00144000 NI SPCTOUT(SPCTPTR),B'10111111' 0131 00145000 * IF RTNCODE=ZERO THEN /* IS THE SWAP-OUT TO BE FAILED */ 00146000 CR RTNCODE,@15 0132 00147000 BNE @RF00132 0132 00148000 * DO; /* NO, THE SWAP-OUT IS SUCCESSFUL*/ 00149000 * 0134 00150000 * /*************************************************************/ 00151000 * /* */ 00152000 * /* THIS SECTION OF CODE FREES THE FRAMES WHICH WERE ALLOCATED*/ 00153000 * /* TO THE SWAPPED-OUT PAGES BY HAVING PFTE MANAGER PLACE THEM*/ 00154000 * /* AT THE FRONT OF THE AVAILABLE FRAME QUEUE. THE PCBS USED */ 00155000 * /* FOR THE SWAP-OUT ARE RETURNED TO THE FREE QUEUE VIA THE */ 00156000 * /* PCB MANAGER. NOTE THAT IT IS ASSUMED THAT ONLY LSQA AIAS */ 00157000 * /* ARE ON THE CHAIN. */ 00158000 * /* */ 00159000 * /*************************************************************/ 00160000 * 0134 00161000 * NXTAIA=AIAPTR; /* INITIALIZE NEXT AIA POINTER 0134 00162000 * WITH THE INPUT AIA POINTER */ 00163000 LR NXTAIA,AIAPTR 0134 00164000 *FREFMPCB: 0135 00165000 * ; 0135 00166000 * 0135 00167000 FREFMPCB DS 0H 0136 00168000 * /*************************************************************/ 00169000 * /* */ 00170000 * /* BEGINNING OF LOOP FREEING FRAMES AND PCBS */ 00171000 * /* */ 00172000 * /*************************************************************/ 00173000 * 0136 00174000 * RFY 0136 00175000 * PFTEPTR RSTD; 0136 00176000 * PFTEPTR=PVTPFTP+PCBRBN; /* CALCULATE PFTE ADDRESS */ 00177000 LH @15,PCBRBN(,PCBPTR) 0137 00178000 N @15,@CF02185 0137 00179000 L PFTEPTR,PVTPFTP(,PVTPTR) 0137 00180000 ALR PFTEPTR,@15 0137 00181000 * PFTPCBSI=OFF; /* SET PCB DEFINED FLAG OFF IN 0138 00182000 * THE PFTE */ 00183000 NI PFTPCBSI(PFTEPTR),B'11110111' 0138 00184000 * R1=PCBASCB; /* GET ASCB ADDRESS */ 00185000 L R1,PCBASCB(,PCBPTR) 0139 00186000 * R0=PCBRBN; /* GET RBN */ 00187000 LR R0,@15 0140 00188000 * R0=R0|CONSPFTE; /* INDICATE TO PFTE TO PLACE 0141 00189000 * FRAME ON FRONT OF AFQ */ 00190000 O R0,@CF02155 0141 00191000 * RSMCNTFX=RSMCNTFX-1; /* DECREMENT FIXED FRAME COUNT 0142 00192000 * FOR THIS ADDRESS SPACE 0142 00193000 * @YA01572*/ 00194000 LH @15,RSMCNTFX(,RSMHDPTR) 0142 00195000 BCTR @15,0 0142 00196000 STH @15,RSMCNTFX(,RSMHDPTR) 0142 00197000 * PVTCNTFX=PVTCNTFX-1; /* DECREMENT SYSTEM COUNT 0143 00198000 * @7A01572*/ 00199000 LH @15,PVTCNTFX(,PVTPTR) 0143 00200000 BCTR @15,0 0143 00201000 STH @15,PVTCNTFX(,PVTPTR) 0143 00202000 * CALL IEAVPFTE; /* FREE THE FRAME */ 00203000 L @15,PVTPFTE(,PVTPTR) 0144 00204000 BALR @14,@15 0144 00205000 * R0=PCBFREQN; /* GET THE FREE QUEUE ID */ 00206000 LA R0,16 0145 00207000 * R1=PCBPTR; /* GET THE ADDRESS OF THE PCB TO 00208000 * BE FREED */ 00209000 LR R1,PCBPTR 0146 00210000 * NXTAIA=NXTAIA->AIANXAIA; /* GET NEXT AIA POINTER */ 00211000 L NXTAIA,AIANXAIA(,NXTAIA) 0147 00212000 * CALL IEAVPCB; /* FREE THE PCB */ 00213000 L @15,PVTPCB(,PVTPTR) 0148 00214000 BALR @14,@15 0148 00215000 * IF NXTAIA^=ZERO THEN /* IS THERE ANOTHER AIA */ 00216000 LTR NXTAIA,NXTAIA 0149 00217000 BZ @RF00149 0149 00218000 * DO; /* YES */ 00219000 * PCBPTR=NXTAIA-(LENGTH(PCB)-LENGTH(AIA));/* CALCULATE PCB 00220000 * ADDRESS */ 00221000 LR PCBPTR,NXTAIA 0151 00222000 SL PCBPTR,@CF02181 0151 00223000 * GOTO FREFMPCB; /* GO FREE FRAME AND PCB */ 00224000 B FREFMPCB 0152 00225000 * END; 0153 00226000 * 0153 00227000 * /*************************************************************/ 00228000 * /* */ 00229000 * /* END OF LOOP FREEING FRAMES AND PCBS */ 00230000 * /* */ 00231000 * /*************************************************************/ 00232000 * 0154 00233000 * ELSE 0154 00234000 * ; 0154 00235000 @RF00149 DS 0H 0155 00236000 * END; /* END OF ZERO RETURN CODE 0155 00237000 * PROCESSING */ 00238000 * ELSE 0156 00239000 * DO; 0156 00240000 * 0156 00241000 B @RC00132 0156 00242000 @RF00132 DS 0H 0157 00243000 * /*************************************************************/ 00244000 * /* */ 00245000 * /* CONTROL FALLS HERE WHEN IEAVSWPC IS ENTERED WITH A */ 00246000 * /* NON-ZERO RETURN CODE OR IF A NON-ZERO RETURN CODE WAS */ 00247000 * /* RECEIVED FROM ASCBCHAP. IN THE PFTE(S), THE PCB DEFINED */ 00248000 * /* FLAG IS TURNED OFF. LSQA PCB/AIA(S) ARE MOVED TO THE FREE */ 00249000 * /* QUEUE. NOTE THAT THIS MODULE ASSUMES THAT ONLY LSQA AIAS */ 00250000 * /* ARE ON THE CHAIN. */ 00251000 * /* */ 00252000 * /*************************************************************/ 00253000 * 0157 00254000 * NXTAIA=AIAPTR; /* INITIALIZE THE NEXT AIA PTR 0157 00255000 * WITH THE INPUT AIA ADDRESS */ 00256000 LR NXTAIA,AIAPTR 0157 00257000 *FREEPCB: 0158 00258000 * ; /* BEGINNING OF LOOP SETTING 0158 00259000 * PFTPCBSI OFF AND FREEING 0158 00260000 * PCB(S) */ 00261000 FREEPCB DS 0H 0159 00262000 * RFY 0159 00263000 * PFTEPTR RSTD; 0159 00264000 * PFTEPTR=PVTPFTP+PCBRBN; /* CALCULATE PFTE ADDRESS */ 00265000 LH PFTEPTR,PCBRBN(,PCBPTR) 0160 00266000 N PFTEPTR,@CF02185 0160 00267000 AL PFTEPTR,PVTPFTP(,PVTPTR) 0160 00268000 * PFTPCBSI=OFF; /* SET PCB DEFINED FLAG OFF IN 0161 00269000 * THE PFTE */ 00270000 NI PFTPCBSI(PFTEPTR),B'11110111' 0161 00271000 * R0=PCBFREQN; /* GET THE FREE QUEUE ID */ 00272000 LA R0,16 0162 00273000 * R1=PCBPTR; /* GET THE ADDRESS OF THE PCB TO 00274000 * BE FREED */ 00275000 LR R1,PCBPTR 0163 00276000 * NXTAIA=NXTAIA->AIANXAIA; /* SAVE NEXT AIA POINTER */ 00277000 L NXTAIA,AIANXAIA(,NXTAIA) 0164 00278000 * CALL IEAVPCB; /* FREE THE PCB */ 00279000 L @15,PVTPCB(,PVTPTR) 0165 00280000 BALR @14,@15 0165 00281000 * IF NXTAIA^=ZERO THEN /* IS THERE ANOTHER AIA */ 00282000 LTR NXTAIA,NXTAIA 0166 00283000 BZ @RF00166 0166 00284000 * DO; /* YES */ 00285000 * PCBPTR=NXTAIA-(LENGTH(PCB)-LENGTH(AIA));/* CALCULATE NEXT 00286000 * PCB ADDRESS */ 00287000 LR PCBPTR,NXTAIA 0168 00288000 SL PCBPTR,@CF02181 0168 00289000 * GOTO FREEPCB; /* GO SET PFTPCBSI OFF AND FREE 00290000 * PCB */ 00291000 B FREEPCB 0169 00292000 * END; 0170 00293000 * 0170 00294000 * /*************************************************************/ 00295000 * /* */ 00296000 * /* END OF LOOP SETTING PFTPCBSI OFF AND FREEING PCBS */ 00297000 * /* */ 00298000 * /*************************************************************/ 00299000 * 0171 00300000 * ELSE 0171 00301000 * DO; /* PREPARE TO MEMTERM THE ADDRESS 00302000 * SPACE */ 00303000 @RF00166 DS 0H 0172 00304000 *MMTERM: 0172 00305000 * R13=ADDR(PVTSAVE); /* SET SAVEAREA ADDRESS FOR 0172 00306000 * MEMTERM */ 00307000 MMTERM LA R13,PVTSAVE(,PVTPTR) 0172 00308000 * R11=RSMASCB->ASCBASID; /* GET ASID */ 00309000 * 0173 00310000 L @15,RSMASCB(,RSMHDPTR) 0173 00311000 LH R11,ASCBASID(,@15) 0173 00312000 N R11,@CF02185 0173 00313000 * /*********************************************************/ 00314000 * /* */ 00315000 * /* MEMTERM THE MEMORY FOR WHICH SWAPOUT FAILED */ 00316000 * /* */ 00317000 * /*********************************************************/ 00318000 * 0174 00319000 * GENERATE CODE REFS(R11,CVTBTERM,CVTMAP) SETS(R2); 0174 00320000 CALLRTM TYPE=MEMTERM,COMPCOD=X'028',ASID=(R11) 00321000 * END; /* END OF MEMTERM PROCESSING */ 00322000 * END; /* END OF NON-ZERO RETURN CODE 0176 00323000 * PROCESSING */ 00324000 * 0177 00325000 * /*****************************************************************/ 00326000 * /* */ 00327000 * /* DELETE FRR */ 00328000 * /* */ 00329000 * /*****************************************************************/ 00330000 * 0177 00331000 *DELTEFRR: 0177 00332000 * GENERATE CODE REFS(PSA,PSACSTK,FRRS,FRRSELEN,FRRSCURR,FRRSEMP) SETS 00333000 * (R4,R5); 0177 00334000 * 0177 00335000 @RC00132 DS 0H 0177 00336000 DELTEFRR DS 0H 0177 00337000 SETFRR D,WRKREGS=(R4,R5),RELATED=(RSM,IEAVSWPC(ESTFRR)) 00338000 * /*****************************************************************/ 00339000 * /* */ 00340000 * /* RESTORE REGISTERS AND RETURN TO CALLER OF IEAVSWPC */ 00341000 * /* */ 00342000 * /*****************************************************************/ 00343000 * 0178 00344000 * GENERATE NODEFS REFS(R13,R14,PVTWSA18,PVTPTR) NOSETS NOFLOWS 0178 00345000 * NOSEQFLOW EXIT; 0178 00346000 LM R1,R14,PVTWSA18+12(PVTPTR) RESTORE CALLER'S REGISTERS 00347000 BR R14 RETURN TO CALLER 00348000 * 0179 00349000 * /*****************************************************************/ 00350000 * /* */ 00351000 * /* THIS IS THE RETRY ENTRY POINT FOR ERRORS ENCOUNTERED DURING */ 00352000 * /* SWAP COMPLETE PROCESSING IEAVRCV WILL RETRY INTO IEAVSWPC AT */ 00353000 * /* THIS POINT. NO ATTEMPT IS MADE TO FREE PCB'S OR FRAMES NOT */ 00354000 * /* FREED BEFORE THE PROGRAM CHECK OCCURRED. THIS RETRY ROUTINE */ 00355000 * /* MERELY ISSUES A MEMTERM FOR THE ADDRESS SPACE UNDERGOING */ 00356000 * /* SWAP-OUT */ 00357000 * /* */ 00358000 * /*****************************************************************/ 00359000 * 0179 00360000 *SWPCEFRR: 0179 00361000 * ; 0179 00362000 SWPCEFRR DS 0H 0180 00363000 * GENERATE CODE DEFS(RETRYSPC) REFS(BASEREG,BASE1) SETS(BASEREG,R8); 00364000 RETRYSPC BALR BASEREG,0 00365000 LA R8,RETRYSPC-BASE1 GET AMOUNT TO ADJUST BY 00366000 SR BASEREG,R8 ADJUST BASE REGISTER 00367000 * PCBPTR=R0; /* GET PCB ADDRESS */ 00368000 LR PCBPTR,R0 0181 00369000 * PVTPTR=CVTPVTP; /* GET PVT ADDRESS */ 00370000 L @15,CVTPTR 0182 00371000 L PVTPTR,CVTPVTP(,@15) 0182 00372000 * RSMHDPTR=PCBASCB->ASCBRSM; /* GET RSM HEADER ADDRESS */ 00373000 L @15,PCBASCB(,PCBPTR) 0183 00374000 L RSMHDPTR,ASCBRSM(,@15) 0183 00375000 * SPCTPTR=RSMSPCT; /* GET SPCT ADDRESS */ 00376000 L SPCTPTR,RSMSPCT(,RSMHDPTR) 0184 00377000 * SPCTOUT=OFF; /* INDICATE SWAP COMPLETE */ 00378000 NI SPCTOUT(SPCTPTR),B'10111111' 0185 00379000 * GOTO MMTERM; 0186 00380000 B MMTERM 0186 00381000 * END IEAVSWPC 0187 00382000 * 0187 00383000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00384000 */*%INCLUDE SYSLIB (CVT ) */ 00385000 */*%INCLUDE SYSLIB (IHAPVT ) */ 00386000 */*%INCLUDE SYSLIB (ILRAIA ) */ 00387000 */*%INCLUDE SYSLIB (IHAASCB ) */ 00388000 */*%INCLUDE SYSLIB (ILRASMVT) */ 00389000 */*%INCLUDE SYSLIB (IHAASXB ) */ 00390000 */*%INCLUDE SYSLIB (IHAFRRS ) */ 00391000 */*%INCLUDE SYSLIB (IHAPCB ) */ 00392000 */*%INCLUDE SYSLIB (IHARCA ) */ 00393000 */*%INCLUDE SYSLIB (IHAPSA ) */ 00394000 */*%INCLUDE SYSLIB (IHAWSAVT) */ 00395000 */*%INCLUDE SYSLIB (IHASPCT ) */ 00396000 */*%INCLUDE SYSLIB (IHARSMHD) */ 00397000 */*%INCLUDE SYSLIB (IHAPFTE ) */ 00398000 */*%INCLUDE SYSLIB (IHALCCA ) */ 00399000 * 0187 00400000 * ; 0187 00401000 @DATA DS 0H 00402000 @DATD DSECT 00403000 DS 0F 00404000 IEAVSWPC CSECT 00405000 DS 0F 00406000 @CF02181 DC F'36' 00407000 @CF02155 DC XL4'80000000' 00408000 @CF02185 DC XL4'0000FFFF' 00409000 @DATD DSECT 00410000 DS 0D 00411000 @ENDDATD EQU * 00412000 IEAVSWPC CSECT 00413000 NOPR ((@ENDDATD-@DATD)*16) 00414000 DS 0F 00415000 @SIZDATD DC AL1(0) 00416000 DC AL3(@ENDDATD-@DATD) 00417000 DS 0D 00418000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00419000 @01 EQU 01 00420000 @02 EQU 02 00421000 @03 EQU 03 00422000 @04 EQU 04 00423000 @05 EQU 05 00424000 @06 EQU 06 00425000 @07 EQU 07 00426000 @08 EQU 08 00427000 @09 EQU 09 00428000 @10 EQU 10 00429000 @11 EQU 11 00430000 @12 EQU 12 00431000 @13 EQU 13 00432000 @14 EQU 14 00433000 @15 EQU 15 00434000 PVTPTR EQU @03 00435000 AIAPTR EQU @06 00436000 PCBPTR EQU @04 00437000 RCAPTR EQU @08 00438000 SPCTPTR EQU @08 00439000 RSMHDPTR EQU @02 00440000 PFTEPTR EQU @05 00441000 R0 EQU @00 00442000 R1 EQU @01 00443000 R2 EQU @02 00444000 R3 EQU @03 00445000 R4 EQU @04 00446000 R5 EQU @05 00447000 SOUTPPTR EQU @05 00448000 RTNCODE EQU @07 00449000 R8 EQU @08 00450000 R9 EQU @09 00451000 BASEREG EQU @09 00452000 R11 EQU @11 00453000 R13 EQU @13 00454000 NXTAIA EQU @13 00455000 R14 EQU @14 00456000 R15 EQU @15 00457000 R10 EQU @10 00458000 R12 EQU @12 00459000 R6 EQU @06 00460000 R7 EQU @07 00461000 CVTPTR EQU 16 00462000 PSA EQU 0 00463000 FLCRNPSW EQU PSA 00464000 FLCROPSW EQU PSA+8 00465000 FLCICCW2 EQU PSA+16 00466000 PSAEEPSW EQU PSA+132 00467000 PSAESPSW EQU PSA+136 00468000 FLCSVILC EQU PSAESPSW+1 00469000 PSAEPPSW EQU PSA+140 00470000 FLCPIILC EQU PSAEPPSW+1 00471000 FLCPICOD EQU PSAEPPSW+2 00472000 PSAPICOD EQU FLCPICOD+1 00473000 FLCTEA EQU PSAEPPSW+4 00474000 FLCPER EQU PSA+152 00475000 FLCMCLA EQU PSA+168 00476000 FLCIOEL EQU FLCMCLA+4 00477000 FLCIOA EQU FLCMCLA+16 00478000 FLCFSA EQU FLCMCLA+80 00479000 PSASUPER EQU PSA+552 00480000 PSASUP1 EQU PSASUPER 00481000 PSASUP2 EQU PSASUPER+1 00482000 PSASUP3 EQU PSASUPER+2 00483000 PSASUP4 EQU PSASUPER+3 00484000 PSACLHT EQU PSA+640 00485000 PSALKSA EQU PSA+696 00486000 PSAHLHI EQU PSA+760 00487000 PSADSSFL EQU PSA+836 00488000 PSADSSF1 EQU PSADSSFL 00489000 PSADSSF3 EQU PSADSSFL+2 00490000 PSADSSF4 EQU PSADSSFL+3 00491000 PSARSVT EQU PSA+896 00492000 CVTMAP EQU 0 00493000 CVTBTERM EQU CVTMAP+52 00494000 CVTDAR EQU CVTMAP+72 00495000 CVTFLGS1 EQU CVTDAR 00496000 CVTDCB EQU CVTMAP+116 00497000 CVTIERLC EQU CVTMAP+144 00498000 CVTOPTA EQU CVTMAP+182 00499000 CVTOPTB EQU CVTMAP+183 00500000 CVTGTF EQU CVTMAP+236 00501000 CVTGTFST EQU CVTGTF 00502000 CVTGTFS EQU CVTGTFST 00503000 CVTSTATE EQU CVTGTFST 00504000 CVTTMODE EQU CVTGTFST 00505000 CVTFORM EQU CVTGTFST 00506000 CVTAQAVT EQU CVTMAP+240 00507000 CVTTCMFG EQU CVTAQAVT 00508000 CVTVOLM2 EQU CVTMAP+244 00509000 CVTTATA EQU CVTVOLM2 00510000 CVTTSKS EQU CVTTATA 00511000 CVTVOLF2 EQU CVTTSKS 00512000 CVTTAT EQU CVTTATA+1 00513000 CVTATER EQU CVTMAP+248 00514000 CVTEXT1 EQU CVTMAP+252 00515000 CVTPURG EQU CVTMAP+260 00516000 CVTQMSG EQU CVTMAP+268 00517000 CVTDMSR EQU CVTMAP+272 00518000 CVTRSV37 EQU CVTDMSR 00519000 CVTDMSRF EQU CVTRSV37 00520000 CVTERPV EQU CVTMAP+316 00521000 CVTINTLA EQU CVTMAP+320 00522000 CVTAPF EQU CVTMAP+324 00523000 CVTEXT2 EQU CVTMAP+328 00524000 CVTHJES EQU CVTMAP+332 00525000 CVTPGSIA EQU CVTMAP+348 00526000 CVTA1F1 EQU CVTMAP+356 00527000 CVTSYSK EQU CVTMAP+357 00528000 CVTVOLM1 EQU CVTMAP+380 00529000 CVTVOLF1 EQU CVTVOLM1 00530000 CVTATMCT EQU CVTMAP+388 00531000 CVTXTNT1 EQU 0 00532000 CVTXTNT2 EQU 0 00533000 CVTDSSV EQU CVTXTNT2 00534000 CVTFLGBT EQU CVTXTNT2+5 00535000 CVTQID EQU CVTXTNT2+24 00536000 CVTRV400 EQU CVTXTNT2+52 00537000 CVTRV409 EQU CVTXTNT2+53 00538000 CVTATCVT EQU CVTXTNT2+64 00539000 CVTRV429 EQU CVTXTNT2+84 00540000 CVTRV438 EQU CVTXTNT2+85 00541000 CVTRV457 EQU CVTXTNT2+112 00542000 CVTRV466 EQU CVTXTNT2+113 00543000 CVTFIX EQU 0 00544000 CVTRELNO EQU CVTFIX+252 00545000 PVT EQU 0 00546000 PVTFLAG1 EQU PVT 00547000 PVTPFTP EQU PVT+12 00548000 PVTPRCA EQU PVT+52 00549000 PVTPCB EQU PVT+104 00550000 PVTPFTE EQU PVT+108 00551000 PVTPRCV EQU PVT+156 00552000 PVTPINV EQU PVT+172 00553000 PVTSPOUT EQU PVT+272 00554000 PVTQS EQU PVT+304 00555000 PVTWSAX EQU PVT+344 00556000 PVTWSA18 EQU PVTWSAX+1256 00557000 PVTSAVE EQU PVTWSAX+1328 00558000 PVTCNTFX EQU PVT+1830 00559000 AIA EQU 0 00560000 AIAFLG1 EQU AIA+9 00561000 AIAPAGDS EQU AIAFLG1 00562000 AIAFLG2 EQU AIA+10 00563000 AIAFLG3 EQU AIA+11 00564000 AIANXAIA EQU AIA+12 00565000 AIAID EQU AIA+16 00566000 AIALPID EQU AIAID 00567000 AIALGID EQU AIALPID 00568000 AIALSID EQU AIALGID 00569000 AIASSID EQU AIALSID+1 00570000 AIARPN EQU AIALPID+4 00571000 AIALSID2 EQU AIARPN 00572000 AIALPMEP EQU AIALSID2 00573000 AIAGRPSZ EQU AIA+24 00574000 AIALGE EQU AIAGRPSZ 00575000 ASCB EQU 0 00576000 ASCBSUPC EQU ASCB+16 00577000 ASCBASID EQU ASCB+36 00578000 ASCBRSM EQU ASCB+52 00579000 ASCBFW1 EQU ASCB+100 00580000 ASCBRCTF EQU ASCBFW1+2 00581000 ASCBFLG1 EQU ASCBFW1+3 00582000 ASCBASXB EQU ASCB+108 00583000 ASCBDSP1 EQU ASCB+114 00584000 ASCBFLG2 EQU ASCB+115 00585000 ASCBLKGP EQU ASCB+128 00586000 ASCBSRQ EQU ASCB+180 00587000 ASCBSRQ1 EQU ASCBSRQ 00588000 ASCBSRQ2 EQU ASCBSRQ+1 00589000 ASCBSRQ3 EQU ASCBSRQ+2 00590000 ASCBSRQ4 EQU ASCBSRQ+3 00591000 ASMVT EQU 0 00592000 ASMFLAG1 EQU ASMVT 00593000 ASMFLAG2 EQU ASMVT+1 00594000 ASMSTAGQ EQU ASMVT+32 00595000 ASMPCCWQ EQU ASMVT+64 00596000 ASMLSAI EQU ASMVT+144 00597000 ASMGOSQS EQU ASMVT+152 00598000 ASMWKSA1 EQU ASMVT+368 00599000 ASMWKSA2 EQU ASMVT+448 00600000 ASMWKSA3 EQU ASMVT+528 00601000 ASMWKSA4 EQU ASMVT+608 00602000 ASMWKSA5 EQU ASMVT+688 00603000 ASMPOOLS EQU 0 00604000 ASMCPAVQ EQU ASMPOOLS+8 00605000 ASMCPRSQ EQU ASMPOOLS+16 00606000 ASXB EQU 0 00607000 ASXBSPSA EQU ASXB+112 00608000 ASXBAEQ EQU ASXB+168 00609000 ASXBSECR EQU ASXB+199 00610000 ASCBSFLG EQU ASXBSECR 00611000 ASXBCASW EQU ASXB+216 00612000 ASXBCRB1 EQU ASXBCASW 00613000 FRRS EQU 0 00614000 FRRSHEAD EQU FRRS 00615000 FRRSEMP EQU FRRSHEAD 00616000 FRRSLAST EQU FRRSHEAD+4 00617000 FRRSELEN EQU FRRSHEAD+8 00618000 FRRSCURR EQU FRRSHEAD+12 00619000 FRRSENTR EQU 0 00620000 FRRSFRRA EQU FRRSENTR 00621000 FRRSFLGS EQU FRRSENTR+4 00622000 FRRSFLG1 EQU FRRSFLGS 00623000 FRRSPARM EQU FRRSENTR+8 00624000 FRREPTR EQU 0 00625000 PCB EQU 0 00626000 PCBFQP EQU PCB 00627000 PCBBQP EQU PCB+4 00628000 PCBRTP EQU PCB+8 00629000 PCBFL1 EQU PCBRTP 00630000 PCBRLP EQU PCB+12 00631000 PCBXPT EQU PCB+16 00632000 PCBFL2 EQU PCBXPT 00633000 PCBPGT EQU PCB+20 00634000 PCBFL3 EQU PCBPGT 00635000 PCBRBN EQU PCB+24 00636000 PCBBLOCK EQU PCB+28 00637000 PCBSRB EQU PCBBLOCK 00638000 PCBRB EQU PCBSRB 00639000 PCBASCB EQU PCB+32 00640000 PCBAIA EQU PCB+36 00641000 RCA EQU 0 00642000 RCAPARM0 EQU RCA 00643000 RCACSECT EQU RCA+9 00644000 RCAFLAGS EQU RCA+10 00645000 RCARCRD EQU RCA+11 00646000 RCANAMES EQU RCA+12 00647000 RCANAME1 EQU RCANAMES 00648000 RCANAME2 EQU RCANAMES+1 00649000 RCASWPC EQU RCANAME2 00650000 RCANAME3 EQU RCANAMES+2 00651000 RCANAME4 EQU RCANAMES+3 00652000 RCANAME5 EQU RCANAMES+4 00653000 RCANAME6 EQU RCANAMES+5 00654000 RCARETAD EQU RCA+20 00655000 WSAL EQU 0 00656000 WSAG EQU 0 00657000 WSAC EQU 0 00658000 SPCT EQU 0 00659000 SPCTSWRT EQU SPCT 00660000 SPCTFLG1 EQU SPCT+10 00661000 SPCTOUT EQU SPCTFLG1 00662000 SPCTPURG EQU SPCTFLG1 00663000 SPCTPSET EQU SPCTFLG1 00664000 SPCTSEGE EQU 0 00665000 SEGSPTR EQU 0 00666000 SPCTSWPE EQU 0 00667000 SPCTLS EQU SPCTSWPE 00668000 SPCTFLAG EQU SPCTLS 00669000 SWAPPTR EQU 0 00670000 SPCTEXTM EQU 0 00671000 SPCTENT EQU SPCTEXTM+8 00672000 RSMHD EQU 0 00673000 RSMSPCT EQU RSMHD+4 00674000 RSMASCB EQU RSMHD+8 00675000 RSMFLG1 EQU RSMHD+12 00676000 RSMCNTFX EQU RSMHD+14 00677000 RSMQS EQU RSMHD+20 00678000 RSMLFQ EQU RSMQS 00679000 RSMLSQA EQU RSMQS+4 00680000 RSMLIOQ EQU RSMQS+8 00681000 PFTE EQU 0 00682000 PFTPGID EQU PFTE 00683000 PFTQPTRS EQU PFTE+4 00684000 PFTFLAG1 EQU PFTE+12 00685000 PFTPCBSI EQU PFTFLAG1 00686000 PFTFLAG2 EQU PFTE+13 00687000 LCCA EQU 0 00688000 LCCAIHRC EQU LCCA+520 00689000 LCCAIHR1 EQU LCCAIHRC 00690000 LCCAIHR2 EQU LCCAIHRC+1 00691000 LCCAIHR3 EQU LCCAIHRC+2 00692000 LCCAIHR4 EQU LCCAIHRC+3 00693000 LCCASPIN EQU LCCA+524 00694000 LCCASPN1 EQU LCCASPIN 00695000 LCCASPN2 EQU LCCASPIN+1 00696000 LCCASPN3 EQU LCCASPIN+2 00697000 LCCASPN4 EQU LCCASPIN+3 00698000 LCCACPUS EQU LCCA+536 00699000 LCCADSF1 EQU LCCA+540 00700000 LCCADSF2 EQU LCCA+541 00701000 LCCASPSA EQU LCCA+544 00702000 LCCACRFL EQU LCCA+692 00703000 LCCACREX EQU LCCA+693 00704000 LCCALKFG EQU LCCA+694 00705000 LCCASRBF EQU LCCA+720 00706000 LCCAPTR EQU 0 00707000 SOUTPARM EQU 0 00708000 SOUTFLGS EQU SOUTPARM+4 00709000 SRMPARMS EQU SOUTPARM+8 00710000 SOUTWRKA EQU SOUTPARM+16 00711000 IEAVINV EQU 0 00712000 IEAVPCB EQU 0 00713000 IEAVPFTE EQU 0 00714000 CVTS01 EQU CVTPGSIA 00715000 CVTPVTP EQU CVTS01+8 00716000 CVTLPDIA EQU CVTS01+12 00717000 CVTDIRST EQU CVTLPDIA 00718000 CVTSLIDA EQU CVTS01+24 00719000 CVTCTLFG EQU CVTS01+50 00720000 CVTSPSA EQU CVTS01+336 00721000 CVTASMVT EQU CVTS01+356 00722000 CVTRV210 EQU CVTS01+424 00723000 CVTRV219 EQU CVTS01+425 00724000 CVTRV228 EQU CVTS01+426 00725000 CVTRV237 EQU CVTS01+427 00726000 CVTMFRTR EQU CVTS01+452 00727000 CVTRV262 EQU CVTS01+468 00728000 CVTRV271 EQU CVTS01+469 00729000 CVTRV280 EQU CVTS01+470 00730000 CVTRV289 EQU CVTS01+471 00731000 CVTGSDA EQU CVTS01+600 00732000 ASCBPTR EQU PCBASCB 00733000 ASMVTPTR EQU CVTASMVT 00734000 ASM1WKSV EQU ASMWKSA1 00735000 ASM1RGSV EQU ASM1WKSV 00736000 ASM1WRKA EQU ASM1WKSV+60 00737000 ASM2WKSV EQU ASMWKSA2 00738000 ASM2WRKA EQU ASM2WKSV+52 00739000 ASM2FLGS EQU ASM2WRKA+12 00740000 ASM3WKSV EQU ASMWKSA3 00741000 ASM4WKSV EQU ASMWKSA4 00742000 ASM4RGSV EQU ASM4WKSV 00743000 ASM5WKSV EQU ASMWKSA5 00744000 ASM5RGSV EQU ASM5WKSV 00745000 ASXBPTR EQU ASCBASXB 00746000 PSARSVTE EQU PSARSVT 00747000 PSACSTK EQU PSARSVTE 00748000 FRRSPTR EQU PSACSTK 00749000 OPTLIST EQU SRMPARMS 00750000 @NM00048 EQU OPTLIST 00751000 OPTSOUT EQU @NM00048 00752000 @NM00049 EQU OPTLIST+4 00753000 @NM00051 EQU @NM00049+3 00754000 OPTWAIT EQU @NM00051 00755000 FLC EQU PSA 00756000 * START UNREFERENCED COMPONENTS 00757000 OPTFAIL EQU @NM00051 00758000 @NM00052 EQU @NM00051 00759000 @NM00050 EQU @NM00049+2 00760000 OPTSPFR EQU @NM00049 00761000 OPTSIN EQU @NM00048+2 00762000 PSARSAV EQU PSARSVTE+60 00763000 PSARSTK EQU PSARSVTE+56 00764000 PSAESAV3 EQU PSARSVTE+52 00765000 PSAESTK3 EQU PSARSVTE+48 00766000 PSAESAV2 EQU PSARSVTE+44 00767000 PSAESTK2 EQU PSARSVTE+40 00768000 PSAESAV1 EQU PSARSVTE+36 00769000 PSAESTK1 EQU PSARSVTE+32 00770000 PSAPSAV EQU PSARSVTE+28 00771000 PSAPSTK EQU PSARSVTE+24 00772000 PSAMSAV EQU PSARSVTE+20 00773000 PSAMSTK EQU PSARSVTE+16 00774000 PSASSAV EQU PSARSVTE+12 00775000 PSASSTK EQU PSARSVTE+8 00776000 PSANSTK EQU PSARSVTE+4 00777000 ASM5FLGS EQU ASM5WKSV+64 00778000 ASM5AIA EQU ASM5WKSV+60 00779000 ASM5GCTR EQU ASM5WKSV+56 00780000 ASM5SR14 EQU ASM5WKSV+52 00781000 @NM00008 EQU ASM5RGSV+4 00782000 ASM5RG2 EQU ASM5RGSV 00783000 @NM00007 EQU ASM4RGSV+4 00784000 ASM4RG2 EQU ASM4RGSV 00785000 ASM3SR13 EQU ASM3WKSV+28 00786000 ASM3R14B EQU ASM3WKSV+24 00787000 ASM3R14A EQU ASM3WKSV+20 00788000 ASM3GRPA EQU ASM3WKSV+16 00789000 ASM3TMPA EQU ASM3WKSV+12 00790000 ASM3PIOP EQU ASM3WKSV+8 00791000 ASM3GENQ EQU ASM3WKSV+4 00792000 ASM3SWPQ EQU ASM3WKSV 00793000 ASM2SR14 EQU ASM2WRKA+16 00794000 @NM00006 EQU ASM2WRKA+13 00795000 ASM2WFLG EQU ASM2FLGS 00796000 ASM2RFLG EQU ASM2FLGS 00797000 ASM2DUPQ EQU ASM2WRKA+8 00798000 ASM2CAQ EQU ASM2WRKA+4 00799000 ASM2PAQ EQU ASM2WRKA 00800000 ASM2RGSV EQU ASM2WKSV 00801000 ASM1NXTA EQU ASM1WRKA+4 00802000 ASM1ASCB EQU ASM1WRKA 00803000 ASM1RG15 EQU ASM1RGSV+56 00804000 @NM00005 EQU ASM1RGSV+4 00805000 ASM1RG1 EQU ASM1RGSV 00806000 CVTRV628 EQU CVTS01+728 00807000 CVTRV627 EQU CVTS01+724 00808000 CVTRV626 EQU CVTS01+720 00809000 CVTRV625 EQU CVTS01+716 00810000 CVTRV624 EQU CVTS01+712 00811000 CVTRV623 EQU CVTS01+708 00812000 CVTRV622 EQU CVTS01+704 00813000 CVTRV621 EQU CVTS01+700 00814000 CVTIHASU EQU CVTS01+696 00815000 CVTSUSP EQU CVTS01+692 00816000 CVTT6SVC EQU CVTS01+688 00817000 CVTCDAL EQU CVTS01+684 00818000 CVTTCTL EQU CVTS01+680 00819000 CVTRSUME EQU CVTS01+676 00820000 CVTJTERM EQU CVTS01+672 00821000 CVTASMRM EQU CVTS01+668 00822000 CVTTCASP EQU CVTS01+664 00823000 CVT0PT03 EQU CVTS01+660 00824000 CVT0PT0E EQU CVTS01+656 00825000 CVTRV609 EQU CVTS01+652 00826000 CVTCGK EQU CVTS01+648 00827000 CVTRAC EQU CVTS01+644 00828000 CVTRV606 EQU CVTS01+640 00829000 CVTRV605 EQU CVTS01+636 00830000 CVTRV604 EQU CVTS01+632 00831000 CVTEFF02 EQU CVTS01+628 00832000 CVTCBBR EQU CVTS01+624 00833000 CVTSSCR EQU CVTS01+620 00834000 CVTEVENT EQU CVTS01+616 00835000 CVTCRCA EQU CVTS01+612 00836000 CVTTPIO EQU CVTS01+608 00837000 CVTADV EQU CVTS01+604 00838000 CVTGSDAB EQU CVTGSDA 00839000 CVTQV3 EQU CVTS01+596 00840000 CVTQV2 EQU CVTS01+592 00841000 CVTQV1 EQU CVTS01+588 00842000 CVTRPT EQU CVTS01+584 00843000 CVTSSRB EQU CVTS01+580 00844000 CVTCSDRL EQU CVTS01+576 00845000 CVTEXP1 EQU CVTS01+572 00846000 CVTRMPMT EQU CVTS01+568 00847000 CVTRMPTT EQU CVTS01+564 00848000 CVTVPSA EQU CVTS01+560 00849000 CVTVSTOP EQU CVTS01+556 00850000 CVTGTFR8 EQU CVTS01+552 00851000 CVTQUIT EQU CVTS01+548 00852000 CVTVACR EQU CVTS01+544 00853000 CVTWTCB EQU CVTS01+540 00854000 CVTSTPRS EQU CVTS01+536 00855000 CVT0PT02 EQU CVTS01+532 00856000 CVTDARCM EQU CVTS01+528 00857000 CVTIRECM EQU CVTS01+524 00858000 CVTJRECM EQU CVTS01+520 00859000 CVTVEMS0 EQU CVTS01+516 00860000 CVTSPFRR EQU CVTS01+512 00861000 CVTRLSTG EQU CVTS01+508 00862000 CVT0TC0A EQU CVTS01+504 00863000 CVTGMBR EQU CVTS01+500 00864000 CVTLFRM EQU CVTS01+496 00865000 CVTRMBR EQU CVTS01+492 00866000 CVTVIOP EQU CVTS01+488 00867000 CVTRV307 EQU CVTS01+486 00868000 CVTRV306 EQU CVTS01+484 00869000 CVTRV305 EQU CVTS01+482 00870000 CVTRV304 EQU CVTS01+480 00871000 CVTRV303 EQU CVTS01+478 00872000 CVTRV302 EQU CVTS01+476 00873000 CVTTRCA EQU CVTS01+472 00874000 CVTRV297 EQU CVTRV289 00875000 CVTRV296 EQU CVTRV289 00876000 CVTRV295 EQU CVTRV289 00877000 CVTRV294 EQU CVTRV289 00878000 CVTRV293 EQU CVTRV289 00879000 CVTRV292 EQU CVTRV289 00880000 CVTRV291 EQU CVTRV289 00881000 CVTRV290 EQU CVTRV289 00882000 CVTRV288 EQU CVTRV280 00883000 CVTRV287 EQU CVTRV280 00884000 CVTRV286 EQU CVTRV280 00885000 CVTRV285 EQU CVTRV280 00886000 CVTRV284 EQU CVTRV280 00887000 CVTRV283 EQU CVTRV280 00888000 CVTRV282 EQU CVTRV280 00889000 CVTRV281 EQU CVTRV280 00890000 CVTRV279 EQU CVTRV271 00891000 CVTRV278 EQU CVTRV271 00892000 CVTRV277 EQU CVTRV271 00893000 CVTRV276 EQU CVTRV271 00894000 CVTRV275 EQU CVTRV271 00895000 CVTRV274 EQU CVTRV271 00896000 CVTRV273 EQU CVTRV271 00897000 CVTRV272 EQU CVTRV271 00898000 CVTRV270 EQU CVTRV262 00899000 CVTRV269 EQU CVTRV262 00900000 CVTRV268 EQU CVTRV262 00901000 CVTRV267 EQU CVTRV262 00902000 CVTRV266 EQU CVTRV262 00903000 CVTRV265 EQU CVTRV262 00904000 CVTRV264 EQU CVTRV262 00905000 CVTRV263 EQU CVTRV262 00906000 CVTVFP EQU CVTS01+464 00907000 CVTVSI EQU CVTS01+460 00908000 CVTVPSIB EQU CVTS01+456 00909000 CVTMFACT EQU CVTMFRTR 00910000 CVTMFCTL EQU CVTS01+448 00911000 CVTPVBP EQU CVTS01+444 00912000 CVTPWI EQU CVTS01+440 00913000 CVTRV254 EQU CVTS01+438 00914000 CVTRV253 EQU CVTS01+436 00915000 CVTRV252 EQU CVTS01+434 00916000 CVTRV251 EQU CVTS01+433 00917000 CVTRV250 EQU CVTS01+432 00918000 CVTRV249 EQU CVTS01+431 00919000 CVTRV248 EQU CVTS01+430 00920000 CVTRV247 EQU CVTS01+429 00921000 CVTRV246 EQU CVTS01+428 00922000 CVTRV245 EQU CVTRV237 00923000 CVTRV244 EQU CVTRV237 00924000 CVTRV243 EQU CVTRV237 00925000 CVTRV242 EQU CVTRV237 00926000 CVTRV241 EQU CVTRV237 00927000 CVTRV240 EQU CVTRV237 00928000 CVTRV239 EQU CVTRV237 00929000 CVTRV238 EQU CVTRV237 00930000 CVTRV236 EQU CVTRV228 00931000 CVTRV235 EQU CVTRV228 00932000 CVTRV234 EQU CVTRV228 00933000 CVTRV233 EQU CVTRV228 00934000 CVTRV232 EQU CVTRV228 00935000 CVTRV231 EQU CVTRV228 00936000 CVTRV230 EQU CVTRV228 00937000 CVTRV229 EQU CVTRV228 00938000 CVTRV227 EQU CVTRV219 00939000 CVTRV226 EQU CVTRV219 00940000 CVTRV225 EQU CVTRV219 00941000 CVTRV224 EQU CVTRV219 00942000 CVTRV223 EQU CVTRV219 00943000 CVTRV222 EQU CVTRV219 00944000 CVTRV221 EQU CVTRV219 00945000 CVTRV220 EQU CVTRV219 00946000 CVTRV218 EQU CVTRV210 00947000 CVTRV217 EQU CVTRV210 00948000 CVTRV216 EQU CVTRV210 00949000 CVTRV215 EQU CVTRV210 00950000 CVTRV214 EQU CVTRV210 00951000 CVTRV213 EQU CVTRV210 00952000 CVTRV212 EQU CVTRV210 00953000 CVTRV211 EQU CVTRV210 00954000 CVTLCCAT EQU CVTS01+420 00955000 CVTPCCAT EQU CVTS01+416 00956000 CVTIPCRP EQU CVTS01+412 00957000 CVTIPCRI EQU CVTS01+408 00958000 CVTIPCDS EQU CVTS01+404 00959000 CVTAIDVT EQU CVTS01+400 00960000 CVTSSAP EQU CVTS01+396 00961000 CVTEHCIR EQU CVTS01+392 00962000 CVTEHDEF EQU CVTS01+388 00963000 CVTDAIR EQU CVTS01+384 00964000 CVTPERFM EQU CVTS01+380 00965000 CVT044R2 EQU CVTS01+376 00966000 CVTFETCH EQU CVTS01+372 00967000 CVTRSTWD EQU CVTS01+368 00968000 CVTSPOST EQU CVTS01+364 00969000 CVTIOBP EQU CVTS01+360 00970000 CVTRECRQ EQU CVTS01+352 00971000 CVTWSAC EQU CVTS01+348 00972000 CVTRV149 EQU CVTS01+344 00973000 CVTWSAL EQU CVTS01+340 00974000 CVTGLMN EQU CVTS01+332 00975000 CVTVEAC0 EQU CVTS01+328 00976000 CVT062R1 EQU CVTS01+324 00977000 CVTRPOST EQU CVTS01+320 00978000 CVTDQIQE EQU CVTS01+316 00979000 CVTCSD EQU CVTS01+312 00980000 CVTLKRMA EQU CVTS01+308 00981000 CVTRSPIE EQU CVTS01+304 00982000 CVTRENQ EQU CVTS01+300 00983000 CVTLQCB EQU CVTS01+296 00984000 CVTFQCB EQU CVTS01+292 00985000 CVTQCS01 EQU CVTS01+288 00986000 CVTAPFT EQU CVTS01+284 00987000 CVTPARRL EQU CVTS01+280 00988000 CVTVWAIT EQU CVTS01+276 00989000 CVTGSPL EQU CVTS01+272 00990000 CVTLSMQ EQU CVTS01+268 00991000 CVTGSMQ EQU CVTS01+264 00992000 CVTEXPRO EQU CVTS01+260 00993000 CVTOPCTP EQU CVTS01+256 00994000 CVTSIC EQU CVTS01+252 00995000 CVTTPIOS EQU CVTS01+248 00996000 CVTRTMS EQU CVTS01+244 00997000 CVTSDBF EQU CVTS01+240 00998000 CVTSCBP EQU CVTS01+236 00999000 CVTSDMP EQU CVTS01+232 01000000 CVTSV60 EQU CVTS01+228 01001000 CVTRTMCT EQU CVTS01+224 01002000 CVTASCBL EQU CVTS01+220 01003000 CVTASCBH EQU CVTS01+216 01004000 CVTGDA EQU CVTS01+212 01005000 CVTASVT EQU CVTS01+208 01006000 CVTVVMDI EQU CVTS01+204 01007000 CVTAQTOP EQU CVTS01+200 01008000 CVTIOSCS EQU CVTS01+196 01009000 CVTSDRM EQU CVTS01+192 01010000 CVTOPTE EQU CVTS01+188 01011000 CVTSTXU EQU CVTS01+184 01012000 CVTQUIS EQU CVTS01+180 01013000 CVTPARS EQU CVTS01+176 01014000 CVTS1EE EQU CVTS01+172 01015000 CVTFRAS EQU CVTS01+168 01016000 CVTQSAS EQU CVTS01+164 01017000 CVTCRAS EQU CVTS01+160 01018000 CVTCRMN EQU CVTS01+156 01019000 CVTDELCP EQU CVTS01+152 01020000 CVTFRECL EQU CVTS01+148 01021000 CVTGETCL EQU CVTS01+144 01022000 CVTBLDCP EQU CVTS01+140 01023000 CVTAUTHL EQU CVTS01+136 01024000 CVTSCAN EQU CVTS01+132 01025000 CVTRV144 EQU CVTS01+130 01026000 CVTMAXMP EQU CVTS01+128 01027000 CVTSTCK EQU CVTS01+124 01028000 CVTRV139 EQU CVTS01+123 01029000 CVTDSSAC EQU CVTS01+122 01030000 CVTRV513 EQU CVTS01+121 01031000 CVTIOSPL EQU CVTS01+120 01032000 CVTPTGT EQU CVTS01+116 01033000 CVTCSPIE EQU CVTS01+112 01034000 CVTSMFEX EQU CVTS01+108 01035000 CVTOLT0A EQU CVTS01+104 01036000 CVTSRBRT EQU CVTS01+100 01037000 CVTPUTL EQU CVTS01+96 01038000 CVTASCRL EQU CVTS01+92 01039000 CVTASCRF EQU CVTS01+88 01040000 CVTRV326 EQU CVTS01+84 01041000 CVTRV325 EQU CVTS01+80 01042000 CVTRV324 EQU CVTS01+76 01043000 CVT0VL01 EQU CVTS01+72 01044000 CVTSHRVM EQU CVTS01+68 01045000 CVTRV332 EQU CVTS01+64 01046000 CVTTAS EQU CVTS01+60 01047000 CVTRSCN EQU CVTS01+56 01048000 CVTTRAC2 EQU CVTS01+54 01049000 CVTTRACE EQU CVTS01+52 01050000 CVTAPG EQU CVTS01+51 01051000 CVTSDTRC EQU CVTCTLFG 01052000 CVTGTRCE EQU CVTCTLFG 01053000 CVTNOMP EQU CVTCTLFG 01054000 CVTRSV79 EQU CVTCTLFG 01055000 CVTDSTAT EQU CVTCTLFG 01056000 CVTRSV78 EQU CVTCTLFG 01057000 CVTRV333 EQU CVTCTLFG 01058000 CVTRV323 EQU CVTCTLFG 01059000 CVTSPVLK EQU CVTS01+49 01060000 CVTRSV77 EQU CVTS01+48 01061000 CVTRV331 EQU CVTS01+44 01062000 CVTRV330 EQU CVTS01+40 01063000 CVTRV329 EQU CVTS01+36 01064000 CVTRV328 EQU CVTS01+32 01065000 CVTRV322 EQU CVTS01+28 01066000 CVTSLID EQU CVTSLIDA+1 01067000 CVTSYLK EQU CVTSLIDA 01068000 CVTRV321 EQU CVTS01+20 01069000 CVTRV320 EQU CVTS01+16 01070000 CVTLPDIR EQU CVTLPDIA+1 01071000 CVTRSV69 EQU CVTDIRST 01072000 CVTRSV68 EQU CVTDIRST 01073000 CVTRSV67 EQU CVTDIRST 01074000 CVTRSV66 EQU CVTDIRST 01075000 CVTRSV65 EQU CVTDIRST 01076000 CVTRSV64 EQU CVTDIRST 01077000 CVTRSV63 EQU CVTDIRST 01078000 CVTDICOM EQU CVTDIRST 01079000 CVTLPDSR EQU CVTS01+4 01080000 CVTGETL EQU CVTS01 01081000 PIOISRB EQU SOUTPARM+20 01082000 LSQAPCBS EQU SOUTWRKA+1 01083000 QINDEX EQU SOUTWRKA 01084000 NLSQAPCB EQU SOUTPARM+5 01085000 @NM00047 EQU SOUTFLGS 01086000 SOUTINT EQU SOUTFLGS 01087000 FWRDPTR EQU SOUTPARM 01088000 LCCAR125 EQU LCCA+964 01089000 LCCAR124 EQU LCCA+960 01090000 LCCASGPR EQU LCCA+896 01091000 LCCADRT2 EQU LCCA+888 01092000 LCCADRT1 EQU LCCA+880 01093000 LCCAR103 EQU LCCA+876 01094000 LCCAESS2 EQU LCCA+872 01095000 LCCASPLJ EQU LCCA+868 01096000 LCCASMQJ EQU LCCA+864 01097000 LCCAIRT EQU LCCA+736 01098000 LCCAASID EQU LCCA+732 01099000 LCCARV89 EQU LCCA+728 01100000 LCCAPGTA EQU LCCASRBF+2 01101000 LCCASAFN EQU LCCASRBF 01102000 LCCAECSA EQU LCCA+716 01103000 LCCAICR0 EQU LCCA+712 01104000 LCCALWTM EQU LCCA+704 01105000 LCCARV78 EQU LCCA+700 01106000 LCCAPINV EQU LCCA+696 01107000 LCCARV88 EQU LCCA+695 01108000 LCCARV87 EQU LCCALKFG 01109000 LCCARV86 EQU LCCALKFG 01110000 LCCARV85 EQU LCCALKFG 01111000 LCCARV84 EQU LCCALKFG 01112000 LCCALKRD EQU LCCALKFG 01113000 LCCALKAQ EQU LCCALKFG 01114000 LCCALKSA EQU LCCALKFG 01115000 LCCALKDP EQU LCCALKFG 01116000 LCCACRST EQU LCCACREX 01117000 LCCACRDP EQU LCCACREX 01118000 LCCACRLM EQU LCCACREX 01119000 LCCACRIN EQU LCCACREX 01120000 LCCACRRT EQU LCCACREX 01121000 LCCACRLE EQU LCCACREX 01122000 LCCACRRM EQU LCCACREX 01123000 LCCACREF EQU LCCACREX 01124000 LCCAVARY EQU LCCACRFL 01125000 LCCARV73 EQU LCCACRFL 01126000 LCCARV72 EQU LCCACRFL 01127000 LCCARV71 EQU LCCACRFL 01128000 LCCARV70 EQU LCCACRFL 01129000 LCCARV69 EQU LCCACRFL 01130000 LCCACLMS EQU LCCACRFL 01131000 LCCACRTM EQU LCCACRFL 01132000 LCCALCR0 EQU LCCA+688 01133000 LCCACRLC EQU LCCA+684 01134000 LCCARCPU EQU LCCA+680 01135000 LCCADCPU EQU LCCA+676 01136000 LCCASRBJ EQU LCCA+672 01137000 LCCADSSR EQU LCCA+668 01138000 LCCADSSC EQU LCCA+660 01139000 LCCADSS3 EQU LCCA+648 01140000 LCCADSS2 EQU LCCA+636 01141000 LCCADSS1 EQU LCCA+624 01142000 LCCAWTIM EQU LCCA+616 01143000 LCCAITOD EQU LCCA+608 01144000 LCCADTOD EQU LCCA+600 01145000 LCCASTOD EQU LCCA+592 01146000 LCCARIR5 EQU LCCASPSA+44 01147000 LCCARIR4 EQU LCCASPSA+40 01148000 LCCARIR3 EQU LCCASPSA+36 01149000 LCCARIR2 EQU LCCASPSA+32 01150000 LCCARPR5 EQU LCCASPSA+28 01151000 LCCARPR4 EQU LCCASPSA+24 01152000 LCCARPR3 EQU LCCASPSA+20 01153000 LCCARPR2 EQU LCCASPSA+16 01154000 LCCADSR5 EQU LCCASPSA+12 01155000 LCCADSR4 EQU LCCASPSA+8 01156000 LCCADSR3 EQU LCCASPSA+4 01157000 LCCADSR2 EQU LCCASPSA 01158000 LCCARV68 EQU LCCA+543 01159000 LCCAPSMK EQU LCCA+542 01160000 LCCARV67 EQU LCCADSF2 01161000 LCCARV66 EQU LCCADSF2 01162000 LCCARV65 EQU LCCADSF2 01163000 LCCARV64 EQU LCCADSF2 01164000 LCCADSRW EQU LCCADSF2 01165000 LCCADSPL EQU LCCADSF2 01166000 LCCAGSRB EQU LCCADSF2 01167000 LCCASRBM EQU LCCADSF2 01168000 LCCARV61 EQU LCCADSF1 01169000 LCCARV60 EQU LCCADSF1 01170000 LCCARV59 EQU LCCADSF1 01171000 LCCARV58 EQU LCCADSF1 01172000 LCCATIMR EQU LCCADSF1 01173000 LCCADSS EQU LCCADSF1 01174000 LCCAVCPU EQU LCCADSF1 01175000 LCCAACR EQU LCCADSF1 01176000 LCCAASCP EQU LCCA+532 01177000 LCCAESSA EQU LCCA+528 01178000 LCCARV55 EQU LCCASPN4 01179000 LCCARV54 EQU LCCASPN4 01180000 LCCARV53 EQU LCCASPN4 01181000 LCCARV52 EQU LCCASPN4 01182000 LCCARV51 EQU LCCASPN4 01183000 LCCARV50 EQU LCCASPN4 01184000 LCCARV49 EQU LCCASPN4 01185000 LCCARV48 EQU LCCASPN4 01186000 LCCARV47 EQU LCCASPN3 01187000 LCCARV46 EQU LCCASPN3 01188000 LCCARV45 EQU LCCASPN3 01189000 LCCARV44 EQU LCCASPN3 01190000 LCCARV43 EQU LCCASPN3 01191000 LCCARV42 EQU LCCASPN3 01192000 LCCARV41 EQU LCCASPN3 01193000 LCCARV40 EQU LCCASPN3 01194000 LCCARV39 EQU LCCASPN2 01195000 LCCARV38 EQU LCCASPN2 01196000 LCCARV37 EQU LCCASPN2 01197000 LCCARV36 EQU LCCASPN2 01198000 LCCARV35 EQU LCCASPN2 01199000 LCCARV34 EQU LCCASPN2 01200000 LCCARV33 EQU LCCASPN2 01201000 LCCARV32 EQU LCCASPN2 01202000 LCCARV31 EQU LCCASPN1 01203000 LCCARV30 EQU LCCASPN1 01204000 LCCAMFIO EQU LCCASPN1 01205000 LCCARSTR EQU LCCASPN1 01206000 LCCATSPN EQU LCCASPN1 01207000 LCCALOCK EQU LCCASPN1 01208000 LCCASIGP EQU LCCASPN1 01209000 LCCAPTLB EQU LCCASPN1 01210000 LCCARV27 EQU LCCAIHR4 01211000 LCCARV26 EQU LCCAIHR4 01212000 LCCARV25 EQU LCCAIHR4 01213000 LCCARV24 EQU LCCAIHR4 01214000 LCCARV23 EQU LCCAIHR4 01215000 LCCARV22 EQU LCCAIHR4 01216000 LCCARV21 EQU LCCAIHR4 01217000 LCCARV20 EQU LCCAIHR4 01218000 LCCARV19 EQU LCCAIHR3 01219000 LCCARV18 EQU LCCAIHR3 01220000 LCCARV17 EQU LCCAIHR3 01221000 LCCARV16 EQU LCCAIHR3 01222000 LCCARV15 EQU LCCAIHR3 01223000 LCCARV14 EQU LCCAIHR3 01224000 LCCARV13 EQU LCCAIHR3 01225000 LCCARV12 EQU LCCAIHR3 01226000 LCCARV11 EQU LCCAIHR2 01227000 LCCARV10 EQU LCCAIHR2 01228000 LCCARV09 EQU LCCAIHR2 01229000 LCCARV08 EQU LCCAIHR2 01230000 LCCARV07 EQU LCCAIHR2 01231000 LCCARV06 EQU LCCAIHR2 01232000 LCCARV05 EQU LCCAIHR2 01233000 LCCARV04 EQU LCCAIHR2 01234000 LCCARV03 EQU LCCAIHR1 01235000 LCCARV02 EQU LCCAIHR1 01236000 LCCARV01 EQU LCCAIHR1 01237000 LCCAPPIE EQU LCCAIHR1 01238000 LCCAPSG1 EQU LCCAIHR1 01239000 LCCAPDAT EQU LCCAIHR1 01240000 LCCAXRC2 EQU LCCAIHR1 01241000 LCCAXRC1 EQU LCCAIHR1 01242000 LCCAIOPS EQU LCCA+512 01243000 LCCAGPGR EQU LCCA+448 01244000 LCCAR133 EQU LCCA+444 01245000 LCCAR132 EQU LCCA+440 01246000 LCCAR131 EQU LCCA+436 01247000 LCCAR130 EQU LCCA+432 01248000 LCCAR129 EQU LCCA+428 01249000 LCCAR128 EQU LCCA+424 01250000 LCCAR127 EQU LCCA+420 01251000 LCCAR126 EQU LCCA+416 01252000 LCCARSGR EQU LCCA+352 01253000 LCCAXGR3 EQU LCCA+288 01254000 LCCAXGR2 EQU LCCA+224 01255000 LCCAXGR1 EQU LCCA+160 01256000 LCCACR0 EQU LCCA+156 01257000 LCCAMCR1 EQU LCCA+152 01258000 LCCAPVAD EQU LCCA+148 01259000 LCCAPINT EQU LCCA+144 01260000 LCCAPPSW EQU LCCA+136 01261000 LCCAPGR2 EQU LCCA+72 01262000 LCCAPGR1 EQU LCCA+8 01263000 LCCARV77 EQU LCCA+6 01264000 LCCACPUA EQU LCCA+4 01265000 LCCALCCA EQU LCCA 01266000 PFTUIC EQU PFTE+15 01267000 PFTQNDX EQU PFTE+14 01268000 @NM00046 EQU PFTFLAG2 01269000 @NM00045 EQU PFTFLAG2 01270000 PFTPREF EQU PFTFLAG2 01271000 PFTSTEAL EQU PFTFLAG2 01272000 PFTIRRG EQU PFTFLAG2 01273000 PFTVR EQU PFTFLAG2 01274000 PFTOFFLN EQU PFTFLAG2 01275000 PFTDFRLS EQU PFTFLAG2 01276000 PFTOFINT EQU PFTFLAG1 01277000 PFTVRALC EQU PFTFLAG1 01278000 PFTBADPG EQU PFTFLAG1 01279000 PFTLNGFX EQU PFTFLAG1 01280000 PFTLSQA EQU PFTFLAG1 01281000 PFTVRINT EQU PFTFLAG1 01282000 PFTONAVQ EQU PFTFLAG1 01283000 PFTRSV1 EQU PFTE+10 01284000 PFTFXCT EQU PFTE+8 01285000 PFTBQPTR EQU PFTQPTRS+2 01286000 PFTFQPTR EQU PFTQPTRS 01287000 PFTVBN EQU PFTPGID+2 01288000 PFTASID EQU PFTPGID 01289000 RSMASMHD EQU RSMHD+40 01290000 RSMFOEQ EQU RSMHD+36 01291000 RSMLIOQL EQU RSMLIOQ+4 01292000 RSMLIOQF EQU RSMLIOQ 01293000 RSMLSQAL EQU RSMLSQA+2 01294000 RSMLSQAF EQU RSMLSQA 01295000 RSMLFQL EQU RSMLFQ+2 01296000 RSMLFQF EQU RSMLFQ 01297000 RSMRSV2 EQU RSMHD+16 01298000 RSMRSV1 EQU RSMHD+13 01299000 @NM00044 EQU RSMFLG1 01300000 RSMFAIL EQU RSMFLG1 01301000 RSMGFADD EQU RSMFLG1 01302000 RSMCPNC EQU RSMFLG1 01303000 RSMCPNU EQU RSMFLG1 01304000 RSMGFAD EQU RSMFLG1 01305000 RSMIOCPC EQU RSMFLG1 01306000 RSMIOCPU EQU RSMFLG1 01307000 RSMVSTO EQU RSMHD 01308000 SPCTXEND EQU SPCTENT+48 01309000 SPCTENTS EQU SPCTENT 01310000 @NM00043 EQU SPCTEXTM+4 01311000 SPCTEXT EQU SPCTEXTM 01312000 SPCTFIXC EQU SPCTSWPE+6 01313000 SPCTVBN EQU SPCTLS+4 01314000 SPCTSSID EQU SPCTLS+1 01315000 @NM00042 EQU SPCTFLAG 01316000 SPCTDEFR EQU SPCTFLAG 01317000 SPCTCOMM EQU SPCTFLAG 01318000 SPCTLSQ EQU SPCTFLAG 01319000 SPCTLVAL EQU SPCTFLAG 01320000 SPCTBITM EQU SPCTSEGE+4 01321000 SPCTPGT EQU SPCTSEGE+1 01322000 SPCTSEGX EQU SPCTSEGE 01323000 SPCTSEGS EQU SPCT+72 01324000 SPCTSWAP EQU SPCT+16 01325000 SPCTSIZE EQU SPCT+14 01326000 SPCTWSSZ EQU SPCT+12 01327000 SPCTIDEN EQU SPCT+11 01328000 @NM00041 EQU SPCTFLG1 01329000 SPCTBIG EQU SPCTFLG1 01330000 SPCTSWIN EQU SPCTFLG1 01331000 SPCTSSEG EQU SPCT+9 01332000 SPCTNSEG EQU SPCT+8 01333000 SPCTLSQA EQU SPCT+6 01334000 SPCTFIX EQU SPCT+4 01335000 WSACASMS EQU WSAC+60 01336000 WSACASMD EQU WSAC+56 01337000 WSACCCH EQU WSAC+52 01338000 WSACRRSA EQU WSAC+48 01339000 WSACREST EQU WSAC+44 01340000 WSACRSTI EQU WSAC+40 01341000 WSACABTM EQU WSAC+36 01342000 WSACMF1 EQU WSAC+32 01343000 WSACEDS0 EQU WSAC+28 01344000 WSACIOS EQU WSAC+24 01345000 WSACRTMK EQU WSAC+20 01346000 WSACACR EQU WSAC+16 01347000 WSACTIME EQU WSAC+12 01348000 WSACOPTM EQU WSAC+8 01349000 WSACGTF EQU WSAC+4 01350000 WSACCWSA EQU WSAC 01351000 WSAGSCHE EQU WSAG+40 01352000 WSAGREST EQU WSAG+36 01353000 WSAGNQDQ EQU WSAG+32 01354000 WSAGMEMT EQU WSAG+28 01355000 WSAGOPTM EQU WSAG+24 01356000 WSAGSTAT EQU WSAG+20 01357000 WSAGEMS0 EQU WSAG+16 01358000 WSAGSSRS EQU WSAG+12 01359000 WSAGRSM EQU WSAG+8 01360000 WSAGGMFM EQU WSAG+4 01361000 WSAGPGIO EQU WSAG 01362000 WSALACHP EQU WSAL+56 01363000 WSALRSM EQU WSAL+52 01364000 WSALEVNT EQU WSAL+48 01365000 WSALSTAE EQU WSAL+44 01366000 WSALSTAT EQU WSAL+40 01367000 WSALWAIT EQU WSAL+36 01368000 WSALPOST EQU WSAL+32 01369000 WSALEXIT EQU WSAL+28 01370000 WSALS2EE EQU WSAL+24 01371000 WSALCIRB EQU WSAL+20 01372000 WSALABTM EQU WSAL+16 01373000 WSALSDMP EQU WSAL+12 01374000 WSALRTM2 EQU WSAL+8 01375000 WSALVALC EQU WSAL+4 01376000 WSALCWSA EQU WSAL 01377000 RCARES9 EQU RCA+19 01378000 @NM00016 EQU RCA+18 01379000 RCAPIOI EQU RCA+18 01380000 RCANAME7 EQU RCANAMES+6 01381000 RCAREP1 EQU RCANAME6 01382000 RCAPSIF EQU RCANAME6 01383000 RCAPSIX EQU RCANAME6 01384000 RCAVEQRP EQU RCANAME6 01385000 RCARCFC EQU RCANAME6 01386000 RCACSGB EQU RCANAME6 01387000 RCAFXL EQU RCANAME6 01388000 RCAPS113 EQU RCANAME6 01389000 RCAFREE EQU RCANAME5 01390000 RCARFR2 EQU RCANAME5 01391000 RCACPBR EQU RCANAME5 01392000 RCAOPBR EQU RCANAME5 01393000 RCASORT EQU RCANAME5 01394000 RCASIRT EQU RCANAME5 01395000 RCARELV EQU RCANAME5 01396000 RCARELF EQU RCANAME5 01397000 RCAGFAD EQU RCANAME4 01398000 RCAVEQRI EQU RCANAME4 01399000 RCAVEQRF EQU RCANAME4 01400000 RCAVEQRC EQU RCANAME4 01401000 RCATERM EQU RCANAME4 01402000 RCASQA EQU RCANAME4 01403000 RCASWIN EQU RCANAME4 01404000 RCASOUT EQU RCANAME4 01405000 RCARFR EQU RCANAME3 01406000 RCARELS EQU RCANAME3 01407000 RCARCFI EQU RCANAME3 01408000 RCARCF EQU RCANAME3 01409000 RCAPSII EQU RCANAME3 01410000 RCAPSIB EQU RCANAME3 01411000 RCAPS112 EQU RCANAME3 01412000 RCAPIX EQU RCANAME3 01413000 RCAPIOP EQU RCANAME2 01414000 RCASWPP EQU RCANAME2 01415000 RCAPFTE EQU RCANAME2 01416000 RCAPCB EQU RCANAME2 01417000 RCAOUT EQU RCANAME2 01418000 RCAITAS EQU RCANAME2 01419000 RCAIOCP EQU RCANAME2 01420000 RCAINV EQU RCANAME1 01421000 RCAGFA EQU RCANAME1 01422000 RCAFXLD EQU RCANAME1 01423000 RCAVEQR EQU RCANAME1 01424000 RCADSEG EQU RCANAME1 01425000 RCADLAS EQU RCANAME1 01426000 RCACSEG EQU RCANAME1 01427000 RCAVAMSI EQU RCANAME1 01428000 @NM00015 EQU RCAFLAGS 01429000 RCAQS EQU RCAFLAGS 01430000 RCAPSIER EQU RCAFLAGS 01431000 RCAABEND EQU RCAFLAGS 01432000 RCALL EQU RCAFLAGS 01433000 RCASAL EQU RCAFLAGS 01434000 RCARES7 EQU RCA+8 01435000 RCAPARM1 EQU RCA+4 01436000 PCBEND EQU PCB+64 01437000 PCBSPCTE EQU PCBRB 01438000 PCBVBN EQU PCB+26 01439000 PCBPGTA EQU PCBPGT+1 01440000 PCBSWPS2 EQU PCBFL3 01441000 @NM00014 EQU PCBFL3 01442000 PCBNOREC EQU PCBFL3 01443000 PCBDFRLS EQU PCBFL3 01444000 PCBSWPLS EQU PCBFL3 01445000 PCBSWPS1 EQU PCBFL3 01446000 PCBSWPIN EQU PCBFL3 01447000 PCBSWPOT EQU PCBFL3 01448000 PCBXPTA EQU PCBXPT+1 01449000 @NM00013 EQU PCBFL2 01450000 @NM00012 EQU PCBFL2 01451000 PCBVIO EQU PCBFL2 01452000 PCBSUPRS EQU PCBFL2 01453000 PCBRESET EQU PCBFL2 01454000 PCBIOERR EQU PCBFL2 01455000 PCBGFAD EQU PCBFL2 01456000 PCBFREAL EQU PCBFL2 01457000 PCBRLPA EQU PCBRLP+1 01458000 PCBFXC EQU PCBRLP 01459000 PCBRTPA EQU PCBRTP+1 01460000 PCBIOCMP EQU PCBFL1 01461000 PCBIOI EQU PCBFL1 01462000 PCBROOT EQU PCBFL1 01463000 PCBLFR EQU PCBFL1 01464000 PCBLLHLD EQU PCBFL1 01465000 PCBSRBMD EQU PCBFL1 01466000 PCBPEX EQU PCBFL1 01467000 @NM00011 EQU PCBFL1 01468000 PCBBQPA EQU PCBBQP 01469000 PCBFQPA EQU PCBFQP+1 01470000 PCBCQN EQU PCBFQP 01471000 @NM00010 EQU FRRSFLGS+1 01472000 @NM00009 EQU FRRSFLG1 01473000 FRRSNEST EQU FRRSFLG1 01474000 FRRSRCUR EQU FRRSFLG1 01475000 FRRSENTS EQU FRRS+84 01476000 FRRSRTMW EQU FRRS+16 01477000 ASXBEND EQU ASXB+232 01478000 ASXBRV25 EQU ASXB+228 01479000 ASXBRV24 EQU ASXB+224 01480000 ASXBPT0E EQU ASXB+220 01481000 ASXBCRB4 EQU ASXBCASW+3 01482000 ASXBCRB3 EQU ASXBCASW+2 01483000 ASXBCRB2 EQU ASXBCASW+1 01484000 ASXBCR06 EQU ASXBCRB1 01485000 ASXBCR05 EQU ASXBCRB1 01486000 ASXBCR04 EQU ASXBCRB1 01487000 ASXBCR03 EQU ASXBCRB1 01488000 ASXBCR02 EQU ASXBCRB1 01489000 ASXBCR01 EQU ASXBCRB1 01490000 ASXBTFD EQU ASXBCRB1 01491000 ASXBPIP EQU ASXBCRB1 01492000 ASXBCTDC EQU ASXB+212 01493000 ASXBTDCB EQU ASXB+208 01494000 ASXBRV19 EQU ASXB+204 01495000 ASXBSENV EQU ASXBSECR+1 01496000 ASXBRV34 EQU ASCBSFLG 01497000 ASXBRV33 EQU ASCBSFLG 01498000 ASXBRV32 EQU ASCBSFLG 01499000 ASXBRV31 EQU ASCBSFLG 01500000 ASXBRV30 EQU ASCBSFLG 01501000 ASXBRV29 EQU ASCBSFLG 01502000 ASXBRV28 EQU ASCBSFLG 01503000 ASXBRV27 EQU ASCBSFLG 01504000 ASXBUSER EQU ASXB+192 01505000 ASXBLSRB EQU ASXBAEQ+20 01506000 ASXBFSRB EQU ASXBAEQ+16 01507000 ASXBLRQE EQU ASXBAEQ+12 01508000 ASXBFRQE EQU ASXBAEQ+8 01509000 ASXBLIQE EQU ASXBAEQ+4 01510000 ASXBFIQE EQU ASXBAEQ 01511000 ASXBETSK EQU ASXB+164 01512000 ASXBSIRB EQU ASXB+160 01513000 ASXBPSWD EQU ASXB+152 01514000 ASXBPRG EQU ASXB+136 01515000 ASXBRV26 EQU ASXB+132 01516000 ASXBOUSB EQU ASXB+128 01517000 ASXBDDR EQU ASXB+124 01518000 ASXBRCTD EQU ASXB+120 01519000 ASXBRSMD EQU ASXB+116 01520000 ASXBFRWA EQU ASXB+108 01521000 ASXBFLSA EQU ASXB+36 01522000 ASXBIHSA EQU ASXB+32 01523000 ASXBRV15 EQU ASXB+28 01524000 ASXBRV14 EQU ASXB+24 01525000 ASXBLWA EQU ASXB+20 01526000 ASXBMPST EQU ASXB+16 01527000 ASXBRS00 EQU ASXB+14 01528000 ASXBTCBS EQU ASXB+12 01529000 ASXBLTCB EQU ASXB+8 01530000 ASXBFTCB EQU ASXB+4 01531000 ASXBASXB EQU ASXB 01532000 ASXBEGIN EQU ASXB 01533000 ASMCPRES EQU ASMCPRSQ+4 01534000 ASMCPTAK EQU ASMCPRSQ 01535000 ASMCPCNT EQU ASMCPAVQ+4 01536000 ASMCPAVL EQU ASMCPAVQ 01537000 ASMCPEXT EQU ASMPOOLS+6 01538000 ASMCPSIZ EQU ASMPOOLS+4 01539000 ASMCPID EQU ASMPOOLS 01540000 ASMRSV12 EQU ASMVT+1000 01541000 ASMSAVE EQU ASMVT+928 01542000 ASMWKSA7 EQU ASMVT+848 01543000 ASMWKSA6 EQU ASMVT+768 01544000 ASMACEPC EQU ASMVT+344 01545000 ASMSWKPC EQU ASMVT+328 01546000 ASMBWKPC EQU ASMVT+312 01547000 ASMIOEPC EQU ASMVT+296 01548000 ASMRSV10 EQU ASMVT+280 01549000 ASMPVACE EQU ASMVT+276 01550000 ASMPIOFR EQU ASMVT+272 01551000 ASMPVACQ EQU ASMVT+268 01552000 ASMPMSGS EQU ASMVT+264 01553000 ASMPMSG0 EQU ASMVT+260 01554000 ASMPFRLG EQU ASMVT+256 01555000 ASMPRLG EQU ASMVT+252 01556000 ASMPACT EQU ASMVT+248 01557000 ASMPSAV EQU ASMVT+244 01558000 ASMPCMP EQU ASMVT+240 01559000 ASMPCMPA EQU ASMVT+236 01560000 ASMPCMPN EQU ASMVT+232 01561000 ASMPCMPD EQU ASMVT+228 01562000 ASMPEX EQU ASMVT+224 01563000 ASMVRMTR EQU ASMVT+220 01564000 ASMPSRBC EQU ASMVT+216 01565000 ASMPSRMT EQU ASMVT+212 01566000 ASMPSWPD EQU ASMVT+208 01567000 ASMPTM EQU ASMVT+204 01568000 ASMPFRSW EQU ASMVT+200 01569000 ASMPFRSL EQU ASMVT+196 01570000 ASMPQIOE EQU ASMVT+192 01571000 ASMRSV8 EQU ASMVT+184 01572000 ASMTASCB EQU ASMVT+180 01573000 ASMRLGWQ EQU ASMVT+176 01574000 ASMRLGRQ EQU ASMVT+172 01575000 ASMTMECB EQU ASMVT+168 01576000 ASMTCBPT EQU ASMVT+164 01577000 ASMREQCT EQU ASMVT+160 01578000 ASMGOSWK EQU ASMGOSQS+4 01579000 ASMGOSWT EQU ASMGOSQS 01580000 ASMLSAIH EQU ASMLSAI+4 01581000 ASMLSAIL EQU ASMLSAI 01582000 ASMCINV EQU ASMVT+140 01583000 ASMSTGXA EQU ASMVT+136 01584000 ASMLGVT EQU ASMVT+132 01585000 ASMSLOTV EQU ASMVT+128 01586000 ASMERRS EQU ASMVT+124 01587000 ASMNVSC EQU ASMVT+120 01588000 ASMVSC EQU ASMVT+116 01589000 ASMSLOTS EQU ASMVT+112 01590000 ASMBKSLT EQU ASMVT+108 01591000 ASMRSV7 EQU ASMVT+92 01592000 ASMPSRB EQU ASMVT+88 01593000 ASMSRBCT EQU ASMVT+84 01594000 ASMIOCNT EQU ASMVT+80 01595000 ASMBURST EQU ASMVT+76 01596000 ASMPCCWN EQU ASMVT+72 01597000 ASMPCCWC EQU ASMPCCWQ+4 01598000 ASMPCCWA EQU ASMPCCWQ 01599000 ASMRSV6 EQU ASMVT+48 01600000 ASMIORQC EQU ASMVT+44 01601000 ASMIORQR EQU ASMVT+40 01602000 ASMSTAGL EQU ASMSTAGQ+4 01603000 ASMSTAGF EQU ASMSTAGQ 01604000 ASMRSV5 EQU ASMVT+28 01605000 ASMMSGBF EQU ASMVT+24 01606000 ASMEREC EQU ASMVT+20 01607000 ASMTRPAG EQU ASMVT+16 01608000 ASMGOS EQU ASMVT+12 01609000 ASMPART EQU ASMVT+8 01610000 ASMSART EQU ASMVT+4 01611000 ASMRSV4 EQU ASMVT+2 01612000 ASMWARM EQU ASMFLAG2 01613000 ASMQUICK EQU ASMFLAG2 01614000 ASMNOTPT EQU ASMFLAG2 01615000 ASMNOTMR EQU ASMFLAG2 01616000 ASMNOSAV EQU ASMFLAG2 01617000 ASMCALLQ EQU ASMFLAG2 01618000 ASMPLPAS EQU ASMFLAG1 01619000 ASMCOMMF EQU ASMFLAG1 01620000 ASMPLPAF EQU ASMFLAG1 01621000 ASMNODPX EQU ASMFLAG1 01622000 ASMRSV1 EQU ASMFLAG1 01623000 ASMNOLCL EQU ASMFLAG1 01624000 ASMNOCWQ EQU ASMFLAG1 01625000 ASMDUPLX EQU ASMFLAG1 01626000 ASCBEND EQU ASCB+208 01627000 ASCBSRBT EQU ASCB+200 01628000 ASCBSWTL EQU ASCB+196 01629000 ASCBRS14 EQU ASCB+195 01630000 ASCBSMCT EQU ASCB+194 01631000 ASCBRS12 EQU ASCB+192 01632000 ASCBPCTT EQU ASCB+188 01633000 ASCBVGTT EQU ASCB+184 01634000 ASCBRV43 EQU ASCBSRQ4 01635000 ASCBRV42 EQU ASCBSRQ4 01636000 ASCBRV41 EQU ASCBSRQ4 01637000 ASCBRV40 EQU ASCBSRQ4 01638000 ASCBRV39 EQU ASCBSRQ4 01639000 ASCBRV38 EQU ASCBSRQ4 01640000 ASCBRV37 EQU ASCBSRQ4 01641000 ASCBRV36 EQU ASCBSRQ4 01642000 ASCBRV35 EQU ASCBSRQ3 01643000 ASCBRV34 EQU ASCBSRQ3 01644000 ASCBRV33 EQU ASCBSRQ3 01645000 ASCBRV32 EQU ASCBSRQ3 01646000 ASCBRV31 EQU ASCBSRQ3 01647000 ASCBRV30 EQU ASCBSRQ3 01648000 ASCBRV29 EQU ASCBSRQ3 01649000 ASCBRV28 EQU ASCBSRQ3 01650000 ASCBRV27 EQU ASCBSRQ2 01651000 ASCBRV26 EQU ASCBSRQ2 01652000 ASCBRV25 EQU ASCBSRQ2 01653000 ASCBRV24 EQU ASCBSRQ2 01654000 ASCBRV23 EQU ASCBSRQ2 01655000 ASCBRV22 EQU ASCBSRQ2 01656000 ASCBRV21 EQU ASCBSRQ2 01657000 ASCBRV20 EQU ASCBSRQ2 01658000 ASCBRV19 EQU ASCBSRQ1 01659000 ASCBRV18 EQU ASCBSRQ1 01660000 ASCBRV17 EQU ASCBSRQ1 01661000 ASCBRV16 EQU ASCBSRQ1 01662000 ASCBRV15 EQU ASCBSRQ1 01663000 ASCBRV14 EQU ASCBSRQ1 01664000 ASCBRV13 EQU ASCBSRQ1 01665000 ASCBSTA EQU ASCBSRQ1 01666000 ASCBJBNS EQU ASCB+176 01667000 ASCBJBNI EQU ASCB+172 01668000 ASCBMCC EQU ASCB+168 01669000 ASCBRTWA EQU ASCB+164 01670000 ASCBIQEA EQU ASCB+160 01671000 ASCBXMPQ EQU ASCB+156 01672000 ASCBRS01 EQU ASCB+154 01673000 ASCBFMCT EQU ASCB+152 01674000 ASCBOUXB EQU ASCB+148 01675000 ASCBOUCB EQU ASCB+144 01676000 ASCBMECB EQU ASCB+140 01677000 ASCBQECB EQU ASCB+136 01678000 ASCBLSQH EQU ASCBLKGP+4 01679000 ASCBLOCK EQU ASCBLKGP 01680000 ASCBTCBS EQU ASCB+124 01681000 ASCBNVSC EQU ASCB+122 01682000 ASCBVSC EQU ASCB+120 01683000 ASCBSRBS EQU ASCB+118 01684000 ASCBSSRB EQU ASCB+116 01685000 ASCBRV06 EQU ASCBFLG2 01686000 ASCBRV05 EQU ASCBFLG2 01687000 ASCBRV04 EQU ASCBFLG2 01688000 ASCBSNQS EQU ASCBFLG2 01689000 ASCBS2S EQU ASCBFLG2 01690000 ASCBCEXT EQU ASCBFLG2 01691000 ASCBPXMT EQU ASCBFLG2 01692000 ASCBXMPT EQU ASCBFLG2 01693000 ASCBRF07 EQU ASCBDSP1 01694000 ASCBRF06 EQU ASCBDSP1 01695000 ASCBRF05 EQU ASCBDSP1 01696000 ASCBRF04 EQU ASCBDSP1 01697000 ASCBRF03 EQU ASCBDSP1 01698000 ASCBRF02 EQU ASCBDSP1 01699000 ASCBFAIL EQU ASCBDSP1 01700000 ASCBNOQ EQU ASCBDSP1 01701000 ASCBSWCT EQU ASCB+112 01702000 ASCBTMCH EQU ASCB+104 01703000 ASCBNSWP EQU ASCBFLG1 01704000 ASCBTYP1 EQU ASCBFLG1 01705000 ASCBSTND EQU ASCBFLG1 01706000 ASCBABNT EQU ASCBFLG1 01707000 ASCBTERM EQU ASCBFLG1 01708000 ASCBS3S EQU ASCBFLG1 01709000 ASCBCMSH EQU ASCBFLG1 01710000 ASCBTOFF EQU ASCBFLG1 01711000 ASCBRF01 EQU ASCBRCTF 01712000 ASCBTMLW EQU ASCBRCTF 01713000 ASCBOUT EQU ASCBRCTF 01714000 ASCBWAIT EQU ASCBRCTF 01715000 ASCBRV08 EQU ASCBRCTF 01716000 ASCBFQU EQU ASCBRCTF 01717000 ASCBFRS EQU ASCBRCTF 01718000 ASCBTMNO EQU ASCBRCTF 01719000 ASCBAFFN EQU ASCBFW1 01720000 ASCBDUMP EQU ASCB+96 01721000 ASCBRV44 EQU ASCB+92 01722000 ASCBUBET EQU ASCB+88 01723000 ASCBECB EQU ASCB+84 01724000 ASCBJSTL EQU ASCB+80 01725000 ASCBEWST EQU ASCB+72 01726000 ASCBEJST EQU ASCB+64 01727000 ASCBTSB EQU ASCB+60 01728000 ASCBCSCB EQU ASCB+56 01729000 ASCBLDA EQU ASCB+48 01730000 ASCBSTOR EQU ASCB+44 01731000 ASCBDP EQU ASCB+43 01732000 ASCBRV07 EQU ASCB+42 01733000 ASCBIOSM EQU ASCB+40 01734000 ASCBSEQN EQU ASCB+38 01735000 ASCBCPUS EQU ASCB+32 01736000 ASCBSPL EQU ASCB+28 01737000 ASCBIOSP EQU ASCB+24 01738000 ASCBSYNC EQU ASCBSUPC+4 01739000 ASCBSVRB EQU ASCBSUPC 01740000 ASCBCMSF EQU ASCB+12 01741000 ASCBBWDP EQU ASCB+8 01742000 ASCBFWDP EQU ASCB+4 01743000 ASCBASCB EQU ASCB 01744000 ASCBEGIN EQU ASCB 01745000 AIADPXCT EQU AIALGE 01746000 AIACEPTR EQU AIALPMEP 01747000 AIASLOT EQU AIASSID+1 01748000 @NM00004 EQU AIASSID 01749000 @NM00003 EQU AIALSID 01750000 AIARCSN EQU AIANXAIA+2 01751000 AIACYL EQU AIANXAIA 01752000 AIARSV9 EQU AIAFLG3 01753000 AIARSV8 EQU AIAFLG3 01754000 AIARSV7 EQU AIAFLG3 01755000 AIALPMEC EQU AIAFLG3 01756000 AIARSV6 EQU AIAFLG3 01757000 AIATRPSP EQU AIAFLG3 01758000 AIAPRINO EQU AIAFLG3 01759000 AIARSV5 EQU AIAFLG3 01760000 AIABADID EQU AIAFLG2 01761000 AIAERROR EQU AIAFLG2 01762000 AIASECER EQU AIAFLG2 01763000 AIAPRIER EQU AIAFLG2 01764000 AIARSV4 EQU AIAFLG2 01765000 AIAIORTY EQU AIAFLG2 01766000 AIATERMR EQU AIAFLG2 01767000 AIAFRAUX EQU AIAFLG2 01768000 AIARSV1 EQU AIAFLG1 01769000 AIASWPFX EQU AIAFLG1 01770000 AIALSQA EQU AIAFLG1 01771000 AIADUPLX EQU AIAFLG1 01772000 AIAVIO EQU AIAFLG1 01773000 AIAPRIV EQU AIAFLG1 01774000 AIAWRITE EQU AIAFLG1 01775000 AIAOP EQU AIA+8 01776000 AIABQPA EQU AIA+4 01777000 AIAFQPA EQU AIA 01778000 PVTEND EQU PVT+1840 01779000 PVTSPARE EQU PVT+1838 01780000 PVTCHUIC EQU PVT+1836 01781000 PVTCOMFX EQU PVT+1834 01782000 PVTSQAFX EQU PVT+1832 01783000 PVTDEFFX EQU PVT+1828 01784000 PVTFIXOK EQU PVT+1826 01785000 PVTPEROK EQU PVT+1824 01786000 PVTMAXFX EQU PVT+1822 01787000 PVTPERFX EQU PVT+1820 01788000 PVTRSRB EQU PVT+1776 01789000 PVTRESV5 EQU PVT+1773 01790000 PVTSRBS EQU PVT+1772 01791000 PVTSSRB EQU PVT+1768 01792000 PVTACA EQU PVTWSAX+1400 01793000 PVTWSA17 EQU PVTWSAX+1184 01794000 PVTWSA16 EQU PVTWSAX+1112 01795000 PVTWSA15 EQU PVTWSAX+1040 01796000 PVTWSA14 EQU PVTWSAX+968 01797000 PVTWSA13 EQU PVTWSAX+896 01798000 PVTWSA12 EQU PVTWSAX+824 01799000 PVTWSA11 EQU PVTWSAX+752 01800000 PVTWSA10 EQU PVTWSAX+672 01801000 PVTWSA9 EQU PVTWSAX+592 01802000 PVTWSA8 EQU PVTWSAX+504 01803000 PVTWSA7 EQU PVTWSAX+432 01804000 PVTWSA6 EQU PVTWSAX+360 01805000 PVTWSA5 EQU PVTWSAX+288 01806000 PVTWSA4 EQU PVTWSAX+216 01807000 PVTWSA3 EQU PVTWSAX+144 01808000 PVTWSA2 EQU PVTWSAX+72 01809000 PVTWSA1 EQU PVTWSAX 01810000 PVTCIOQL EQU PVTQS+36 01811000 PVTCIOQF EQU PVTQS+32 01812000 PVTGFADL EQU PVTQS+28 01813000 PVTGFADF EQU PVTQS+24 01814000 PVTFPCBL EQU PVTQS+20 01815000 PVTFPCBF EQU PVTQS+16 01816000 PVTSQAQL EQU PVTQS+14 01817000 PVTSQAQF EQU PVTQS+12 01818000 PVTCFQL EQU PVTQS+10 01819000 PVTCFQF EQU PVTQS+8 01820000 PVTRSRVL EQU PVTQS+6 01821000 PVTRSRVF EQU PVTQS+4 01822000 PVTAFQL EQU PVTQS+2 01823000 PVTAFQF EQU PVTQS 01824000 PVTSPFR EQU PVT+302 01825000 PVTCFMCT EQU PVT+300 01826000 PVTSPREC EQU PVT+296 01827000 PVTCAREC EQU PVT+292 01828000 PVTCAOUT EQU PVT+288 01829000 PVTCAIN EQU PVT+284 01830000 PVTNSWPS EQU PVT+280 01831000 PVTNPREC EQU PVT+276 01832000 PVTSPIN EQU PVT+268 01833000 PVTVAMR EQU PVT+264 01834000 PVTVAMO EQU PVT+260 01835000 PVTVAMI EQU PVT+256 01836000 PVTNPOUT EQU PVT+252 01837000 PVTNPIN EQU PVT+248 01838000 PVTPRSET EQU PVT+244 01839000 PVTFRSLT EQU PVT+240 01840000 PVTPAGIO EQU PVT+236 01841000 PVTSWPIO EQU PVT+232 01842000 PVTPSWPP EQU PVT+228 01843000 PVTPPREF EQU PVT+224 01844000 PVTPOPBR EQU PVT+220 01845000 PVTPRELF EQU PVT+216 01846000 PVTPRELV EQU PVT+212 01847000 PVTPFREE EQU PVT+208 01848000 PVTPRELS EQU PVT+204 01849000 PVTPOUT EQU PVT+200 01850000 PVTPFXLD EQU PVT+196 01851000 PVTPITAS EQU PVT+192 01852000 PVTPSRBP EQU PVT+188 01853000 PVTPDSEG EQU PVT+184 01854000 PVTPCSGB EQU PVT+180 01855000 PVTPCSEG EQU PVT+176 01856000 PVTPSWPC EQU PVT+168 01857000 PVTPSOUT EQU PVT+164 01858000 PVTPSWIN EQU PVT+160 01859000 PVTPRCFI EQU PVT+152 01860000 PVTPRCF EQU PVT+148 01861000 PVTPVRC EQU PVT+144 01862000 PVTPVRIN EQU PVT+140 01863000 PVTPVRLS EQU PVT+136 01864000 PVTPVEQR EQU PVT+132 01865000 PVTPPIOI EQU PVT+128 01866000 PVTPVRPO EQU PVT+124 01867000 PVTPRFR EQU PVT+120 01868000 PVTPFP2 EQU PVT+116 01869000 PVTPFP EQU PVT+112 01870000 PVTREP2 EQU PVT+100 01871000 PVTPIOCP EQU PVT+96 01872000 PVTPIOP EQU PVT+92 01873000 PVTPGFAD EQU PVT+88 01874000 PVTPGFA EQU PVT+84 01875000 PVTPSQA EQU PVT+80 01876000 PVTPSINT EQU PVT+76 01877000 PVTPSIB EQU PVT+72 01878000 PVTSRBID EQU PVT+68 01879000 PVTPCIWA EQU PVT+64 01880000 PVTHQSA EQU PVT+62 01881000 PVTLQSA EQU PVT+60 01882000 PVTOROOT EQU PVT+56 01883000 PVTREUS EQU PVT+48 01884000 PVTRESV4 EQU PVT+46 01885000 PVTRSUS EQU PVT+44 01886000 PVTVROOT EQU PVT+40 01887000 PVTPCBLO EQU PVT+38 01888000 PVTPCBCT EQU PVT+36 01889000 PVTDFRS EQU PVT+34 01890000 PVTRSQA EQU PVT+32 01891000 PVTPTLB EQU PVT+31 01892000 PVTPCBNO EQU PVT+30 01893000 PVTSRBNO EQU PVT+29 01894000 PVTSQDC EQU PVT+28 01895000 PVTLCSA EQU PVT+26 01896000 PVTLPRIV EQU PVT+24 01897000 PVTLVR EQU PVT+22 01898000 PVTFVR EQU PVT+20 01899000 PVTLPFN EQU PVT+18 01900000 PVTFPFN EQU PVT+16 01901000 PVTSSPIN EQU PVT+11 01902000 PVTPCBS EQU PVT+10 01903000 PVTPOOL EQU PVT+8 01904000 PVTAFCOK EQU PVT+6 01905000 PVTAFCLO EQU PVT+4 01906000 PVTAFC EQU PVT+2 01907000 PVTFLAG2 EQU PVT+1 01908000 PVTDUMP EQU PVTFLAG1 01909000 PVTSIT EQU PVTFLAG1 01910000 PVTLSI EQU PVTFLAG1 01911000 PVTRESV1 EQU PVTFLAG1 01912000 PVTPCBLT EQU PVTFLAG1 01913000 PVTSRBIU EQU PVTFLAG1 01914000 PVTBGMS EQU PVTFLAG1 01915000 PVTPMSG EQU PVTFLAG1 01916000 CVTLEVL EQU CVTRELNO+2 01917000 CVTNUMB EQU CVTRELNO 01918000 CVTMDL EQU CVTFIX+250 01919000 @NM00002 EQU CVTFIX+248 01920000 @NM00001 EQU CVTFIX 01921000 CVTRV482 EQU CVTXTNT2+128 01922000 CVTRV481 EQU CVTXTNT2+124 01923000 CVTRV480 EQU CVTXTNT2+120 01924000 CVTRV479 EQU CVTXTNT2+118 01925000 CVTRV478 EQU CVTXTNT2+117 01926000 CVTRV477 EQU CVTXTNT2+116 01927000 CVTRV476 EQU CVTXTNT2+115 01928000 CVTRV475 EQU CVTXTNT2+114 01929000 CVTRV474 EQU CVTRV466 01930000 CVTRV473 EQU CVTRV466 01931000 CVTRV472 EQU CVTRV466 01932000 CVTRV471 EQU CVTRV466 01933000 CVTRV470 EQU CVTRV466 01934000 CVTRV469 EQU CVTRV466 01935000 CVTRV468 EQU CVTRV466 01936000 CVTRV467 EQU CVTRV466 01937000 CVTRV465 EQU CVTRV457 01938000 CVTRV464 EQU CVTRV457 01939000 CVTRV463 EQU CVTRV457 01940000 CVTRV462 EQU CVTRV457 01941000 CVTRV461 EQU CVTRV457 01942000 CVTRV460 EQU CVTRV457 01943000 CVTRV459 EQU CVTRV457 01944000 CVTRV458 EQU CVTRV457 01945000 CVTRV456 EQU CVTXTNT2+108 01946000 CVTRV455 EQU CVTXTNT2+104 01947000 CVTRV454 EQU CVTXTNT2+100 01948000 CVTRV453 EQU CVTXTNT2+96 01949000 CVTRV452 EQU CVTXTNT2+94 01950000 CVTRV451 EQU CVTXTNT2+92 01951000 CVTRV450 EQU CVTXTNT2+90 01952000 CVTRV449 EQU CVTXTNT2+88 01953000 CVTRV448 EQU CVTXTNT2+87 01954000 CVTRV447 EQU CVTXTNT2+86 01955000 CVTRV446 EQU CVTRV438 01956000 CVTRV445 EQU CVTRV438 01957000 CVTRV444 EQU CVTRV438 01958000 CVTRV443 EQU CVTRV438 01959000 CVTRV442 EQU CVTRV438 01960000 CVTRV441 EQU CVTRV438 01961000 CVTRV440 EQU CVTRV438 01962000 CVTRV439 EQU CVTRV438 01963000 CVTRV437 EQU CVTRV429 01964000 CVTRV436 EQU CVTRV429 01965000 CVTRV435 EQU CVTRV429 01966000 CVTRV434 EQU CVTRV429 01967000 CVTRV433 EQU CVTRV429 01968000 CVTRV432 EQU CVTRV429 01969000 CVTRV431 EQU CVTRV429 01970000 CVTRV430 EQU CVTRV429 01971000 CVTRV428 EQU CVTXTNT2+80 01972000 CVTRV427 EQU CVTXTNT2+76 01973000 CVTRV426 EQU CVTXTNT2+72 01974000 CVTRV425 EQU CVTXTNT2+68 01975000 CVTATACT EQU CVTATCVT 01976000 CVTRV423 EQU CVTXTNT2+62 01977000 CVTRV422 EQU CVTXTNT2+60 01978000 CVTRV421 EQU CVTXTNT2+58 01979000 CVTRV420 EQU CVTXTNT2+56 01980000 CVTRV419 EQU CVTXTNT2+55 01981000 CVTRV418 EQU CVTXTNT2+54 01982000 CVTRV417 EQU CVTRV409 01983000 CVTRV416 EQU CVTRV409 01984000 CVTRV415 EQU CVTRV409 01985000 CVTRV414 EQU CVTRV409 01986000 CVTRV413 EQU CVTRV409 01987000 CVTRV412 EQU CVTRV409 01988000 CVTRV411 EQU CVTRV409 01989000 CVTRV410 EQU CVTRV409 01990000 CVTRV408 EQU CVTRV400 01991000 CVTRV407 EQU CVTRV400 01992000 CVTRV406 EQU CVTRV400 01993000 CVTRV405 EQU CVTRV400 01994000 CVTRV404 EQU CVTRV400 01995000 CVTRV403 EQU CVTRV400 01996000 CVTRV402 EQU CVTRV400 01997000 CVTRV401 EQU CVTRV400 01998000 CVTICB EQU CVTXTNT2+48 01999000 CVTSKTA EQU CVTXTNT2+44 02000000 CVTRSV99 EQU CVTXTNT2+40 02001000 CVTRSV98 EQU CVTXTNT2+36 02002000 CVTRSV97 EQU CVTXTNT2+34 02003000 CVTRSV96 EQU CVTXTNT2+32 02004000 CVTOLTEP EQU CVTXTNT2+28 02005000 CVTQIDA EQU CVTQID+1 02006000 CVTRSV95 EQU CVTQID 02007000 CVTRSV94 EQU CVTXTNT2+20 02008000 CVTRSV93 EQU CVTXTNT2+16 02009000 CVTRSV92 EQU CVTXTNT2+12 02010000 CVTDEBVR EQU CVTXTNT2+8 02011000 CVTRSV91 EQU CVTXTNT2+6 02012000 CVTRSV9H EQU CVTFLGBT 02013000 CVTRSV9G EQU CVTFLGBT 02014000 CVTRSV9F EQU CVTFLGBT 02015000 CVTRSV9E EQU CVTFLGBT 02016000 CVTRSV9D EQU CVTFLGBT 02017000 CVTRSV9C EQU CVTFLGBT 02018000 CVTVME EQU CVTFLGBT 02019000 CVTNPE EQU CVTFLGBT 02020000 CVTNUCLS EQU CVTXTNT2+4 02021000 CVTDSSVA EQU CVTDSSV+1 02022000 CVTRSV89 EQU CVTDSSV 02023000 CVTRSV88 EQU CVTXTNT1+8 02024000 CVTRSV87 EQU CVTXTNT1+4 02025000 CVTFACHN EQU CVTXTNT1 02026000 CVTRV488 EQU CVTMAP+412 02027000 CVTRV487 EQU CVTMAP+408 02028000 CVTRV486 EQU CVTMAP+404 02029000 CVTRV485 EQU CVTMAP+400 02030000 CVTACTAP EQU CVTMAP+396 02031000 CVTAUTH EQU CVTMAP+392 02032000 CVTATMCA EQU CVTATMCT+1 02033000 CVTATMST EQU CVTATMCT 02034000 CVTRSV61 EQU CVTMAP+384 02035000 CVTVOLT1 EQU CVTVOLM1+1 02036000 CVTVOLI1 EQU CVTVOLF1 02037000 CVTSTOA EQU CVTMAP+376 02038000 CVTRSV58 EQU CVTMAP+374 02039000 CVTRSV57 EQU CVTMAP+372 02040000 CVTDDCE EQU CVTMAP+368 02041000 CVTPNWFR EQU CVTMAP+364 02042000 CVTSMF EQU CVTMAP+360 02043000 CVTSULK EQU CVTMAP+358 02044000 CVTSLKO EQU CVTSYSK 02045000 CVTSLKP EQU CVTSYSK 02046000 CVTSLKQ EQU CVTSYSK 02047000 CVTSLKR EQU CVTSYSK 02048000 CVTRSV56 EQU CVTSYSK 02049000 CVTRSV55 EQU CVTSYSK 02050000 CVTRSV54 EQU CVTSYSK 02051000 CVTRSV53 EQU CVTSYSK 02052000 CVTRSV52 EQU CVTA1F1 02053000 CVTRSV51 EQU CVTA1F1 02054000 CVTRSV50 EQU CVTA1F1 02055000 CVTRSV49 EQU CVTA1F1 02056000 CVTRSV48 EQU CVTA1F1 02057000 CVTRSV47 EQU CVTA1F1 02058000 CVTSRSW EQU CVTA1F1 02059000 CVTPFSW EQU CVTA1F1 02060000 CVTPCVT EQU CVTMAP+352 02061000 CVTRSV46 EQU CVTMAP+344 02062000 CVTRSV45 EQU CVTMAP+340 02063000 CVTRSV44 EQU CVTMAP+338 02064000 CVTRSV43 EQU CVTMAP+336 02065000 CVTHJESA EQU CVTHJES+1 02066000 CVTRSV42 EQU CVTHJES 02067000 CVTEXT2A EQU CVTEXT2+1 02068000 CVTRSV41 EQU CVTEXT2 02069000 CVTAPFA EQU CVTAPF+1 02070000 CVTRSV40 EQU CVTAPF 02071000 CVTRV518 EQU CVTINTLA 02072000 CVTRV517 EQU CVTERPV 02073000 CVTEORM EQU CVTMAP+312 02074000 CVTMCHPR EQU CVTMAP+308 02075000 CVTTZ EQU CVTMAP+304 02076000 CVTJEPS EQU CVTMAP+300 02077000 CVTJESCT EQU CVTMAP+296 02078000 CVTMODE EQU CVTMAP+292 02079000 CVTPTRV EQU CVTMAP+288 02080000 CVTREAL EQU CVTMAP+284 02081000 CVTRSV39 EQU CVTMAP+280 02082000 CVTRSV38 EQU CVTMAP+276 02083000 CVTDMSRA EQU CVTDMSR+1 02084000 CVTRV634 EQU CVTDMSRF 02085000 CVTRV633 EQU CVTDMSRF 02086000 CVTRV632 EQU CVTDMSRF 02087000 CVTRV631 EQU CVTDMSRF 02088000 CVTRV630 EQU CVTDMSRF 02089000 CVTRV629 EQU CVTDMSRF 02090000 CVTUDUMP EQU CVTDMSRF 02091000 CVTSDUMP EQU CVTDMSRF 02092000 CVTQMSGA EQU CVTQMSG+1 02093000 CVTRSV36 EQU CVTQMSG 02094000 CVTAMFF EQU CVTMAP+264 02095000 CVTPURGA EQU CVTPURG+1 02096000 CVTRSV35 EQU CVTPURG 02097000 CVTCBSP EQU CVTMAP+256 02098000 CVTATERA EQU CVTATER+1 02099000 CVTSYST EQU CVTATER 02100000 CVTVOLT2 EQU CVTTAT 02101000 CVTVOLI2 EQU CVTVOLF2 02102000 CVTAQAVB EQU CVTAQAVT+1 02103000 CVTRSV34 EQU CVTTCMFG 02104000 CVTRSV33 EQU CVTTCMFG 02105000 CVTRSV32 EQU CVTTCMFG 02106000 CVTRSV31 EQU CVTTCMFG 02107000 CVTRSV30 EQU CVTTCMFG 02108000 CVTRSV29 EQU CVTTCMFG 02109000 CVTRSV28 EQU CVTTCMFG 02110000 CVTTCRDY EQU CVTTCMFG 02111000 CVTGTFA EQU CVTGTF+1 02112000 CVTRSV27 EQU CVTGTFST 02113000 CVTRNIO EQU CVTGTFST 02114000 CVTUSR EQU CVTGTFST 02115000 CVTRV318 EQU CVTFORM 02116000 CVTRV317 EQU CVTTMODE 02117000 CVTRV316 EQU CVTSTATE 02118000 CVTRV315 EQU CVTGTFS 02119000 CVTGTFAV EQU CVTGTFS 02120000 CVT0SCR1 EQU CVTMAP+232 02121000 CVTRV515 EQU CVTMAP+228 02122000 CVTRMS EQU CVTMAP+224 02123000 CVTPATCH EQU CVTMAP+220 02124000 CVTTSCE EQU CVTMAP+216 02125000 CVTLNKSC EQU CVTMAP+214 02126000 CVTQABST EQU CVTMAP+212 02127000 CVTMDLDS EQU CVTMAP+208 02128000 CVTUSER EQU CVTMAP+204 02129000 CVTABEND EQU CVTMAP+200 02130000 CVTSMCA EQU CVTMAP+196 02131000 CVTRSV18 EQU CVTMAP+192 02132000 CVTQLPAQ EQU CVTMAP+188 02133000 CVTQCDSR EQU CVTMAP+184 02134000 CVTRSV17 EQU CVTOPTB 02135000 CVTRSV16 EQU CVTOPTB 02136000 CVTFP EQU CVTOPTB 02137000 CVTAPTHR EQU CVTOPTB 02138000 CVTNLOG EQU CVTOPTB 02139000 CVTTOD EQU CVTOPTB 02140000 CVTCTIMS EQU CVTOPTB 02141000 CVTPROT EQU CVTOPTB 02142000 CVTXPFP EQU CVTOPTA 02143000 CVTASCII EQU CVTOPTA 02144000 CVTRSV13 EQU CVTOPTA 02145000 CVTRSV12 EQU CVTOPTA 02146000 CVTNIP EQU CVTOPTA 02147000 CVTDDR EQU CVTOPTA 02148000 CVTAPR EQU CVTOPTA 02149000 CVTCCH EQU CVTOPTA 02150000 CVTSNCTR EQU CVTMAP+180 02151000 CVTQMWR EQU CVTMAP+176 02152000 CVTQOCR EQU CVTMAP+172 02153000 CVT1EF00 EQU CVTMAP+168 02154000 CVTMZ00 EQU CVTMAP+164 02155000 CVTHEAD EQU CVTMAP+160 02156000 CVTRSV11 EQU CVTMAP+156 02157000 CVT0PT01 EQU CVTMAP+152 02158000 CVTMSER EQU CVTMAP+148 02159000 CVTRV516 EQU CVTIERLC 02160000 CVTILCH EQU CVTMAP+140 02161000 CVT0DS EQU CVTMAP+136 02162000 CVTFBOSV EQU CVTMAP+132 02163000 CVTNUCB EQU CVTMAP+128 02164000 CVTIXAVL EQU CVTMAP+124 02165000 CVTIOQET EQU CVTMAP+120 02166000 CVTDCBA EQU CVTMAP+117 02167000 CVTMVS2 EQU CVTDCB 02168000 CVT6DAT EQU CVTDCB 02169000 CVT4MPS EQU CVTDCB 02170000 CVTRSV09 EQU CVTDCB 02171000 CVT4MS1 EQU CVTDCB 02172000 CVT2SPS EQU CVTDCB 02173000 CVT1SSS EQU CVTDCB 02174000 CVTRSV08 EQU CVTDCB 02175000 CVTSTB EQU CVTMAP+112 02176000 CVTQTD00 EQU CVTMAP+108 02177000 CVTQTE00 EQU CVTMAP+104 02178000 CVTCUCB EQU CVTMAP+100 02179000 CVTSJQ EQU CVTMAP+96 02180000 CVTPBLDL EQU CVTMAP+92 02181000 CVTTPC EQU CVTMAP+88 02182000 CVTSVDCB EQU CVTMAP+84 02183000 CVTBRET EQU CVTMAP+82 02184000 CVTEXIT EQU CVTMAP+80 02185000 CVT0FN00 EQU CVTMAP+76 02186000 CVTDARA EQU CVTDAR+1 02187000 CVTRSV07 EQU CVTFLGS1 02188000 CVTRSV06 EQU CVTFLGS1 02189000 CVTRSV05 EQU CVTFLGS1 02190000 CVTRSV04 EQU CVTFLGS1 02191000 CVTRSV03 EQU CVTFLGS1 02192000 CVTRSV02 EQU CVTFLGS1 02193000 CVTRSV01 EQU CVTFLGS1 02194000 CVTDMPLK EQU CVTFLGS1 02195000 CVTXITP EQU CVTMAP+68 02196000 CVTZDTAB EQU CVTMAP+64 02197000 CVTMSLT EQU CVTMAP+60 02198000 CVTDATE EQU CVTMAP+56 02199000 CVTSYSAD EQU CVTMAP+48 02200000 CVTXTLER EQU CVTMAP+44 02201000 CVTILK2 EQU CVTMAP+40 02202000 CVTILK1 EQU CVTMAP+36 02203000 CVTPRLTV EQU CVTMAP+32 02204000 CVTPCNVT EQU CVTMAP+28 02205000 CVT0VL00 EQU CVTMAP+24 02206000 CVTXAPG EQU CVTMAP+20 02207000 CVTBUF EQU CVTMAP+16 02208000 CVTJOB EQU CVTMAP+12 02209000 CVTLINK EQU CVTMAP+8 02210000 CVT0EF00 EQU CVTMAP+4 02211000 CVTTCBP EQU CVTMAP 02212000 CVT EQU CVTMAP 02213000 @NM00040 EQU PSA+3668 02214000 PSASTAK EQU PSA+3072 02215000 @NM00039 EQU PSA+1048 02216000 PSAUSEND EQU PSA+1048 02217000 PSARV062 EQU PSA+1044 02218000 PSACDAL EQU PSA+1040 02219000 PSAWTCOD EQU PSA+1036 02220000 PSAATCVT EQU PSA+1032 02221000 PSAPCPSW EQU PSA+1024 02222000 PSAPIR2 EQU PSA+1020 02223000 PSARV059 EQU PSA+1018 02224000 PSASVC13 EQU PSA+1016 02225000 PSALSFCC EQU PSA+1012 02226000 PSASFACC EQU PSA+1008 02227000 PSASTOP EQU PSA+992 02228000 PSASTART EQU PSA+976 02229000 PSARSPSW EQU PSA+968 02230000 PSASRPSW EQU PSA+960 02231000 PSARV045 EQU PSA+892 02232000 PSARV044 EQU PSA+888 02233000 PSARV043 EQU PSA+884 02234000 PSARV042 EQU PSA+880 02235000 PSARV041 EQU PSA+876 02236000 PSARV040 EQU PSA+872 02237000 PSARV025 EQU PSA+868 02238000 PSADSSED EQU PSA+868 02239000 PSADSSPR EQU PSA+864 02240000 PSADSSFW EQU PSA+860 02241000 PSADSS14 EQU PSA+856 02242000 PSADSSPP EQU PSA+848 02243000 PSADSSRP EQU PSA+840 02244000 PSADSS05 EQU PSADSSF4 02245000 PSADSS10 EQU PSADSSF4 02246000 PSADSSVE EQU PSADSSF4 02247000 PSADSSDE EQU PSADSSF4 02248000 PSADSSC0 EQU PSADSSF4 02249000 PSADSSIE EQU PSADSSF4 02250000 PSADSS12 EQU PSADSSF4 02251000 PSADSSRC EQU PSADSSF4 02252000 PSARV057 EQU PSADSSF3 02253000 PSARV056 EQU PSADSSF3 02254000 PSARV055 EQU PSADSSF3 02255000 PSADSSMC EQU PSADSSF3 02256000 PSADSSRW EQU PSADSSF3 02257000 PSADSSNM EQU PSADSSF3 02258000 PSADSSES EQU PSADSSF3 02259000 PSADSSGP EQU PSADSSF3 02260000 PSADSSF2 EQU PSADSSFL+1 02261000 PSADSSPI EQU PSADSSF1 02262000 PSADSSOI EQU PSADSSF1 02263000 PSADSSSP EQU PSADSSF1 02264000 PSADSSTP EQU PSADSSF1 02265000 PSADSSDW EQU PSADSSF1 02266000 PSADSSDD EQU PSADSSF1 02267000 PSADSSDM EQU PSADSSF1 02268000 PSADSSMV EQU PSADSSF1 02269000 PSADSSTS EQU PSA+816 02270000 PSADSSWK EQU PSA+812 02271000 PSADSSR3 EQU PSA+808 02272000 PSADSSR2 EQU PSA+804 02273000 PSADSSRS EQU PSA+800 02274000 PSASTOR EQU PSA+796 02275000 PSACPUSA EQU PSA+794 02276000 PSAVSTAP EQU PSA+792 02277000 PSAWKVAP EQU PSA+788 02278000 PSAWKRAP EQU PSA+784 02279000 PSAMCHIC EQU PSA+783 02280000 PSARV061 EQU PSA+782 02281000 PSASYMSK EQU PSA+781 02282000 PSAMCHFL EQU PSA+780 02283000 PSACR0 EQU PSA+776 02284000 PSAPSWSV EQU PSA+768 02285000 PSALITA EQU PSA+764 02286000 PSACLHS EQU PSAHLHI 02287000 PSALKR15 EQU PSALKSA+60 02288000 PSALKR14 EQU PSALKSA+56 02289000 PSALKR13 EQU PSALKSA+52 02290000 PSALKR12 EQU PSALKSA+48 02291000 PSALKR11 EQU PSALKSA+44 02292000 PSALKR10 EQU PSALKSA+40 02293000 PSALKR9 EQU PSALKSA+36 02294000 PSALKR8 EQU PSALKSA+32 02295000 PSALKR7 EQU PSALKSA+28 02296000 PSALKR6 EQU PSALKSA+24 02297000 PSALKR5 EQU PSALKSA+20 02298000 PSALKR4 EQU PSALKSA+16 02299000 PSALKR3 EQU PSALKSA+12 02300000 PSALKR2 EQU PSALKSA+8 02301000 PSALKR1 EQU PSALKSA+4 02302000 PSALKR0 EQU PSALKSA 02303000 PSARV023 EQU PSACLHT+52 02304000 PSALOCAL EQU PSACLHT+48 02305000 PSACMSL EQU PSACLHT+44 02306000 PSAOPTL EQU PSACLHT+40 02307000 PSATPACL EQU PSACLHT+36 02308000 PSATPDNL EQU PSACLHT+32 02309000 PSATPNCL EQU PSACLHT+28 02310000 PSAIOSLL EQU PSACLHT+24 02311000 PSAIOSUL EQU PSACLHT+20 02312000 PSAIOSCL EQU PSACLHT+16 02313000 PSAIOSSL EQU PSACLHT+12 02314000 PSASALCL EQU PSACLHT+8 02315000 PSAASML EQU PSACLHT+4 02316000 PSADISPL EQU PSACLHT 02317000 PSASRSA EQU PSA+636 02318000 PSARV050 EQU PSA+634 02319000 PSADSSGO EQU PSA+633 02320000 PSARECUR EQU PSA+632 02321000 PSAHLHIS EQU PSA+628 02322000 PSAIPCSA EQU PSA+624 02323000 @NM00038 EQU PSA+621 02324000 PSAIPCDM EQU PSA+620 02325000 PSAIPCD EQU PSA+616 02326000 @NM00037 EQU PSA+613 02327000 PSAIPCRM EQU PSA+612 02328000 PSAIPCR EQU PSA+608 02329000 PSAMCHEX EQU PSA+600 02330000 PSAMPSW EQU PSA+592 02331000 PSAEXPS2 EQU PSA+584 02332000 PSAEXPS1 EQU PSA+576 02333000 PSAPIREG EQU PSA+572 02334000 PSARSREG EQU PSA+568 02335000 PSAGPREG EQU PSA+556 02336000 PSARV022 EQU PSASUP4 02337000 PSARV021 EQU PSASUP4 02338000 PSARV020 EQU PSASUP4 02339000 PSARV019 EQU PSASUP4 02340000 PSARV018 EQU PSASUP4 02341000 PSARV017 EQU PSASUP4 02342000 PSARV016 EQU PSASUP4 02343000 PSARV015 EQU PSASUP4 02344000 PSARV014 EQU PSASUP3 02345000 PSARV013 EQU PSASUP3 02346000 PSARV012 EQU PSASUP3 02347000 PSAESTA EQU PSASUP3 02348000 PSASPR EQU PSASUP3 02349000 PSAPSREG EQU PSASUP3 02350000 PSAPI2 EQU PSASUP3 02351000 PSAIOSUP EQU PSASUP3 02352000 PSALCR EQU PSASUP2 02353000 PSARTM EQU PSASUP2 02354000 PSAACR EQU PSASUP2 02355000 PSAIPCE2 EQU PSASUP2 02356000 PSAIPCES EQU PSASUP2 02357000 PSAIPCEC EQU PSASUP2 02358000 PSAGTF EQU PSASUP2 02359000 PSAIPCRI EQU PSASUP2 02360000 PSATYPE6 EQU PSASUP1 02361000 PSATCTL EQU PSASUP1 02362000 PSADISP EQU PSASUP1 02363000 PSALOCK EQU PSASUP1 02364000 PSAPI EQU PSASUP1 02365000 PSAEXT EQU PSASUP1 02366000 PSASVC EQU PSASUP1 02367000 PSAIO EQU PSASUP1 02368000 PSAAOLD EQU PSA+548 02369000 PSAANEW EQU PSA+544 02370000 PSATOLD EQU PSA+540 02371000 PSATNEW EQU PSA+536 02372000 PSALCCAR EQU PSA+532 02373000 PSALCCAV EQU PSA+528 02374000 PSAPCCAR EQU PSA+524 02375000 PSAPCCAV EQU PSA+520 02376000 PSACPULA EQU PSA+518 02377000 PSACPUPA EQU PSA+516 02378000 PSAPSA EQU PSA+512 02379000 FLCHDEND EQU PSA+512 02380000 FLCCRSAV EQU FLCMCLA+280 02381000 FLCGRSAV EQU FLCMCLA+216 02382000 FLCFPSAV EQU FLCMCLA+184 02383000 FLCFLA EQU FLCMCLA+88 02384000 FLCRGNCD EQU FLCMCLA+84 02385000 FLCFSAA EQU FLCFSA+1 02386000 @NM00036 EQU FLCFSA 02387000 @NM00035 EQU FLCMCLA+72 02388000 FLCMCIC EQU FLCMCLA+64 02389000 @NM00034 EQU FLCMCLA+20 02390000 FLCIOAA EQU FLCIOA+1 02391000 @NM00033 EQU FLCIOA 02392000 @NM00032 EQU FLCMCLA+15 02393000 @NM00031 EQU FLCMCLA+14 02394000 @NM00030 EQU FLCMCLA+12 02395000 FLCLCL EQU FLCMCLA+8 02396000 FLCIOELA EQU FLCIOEL+1 02397000 @NM00029 EQU FLCIOEL 02398000 FLCCHNID EQU FLCMCLA 02399000 @NM00028 EQU PSA+160 02400000 FLCMTRCD EQU PSA+157 02401000 @NM00027 EQU PSA+156 02402000 FLCPERA EQU FLCPER+1 02403000 @NM00026 EQU FLCPER 02404000 @NM00025 EQU PSA+151 02405000 FLCPERCD EQU PSA+150 02406000 FLCMCNUM EQU PSA+149 02407000 @NM00024 EQU PSA+148 02408000 FLCTEAA EQU FLCTEA+1 02409000 @NM00023 EQU FLCTEA 02410000 PSAPIPC EQU PSAPICOD 02411000 PSAPIMC EQU PSAPICOD 02412000 PSAPIPER EQU PSAPICOD 02413000 PSARV049 EQU FLCPICOD 02414000 FLCPILCB EQU FLCPIILC 02415000 @NM00022 EQU FLCPIILC 02416000 @NM00021 EQU PSAEPPSW 02417000 FLCSVCN EQU PSAESPSW+2 02418000 FLCSILCB EQU FLCSVILC 02419000 @NM00020 EQU FLCSVILC 02420000 @NM00019 EQU PSAESPSW 02421000 FLCEICOD EQU PSAEEPSW+2 02422000 PSASPAD EQU PSAEEPSW 02423000 @NM00018 EQU PSA+128 02424000 FLCINPSW EQU PSA+120 02425000 FLCMNPSW EQU PSA+112 02426000 FLCPNPSW EQU PSA+104 02427000 FLCSNPSW EQU PSA+96 02428000 FLCENPSW EQU PSA+88 02429000 FLCTRACE EQU PSA+84 02430000 FLCTIMER EQU PSA+80 02431000 FLCCVT2 EQU PSA+76 02432000 FLCCAW EQU PSA+72 02433000 FLCCSW EQU PSA+64 02434000 FLCIOPSW EQU PSA+56 02435000 FLCMOPSW EQU PSA+48 02436000 FLCPOPSW EQU PSA+40 02437000 FLCSOPSW EQU PSA+32 02438000 FLCEOPSW EQU PSA+24 02439000 @NM00017 EQU FLCICCW2+4 02440000 FLCCVT EQU FLCICCW2 02441000 FLCICCW1 EQU FLCROPSW 02442000 FLCIPPSW EQU FLCRNPSW 02443000 * END UNREFERENCED COMPONENTS 02444000 @ENDDATA EQU * 02445000 END IEAVSWPC,(C'PLS2050',0701,76090) 02446000