TA40 TITLE 'IGTA40 - VPSS MVS MODULE LOCATE ROUTINE *00001000 ' 00002000 * /* 00003000 MACRO 00004000 &LABEL INMAC1 &R,&LV=,&SP= 00005000 L R1P,0(,R1P) LOAD THE ADDRESS OF APNP 00006000 LA R1P,APNP40WA-APNP(R1P) POINT TO WORK AREA 00007000 MEND 00008000 MACRO 00009000 &LABEL OUTMAC1 &R,&LV=,&A= 00010000 MEND 00011000 IGTA40 CSECT , 01S0002 00012000 @MAINENT DS 0H 01S0002 00013000 USING *,@15 01S0002 00014000 B @PROLOG 01S0002 00015000 DC AL1(16) 01S0002 00016000 DC C'IGTA40 77.092' 01S0002 00017000 DROP @15 00018000 @PROLOG STM @14,@12,12(@13) 01S0002 00019000 BALR @07,0 01S0002 00020000 @PSTART DS 0H 01S0002 00021000 USING @PSTART,@07 01S0002 00022000 L @00,@SIZDATD 01S0002 00023000 INMAC1 R,LV=(0) 00024000 LR @06,@01 01S0002 00025000 USING @DATD,@06 01S0002 00026000 ST @13,@SA00001+4 01S0002 00027000 LM @00,@01,20(@13) 01S0002 00028000 ST @06,8(,@13) 01S0002 00029000 LR @13,@06 01S0002 00030000 MVC @PC00001(4),0(@01) 01S0002 00031000 * INITIALIZATION DSECT. */ 00032000 * APNPPNTR=ADDR(PARMAPNP); /* LOAD THE ADDRESS OF APNP. */ 00033000 L APNPPNTR,@PC00001 01S0033 00034000 * RESPECIFY 01S0034 00035000 * APNQ BASED(APNQPTR); /* POINT TO ERROR MESSAGE CSECT */ 00036000 * RESPECIFY 01S0035 00037000 * R0P RSTD; /* RESTRICT R0. */ 00038000 * RESPECIFY 01S0036 00039000 * R1P RSTD; /* RESTRICT R1. */ 00040000 * RESPECIFY 01S0037 00041000 * R3P RSTD; /* RESTRICT R3. */ 00042000 * RESPECIFY 01S0038 00043000 * R8P RSTD; /* RESTRICT R8. */ 00044000 * RESPECIFY 01S0039 00045000 * R9P RSTD; /* RESTRICT R9. */ 00046000 * RESPECIFY 01S0040 00047000 * R14P RSTD; /* RESTRICT R14. */ 00048000 * RESPECIFY 01S0041 00049000 * R15P RSTD; /* RESTRICT R15. */ 00050000 * APNPCODE=APNPOFF; /* ZERO TO INDICATE MOD FOUND */ 00051000 * APNPMINR=APNPOFF; /* ZERO TO LPDE ALIAS INDCATOR. */ 00052000 * 01S0043 00053000 NI APNPCODE(APNPPNTR),B'01111101' 01S0043 00054000 * /*****************************************************************/ 00055000 * /* */ 00056000 * /* CALL THE CDE SEARCH ROUTINE */ 00057000 * /* */ 00058000 * /*****************************************************************/ 00059000 * 01S0044 00060000 *IGTA40AL: /* LABEL FOR LPDE ALIAS 01S0044 00061000 * PROCESSING TO MAKE A SECOND 00062000 * SEARCH FOR THE MEMBER NAME. */ 00063000 * R0P=APNPZERO; /* INITIALIZE OUTPUT REGISTER 00064000 * FROM CVTQCDSR, WHICH WILL 00065000 * CONTAIN THE LEFT HALF OF THE 00066000 * MODULE NAME */ 00067000 IGTA40AL SLR R0P,R0P 01S0044 00068000 * R1P=APNPZERO; /* INITIALIZE OUTPUT REGISTER 00069000 * FROM CVTQCDSR, WHICH WILL 00070000 * CONTAIN THE RIGHT HALF OF THE 00071000 * MODULE NAME */ 00072000 SLR R1P,R1P 01S0045 00073000 * R3P=CVTPTR; /* INITIALIZE INPUT REGISTER FOR 00074000 * CDE QUEUE ADDRESS FROM CVT */ 00075000 L @04,CVTPTR(,APNPPNTR) 01S0046 00076000 LR R3P,@04 01S0046 00077000 * R8P=CVTQLPAQ; /* R8 EQUAL THE ADDRESS OF THE 00078000 * CDE QUEUE TO BE SEARCHED BY 00079000 * CVTQCDSR */ 00080000 L R8P,CVTQLPAQ(,@04) 01S0047 00081000 * R9P=ADDR(APNPMODL); /* R9 EQUAL THE ADDRESS OF THE 00082000 * MODULE NAME TO BE LOCATED BY 00083000 * CVTQCDSR */ 00084000 LA R9P,APNPMODL(,APNPPNTR) 01S0048 00085000 * R15P=CVTQCDSR; /* R15 EQUAL THE ADDRESS OF CDE 00086000 * SEARCH ROUTINE. */ 00087000 L R15P,CVTQCDSR(,@04) 01S0049 00088000 * STM(R0P,R15P,APNPREGS); /* SAVE REGS ACROSS THE CALL TO 00089000 * TO THE SEARCH ROUTINE. */ 00090000 STM R0P,R15P,APNPREGS(APNPPNTR) 01S0050 00091000 * GENERATE REFS(R11P) SETS(R11P); 01S0051 00092000 * /* 00093000 BALR R14P,R15P CALL THE SEARCH ROUTINE 00094000 B A40LAB3 RETURN+0 = FOUND 00095000 SR R11P,R11P RETURN+4 = NOT FOUND 00096000 A40LAB3 EQU * 00097000 * RESPECIFY 01S0052 00098000 * R11P RSTD; /* RESTRICT R11. */ 00099000 * 01S0052 00100000 * /*****************************************************************/ 00101000 * /* */ 00102000 * /* IF NOT FOUND CALL THE LPDE SEARCH ROUTINE */ 00103000 * /* */ 00104000 * /*****************************************************************/ 00105000 * 01S0053 00106000 * IF R11P=APNPZERO THEN /* THE MODULE WAS NOT LOCATED SO 00107000 * NOW CHECK THE LPDE QUEUE. */ 00108000 LTR R11P,R11P 01S0053 00109000 BNZ @RF00053 01S0053 00110000 * DO; 01S0054 00111000 * LM(R0P,R1P,APNPMODL); /* RELOAD MODULE NAME TO BE 01S0055 00112000 * LOCATED. */ 00113000 LM R0P,R1P,APNPMODL(APNPPNTR) 01S0055 00114000 * R3P=CVTPTR; /* ADDRESS OF THE CVT AS INPUT TO 00115000 * THE SEARCH ROUTINE */ 00116000 L @10,CVTPTR(,APNPPNTR) 01S0056 00117000 LR R3P,@10 01S0056 00118000 * R15P=CVTLPDSR; /* LOAD THE ADDRESS OF THE LPDE 00119000 * SEARCH ROUTINE. */ 00120000 L R15P,CVTLPDSR(,@10) 01S0057 00121000 * GENERATE; 01S0058 00122000 * 01S0058 00123000 * /* 00124000 BALR R14P,R15P CALL THE LPDE SEARCH ROUTINE 00125000 * /*************************************************************/ 00126000 * /* */ 00127000 * /* IF FOUND ON LPDE CHECK FOR ALIAS */ 00128000 * /* */ 00129000 * /*************************************************************/ 00130000 * 01S0059 00131000 * IF R0F^=APNPMDL1 THEN /* THE MODULE WAS LOCATED ON THE 00132000 * LPDE CHAIN. */ 00133000 CL R0F,APNPMDL1(,APNPPNTR) 01S0059 00134000 BE @RF00059 01S0059 00135000 * DO; 01S0060 00136000 * LPDEPTR=R0P; /* SAVE ADDRESS OF THE LPDE. */ 00137000 ST R0P,LPDEPTR(,APNPPNTR) 01S0061 00138000 * IF APNPMINR=APNPOFF THEN/* THIS WAS NOT A SEARCH FOR A 00139000 * LPDE MAJOR NAME. */ 00140000 TM APNPMINR(APNPPNTR),B'00000010' 01S0062 00141000 BNZ @RF00062 01S0062 00142000 * DO; 01S0063 00143000 * APNPADDR=LPDENTP; /* SAVE THE ENTRY POINT ADDRESS. */ 00144000 L @10,LPDEPTR(,APNPPNTR) 01S0064 00145000 L @04,LPDENTP(,@10) 01S0064 00146000 ST @04,APNPADDR(,APNPPNTR) 01S0064 00147000 * IF LPDEMIN=APNPON THEN/* THIS IS A MINOR LPDE. */ 00148000 TM LPDEMIN(@10),B'00000100' 01S0065 00149000 BNO @RF00065 01S0065 00150000 * DO; 01S0066 00151000 * 01S0066 00152000 * /*************************************************/ 00153000 * /* */ 00154000 * /* ALIAS LPDE PROCESS */ 00155000 * /* */ 00156000 * /*************************************************/ 00157000 * 01S0067 00158000 * APNPMODL=LPDEMJNM;/* MOVE THE ADDRESS OF THE 00159000 * MAJOR NAME TO BE SEARCHED FOR.*/ 00160000 MVC APNPMODL(8,APNPPNTR),LPDEMJNM(@10) 01S0067 00161000 * APNPMINR=APNPON;/* SET LPDE MINOR INDICATOR SO 00162000 * THAT THE MINOR ENTRY POINT 00163000 * ADDRESS WILL NOT BE DESTROYED.*/ 00164000 OI APNPMINR(APNPPNTR),B'00000010' 01S0068 00165000 * GOTO IGTA40AL; /* GO SEARCH FOR MAJOR NAME. */ 00166000 B IGTA40AL 01S0069 00167000 * END; 01S0070 00168000 * END; 01S0071 00169000 * ELSE 01S0072 00170000 * DO; 01S0072 00171000 B @RC00062 01S0072 00172000 @RF00062 DS 0H 01S0073 00173000 * APNPMINR=APNPOFF; /* INDICATE THE MEMBER NAME FOR 00174000 * THIS MINOR LPDE WAS FOUND. */ 00175000 NI APNPMINR(APNPPNTR),B'11111101' 01S0073 00176000 * END; 01S0074 00177000 * APNPSSIZ=LPDEXTLN; /* SAVE THE MODULE LENGTH. */ 00178000 @RC00062 L @10,LPDEPTR(,APNPPNTR) 01S0075 00179000 L @04,LPDEXTLN(,@10) 01S0075 00180000 ST @04,APNPSSIZ(,APNPPNTR) 01S0075 00181000 * APNPMORG=LPDEXTAD; /* SAVE THE ORIGIN ADDRESS. */ 00182000 L @10,LPDEXTAD(,@10) 01S0076 00183000 ST @10,APNPMORG(,APNPPNTR) 01S0076 00184000 * END; 01S0077 00185000 * 01S0077 00186000 * /*************************************************************/ 00187000 * /* */ 00188000 * /* OTHERWISE SET ERROR INDICATOR */ 00189000 * /* */ 00190000 * /*************************************************************/ 00191000 * 01S0078 00192000 * ELSE 01S0078 00193000 * DO; 01S0078 00194000 B @RC00059 01S0078 00195000 @RF00059 DS 0H 01S0079 00196000 * APNPCODE=APNPON; /* SET THE ERROR STATUS TO 01S0079 00197000 * INDICATE THE MODULE WAS NOT 00198000 * FOUND. */ 00199000 OI APNPCODE(APNPPNTR),B'10000000' 01S0079 00200000 * END; 01S0080 00201000 * END; 01S0081 00202000 * 01S0081 00203000 * /*****************************************************************/ 00204000 * /* */ 00205000 * /* OTHERWISE CHECK FOR CDE ALIAS */ 00206000 * /* */ 00207000 * /*****************************************************************/ 00208000 * 01S0082 00209000 * ELSE 01S0082 00210000 * DO; 01S0082 00211000 B @RC00053 01S0082 00212000 @RF00053 DS 0H 01S0083 00213000 * CDENTPTR=R11P; /* SAVE THE ADDRESS OF THE CDE. */ 00214000 ST R11P,CDENTPTR(,APNPPNTR) 01S0083 00215000 * RESPECIFY 01S0084 00216000 * R11P; /* RELEASE R11. */ 00217000 * IF APNPMINR=APNPOFF THEN /* THIS WAS NOT A SEARCH FOR A 00218000 * MAJOR LPDE NAME. */ 00219000 TM APNPMINR(APNPPNTR),B'00000010' 01S0085 00220000 BNZ @RF00085 01S0085 00221000 * DO; 01S0086 00222000 * APNPADDR=CDENTPT; /* SAVE THE ENTRY POINT ADDRESS. */ 00223000 L @04,CDENTPTR(,APNPPNTR) 01S0087 00224000 L @02,CDENTPT(,@04) 01S0087 00225000 ST @02,APNPADDR(,APNPPNTR) 01S0087 00226000 * IF CDMIN=APNPON THEN /* THIS IS A MINOR CDE. */ 00227000 TM CDMIN(@04),B'00000100' 01S0088 00228000 BNO @RF00088 01S0088 00229000 * DO; 01S0089 00230000 * CDENTPTR=CDXLMJP; /* LOAD THE ADDRESS OF MAJOR CDE */ 00231000 L @04,CDXLMJP(,@04) 01S0090 00232000 ST @04,CDENTPTR(,APNPPNTR) 01S0090 00233000 * END; 01S0091 00234000 * XTLSTPTR=CDXLMJP; /* LOAD THE ADDRESS OF THE EXTENT 00235000 * LIST FOR THIS MODULE. */ 00236000 @RF00088 L @04,CDENTPTR(,APNPPNTR) 01S0092 00237000 L @04,CDXLMJP(,@04) 01S0092 00238000 ST @04,XTLSTPTR(,APNPPNTR) 01S0092 00239000 * END; 01S0093 00240000 * ELSE 01S0094 00241000 * DO; 01S0094 00242000 B @RC00085 01S0094 00243000 @RF00085 DS 0H 01S0095 00244000 * APNPMINR=APNPOFF; /* INDICATE THE MEMBER NAME FOR 00245000 * THIS MODULE WAS FOUND. */ 00246000 NI APNPMINR(APNPPNTR),B'11111101' 01S0095 00247000 * END; 01S0096 00248000 * APNPSSIZ=XTLMSBLN; /* SAVE THE MODULE LENGTH. */ 00249000 @RC00085 L @04,XTLSTPTR(,APNPPNTR) 01S0097 00250000 L @02,XTLMSBLN-1(,@04) 01S0097 00251000 LA @02,0(,@02) 01S0097 00252000 ST @02,APNPSSIZ(,APNPPNTR) 01S0097 00253000 * APNPMORG=XTLMSBAD; /* SAVE THE MODULE ORIGIN ADDRESS*/ 00254000 L @04,XTLMSBAD-1(,@04) 01S0098 00255000 LA @04,0(,@04) 01S0098 00256000 ST @04,APNPMORG(,APNPPNTR) 01S0098 00257000 * END; 01S0099 00258000 * LM(R0P,R15P,APNPREGS); /* RESTORE THE REGS FROM ACROSS 00259000 * THE CALL TO THE SEARCH RTES */ 00260000 @RC00053 LM R0P,R15P,APNPREGS(APNPPNTR) 01S0100 00261000 * RESPECIFY 01S0101 00262000 * APNPRTRG RSTD; /* RESTRICT THE RETURN REGISTER */ 00263000 * 01S0101 00264000 * /*****************************************************************/ 00265000 * /* */ 00266000 * /* CHECK IF MODULE WAS LOCATED */ 00267000 * /* */ 00268000 * /*****************************************************************/ 00269000 * 01S0102 00270000 * IF APNPCODE=APNPOFF THEN /* THE MODULE WAS FOUND */ 00271000 TM APNPCODE(APNPPNTR),B'10000000' 01S0102 00272000 BNZ @RF00102 01S0102 00273000 * DO; 01S0103 00274000 * APNPRTRG=APNPZERO; /* RETURN MODULE FOUND STATUS */ 00275000 SLR APNPRTRG,APNPRTRG 01S0104 00276000 * END; 01S0105 00277000 * ELSE 01S0106 00278000 * DO; 01S0106 00279000 B @RC00102 01S0106 00280000 @RF00102 DS 0H 01S0107 00281000 * RESPECIFY 01S0107 00282000 * R0P; /* RELEASE R0. */ 00283000 * RESPECIFY 01S0108 00284000 * R1P; /* RELEASE R1. */ 00285000 * RESPECIFY 01S0109 00286000 * R3P; /* RELEASE R3. */ 00287000 * RESPECIFY 01S0110 00288000 * R8P; /* RELEASE R8. */ 00289000 * RESPECIFY 01S0111 00290000 * R9P; /* RELEASE R9. */ 00291000 * RESPECIFY 01S0112 00292000 * R15P; /* RELEASE R15. */ 00293000 * RESPECIFY 01S0113 00294000 * APNPMSGS RSTD; /* RESTRICT ERROR MESSAGE REG */ 00295000 * IF APNPFLAG=APNPOFF THEN /* THIS FIRST MODULE NOT FOUND */ 00296000 TM APNPFLAG(APNPPNTR),B'00100000' 01S0114 00297000 BNZ @RF00114 01S0114 00298000 * DO; 01S0115 00299000 * APNPBUFF=APNQM04; /* MOVE MESSAGE IGT104I TO OUTPUT 00300000 * BUFFER. */ 00301000 MVI APNPBUFF+89(APNPPNTR),C' ' 01S0116 00302000 MVC APNPBUFF+90(10,APNPPNTR),APNPBUFF+89(APNPPNTR) 01S0116 00303000 L @15,APNQPTR 01S0116 00304000 L @15,APNQA04(,@15) 01S0116 00305000 MVC APNPBUFF(89,APNPPNTR),APNQM04(@15) 01S0116 00306000 * RESPECIFY 01S0117 00307000 * APNQM04 BASED(ADDR(APNPBUFF));/* POINT TO BUFFER. */ 00308000 * APNQ04T3=APNPSNAM; /* INSERT SUBSYSTEM NAME IN TO 00309000 * THE ERROR MESSAGE. */ 00310000 MVC APNQ04T3+128(4,APNPPNTR),APNPSNAM(APNPPNTR) 01S0118 00311000 * APNPMSGS=ADDR(APNPBUFF);/* LOAD THE ADDRESS OF THE OUTPUT 00312000 * BUFFER. */ 00313000 LA APNPMSGS,APNPBUFF(,APNPPNTR) 01S0119 00314000 * GENERATE REFS(APNPMSGS); 01S0120 00315000 * /* 00316000 WTO MF=(E,(APNPMSGS)) WRITE TO OPERATOR 00317000 WTL MF=(E,(APNPMSGS)) WRITE TO THE LOG 00318000 * APNPFLAG=APNPON; /* THIS INDICATES THAT AT LEAST 00319000 * ONE MODULE WAS NOT FOUND AND 00320000 * THAT THE HEADER MESSAGE WAS 00321000 * OUTPUT. */ 00322000 OI APNPFLAG(APNPPNTR),B'00100000' 01S0121 00323000 * END; 01S0122 00324000 * APNPBUFF=APNQM05; /* MOVE ERROR MESSAGE TO OUTPUT 00325000 * BUFFER. */ 00326000 @RF00114 MVI APNPBUFF+41(APNPPNTR),C' ' 01S0123 00327000 MVC APNPBUFF+42(58,APNPPNTR),APNPBUFF+41(APNPPNTR) 01S0123 00328000 L @15,APNQPTR 01S0123 00329000 L @15,APNQA05(,@15) 01S0123 00330000 MVC APNPBUFF(41,APNPPNTR),APNQM05(@15) 01S0123 00331000 * RESPECIFY 01S0124 00332000 * APNQM05 BASED(ADDR(APNPBUFF));/* POINT TO BUFFER */ 00333000 * APNQ05T2=APNPMODL; /* PLACE MODEL NAME THAT WAS NOT 00334000 * FOUND IN ERROR MESSAGE */ 00335000 MVC APNQ05T2+128(8,APNPPNTR),APNPMODL(APNPPNTR) 01S0125 00336000 * APNPMSGS=ADDR(APNPBUFF); /* LOAD ADDRESS OF MESSAGE BUFFER*/ 00337000 LA APNPMSGS,APNPBUFF(,APNPPNTR) 01S0126 00338000 * GENERATE REFS(APNPMSGS); 01S0127 00339000 * /* 00340000 WTO MF=(E,(APNPMSGS)) WRITE MESSAGE TO OPERATOR 00341000 WTL MF=(E,(APNPMSGS)) WRITE MESSAGE TO THE LOG 00342000 * APNPRTRG=APNPEROR; /* SET RETURN CODE FOR ERROR */ 00343000 LA APNPRTRG,8 01S0128 00344000 * RESPECIFY 01S0129 00345000 * APNPMSGS; /* RELEASE ERROR MESSAGE REG */ 00346000 * END; 01S0130 00347000 * 01S0130 00348000 * /*****************************************************************/ 00349000 * /* */ 00350000 * /* RETURN TO CALLER */ 00351000 * /* */ 00352000 * /*****************************************************************/ 00353000 * 01S0131 00354000 * RETURN CODE(APNPRTRG); /* RETURURN TO CALLING ROUTINE */ 00355000 @RC00102 L @13,4(,@13) 01S0131 00356000 L @00,@SIZDATD 01S0131 00357000 LR @01,@06 01S0131 00358000 OUTMAC1 R,LV=(0),A=(1) 00359000 LR @15,@11 01S0131 00360000 L @14,12(,@13) 01S0131 00361000 LM @00,@12,20(@13) 01S0131 00362000 BR @14 01S0131 00363000 * RESPECIFY 01S0132 00364000 * APNPRTRG; /* RELEASE THE RETURN REGISTER */ 00365000 EJECT 00366000 * /* IGTXEPLG */ 00367000 * 01S0133 00368000 * /*****************************************************************/ 00369000 * /* */ 00370000 * /* SYSTEM DECLARES */ 00371000 * /* */ 00372000 * /*****************************************************************/ 00373000 * 01S0133 00374000 * DECLARE /* COMMON VARIABLES */ 00375000 * I256C CHAR(256) BASED, 01S0133 00376000 * I031F FIXED(31) BASED, 01S0133 00377000 * I031P PTR(31) BASED, 01S0133 00378000 * I015F FIXED(15) BASED, 01S0133 00379000 * I015P PTR(15) BASED, 01S0133 00380000 * I008P PTR(8) BASED, 01S0133 00381000 * I001C CHAR(1) BASED; 01S0133 00382000 * 01S0134 00383000 * /*****************************************************************/ 00384000 * /* */ 00385000 * /* MODULE PATCH AREA */ 00386000 * /* */ 00387000 * /*****************************************************************/ 00388000 * 01S0134 00389000 * DCL 01S0134 00390000 * APPATCH CHAR(*) INT STATIC LOCAL GEND; 01S0134 00391000 * GENERATE DATA DEFS(APPATCH); 01S0135 00392000 * 01S0136 00393000 * /*****************************************************************/ 00394000 * /* */ 00395000 * /* GENERAL REGISTER DECLARES */ 00396000 * /* */ 00397000 * /*****************************************************************/ 00398000 * 01S0136 00399000 * DCL 01S0136 00400000 * R0F FIXED(31) REG(0), 01S0136 00401000 * R0P PTR(24) REG(0), 01S0136 00402000 * R0RSTD PTR(31) REG(0), 01S0136 00403000 * R1F FIXED(31) REG(1), 01S0136 00404000 * R1P PTR(24) REG(1), 01S0136 00405000 * R1RSTD PTR(31) REG(1), 01S0136 00406000 * R2F FIXED(31) REG(2), 01S0136 00407000 * R2P PTR(24) REG(2), 01S0136 00408000 * R2RSTD PTR(31) REG(2), 01S0136 00409000 * R3F FIXED(31) REG(3), 01S0136 00410000 * R3P PTR(24) REG(3), 01S0136 00411000 * R3RSTD PTR(31) REG(3), 01S0136 00412000 * R4F FIXED(31) REG(4), 01S0136 00413000 * R4P PTR(24) REG(4), 01S0136 00414000 * R4RSTD PTR(31) REG(4), 01S0136 00415000 * R5F FIXED(31) REG(5), 01S0136 00416000 * R5P PTR(24) REG(5), 01S0136 00417000 * R5RSTD PTR(31) REG(5), 01S0136 00418000 * R6F FIXED(31) REG(6), 01S0136 00419000 * R6P PTR(24) REG(6), 01S0136 00420000 * R6RSTD PTR(31) REG(6), 01S0136 00421000 * R7F FIXED(31) REG(7), 01S0136 00422000 * R7P PTR(24) REG(7), 01S0136 00423000 * R7RSTD PTR(31) REG(7), 01S0136 00424000 * R8F FIXED(31) REG(8), 01S0136 00425000 * R8P PTR(24) REG(8), 01S0136 00426000 * R8RSTD PTR(31) REG(8), 01S0136 00427000 * R9F FIXED(31) REG(9), 01S0136 00428000 * R9P PTR(24) REG(9), 01S0136 00429000 * R9RSTD PTR(31) REG(9), 01S0136 00430000 * R10F FIXED(31) REG(10), 01S0136 00431000 * R10P PTR(24) REG(10), 01S0136 00432000 * R10RSTD PTR(31) REG(10), 01S0136 00433000 * R11F FIXED(31) REG(11), 01S0136 00434000 * R11P PTR(24) REG(11), 01S0136 00435000 * R11RSTD PTR(31) REG(11), 01S0136 00436000 * R12F FIXED(31) REG(12), 01S0136 00437000 * R12P PTR(24) REG(12), 01S0136 00438000 * R12RSTD PTR(31) REG(12), 01S0136 00439000 * R13F FIXED(31) REG(13), 01S0136 00440000 * R13P PTR(24) REG(13), 01S0136 00441000 * R13RSTD PTR(31) REG(13), 01S0136 00442000 * R14F FIXED(31) REG(14), 01S0136 00443000 * R14P PTR(24) REG(14), 01S0136 00444000 * R14RSTD PTR(31) REG(14), 01S0136 00445000 * R15F FIXED(31) REG(15), 01S0136 00446000 * R15P PTR(24) REG(15), 01S0136 00447000 * R15RSTD PTR(31) REG(15), 01S0136 00448000 * 01S0136 00449000 * /***************************************************************/ 00450000 * /* */ 00451000 * /* VPSS CONTROL BLOCK POINTER DECLARES */ 00452000 * /* */ 00453000 * /***************************************************************/ 00454000 * 01S0136 00455000 * APSMPTR PTR(24) REG(01), /* STORAGE MANAGEMENT BLOCK 01S0136 00456000 * (SUGGESTED POINTER) */ 00457000 * APSCPTR PTR(24) REG(01), /* STORAGE MANAGEMENT CONTROL 00458000 * WORD (SUGGESTED POINTER) */ 00459000 * APINPTR PTR(24) REG(01), /* USER'S INPUT PARAMETER LIST 00460000 * (SUGGESTED POINTER) */ 00461000 */* */ 00462000 * 01S0136 00463000 * APDATA PTR(24) REG(06), /* ADDRESS OF DYNAMIC DATA 01S0136 00464000 * WORKAREA (DATAREG) */ 00465000 * APCODE PTR(24) REG(07), /* PROGRAM CODE BASE REGISTER 00466000 * (CODEREG) */ 00467000 * APDEBPTR PTR(24) REG(08), /* VPSS DEB (SUGGESTED POINTER) */ 00468000 * APNPPTR PTR(24) REG(08), /* SUBSYSTEM INITIALIZATION 01S0136 00469000 * WORKAREA BLOCK (ONLY USED BY 00470000 * SUBSYSTEM INITIALIZATION) */ 00471000 * APRLPTR PTR(24) REG(08), /* VPSS ACB REQUEST LIST 01S0136 00472000 * (SUGGESTED POINTER) */ 00473000 * APCIPTR PTR(24) REG(08), /* 3838 CONTROL TABLE (SUGGESTED 00474000 * POINTER) */ 00475000 * APCWPTR PTR(24) REG(08), /* CALL INTERFACE WORKAREA 01S0136 00476000 * (SUGGESTED POINTER) */ 00477000 * APERPTR PTR(24) REG(08), /* ERP/IO APPENDAGE WORKAREA 00478000 * (SUGGESTED POINTER) */ 00479000 * APACBPTR PTR(24) REG(09), /* VPSS ACB (SUGGESTED POINTER) */ 00480000 * APCQPTR PTR(24) REG(09), /* COMMAND QUEUE ELEMENT 01S0136 00481000 * (SUGGESTED POINTER) */ 00482000 * APOTPTR PTR(24) REG(09), /* OPTION TABLE (SUGGESTED 01S0136 00483000 * POINTER) */ 00484000 * APIOPTR PTR(24) REG(10), /* I/O ELEMENT (SUGGESTED 01S0136 00485000 * POINTER) */ 00486000 * APEXLPTR PTR(24) REG(10), /* VPSS EXLST (SUGGESTED POINTER)*/ 00487000 * APUBPTR PTR(24) REG(10), /* UNIT BLOCK (SUGGESTED POINTER)*/ 00488000 * APAXPTR PTR(24) REG(10), /* VPSS ACB EXTENSION (SUGGESTED 00489000 * POINTER) */ 00490000 * APCPPTR PTR(24) REG(10), /* VPSS CALL PROCESSING 01S0136 00491000 * INDICATORS (SUGGESTED POINTER)*/ 00492000 * APOCPTR PTR(24) REG(10), /* VPSS OPEN/CLOSE SUBSYSTEM 00493000 * WORKAREA (REQUIRED POINTER) */ 00494000 * APATPTR PTR(24) REG(11), /* VPSS ACB TABLE (SUGGESTED 00495000 * POINTER) */ 00496000 * APLBPTR PTR(24) REG(11), /* LABEL RESOLUTION TABLE 01S0136 00497000 * (SUGGESTED POINTER) */ 00498000 * APUTPTR PTR(24) REG(11), /* USER TABLE (SUGGESTED POINTER)*/ 00499000 * APDSPTR PTR(24) REG(11), /* VPSS DATASET ENTRY (SUGGESTED 00500000 * POINTER) */ 00501000 * APXLPTR PTR(24) REG(11), /* TRANSLATION TABLE (SUGGESTED 00502000 * POINTER) */ 00503000 * APDXPTR PTR(24) REG(11), /* VPSS DEB EXTENSION (SUGGESTED 00504000 * POINTER) */ 00505000 * APCTPTR PTR(24) REG(12) RSTD, /* CONTROL TABLE (REQUIRED 01S0136 00506000 * POINTER) */ 00507000 * APSVPTR PTR(24) REG(13) RSTD, /* OS/VPSS SAVEAREA/WORKAREA 00508000 * (REQUIRED POINTER) */ 00509000 * APRETURN PTR(24) REG(14), /* RETURN ADDRESS FOR SUBROUTINE 00510000 * LINKAGE */ 00511000 * APENTRY PTR(24) REG(15), /* SUBROUTINE ENTRY POINT LINKAGE*/ 00512000 * APRCODE PTR(24) REG(15); /* CONTAINS SUBROUTINE RETURN 00513000 * CODE */ 00514000 * 01S0137 00515000 * /*****************************************************************/ 00516000 * /* */ 00517000 * /* USER REGISTER DECLARES */ 00518000 * /* */ 00519000 * /*****************************************************************/ 00520000 * 01S0137 00521000 * END IGTA40 01S0137 00522000 * 01S0137 00523000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00524000 */*%INCLUDE SYSLIB (IGTXSYSI) */ 00525000 */*%INCLUDE SYSLIB (IGTXSYSI) */ 00526000 */*%INCLUDE SYSLIB (IGTXSYSI) */ 00527000 */*%INCLUDE SYSLIB (IGTXAPNP) */ 00528000 */*%INCLUDE SYSLIB (IGTXAPNQ) */ 00529000 */*%INCLUDE SYSLIB (CVT ) */ 00530000 */*%INCLUDE SYSLIB (IHACDE ) */ 00531000 */*%INCLUDE SYSLIB (IHALPDE ) */ 00532000 */*%INCLUDE SYSLIB (IHAXTLST) */ 00533000 * 01S0137 00534000 * ; 01S0137 00535000 @EL00001 L @13,4(,@13) 01S0137 00536000 @EF00001 L @00,@SIZDATD 01S0137 00537000 LR @01,@06 01S0137 00538000 OUTMAC1 R,LV=(0),A=(1) 00539000 @ER00001 LM @14,@12,12(@13) 01S0137 00540000 BR @14 01S0137 00541000 @DATA DS 0H 00542000 @DATD DSECT 00543000 DS 0F 00544000 @SA00001 DS 18F 00545000 @PC00001 DS 1F 00546000 IGTA40 CSECT 00547000 DS 0F 00548000 @DATD DSECT 00549000 DS 0D 00550000 IGTA40 CSECT 00551000 DS 0F 00552000 @SIZDATD DC AL1(0) 00553000 DC AL3(@ENDDATD-@DATD) 00554000 @CA00041 DC A(IGTA10) 00555000 DS 0D 00556000 APNQPTR DC AL4(IGTA10) 00557000 @DATD DSECT 00558000 * /* 00559000 * 00560000 IGTA40 CSECT 00561000 * /* GENERATE PATCH 00562000 IGTXZAP , GENERATE PATCH AREA 00563000 @DATD DSECT 00564000 ORG *+1-(*-@DATD)/(*-@DATD) INSURE DSECT DATA 00565000 @ENDDATD EQU * 00566000 IGTA40 CSECT 00567000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00568000 @01 EQU 01 00569000 @02 EQU 02 00570000 @03 EQU 03 00571000 @04 EQU 04 00572000 @05 EQU 05 00573000 @06 EQU 06 00574000 @07 EQU 07 00575000 @08 EQU 08 00576000 @09 EQU 09 00577000 @10 EQU 10 00578000 @11 EQU 11 00579000 @12 EQU 12 00580000 @13 EQU 13 00581000 @14 EQU 14 00582000 @15 EQU 15 00583000 APDATA EQU @06 00584000 APCODE EQU @07 00585000 APNPPNTR EQU @05 00586000 APNPMSGS EQU @09 00587000 APNPRTRG EQU @11 00588000 R0P EQU @00 00589000 R1P EQU @01 00590000 R3P EQU @03 00591000 R8P EQU @08 00592000 R9P EQU @09 00593000 R14P EQU @14 00594000 R15P EQU @15 00595000 R11P EQU @11 00596000 R0F EQU @00 00597000 APCTPTR EQU @12 00598000 APSVPTR EQU @13 00599000 APACBPTR EQU @09 00600000 APATPTR EQU @11 00601000 APAXPTR EQU @10 00602000 APCIPTR EQU @08 00603000 APCPPTR EQU @10 00604000 APCQPTR EQU @09 00605000 APCWPTR EQU @08 00606000 APDEBPTR EQU @08 00607000 APDSPTR EQU @11 00608000 APDXPTR EQU @11 00609000 APENTRY EQU @15 00610000 APERPTR EQU @08 00611000 APEXLPTR EQU @10 00612000 APINPTR EQU @01 00613000 APIOPTR EQU @10 00614000 APLBPTR EQU @11 00615000 APNPPTR EQU @08 00616000 APOCPTR EQU @10 00617000 APOTPTR EQU @09 00618000 APRCODE EQU @15 00619000 APRETURN EQU @14 00620000 APRLPTR EQU @08 00621000 APSCPTR EQU @01 00622000 APSMPTR EQU @01 00623000 APUBPTR EQU @10 00624000 APUTPTR EQU @11 00625000 APXLPTR EQU @11 00626000 R0RSTD EQU @00 00627000 R1F EQU @01 00628000 R1RSTD EQU @01 00629000 R10F EQU @10 00630000 R10P EQU @10 00631000 R10RSTD EQU @10 00632000 R11F EQU @11 00633000 R11RSTD EQU @11 00634000 R12F EQU @12 00635000 R12P EQU @12 00636000 R12RSTD EQU @12 00637000 R13F EQU @13 00638000 R13P EQU @13 00639000 R13RSTD EQU @13 00640000 R14F EQU @14 00641000 R14RSTD EQU @14 00642000 R15F EQU @15 00643000 R15RSTD EQU @15 00644000 R2F EQU @02 00645000 R2P EQU @02 00646000 R2RSTD EQU @02 00647000 R3F EQU @03 00648000 R3RSTD EQU @03 00649000 R4F EQU @04 00650000 R4P EQU @04 00651000 R4RSTD EQU @04 00652000 R5F EQU @05 00653000 R5P EQU @05 00654000 R5RSTD EQU @05 00655000 R6F EQU @06 00656000 R6P EQU @06 00657000 R6RSTD EQU @06 00658000 R7F EQU @07 00659000 R7P EQU @07 00660000 R7RSTD EQU @07 00661000 R8F EQU @08 00662000 R8RSTD EQU @08 00663000 R9F EQU @09 00664000 R9RSTD EQU @09 00665000 EXTRN IGTA10 00666000 APNP EQU 0 00667000 APNP40WA EQU APNP+8 00668000 APNPADDR EQU APNP+108 00669000 APNPBUFF EQU APNP+128 00670000 APNPCORE EQU APNP+232 00671000 APNPLOAD EQU APNP+248 00672000 APNPSNAM EQU APNPLOAD+4 00673000 APNPMODL EQU APNP+256 00674000 APNPMDL1 EQU APNPMODL 00675000 APNPMORG EQU APNP+264 00676000 APNPSSIZ EQU APNP+268 00677000 APNPREGS EQU APNP+272 00678000 APNPSWIT EQU APNP+348 00679000 APNPBYT0 EQU APNPSWIT 00680000 APNPCODE EQU APNPBYT0 00681000 APNPFLAG EQU APNPBYT0 00682000 APNPMINR EQU APNPBYT0 00683000 APNPCDE EQU APNP+352 00684000 APNPCVT EQU APNP+356 00685000 APNPLPDE EQU APNP+360 00686000 APNPXLST EQU APNP+380 00687000 APNP30RT EQU APNP+384 00688000 APNPBLHD EQU 0 00689000 APNQ EQU 0 00690000 APNQA01 EQU APNQ+8 00691000 APNQA02 EQU APNQ+12 00692000 APNQA03 EQU APNQ+16 00693000 APNQA04 EQU APNQ+20 00694000 APNQA05 EQU APNQ+24 00695000 APNQA06 EQU APNQ+28 00696000 APNQA07 EQU APNQ+32 00697000 APNQA08 EQU APNQ+36 00698000 APNQA09 EQU APNQ+40 00699000 APNQA10 EQU APNQ+44 00700000 APNQA11 EQU APNQ+48 00701000 APNQM01 EQU 0 00702000 APNQM02 EQU 0 00703000 APNQM03 EQU 0 00704000 APNQM04 EQU 0 00705000 APNQ04T3 EQU APNQM04+81 00706000 APNQM05 EQU 0 00707000 APNQ05T2 EQU APNQM05+19 00708000 APNQM06 EQU 0 00709000 APNQM07 EQU 0 00710000 APNQM08 EQU 0 00711000 APNQM09 EQU 0 00712000 APNQM10 EQU 0 00713000 APNQM11 EQU 0 00714000 CVTMAP EQU 0 00715000 CVTDAR EQU CVTMAP+72 00716000 CVTFLGS1 EQU CVTDAR 00717000 CVTDCB EQU CVTMAP+116 00718000 CVTIERLC EQU CVTMAP+144 00719000 CVTOPTA EQU CVTMAP+182 00720000 CVTOPTB EQU CVTMAP+183 00721000 CVTQCDSR EQU CVTMAP+184 00722000 CVTQLPAQ EQU CVTMAP+188 00723000 CVTGTF EQU CVTMAP+236 00724000 CVTGTFST EQU CVTGTF 00725000 CVTGTFS EQU CVTGTFST 00726000 CVTSTATE EQU CVTGTFST 00727000 CVTTMODE EQU CVTGTFST 00728000 CVTFORM EQU CVTGTFST 00729000 CVTAQAVT EQU CVTMAP+240 00730000 CVTTCMFG EQU CVTAQAVT 00731000 CVTVOLM2 EQU CVTMAP+244 00732000 CVTTATA EQU CVTVOLM2 00733000 CVTTSKS EQU CVTTATA 00734000 CVTVOLF2 EQU CVTTSKS 00735000 CVTTAT EQU CVTTATA+1 00736000 CVTATER EQU CVTMAP+248 00737000 CVTEXT1 EQU CVTMAP+252 00738000 CVTPURG EQU CVTMAP+260 00739000 CVTQMSG EQU CVTMAP+268 00740000 CVTDMSR EQU CVTMAP+272 00741000 CVTRSV37 EQU CVTDMSR 00742000 CVTDMSRF EQU CVTRSV37 00743000 CVTERPV EQU CVTMAP+316 00744000 CVTINTLA EQU CVTMAP+320 00745000 CVTAPF EQU CVTMAP+324 00746000 CVTEXT2 EQU CVTMAP+328 00747000 CVTHJES EQU CVTMAP+332 00748000 CVTPGSIA EQU CVTMAP+348 00749000 CVTA1F1 EQU CVTMAP+356 00750000 CVTSYSK EQU CVTMAP+357 00751000 CVTVOLM1 EQU CVTMAP+380 00752000 CVTVOLF1 EQU CVTVOLM1 00753000 CVTATMCT EQU CVTMAP+388 00754000 CVTXTNT1 EQU 0 00755000 CVTXTNT2 EQU 0 00756000 CVTDSSV EQU CVTXTNT2 00757000 CVTFLGBT EQU CVTXTNT2+5 00758000 CVTQID EQU CVTXTNT2+24 00759000 CVTRV400 EQU CVTXTNT2+52 00760000 CVTRV409 EQU CVTXTNT2+53 00761000 CVTATCVT EQU CVTXTNT2+64 00762000 CVTRV429 EQU CVTXTNT2+84 00763000 CVTRV438 EQU CVTXTNT2+85 00764000 CVTRV457 EQU CVTXTNT2+112 00765000 CVTRV466 EQU CVTXTNT2+113 00766000 CVTFIX EQU 0 00767000 CVTRELNO EQU CVTFIX+252 00768000 CDENTRY EQU 0 00769000 CDENTPT EQU CDENTRY+16 00770000 CDXLMJP EQU CDENTRY+20 00771000 CDATTR EQU CDENTRY+28 00772000 CDMIN EQU CDATTR 00773000 CDATTR2 EQU CDENTRY+29 00774000 LPDE EQU 0 00775000 LPDENTP EQU LPDE+16 00776000 LPDEATTR EQU LPDE+28 00777000 LPDEMIN EQU LPDEATTR 00778000 LPDEATT2 EQU LPDE+29 00779000 LPDEMJNM EQU LPDE+32 00780000 LPDEXTLN EQU LPDEMJNM 00781000 LPDEXTAD EQU LPDEMJNM+4 00782000 XTLST EQU 0 00783000 XTLMSBLA EQU XTLST+8 00784000 XTLMSBLN EQU XTLMSBLA+1 00785000 XTLMSBAA EQU XTLST+12 00786000 XTLMSBAD EQU XTLMSBAA+1 00787000 I001C EQU 0 00788000 I008P EQU 0 00789000 I015F EQU 0 00790000 I015P EQU 0 00791000 I031F EQU 0 00792000 I031P EQU 0 00793000 I256C EQU 0 00794000 PARMAPNP EQU 0 00795000 CDENTPTR EQU APNPCDE 00796000 CVTPTR EQU APNPCVT 00797000 LPDEPTR EQU APNPLPDE 00798000 XTLSTPTR EQU APNPXLST 00799000 CVTS01 EQU CVTPGSIA 00800000 CVTLPDSR EQU CVTS01+4 00801000 CVTLPDIA EQU CVTS01+12 00802000 CVTDIRST EQU CVTLPDIA 00803000 CVTSLIDA EQU CVTS01+24 00804000 CVTCTLFG EQU CVTS01+50 00805000 CVTRV210 EQU CVTS01+424 00806000 CVTRV219 EQU CVTS01+425 00807000 CVTRV228 EQU CVTS01+426 00808000 CVTRV237 EQU CVTS01+427 00809000 CVTMFRTR EQU CVTS01+452 00810000 CVTRV262 EQU CVTS01+468 00811000 CVTRV271 EQU CVTS01+469 00812000 CVTRV280 EQU CVTS01+470 00813000 CVTRV289 EQU CVTS01+471 00814000 CVTGSDA EQU CVTS01+600 00815000 AGO .@UNREFD START UNREFERENCED COMPONENTS 00816000 CVTRV628 EQU CVTS01+728 00817000 CVTRV627 EQU CVTS01+724 00818000 CVTRV626 EQU CVTS01+720 00819000 CVTRV625 EQU CVTS01+716 00820000 CVTRV624 EQU CVTS01+712 00821000 CVTRV623 EQU CVTS01+708 00822000 CVTRV622 EQU CVTS01+704 00823000 CVTRV621 EQU CVTS01+700 00824000 CVTIHASU EQU CVTS01+696 00825000 CVTSUSP EQU CVTS01+692 00826000 CVTT6SVC EQU CVTS01+688 00827000 CVTCDAL EQU CVTS01+684 00828000 CVTTCTL EQU CVTS01+680 00829000 CVTRSUME EQU CVTS01+676 00830000 CVTJTERM EQU CVTS01+672 00831000 CVTASMRM EQU CVTS01+668 00832000 CVTTCASP EQU CVTS01+664 00833000 CVT0PT03 EQU CVTS01+660 00834000 CVT0PT0E EQU CVTS01+656 00835000 CVTRV609 EQU CVTS01+652 00836000 CVTCGK EQU CVTS01+648 00837000 CVTRAC EQU CVTS01+644 00838000 CVTRV606 EQU CVTS01+640 00839000 CVTRV605 EQU CVTS01+636 00840000 CVTRV604 EQU CVTS01+632 00841000 CVTEFF02 EQU CVTS01+628 00842000 CVTCBBR EQU CVTS01+624 00843000 CVTSSCR EQU CVTS01+620 00844000 CVTEVENT EQU CVTS01+616 00845000 CVTCRCA EQU CVTS01+612 00846000 CVTTPIO EQU CVTS01+608 00847000 CVTADV EQU CVTS01+604 00848000 CVTGSDAB EQU CVTGSDA 00849000 CVTQV3 EQU CVTS01+596 00850000 CVTQV2 EQU CVTS01+592 00851000 CVTQV1 EQU CVTS01+588 00852000 CVTRPT EQU CVTS01+584 00853000 CVTSSRB EQU CVTS01+580 00854000 CVTCSDRL EQU CVTS01+576 00855000 CVTEXP1 EQU CVTS01+572 00856000 CVTRMPMT EQU CVTS01+568 00857000 CVTRMPTT EQU CVTS01+564 00858000 CVTVPSA EQU CVTS01+560 00859000 CVTVSTOP EQU CVTS01+556 00860000 CVTGTFR8 EQU CVTS01+552 00861000 CVTQUIT EQU CVTS01+548 00862000 CVTVACR EQU CVTS01+544 00863000 CVTWTCB EQU CVTS01+540 00864000 CVTSTPRS EQU CVTS01+536 00865000 CVT0PT02 EQU CVTS01+532 00866000 CVTDARCM EQU CVTS01+528 00867000 CVTIRECM EQU CVTS01+524 00868000 CVTJRECM EQU CVTS01+520 00869000 CVTVEMS0 EQU CVTS01+516 00870000 CVTSPFRR EQU CVTS01+512 00871000 CVTRLSTG EQU CVTS01+508 00872000 CVT0TC0A EQU CVTS01+504 00873000 CVTGMBR EQU CVTS01+500 00874000 CVTLFRM EQU CVTS01+496 00875000 CVTRMBR EQU CVTS01+492 00876000 CVTVIOP EQU CVTS01+488 00877000 CVTRV307 EQU CVTS01+486 00878000 CVTRV306 EQU CVTS01+484 00879000 CVTRV305 EQU CVTS01+482 00880000 CVTRV304 EQU CVTS01+480 00881000 CVTRV303 EQU CVTS01+478 00882000 CVTRV302 EQU CVTS01+476 00883000 CVTTRCA EQU CVTS01+472 00884000 CVTRV297 EQU CVTRV289 00885000 CVTRV296 EQU CVTRV289 00886000 CVTRV295 EQU CVTRV289 00887000 CVTRV294 EQU CVTRV289 00888000 CVTRV293 EQU CVTRV289 00889000 CVTRV292 EQU CVTRV289 00890000 CVTRV291 EQU CVTRV289 00891000 CVTRV290 EQU CVTRV289 00892000 CVTRV288 EQU CVTRV280 00893000 CVTRV287 EQU CVTRV280 00894000 CVTRV286 EQU CVTRV280 00895000 CVTRV285 EQU CVTRV280 00896000 CVTRV284 EQU CVTRV280 00897000 CVTRV283 EQU CVTRV280 00898000 CVTRV282 EQU CVTRV280 00899000 CVTRV281 EQU CVTRV280 00900000 CVTRV279 EQU CVTRV271 00901000 CVTRV278 EQU CVTRV271 00902000 CVTRV277 EQU CVTRV271 00903000 CVTRV276 EQU CVTRV271 00904000 CVTRV275 EQU CVTRV271 00905000 CVTRV274 EQU CVTRV271 00906000 CVTRV273 EQU CVTRV271 00907000 CVTRV272 EQU CVTRV271 00908000 CVTRV270 EQU CVTRV262 00909000 CVTRV269 EQU CVTRV262 00910000 CVTRV268 EQU CVTRV262 00911000 CVTRV267 EQU CVTRV262 00912000 CVTRV266 EQU CVTRV262 00913000 CVTRV265 EQU CVTRV262 00914000 CVTRV264 EQU CVTRV262 00915000 CVTRV263 EQU CVTRV262 00916000 CVTVFP EQU CVTS01+464 00917000 CVTVSI EQU CVTS01+460 00918000 CVTVPSIB EQU CVTS01+456 00919000 CVTMFACT EQU CVTMFRTR 00920000 CVTMFCTL EQU CVTS01+448 00921000 CVTPVBP EQU CVTS01+444 00922000 CVTPWI EQU CVTS01+440 00923000 CVTRV254 EQU CVTS01+438 00924000 CVTRV253 EQU CVTS01+436 00925000 CVTRV252 EQU CVTS01+434 00926000 CVTRV251 EQU CVTS01+433 00927000 CVTRV250 EQU CVTS01+432 00928000 CVTRV249 EQU CVTS01+431 00929000 CVTRV248 EQU CVTS01+430 00930000 CVTRV247 EQU CVTS01+429 00931000 CVTRV246 EQU CVTS01+428 00932000 CVTRV245 EQU CVTRV237 00933000 CVTRV244 EQU CVTRV237 00934000 CVTRV243 EQU CVTRV237 00935000 CVTRV242 EQU CVTRV237 00936000 CVTRV241 EQU CVTRV237 00937000 CVTRV240 EQU CVTRV237 00938000 CVTRV239 EQU CVTRV237 00939000 CVTRV238 EQU CVTRV237 00940000 CVTRV236 EQU CVTRV228 00941000 CVTRV235 EQU CVTRV228 00942000 CVTRV234 EQU CVTRV228 00943000 CVTRV233 EQU CVTRV228 00944000 CVTRV232 EQU CVTRV228 00945000 CVTRV231 EQU CVTRV228 00946000 CVTRV230 EQU CVTRV228 00947000 CVTRV229 EQU CVTRV228 00948000 CVTRV227 EQU CVTRV219 00949000 CVTRV226 EQU CVTRV219 00950000 CVTRV225 EQU CVTRV219 00951000 CVTRV224 EQU CVTRV219 00952000 CVTRV223 EQU CVTRV219 00953000 CVTRV222 EQU CVTRV219 00954000 CVTRV221 EQU CVTRV219 00955000 CVTRV220 EQU CVTRV219 00956000 CVTRV218 EQU CVTRV210 00957000 CVTRV217 EQU CVTRV210 00958000 CVTRV216 EQU CVTRV210 00959000 CVTRV215 EQU CVTRV210 00960000 CVTRV214 EQU CVTRV210 00961000 CVTRV213 EQU CVTRV210 00962000 CVTRV212 EQU CVTRV210 00963000 CVTRV211 EQU CVTRV210 00964000 CVTLCCAT EQU CVTS01+420 00965000 CVTPCCAT EQU CVTS01+416 00966000 CVTIPCRP EQU CVTS01+412 00967000 CVTIPCRI EQU CVTS01+408 00968000 CVTIPCDS EQU CVTS01+404 00969000 CVTAIDVT EQU CVTS01+400 00970000 CVTSSAP EQU CVTS01+396 00971000 CVTEHCIR EQU CVTS01+392 00972000 CVTEHDEF EQU CVTS01+388 00973000 CVTDAIR EQU CVTS01+384 00974000 CVTPERFM EQU CVTS01+380 00975000 CVT044R2 EQU CVTS01+376 00976000 CVTFETCH EQU CVTS01+372 00977000 CVTRSTWD EQU CVTS01+368 00978000 CVTSPOST EQU CVTS01+364 00979000 CVTIOBP EQU CVTS01+360 00980000 CVTASMVT EQU CVTS01+356 00981000 CVTRECRQ EQU CVTS01+352 00982000 CVTWSAC EQU CVTS01+348 00983000 CVTRV149 EQU CVTS01+344 00984000 CVTWSAL EQU CVTS01+340 00985000 CVTSPSA EQU CVTS01+336 00986000 CVTGLMN EQU CVTS01+332 00987000 CVTVEAC0 EQU CVTS01+328 00988000 CVT062R1 EQU CVTS01+324 00989000 CVTRPOST EQU CVTS01+320 00990000 CVTDQIQE EQU CVTS01+316 00991000 CVTCSD EQU CVTS01+312 00992000 CVTLKRMA EQU CVTS01+308 00993000 CVTRSPIE EQU CVTS01+304 00994000 CVTRENQ EQU CVTS01+300 00995000 CVTLQCB EQU CVTS01+296 00996000 CVTFQCB EQU CVTS01+292 00997000 CVTQCS01 EQU CVTS01+288 00998000 CVTAPFT EQU CVTS01+284 00999000 CVTPARRL EQU CVTS01+280 01000000 CVTVWAIT EQU CVTS01+276 01001000 CVTGSPL EQU CVTS01+272 01002000 CVTLSMQ EQU CVTS01+268 01003000 CVTGSMQ EQU CVTS01+264 01004000 CVTEXPRO EQU CVTS01+260 01005000 CVTOPCTP EQU CVTS01+256 01006000 CVTSIC EQU CVTS01+252 01007000 CVTTPIOS EQU CVTS01+248 01008000 CVTRTMS EQU CVTS01+244 01009000 CVTSDBF EQU CVTS01+240 01010000 CVTSCBP EQU CVTS01+236 01011000 CVTSDMP EQU CVTS01+232 01012000 CVTSV60 EQU CVTS01+228 01013000 CVTRTMCT EQU CVTS01+224 01014000 CVTASCBL EQU CVTS01+220 01015000 CVTASCBH EQU CVTS01+216 01016000 CVTGDA EQU CVTS01+212 01017000 CVTASVT EQU CVTS01+208 01018000 CVTVVMDI EQU CVTS01+204 01019000 CVTAQTOP EQU CVTS01+200 01020000 CVTIOSCS EQU CVTS01+196 01021000 CVTSDRM EQU CVTS01+192 01022000 CVTOPTE EQU CVTS01+188 01023000 CVTSTXU EQU CVTS01+184 01024000 CVTQUIS EQU CVTS01+180 01025000 CVTPARS EQU CVTS01+176 01026000 CVTS1EE EQU CVTS01+172 01027000 CVTFRAS EQU CVTS01+168 01028000 CVTQSAS EQU CVTS01+164 01029000 CVTCRAS EQU CVTS01+160 01030000 CVTCRMN EQU CVTS01+156 01031000 CVTDELCP EQU CVTS01+152 01032000 CVTFRECL EQU CVTS01+148 01033000 CVTGETCL EQU CVTS01+144 01034000 CVTBLDCP EQU CVTS01+140 01035000 CVTAUTHL EQU CVTS01+136 01036000 CVTSCAN EQU CVTS01+132 01037000 CVTRV144 EQU CVTS01+130 01038000 CVTMAXMP EQU CVTS01+128 01039000 CVTSTCK EQU CVTS01+124 01040000 CVTRV139 EQU CVTS01+123 01041000 CVTDSSAC EQU CVTS01+122 01042000 CVTRV513 EQU CVTS01+121 01043000 CVTIOSPL EQU CVTS01+120 01044000 CVTPTGT EQU CVTS01+116 01045000 CVTCSPIE EQU CVTS01+112 01046000 CVTSMFEX EQU CVTS01+108 01047000 CVTOLT0A EQU CVTS01+104 01048000 CVTSRBRT EQU CVTS01+100 01049000 CVTPUTL EQU CVTS01+96 01050000 CVTASCRL EQU CVTS01+92 01051000 CVTASCRF EQU CVTS01+88 01052000 CVTRV326 EQU CVTS01+84 01053000 CVTRV325 EQU CVTS01+80 01054000 CVTRV324 EQU CVTS01+76 01055000 CVT0VL01 EQU CVTS01+72 01056000 CVTSHRVM EQU CVTS01+68 01057000 CVTRV332 EQU CVTS01+64 01058000 CVTTAS EQU CVTS01+60 01059000 CVTRSCN EQU CVTS01+56 01060000 CVTTRAC2 EQU CVTS01+54 01061000 CVTTRACE EQU CVTS01+52 01062000 CVTAPG EQU CVTS01+51 01063000 CVTSDTRC EQU CVTCTLFG 01064000 CVTGTRCE EQU CVTCTLFG 01065000 CVTNOMP EQU CVTCTLFG 01066000 CVTRSV79 EQU CVTCTLFG 01067000 CVTDSTAT EQU CVTCTLFG 01068000 CVTRSV78 EQU CVTCTLFG 01069000 CVTRV333 EQU CVTCTLFG 01070000 CVTRV323 EQU CVTCTLFG 01071000 CVTSPVLK EQU CVTS01+49 01072000 CVTRSV77 EQU CVTS01+48 01073000 CVTRV331 EQU CVTS01+44 01074000 CVTRV330 EQU CVTS01+40 01075000 CVTRV329 EQU CVTS01+36 01076000 CVTRV328 EQU CVTS01+32 01077000 CVTRV322 EQU CVTS01+28 01078000 CVTSLID EQU CVTSLIDA+1 01079000 CVTSYLK EQU CVTSLIDA 01080000 CVTRV321 EQU CVTS01+20 01081000 CVTRV320 EQU CVTS01+16 01082000 CVTLPDIR EQU CVTLPDIA+1 01083000 CVTRSV69 EQU CVTDIRST 01084000 CVTRSV68 EQU CVTDIRST 01085000 CVTRSV67 EQU CVTDIRST 01086000 CVTRSV66 EQU CVTDIRST 01087000 CVTRSV65 EQU CVTDIRST 01088000 CVTRSV64 EQU CVTDIRST 01089000 CVTRSV63 EQU CVTDIRST 01090000 CVTDICOM EQU CVTDIRST 01091000 CVTPVTP EQU CVTS01+8 01092000 CVTGETL EQU CVTS01 01093000 @NM00014 EQU XTLMSBAA 01094000 @NM00013 EQU XTLMSBLA 01095000 XTLNRFAC EQU XTLST+4 01096000 XTLLNTH EQU XTLST 01097000 LPDEATT3 EQU LPDE+30 01098000 LPDEAUTH EQU LPDEATT2 01099000 LPDESYSL EQU LPDEATT2 01100000 @NM00012 EQU LPDEATT2 01101000 @NM00011 EQU LPDEATT2 01102000 LPDERLC EQU LPDEATT2 01103000 LPDEXLE EQU LPDEATT2 01104000 @NM00010 EQU LPDEATT2 01105000 LPDENLR EQU LPDEATTR 01106000 @NM00009 EQU LPDEATTR 01107000 @NM00008 EQU LPDEATTR 01108000 LPDESER EQU LPDEATTR 01109000 LPDEREN EQU LPDEATTR 01110000 @NM00007 EQU LPDEATTR 01111000 LPDENIP EQU LPDEATTR 01112000 @NM00006 EQU LPDE+26 01113000 LPDEUSE EQU LPDE+24 01114000 LPDEXLP EQU LPDE+20 01115000 LPDENAME EQU LPDE+8 01116000 LPDERBP EQU LPDE+4 01117000 LPDECHN EQU LPDE 01118000 CDATTR3 EQU CDENTRY+30 01119000 CDAUTH EQU CDATTR2 01120000 CDSYSLIB EQU CDATTR2 01121000 CDOLY EQU CDATTR2 01122000 @NM00005 EQU CDATTR2 01123000 CDRLC EQU CDATTR2 01124000 CDXLE EQU CDATTR2 01125000 CDREL EQU CDATTR2 01126000 CDSPZ EQU CDATTR2 01127000 CDNLR EQU CDATTR 01128000 CDJPA EQU CDATTR 01129000 CDNFN EQU CDATTR 01130000 CDSER EQU CDATTR 01131000 CDREN EQU CDATTR 01132000 CDNIC EQU CDATTR 01133000 CDNIP EQU CDATTR 01134000 @NM00004 EQU CDENTRY+26 01135000 CDUSE EQU CDENTRY+24 01136000 CDNAME EQU CDENTRY+8 01137000 CDRRBP EQU CDENTRY+4 01138000 CDCHAIN EQU CDENTRY 01139000 CVTLEVL EQU CVTRELNO+2 01140000 CVTNUMB EQU CVTRELNO 01141000 CVTMDL EQU CVTFIX+250 01142000 @NM00003 EQU CVTFIX+248 01143000 @NM00002 EQU CVTFIX 01144000 CVTRV482 EQU CVTXTNT2+128 01145000 CVTRV481 EQU CVTXTNT2+124 01146000 CVTRV480 EQU CVTXTNT2+120 01147000 CVTRV479 EQU CVTXTNT2+118 01148000 CVTRV478 EQU CVTXTNT2+117 01149000 CVTRV477 EQU CVTXTNT2+116 01150000 CVTRV476 EQU CVTXTNT2+115 01151000 CVTRV475 EQU CVTXTNT2+114 01152000 CVTRV474 EQU CVTRV466 01153000 CVTRV473 EQU CVTRV466 01154000 CVTRV472 EQU CVTRV466 01155000 CVTRV471 EQU CVTRV466 01156000 CVTRV470 EQU CVTRV466 01157000 CVTRV469 EQU CVTRV466 01158000 CVTRV468 EQU CVTRV466 01159000 CVTRV467 EQU CVTRV466 01160000 CVTRV465 EQU CVTRV457 01161000 CVTRV464 EQU CVTRV457 01162000 CVTRV463 EQU CVTRV457 01163000 CVTRV462 EQU CVTRV457 01164000 CVTRV461 EQU CVTRV457 01165000 CVTRV460 EQU CVTRV457 01166000 CVTRV459 EQU CVTRV457 01167000 CVTRV458 EQU CVTRV457 01168000 CVTRV456 EQU CVTXTNT2+108 01169000 CVTRV455 EQU CVTXTNT2+104 01170000 CVTRV454 EQU CVTXTNT2+100 01171000 CVTRV453 EQU CVTXTNT2+96 01172000 CVTRV452 EQU CVTXTNT2+94 01173000 CVTRV451 EQU CVTXTNT2+92 01174000 CVTRV450 EQU CVTXTNT2+90 01175000 CVTRV449 EQU CVTXTNT2+88 01176000 CVTRV448 EQU CVTXTNT2+87 01177000 CVTRV447 EQU CVTXTNT2+86 01178000 CVTRV446 EQU CVTRV438 01179000 CVTRV445 EQU CVTRV438 01180000 CVTRV444 EQU CVTRV438 01181000 CVTRV443 EQU CVTRV438 01182000 CVTRV442 EQU CVTRV438 01183000 CVTRV441 EQU CVTRV438 01184000 CVTRV440 EQU CVTRV438 01185000 CVTRV439 EQU CVTRV438 01186000 CVTRV437 EQU CVTRV429 01187000 CVTRV436 EQU CVTRV429 01188000 CVTRV435 EQU CVTRV429 01189000 CVTRV434 EQU CVTRV429 01190000 CVTRV433 EQU CVTRV429 01191000 CVTRV432 EQU CVTRV429 01192000 CVTRV431 EQU CVTRV429 01193000 CVTRV430 EQU CVTRV429 01194000 CVTRV428 EQU CVTXTNT2+80 01195000 CVTRV427 EQU CVTXTNT2+76 01196000 CVTRV426 EQU CVTXTNT2+72 01197000 CVTRV425 EQU CVTXTNT2+68 01198000 CVTATACT EQU CVTATCVT 01199000 CVTRV423 EQU CVTXTNT2+62 01200000 CVTRV422 EQU CVTXTNT2+60 01201000 CVTRV421 EQU CVTXTNT2+58 01202000 CVTRV420 EQU CVTXTNT2+56 01203000 CVTRV419 EQU CVTXTNT2+55 01204000 CVTRV418 EQU CVTXTNT2+54 01205000 CVTRV417 EQU CVTRV409 01206000 CVTRV416 EQU CVTRV409 01207000 CVTRV415 EQU CVTRV409 01208000 CVTRV414 EQU CVTRV409 01209000 CVTRV413 EQU CVTRV409 01210000 CVTRV412 EQU CVTRV409 01211000 CVTRV411 EQU CVTRV409 01212000 CVTRV410 EQU CVTRV409 01213000 CVTRV408 EQU CVTRV400 01214000 CVTRV407 EQU CVTRV400 01215000 CVTRV406 EQU CVTRV400 01216000 CVTRV405 EQU CVTRV400 01217000 CVTRV404 EQU CVTRV400 01218000 CVTRV403 EQU CVTRV400 01219000 CVTRV402 EQU CVTRV400 01220000 CVTRV401 EQU CVTRV400 01221000 CVTICB EQU CVTXTNT2+48 01222000 CVTSKTA EQU CVTXTNT2+44 01223000 CVTRSV99 EQU CVTXTNT2+40 01224000 CVTRSV98 EQU CVTXTNT2+36 01225000 CVTRSV97 EQU CVTXTNT2+34 01226000 CVTRSV96 EQU CVTXTNT2+32 01227000 CVTOLTEP EQU CVTXTNT2+28 01228000 CVTQIDA EQU CVTQID+1 01229000 CVTRSV95 EQU CVTQID 01230000 CVTRSV94 EQU CVTXTNT2+20 01231000 CVTRSV93 EQU CVTXTNT2+16 01232000 CVTRSV92 EQU CVTXTNT2+12 01233000 CVTDEBVR EQU CVTXTNT2+8 01234000 CVTRSV91 EQU CVTXTNT2+6 01235000 CVTRSV9H EQU CVTFLGBT 01236000 CVTRSV9G EQU CVTFLGBT 01237000 CVTRSV9F EQU CVTFLGBT 01238000 CVTRSV9E EQU CVTFLGBT 01239000 CVTRSV9D EQU CVTFLGBT 01240000 CVTRSV9C EQU CVTFLGBT 01241000 CVTVME EQU CVTFLGBT 01242000 CVTNPE EQU CVTFLGBT 01243000 CVTNUCLS EQU CVTXTNT2+4 01244000 CVTDSSVA EQU CVTDSSV+1 01245000 CVTRSV89 EQU CVTDSSV 01246000 CVTRSV88 EQU CVTXTNT1+8 01247000 CVTRSV87 EQU CVTXTNT1+4 01248000 CVTFACHN EQU CVTXTNT1 01249000 CVTRV488 EQU CVTMAP+412 01250000 CVTRV487 EQU CVTMAP+408 01251000 CVTRV486 EQU CVTMAP+404 01252000 CVTRV485 EQU CVTMAP+400 01253000 CVTACTAP EQU CVTMAP+396 01254000 CVTAUTH EQU CVTMAP+392 01255000 CVTATMCA EQU CVTATMCT+1 01256000 CVTATMST EQU CVTATMCT 01257000 CVTRSV61 EQU CVTMAP+384 01258000 CVTVOLT1 EQU CVTVOLM1+1 01259000 CVTVOLI1 EQU CVTVOLF1 01260000 CVTSTOA EQU CVTMAP+376 01261000 CVTRSV58 EQU CVTMAP+374 01262000 CVTRSV57 EQU CVTMAP+372 01263000 CVTDDCE EQU CVTMAP+368 01264000 CVTPNWFR EQU CVTMAP+364 01265000 CVTSMF EQU CVTMAP+360 01266000 CVTSULK EQU CVTMAP+358 01267000 CVTSLKO EQU CVTSYSK 01268000 CVTSLKP EQU CVTSYSK 01269000 CVTSLKQ EQU CVTSYSK 01270000 CVTSLKR EQU CVTSYSK 01271000 CVTRSV56 EQU CVTSYSK 01272000 CVTRSV55 EQU CVTSYSK 01273000 CVTRSV54 EQU CVTSYSK 01274000 CVTRSV53 EQU CVTSYSK 01275000 CVTRSV52 EQU CVTA1F1 01276000 CVTRSV51 EQU CVTA1F1 01277000 CVTRSV50 EQU CVTA1F1 01278000 CVTRSV49 EQU CVTA1F1 01279000 CVTRSV48 EQU CVTA1F1 01280000 CVTRSV47 EQU CVTA1F1 01281000 CVTSRSW EQU CVTA1F1 01282000 CVTPFSW EQU CVTA1F1 01283000 CVTPCVT EQU CVTMAP+352 01284000 CVTRSV46 EQU CVTMAP+344 01285000 CVTRSV45 EQU CVTMAP+340 01286000 CVTRSV44 EQU CVTMAP+338 01287000 CVTRSV43 EQU CVTMAP+336 01288000 CVTHJESA EQU CVTHJES+1 01289000 CVTRSV42 EQU CVTHJES 01290000 CVTEXT2A EQU CVTEXT2+1 01291000 CVTRSV41 EQU CVTEXT2 01292000 CVTAPFA EQU CVTAPF+1 01293000 CVTRSV40 EQU CVTAPF 01294000 CVTRV518 EQU CVTINTLA 01295000 CVTRV517 EQU CVTERPV 01296000 CVTEORM EQU CVTMAP+312 01297000 CVTMCHPR EQU CVTMAP+308 01298000 CVTTZ EQU CVTMAP+304 01299000 CVTJEPS EQU CVTMAP+300 01300000 CVTJESCT EQU CVTMAP+296 01301000 CVTMODE EQU CVTMAP+292 01302000 CVTPTRV EQU CVTMAP+288 01303000 CVTREAL EQU CVTMAP+284 01304000 CVTRSV39 EQU CVTMAP+280 01305000 CVTRSV38 EQU CVTMAP+276 01306000 CVTDMSRA EQU CVTDMSR+1 01307000 CVTRV634 EQU CVTDMSRF 01308000 CVTRV633 EQU CVTDMSRF 01309000 CVTRV632 EQU CVTDMSRF 01310000 CVTRV631 EQU CVTDMSRF 01311000 CVTRV630 EQU CVTDMSRF 01312000 CVTRV629 EQU CVTDMSRF 01313000 CVTUDUMP EQU CVTDMSRF 01314000 CVTSDUMP EQU CVTDMSRF 01315000 CVTQMSGA EQU CVTQMSG+1 01316000 CVTRSV36 EQU CVTQMSG 01317000 CVTAMFF EQU CVTMAP+264 01318000 CVTPURGA EQU CVTPURG+1 01319000 CVTRSV35 EQU CVTPURG 01320000 CVTCBSP EQU CVTMAP+256 01321000 CVTATERA EQU CVTATER+1 01322000 CVTSYST EQU CVTATER 01323000 CVTVOLT2 EQU CVTTAT 01324000 CVTVOLI2 EQU CVTVOLF2 01325000 CVTAQAVB EQU CVTAQAVT+1 01326000 CVTRSV34 EQU CVTTCMFG 01327000 CVTRSV33 EQU CVTTCMFG 01328000 CVTRSV32 EQU CVTTCMFG 01329000 CVTRSV31 EQU CVTTCMFG 01330000 CVTRSV30 EQU CVTTCMFG 01331000 CVTRSV29 EQU CVTTCMFG 01332000 CVTLDEV EQU CVTTCMFG 01333000 CVTTCRDY EQU CVTTCMFG 01334000 CVTGTFA EQU CVTGTF+1 01335000 CVTRSV27 EQU CVTGTFST 01336000 CVTRNIO EQU CVTGTFST 01337000 CVTUSR EQU CVTGTFST 01338000 CVTRV318 EQU CVTFORM 01339000 CVTRV317 EQU CVTTMODE 01340000 CVTRV316 EQU CVTSTATE 01341000 CVTRV315 EQU CVTGTFS 01342000 CVTGTFAV EQU CVTGTFS 01343000 CVT0SCR1 EQU CVTMAP+232 01344000 CVTRV515 EQU CVTMAP+228 01345000 CVTRMS EQU CVTMAP+224 01346000 CVTPATCH EQU CVTMAP+220 01347000 CVTTSCE EQU CVTMAP+216 01348000 CVTLNKSC EQU CVTMAP+214 01349000 CVTQABST EQU CVTMAP+212 01350000 CVTMDLDS EQU CVTMAP+208 01351000 CVTUSER EQU CVTMAP+204 01352000 CVTABEND EQU CVTMAP+200 01353000 CVTSMCA EQU CVTMAP+196 01354000 CVTRSV18 EQU CVTMAP+192 01355000 CVTRSV17 EQU CVTOPTB 01356000 CVTRSV16 EQU CVTOPTB 01357000 CVTFP EQU CVTOPTB 01358000 CVTAPTHR EQU CVTOPTB 01359000 CVTNLOG EQU CVTOPTB 01360000 CVTTOD EQU CVTOPTB 01361000 CVTCTIMS EQU CVTOPTB 01362000 CVTPROT EQU CVTOPTB 01363000 CVTXPFP EQU CVTOPTA 01364000 CVTASCII EQU CVTOPTA 01365000 CVTRSV13 EQU CVTOPTA 01366000 CVTRSV12 EQU CVTOPTA 01367000 CVTNIP EQU CVTOPTA 01368000 CVTDDR EQU CVTOPTA 01369000 CVTAPR EQU CVTOPTA 01370000 CVTCCH EQU CVTOPTA 01371000 CVTSNCTR EQU CVTMAP+180 01372000 CVTQMWR EQU CVTMAP+176 01373000 CVTQOCR EQU CVTMAP+172 01374000 CVT1EF00 EQU CVTMAP+168 01375000 CVTMZ00 EQU CVTMAP+164 01376000 CVTHEAD EQU CVTMAP+160 01377000 CVTRSV11 EQU CVTMAP+156 01378000 CVT0PT01 EQU CVTMAP+152 01379000 CVTMSER EQU CVTMAP+148 01380000 CVTRV516 EQU CVTIERLC 01381000 CVTILCH EQU CVTMAP+140 01382000 CVT0DS EQU CVTMAP+136 01383000 CVTFBOSV EQU CVTMAP+132 01384000 CVTNUCB EQU CVTMAP+128 01385000 CVTIXAVL EQU CVTMAP+124 01386000 CVTIOQET EQU CVTMAP+120 01387000 CVTDCBA EQU CVTMAP+117 01388000 CVTMVS2 EQU CVTDCB 01389000 CVT6DAT EQU CVTDCB 01390000 CVT4MPS EQU CVTDCB 01391000 CVTRSV09 EQU CVTDCB 01392000 CVT4MS1 EQU CVTDCB 01393000 CVT2SPS EQU CVTDCB 01394000 CVT1SSS EQU CVTDCB 01395000 CVTRSV08 EQU CVTDCB 01396000 CVTSTB EQU CVTMAP+112 01397000 CVTQTD00 EQU CVTMAP+108 01398000 CVTQTE00 EQU CVTMAP+104 01399000 CVTCUCB EQU CVTMAP+100 01400000 CVTSJQ EQU CVTMAP+96 01401000 CVTPBLDL EQU CVTMAP+92 01402000 CVTTPC EQU CVTMAP+88 01403000 CVTSVDCB EQU CVTMAP+84 01404000 CVTBRET EQU CVTMAP+82 01405000 CVTEXIT EQU CVTMAP+80 01406000 CVT0FN00 EQU CVTMAP+76 01407000 CVTDARA EQU CVTDAR+1 01408000 CVTRSV07 EQU CVTFLGS1 01409000 CVTRSV06 EQU CVTFLGS1 01410000 CVTRSV05 EQU CVTFLGS1 01411000 CVTRSV04 EQU CVTFLGS1 01412000 CVTRSV03 EQU CVTFLGS1 01413000 CVTRSV02 EQU CVTFLGS1 01414000 CVTRSV01 EQU CVTFLGS1 01415000 CVTDMPLK EQU CVTFLGS1 01416000 CVTXITP EQU CVTMAP+68 01417000 CVTZDTAB EQU CVTMAP+64 01418000 CVTMSLT EQU CVTMAP+60 01419000 CVTDATE EQU CVTMAP+56 01420000 CVTBTERM EQU CVTMAP+52 01421000 CVTSYSAD EQU CVTMAP+48 01422000 CVTXTLER EQU CVTMAP+44 01423000 CVTILK2 EQU CVTMAP+40 01424000 CVTILK1 EQU CVTMAP+36 01425000 CVTPRLTV EQU CVTMAP+32 01426000 CVTPCNVT EQU CVTMAP+28 01427000 CVT0VL00 EQU CVTMAP+24 01428000 CVTXAPG EQU CVTMAP+20 01429000 CVTBUF EQU CVTMAP+16 01430000 CVTJOB EQU CVTMAP+12 01431000 CVTLINK EQU CVTMAP+8 01432000 CVT0EF00 EQU CVTMAP+4 01433000 CVTTCBP EQU CVTMAP 01434000 CVT EQU CVTMAP 01435000 APNQ11RC EQU APNQM11+63 01436000 APNQ11DC EQU APNQM11+61 01437000 APNQ11T6 EQU APNQM11+59 01438000 APNQ11T5 EQU APNQM11+55 01439000 APNQ11T4 EQU APNQM11+51 01440000 APNQ11T3 EQU APNQM11+31 01441000 APNQ11T2 EQU APNQM11+25 01442000 APNQ11T1 EQU APNQM11+4 01443000 APNQ11MC EQU APNQM11+2 01444000 APNQ11LN EQU APNQM11 01445000 APNQ10RC EQU APNQM10+55 01446000 APNQ10DC EQU APNQM10+53 01447000 APNQ10T2 EQU APNQM10+51 01448000 APNQ10T1 EQU APNQM10+4 01449000 APNQ10MC EQU APNQM10+2 01450000 APNQ10LN EQU APNQM10 01451000 APNQ09RC EQU APNQM09+58 01452000 APNQ09DC EQU APNQM09+56 01453000 APNQ09T4 EQU APNQM09+53 01454000 APNQ09T3 EQU APNQM09+27 01455000 APNQ09T2 EQU APNQM09+19 01456000 APNQ09T1 EQU APNQM09+4 01457000 APNQ09MC EQU APNQM09+2 01458000 APNQ09LN EQU APNQM09 01459000 APNQ08RC EQU APNQM08+62 01460000 APNQ08DC EQU APNQM08+60 01461000 APNQ08T3 EQU APNQM08+35 01462000 APNQ08T2 EQU APNQM08+31 01463000 APNQ08T1 EQU APNQM08+4 01464000 APNQ08MC EQU APNQM08+2 01465000 APNQ08LN EQU APNQM08 01466000 APNQ07RC EQU APNQM07+52 01467000 APNQ07DC EQU APNQM07+50 01468000 APNQ07T3 EQU APNQM07+16 01469000 APNQ07T2 EQU APNQM07+12 01470000 APNQ07T1 EQU APNQM07+4 01471000 APNQ07MC EQU APNQM07+2 01472000 APNQ07LN EQU APNQM07 01473000 APNQ06RC EQU APNQM06+47 01474000 APNQ06DC EQU APNQM06+45 01475000 APNQ06T2 EQU APNQM06+41 01476000 APNQ06T1 EQU APNQM06+4 01477000 APNQ06MC EQU APNQM06+2 01478000 APNQ06LN EQU APNQM06 01479000 APNQ05RC EQU APNQM05+39 01480000 APNQ05DC EQU APNQM05+37 01481000 APNQ05T3 EQU APNQM05+27 01482000 APNQ05T1 EQU APNQM05+4 01483000 APNQ05MC EQU APNQM05+2 01484000 APNQ05LN EQU APNQM05 01485000 APNQ04RC EQU APNQM04+87 01486000 APNQ04DC EQU APNQM04+85 01487000 APNQ04T2 EQU APNQM04+42 01488000 APNQ04T1 EQU APNQM04+4 01489000 APNQ04MC EQU APNQM04+2 01490000 APNQ04LN EQU APNQM04 01491000 APNQ03RC EQU APNQM03+57 01492000 APNQ03DC EQU APNQM03+55 01493000 APNQ03T4 EQU APNQM03+53 01494000 APNQ03T3 EQU APNQM03+49 01495000 APNQ03T2 EQU APNQM03+45 01496000 APNQ03T1 EQU APNQM03+4 01497000 APNQ03MC EQU APNQM03+2 01498000 APNQ03LN EQU APNQM03 01499000 APNQ02RC EQU APNQM02+53 01500000 APNQ02DC EQU APNQM02+51 01501000 APNQ02T3 EQU APNQM02+36 01502000 APNQ02T2 EQU APNQM02+32 01503000 APNQ02T1 EQU APNQM02+4 01504000 APNQ02MC EQU APNQM02+2 01505000 APNQ02LN EQU APNQM02 01506000 APNQ01RC EQU APNQM01+50 01507000 APNQ01DC EQU APNQM01+48 01508000 APNQ01T3 EQU APNQM01+16 01509000 APNQ01T2 EQU APNQM01+12 01510000 APNQ01T1 EQU APNQM01+4 01511000 APNQ01MC EQU APNQM01+2 01512000 APNQ01LN EQU APNQM01 01513000 APNQUSER EQU APNQ+4 01514000 APNQID EQU APNQ 01515000 APNPBLLL EQU APNPBLHD+2 01516000 APNPBLFF EQU APNPBLHD 01517000 APNPAPNP EQU APNP30RT+12 01518000 APNPRTRY EQU APNP30RT+8 01519000 @NM00001 EQU APNP30RT+6 01520000 APNPBR14 EQU APNP30RT+4 01521000 APNPL15 EQU APNP30RT 01522000 APNPSSVT EQU APNP+376 01523000 APNPSSCT EQU APNP+372 01524000 APNPPDS2 EQU APNP+368 01525000 APNPPDSP EQU APNP+364 01526000 APNPBYT3 EQU APNPSWIT+3 01527000 APNPBYT2 EQU APNPSWIT+2 01528000 APNPBYT1 EQU APNPSWIT+1 01529000 APNPFIX EQU APNPBYT0 01530000 APNPSREC EQU APNPBYT0 01531000 APNPSTAT EQU APNPBYT0 01532000 APNPFREE EQU APNPBYT0 01533000 APNPDUP EQU APNPBYT0 01534000 APNPVTSZ EQU APNP+344 01535000 APNPVTAD EQU APNP+340 01536000 APNPSV13 EQU APNP+336 01537000 APNPRG15 EQU APNPREGS+60 01538000 APNPRG14 EQU APNPREGS+56 01539000 APNPRG13 EQU APNPREGS+52 01540000 APNPRG12 EQU APNPREGS+48 01541000 APNPRG11 EQU APNPREGS+44 01542000 APNPRG10 EQU APNPREGS+40 01543000 APNPRG09 EQU APNPREGS+36 01544000 APNPRG08 EQU APNPREGS+32 01545000 APNPRG07 EQU APNPREGS+28 01546000 APNPRG06 EQU APNPREGS+24 01547000 APNPRG05 EQU APNPREGS+20 01548000 APNPRG04 EQU APNPREGS+16 01549000 APNPRG03 EQU APNPREGS+12 01550000 APNPRG02 EQU APNPREGS+8 01551000 APNPRG01 EQU APNPREGS+4 01552000 APNPRG00 EQU APNPREGS 01553000 APNPMDL2 EQU APNPMODL+4 01554000 APNPIGT0 EQU APNPLOAD 01555000 APNPSSIP EQU APNP+244 01556000 APNPSSIR EQU APNP+240 01557000 APNPCPSZ EQU APNP+236 01558000 APNPLEN EQU APNPCORE+1 01559000 APNPSPOL EQU APNPCORE 01560000 APNPCHAR EQU APNP+228 01561000 APNPBLTL EQU APNP+124 01562000 APNPAPOT EQU APNP+120 01563000 APNPAPCT EQU APNP+116 01564000 APNPAPCP EQU APNP+112 01565000 APNPUSER EQU APNP+4 01566000 APNPID EQU APNP 01567000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 01568000 @RF00065 EQU @RC00062 01569000 @RC00059 EQU @RC00053 01570000 @ENDDATA EQU * 01571000 END IGTA40,(C'PLS1754',0701,77092) 01572000