TITLE 'IEDPMD - MANUAL DIAL PROCESSING *00001000 ' 00002000 IEDPMD CSECT , 0001 00003000 @PROLOG DS 0H 0002 00004000 * /* 00005000 USING IEDPMD,REG15 00006000 IEDPMD IEDHJN AFTERHJN,HJN 00007000 * IF RPARM->PRFPRI=PRIPIUCP THEN /* IF OP CTL INPUT ... */ 00008000 CLI PRFPRI(RPARM),X'00' 0221 00009000 BNE @RF00221 0221 00010000 * DO; /* ... USE OP CTL WORKAREA */ 00011000 * STM(REG0,REG14,OPCTWORK); /* SAVE USERS REGS */ 00012000 STM REG0,REG14,OPCTWORK 0223 00013000 * RDUAL=ADDR(OPCTWORK); /* INITIALIZE WORK AREA BASE */ 00014000 LA RDUAL,OPCTWORK 0224 00015000 * END; 0225 00016000 * ELSE /* ... USE TCAM WORKAREA */ 00017000 * DO; 0226 00018000 B @RC00221 0226 00019000 @RF00221 DS 0H 0227 00020000 * STM(REG0,REG14,TCAMWORK); /* SAVE USERS REGS */ 00021000 STM REG0,REG14,TCAMWORK 0227 00022000 * RDUAL=ADDR(TCAMWORK); /* INITIALIZE WORK AREA BASE */ 00023000 LA RDUAL,TCAMWORK 0228 00024000 * END; 0229 00025000 * RFY 0230 00026000 * (REG0, 0230 00027000 * RWORK, 0230 00028000 * REG5, 0230 00029000 * REG7, 0230 00030000 * RTERM, 0230 00031000 * RRUDATA, 0230 00032000 * REG10, 0230 00033000 * REG11, 0230 00034000 * REG14) UNRSTD; /* FREE ALL REGS POSSIBLE FOR 0230 00035000 * COMPILER */ 00036000 @RC00221 DS 0H 0231 00037000 * IEDQPPTR=RPARM; /* GET BUFFER ADDRESS */ 00038000 LR IEDQPPTR,RPARM 0231 00039000 * RFY 0232 00040000 * RPARM UNRSTD; 0232 00041000 * RBASE=REG15; /* ESTABLISH BASE REG */ 00042000 LR RBASE,REG15 0233 00043000 * GEN NOREFS NOSETS; 0234 00044000 DROP REG15 00045000 USING IEDPMD,RBASE 00046000 * RFY 0235 00047000 * REG15 UNRSTD; 0235 00048000 * PMDWORK=PMDWORK&&PMDWORK; /* CLEAR WORK AREA FOR PMD */ 00049000 XC PMDWORK(48,RDUAL),PMDWORK(RDUAL) 0236 00050000 * PMDWTO=' '; /* CLEAR WTOLIST FOR EXECUTE */ 00051000 MVI PMDWTO+1(RDUAL),C' ' 0237 00052000 MVC PMDWTO+2(122,RDUAL),PMDWTO+1(RDUAL) 0237 00053000 MVI PMDWTO(RDUAL),C' ' 0237 00054000 * IF PRFPRI=PRIPIUCP THEN /* IF COMPACTED PIU FROM OP CTL */ 00055000 CLI PRFPRI(IEDQPPTR),X'00' 0238 00056000 BNE @RF00238 0238 00057000 * DO; 0239 00058000 * RFY 0240 00059000 * IEDPRUQD BASED(IEDQPPTR); /* PACKED PIU OVERLAY BUFFER */ 00060000 * RFY 0241 00061000 * (RTERM, 0241 00062000 * RRUDATA, 0241 00063000 * RBDU) RSTD; 0241 00064000 * RTERM=PRUTTCIN; /* TNT INDEX */ 00065000 LH RTERM,PRUTTCIN(,IEDQPPTR) 0242 00066000 N RTERM,@CF01244 0242 00067000 * RBDU=ADDR(PRUDATA); /* BDU BASE */ 00068000 LA RBDU,PRUDATA(,IEDQPPTR) 0243 00069000 * END; 0244 00070000 * ELSE /* REGULAR PIU FROM DEBLOCK */ 00071000 * DO; 0245 00072000 B @RC00238 0245 00073000 @RF00238 DS 0H 0246 00074000 * RFY 0246 00075000 * IEDPIU0 BASED(ADDR(PRFPIUO)+PRFPIUO);/* FID0 PIU BASE 0246 00076000 * OVERLAY BUFFER */ 00077000 * RFY 0247 00078000 * IEDTH BASED(ADDR(PIU0TH));/* TH BASE */ 00079000 * RTERM=TTHOAF; /* TNT INDEX */ 00080000 LA @10,PRFPIUO(,IEDQPPTR) 0248 00081000 SLR @07,@07 0248 00082000 IC @07,PRFPIUO(,IEDQPPTR) 0248 00083000 ALR @10,@07 0248 00084000 SLR RTERM,RTERM 0248 00085000 ICM RTERM,3,TTHOAF(@10) 0248 00086000 * RBDU=ADDR(PIU0RU); /* BDU BASE */ 00087000 LA RBDU,PIU0RU(,@10) 0249 00088000 * END; 0250 00089000 * RRUDATA=RBDU+LENGTH(IEDBDU); /* FIRST BYTE OF DATA FOLLOWING 00090000 * BDU */ 00091000 @RC00238 LA RRUDATA,6 0251 00092000 ALR RRUDATA,RBDU 0251 00093000 * IEDQNPTR=AVTRNMPT; /* BASE FOR TNTCODE */ 00094000 L IEDQNPTR,AVTRNMPT(,RAVT) 0252 00095000 * RTERM=ADDR(TNTFIRST)+((RTERM-1)*(TNTENLEN+3));/* FIND TNT ENTRY 00096000 * WITHIN TNT */ 00097000 LA @10,82 0253 00098000 ALR @10,IEDQNPTR 0253 00099000 LR @01,RTERM 0253 00100000 BCTR @01,0 0253 00101000 SLR @07,@07 0253 00102000 IC @07,TNTENLEN(,IEDQNPTR) 0253 00103000 LA @15,3 0253 00104000 ALR @15,@07 0253 00105000 MR @00,@15 0253 00106000 ALR @10,@01 0253 00107000 LR RTERM,@10 0253 00108000 * WKTERMN(1:TNTENLEN)=TERMNAM(1:TNTENLEN);/* PUT NAME IN MSG */ 00109000 LR @10,@07 0254 00110000 BCTR @10,0 0254 00111000 EX @10,@SM01245 0254 00112000 * RTERM=TERMAD; /* GET TERM ENTRY ADDRESS */ 00113000 ALR @07,RTERM 0255 00114000 BCTR @07,0 0255 00115000 L @10,TERMAD(,@07) 0255 00116000 LA @10,0(,@10) 0255 00117000 LR RTERM,@10 0255 00118000 * 0256 00119000 * /*****************************************************************/ 00120000 * /* */ 00121000 * /* PROCESS PHASE1 (X'20') RESPONSE: GET LINENAME AND DIGITS FOR */ 00122000 * /* MANUAL DIAL */ 00123000 * /* */ 00124000 * /*****************************************************************/ 00125000 * 0256 00126000 * RFY 0256 00127000 * RPARM RSTD; 0256 00128000 * IF BDUPHASE=RSP20 THEN /* IF HANDLING PHASE I */ 00129000 TM BDUPHASE(RBDU),B'00100000' 0257 00130000 BNO @RF00257 0257 00131000 TM BDUPHASE(RBDU),B'01000000' 0257 00132000 BNZ @RF00257 0257 00133000 * DO; /* GET LINE NAME & DIGITS */ 00134000 * RFY 0259 00135000 * REG15 RSTD; 0259 00136000 * TRMANDL=ON; /* SET MANUAL DIAL IN PROCESS */ 00137000 LR @05,RTERM 0260 00138000 AL @05,@CF01251 0260 00139000 LA @07,TRMANDL-2(,@05) 0260 00140000 LR @00,@07 0260 00141000 LA @14,3 0260 00142000 NR @00,@14 0260 00143000 LCR @00,@00 0260 00144000 ALR @07,@00 0260 00145000 L @14,0(,@07) 0260 00146000 @GL00001 LR @10,@14 0260 00147000 O @10,@CB01247+3(@00) 0260 00148000 CS @14,@10,0(@07) 0260 00149000 BNE @GL00001 0260 00150000 * RPARM=NETADDR; /* NETWORK ADDRESS TO ROUTINE */ 00151000 SLR RPARM,RPARM 0261 00152000 ICM RPARM,3,NETADDR(RRUDATA) 0261 00153000 * CALL IEDIAP03; 0262 00154000 L @10,AVTSAVTP(,RAVT) 0262 00155000 L @15,SAVTNAX(,@10) 0262 00156000 BALR @14,@15 0262 00157000 * RTERM=ADDR(TNTFIRST)+((REG15-1)*(TNTENLEN+3)); 0263 00158000 LA RTERM,82 0263 00159000 ALR RTERM,IEDQNPTR 0263 00160000 LR @05,REG15 0263 00161000 BCTR @05,0 0263 00162000 SLR @14,@14 0263 00163000 IC @14,TNTENLEN(,IEDQNPTR) 0263 00164000 LA @10,3 0263 00165000 ALR @10,@14 0263 00166000 MR @04,@10 0263 00167000 ALR RTERM,@05 0263 00168000 * RFY 0264 00169000 * (RBDU, 0264 00170000 * REG15) UNRSTD; 0264 00171000 * WKLINEN(1:TNTENLEN)=TERMNAM(1:TNTENLEN);/* LINE NAME FOR WTO 00172000 * MESSAGE */ 00173000 BCTR @14,0 0265 00174000 EX @14,@SM01252 0265 00175000 * WKDIGITS=WKDIGITS&&WKDIGITS;/* CLEAR AREA FOR DIGITS */ 00176000 XC WKDIGITS(32,RDUAL),WKDIGITS(RDUAL) 0266 00177000 * IF PRFPRI=PRIPIUCP THEN /* IF PACKED PIU */ 00178000 CLI PRFPRI(IEDQPPTR),X'00' 0267 00179000 BNE @RF00267 0267 00180000 * LENDGTS=PRUDATCT-LENGTH(IEDBDU)-2;/* LENGTH OF DIAL DIGITS 00181000 * IN PACKED PIU */ 00182000 LH @07,PRUDATCT(,IEDQPPTR) 0268 00183000 SL @07,@CF00044 0268 00184000 STH @07,LENDGTS(,RDUAL) 0268 00185000 * ELSE /* REGULAR PIU FROM DEBLOCK */ 00186000 * LENDGTS=TTHDCF-LENGTH(PIU0RH)-LENGTH(PIU0PAD)-LENGTH(IEDBDU)- 00187000 * LENGTH(NETADDR); /* LENGTH OF DIAL DIGITS IN PIU */ 00188000 B @RC00267 0269 00189000 @RF00267 LA @07,PRFPIUO(,IEDQPPTR) 0269 00190000 SLR @15,@15 0269 00191000 IC @15,PRFPIUO(,IEDQPPTR) 0269 00192000 ALR @07,@15 0269 00193000 SLR @00,@00 0269 00194000 ICM @00,3,TTHDCF(@07) 0269 00195000 SL @00,@CF00234 0269 00196000 STH @00,LENDGTS(,RDUAL) 0269 00197000 * IF PRFPRI=PRIPIUCP THEN /* IF COMPATCED PIU - ALWAYS ONE 00198000 * UNIT */ 00199000 @RC00267 CLI PRFPRI(IEDQPPTR),X'00' 0270 00200000 BNE @RF00270 0270 00201000 * WKDIGITS(1:LENDGTS)=DIALDIG(1:LENDGTS);/* PUT DIGITS IN 0271 00202000 * WORKAREA */ 00203000 LH @07,LENDGTS(,RDUAL) 0271 00204000 BCTR @07,0 0271 00205000 EX @07,@SM01254 0271 00206000 * IF PRFPRI^=PRIPIUCP THEN /* IF REGULAR PIU FROM DEBLOCK - 00207000 * MAYBE 1 OR 2 UNITS */ 00208000 @RF00270 CLI PRFPRI(IEDQPPTR),X'00' 0272 00209000 BE @RF00272 0272 00210000 * DO; 0273 00211000 * IF PRFTIC^=INVTIC THEN /* MORE */ 00212000 CLC PRFTIC(4,IEDQPPTR),INVTIC 0274 00213000 BE @RF00274 0274 00214000 * DO; /* THAN 1 BUFFER UNIT */ 00215000 * LENFIRST=AVTKEYLE-(ADDR(DIALDIG)-ADDR(IEDQPRF)-LENGTH( 00216000 * IEDBDU)); /* NUMBER OF DIGITS IN FIRST UNIT*/ 00217000 LA @07,DIALDIG(,RRUDATA) 0276 00218000 SLR @07,IEDQPPTR 0276 00219000 SL @07,@CF00070 0276 00220000 LCR @07,@07 0276 00221000 AH @07,AVTKEYLE(,RAVT) 0276 00222000 STH @07,LENFIRST(,RDUAL) 0276 00223000 * IF LENFIRST>0 THEN /* IF SOME IN 1ST UNIT */ 00224000 LTR @07,@07 0277 00225000 BNP @RF00277 0277 00226000 * WKDIGITS(1:LENFIRST)=DIALDIG(1:LENFIRST);/* MOVE 0278 00227000 * FIRST NUMBERS TO MSG */ 00228000 BCTR @07,0 0278 00229000 EX @07,@SM01254 0278 00230000 * LENSEC=LENDGTS-LENFIRST;/* DIGITS IN 2ND UNIT */ 00231000 @RF00277 LH @07,LENFIRST(,RDUAL) 0279 00232000 LH @15,LENDGTS(,RDUAL) 0279 00233000 SLR @15,@07 0279 00234000 STH @15,LENSEC(,RDUAL) 0279 00235000 * RTERM=PRFTIC; /* POINT TO 2ND UNIT */ 00236000 L RTERM,PRFTIC(,IEDQPPTR) 0280 00237000 * WKDIGITS(LENFIRST+1:LENDGTS)=RTERM->UNIT2DGT(1:LENSEC); 00238000 ALR @07,RDUAL 0281 00239000 BCTR @15,0 0281 00240000 EX @15,@SM01256 0281 00241000 * /* MOVE SECOND NUMBERS TO MESSAGE*/ 00242000 * END; 0282 00243000 * ELSE /* ONLY ONE UNIT FROM DEBLOCK */ 00244000 * WKDIGITS(1:LENDGTS)=DIALDIG(1:LENDGTS);/* PUT DIGITS IN 00245000 * WORK AREA */ 00246000 B @RC00274 0283 00247000 @RF00274 LH @07,LENDGTS(,RDUAL) 0283 00248000 BCTR @07,0 0283 00249000 EX @07,@SM01254 0283 00250000 * END; 0284 00251000 @RC00274 DS 0H 0285 00252000 * RPARM=ADDR(WTOLIST1); /* ADDR OF LIST FORM FOR EXEC */ 00253000 @RF00272 LA RPARM,WTOLIST1 0285 00254000 * K=RPARM->M1LEN; /* GET LENGTH OF LIST FORM */ 00255000 LH @07,M1LEN(,RPARM) 0286 00256000 STH @07,K(,RDUAL) 0286 00257000 * K=K+4; /* BUMP TO INCLUDE ROUTING AND 0287 00258000 * DESCRIPTOR CODES */ 00259000 AL @07,@CF00326 0287 00260000 STH @07,K(,RDUAL) 0287 00261000 * PMDWTO(1:K)=WTOLIST1(1:K); /* SET UP PHASE 1 MESSAGE */ 00262000 BCTR @07,0 0288 00263000 EX @07,@SM01258 0288 00264000 * RPARM=ADDR(PMDWTO); /* SET ADDRESS FOR EXEC WTO */ 00265000 LA RPARM,PMDWTO(,RDUAL) 0289 00266000 * RPARM->MSG1TERM(1:TNTENLEN)=WKTERMN(1:TNTENLEN);/* PLACE TERM 00267000 * NAME IN MSG */ 00268000 SLR @07,@07 0290 00269000 IC @07,TNTENLEN(,IEDQNPTR) 0290 00270000 BCTR @07,0 0290 00271000 EX @07,@SM01260 0290 00272000 * RPARM->MSG1LINE(1:TNTENLEN)=WKLINEN(1:TNTENLEN);/* PLACE LINE 00273000 * NAME IN MSG */ 00274000 EX @07,@SM01262 0291 00275000 * GEN REFS(WKDIGITS,RDUAL) SETS(WKDIGITS); 0292 00276000 * /* @YM05653*/ 00277000 OI WKDIGITS(RDUAL),X'F0' SET UP FOR MOVE ZONES @YM05653 00278000 MVZ WKDIGITS+1(31,RDUAL),WKDIGITS(RDUAL) ZONES @YM05653 00279000 * RPARM->MSGDIGTS(1:LENDGTS)=WKDIGITS(1:LENDGTS); 0293 00280000 LH @07,LENDGTS(,RDUAL) 0293 00281000 BCTR @07,0 0293 00282000 EX @07,@SM01264 0293 00283000 * END; /* END SPECIAL PHASE1 PROCESS */ 00284000 * 0295 00285000 * /*****************************************************************/ 00286000 * /* */ 00287000 * /* PHASE 3 MSG TO PROCESS */ 00288000 * /* */ 00289000 * /*****************************************************************/ 00290000 * 0295 00291000 * ELSE 0295 00292000 * DO; 0295 00293000 B @RC00257 0295 00294000 @RF00257 DS 0H 0296 00295000 * TRMANDL=OFF; /* RESET MANUAL DIAL IN PROGRESS */ 00296000 LR @11,RTERM 0296 00297000 AL @11,@CF01251 0296 00298000 LA @15,TRMANDL-2(,@11) 0296 00299000 LR @14,@15 0296 00300000 LA @07,3 0296 00301000 NR @14,@07 0296 00302000 LCR @14,@14 0296 00303000 ALR @15,@14 0296 00304000 L @07,0(,@15) 0296 00305000 @GL00002 LR @00,@07 0296 00306000 N @00,@CB01266+3(@14) 0296 00307000 CS @07,@00,0(@15) 0296 00308000 BNE @GL00002 0296 00309000 * RPARM=ADDR(WTOLIST2); /* ADDR OF LIST FORM FOR EXEC */ 00310000 LA RPARM,WTOLIST2 0297 00311000 * K=RPARM->M2LEN; /* GET LENGTH OF LIST FORM */ 00312000 LH @07,M2LEN(,RPARM) 0298 00313000 STH @07,K(,RDUAL) 0298 00314000 * K=K+4; /* BUMP TO INCLUDE ROUTING AND 0299 00315000 * DESCRIPTOR CODES */ 00316000 AL @07,@CF00326 0299 00317000 STH @07,K(,RDUAL) 0299 00318000 * PMDWTO(1:K)=WTOLIST2(1:K); /* SET UP PHASE 3 MESSAGE */ 00319000 BCTR @07,0 0300 00320000 EX @07,@SM01270 0300 00321000 * RPARM=ADDR(PMDWTO); /* SET ADDRESS FOR EXEC WTO */ 00322000 LA RPARM,PMDWTO(,RDUAL) 0301 00323000 * RPARM->MSG2TERM(1:TNTENLEN)=WKTERMN(1:TNTENLEN);/* PLACE TERM 00324000 * NAME IN MSG */ 00325000 SLR @07,@07 0302 00326000 IC @07,TNTENLEN(,IEDQNPTR) 0302 00327000 BCTR @07,0 0302 00328000 EX @07,@SM01272 0302 00329000 * END; 0303 00330000 * 0304 00331000 * /*****************************************************************/ 00332000 * /* */ 00333000 * /* PREPARE AND OUTPUT MESSAGE USING WTO */ 00334000 * /* */ 00335000 * /*****************************************************************/ 00336000 * 0304 00337000 * GEN NOREFS NOSETS; 0304 00338000 @RC00257 DS 0H 0304 00339000 WTO MF=(E,(1)) ISSUE MESSAGE TO SYSTEM CONSOLE 00340000 * LM(REG0,REG14,PMDSAVE); /* RESTORE USERS REGS */ 00341000 LM REG0,REG14,PMDSAVE(RDUAL) 0305 00342000 * END IEDPMD 0306 00343000 * 0306 00344000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00345000 */*%INCLUDE SYSLIB (TAVTD ) */ 00346000 */*%INCLUDE SYSLIB (TBDUD ) */ 00347000 */*%INCLUDE SYSLIB (TPIU0D ) */ 00348000 */*%INCLUDE SYSLIB (TPRFD ) */ 00349000 */*%INCLUDE SYSLIB (TPRUD ) */ 00350000 */*%INCLUDE SYSLIB (TRSPD ) */ 00351000 */*%INCLUDE SYSLIB (TTNTD ) */ 00352000 */*%INCLUDE SYSLIB (TRHD ) */ 00353000 */*%INCLUDE SYSLIB (TTRMD ) */ 00354000 */*%INCLUDE SYSLIB (TTHD ) */ 00355000 * 0306 00356000 * ; 0306 00357000 @EL00001 DS 0H 0306 00358000 @EF00001 DS 0H 0306 00359000 @ER00001 BR @14 0306 00360000 @DATA DS 0H 00361000 @SM01245 MVC WKTERMN(0,RDUAL),TERMNAM(RTERM) 00362000 @SM01252 MVC WKLINEN(0,RDUAL),TERMNAM(RTERM) 00363000 @SM01254 MVC WKDIGITS(0,RDUAL),DIALDIG(RRUDATA) 00364000 @SM01256 MVC WKDIGITS(0,@07),UNIT2DGT(RTERM) 00365000 @SM01258 MVC PMDWTO(0,RDUAL),WTOLIST1 00366000 @SM01260 MVC MSG1TERM(0,RPARM),WKTERMN(RDUAL) 00367000 @SM01262 MVC MSG1LINE(0,RPARM),WKLINEN(RDUAL) 00368000 @SM01264 MVC MSGDIGTS(0,RPARM),WKDIGITS(RDUAL) 00369000 @SM01270 MVC PMDWTO(0,RDUAL),WTOLIST2 00370000 @SM01272 MVC MSG2TERM(0,RPARM),WKTERMN(RDUAL) 00371000 DS 0F 00372000 DS 0F 00373000 @CF00326 DC F'4' 00374000 @CF00070 DC F'6' 00375000 @CF00044 DC F'8' 00376000 @CF00234 DC F'12' 00377000 @CF01251 DC F'-12' 00378000 @CF01244 DC XL4'0000FFFF' 00379000 DS 0D 00380000 @CB01247 DC B'000000000000000000000000000100000000000000000000000000C00381000 00' 00382000 @CB01266 DC B'111111111111111111111111111011111111111111111111111111C00383000 11' 00384000 DS CL2 00385000 WORKDUAL DS CL480 00386000 ORG WORKDUAL 00387000 TCAMWORK DC X'00' 00388000 DC XL239'0' 00389000 OPCTWORK DC X'00' 00390000 DC XL239'0' 00391000 ORG WORKDUAL+480 00392000 INVTIC DC X'08000002' 00393000 IEDPMD CSECT 00394000 WTOLIST1 WTO 'IED434I TERM= LINE= REQUIRES MANUAL *00395000 DIAL,DIGITS= ',ROUTCDE=(8*00396000 ),DESC=3,MF=L 00397000 WTOLIST2 WTO 'IED435I SESSION STARTED FOR TERM= ,MANUALLY D*00398000 IALED',ROUTCDE=(8),DESC=5,MF=L 00399000 IEDPMD CSECT 00400000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00401000 @01 EQU 01 00402000 @02 EQU 02 00403000 @03 EQU 03 00404000 @04 EQU 04 00405000 @05 EQU 05 00406000 @06 EQU 06 00407000 @07 EQU 07 00408000 @08 EQU 08 00409000 @09 EQU 09 00410000 @10 EQU 10 00411000 @11 EQU 11 00412000 @12 EQU 12 00413000 @13 EQU 13 00414000 @14 EQU 14 00415000 @15 EQU 15 00416000 IEDQAPTR EQU @13 00417000 IEDQPPTR EQU @06 00418000 IEDPRUQP EQU @09 00419000 IEDQNPTR EQU @03 00420000 IEDQTPTR EQU @08 00421000 REG0 EQU @00 00422000 RPARM EQU @01 00423000 RDUAL EQU @02 00424000 RWORK EQU @04 00425000 REG5 EQU @05 00426000 REG7 EQU @07 00427000 RTERM EQU @08 00428000 RRUDATA EQU @09 00429000 REG10 EQU @10 00430000 REG11 EQU @11 00431000 RBDU EQU @11 00432000 RBASE EQU @12 00433000 RAVT EQU @13 00434000 REG14 EQU @14 00435000 REG15 EQU @15 00436000 IEDQAVTD EQU 0 00437000 AVTSAVEX EQU IEDQAVTD+216 00438000 @NM00003 EQU IEDQAVTD+316 00439000 AVTCKFLG EQU @NM00003 00440000 AVTBASE EQU IEDQAVTD+340 00441000 AVTPKF EQU AVTBASE 00442000 AVTRNMPT EQU IEDQAVTD+352 00443000 AVTHG02 EQU IEDQAVTD+456 00444000 AVTDISP EQU IEDQAVTD+480 00445000 AVTHD EQU IEDQAVTD+484 00446000 AVTSCOPT EQU AVTHD 00447000 AVTSAVTP EQU IEDQAVTD+540 00448000 AVTSAVTF EQU AVTSAVTP 00449000 AVTCKPEL EQU IEDQAVTD+580 00450000 AVTCKRMV EQU AVTCKPEL 00451000 AVTCKELF EQU IEDQAVTD+608 00452000 AVTCKBYT EQU IEDQAVTD+619 00453000 AVTHG01 EQU IEDQAVTD+620 00454000 AVTCKLNK EQU IEDQAVTD+624 00455000 AVTCRELE EQU IEDQAVTD+636 00456000 AVTCCELE EQU AVTCRELE 00457000 AVTCLRHI EQU IEDQAVTD+644 00458000 AVTADBUF EQU IEDQAVTD+648 00459000 AVTSYSER EQU IEDQAVTD+656 00460000 AVTCKPQB EQU IEDQAVTD+732 00461000 AVTCKPTB EQU AVTCKPQB 00462000 AVTCKPEC EQU AVTCKPQB+4 00463000 AVTCKPCC EQU AVTCKPEC 00464000 AVTOPCQB EQU IEDQAVTD+744 00465000 AVTOPCOB EQU AVTOPCQB 00466000 AVTOPCEC EQU AVTOPCQB+4 00467000 AVTOPCCC EQU AVTOPCEC 00468000 AVTOLTQB EQU IEDQAVTD+756 00469000 AVTCWFL1 EQU IEDQAVTD+852 00470000 AVTCWFL2 EQU IEDQAVTD+853 00471000 AVTSUBT EQU IEDQAVTD+876 00472000 AVTIOTR EQU IEDQAVTD+877 00473000 AVTKEYLE EQU IEDQAVTD+960 00474000 AVTBIT1 EQU IEDQAVTD+978 00475000 AVTBIT2 EQU IEDQAVTD+979 00476000 AVTBIT3 EQU IEDQAVTD+980 00477000 AVTBIT4 EQU IEDQAVTD+1064 00478000 @NM00083 EQU IEDQAVTD+1160 00479000 IEDNSVTD EQU 0 00480000 SAVTDIAG EQU IEDNSVTD 00481000 SAVTDIAF EQU SAVTDIAG 00482000 SAVTLUSQ EQU IEDNSVTD+88 00483000 SAVTTCPU EQU IEDNSVTD+238 00484000 SAVTNAX EQU IEDNSVTD+248 00485000 SAVTZELM EQU IEDNSVTD+270 00486000 SAVTRDRV EQU IEDNSVTD+284 00487000 SAVTCKQB EQU IEDNSVTD+300 00488000 SAVTCKTB EQU SAVTCKQB 00489000 SAVTCKEC EQU SAVTCKQB+4 00490000 SAVTCKCC EQU SAVTCKEC 00491000 IEDBDU EQU 0 00492000 BDUFNFLG EQU IEDBDU+2 00493000 BDUBDUFG EQU IEDBDU+3 00494000 BDURSP EQU IEDBDU+4 00495000 BDUSYRSP EQU BDURSP 00496000 BDUPHASE EQU BDUSYRSP 00497000 BDUEXRSP EQU BDURSP+1 00498000 BDUEND EQU IEDBDU+6 00499000 IEDPIU0 EQU 0 00500000 PIU0TH EQU IEDPIU0 00501000 PIU0RH EQU IEDPIU0+10 00502000 PIU0PAD EQU IEDPIU0+13 00503000 PIU0RU EQU IEDPIU0+14 00504000 IEDQPRF EQU 0 00505000 PRFRCB EQU IEDQPRF 00506000 PRFKEY EQU PRFRCB 00507000 PRFQCBA EQU PRFRCB+1 00508000 PRFPRI EQU PRFRCB+4 00509000 PRFLINK EQU PRFRCB+5 00510000 PRFTIC EQU IEDQPRF+8 00511000 PRFTICC EQU PRFTIC 00512000 PRFNBUNT EQU IEDQPRF+12 00513000 PRFSUNIT EQU PRFNBUNT 00514000 PRFPLQCB EQU PRFSUNIT 00515000 PRFPIUO EQU PRFPLQCB 00516000 @NM00109 EQU IEDQPRF+16 00517000 PRFSVFFO EQU @NM00109 00518000 PRFSTAT1 EQU IEDQPRF+20 00519000 PRFEOFN EQU PRFSTAT1 00520000 PRFCORE EQU IEDQPRF+21 00521000 PRFXTRA EQU PRFCORE 00522000 PRFSCAN EQU IEDQPRF+24 00523000 PRFTQBCK EQU IEDQPRF+26 00524000 PRFNTXT EQU PRFTQBCK 00525000 PRFEOBOF EQU PRFNTXT 00526000 PRFCHDR EQU IEDQPRF+32 00527000 PRFHQBCK EQU IEDQPRF+35 00528000 IEDPF1 EQU 0 00529000 PRF1FLG1 EQU IEDPF1+3 00530000 PRF1WD2 EQU IEDPF1+4 00531000 PRF1SEQP EQU PRF1WD2 00532000 PRF1SQID EQU PRF1SEQP 00533000 PRF1TAG1 EQU PRF1SQID 00534000 IEDPF2 EQU 0 00535000 PRF2FLG2 EQU IEDPF2 00536000 PRF2WD2 EQU IEDPF2+4 00537000 IEDPRUQD EQU 0 00538000 PRUTTCIN EQU IEDPRUQD 00539000 PRUDATCT EQU IEDPRUQD+2 00540000 PRUTIC EQU IEDPRUQD+8 00541000 PRUDATA EQU IEDPRUQD+12 00542000 IEDPRUND EQU 0 00543000 PRURHTH EQU IEDPRUND 00544000 PRURH EQU PRURHTH 00545000 PRURHFG0 EQU PRURH 00546000 PRURHFG1 EQU PRURH+1 00547000 PRURHFG2 EQU PRURH+2 00548000 PRUTH EQU PRURHTH+3 00549000 PRUFIDN EQU PRUTH 00550000 IEDQTNTD EQU 0 00551000 IEDQTCDE EQU IEDQTNTD 00552000 TNTENLEN EQU IEDQTNTD+40 00553000 IEDQTDCE EQU IEDQTNTD+46 00554000 TNTFIRST EQU 0 00555000 IEDTNTA EQU 0 00556000 IEDRH EQU 0 00557000 TRHBYTE0 EQU IEDRH 00558000 TRHBYTE1 EQU IEDRH+1 00559000 TRHBYTE2 EQU IEDRH+2 00560000 IEDQTRM EQU 0 00561000 TRMSTATE EQU IEDQTRM 00562000 TRMLOG EQU TRMSTATE 00563000 TRMINSEQ EQU IEDQTRM+4 00564000 TLISTCNT EQU TRMINSEQ 00565000 TRMOUTSQ EQU IEDQTRM+6 00566000 TLISTEN EQU TRMOUTSQ 00567000 TRMDSORG EQU TLISTEN 00568000 TRMALTD EQU IEDQTRM+8 00569000 TRMDEVFL EQU IEDQTRM+10 00570000 TRMSTAT EQU IEDQTRM+12 00571000 IEDNTRM EQU 0 00572000 TRMBYTE4 EQU IEDNTRM 00573000 TRMBYTE3 EQU IEDNTRM+1 00574000 TRMBYTE2 EQU IEDNTRM+2 00575000 TRMINPG EQU TRMBYTE2 00576000 TRMANDL EQU TRMBYTE2 00577000 TRMBYTE1 EQU IEDNTRM+3 00578000 TRMSCPRQ EQU TRMBYTE1 00579000 TRMBYTE0 EQU IEDNTRM+6 00580000 TRMSIBPT EQU IEDNTRM+7 00581000 IEDTH EQU 0 00582000 TTHBYTE0 EQU IEDTH 00583000 TTHOAF EQU IEDTH+4 00584000 TTHSNF EQU IEDTH+6 00585000 TTHTAG EQU TTHSNF 00586000 TTHTAG1 EQU TTHTAG 00587000 TTHDCF EQU IEDTH+8 00588000 DUALWORK EQU 0 00589000 PMDSAVE EQU DUALWORK 00590000 K EQU DUALWORK+60 00591000 LENDGTS EQU DUALWORK+62 00592000 LENFIRST EQU DUALWORK+64 00593000 LENSEC EQU DUALWORK+66 00594000 PMDWORK EQU DUALWORK+68 00595000 WKTERMN EQU PMDWORK 00596000 WKLINEN EQU PMDWORK+8 00597000 WKDIGITS EQU PMDWORK+16 00598000 PMDWTO EQU DUALWORK+116 00599000 TNTENTRY EQU 0 00600000 TERMNAM EQU TNTENTRY 00601000 TERMAD EQU 0 00602000 MSG1 EQU 0 00603000 MSGID1 EQU MSG1 00604000 M1LEN EQU MSGID1 00605000 MSGPH1 EQU MSG1+4 00606000 MSG1TERM EQU MSGPH1+16 00607000 MSG1LINE EQU MSGPH1+30 00608000 MSGDIGTS EQU MSGPH1+67 00609000 MSG2 EQU 0 00610000 MSGID2 EQU MSG2 00611000 M2LEN EQU MSGID2 00612000 MSGPH3 EQU MSG2+4 00613000 MSG2TERM EQU MSGPH3+35 00614000 RUINFO EQU 0 00615000 NETADDR EQU RUINFO 00616000 DIALDIG EQU RUINFO+2 00617000 IEDIAP03 EQU 0 00618000 TNTCODE EQU 0 00619000 TNTDCODE EQU 0 00620000 TRMPRE1 EQU TRMBYTE4 00621000 TRMNCP1 EQU TRMBYTE4 00622000 TRMPRE EQU TRMBYTE3 00623000 TRMNCP EQU TRMBYTE3 00624000 TRMPU EQU TRMBYTE3 00625000 TRMLU EQU TRMBYTE3 00626000 TRMLINK EQU TRMBYTE3 00627000 UNIT2DGT EQU PRFSUNIT 00628000 BDUTEXT EQU BDUEND 00629000 PRFSHDR EQU IEDQPRF+42 00630000 TRMOPT EQU IEDQTRM+20 00631000 AGO .@UNREFD START UNREFERENCED COMPONENTS 00632000 @NM00137 EQU TRMLINK 00633000 TRMLSTAT EQU TRMLINK 00634000 TRMLINT EQU TRMLINK 00635000 TRMEPMOD EQU TRMLINK 00636000 TRMLULOG EQU TRMLU 00637000 TRMINERR EQU TRMLU 00638000 TRMLUREQ EQU TRMLU 00639000 TRMSESRQ EQU TRMLU 00640000 TRMTDIFF EQU TRMLU 00641000 TRMLUTM EQU TRMLU 00642000 TRMLUIT EQU TRMLU 00643000 TRMAUTO EQU TRMLU 00644000 TRMPCONT EQU TRMPU 00645000 @NM00136 EQU TRMPU 00646000 TRMNCONT EQU TRMNCP 00647000 TRMQUCKN EQU TRMNCP 00648000 TRMSLOWN EQU TRMNCP 00649000 TRMSYGEN EQU TRMNCP 00650000 TRMNCPCL EQU TRMNCP 00651000 TRMIPLDM EQU TRMNCP 00652000 TRMINOUT EQU TRMPRE 00653000 TRMRDOUT EQU TRMPRE 00654000 TRMNLOUT EQU TRMPRE 00655000 TRMWROUT EQU TRMPRE 00656000 TRMASNXI EQU TRMPRE 00657000 TRMSTMM EQU TRMPRE 00658000 TRMCMODE EQU TRMPRE 00659000 TRMSTPND EQU TRMPRE 00660000 @NM00135 EQU TRMNCP1 00661000 TRMINOP EQU TRMNCP1 00662000 TRMLYNCH EQU TRMPRE1 00663000 TRMSPOUT EQU TRMPRE1 00664000 TRMERLCK EQU TRMPRE1 00665000 TRMQNPL EQU TRMPRE1 00666000 TRMSPACT EQU TRMPRE1 00667000 TRMOCNI EQU TRMPRE1 00668000 TRMSESSN EQU TRMPRE1 00669000 TRMCONT EQU TRMPRE1 00670000 @NM00144 EQU MSG2+64 00671000 @NM00143 EQU MSGPH3+59 00672000 M2P2 EQU MSGPH3+43 00673000 M2P1 EQU MSGPH3 00674000 @NM00142 EQU MSGID2+2 00675000 @NM00141 EQU MSG1+91 00676000 M1P3 EQU MSGPH1+38 00677000 M1P2 EQU MSGPH1+24 00678000 M1P1 EQU MSGPH1 00679000 @NM00140 EQU MSGID1+2 00680000 TTHTAG2 EQU TTHTAG+1 00681000 @NM00139 EQU TTHTAG1 00682000 TTHTAGS EQU TTHTAG1 00683000 TTHDAF EQU IEDTH+2 00684000 TTHBYTE1 EQU IEDTH+1 00685000 TTHEFI EQU TTHBYTE0 00686000 @NM00138 EQU TTHBYTE0 00687000 TTHEBIU EQU TTHBYTE0 00688000 TTHBBIU EQU TTHBYTE0 00689000 TTHFTYPE EQU TTHBYTE0 00690000 TRMSUBST EQU IEDNTRM+12 00691000 TRMTYPE EQU IEDNTRM+11 00692000 TRMRLMCT EQU IEDNTRM+10 00693000 TRMCOHTG EQU TRMSIBPT+1 00694000 TRMGPCNT EQU TRMSIBPT 00695000 TRMBUFRD EQU TRMBYTE0 00696000 TRMSNA EQU TRMBYTE0 00697000 TRMGP EQU TRMBYTE0 00698000 TRMDIAL EQU TRMBYTE0 00699000 @NM00134 EQU TRMBYTE0 00700000 TRMOUTPT EQU TRMBYTE0 00701000 TRMINPUT EQU TRMBYTE0 00702000 TRMUDEF EQU TRMBYTE0 00703000 TRMCOHRT EQU IEDNTRM+4 00704000 TRMSTOTE EQU TRMBYTE1 00705000 TRMCKPRN EQU TRMBYTE1 00706000 TRMTSATN EQU TRMBYTE1 00707000 TRMTRACE EQU TRMBYTE1 00708000 TRMSWBCK EQU TRMBYTE1 00709000 TRMAUTOC EQU TRMBYTE1 00710000 TRMINPTP EQU TRMBYTE1 00711000 TRMWTNEG EQU TRMSCPRQ 00712000 TRMWRBRK EQU TRMBYTE2 00713000 TRMNOSND EQU TRMBYTE2 00714000 TRMPREP EQU TRMBYTE2 00715000 TRMGPACT EQU TRMBYTE2 00716000 TRMCLOSN EQU TRMINPG 00717000 TRMREMB EQU TRMBYTE2 00718000 TRMRSACT EQU TRMBYTE2 00719000 TRMOPTBL EQU IEDQTRM+18 00720000 TRMOPNO EQU IEDQTRM+17 00721000 TRMCHCIN EQU IEDQTRM+16 00722000 TRMSENSE EQU TRMSTAT+3 00723000 TRMTEMPR EQU TRMSTAT+2 00724000 TRMSIO EQU TRMSTAT 00725000 @NM00133 EQU TRMDEVFL+1 00726000 TRMTPIN EQU TRMDEVFL+1 00727000 TRMNCPI EQU TRMDEVFL+1 00728000 TRMRNTRM EQU TRMDEVFL+1 00729000 @NM00132 EQU TRMDEVFL+1 00730000 TRMLMD EQU TRMDEVFL+1 00731000 TRMCONC EQU TRMDEVFL+1 00732000 TRMTSOB EQU TRMDEVFL 00733000 TRMBFDY EQU TRMDEVFL 00734000 TRMTBLK EQU TRMDEVFL 00735000 TRMSBLK EQU TRMDEVFL 00736000 TRMBLKS EQU TRMDEVFL 00737000 TRMADDC EQU TRMDEVFL 00738000 TRMDDIG EQU TRMDEVFL 00739000 TRMBUFS EQU TRMDEVFL 00740000 TRMPRILK EQU TRMALTD 00741000 TRMLGB EQU TRMDSORG 00742000 TRMUTERM EQU TLISTCNT 00743000 TRMDESTQ EQU IEDQTRM+1 00744000 TRMSCNYN EQU TRMSTATE 00745000 TRMOPTFN EQU TRMSTATE 00746000 TRMHELDN EQU TRMSTATE 00747000 TRMACPTN EQU TRMSTATE 00748000 TRMPREF EQU TRMSTATE 00749000 TRMPROC EQU TRMLOG 00750000 TRMLIST EQU TRMLOG 00751000 TRMLINE EQU TRMSTATE 00752000 @NM00131 EQU TRHBYTE2 00753000 @NM00130 EQU TRHBYTE2 00754000 @NM00129 EQU TRHBYTE2 00755000 TRHCSI EQU TRHBYTE2 00756000 @NM00128 EQU TRHBYTE2 00757000 TRHCDI EQU TRHBYTE2 00758000 TRHEB EQU TRHBYTE2 00759000 TRHBB EQU TRHBYTE2 00760000 TRHPI EQU TRHBYTE1 00761000 @NM00127 EQU TRHBYTE1 00762000 @NM00126 EQU TRHBYTE1 00763000 @NM00125 EQU TRHBYTE1 00764000 TRHER EQU TRHBYTE1 00765000 TRHDR2 EQU TRHBYTE1 00766000 @NM00124 EQU TRHBYTE1 00767000 TRHDR1 EQU TRHBYTE1 00768000 TRHEC EQU TRHBYTE0 00769000 TRHBC EQU TRHBYTE0 00770000 TRHSDI EQU TRHBYTE0 00771000 TRHFI EQU TRHBYTE0 00772000 @NM00123 EQU TRHBYTE0 00773000 TRHRUCAT EQU TRHBYTE0 00774000 TRHTYPE EQU TRHBYTE0 00775000 TNTTRMAD EQU IEDTNTA 00776000 TNTLEN EQU IEDQTNTD+44 00777000 TNTMIDEN EQU IEDQTNTD+41 00778000 TNTSRCHX EQU IEDQTNTD+38 00779000 @NM00122 EQU IEDPRUND+4 00780000 PRUTHEFI EQU PRUFIDN 00781000 PRUTHUSS EQU PRUFIDN 00782000 PRUTHEIU EQU PRUFIDN 00783000 PRUTHBIU EQU PRUFIDN 00784000 PRUTHTYE EQU PRUFIDN 00785000 @NM00121 EQU PRURHFG2 00786000 PRURHCSI EQU PRURHFG2 00787000 @NM00120 EQU PRURHFG2 00788000 PRURHCDI EQU PRURHFG2 00789000 PRURHEB EQU PRURHFG2 00790000 PRURHBB EQU PRURHFG2 00791000 PRURHPI EQU PRURHFG1 00792000 @NM00119 EQU PRURHFG1 00793000 PRURHER EQU PRURHFG1 00794000 PRURHDR2 EQU PRURHFG1 00795000 @NM00118 EQU PRURHFG1 00796000 PRURHDR1 EQU PRURHFG1 00797000 PRURHEC EQU PRURHFG0 00798000 PRURHBC EQU PRURHFG0 00799000 PRURHSDI EQU PRURHFG0 00800000 PRURHFI EQU PRURHFG0 00801000 @NM00117 EQU PRURHFG0 00802000 PRURUCAT EQU PRURHFG0 00803000 PRURHTYP EQU PRURHFG0 00804000 PRUNUNIT EQU PRUTIC+1 00805000 @NM00116 EQU PRUTIC 00806000 @NM00115 EQU IEDPRUQD+4 00807000 PRF2SEQP EQU PRF2WD2 00808000 @NM00114 EQU IEDPF2+1 00809000 @NM00113 EQU PRF2FLG2 00810000 PRF2SMI EQU PRF2FLG2 00811000 PRF2FORM EQU PRF2FLG2 00812000 PRF2TNTI EQU PRF2FLG2 00813000 PRF1RULN EQU PRF1SEQP+2 00814000 PRF1TAG2 EQU PRF1SQID+1 00815000 @NM00112 EQU PRF1TAG1 00816000 PRF1TAGS EQU PRF1TAG1 00817000 @NM00111 EQU PRF1FLG1 00818000 PRF1LOGD EQU PRF1FLG1 00819000 PRF1USS EQU PRF1FLG1 00820000 PRF1FORM EQU PRF1FLG1 00821000 PRF1EXPI EQU PRF1FLG1 00822000 PRF1FIDI EQU PRF1FLG1 00823000 PRF1RH EQU IEDPF1 00824000 PRFDEST EQU IEDQPRF+40 00825000 PRFISEQ EQU IEDQPRF+38 00826000 PRFSTXT EQU PRFHQBCK 00827000 PRFNHDR EQU PRFCHDR 00828000 PRFCRCD EQU IEDQPRF+29 00829000 PRFSVSEQ EQU PRFNTXT+1 00830000 PRFSVPRI EQU PRFEOBOF 00831000 PRFISIZE EQU PRFSCAN+1 00832000 @NM00110 EQU PRFSCAN 00833000 PRFEOB EQU PRFXTRA+1 00834000 PRFSTSO EQU PRFXTRA 00835000 PRFNHDRN EQU PRFSTAT1 00836000 PRFNLSTN EQU PRFSTAT1 00837000 PRFLOCK EQU PRFEOFN 00838000 PRFDUPLN EQU PRFSTAT1 00839000 PRFTSMSG EQU PRFSTAT1 00840000 PRFITCPN EQU PRFSTAT1 00841000 PRFERMGN EQU PRFSTAT1 00842000 PRFCNCLN EQU PRFSTAT1 00843000 PRFSVFLG EQU @NM00109+3 00844000 PRFSIZE EQU PRFSVFFO+2 00845000 PRFSRCE EQU PRFSVFFO 00846000 PRFLCB EQU IEDQPRF+13 00847000 PRFTI0 EQU PRFTIC+1 00848000 @NM00108 EQU PRFTICC 00849000 @NM00107 EQU PRFTICC 00850000 @NM00106 EQU PRFTICC 00851000 PRFTICON EQU PRFTICC 00852000 @NM00105 EQU PRFTICC 00853000 @NM00104 EQU PRFTICC 00854000 PRFBFMM EQU PRFTICC 00855000 PRFEOMSG EQU PRFTICC 00856000 PRFCOUNT EQU PRFLINK+1 00857000 @NM00103 EQU PRFLINK 00858000 PRFFLAGS EQU PRFPRI 00859000 PRFIOADR EQU PRFQCBA 00860000 PRFOPCDE EQU PRFKEY 00861000 BDUXGRPH EQU BDUEXRSP 00862000 BDUXFINL EQU BDUEXRSP 00863000 BDUXINIT EQU BDUEXRSP 00864000 BDURESP EQU BDUSYRSP 00865000 BDUERROR EQU BDUSYRSP 00866000 BDUXERLK EQU BDUBDUFG 00867000 BDUALTAK EQU BDUFNFLG 00868000 BDUNEGAK EQU BDUFNFLG 00869000 BDUPOSAK EQU BDUFNFLG 00870000 BDUTPTX EQU BDUFNFLG 00871000 BDUFRSTB EQU BDUFNFLG 00872000 BDULEADG EQU BDUFNFLG 00873000 BDUHEADR EQU BDUFNFLG 00874000 BDUSTHDR EQU BDUFNFLG 00875000 BDUMODIF EQU IEDBDU+1 00876000 BDUCMND EQU IEDBDU 00877000 SAVTBITN EQU IEDNSVTD+312 00878000 @NM00102 EQU SAVTCKQB+8 00879000 @NM00101 EQU SAVTCKEC+1 00880000 @NM00100 EQU SAVTCKCC 00881000 SAVTCKPO EQU SAVTCKCC 00882000 SAVTCKWA EQU SAVTCKCC 00883000 SAVTCKCH EQU SAVTCKTB+1 00884000 SAVTCKVT EQU SAVTCKTB 00885000 @NM00099 EQU IEDNSVTD+297 00886000 SAVTRDFG EQU SAVTRDRV+12 00887000 @NM00098 EQU SAVTRDRV+5 00888000 SAVTRDPY EQU SAVTRDRV+4 00889000 SAVTRDQB EQU SAVTRDRV+1 00890000 SAVTRDKY EQU SAVTRDRV 00891000 SAVTNID EQU IEDNSVTD+280 00892000 SAVTDVAS EQU IEDNSVTD+276 00893000 SAVTPLSZ EQU IEDNSVTD+274 00894000 @NM00097 EQU IEDNSVTD+273 00895000 SAVTSUBL EQU IEDNSVTD+272 00896000 @NM00096 EQU SAVTZELM+1 00897000 SAVTSUBM EQU SAVTZELM 00898000 SAVTMHDX EQU IEDNSVTD+268 00899000 SAVTNAT1 EQU IEDNSVTD+266 00900000 SAVTSH20 EQU IEDNSVTD+264 00901000 SAVTLCBS EQU IEDNSVTD+260 00902000 SAVTRNMP EQU IEDNSVTD+256 00903000 SAVTTNTX EQU IEDNSVTD+252 00904000 SAVTSUBV EQU IEDNSVTD+247 00905000 SAVTSUBA EQU IEDNSVTD+246 00906000 SAVTSIBC EQU IEDNSVTD+244 00907000 SAVTBSM EQU IEDNSVTD+240 00908000 SAVTSCPT EQU SAVTTCPU 00909000 SAVTRQTG EQU IEDNSVTD+236 00910000 SAVTRQCH EQU IEDNSVTD+232 00911000 SAVTMAND EQU IEDNSVTD+228 00912000 SAVTSPLN EQU IEDNSVTD+224 00913000 SAVTNADL EQU IEDNSVTD+222 00914000 SAVTNATL EQU IEDNSVTD+220 00915000 SAVTMHTB EQU IEDNSVTD+216 00916000 SAVTSSMH EQU IEDNSVTD+212 00917000 SAVTQRS EQU IEDNSVTD+208 00918000 SAVTRQIN EQU IEDNSVTD+204 00919000 SAVTDFCO EQU IEDNSVTD+200 00920000 SAVTSAO EQU IEDNSVTD+196 00921000 SAVTSARI EQU IEDNSVTD+192 00922000 SAVTSAC EQU IEDNSVTD+188 00923000 SAVTSAI EQU IEDNSVTD+184 00924000 SAVTCSCI EQU IEDNSVTD+180 00925000 SAVTSSRP EQU IEDNSVTD+176 00926000 SAVTSSRQ EQU IEDNSVTD+172 00927000 SAVTSCLU EQU IEDNSVTD+168 00928000 SAVTXTRQ EQU IEDNSVTD+164 00929000 SAVTMVBF EQU IEDNSVTD+160 00930000 @NM00095 EQU IEDNSVTD+148 00931000 SAVTIPCQ EQU IEDNSVTD+144 00932000 @NM00094 EQU IEDNSVTD+136 00933000 SAVTXFMI EQU IEDNSVTD+132 00934000 @NM00093 EQU IEDNSVTD+124 00935000 SAVTXFMO EQU IEDNSVTD+120 00936000 @NM00092 EQU IEDNSVTD+116 00937000 SAVTSSSR EQU IEDNSVTD+112 00938000 SAVTSCPQ EQU IEDNSVTD+108 00939000 SAVTSLCB EQU IEDNSVTD+104 00940000 SAVTLUSR EQU IEDNSVTD+100 00941000 @NM00091 EQU SAVTLUSQ+8 00942000 SAVTLUSP EQU SAVTLUSQ+4 00943000 SAVTLUSB EQU SAVTLUSQ 00944000 @NM00090 EQU IEDNSVTD+84 00945000 SAVTSAT EQU IEDNSVTD+80 00946000 SAVTNAT EQU IEDNSVTD+76 00947000 SAVTCLUP EQU IEDNSVTD+72 00948000 SAVTPIUT EQU IEDNSVTD+68 00949000 SAVTRNTA EQU IEDNSVTD+64 00950000 SAVTDNIR EQU IEDNSVTD+60 00951000 SAVTCNIR EQU IEDNSVTD+56 00952000 SAVTFLDH EQU IEDNSVTD+52 00953000 SAVTSRTN EQU IEDNSVTD+48 00954000 SAVTSREQ EQU IEDNSVTD+44 00955000 SAVTFAIL EQU IEDNSVTD+42 00956000 SAVTSUSE EQU IEDNSVTD+40 00957000 SAVTSIB EQU IEDNSVTD+36 00958000 SAVTPRTN EQU IEDNSVTD+32 00959000 @NM00089 EQU IEDNSVTD+28 00960000 SAVTWH20 EQU IEDNSVTD+26 00961000 SAVTPWT EQU IEDNSVTD+24 00962000 SAVTPRTQ EQU IEDNSVTD+20 00963000 SAVTPREQ EQU IEDNSVTD+16 00964000 SAVTPH20 EQU IEDNSVTD+14 00965000 SAVTPUSE EQU IEDNSVTD+12 00966000 SAVTPLCB EQU IEDNSVTD+8 00967000 SAVTPOOL EQU IEDNSVTD+4 00968000 SAVTPRMT EQU SAVTDIAF 00969000 SAVTVIRT EQU SAVTDIAF 00970000 AVTCPBNO EQU IEDQAVTD+1172 00971000 AVTHRESS EQU IEDQAVTD+1171 00972000 @NM00088 EQU IEDQAVTD+1170 00973000 @NM00087 EQU IEDQAVTD+1169 00974000 @NM00086 EQU IEDQAVTD+1168 00975000 @NM00085 EQU IEDQAVTD+1165 00976000 @NM00084 EQU IEDQAVTD+1164 00977000 AVTHRESE EQU @NM00083 00978000 AVTRADDR EQU IEDQAVTD+1156 00979000 AVTNADDR EQU IEDQAVTD+1152 00980000 AVTHRESN EQU IEDQAVTD+1148 00981000 AVTVOLRN EQU IEDQAVTD+1144 00982000 AVTTOTNN EQU IEDQAVTD+1140 00983000 AVTTRCYN EQU IEDQAVTD+1136 00984000 AVTRCTRN EQU IEDQAVTD+1132 00985000 AVTNOVON EQU IEDQAVTD+1128 00986000 AVTADEBN EQU IEDQAVTD+1124 00987000 AVTVOLRR EQU IEDQAVTD+1120 00988000 AVTTOTNR EQU IEDQAVTD+1116 00989000 AVTTRCYR EQU IEDQAVTD+1112 00990000 AVTRCTRR EQU IEDQAVTD+1108 00991000 AVTNOVOR EQU IEDQAVTD+1104 00992000 AVTADEBR EQU IEDQAVTD+1100 00993000 AVTLODPT EQU IEDQAVTD+1096 00994000 AVTIOBN EQU IEDQAVTD+1092 00995000 AVTIOBR EQU IEDQAVTD+1088 00996000 AVTCPBPT EQU IEDQAVTD+1084 00997000 AVTFCPB EQU IEDQAVTD+1080 00998000 @NM00082 EQU IEDQAVTD+1076 00999000 AVTINCPQ EQU IEDQAVTD+1072 01000000 @NM00081 EQU IEDQAVTD+1068 01001000 @NM00080 EQU IEDQAVTD+1065 01002000 @NM00079 EQU AVTBIT4 01003000 @NM00078 EQU AVTBIT4 01004000 @NM00077 EQU AVTBIT4 01005000 @NM00076 EQU AVTBIT4 01006000 @NM00075 EQU AVTBIT4 01007000 @NM00074 EQU AVTBIT4 01008000 @NM00073 EQU AVTBIT4 01009000 AVTRUFTN EQU AVTBIT4 01010000 @NM00072 EQU IEDQAVTD+1060 01011000 AVTNOBFQ EQU IEDQAVTD+1056 01012000 @NM00071 EQU IEDQAVTD+1052 01013000 AVTDKENQ EQU IEDQAVTD+1048 01014000 @NM00070 EQU IEDQAVTD+1044 01015000 AVTDKAPQ EQU IEDQAVTD+1040 01016000 AVTCOPY EQU IEDQAVTD+1036 01017000 AVTIA EQU IEDQAVTD+1032 01018000 AVTFL EQU IEDQAVTD+1028 01019000 @NM00069 EQU IEDQAVTD+1024 01020000 AVTNCPBQ EQU IEDQAVTD+1020 01021000 AVTTOTNC EQU IEDQAVTD+1016 01022000 AVTCMAX EQU IEDQAVTD+1012 01023000 AVTCMIN EQU IEDQAVTD+1008 01024000 AVTHM02 EQU IEDQAVTD+1004 01025000 AVTOPCIN EQU IEDQAVTD+1002 01026000 AVTDCTLN EQU IEDQAVTD+1000 01027000 AVTOPMSK EQU IEDQAVTD+996 01028000 AVTDDFT EQU IEDQAVTD+992 01029000 AVTSTEAL EQU IEDQAVTD+988 01030000 AVTOPTN EQU IEDQAVTD+984 01031000 AVTDSKCT EQU IEDQAVTD+982 01032000 AVTCKRST EQU IEDQAVTD+981 01033000 AVTSTAN EQU AVTBIT3 01034000 AVTSTACN EQU AVTBIT3 01035000 AVTSTAIN EQU AVTBIT3 01036000 AVTSTAYN EQU AVTBIT3 01037000 AVTOLTBN EQU AVTBIT3 01038000 AVTTSAB EQU AVTBIT3 01039000 AVTRFULN EQU AVTBIT3 01040000 AVTRECVN EQU AVTBIT3 01041000 @NM00068 EQU AVTBIT2 01042000 @NM00067 EQU AVTBIT2 01043000 AVTOPEIN EQU AVTBIT2 01044000 AVTSTRTN EQU AVTBIT2 01045000 AVTTOPOL EQU AVTBIT2 01046000 AVTCOPYN EQU AVTBIT2 01047000 AVTREUSN EQU AVTBIT2 01048000 AVTEXTSC EQU AVTBIT2 01049000 AVTDISKN EQU AVTBIT1 01050000 AVTQUCKN EQU AVTBIT1 01051000 AVTCLOSN EQU AVTBIT1 01052000 AVTREADN EQU AVTBIT1 01053000 AVTDLAYN EQU AVTBIT1 01054000 AVTAQTAN EQU AVTBIT1 01055000 AVTTSON EQU AVTBIT1 01056000 AVTAPLKN EQU AVTBIT1 01057000 AVTDUMBR EQU IEDQAVTD+976 01058000 AVTDLQX EQU IEDQAVTD+974 01059000 AVTINTLV EQU IEDQAVTD+972 01060000 AVTSMCNT EQU IEDQAVTD+970 01061000 AVTAVFCT EQU IEDQAVTD+968 01062000 AVTOPCON EQU IEDQAVTD+966 01063000 AVTOPCNT EQU IEDQAVTD+964 01064000 AVTLNCNT EQU IEDQAVTD+962 01065000 AVTHA16 EQU IEDQAVTD+958 01066000 AVTHA7 EQU IEDQAVTD+956 01067000 AVTHA4 EQU IEDQAVTD+954 01068000 AVTHA3 EQU IEDQAVTD+952 01069000 AVTHA2 EQU IEDQAVTD+950 01070000 AVTGETMS EQU IEDQAVTD+949 01071000 @NM00066 EQU IEDQAVTD+948 01072000 AVTGETMD EQU IEDQAVTD+944 01073000 AVTGETMN EQU IEDQAVTD+940 01074000 AVTCWTOT EQU IEDQAVTD+936 01075000 AVTCWINT EQU IEDQAVTD+884 01076000 AVTDTRAP EQU IEDQAVTD+880 01077000 @NM00065 EQU IEDQAVTD+878 01078000 @NM00064 EQU AVTIOTR 01079000 AVTIOTRH EQU AVTIOTR 01080000 AVTIOTRE EQU AVTIOTR 01081000 @NM00063 EQU AVTSUBT 01082000 AVTSUBPT EQU AVTSUBT 01083000 AVTSUBON EQU AVTSUBT 01084000 AVTAFE30 EQU IEDQAVTD+872 01085000 AVTAFE20 EQU IEDQAVTD+868 01086000 AVTAFE10 EQU IEDQAVTD+864 01087000 AVTCWEC2 EQU IEDQAVTD+860 01088000 AVTCWPM2 EQU IEDQAVTD+856 01089000 AVTCWTS2 EQU IEDQAVTD+855 01090000 AVTCWTS1 EQU IEDQAVTD+854 01091000 AVTCWCLD EQU AVTCWFL2 01092000 AVTCWRAP EQU AVTCWFL2 01093000 @NM00062 EQU AVTCWFL2 01094000 @NM00061 EQU AVTCWFL2 01095000 @NM00060 EQU AVTCWFL2 01096000 @NM00059 EQU AVTCWFL2 01097000 @NM00058 EQU AVTCWFL2 01098000 AVTCWACT EQU AVTCWFL2 01099000 @NM00057 EQU AVTCWFL1 01100000 @NM00056 EQU AVTCWFL1 01101000 @NM00055 EQU AVTCWFL1 01102000 @NM00054 EQU AVTCWFL1 01103000 @NM00053 EQU AVTCWFL1 01104000 @NM00052 EQU AVTCWFL1 01105000 @NM00051 EQU AVTCWFL1 01106000 AVTCOMWN EQU AVTCWFL1 01107000 AVTCWEC1 EQU IEDQAVTD+848 01108000 AVTCWPM1 EQU IEDQAVTD+844 01109000 AVTCAREA EQU IEDQAVTD+840 01110000 AVTFZERO EQU IEDQAVTD+836 01111000 AVTCADDR EQU IEDQAVTD+832 01112000 AVTCOREC EQU IEDQAVTD+828 01113000 @NM00050 EQU IEDQAVTD+820 01114000 AVTCPBCB EQU IEDQAVTD+816 01115000 @NM00049 EQU IEDQAVTD+808 01116000 AVTDSIOB EQU IEDQAVTD+804 01117000 @NM00048 EQU IEDQAVTD+796 01118000 AVTCPRMB EQU IEDQAVTD+792 01119000 @NM00047 EQU IEDQAVTD+784 01120000 AVTCLOSB EQU IEDQAVTD+780 01121000 @NM00046 EQU IEDQAVTD+772 01122000 AVTACTIB EQU IEDQAVTD+768 01123000 @NM00045 EQU IEDQAVTD+764 01124000 AVTOLTEB EQU IEDQAVTD+760 01125000 AVTOLTCH EQU AVTOLTQB+1 01126000 AVTOLTVT EQU AVTOLTQB 01127000 @NM00044 EQU AVTOPCQB+8 01128000 @NM00043 EQU AVTOPCEC+1 01129000 @NM00042 EQU AVTOPCCC 01130000 AVTOPCPO EQU AVTOPCCC 01131000 AVTOPCWA EQU AVTOPCCC 01132000 AVTOPCCH EQU AVTOPCOB+1 01133000 AVTOPCVT EQU AVTOPCOB 01134000 @NM00041 EQU AVTCKPQB+9 01135000 AVTCKPTS EQU AVTCKPQB+8 01136000 @NM00040 EQU AVTCKPEC+1 01137000 @NM00039 EQU AVTCKPCC 01138000 AVTCKPPO EQU AVTCKPCC 01139000 AVTCKPWA EQU AVTCKPCC 01140000 AVTCKPCH EQU AVTCKPTB+1 01141000 AVTCKPVT EQU AVTCKPTB 01142000 @NM00038 EQU IEDQAVTD+724 01143000 AVTBFRTB EQU IEDQAVTD+720 01144000 @NM00037 EQU IEDQAVTD+712 01145000 AVTBFREB EQU IEDQAVTD+708 01146000 AVTTIMQ EQU IEDQAVTD+704 01147000 @NM00036 EQU IEDQAVTD+700 01148000 AVTIMQPS EQU IEDQAVTD+696 01149000 AVTINOUT EQU IEDQAVTD+694 01150000 AVTREFTM EQU IEDQAVTD+692 01151000 @NM00035 EQU IEDQAVTD+680 01152000 AVTDELYB EQU IEDQAVTD+676 01153000 AVTOCQPT EQU IEDQAVTD+672 01154000 AVTTSOPT EQU IEDQAVTD+668 01155000 AVTSUPPT EQU IEDQAVTD+664 01156000 AVTCBQCB EQU IEDQAVTD+660 01157000 AVTMSGS EQU IEDQAVTD+657 01158000 @NM00034 EQU AVTSYSER 01159000 @NM00033 EQU AVTSYSER 01160000 @NM00032 EQU AVTSYSER 01161000 @NM00031 EQU AVTSYSER 01162000 @NM00030 EQU AVTSYSER 01163000 @NM00029 EQU AVTSYSER 01164000 AVTCMAXN EQU AVTSYSER 01165000 AVTCMINN EQU AVTSYSER 01166000 AVT2260L EQU IEDQAVTD+652 01167000 AVTABEPL EQU AVTADBUF 01168000 AVTHFF EQU AVTCLRHI+2 01169000 @NM00028 EQU AVTCLRHI 01170000 AVTCCLNK EQU AVTCRELE+5 01171000 AVTCCPRI EQU AVTCRELE+4 01172000 AVTCCQCB EQU AVTCCELE+1 01173000 AVTCCKEY EQU AVTCCELE 01174000 AVTDELAD EQU IEDQAVTD+632 01175000 AVTDELEM EQU IEDQAVTD+628 01176000 AVTBSX EQU AVTCKLNK 01177000 AVTOPETR EQU AVTHG01 01178000 @NM00027 EQU AVTCKBYT 01179000 AVTCKONQ EQU AVTCKBYT 01180000 @NM00026 EQU AVTCKBYT 01181000 @NM00025 EQU AVTCKBYT 01182000 @NM00024 EQU AVTCKBYT 01183000 @NM00023 EQU AVTCKBYT 01184000 @NM00022 EQU AVTCKBYT 01185000 @NM00021 EQU AVTCKBYT 01186000 AVTOPERT EQU IEDQAVTD+618 01187000 AVTOPXCL EQU IEDQAVTD+616 01188000 AVTOPERL EQU IEDQAVTD+615 01189000 @NM00020 EQU IEDQAVTD+614 01190000 AVTCKTIM EQU IEDQAVTD+612 01191000 AVTCKELV EQU IEDQAVTD+610 01192000 AVTCPRCD EQU IEDQAVTD+609 01193000 AVTWARMN EQU AVTCKELF 01194000 AVTCRTLN EQU AVTCKELF 01195000 AVTCPIPN EQU AVTCKELF 01196000 AVTCCLCN EQU AVTCKELF 01197000 AVTCINCN EQU AVTCKELF 01198000 @NM00019 EQU AVTCKELF 01199000 AVTCMCPN EQU AVTCKELF 01200000 AVTCRDYN EQU AVTCKELF 01201000 AVTCKQAD EQU IEDQAVTD+605 01202000 AVTSCBSZ EQU IEDQAVTD+604 01203000 @NM00018 EQU IEDQAVTD+600 01204000 AVTCKELE EQU IEDQAVTD+596 01205000 @NM00017 EQU AVTCKPEL+8 01206000 AVTCKRLK EQU AVTCKPEL+5 01207000 AVTCKRPR EQU AVTCKPEL+4 01208000 AVTCKRMQ EQU AVTCKRMV+1 01209000 AVTCKRKY EQU AVTCKRMV 01210000 AVTHK EQU IEDQAVTD+576 01211000 AVTHI EQU IEDQAVTD+572 01212000 AVTIOT EQU IEDQAVTD+568 01213000 AVTNX EQU IEDQAVTD+564 01214000 AVTTONE EQU IEDQAVTD+560 01215000 AVTA3TL EQU IEDQAVTD+556 01216000 AVTDMECB EQU IEDQAVTD+552 01217000 AVTABEND EQU IEDQAVTD+546 01218000 AVTPLCBN EQU IEDQAVTD+544 01219000 @NM00016 EQU AVTSAVTP+1 01220000 @NM00015 EQU AVTSAVTF 01221000 AVTSNA EQU AVTSAVTF 01222000 AVTONSNA EQU AVTSAVTF 01223000 AVTVTMCP EQU AVTSAVTF 01224000 @NM00014 EQU IEDQAVTD+536 01225000 AVTCMBSS EQU IEDQAVTD+532 01226000 AVTRCV EQU IEDQAVTD+528 01227000 AVTSEND EQU IEDQAVTD+524 01228000 AVTCSCH EQU IEDQAVTD+520 01229000 AVTQ1 EQU IEDQAVTD+516 01230000 AVTE7 EQU IEDQAVTD+512 01231000 AVTHB EQU IEDQAVTD+508 01232000 AVTR1 EQU IEDQAVTD+504 01233000 AVTBZ EQU IEDQAVTD+500 01234000 AVTEZ EQU IEDQAVTD+496 01235000 AVTEC EQU IEDQAVTD+492 01236000 AVTEW EQU IEDQAVTD+488 01237000 AVTNDIAL EQU AVTSCOPT 01238000 AVTN2741 EQU AVTSCOPT 01239000 AVTCONCO EQU AVTSCOPT 01240000 AVTCONC EQU AVTSCOPT 01241000 AVTCMBUF EQU AVTSCOPT 01242000 AVTAPDMP EQU AVTSCOPT 01243000 @NM00013 EQU AVTSCOPT 01244000 AVTHA EQU AVTDISP 01245000 AVTEA EQU IEDQAVTD+476 01246000 AVTAX EQU IEDQAVTD+472 01247000 AVTA3 EQU IEDQAVTD+468 01248000 AVTGD EQU IEDQAVTD+464 01249000 AVTAL EQU IEDQAVTD+460 01250000 AVTOLTST EQU AVTHG02 01251000 AVTE8 EQU IEDQAVTD+452 01252000 AVTUI EQU IEDQAVTD+448 01253000 AVTCOMPT EQU IEDQAVTD+444 01254000 AVTCRSRF EQU IEDQAVTD+440 01255000 @NM00012 EQU IEDQAVTD+436 01256000 AVTKA02 EQU IEDQAVTD+432 01257000 AVTOPTPT EQU IEDQAVTD+428 01258000 AVTPCBPT EQU IEDQAVTD+424 01259000 AVTOSECB EQU IEDQAVTD+420 01260000 AVTOPECA EQU IEDQAVTD+416 01261000 AVTOLECA EQU IEDQAVTD+412 01262000 AVTCKECA EQU IEDQAVTD+408 01263000 AVTCWECA EQU IEDQAVTD+404 01264000 AVTCWTCB EQU IEDQAVTD+400 01265000 AVTOLTCB EQU IEDQAVTD+396 01266000 AVTOCTCB EQU IEDQAVTD+392 01267000 AVTCKTCB EQU IEDQAVTD+388 01268000 AVTAS EQU IEDQAVTD+384 01269000 AVTNOLBF EQU IEDQAVTD+382 01270000 AVTNCKPR EQU IEDQAVTD+381 01271000 AVTCIB EQU IEDQAVTD+380 01272000 AVTSPLPT EQU IEDQAVTD+376 01273000 AVTMVBFR EQU IEDQAVTD+372 01274000 AVTSBTA EQU IEDQAVTD+368 01275000 AVTRARTN EQU IEDQAVTD+364 01276000 AVTBSCAN EQU IEDQAVTD+360 01277000 AVTRDYA EQU IEDQAVTD+356 01278000 AVTDISTR EQU IEDQAVTD+348 01279000 AVTPARM3 EQU IEDQAVTD+344 01280000 @NM00011 EQU AVTPKF 01281000 @NM00010 EQU AVTPKF 01282000 @NM00009 EQU AVTPKF 01283000 AVTFTCHF EQU AVTPKF 01284000 @NM00008 EQU AVTPKF 01285000 @NM00007 EQU AVTPKF 01286000 @NM00006 EQU AVTPKF 01287000 @NM00005 EQU AVTPKF 01288000 AVTPARM EQU IEDQAVTD+336 01289000 AVTEXS2A EQU IEDQAVTD+330 01290000 AVTEXA2S EQU IEDQAVTD+324 01291000 AVTOCGET EQU IEDQAVTD+320 01292000 AVTCKAVT EQU @NM00003+1 01293000 @NM00004 EQU AVTCKFLG 01294000 AVTCKHLT EQU AVTCKFLG 01295000 AVTCKREQ EQU AVTCKFLG 01296000 AVTCKENV EQU AVTCKFLG 01297000 AVTCKNAC EQU AVTCKFLG 01298000 AVTCKTAC EQU AVTCKFLG 01299000 @NM00002 EQU IEDQAVTD+312 01300000 AVTREADD EQU IEDQAVTD+308 01301000 AVTREADY EQU IEDQAVTD+304 01302000 AVTRACE EQU IEDQAVTD+300 01303000 AVTTCB EQU IEDQAVTD+296 01304000 AVTPASWD EQU IEDQAVTD+288 01305000 AVTCTLCH EQU IEDQAVTD+280 01306000 AVTDOUBL EQU IEDQAVTD+272 01307000 AVTDOUBX EQU IEDQAVTD+264 01308000 AVTDPARM EQU IEDQAVTD+260 01309000 AVTCSTCS EQU IEDQAVTD+256 01310000 AVTDLQ EQU AVTSAVEX+32 01311000 @NM00001 EQU AVTSAVEX 01312000 AVTSAVE4 EQU IEDQAVTD+144 01313000 AVTSAVE3 EQU IEDQAVTD+72 01314000 AVTSAVE2 EQU IEDQAVTD 01315000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 01316000 @ENDDATA EQU * 01317000 END IEDPMD,(C'PLS0317',0701,77033) 01318000