TITLE 'IGC0D10D, OPERATOR CONTROL MESSAGE MODULE *00001000 ' 00002000 IGC0D10D CSECT , 0001 00003000 @PROLOG BALR @12,0 0001 00004000 @PSTART DS 0H 0001 00005000 USING @PSTART,@12 0001 00006000 * /* @Y17XARM*/ 00007000 * /* @Y17XARM 00008000 IGC0D10D IEDHJN AFTERHJN,HJN MODULE IDENTIFICATION Y07689 00009000 * GOTO BASE; 0190 00010000 B BASE 0190 00011000 *INSERT: /* Y06328*/ 00012000 * RFY 0191 00013000 * R14 RSTD; /* @YM03718*/ 00014000 INSERT DS 0H 0192 00015000 * RRETN=R14; /* SAVE RETURN ADDR Y06328*/ 00016000 LR RRETN,R14 0192 00017000 * RFY 0193 00018000 * R14 UNRSTD; /* @YM03718*/ 00019000 * BUFBASE=ADDR(PRUDATA); /* BDU BASE POINTER @ZM47886*/ 00020000 L @10,OCUNIT(,ROPCE) 0194 00021000 LA @10,PRUDATA(,@10) 0194 00022000 STCM @10,7,BUFBASE(ROPCAVT) 0194 00023000 * RWORK2=RWORKA+64; /* OFFSET FOR STRUCTURE OVERLAY 00024000 * @ZM46676*/ 00025000 LA RWORK2,64 0195 00026000 ALR RWORK2,RWORKA 0195 00027000 * WORKBYTE=BTUTEXT/16; /* GET FIRST HEX DIGIT Y06328*/ 00028000 SLR @15,@15 0196 00029000 IC @15,BTUTEXT(,@10) 0196 00030000 LR @10,@15 0196 00031000 SRL @10,4 0196 00032000 STC @10,WORKBYTE(,ROPCAVT) 0196 00033000 * NAMRLN(2)=EBCDIC(WORKBYTE+1); /* CONVERT IT Y06328*/ 00034000 LA @14,EBCDIC(@10) 0197 00035000 MVC NAMRLN+1(1,RWORK2),0(@14) 0197 00036000 * WORKBYTE=BTUTEXT//16; /* GET SECOND HEX DIGIT Y06328*/ 00037000 LR @14,@15 0198 00038000 SRA @14,31 0198 00039000 D @14,@CF00170 0198 00040000 STC @14,WORKBYTE(,ROPCAVT) 0198 00041000 * NAMRLN(3)=EBCDIC(WORKBYTE+1); /* CONVERT IT Y06328*/ 00042000 LA @10,EBCDIC(@14) 0199 00043000 MVC NAMRLN+2(1,RWORK2),0(@10) 0199 00044000 * GOTO RTN; /* RETURN Y06328*/ 00045000 B RTN 0200 00046000 *CONVERT: 0201 00047000 * RFY 0201 00048000 * R14 RSTD; /* @YM03718*/ 00049000 CONVERT DS 0H 0202 00050000 * RRETN=R14; /* SAVE RETURN ADDR Y06328*/ 00051000 LR RRETN,R14 0202 00052000 * RFY 0203 00053000 * R14 UNRSTD; /* @YM03718*/ 00054000 * RCONVERT=OCRLN; /* PICK UP RLN */ 00055000 SLR RCONVERT,RCONVERT 0204 00056000 IC RCONVERT,OCRLN(,ROPCE) 0204 00057000 * IF OCRLN>'00'X /* IF THERE A RLN */ 00058000 * THEN /* THEN */ 00059000 CLI OCRLN(ROPCE),0 0205 00060000 BNH @RF00205 0205 00061000 * DO; 0206 00062000 *CONVERT1: 0207 00063000 * GEN REFS(RCONVERT,ROPCAVT,RWORK2) SETS(OPCDOUBL,NAMRLN); 0207 00064000 CONVERT1 DS 0H 0207 00065000 * /* @Y17XARM*/ 00066000 CVD RCONVERT,OPCDOUBL(ROPCAVT) /* CONVERT THE RELATIVE */ 00067000 UNPK NAMRLN(3,RWORK2),OPCDOUBL+6(2,ROPCAVT) /* RLN */ 00068000 OI NAMRLN+2(RWORK2),X'F0' /* AND PLACE IN MESSAGE */ 00069000 * END; 0208 00070000 * ELSE 0209 00071000 * NAMRLN='ALL'; /* ELSE PLACE ALL */ 00072000 B @RC00205 0209 00073000 @RF00205 MVC NAMRLN(3,RWORK2),@CC01349 0209 00074000 *RTN: /* Y06328*/ 00075000 * RFY 0210 00076000 * R14 RSTD; /* @YM03718*/ 00077000 @RC00205 DS 0H 0210 00078000 RTN DS 0H 0211 00079000 * R14=RRETN; /* RESTORE RETURN REG Y06328*/ 00080000 LR R14,RRETN 0211 00081000 * RETURN; 0212 00082000 @EL00001 DS 0H 0212 00083000 @EF00001 DS 0H 0212 00084000 @ER00001 BR @14 0212 00085000 * RFY 0213 00086000 * R14 UNRSTD; /* @YM03718*/ 00087000 *BASE: 0214 00088000 * RMSGNO=RZERO; /* PICK UP PASSED MSG NO. */ 00089000 BASE LR RMSGNO,RZERO 0214 00090000 * RFY 0215 00091000 * RZERO UNRSTD; /* @Y17XARM*/ 00092000 * ROPCAVT=RPARM; /* BASE FOR OP CONTROL AVT */ 00093000 LR ROPCAVT,RPARM 0216 00094000 * RFY 0217 00095000 * RPARM UNRSTD; /* @Y17XARM*/ 00096000 * IEDQAPTR=OPCAVTPT; /* BASE FOR TCAM AVT */ 00097000 L IEDQAPTR,OPCAVTPT(,ROPCAVT) 0218 00098000 * ROPCE=OPCCOPCE; /* GET ELEMENT POINTER */ 00099000 L ROPCE,OPCCOPCE(,ROPCAVT) 0219 00100000 * RWORKA=OPCWORK; /* ADDRESS OF WORK AREA */ 00101000 L RWORKA,OPCWORK(,ROPCAVT) 0220 00102000 * OPCMODID='0G'; /* SET UP FOR NEXT MODULE 0221 00103000 * @Y17XARM*/ 00104000 MVC OPCMODID(2,ROPCAVT),@CC01352 0221 00105000 * RMSGPT=ADDR(ERRORTAB); /* LOAD ADDR MSG TABLE */ 00106000 LA RMSGPT,ERRORTAB 0222 00107000 *LOCATMSG: 0223 00108000 * IF TABEND=ERREND /* IS THIS THE END OF TABLE */ 00109000 * THEN 0223 00110000 LOCATMSG CLC TABEND(1,RMSGPT),ERREND 0223 00111000 BNE @RF00223 0223 00112000 * DO; 0224 00113000 * END; 0225 00114000 * ELSE 0226 00115000 * DO; 0226 00116000 B @RC00223 0226 00117000 @RF00223 DS 0H 0227 00118000 * IF TABMSGNO^=RMSGNO /* IS THIS THE PROPER MSG */ 00119000 * THEN 0227 00120000 CH RMSGNO,TABMSGNO(,RMSGPT) 0227 00121000 BE @RF00227 0227 00122000 * DO; 0228 00123000 * RMSGPT=RMSGPT+4; /* IF NOT PROPER MSG ADV */ 00124000 AL RMSGPT,@CF00331 0229 00125000 * GOTO LOCATMSG; /* KEEP LOOKING */ 00126000 B LOCATMSG 0230 00127000 * END; 0231 00128000 * RMSGPT=TABMSGAD; /* PICK UP MSG OFFSET */ 00129000 @RF00227 LH RMSGPT,TABMSGAD(,RMSGPT) 0232 00130000 * RMSGPT=RMSGPT+ADDR(BASE); /* ADD BASE TO OFFSET */ 00131000 LA @10,BASE 0233 00132000 ALR RMSGPT,@10 0233 00133000 * WORLEN=MSGLEN; /* MOVE MSG LEN TO WORKAREA */ 00134000 SLR @10,@10 0234 00135000 IC @10,MSGLEN(,RMSGPT) 0234 00136000 STH @10,WORLEN(,RWORKA) 0234 00137000 * WORMSGAR=MSGSTART(1:MSGLEN);/* MSG TO WORKAREA */ 00138000 MVI WORMSGAR+1(RWORKA),C' ' 0235 00139000 MVC WORMSGAR+2(118,RWORKA),WORMSGAR+1(RWORKA) 0235 00140000 BCTR @10,0 0235 00141000 EX @10,@SM01359 0235 00142000 * IF MSGOFFST>'00'X /* IS AN INSERT NEEDED? */ 00143000 * THEN /* IF YES, */ 00144000 CLI MSGOFFST(RMSGPT),0 0236 00145000 BNH @RF00236 0236 00146000 * DO; 0237 00147000 * RWORK2=RWORKA+MSGOFFST+3;/* INSERT BS */ 00148000 LR RWORK2,RWORKA 0238 00149000 SLR @10,@10 0238 00150000 IC @10,MSGOFFST(,RMSGPT) 0238 00151000 ALR RWORK2,@10 0238 00152000 AL RWORK2,@CF00067 0238 00153000 * IF MSGOFFST>128 /* DOES MSG HAVE AN RLN? */ 00154000 * THEN /* IF YES, */ 00155000 CLI MSGOFFST(RMSGPT),128 0239 00156000 BNH @RF00239 0239 00157000 * DO; 0240 00158000 * RWORK2=RWORK2-128; /* CORRECT INSERT */ 00159000 SL RWORK2,@CF01355 0241 00160000 * RLNSWTH='1'B; /* SET SWITCH */ 00161000 OI RLNSWTH(ROPCAVT),B'10000000' 0242 00162000 * END; 0243 00163000 * ELSE 0244 00164000 * RLNSWTH='0'B; /* SET SWITCH */ 00165000 B @RC00239 0244 00166000 @RF00239 NI RLNSWTH(ROPCAVT),B'01111111' 0244 00167000 * NAMFILD=OCBACKUP; /* MOVE NAME TO MESSAGE */ 00168000 @RC00239 MVC NAMFILD(8,RWORK2),OCBACKUP(ROPCE) 0245 00169000 * IF RLNSWTH='1'B /* IR RLN THEN CONVERT RLN */ 00170000 * THEN 0246 00171000 TM RLNSWTH(ROPCAVT),B'10000000' 0246 00172000 BNO @RF00246 0246 00173000 * CALL CONVERT; 0247 00174000 BAL @14,CONVERT 0247 00175000 * IF MSGOFF2>0 /* IS SECOND INSERT NEEDED */ 00176000 * THEN /* IF YES */ 00177000 @RF00246 CLI MSGOFF2(RMSGPT),0 0248 00178000 BNH @RF00248 0248 00179000 * DO; 0249 00180000 * RWORK2=RWORKA+MSGOFF2+3; 0250 00181000 LR RWORK2,RWORKA 0250 00182000 SLR @10,@10 0250 00183000 IC @10,MSGOFF2(,RMSGPT) 0250 00184000 ALR RWORK2,@10 0250 00185000 AL RWORK2,@CF00067 0250 00186000 * IF MSGOFF2>128 /* IS THERE AN RLN? */ 00187000 * THEN /* IF YESS, */ 00188000 CLI MSGOFF2(RMSGPT),128 0251 00189000 BNH @RF00251 0251 00190000 * DO; 0252 00191000 * RWORK2=RWORK2-128; 0253 00192000 SL RWORK2,@CF01355 0253 00193000 * RLNSWTH='1'B; /* SET SWITCH */ 00194000 OI RLNSWTH(ROPCAVT),B'10000000' 0254 00195000 * END; 0255 00196000 * ELSE 0256 00197000 * RLNSWTH='0'B; /* SET SWITCH */ 00198000 B @RC00251 0256 00199000 @RF00251 NI RLNSWTH(ROPCAVT),B'01111111' 0256 00200000 * NAMFILD=OCMODNME; /* MOVE INSERT TO MSG */ 00201000 @RC00251 MVC NAMFILD(8,RWORK2),OCMODNME(ROPCE) 0257 00202000 * IF RMSGNO=449 /* @ZM46676*/ 00203000 * THEN 0258 00204000 C RMSGNO,@CF01325 0258 00205000 BNE @RF00258 0258 00206000 * CALL INSERT; /* @ZM46676*/ 00207000 BAL @14,INSERT 0259 00208000 * IF RLNSWTH='1'B /* IS RLN NEEDED? */ 00209000 * THEN 0260 00210000 @RF00258 TM RLNSWTH(ROPCAVT),B'10000000' 0260 00211000 BNO @RF00260 0260 00212000 * CALL CONVERT; 0261 00213000 BAL @14,CONVERT 0261 00214000 * END; 0262 00215000 @RF00260 DS 0H 0263 00216000 * END; 0263 00217000 @RF00248 DS 0H 0264 00218000 * OPCMODID='07'; /* SET UP WRITE MOD NAME @Y17XARM*/ 00219000 @RF00236 MVC OPCMODID(2,ROPCAVT),@CC01358 0264 00220000 * END; 0265 00221000 * 0266 00222000 * /*****************************************************************/ 00223000 * /* */ 00224000 * /* EPILOGUE: THIS SEGMENT COMPLETES THE EPILOGUE CODE THAT WAS */ 00225000 * /* ALTERED BY THE MODULE PROCEDURE STATEMENT. THE XCTL SYSTEM */ 00226000 * /* MACRO INSTRUCTION IS USED BY THIS SEGMENT TO TRANSFER CONTROL */ 00227000 * /* TO THE NEXT MODULE THAT IS TO BE EXECUTED. @Y17XARM*/ 00228000 * /* */ 00229000 * /*****************************************************************/ 00230000 * 0266 00231000 * RFY 0266 00232000 * RZERO RSTD; /* @Y17XARM*/ 00233000 @RC00223 DS 0H 0267 00234000 * RZERO=RMSGNO; /* SET MESSAGE NUMBER IN REGISTER 00235000 * ZERO (0) @Y17XARM*/ 00236000 LR RZERO,RMSGNO 0267 00237000 * RFY 0268 00238000 * RPARM RSTD; /* @Y17XARM*/ 00239000 * RPARM=ROPCAVT; /* SET THE PARAMETER REGISTER 0269 00240000 * WITH THE POINTER TO THE 0269 00241000 * OPERATOR CONTROL AVT @Y17XARM*/ 00242000 LR RPARM,ROPCAVT 0269 00243000 * GEN EXIT REFS(OPCXCTL,ROPCAVT) NOSEQFLOW; 0270 00244000 * /* @Y17XARM*/ 00245000 * /* @Y17XARM 00246000 XCTL SF=(E,OPCXCTL(ROPCAVT)) TRANSFER CONTROL MACRO @Y17XARM 00247000 * END IGC0D10D 0271 00248000 * 0271 00249000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00250000 */*%INCLUDE SYSLIB (TAVTD ) */ 00251000 */*%INCLUDE SYSLIB (TBDUD ) */ 00252000 */*%INCLUDE SYSLIB (TOPCED ) */ 00253000 */*%INCLUDE SYSLIB (TOPCAVTD) */ 00254000 */*%INCLUDE SYSLIB (TPRUD ) */ 00255000 */*%INCLUDE SYSLIB (TRHD ) */ 00256000 */*%INCLUDE SYSLIB (TTHD ) */ 00257000 * 0271 00258000 * ; 0271 00259000 @DATA DS 0H 00260000 @SM01359 MVC WORMSGAR(0,RWORKA),MSGSTART(RMSGPT) 00261000 DS 0F 00262000 DS 0F 00263000 @CF00067 DC F'3' 00264000 @CF00331 DC F'4' 00265000 @CF00170 DC F'16' 00266000 @CF01355 DC F'128' 00267000 @CF01325 DC F'449' 00268000 DS 0D 00269000 @CC01349 DC C'ALL' 00270000 @CC01352 DC C'0G' 00271000 @CC01358 DC C'07' 00272000 EBCDIC DC CL16'0123456789ABCDEF' 00273000 MSG197 DS CL43 00274000 ORG MSG197 00275000 @NM00153 DC AL1(40) 00276000 @NM00154 DC AL1(21) 00277000 @NM00155 DC AL1(33) 00278000 @NM00156 DC CL40'IED197I SSPAUSE FOR IS ' 00279000 ORG MSG197+43 00280000 MSG198 DS CL42 00281000 ORG MSG198 00282000 @NM00157 DC AL1(39) 00283000 @NM00158 DC AL1(20) 00284000 @NM00159 DC AL1(32) 00285000 @NM00160 DC CL39'IED198I NAKLIM FOR IS ' 00286000 ORG MSG198+42 00287000 MSG202 DS CL34 00288000 ORG MSG202 00289000 @NM00161 DC AL1(31) 00290000 @NM00162 DC AL1(9) 00291000 @NM00163 DC AL1(0) 00292000 @NM00164 DC CL31'IED202I SWITCH STARTED' 00293000 ORG MSG202+34 00294000 MSG208 DS CL51 00295000 ORG MSG208 00296000 @NM00165 DC AL1(48) 00297000 @NM00166 DC AL1(41) 00298000 @NM00167 DC AL1(0) 00299000 @NM00168 DC CL48'IED208I TRANSMISSION LIMIT MODIFIED FOR ' 00300000 ORG MSG208+51 00301000 MSG382 DS CL37 00302000 ORG MSG382 00303000 @NM00169 DC AL1(34) 00304000 @NM00170 DC AL1(9) 00305000 @NM00171 DC AL1(0) 00306000 @NM00172 DC CL34'IED382I ACTIVATE COMPLETE' 00307000 ORG MSG382+37 00308000 MSG383 DS CL40 00309000 ORG MSG383 00310000 @NM00173 DC AL1(37) 00311000 @NM00174 DC AL1(9) 00312000 @NM00175 DC AL1(0) 00313000 @NM00176 DC CL37'IED383I SWITCHED TO PRIMARY' 00314000 ORG MSG383+40 00315000 MSG394 DS CL60 00316000 ORG MSG394 00317000 @NM00177 DC AL1(57) 00318000 @NM00178 DC AL1(28) 00319000 @NM00179 DC AL1(41) 00320000 @NM00180 DC CL57'IED394I DEVICE ID SWAP FOR AND COC00321000 MPLETE' 00322000 ORG MSG394+60 00323000 MSG387 DS CL51 00324000 ORG MSG387 00325000 @NM00181 DC AL1(48) 00326000 @NM00182 DC AL1(164) 00327000 @NM00183 DC AL1(0) 00328000 @NM00184 DC CL48'IED387I SPEED CHANGE COMPLETED FOR , ' 00329000 ORG MSG387+51 00330000 MSG396 DS CL47 00331000 ORG MSG396 00332000 @NM00185 DC AL1(44) 00333000 @NM00186 DC AL1(9) 00334000 @NM00187 DC AL1(0) 00335000 @NM00188 DC CL44'IED396I CHANNEL ADAPTER NOW PRIMARY' 00336000 ORG MSG396+47 00337000 MSG397 DS CL50 00338000 ORG MSG397 00339000 @NM00189 DC AL1(47) 00340000 @NM00190 DC AL1(9) 00341000 @NM00191 DC AL1(0) 00342000 @NM00192 DC CL47'IED397I CHANNEL ADAPTER NOW SECONDARY' 00343000 ORG MSG397+50 00344000 MSG422 DS CL59 00345000 ORG MSG422 00346000 @NM00193 DC AL1(56) 00347000 @NM00194 DC AL1(9) 00348000 @NM00195 DC AL1(173) 00349000 @NM00196 DC CL56'IED422I SWITCHED TO BACKUP ON LINE C00350000 , ' 00351000 ORG MSG422+59 00352000 MSG432 DS CL54 00353000 ORG MSG432 00354000 @NM00197 DC AL1(51) 00355000 @NM00198 DC AL1(168) 00356000 @NM00199 DC AL1(0) 00357000 @NM00200 DC CL51'IED432I CHANGE DIAL MODE COMPLETED FOR , C00358000 ' 00359000 ORG MSG432+54 00360000 MSG449 DS CL75 00361000 ORG MSG449 00362000 @NM00201 DC AL1(72) 00363000 @NM00202 DC AL1(142) 00364000 @NM00203 DC AL1(39) 00365000 @NM00204 DC CL72'IED449I LINE , SWITCHED TO - SUC00366000 BCHANNEL ADDRESS = ' 00367000 ORG MSG449+75 00368000 ERRORTAB DS CL53 00369000 ORG ERRORTAB 00370000 @NM00205 DC H'197' 00371000 @NM00206 DC AL2(MSG197-BASE) 00372000 @NM00207 DC H'198' 00373000 @NM00208 DC AL2(MSG198-BASE) 00374000 @NM00209 DC H'202' 00375000 @NM00210 DC AL2(MSG202-BASE) 00376000 @NM00211 DC H'208' 00377000 @NM00212 DC AL2(MSG208-BASE) 00378000 @NM00213 DC H'382' 00379000 @NM00214 DC AL2(MSG382-BASE) 00380000 @NM00215 DC H'383' 00381000 @NM00216 DC AL2(MSG383-BASE) 00382000 @NM00217 DC H'387' 00383000 @NM00218 DC AL2(MSG387-BASE) 00384000 @NM00219 DC H'394' 00385000 @NM00220 DC AL2(MSG394-BASE) 00386000 @NM00221 DC H'396' 00387000 @NM00222 DC AL2(MSG396-BASE) 00388000 @NM00223 DC H'397' 00389000 @NM00224 DC AL2(MSG397-BASE) 00390000 @NM00225 DC H'422' 00391000 @NM00226 DC AL2(MSG422-BASE) 00392000 @NM00227 DC H'432' 00393000 @NM00228 DC AL2(MSG432-BASE) 00394000 @NM00229 DC H'449' 00395000 @NM00230 DC AL2(MSG449-BASE) 00396000 ERREND DC X'FF' 00397000 ORG ERRORTAB+53 00398000 DS CL1 00399000 PATCH DC XL104'0' 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 @04 00417000 ROPCE EQU @03 00418000 ROPCAVT EQU @02 00419000 RZERO EQU @00 00420000 RPARM EQU @01 00421000 RWORKA EQU @05 00422000 RMSGNO EQU @06 00423000 RMSGPT EQU @07 00424000 RCONVERT EQU @08 00425000 RWORK2 EQU @09 00426000 RRETN EQU @11 00427000 R14 EQU @14 00428000 IEDQAVTD EQU 0 00429000 AVTSAVEX EQU IEDQAVTD+288 00430000 @NM00003 EQU IEDQAVTD+388 00431000 AVTCKFLG EQU @NM00003 00432000 AVTBASE EQU IEDQAVTD+412 00433000 AVTPKF EQU AVTBASE 00434000 AVTOSECB EQU IEDQAVTD+492 00435000 AVTECB1 EQU AVTOSECB 00436000 AVTHG02 EQU IEDQAVTD+528 00437000 AVTDISP EQU IEDQAVTD+552 00438000 AVTHD EQU IEDQAVTD+556 00439000 AVTSCOPT EQU AVTHD 00440000 AVTSAVTP EQU IEDQAVTD+612 00441000 AVTSAVTF EQU AVTSAVTP 00442000 AVTCKPEL EQU IEDQAVTD+652 00443000 AVTCKRMV EQU AVTCKPEL 00444000 AVTCKELF EQU IEDQAVTD+680 00445000 AVTCKBYT EQU IEDQAVTD+691 00446000 AVTHG01 EQU IEDQAVTD+692 00447000 AVTCKLNK EQU IEDQAVTD+696 00448000 AVTCRELE EQU IEDQAVTD+708 00449000 AVTCCELE EQU AVTCRELE 00450000 AVTCLRHI EQU IEDQAVTD+716 00451000 AVTADBUF EQU IEDQAVTD+720 00452000 AVTSYSER EQU IEDQAVTD+728 00453000 AVTCKPQB EQU IEDQAVTD+804 00454000 AVTCKPTB EQU AVTCKPQB 00455000 AVTCKPEC EQU AVTCKPQB+4 00456000 AVTCKPCC EQU AVTCKPEC 00457000 AVTOPCQB EQU IEDQAVTD+816 00458000 AVTOPCOB EQU AVTOPCQB 00459000 AVTOPCEC EQU AVTOPCQB+4 00460000 AVTOPCCC EQU AVTOPCEC 00461000 AVTOLTQB EQU IEDQAVTD+828 00462000 AVTCWFL1 EQU IEDQAVTD+924 00463000 AVTCWFL2 EQU IEDQAVTD+925 00464000 AVTSUBT EQU IEDQAVTD+948 00465000 AVTIOTR EQU IEDQAVTD+949 00466000 AVTBIT1 EQU IEDQAVTD+1050 00467000 AVTBIT2 EQU IEDQAVTD+1051 00468000 AVTBIT3 EQU IEDQAVTD+1052 00469000 AVTBIT4 EQU IEDQAVTD+1136 00470000 @NM00085 EQU IEDQAVTD+1232 00471000 IEDNSVTD EQU 0 00472000 SAVTDIAG EQU IEDNSVTD 00473000 SAVTDIAF EQU SAVTDIAG 00474000 SAVTLUSQ EQU IEDNSVTD+88 00475000 SAVTTCPU EQU IEDNSVTD+238 00476000 SAVTZELM EQU IEDNSVTD+270 00477000 SAVTRDRV EQU IEDNSVTD+284 00478000 SAVTCKQB EQU IEDNSVTD+300 00479000 SAVTCKTB EQU SAVTCKQB 00480000 SAVTCKEC EQU SAVTCKQB+4 00481000 SAVTCKCC EQU SAVTCKEC 00482000 IEDBDU EQU 0 00483000 BDUFNFLG EQU IEDBDU+2 00484000 BDUBDUFG EQU IEDBDU+3 00485000 BDURSP EQU IEDBDU+4 00486000 BDUSYRSP EQU BDURSP 00487000 BDUEXRSP EQU BDURSP+1 00488000 BDUEND EQU IEDBDU+6 00489000 IEDQOPCE EQU 0 00490000 OCELEM EQU IEDQOPCE+4 00491000 OCUNIT EQU IEDQOPCE+8 00492000 OCRUDEST EQU OCUNIT 00493000 OCCKPKEY EQU OCRUDEST 00494000 OCSCAN EQU OCCKPKEY 00495000 OCOPTCDE EQU IEDQOPCE+12 00496000 OCSWITCH EQU IEDQOPCE+13 00497000 OCFLAG EQU IEDQOPCE+14 00498000 OCRLN EQU IEDQOPCE+15 00499000 @NM00108 EQU IEDQOPCE+16 00500000 OCDEST EQU @NM00108 00501000 OCREQVAL EQU OCDEST+1 00502000 OCLINENO EQU IEDQOPCE+22 00503000 OCTIOT EQU OCLINENO 00504000 OCTRUNIT EQU IEDQOPCE+24 00505000 OCRSID EQU OCTRUNIT 00506000 OCALSTAT EQU OCRSID 00507000 OCPARM EQU IEDQOPCE+28 00508000 OCBACKUP EQU IEDQOPCE+32 00509000 OCMODNME EQU IEDQOPCE+40 00510000 OCIPLWA EQU OCMODNME 00511000 OCCKDATA EQU IEDQOPCE+48 00512000 OCRSTGTM EQU OCCKDATA 00513000 IEDQOPCN EQU 0 00514000 OCLDNME EQU IEDQOPCN 00515000 OCLINTTE EQU OCLDNME 00516000 OCREQFLG EQU OCLINTTE+2 00517000 OCPREFLG EQU OCLINTTE+3 00518000 IEDQOPCD EQU 0 00519000 OPCDOUBL EQU IEDQOPCD 00520000 OPCAVTPT EQU IEDQOPCD+8 00521000 OPCCOPCE EQU IEDQOPCD+12 00522000 OPCSAVE EQU IEDQOPCD+56 00523000 OPCWORK EQU IEDQOPCD+140 00524000 OPCAQCTL EQU IEDQOPCD+180 00525000 OPCXCTL EQU IEDQOPCD+204 00526000 OPCLDNME EQU IEDQOPCD+212 00527000 OPCMODID EQU OPCLDNME+3 00528000 OPCSPEC EQU IEDQOPCD+300 00529000 OPCPWCOB EQU IEDQOPCD+368 00530000 OPCPWQCB EQU OPCPWCOB 00531000 OPCPWECB EQU OPCPWCOB+4 00532000 IEDPRUQD EQU 0 00533000 PRUTIC EQU IEDPRUQD+8 00534000 PRUDATA EQU IEDPRUQD+12 00535000 IEDPRUQP EQU 0 00536000 IEDPRUND EQU 0 00537000 PRURHTH EQU IEDPRUND 00538000 PRURH EQU PRURHTH 00539000 PRURHFG0 EQU PRURH 00540000 PRURHFG1 EQU PRURH+1 00541000 PRURHFG2 EQU PRURH+2 00542000 PRUTH EQU PRURHTH+3 00543000 PRUFIDN EQU PRUTH 00544000 IEDRH EQU 0 00545000 TRHBYTE0 EQU IEDRH 00546000 TRHBYTE1 EQU IEDRH+1 00547000 TRHBYTE2 EQU IEDRH+2 00548000 IEDTH EQU 0 00549000 TTHBYTE0 EQU IEDTH 00550000 TTHSNF EQU IEDTH+6 00551000 TTHTAG EQU TTHSNF 00552000 TTHTAG1 EQU TTHTAG 00553000 TABMSG EQU 0 00554000 TABMSGNO EQU TABMSG 00555000 TABEND EQU TABMSGNO 00556000 TABMSGAD EQU TABMSG+2 00557000 MESSAGE EQU 0 00558000 MSGLEN EQU MESSAGE 00559000 MSGOFFST EQU MESSAGE+1 00560000 MSGOFF2 EQU MESSAGE+2 00561000 MSGSTART EQU MESSAGE+3 00562000 WORKAREA EQU 0 00563000 WORLEN EQU WORKAREA 00564000 WORMSGAR EQU WORKAREA+4 00565000 NAMEAREA EQU 0 00566000 NAMFILD EQU NAMEAREA 00567000 NAMRLN EQU NAMEAREA+9 00568000 OCCKPKY1 EQU OCCKPKEY 00569000 OCCKPTYP EQU OCCKPKY1 00570000 OCICACTN EQU OCMODNME 00571000 OCICDADR EQU OCICACTN 00572000 OCICSW EQU OCICDADR+3 00573000 OPCAQWD EQU OPCAQCTL 00574000 OPCAQWD1 EQU OPCAQWD 00575000 OPCAQWD2 EQU OPCAQWD+4 00576000 OPCAQWD3 EQU OPCAQWD+8 00577000 @NM00231 EQU OPCSAVE 00578000 @NM00232 EQU @NM00231 00579000 WORKBYTE EQU @NM00232 00580000 BUFBASE EQU @NM00232+1 00581000 @NM00233 EQU @NM00231+4 00582000 RLNSWTH EQU @NM00233 00583000 @NM00234 EQU IEDBDU 00584000 BTUTEXT EQU @NM00234+1 00585000 BDUTEXT EQU BDUEND 00586000 OCCIB EQU OCREQVAL 00587000 AGO .@UNREFD START UNREFERENCED COMPONENTS 00588000 @NM00235 EQU @NM00234 00589000 OPCAQLST EQU OPCAQWD3+1 00590000 OPCAQRQ3 EQU OPCAQWD3 00591000 OPCAQSEC EQU OPCAQWD2+1 00592000 OPCAQRQ2 EQU OPCAQWD2 00593000 OPCAQFST EQU OPCAQWD1+1 00594000 OPCAQREQ EQU OPCAQWD1 00595000 OCICINAC EQU OCICSW 00596000 @NM00114 EQU OCICSW 00597000 OCICATST EQU OCICDADR+1 00598000 OCICTYPE EQU OCICDADR 00599000 @NM00113 EQU OCCKPKY1 00600000 OCCKPENV EQU OCCKPKY1 00601000 OCCKPRST EQU OCCKPTYP 00602000 OCCKPNCP EQU OCCKPTYP 00603000 OCCKPINC EQU OCCKPTYP 00604000 NAMCOMMA EQU NAMEAREA+8 00605000 @NM00152 EQU WORKAREA+2 00606000 TTHDCF EQU IEDTH+8 00607000 TTHTAG2 EQU TTHTAG+1 00608000 @NM00151 EQU TTHTAG1 00609000 TTHTAGS EQU TTHTAG1 00610000 TTHOAF EQU IEDTH+4 00611000 TTHDAF EQU IEDTH+2 00612000 TTHBYTE1 EQU IEDTH+1 00613000 TTHEFI EQU TTHBYTE0 00614000 @NM00150 EQU TTHBYTE0 00615000 TTHEBIU EQU TTHBYTE0 00616000 TTHBBIU EQU TTHBYTE0 00617000 TTHFTYPE EQU TTHBYTE0 00618000 @NM00149 EQU TRHBYTE2 00619000 @NM00148 EQU TRHBYTE2 00620000 @NM00147 EQU TRHBYTE2 00621000 TRHCSI EQU TRHBYTE2 00622000 @NM00146 EQU TRHBYTE2 00623000 TRHCDI EQU TRHBYTE2 00624000 TRHEB EQU TRHBYTE2 00625000 TRHBB EQU TRHBYTE2 00626000 TRHPI EQU TRHBYTE1 00627000 @NM00145 EQU TRHBYTE1 00628000 @NM00144 EQU TRHBYTE1 00629000 @NM00143 EQU TRHBYTE1 00630000 TRHER EQU TRHBYTE1 00631000 TRHDR2 EQU TRHBYTE1 00632000 @NM00142 EQU TRHBYTE1 00633000 TRHDR1 EQU TRHBYTE1 00634000 TRHEC EQU TRHBYTE0 00635000 TRHBC EQU TRHBYTE0 00636000 TRHSDI EQU TRHBYTE0 00637000 TRHFI EQU TRHBYTE0 00638000 @NM00141 EQU TRHBYTE0 00639000 TRHRUCAT EQU TRHBYTE0 00640000 TRHTYPE EQU TRHBYTE0 00641000 @NM00140 EQU IEDPRUND+4 00642000 PRUTHEFI EQU PRUFIDN 00643000 PRUTHUSS EQU PRUFIDN 00644000 PRUTHEIU EQU PRUFIDN 00645000 PRUTHBIU EQU PRUFIDN 00646000 PRUTHTYE EQU PRUFIDN 00647000 @NM00139 EQU PRURHFG2 00648000 PRURHCSI EQU PRURHFG2 00649000 @NM00138 EQU PRURHFG2 00650000 PRURHCDI EQU PRURHFG2 00651000 PRURHEB EQU PRURHFG2 00652000 PRURHBB EQU PRURHFG2 00653000 PRURHPI EQU PRURHFG1 00654000 @NM00137 EQU PRURHFG1 00655000 PRURHER EQU PRURHFG1 00656000 PRURHDR2 EQU PRURHFG1 00657000 @NM00136 EQU PRURHFG1 00658000 PRURHDR1 EQU PRURHFG1 00659000 PRURHEC EQU PRURHFG0 00660000 PRURHBC EQU PRURHFG0 00661000 PRURHSDI EQU PRURHFG0 00662000 PRURHFI EQU PRURHFG0 00663000 @NM00135 EQU PRURHFG0 00664000 PRURUCAT EQU PRURHFG0 00665000 PRURHTYP EQU PRURHFG0 00666000 PRUNUNIT EQU PRUTIC+1 00667000 @NM00134 EQU PRUTIC 00668000 @NM00133 EQU IEDPRUQD+4 00669000 PRUDATCT EQU IEDPRUQD+2 00670000 PRUTTCIN EQU IEDPRUQD 00671000 OPCBOTTM EQU IEDQOPCD+1184 00672000 @NM00132 EQU IEDQOPCD+1100 00673000 @NM00131 EQU IEDQOPCD+948 00674000 @NM00130 EQU IEDQOPCD+940 00675000 @NM00129 EQU IEDQOPCD+380 00676000 @NM00128 EQU OPCPWCOB+9 00677000 @NM00127 EQU OPCPWCOB+8 00678000 @NM00126 EQU OPCPWECB+1 00679000 OPCPWCCC EQU OPCPWECB 00680000 OPCPWCHN EQU OPCPWQCB+1 00681000 OPCPWVTO EQU OPCPWQCB 00682000 OPCWAITV EQU IEDQOPCD+364 00683000 OPCTOTCK EQU IEDQOPCD+360 00684000 OPCAPXTL EQU IEDQOPCD+356 00685000 OPCDECR EQU IEDQOPCD+352 00686000 OPCBUFWT EQU IEDQOPCD+348 00687000 OPCWRKSP EQU IEDQOPCD+320 00688000 OPCADGOT EQU IEDQOPCD+318 00689000 OPCRQCNT EQU IEDQOPCD+316 00690000 OPPOLSTP EQU IEDQOPCD+312 00691000 OPCCKCIB EQU IEDQOPCD+308 00692000 OPCEND EQU IEDQOPCD+307 00693000 OPCSTCBS EQU IEDQOPCD+306 00694000 OPCHNEND EQU IEDQOPCD+302 00695000 OPCOQSW EQU IEDQOPCD+301 00696000 @NM00125 EQU OPCSPEC 00697000 @NM00124 EQU OPCSPEC 00698000 @NM00123 EQU OPCSPEC 00699000 @NM00122 EQU OPCSPEC 00700000 OPCFRMCA EQU OPCSPEC 00701000 OPCRSTRT EQU OPCSPEC 00702000 OPCPART EQU OPCSPEC 00703000 OPCALTD EQU OPCSPEC 00704000 OPCBFEND EQU IEDQOPCD+296 00705000 OPCBFIRS EQU IEDQOPCD+292 00706000 OPCAVBUF EQU IEDQOPCD+290 00707000 OPCIPLCT EQU IEDQOPCD+289 00708000 OPCCLNTS EQU IEDQOPCD+288 00709000 OPCHA8 EQU IEDQOPCD+286 00710000 OPCBFREQ EQU IEDQOPCD+284 00711000 OPCFREBF EQU IEDQOPCD+280 00712000 OPCGETBF EQU IEDQOPCD+276 00713000 OPCNEXT EQU IEDQOPCD+272 00714000 OPCFMDFC EQU IEDQOPCD+268 00715000 OPCSCNC EQU IEDQOPCD+264 00716000 OPCHORTG EQU IEDQOPCD+260 00717000 OPCHORT EQU IEDQOPCD+256 00718000 OPCCKPTL EQU IEDQOPCD+252 00719000 OPCCKPTF EQU IEDQOPCD+248 00720000 OPCWAITA EQU IEDQOPCD+244 00721000 OPCWAITR EQU IEDQOPCD+240 00722000 OPCWAITP EQU IEDQOPCD+236 00723000 OPCWAITO EQU IEDQOPCD+232 00724000 OPCWAITN EQU IEDQOPCD+228 00725000 OPCWAITL EQU IEDQOPCD+224 00726000 OPCWAITC EQU IEDQOPCD+220 00727000 @NM00121 EQU OPCLDNME+5 00728000 @NM00120 EQU OPCLDNME 00729000 OPCWAIT EQU IEDQOPCD+192 00730000 OPCCKERB EQU IEDQOPCD+164 00731000 OPCBFERB EQU IEDQOPCD+148 00732000 OPCFLAG2 EQU IEDQOPCD+147 00733000 OPCFLAG1 EQU IEDQOPCD+146 00734000 OPCWRKSZ EQU IEDQOPCD+144 00735000 OPCRSAVE EQU IEDQOPCD+132 00736000 OPCQCBAD EQU IEDQOPCD+128 00737000 OPCTRMWA EQU IEDQOPCD+52 00738000 OPCPSTWT EQU IEDQOPCD+48 00739000 OPCTNTEA EQU IEDQOPCD+44 00740000 OPCPGCK EQU IEDQOPCD+40 00741000 OPCLCB EQU IEDQOPCD+36 00742000 @NM00119 EQU IEDQOPCD+32 00743000 OPCIPLAD EQU IEDQOPCD+28 00744000 OPCTOFLK EQU IEDQOPCD+24 00745000 OPCOPTLK EQU IEDQOPCD+20 00746000 OPCDCBLK EQU IEDQOPCD+16 00747000 @NM00118 EQU OCLDNME+4 00748000 @NM00117 EQU OCPREFLG 00749000 OCTOTEP EQU OCPREFLG 00750000 OCREPOST EQU OCPREFLG 00751000 OCRSPSNT EQU OCPREFLG 00752000 OCBFREQ EQU OCPREFLG 00753000 OCIDLE EQU OCREQFLG 00754000 OCFORCE EQU OCREQFLG 00755000 OCDCARD EQU OCREQFLG 00756000 OCPARTAL EQU OCREQFLG 00757000 OCADNCP EQU OCREQFLG 00758000 @NM00116 EQU OCREQFLG 00759000 @NM00115 EQU OCREQFLG 00760000 OCFLUSHZ EQU OCREQFLG 00761000 OCRESPCT EQU OCLINTTE 00762000 OCCKPTWA EQU OCCKDATA+4 00763000 @NM00112 EQU OCRSTGTM+2 00764000 OCCKDAT2 EQU OCRSTGTM+1 00765000 OCCKDAT1 EQU OCRSTGTM 00766000 OCPTRSAV EQU OCMODNME+4 00767000 OCPUADR EQU OCIPLWA+2 00768000 OCWTGSAV EQU OCIPLWA 00769000 OCDVRDCT EQU OCBACKUP+6 00770000 OCNCP EQU OCBACKUP+4 00771000 OCBUFGOT EQU OCBACKUP+2 00772000 OCBUFNED EQU OCBACKUP 00773000 OCWTG EQU IEDQOPCE+30 00774000 OCRESNUM EQU OCPARM 00775000 OCSEQ EQU OCTRUNIT+2 00776000 @NM00111 EQU OCRSID+1 00777000 OCNONE EQU OCALSTAT 00778000 OCSOME EQU OCALSTAT 00779000 OCALLFLG EQU OCALSTAT 00780000 OCACTREQ EQU OCALSTAT 00781000 OCREDRVE EQU OCALSTAT 00782000 OCSEQIND EQU OCALSTAT 00783000 @NM00110 EQU OCALSTAT 00784000 OCRENTRD EQU OCALSTAT 00785000 OCWTGB EQU OCTIOT 00786000 OCTRMTBL EQU IEDQOPCE+20 00787000 @NM00109 EQU @NM00108+2 00788000 OCCONID EQU OCDEST 00789000 OCRESP EQU OCFLAG 00790000 OCATTACH EQU OCFLAG 00791000 OCSSCP EQU OCFLAG 00792000 OCOUTPUT EQU OCFLAG 00793000 OCLINE EQU OCFLAG 00794000 OCMPP EQU OCFLAG 00795000 OCTOTE EQU OCFLAG 00796000 OCCONSOL EQU OCFLAG 00797000 @NM00107 EQU OCSWITCH 00798000 OCQUCKN EQU OCSWITCH 00799000 OCPRIFLG EQU OCOPTCDE 00800000 @NM00106 EQU OCRUDEST+1 00801000 @NM00105 EQU OCSCAN 00802000 OCNOTUCB EQU OCSCAN 00803000 OCNONAME EQU OCSCAN 00804000 OCALLRLN EQU OCSCAN 00805000 OCDDNAME EQU OCSCAN 00806000 OCDDNRLN EQU OCSCAN 00807000 OCADDR EQU OCSCAN 00808000 OCELMPTR EQU OCELEM+1 00809000 OCELMPRI EQU OCELEM 00810000 OCLINK EQU IEDQOPCE 00811000 BDUXGRPH EQU BDUEXRSP 00812000 BDUXFINL EQU BDUEXRSP 00813000 BDUXINIT EQU BDUEXRSP 00814000 BDURESP EQU BDUSYRSP 00815000 BDUPHASE EQU BDUSYRSP 00816000 BDUERROR EQU BDUSYRSP 00817000 BDUXERLK EQU BDUBDUFG 00818000 BDUALTAK EQU BDUFNFLG 00819000 BDUNEGAK EQU BDUFNFLG 00820000 BDUPOSAK EQU BDUFNFLG 00821000 BDUTPTX EQU BDUFNFLG 00822000 BDUFRSTB EQU BDUFNFLG 00823000 BDULEADG EQU BDUFNFLG 00824000 BDUHEADR EQU BDUFNFLG 00825000 BDUSTHDR EQU BDUFNFLG 00826000 BDUMODIF EQU IEDBDU+1 00827000 BDUCMND EQU IEDBDU 00828000 SAVTBITN EQU IEDNSVTD+312 00829000 @NM00104 EQU SAVTCKQB+8 00830000 @NM00103 EQU SAVTCKEC+1 00831000 @NM00102 EQU SAVTCKCC 00832000 SAVTCKPO EQU SAVTCKCC 00833000 SAVTCKWA EQU SAVTCKCC 00834000 SAVTCKCH EQU SAVTCKTB+1 00835000 SAVTCKVT EQU SAVTCKTB 00836000 @NM00101 EQU IEDNSVTD+297 00837000 SAVTRDFG EQU SAVTRDRV+12 00838000 @NM00100 EQU SAVTRDRV+5 00839000 SAVTRDPY EQU SAVTRDRV+4 00840000 SAVTRDQB EQU SAVTRDRV+1 00841000 SAVTRDKY EQU SAVTRDRV 00842000 SAVTNID EQU IEDNSVTD+280 00843000 SAVTDVAS EQU IEDNSVTD+276 00844000 SAVTPLSZ EQU IEDNSVTD+274 00845000 @NM00099 EQU IEDNSVTD+273 00846000 SAVTSUBL EQU IEDNSVTD+272 00847000 @NM00098 EQU SAVTZELM+1 00848000 SAVTSUBM EQU SAVTZELM 00849000 SAVTMHDX EQU IEDNSVTD+268 00850000 SAVTNAT1 EQU IEDNSVTD+266 00851000 SAVTSH20 EQU IEDNSVTD+264 00852000 SAVTLCBS EQU IEDNSVTD+260 00853000 SAVTRNMP EQU IEDNSVTD+256 00854000 SAVTTNTX EQU IEDNSVTD+252 00855000 SAVTNAX EQU IEDNSVTD+248 00856000 SAVTSUBV EQU IEDNSVTD+247 00857000 SAVTSUBA EQU IEDNSVTD+246 00858000 SAVTSIBC EQU IEDNSVTD+244 00859000 SAVTBSM EQU IEDNSVTD+240 00860000 SAVTSCPT EQU SAVTTCPU 00861000 SAVTRQTG EQU IEDNSVTD+236 00862000 SAVTRQCH EQU IEDNSVTD+232 00863000 SAVTMAND EQU IEDNSVTD+228 00864000 SAVTSPLN EQU IEDNSVTD+224 00865000 SAVTNADL EQU IEDNSVTD+222 00866000 SAVTNATL EQU IEDNSVTD+220 00867000 SAVTMHTB EQU IEDNSVTD+216 00868000 SAVTSSMH EQU IEDNSVTD+212 00869000 SAVTQRS EQU IEDNSVTD+208 00870000 SAVTRQIN EQU IEDNSVTD+204 00871000 SAVTDFCO EQU IEDNSVTD+200 00872000 SAVTSAO EQU IEDNSVTD+196 00873000 SAVTSARI EQU IEDNSVTD+192 00874000 SAVTSAC EQU IEDNSVTD+188 00875000 SAVTSAI EQU IEDNSVTD+184 00876000 SAVTCSCI EQU IEDNSVTD+180 00877000 SAVTSSRP EQU IEDNSVTD+176 00878000 SAVTSSRQ EQU IEDNSVTD+172 00879000 SAVTSCLU EQU IEDNSVTD+168 00880000 SAVTXTRQ EQU IEDNSVTD+164 00881000 SAVTMVBF EQU IEDNSVTD+160 00882000 @NM00097 EQU IEDNSVTD+148 00883000 SAVTIPCQ EQU IEDNSVTD+144 00884000 @NM00096 EQU IEDNSVTD+136 00885000 SAVTXFMI EQU IEDNSVTD+132 00886000 @NM00095 EQU IEDNSVTD+124 00887000 SAVTXFMO EQU IEDNSVTD+120 00888000 @NM00094 EQU IEDNSVTD+116 00889000 SAVTSSSR EQU IEDNSVTD+112 00890000 SAVTSCPQ EQU IEDNSVTD+108 00891000 SAVTSLCB EQU IEDNSVTD+104 00892000 SAVTLUSR EQU IEDNSVTD+100 00893000 @NM00093 EQU SAVTLUSQ+8 00894000 SAVTLUSP EQU SAVTLUSQ+4 00895000 SAVTLUSB EQU SAVTLUSQ 00896000 @NM00092 EQU IEDNSVTD+84 00897000 SAVTSAT EQU IEDNSVTD+80 00898000 SAVTNAT EQU IEDNSVTD+76 00899000 SAVTCLUP EQU IEDNSVTD+72 00900000 SAVTPIUT EQU IEDNSVTD+68 00901000 SAVTRNTA EQU IEDNSVTD+64 00902000 SAVTDNIR EQU IEDNSVTD+60 00903000 SAVTCNIR EQU IEDNSVTD+56 00904000 SAVTFLDH EQU IEDNSVTD+52 00905000 SAVTSRTN EQU IEDNSVTD+48 00906000 SAVTSREQ EQU IEDNSVTD+44 00907000 SAVTFAIL EQU IEDNSVTD+42 00908000 SAVTSUSE EQU IEDNSVTD+40 00909000 SAVTSIB EQU IEDNSVTD+36 00910000 SAVTPRTN EQU IEDNSVTD+32 00911000 @NM00091 EQU IEDNSVTD+28 00912000 SAVTWH20 EQU IEDNSVTD+26 00913000 SAVTPWT EQU IEDNSVTD+24 00914000 SAVTPRTQ EQU IEDNSVTD+20 00915000 SAVTPREQ EQU IEDNSVTD+16 00916000 SAVTPH20 EQU IEDNSVTD+14 00917000 SAVTPUSE EQU IEDNSVTD+12 00918000 SAVTPLCB EQU IEDNSVTD+8 00919000 SAVTPOOL EQU IEDNSVTD+4 00920000 SAVTPRMT EQU SAVTDIAF 00921000 SAVTVIRT EQU SAVTDIAF 00922000 AVTCPBNO EQU IEDQAVTD+1244 00923000 AVTHRESS EQU IEDQAVTD+1243 00924000 @NM00090 EQU IEDQAVTD+1242 00925000 @NM00089 EQU IEDQAVTD+1241 00926000 @NM00088 EQU IEDQAVTD+1240 00927000 @NM00087 EQU IEDQAVTD+1237 00928000 @NM00086 EQU IEDQAVTD+1236 00929000 AVTHRESE EQU @NM00085 00930000 AVTRADDR EQU IEDQAVTD+1228 00931000 AVTNADDR EQU IEDQAVTD+1224 00932000 AVTHRESN EQU IEDQAVTD+1220 00933000 AVTVOLRN EQU IEDQAVTD+1216 00934000 AVTTOTNN EQU IEDQAVTD+1212 00935000 AVTTRCYN EQU IEDQAVTD+1208 00936000 AVTRCTRN EQU IEDQAVTD+1204 00937000 AVTNOVON EQU IEDQAVTD+1200 00938000 AVTADEBN EQU IEDQAVTD+1196 00939000 AVTVOLRR EQU IEDQAVTD+1192 00940000 AVTTOTNR EQU IEDQAVTD+1188 00941000 AVTTRCYR EQU IEDQAVTD+1184 00942000 AVTRCTRR EQU IEDQAVTD+1180 00943000 AVTNOVOR EQU IEDQAVTD+1176 00944000 AVTADEBR EQU IEDQAVTD+1172 00945000 AVTLODPT EQU IEDQAVTD+1168 00946000 AVTIOBN EQU IEDQAVTD+1164 00947000 AVTIOBR EQU IEDQAVTD+1160 00948000 AVTCPBPT EQU IEDQAVTD+1156 00949000 AVTFCPB EQU IEDQAVTD+1152 00950000 @NM00084 EQU IEDQAVTD+1148 00951000 AVTINCPQ EQU IEDQAVTD+1144 00952000 @NM00083 EQU IEDQAVTD+1140 00953000 @NM00082 EQU IEDQAVTD+1137 00954000 @NM00081 EQU AVTBIT4 00955000 @NM00080 EQU AVTBIT4 00956000 @NM00079 EQU AVTBIT4 00957000 @NM00078 EQU AVTBIT4 00958000 @NM00077 EQU AVTBIT4 00959000 @NM00076 EQU AVTBIT4 00960000 @NM00075 EQU AVTBIT4 00961000 AVTRUFTN EQU AVTBIT4 00962000 @NM00074 EQU IEDQAVTD+1132 00963000 AVTNOBFQ EQU IEDQAVTD+1128 00964000 @NM00073 EQU IEDQAVTD+1124 00965000 AVTDKENQ EQU IEDQAVTD+1120 00966000 @NM00072 EQU IEDQAVTD+1116 00967000 AVTDKAPQ EQU IEDQAVTD+1112 00968000 AVTCOPY EQU IEDQAVTD+1108 00969000 AVTIA EQU IEDQAVTD+1104 00970000 AVTFL EQU IEDQAVTD+1100 00971000 @NM00071 EQU IEDQAVTD+1096 00972000 AVTNCPBQ EQU IEDQAVTD+1092 00973000 AVTTOTNC EQU IEDQAVTD+1088 00974000 AVTCMAX EQU IEDQAVTD+1084 00975000 AVTCMIN EQU IEDQAVTD+1080 00976000 AVTHM02 EQU IEDQAVTD+1076 00977000 AVTOPCIN EQU IEDQAVTD+1074 00978000 AVTDCTLN EQU IEDQAVTD+1072 00979000 AVTOPMSK EQU IEDQAVTD+1068 00980000 AVTDDFT EQU IEDQAVTD+1064 00981000 AVTSTEAL EQU IEDQAVTD+1060 00982000 AVTOPTN EQU IEDQAVTD+1056 00983000 AVTDSKCT EQU IEDQAVTD+1054 00984000 AVTCKRST EQU IEDQAVTD+1053 00985000 AVTSTAN EQU AVTBIT3 00986000 AVTSTACN EQU AVTBIT3 00987000 AVTSTAIN EQU AVTBIT3 00988000 AVTSTAYN EQU AVTBIT3 00989000 AVTOLTBN EQU AVTBIT3 00990000 AVTTSAB EQU AVTBIT3 00991000 AVTRFULN EQU AVTBIT3 00992000 AVTRECVN EQU AVTBIT3 00993000 @NM00070 EQU AVTBIT2 00994000 @NM00069 EQU AVTBIT2 00995000 AVTOPEIN EQU AVTBIT2 00996000 AVTSTRTN EQU AVTBIT2 00997000 AVTTOPOL EQU AVTBIT2 00998000 AVTCOPYN EQU AVTBIT2 00999000 AVTREUSN EQU AVTBIT2 01000000 AVTEXTSC EQU AVTBIT2 01001000 AVTDISKN EQU AVTBIT1 01002000 AVTQUCKN EQU AVTBIT1 01003000 AVTCLOSN EQU AVTBIT1 01004000 AVTREADN EQU AVTBIT1 01005000 AVTDLAYN EQU AVTBIT1 01006000 AVTAQTAN EQU AVTBIT1 01007000 AVTTSON EQU AVTBIT1 01008000 AVTAPLKN EQU AVTBIT1 01009000 AVTDUMBR EQU IEDQAVTD+1048 01010000 AVTDLQX EQU IEDQAVTD+1046 01011000 AVTINTLV EQU IEDQAVTD+1044 01012000 AVTSMCNT EQU IEDQAVTD+1042 01013000 AVTAVFCT EQU IEDQAVTD+1040 01014000 AVTOPCON EQU IEDQAVTD+1038 01015000 AVTOPCNT EQU IEDQAVTD+1036 01016000 AVTLNCNT EQU IEDQAVTD+1034 01017000 AVTKEYLE EQU IEDQAVTD+1032 01018000 AVTHA16 EQU IEDQAVTD+1030 01019000 AVTHA7 EQU IEDQAVTD+1028 01020000 AVTHA4 EQU IEDQAVTD+1026 01021000 AVTHA3 EQU IEDQAVTD+1024 01022000 AVTHA2 EQU IEDQAVTD+1022 01023000 AVTGETMS EQU IEDQAVTD+1021 01024000 @NM00068 EQU IEDQAVTD+1020 01025000 AVTGETMD EQU IEDQAVTD+1016 01026000 AVTGETMN EQU IEDQAVTD+1012 01027000 AVTCWTOT EQU IEDQAVTD+1008 01028000 AVTCWINT EQU IEDQAVTD+956 01029000 AVTDTRAP EQU IEDQAVTD+952 01030000 @NM00067 EQU IEDQAVTD+950 01031000 @NM00066 EQU AVTIOTR 01032000 AVTIOTRH EQU AVTIOTR 01033000 AVTIOTRE EQU AVTIOTR 01034000 @NM00065 EQU AVTSUBT 01035000 AVTSUBPT EQU AVTSUBT 01036000 AVTSUBON EQU AVTSUBT 01037000 AVTAFE30 EQU IEDQAVTD+944 01038000 AVTAFE20 EQU IEDQAVTD+940 01039000 AVTAFE10 EQU IEDQAVTD+936 01040000 AVTCWEC2 EQU IEDQAVTD+932 01041000 AVTCWPM2 EQU IEDQAVTD+928 01042000 AVTCWTS2 EQU IEDQAVTD+927 01043000 AVTCWTS1 EQU IEDQAVTD+926 01044000 AVTCWCLD EQU AVTCWFL2 01045000 AVTCWRAP EQU AVTCWFL2 01046000 @NM00064 EQU AVTCWFL2 01047000 @NM00063 EQU AVTCWFL2 01048000 @NM00062 EQU AVTCWFL2 01049000 @NM00061 EQU AVTCWFL2 01050000 @NM00060 EQU AVTCWFL2 01051000 AVTCWACT EQU AVTCWFL2 01052000 @NM00059 EQU AVTCWFL1 01053000 @NM00058 EQU AVTCWFL1 01054000 @NM00057 EQU AVTCWFL1 01055000 @NM00056 EQU AVTCWFL1 01056000 @NM00055 EQU AVTCWFL1 01057000 @NM00054 EQU AVTCWFL1 01058000 @NM00053 EQU AVTCWFL1 01059000 AVTCOMWN EQU AVTCWFL1 01060000 AVTCWEC1 EQU IEDQAVTD+920 01061000 AVTCWPM1 EQU IEDQAVTD+916 01062000 AVTCAREA EQU IEDQAVTD+912 01063000 AVTFZERO EQU IEDQAVTD+908 01064000 AVTCADDR EQU IEDQAVTD+904 01065000 AVTCOREC EQU IEDQAVTD+900 01066000 @NM00052 EQU IEDQAVTD+892 01067000 AVTCPBCB EQU IEDQAVTD+888 01068000 @NM00051 EQU IEDQAVTD+880 01069000 AVTDSIOB EQU IEDQAVTD+876 01070000 @NM00050 EQU IEDQAVTD+868 01071000 AVTCPRMB EQU IEDQAVTD+864 01072000 @NM00049 EQU IEDQAVTD+856 01073000 AVTCLOSB EQU IEDQAVTD+852 01074000 @NM00048 EQU IEDQAVTD+844 01075000 AVTACTIB EQU IEDQAVTD+840 01076000 @NM00047 EQU IEDQAVTD+836 01077000 AVTOLTEB EQU IEDQAVTD+832 01078000 AVTOLTCH EQU AVTOLTQB+1 01079000 AVTOLTVT EQU AVTOLTQB 01080000 @NM00046 EQU AVTOPCQB+8 01081000 @NM00045 EQU AVTOPCEC+1 01082000 @NM00044 EQU AVTOPCCC 01083000 AVTOPCPO EQU AVTOPCCC 01084000 AVTOPCWA EQU AVTOPCCC 01085000 AVTOPCCH EQU AVTOPCOB+1 01086000 AVTOPCVT EQU AVTOPCOB 01087000 @NM00043 EQU AVTCKPQB+9 01088000 AVTCKPTS EQU AVTCKPQB+8 01089000 @NM00042 EQU AVTCKPEC+1 01090000 @NM00041 EQU AVTCKPCC 01091000 AVTCKPPO EQU AVTCKPCC 01092000 AVTCKPWA EQU AVTCKPCC 01093000 AVTCKPCH EQU AVTCKPTB+1 01094000 AVTCKPVT EQU AVTCKPTB 01095000 @NM00040 EQU IEDQAVTD+796 01096000 AVTBFRTB EQU IEDQAVTD+792 01097000 @NM00039 EQU IEDQAVTD+784 01098000 AVTBFREB EQU IEDQAVTD+780 01099000 AVTTIMQ EQU IEDQAVTD+776 01100000 @NM00038 EQU IEDQAVTD+772 01101000 AVTIMQPS EQU IEDQAVTD+768 01102000 AVTINOUT EQU IEDQAVTD+766 01103000 AVTREFTM EQU IEDQAVTD+764 01104000 @NM00037 EQU IEDQAVTD+752 01105000 AVTDELYB EQU IEDQAVTD+748 01106000 AVTOCQPT EQU IEDQAVTD+744 01107000 AVTTSOPT EQU IEDQAVTD+740 01108000 AVTSUPPT EQU IEDQAVTD+736 01109000 AVTCBQCB EQU IEDQAVTD+732 01110000 AVTMSGS EQU IEDQAVTD+729 01111000 @NM00036 EQU AVTSYSER 01112000 @NM00035 EQU AVTSYSER 01113000 @NM00034 EQU AVTSYSER 01114000 @NM00033 EQU AVTSYSER 01115000 @NM00032 EQU AVTSYSER 01116000 @NM00031 EQU AVTSYSER 01117000 AVTCMAXN EQU AVTSYSER 01118000 AVTCMINN EQU AVTSYSER 01119000 AVT2260L EQU IEDQAVTD+724 01120000 AVTABEPL EQU AVTADBUF 01121000 AVTHFF EQU AVTCLRHI+2 01122000 @NM00030 EQU AVTCLRHI 01123000 AVTCCLNK EQU AVTCRELE+5 01124000 AVTCCPRI EQU AVTCRELE+4 01125000 AVTCCQCB EQU AVTCCELE+1 01126000 AVTCCKEY EQU AVTCCELE 01127000 AVTDELAD EQU IEDQAVTD+704 01128000 AVTDELEM EQU IEDQAVTD+700 01129000 AVTBSX EQU AVTCKLNK 01130000 AVTOPETR EQU AVTHG01 01131000 @NM00029 EQU AVTCKBYT 01132000 AVTCKONQ EQU AVTCKBYT 01133000 @NM00028 EQU AVTCKBYT 01134000 @NM00027 EQU AVTCKBYT 01135000 @NM00026 EQU AVTCKBYT 01136000 @NM00025 EQU AVTCKBYT 01137000 @NM00024 EQU AVTCKBYT 01138000 @NM00023 EQU AVTCKBYT 01139000 AVTOPERT EQU IEDQAVTD+690 01140000 AVTOPXCL EQU IEDQAVTD+688 01141000 AVTOPERL EQU IEDQAVTD+687 01142000 @NM00022 EQU IEDQAVTD+686 01143000 AVTCKTIM EQU IEDQAVTD+684 01144000 AVTCKELV EQU IEDQAVTD+682 01145000 AVTCPRCD EQU IEDQAVTD+681 01146000 AVTWARMN EQU AVTCKELF 01147000 AVTCRTLN EQU AVTCKELF 01148000 AVTCPIPN EQU AVTCKELF 01149000 AVTCCLCN EQU AVTCKELF 01150000 AVTCINCN EQU AVTCKELF 01151000 @NM00021 EQU AVTCKELF 01152000 AVTCMCPN EQU AVTCKELF 01153000 AVTNQBCK EQU AVTCKELF 01154000 AVTCKQAD EQU IEDQAVTD+677 01155000 AVTSCBSZ EQU IEDQAVTD+676 01156000 @NM00020 EQU IEDQAVTD+672 01157000 AVTCKELE EQU IEDQAVTD+668 01158000 @NM00019 EQU AVTCKPEL+8 01159000 AVTCKRLK EQU AVTCKPEL+5 01160000 AVTCKRPR EQU AVTCKPEL+4 01161000 AVTCKRMQ EQU AVTCKRMV+1 01162000 AVTCKRKY EQU AVTCKRMV 01163000 AVTHK EQU IEDQAVTD+648 01164000 AVTHI EQU IEDQAVTD+644 01165000 AVTIOT EQU IEDQAVTD+640 01166000 AVTNX EQU IEDQAVTD+636 01167000 AVTTONE EQU IEDQAVTD+632 01168000 AVTA3TL EQU IEDQAVTD+628 01169000 AVTDMECB EQU IEDQAVTD+624 01170000 AVTABEND EQU IEDQAVTD+618 01171000 AVTPLCBN EQU IEDQAVTD+616 01172000 @NM00018 EQU AVTSAVTP+1 01173000 @NM00017 EQU AVTSAVTF 01174000 AVTSNA EQU AVTSAVTF 01175000 AVTONSNA EQU AVTSAVTF 01176000 AVTVTMCP EQU AVTSAVTF 01177000 @NM00016 EQU IEDQAVTD+608 01178000 AVTCMBSS EQU IEDQAVTD+604 01179000 AVTRCV EQU IEDQAVTD+600 01180000 AVTSEND EQU IEDQAVTD+596 01181000 AVTCSCH EQU IEDQAVTD+592 01182000 AVTQ1 EQU IEDQAVTD+588 01183000 AVTE7 EQU IEDQAVTD+584 01184000 AVTHB EQU IEDQAVTD+580 01185000 AVTR1 EQU IEDQAVTD+576 01186000 AVTBZ EQU IEDQAVTD+572 01187000 AVTEZ EQU IEDQAVTD+568 01188000 AVTEC EQU IEDQAVTD+564 01189000 AVTEW EQU IEDQAVTD+560 01190000 AVTNDIAL EQU AVTSCOPT 01191000 AVTN2741 EQU AVTSCOPT 01192000 AVTCONCO EQU AVTSCOPT 01193000 AVTCONC EQU AVTSCOPT 01194000 AVTCMBUF EQU AVTSCOPT 01195000 AVTAPDMP EQU AVTSCOPT 01196000 @NM00015 EQU AVTSCOPT 01197000 AVTHA EQU AVTDISP 01198000 AVTEA EQU IEDQAVTD+548 01199000 AVTAX EQU IEDQAVTD+544 01200000 AVTA3 EQU IEDQAVTD+540 01201000 AVTGD EQU IEDQAVTD+536 01202000 AVTAL EQU IEDQAVTD+532 01203000 AVTOLTST EQU AVTHG02 01204000 AVTE8 EQU IEDQAVTD+524 01205000 AVTUI EQU IEDQAVTD+520 01206000 AVTCOMPT EQU IEDQAVTD+516 01207000 AVTCRSRF EQU IEDQAVTD+512 01208000 @NM00014 EQU IEDQAVTD+508 01209000 AVTKA02 EQU IEDQAVTD+504 01210000 AVTOPTPT EQU IEDQAVTD+500 01211000 AVTPCBPT EQU IEDQAVTD+496 01212000 @NM00013 EQU AVTECB1 01213000 AVTCOMP EQU AVTECB1 01214000 @NM00012 EQU AVTECB1 01215000 AVTOPECA EQU IEDQAVTD+488 01216000 AVTOLECA EQU IEDQAVTD+484 01217000 AVTCKECA EQU IEDQAVTD+480 01218000 AVTCWECA EQU IEDQAVTD+476 01219000 AVTCWTCB EQU IEDQAVTD+472 01220000 AVTOLTCB EQU IEDQAVTD+468 01221000 AVTOCTCB EQU IEDQAVTD+464 01222000 AVTCKTCB EQU IEDQAVTD+460 01223000 AVTAS EQU IEDQAVTD+456 01224000 AVTNOLBF EQU IEDQAVTD+454 01225000 AVTNCKPR EQU IEDQAVTD+453 01226000 AVTCIB EQU IEDQAVTD+452 01227000 AVTSPLPT EQU IEDQAVTD+448 01228000 AVTMVBFR EQU IEDQAVTD+444 01229000 AVTSBTA EQU IEDQAVTD+440 01230000 AVTRARTN EQU IEDQAVTD+436 01231000 AVTBSCAN EQU IEDQAVTD+432 01232000 AVTRDYA EQU IEDQAVTD+428 01233000 AVTRNMPT EQU IEDQAVTD+424 01234000 AVTDISTR EQU IEDQAVTD+420 01235000 AVTPARM3 EQU IEDQAVTD+416 01236000 @NM00011 EQU AVTPKF 01237000 @NM00010 EQU AVTPKF 01238000 @NM00009 EQU AVTPKF 01239000 AVTFTCHF EQU AVTPKF 01240000 @NM00008 EQU AVTPKF 01241000 @NM00007 EQU AVTPKF 01242000 @NM00006 EQU AVTPKF 01243000 @NM00005 EQU AVTPKF 01244000 AVTPARM EQU IEDQAVTD+408 01245000 AVTEXS2A EQU IEDQAVTD+402 01246000 AVTEXA2S EQU IEDQAVTD+396 01247000 AVTOCGET EQU IEDQAVTD+392 01248000 AVTCKAVT EQU @NM00003+1 01249000 @NM00004 EQU AVTCKFLG 01250000 AVTCKHLT EQU AVTCKFLG 01251000 AVTCKREQ EQU AVTCKFLG 01252000 AVTCKENV EQU AVTCKFLG 01253000 AVTCKNAC EQU AVTCKFLG 01254000 AVTCKTAC EQU AVTCKFLG 01255000 @NM00002 EQU IEDQAVTD+384 01256000 AVTREADD EQU IEDQAVTD+380 01257000 AVTREADY EQU IEDQAVTD+376 01258000 AVTRACE EQU IEDQAVTD+372 01259000 AVTTCB EQU IEDQAVTD+368 01260000 AVTPASWD EQU IEDQAVTD+360 01261000 AVTCTLCH EQU IEDQAVTD+352 01262000 AVTDOUBL EQU IEDQAVTD+344 01263000 AVTDOUBX EQU IEDQAVTD+336 01264000 AVTDPARM EQU IEDQAVTD+332 01265000 AVTCSTCS EQU IEDQAVTD+328 01266000 AVTDLQ EQU AVTSAVEX+32 01267000 @NM00001 EQU AVTSAVEX 01268000 AVTSAVE4 EQU IEDQAVTD+216 01269000 AVTSAVE3 EQU IEDQAVTD+144 01270000 AVTSAVE2 EQU IEDQAVTD+72 01271000 AVTSAVE1 EQU IEDQAVTD 01272000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 01273000 @ENDDATA EQU * 01274000 END IGC0D10D,(C'PLS2104',0701,77223) 01275000