TITLE 'IGC0C10D, OPERATOR CONTROL MESSAGE MODULE *00001000 ' 00002000 IGC0C10D CSECT , 0001 00003000 @PROLOG BALR @12,0 0001 00004000 @PSTART DS 0H 0001 00005000 USING @PSTART,@12 0001 00006000 * /* @Y17XARM*/ 00007000 * /* @Y17XARM 00008000 IGC0C10D IEDHJN AFTERHJN,HJN MODULE IDENTIFICATION @Y17XARM 00009000 * GOTO BASE; 0153 00010000 B BASE 0153 00011000 *CONVERT: 0154 00012000 * RCONVERT=OCRLN; /* PICK UP RLN */ 00013000 CONVERT SLR RCONVERT,RCONVERT 0154 00014000 IC RCONVERT,OCRLN(,ROPCE) 0154 00015000 * IF OCRLN>'00'X /* IF THERE A RLN */ 00016000 * THEN /* THEN */ 00017000 CLI OCRLN(ROPCE),0 0155 00018000 BNH @RF00155 0155 00019000 * DO; 0156 00020000 *CONVERT1: 0157 00021000 * GEN REFS(RCONVERT,ROPCAVT,RWORK2) SETS(OPCDOUBL,NAMRLN); 0157 00022000 CONVERT1 DS 0H 0157 00023000 * /* @Y17XARM*/ 00024000 CVD RCONVERT,OPCDOUBL(ROPCAVT) /* CONVERT THE RELATIVE */ 00025000 UNPK NAMRLN(3,RWORK2),OPCDOUBL+6(2,ROPCAVT) 00026000 OI NAMRLN+2(RWORK2),X'F0' /* AND PLACE IN MESSAGE */ 00027000 * END; 0158 00028000 * ELSE 0159 00029000 * NAMRLN='ALL'; /* ELSE PLACE ALL */ 00030000 B @RC00155 0159 00031000 @RF00155 MVC NAMRLN(3,RWORK2),@CC01170 0159 00032000 * RETURN; 0160 00033000 @EL00001 DS 0H 0160 00034000 @EF00001 DS 0H 0160 00035000 @ER00001 BR @14 0160 00036000 *BASE: 0161 00037000 * RMSGNO=RZERO; /* PICK UP PASSED MSG NO. */ 00038000 BASE LR RMSGNO,RZERO 0161 00039000 * RFY 0162 00040000 * RZERO UNRSTD; /* @Y17XARM*/ 00041000 * ROPCAVT=RPARM; /* BASE FOR OP CONTROL AVT */ 00042000 LR ROPCAVT,RPARM 0163 00043000 * RFY 0164 00044000 * RPARM UNRSTD; /* @Y17XARM*/ 00045000 * IEDQAPTR=OPCAVTPT; /* BASE FOR TCAM AVT */ 00046000 L IEDQAPTR,OPCAVTPT(,ROPCAVT) 0165 00047000 * ROPCE=OPCCOPCE; /* GET ELEMENT POINTER */ 00048000 L ROPCE,OPCCOPCE(,ROPCAVT) 0166 00049000 * RWORKA=OPCWORK; /* ADDRESS OF WORK AREA */ 00050000 L RWORKA,OPCWORK(,ROPCAVT) 0167 00051000 * OPCMODID='0B'; /* SET UP WRITE MOD NAME @Y17XARM*/ 00052000 MVC OPCMODID(2,ROPCAVT),@CC01172 0168 00053000 * RMSGPT=ADDR(ERRORTAB); /* LOAD ADDR MSG TABLE */ 00054000 LA RMSGPT,ERRORTAB 0169 00055000 *LOCATMSG: 0170 00056000 * IF TABEND=ERREND /* IS THIS THE END OF TABLE */ 00057000 * THEN 0170 00058000 LOCATMSG CLC TABEND(1,RMSGPT),ERREND 0170 00059000 BNE @RF00170 0170 00060000 * DO; 0171 00061000 * END; 0172 00062000 * ELSE 0173 00063000 * DO; 0173 00064000 B @RC00170 0173 00065000 @RF00170 DS 0H 0174 00066000 * IF TABMSGNO^=RMSGNO /* IS THIS THE PROPER MSG */ 00067000 * THEN 0174 00068000 CH RMSGNO,TABMSGNO(,RMSGPT) 0174 00069000 BE @RF00174 0174 00070000 * DO; 0175 00071000 * RMSGPT=RMSGPT+4; /* IF NOT PROPER MSG ADV */ 00072000 AL RMSGPT,@CF00327 0176 00073000 * GOTO LOCATMSG; /* KEEP LOOKING */ 00074000 B LOCATMSG 0177 00075000 * END; 0178 00076000 * ELSE 0179 00077000 * ; 0179 00078000 @RF00174 DS 0H 0180 00079000 * RMSGPT=TABMSGAD; /* PICK UP MSG OFFSET */ 00080000 LH RMSGPT,TABMSGAD(,RMSGPT) 0180 00081000 * RMSGPT=RMSGPT+ADDR(BASE); /* ADD BASE TO OFFSET */ 00082000 LA @15,BASE 0181 00083000 ALR RMSGPT,@15 0181 00084000 * WORLEN=MSGLEN; /* MOVE MSG LEN TO WORKAREA */ 00085000 SLR @15,@15 0182 00086000 IC @15,MSGLEN(,RMSGPT) 0182 00087000 STH @15,WORLEN(,RWORKA) 0182 00088000 * WORMSGAR=MSGSTART(1:MSGLEN);/* MSG TO WORKAREA */ 00089000 MVI WORMSGAR+1(RWORKA),C' ' 0183 00090000 MVC WORMSGAR+2(118,RWORKA),WORMSGAR+1(RWORKA) 0183 00091000 BCTR @15,0 0183 00092000 EX @15,@SM01180 0183 00093000 * IF MSGOFFST>'00'X /* IS AN INSERT NEEDED? */ 00094000 * THEN /* IF YES, */ 00095000 CLI MSGOFFST(RMSGPT),0 0184 00096000 BNH @RF00184 0184 00097000 * DO; 0185 00098000 * RWORK2=RWORKA+MSGOFFST+3;/* INSERT BS */ 00099000 LR RWORK2,RWORKA 0186 00100000 SLR @15,@15 0186 00101000 IC @15,MSGOFFST(,RMSGPT) 0186 00102000 ALR RWORK2,@15 0186 00103000 AL RWORK2,@CF00067 0186 00104000 * IF MSGOFFST>128 /* DOES MSG HAVE AN RLN? */ 00105000 * THEN /* IF YES, */ 00106000 CLI MSGOFFST(RMSGPT),128 0187 00107000 BNH @RF00187 0187 00108000 * DO; 0188 00109000 * RWORK2=RWORK2-128; /* CORRECT INSERT */ 00110000 SL RWORK2,@CF01175 0189 00111000 * IF RMSGNO=CON404& /* PEP TRACE? S05331*/ 00112000 * OCBACKUP(4:4)='/' THEN/* S05331*/ 00113000 CH RMSGNO,CON404 0190 00114000 BNE @RF00190 0190 00115000 CLI OCBACKUP+3(ROPCE),C'/' 0190 00116000 BNE @RF00190 0190 00117000 * RLNSWTH='0'B; /* YES, SW OFF S05331*/ 00118000 NI RLNSWTH(ROPCAVT),B'01111111' 0191 00119000 * ELSE /* NO, ... S05331*/ 00120000 * RLNSWTH='1'B; /* ..., SW ON S05331*/ 00121000 B @RC00190 0192 00122000 @RF00190 OI RLNSWTH(ROPCAVT),B'10000000' 0192 00123000 * END; 0193 00124000 * ELSE 0194 00125000 * RLNSWTH='0'B; /* SET SWITCH */ 00126000 B @RC00187 0194 00127000 @RF00187 NI RLNSWTH(ROPCAVT),B'01111111' 0194 00128000 * NAMFILD=OCBACKUP; /* MOVE NAME TO MESSAGE */ 00129000 @RC00187 MVC NAMFILD(8,RWORK2),OCBACKUP(ROPCE) 0195 00130000 * IF RLNSWTH='1'B /* IR RLN THEN CONVERT RLN */ 00131000 * THEN 0196 00132000 TM RLNSWTH(ROPCAVT),B'10000000' 0196 00133000 BNO @RF00196 0196 00134000 * DO; 0197 00135000 * CALL CONVERT; 0198 00136000 BAL @14,CONVERT 0198 00137000 * END; 0199 00138000 * ELSE 0200 00139000 * ; 0200 00140000 @RF00196 DS 0H 0201 00141000 * IF MSGOFF2>0 /* IS SECOND INSERT NEEDED */ 00142000 * THEN /* IF YES */ 00143000 CLI MSGOFF2(RMSGPT),0 0201 00144000 BNH @RF00201 0201 00145000 * DO; 0202 00146000 * RWORK2=RWORKA+MSGOFF2+3; 0203 00147000 LR RWORK2,RWORKA 0203 00148000 SLR @15,@15 0203 00149000 IC @15,MSGOFF2(,RMSGPT) 0203 00150000 ALR RWORK2,@15 0203 00151000 AL RWORK2,@CF00067 0203 00152000 * IF MSGOFF2>128 /* IS THERE AN RLN? */ 00153000 * THEN /* IF YESS, */ 00154000 CLI MSGOFF2(RMSGPT),128 0204 00155000 BNH @RF00204 0204 00156000 * DO; 0205 00157000 * RWORK2=RWORK2-128; 0206 00158000 SL RWORK2,@CF01175 0206 00159000 * RLNSWTH='1'B; /* SET SWITCH */ 00160000 OI RLNSWTH(ROPCAVT),B'10000000' 0207 00161000 * END; 0208 00162000 * ELSE 0209 00163000 * RLNSWTH='0'B; /* SET SWITCH */ 00164000 B @RC00204 0209 00165000 @RF00204 NI RLNSWTH(ROPCAVT),B'01111111' 0209 00166000 * NAMFILD=OCMODNME; /* MOVE INSERT TO MSG */ 00167000 @RC00204 MVC NAMFILD(8,RWORK2),OCMODNME(ROPCE) 0210 00168000 * IF RLNSWTH='1'B /* IS RLN NEEDED? */ 00169000 * THEN 0211 00170000 TM RLNSWTH(ROPCAVT),B'10000000' 0211 00171000 BNO @RF00211 0211 00172000 * DO; 0212 00173000 * CALL CONVERT; 0213 00174000 BAL @14,CONVERT 0213 00175000 * END; 0214 00176000 * ELSE 0215 00177000 * ; 0215 00178000 @RF00211 DS 0H 0216 00179000 * END; 0216 00180000 * ELSE 0217 00181000 * ; 0217 00182000 @RF00201 DS 0H 0218 00183000 * END; 0218 00184000 * ELSE 0219 00185000 * ; 0219 00186000 @RF00184 DS 0H 0220 00187000 * OPCMODID='07'; /* SET UP WRITE MOD NAME @Y17XARM*/ 00188000 MVC OPCMODID(2,ROPCAVT),@CC01179 0220 00189000 * END; 0221 00190000 * 0222 00191000 * /*****************************************************************/ 00192000 * /* */ 00193000 * /* EPILOGUE: THIS SEGMENT COMPLETES THE EPILOGUE CODE THAT WAS */ 00194000 * /* ALTERED BY THE MODULE PROCEDURE STATEMENT. THE XCTL SYSTEM */ 00195000 * /* MACRO INSTRUCTION IS USED BY THIS SEGMENT TO TRANSFER CONTROL */ 00196000 * /* TO THE NEXT MODULE THAT IS TO BE EXECUTED. @Y17XARM*/ 00197000 * /* */ 00198000 * /*****************************************************************/ 00199000 * 0222 00200000 * RFY 0222 00201000 * RZERO RSTD; /* @Y17XARM*/ 00202000 @RC00170 DS 0H 0223 00203000 * RZERO=RMSGNO; /* SET MESSAGE NUMBER IN REGISTER 00204000 * ZERO (0) @Y17XARM*/ 00205000 LR RZERO,RMSGNO 0223 00206000 * RFY 0224 00207000 * RPARM RSTD; /* @Y17XARM*/ 00208000 * RPARM=ROPCAVT; /* SET THE PARAMETER REGISTER 0225 00209000 * WITH THE POINTER TO THE 0225 00210000 * OPERATOR CONTROL AVT @Y17XARM*/ 00211000 LR RPARM,ROPCAVT 0225 00212000 * GEN EXIT REFS(OPCXCTL,ROPCAVT) NOSEQFLOW; 0226 00213000 * /* @Y17XARM*/ 00214000 * /* @Y17XARM 00215000 XCTL SF=(E,OPCXCTL(ROPCAVT)) TRANSFER CONTROL MACRO @Y17XARM 00216000 * END IGC0C10D 0227 00217000 * 0227 00218000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00219000 */*%INCLUDE SYSLIB (TAVTD ) */ 00220000 */*%INCLUDE SYSLIB (TOPCED ) */ 00221000 */*%INCLUDE SYSLIB (TOPCAVTD) */ 00222000 * 0227 00223000 * ; 0227 00224000 B @EL00001 0227 00225000 @DATA DS 0H 00226000 @SM01180 MVC WORMSGAR(0,RWORKA),MSGSTART(RMSGPT) 00227000 DS 0F 00228000 DS 0F 00229000 @CF00067 DC F'3' 00230000 @CF00327 DC F'4' 00231000 @CF01175 DC F'128' 00232000 DS 0D 00233000 @CC01170 DC C'ALL' 00234000 @CC01172 DC C'0B' 00235000 @CC01179 DC C'07' 00236000 MSG178 DS CL41 00237000 ORG MSG178 00238000 @NM00131 DC AL1(38) 00239000 @NM00132 DC AL1(137) 00240000 @NM00133 DC AL1(0) 00241000 @NM00134 DC CL38'IED178I , CANNOT BE STOPPED' 00242000 ORG MSG178+41 00243000 MSG179 DS CL41 00244000 ORG MSG179 00245000 @NM00135 DC AL1(38) 00246000 @NM00136 DC AL1(137) 00247000 @NM00137 DC AL1(0) 00248000 @NM00138 DC CL38'IED179I , CANNOT BE STARTED' 00249000 ORG MSG179+41 00250000 MSG180 DS CL69 00251000 ORG MSG180 00252000 @NM00139 DC AL1(66) 00253000 @NM00140 DC AL1(59) 00254000 @NM00141 DC AL1(0) 00255000 @NM00142 DC CL66'IED180I STOPLINE IMMEDIATE COMMAND INVALID FOR LINEC00256000 GROUP, ' 00257000 ORG MSG180+69 00258000 MSG392 DS CL60 00259000 ORG MSG392 00260000 @NM00143 DC AL1(57) 00261000 @NM00144 DC AL1(9) 00262000 @NM00145 DC AL1(50) 00263000 @NM00146 DC CL57'IED392I IS NOT ATTACHED TO CONCENTRATOR C00264000 ' 00265000 ORG MSG392+60 00266000 MSG393 DS CL65 00267000 ORG MSG393 00268000 @NM00147 DC AL1(62) 00269000 @NM00148 DC AL1(9) 00270000 @NM00149 DC AL1(22) 00271000 @NM00150 DC CL62'IED393I AND UNLIKE DEVICES, COMMAC00272000 ND REJECTED' 00273000 ORG MSG393+65 00274000 MSG395 DS CL68 00275000 ORG MSG395 00276000 @NM00151 DC AL1(65) 00277000 @NM00152 DC AL1(29) 00278000 @NM00153 DC AL1(58) 00279000 @NM00154 DC CL65'IED395I DISPLAY REQUEST FOR EXCEEDS MAX ADC00280000 DR OF ' 00281000 ORG MSG395+68 00282000 MSG404 DS CL90 00283000 ORG MSG404 00284000 @NM00155 DC AL1(87) 00285000 @NM00156 DC AL1(192) 00286000 @NM00157 DC AL1(0) 00287000 @NM00158 DC CL87'IED404I TRACE ALREADY ACTIVE FOR ANOTHER LINE ON 37C00288000 05 TO WHICH , IS ATTACHED' 00289000 ORG MSG404+90 00290000 MSG389 DS CL28 00291000 ORG MSG389 00292000 @NM00159 DC AL1(25) 00293000 @NM00160 DC AL1(0) 00294000 @NM00161 DC AL1(0) 00295000 @NM00162 DC CL25'IED389I NO LINES INACTIVE' 00296000 ORG MSG389+28 00297000 MSG390 DS CL24 00298000 ORG MSG390 00299000 @NM00163 DC AL1(21) 00300000 @NM00164 DC AL1(0) 00301000 @NM00165 DC AL1(0) 00302000 @NM00166 DC CL21'IED390I NO LINES OPEN' 00303000 ORG MSG390+24 00304000 MSG416 DS CL56 00305000 ORG MSG416 00306000 @NM00167 DC AL1(53) 00307000 @NM00168 DC AL1(14) 00308000 @NM00169 DC AL1(0) 00309000 @NM00170 DC CL53'IED416I 3705 IPL REQUIRED - ACTIVATE ABORTC00310000 ED' 00311000 ORG MSG416+56 00312000 MSG423 DS CL58 00313000 ORG MSG423 00314000 @NM00171 DC AL1(55) 00315000 @NM00172 DC AL1(137) 00316000 @NM00173 DC AL1(0) 00317000 @NM00174 DC CL55'IED423I , TRACE NOT STARTED CORE UNAVAILC00318000 ABLE' 00319000 ORG MSG423+58 00320000 MSG442 DS CL54 00321000 ORG MSG442 00322000 @NM00175 DC AL1(51) 00323000 @NM00176 DC AL1(9) 00324000 @NM00177 DC AL1(0) 00325000 @NM00178 DC CL51'IED442I ACTIVE - SWDEVICE COMMAND REJECTEDC00326000 ' 00327000 ORG MSG442+54 00328000 DS CL1 00329000 ERRORTAB DS CL49 00330000 ORG ERRORTAB 00331000 @NM00179 DC H'178' 00332000 @NM00180 DC AL2(MSG178-BASE) 00333000 @NM00181 DC H'179' 00334000 @NM00182 DC AL2(MSG179-BASE) 00335000 @NM00183 DC H'180' 00336000 @NM00184 DC AL2(MSG180-BASE) 00337000 @NM00185 DC H'392' 00338000 @NM00186 DC AL2(MSG392-BASE) 00339000 @NM00187 DC H'393' 00340000 @NM00188 DC AL2(MSG393-BASE) 00341000 @NM00189 DC H'395' 00342000 @NM00190 DC AL2(MSG395-BASE) 00343000 CON404 DC H'404' 00344000 @NM00191 DC AL2(MSG404-BASE) 00345000 @NM00192 DC H'389' 00346000 @NM00193 DC AL2(MSG389-BASE) 00347000 @NM00194 DC H'390' 00348000 @NM00195 DC AL2(MSG390-BASE) 00349000 @NM00196 DC H'416' 00350000 @NM00197 DC AL2(MSG416-BASE) 00351000 @NM00198 DC H'423' 00352000 @NM00199 DC AL2(MSG423-BASE) 00353000 @NM00200 DC H'442' 00354000 @NM00201 DC AL2(MSG442-BASE) 00355000 ERREND DC X'FF' 00356000 ORG ERRORTAB+49 00357000 DS CL1 00358000 PATCH DC XL104'0' 00359000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00360000 @01 EQU 01 00361000 @02 EQU 02 00362000 @03 EQU 03 00363000 @04 EQU 04 00364000 @05 EQU 05 00365000 @06 EQU 06 00366000 @07 EQU 07 00367000 @08 EQU 08 00368000 @09 EQU 09 00369000 @10 EQU 10 00370000 @11 EQU 11 00371000 @12 EQU 12 00372000 @13 EQU 13 00373000 @14 EQU 14 00374000 @15 EQU 15 00375000 IEDQAPTR EQU @04 00376000 ROPCE EQU @03 00377000 ROPCAVT EQU @02 00378000 RZERO EQU @00 00379000 RPARM EQU @01 00380000 RWORKA EQU @05 00381000 RMSGNO EQU @06 00382000 RMSGPT EQU @07 00383000 RCONVERT EQU @08 00384000 RWORK2 EQU @09 00385000 IEDQAVTD EQU 0 00386000 AVTSAVEX EQU IEDQAVTD+288 00387000 @NM00003 EQU IEDQAVTD+388 00388000 AVTCKFLG EQU @NM00003 00389000 AVTBASE EQU IEDQAVTD+412 00390000 AVTPKF EQU AVTBASE 00391000 AVTHG02 EQU IEDQAVTD+528 00392000 AVTDISP EQU IEDQAVTD+552 00393000 AVTHD EQU IEDQAVTD+556 00394000 AVTSCOPT EQU AVTHD 00395000 AVTSAVTP EQU IEDQAVTD+612 00396000 AVTSAVTF EQU AVTSAVTP 00397000 AVTCKPEL EQU IEDQAVTD+652 00398000 AVTCKRMV EQU AVTCKPEL 00399000 AVTCKELF EQU IEDQAVTD+680 00400000 AVTCKBYT EQU IEDQAVTD+691 00401000 AVTHG01 EQU IEDQAVTD+692 00402000 AVTCKLNK EQU IEDQAVTD+696 00403000 AVTCRELE EQU IEDQAVTD+708 00404000 AVTCCELE EQU AVTCRELE 00405000 AVTCLRHI EQU IEDQAVTD+716 00406000 AVTADBUF EQU IEDQAVTD+720 00407000 AVTSYSER EQU IEDQAVTD+728 00408000 AVTCKPQB EQU IEDQAVTD+804 00409000 AVTCKPTB EQU AVTCKPQB 00410000 AVTCKPEC EQU AVTCKPQB+4 00411000 AVTCKPCC EQU AVTCKPEC 00412000 AVTOPCQB EQU IEDQAVTD+816 00413000 AVTOPCOB EQU AVTOPCQB 00414000 AVTOPCEC EQU AVTOPCQB+4 00415000 AVTOPCCC EQU AVTOPCEC 00416000 AVTOLTQB EQU IEDQAVTD+828 00417000 AVTCWFL1 EQU IEDQAVTD+924 00418000 AVTCWFL2 EQU IEDQAVTD+925 00419000 AVTSUBT EQU IEDQAVTD+948 00420000 AVTIOTR EQU IEDQAVTD+949 00421000 AVTBIT1 EQU IEDQAVTD+1050 00422000 AVTBIT2 EQU IEDQAVTD+1051 00423000 AVTBIT3 EQU IEDQAVTD+1052 00424000 AVTBIT4 EQU IEDQAVTD+1136 00425000 @NM00083 EQU IEDQAVTD+1232 00426000 IEDNSVTD EQU 0 00427000 SAVTDIAG EQU IEDNSVTD 00428000 SAVTDIAF EQU SAVTDIAG 00429000 SAVTLUSQ EQU IEDNSVTD+88 00430000 SAVTTCPU EQU IEDNSVTD+238 00431000 SAVTZELM EQU IEDNSVTD+270 00432000 SAVTRDRV EQU IEDNSVTD+284 00433000 SAVTCKQB EQU IEDNSVTD+300 00434000 SAVTCKTB EQU SAVTCKQB 00435000 SAVTCKEC EQU SAVTCKQB+4 00436000 SAVTCKCC EQU SAVTCKEC 00437000 IEDQOPCE EQU 0 00438000 OCELEM EQU IEDQOPCE+4 00439000 OCUNIT EQU IEDQOPCE+8 00440000 OCRUDEST EQU OCUNIT 00441000 OCCKPKEY EQU OCRUDEST 00442000 OCSCAN EQU OCCKPKEY 00443000 OCOPTCDE EQU IEDQOPCE+12 00444000 OCSWITCH EQU IEDQOPCE+13 00445000 OCFLAG EQU IEDQOPCE+14 00446000 OCRLN EQU IEDQOPCE+15 00447000 @NM00106 EQU IEDQOPCE+16 00448000 OCDEST EQU @NM00106 00449000 OCREQVAL EQU OCDEST+1 00450000 OCLINENO EQU IEDQOPCE+22 00451000 OCTIOT EQU OCLINENO 00452000 OCTRUNIT EQU IEDQOPCE+24 00453000 OCRSID EQU OCTRUNIT 00454000 OCALSTAT EQU OCRSID 00455000 OCPARM EQU IEDQOPCE+28 00456000 OCBACKUP EQU IEDQOPCE+32 00457000 OCMODNME EQU IEDQOPCE+40 00458000 OCIPLWA EQU OCMODNME 00459000 OCCKDATA EQU IEDQOPCE+48 00460000 OCRSTGTM EQU OCCKDATA 00461000 IEDQOPCN EQU 0 00462000 OCLDNME EQU IEDQOPCN 00463000 OCLINTTE EQU OCLDNME 00464000 OCREQFLG EQU OCLINTTE+2 00465000 OCPREFLG EQU OCLINTTE+3 00466000 IEDQOPCD EQU 0 00467000 OPCDOUBL EQU IEDQOPCD 00468000 OPCAVTPT EQU IEDQOPCD+8 00469000 OPCCOPCE EQU IEDQOPCD+12 00470000 OPCSAVE EQU IEDQOPCD+56 00471000 OPCWORK EQU IEDQOPCD+140 00472000 OPCAQCTL EQU IEDQOPCD+180 00473000 OPCXCTL EQU IEDQOPCD+204 00474000 OPCLDNME EQU IEDQOPCD+212 00475000 OPCMODID EQU OPCLDNME+3 00476000 OPCSPEC EQU IEDQOPCD+300 00477000 TABMSG EQU 0 00478000 TABMSGNO EQU TABMSG 00479000 TABEND EQU TABMSGNO 00480000 TABMSGAD EQU TABMSG+2 00481000 MESSAGE EQU 0 00482000 MSGLEN EQU MESSAGE 00483000 MSGOFFST EQU MESSAGE+1 00484000 MSGOFF2 EQU MESSAGE+2 00485000 MSGSTART EQU MESSAGE+3 00486000 WORKAREA EQU 0 00487000 WORLEN EQU WORKAREA 00488000 WORMSGAR EQU WORKAREA+4 00489000 NAMEAREA EQU 0 00490000 NAMFILD EQU NAMEAREA 00491000 NAMRLN EQU NAMEAREA+9 00492000 BUFFER EQU 0 00493000 BTUDSECT EQU 0 00494000 OCCKPKY1 EQU OCCKPKEY 00495000 OCCKPTYP EQU OCCKPKY1 00496000 OCICACTN EQU OCMODNME 00497000 OCICDADR EQU OCICACTN 00498000 OCICSW EQU OCICDADR+3 00499000 OPCAQWD EQU OPCAQCTL 00500000 OPCAQWD1 EQU OPCAQWD 00501000 OPCAQWD2 EQU OPCAQWD+4 00502000 OPCAQWD3 EQU OPCAQWD+8 00503000 @NM00202 EQU OPCSAVE 00504000 @NM00203 EQU @NM00202 00505000 BUFBASE EQU @NM00203+1 00506000 @NM00204 EQU @NM00202+4 00507000 RLNSWTH EQU @NM00204 00508000 OCCIB EQU OCREQVAL 00509000 AGO .@UNREFD START UNREFERENCED COMPONENTS 00510000 WORKBYTE EQU @NM00203 00511000 OPCAQLST EQU OPCAQWD3+1 00512000 OPCAQRQ3 EQU OPCAQWD3 00513000 OPCAQSEC EQU OPCAQWD2+1 00514000 OPCAQRQ2 EQU OPCAQWD2 00515000 OPCAQFST EQU OPCAQWD1+1 00516000 OPCAQREQ EQU OPCAQWD1 00517000 OCICINAC EQU OCICSW 00518000 @NM00112 EQU OCICSW 00519000 OCICATST EQU OCICDADR+1 00520000 OCICTYPE EQU OCICDADR 00521000 @NM00111 EQU OCCKPKY1 00522000 OCCKPENV EQU OCCKPKY1 00523000 OCCKPRST EQU OCCKPTYP 00524000 OCCKPNCP EQU OCCKPTYP 00525000 OCCKPINC EQU OCCKPTYP 00526000 BTUMOD EQU BTUDSECT+9 00527000 @NM00207 EQU BTUDSECT+7 00528000 BTUSYSRP EQU BTUDSECT+6 00529000 @NM00206 EQU BTUDSECT 00530000 BUFOFFST EQU BUFFER+12 00531000 @NM00205 EQU BUFFER 00532000 NAMCOMMA EQU NAMEAREA+8 00533000 MSGMOD EQU WORMSGAR+28 00534000 @NM00130 EQU WORMSGAR 00535000 @NM00129 EQU WORKAREA+2 00536000 OPCBOTTM EQU IEDQOPCD+1172 00537000 @NM00128 EQU IEDQOPCD+1088 00538000 @NM00127 EQU IEDQOPCD+936 00539000 @NM00126 EQU IEDQOPCD+928 00540000 @NM00125 EQU IEDQOPCD+368 00541000 OPCWAITV EQU IEDQOPCD+364 00542000 OPCTOTCK EQU IEDQOPCD+360 00543000 OPCAPXTL EQU IEDQOPCD+356 00544000 OPCDECR EQU IEDQOPCD+352 00545000 OPCBUFWT EQU IEDQOPCD+348 00546000 OPCWRKSP EQU IEDQOPCD+320 00547000 OPCADGOT EQU IEDQOPCD+318 00548000 OPCRQCNT EQU IEDQOPCD+316 00549000 OPPOLSTP EQU IEDQOPCD+312 00550000 OPCCKCIB EQU IEDQOPCD+308 00551000 OPCEND EQU IEDQOPCD+307 00552000 OPCSTCBS EQU IEDQOPCD+306 00553000 OPCHNEND EQU IEDQOPCD+302 00554000 OPCOQSW EQU IEDQOPCD+301 00555000 @NM00124 EQU OPCSPEC 00556000 @NM00123 EQU OPCSPEC 00557000 @NM00122 EQU OPCSPEC 00558000 @NM00121 EQU OPCSPEC 00559000 OPCFRMCA EQU OPCSPEC 00560000 OPCRSTRT EQU OPCSPEC 00561000 OPCPART EQU OPCSPEC 00562000 OPCALTD EQU OPCSPEC 00563000 OPCBFEND EQU IEDQOPCD+296 00564000 OPCBFIRS EQU IEDQOPCD+292 00565000 OPCAVBUF EQU IEDQOPCD+290 00566000 @NM00120 EQU IEDQOPCD+289 00567000 OPCCLNTS EQU IEDQOPCD+288 00568000 OPCHA8 EQU IEDQOPCD+286 00569000 OPCBFREQ EQU IEDQOPCD+284 00570000 OPCFREBF EQU IEDQOPCD+280 00571000 OPCGETBF EQU IEDQOPCD+276 00572000 OPCNEXT EQU IEDQOPCD+272 00573000 OPCFMDFC EQU IEDQOPCD+268 00574000 OPCSCNC EQU IEDQOPCD+264 00575000 OPCHORTG EQU IEDQOPCD+260 00576000 OPCHORT EQU IEDQOPCD+256 00577000 OPCCKPTL EQU IEDQOPCD+252 00578000 OPCCKPTF EQU IEDQOPCD+248 00579000 OPCWAITA EQU IEDQOPCD+244 00580000 OPCWAITR EQU IEDQOPCD+240 00581000 OPCWAITP EQU IEDQOPCD+236 00582000 OPCWAITO EQU IEDQOPCD+232 00583000 OPCWAITN EQU IEDQOPCD+228 00584000 OPCWAITL EQU IEDQOPCD+224 00585000 OPCWAITC EQU IEDQOPCD+220 00586000 @NM00119 EQU OPCLDNME+5 00587000 @NM00118 EQU OPCLDNME 00588000 OPCWAIT EQU IEDQOPCD+192 00589000 OPCCKERB EQU IEDQOPCD+164 00590000 OPCBFERB EQU IEDQOPCD+148 00591000 OPCFLAG2 EQU IEDQOPCD+147 00592000 OPCFLAG1 EQU IEDQOPCD+146 00593000 OPCWRKSZ EQU IEDQOPCD+144 00594000 OPCRSAVE EQU IEDQOPCD+132 00595000 OPCQCBAD EQU IEDQOPCD+128 00596000 OPCTRMWA EQU IEDQOPCD+52 00597000 OPCPSTWT EQU IEDQOPCD+48 00598000 OPCTNTEA EQU IEDQOPCD+44 00599000 OPCPGCK EQU IEDQOPCD+40 00600000 OPCLCB EQU IEDQOPCD+36 00601000 @NM00117 EQU IEDQOPCD+32 00602000 OPCIPLAD EQU IEDQOPCD+28 00603000 OPCTOFLK EQU IEDQOPCD+24 00604000 OPCOPTLK EQU IEDQOPCD+20 00605000 OPCDCBLK EQU IEDQOPCD+16 00606000 @NM00116 EQU OCLDNME+4 00607000 @NM00115 EQU OCPREFLG 00608000 OCTOTEP EQU OCPREFLG 00609000 OCREPOST EQU OCPREFLG 00610000 OCRSPSNT EQU OCPREFLG 00611000 OCBFREQ EQU OCPREFLG 00612000 OCIDLE EQU OCREQFLG 00613000 OCFORCE EQU OCREQFLG 00614000 OCDCARD EQU OCREQFLG 00615000 OCPARTAL EQU OCREQFLG 00616000 OCADNCP EQU OCREQFLG 00617000 @NM00114 EQU OCREQFLG 00618000 @NM00113 EQU OCREQFLG 00619000 OCFLUSHZ EQU OCREQFLG 00620000 OCRESPCT EQU OCLINTTE 00621000 OCCKPTWA EQU OCCKDATA+4 00622000 @NM00110 EQU OCRSTGTM+2 00623000 OCCKDAT2 EQU OCRSTGTM+1 00624000 OCCKDAT1 EQU OCRSTGTM 00625000 OCPTRSAV EQU OCMODNME+4 00626000 OCPUADR EQU OCIPLWA+2 00627000 OCWTGSAV EQU OCIPLWA 00628000 OCDVRDCT EQU OCBACKUP+6 00629000 OCNCP EQU OCBACKUP+4 00630000 OCBUFGOT EQU OCBACKUP+2 00631000 OCBUFNED EQU OCBACKUP 00632000 OCWTG EQU IEDQOPCE+30 00633000 OCRESNUM EQU OCPARM 00634000 OCSEQ EQU OCTRUNIT+2 00635000 @NM00109 EQU OCRSID+1 00636000 OCNONE EQU OCALSTAT 00637000 OCSOME EQU OCALSTAT 00638000 OCALLFLG EQU OCALSTAT 00639000 OCACTREQ EQU OCALSTAT 00640000 OCREDRVE EQU OCALSTAT 00641000 OCSEQIND EQU OCALSTAT 00642000 @NM00108 EQU OCALSTAT 00643000 OCRENTRD EQU OCALSTAT 00644000 OCWTGB EQU OCTIOT 00645000 OCTRMTBL EQU IEDQOPCE+20 00646000 @NM00107 EQU @NM00106+2 00647000 OCCONID EQU OCDEST 00648000 OCRESP EQU OCFLAG 00649000 OCATTACH EQU OCFLAG 00650000 OCSSCP EQU OCFLAG 00651000 OCOUTPUT EQU OCFLAG 00652000 OCLINE EQU OCFLAG 00653000 OCMPP EQU OCFLAG 00654000 OCTOTE EQU OCFLAG 00655000 OCCONSOL EQU OCFLAG 00656000 @NM00105 EQU OCSWITCH 00657000 OCQUCKN EQU OCSWITCH 00658000 OCPRIFLG EQU OCOPTCDE 00659000 @NM00104 EQU OCRUDEST+1 00660000 @NM00103 EQU OCSCAN 00661000 OCNOTUCB EQU OCSCAN 00662000 OCNONAME EQU OCSCAN 00663000 OCALLRLN EQU OCSCAN 00664000 OCDDNAME EQU OCSCAN 00665000 OCDDNRLN EQU OCSCAN 00666000 OCADDR EQU OCSCAN 00667000 OCELMPTR EQU OCELEM+1 00668000 OCELMPRI EQU OCELEM 00669000 OCLINK EQU IEDQOPCE 00670000 SAVTBITN EQU IEDNSVTD+312 00671000 @NM00102 EQU SAVTCKQB+8 00672000 @NM00101 EQU SAVTCKEC+1 00673000 @NM00100 EQU SAVTCKCC 00674000 SAVTCKPO EQU SAVTCKCC 00675000 SAVTCKWA EQU SAVTCKCC 00676000 SAVTCKCH EQU SAVTCKTB+1 00677000 SAVTCKVT EQU SAVTCKTB 00678000 @NM00099 EQU IEDNSVTD+297 00679000 SAVTRDFG EQU SAVTRDRV+12 00680000 @NM00098 EQU SAVTRDRV+5 00681000 SAVTRDPY EQU SAVTRDRV+4 00682000 SAVTRDQB EQU SAVTRDRV+1 00683000 SAVTRDKY EQU SAVTRDRV 00684000 SAVTNID EQU IEDNSVTD+280 00685000 SAVTDVAS EQU IEDNSVTD+276 00686000 SAVTPLSZ EQU IEDNSVTD+274 00687000 @NM00097 EQU IEDNSVTD+273 00688000 SAVTSUBL EQU IEDNSVTD+272 00689000 @NM00096 EQU SAVTZELM+1 00690000 SAVTSUBM EQU SAVTZELM 00691000 SAVTMHDX EQU IEDNSVTD+268 00692000 SAVTNAT1 EQU IEDNSVTD+266 00693000 SAVTSH20 EQU IEDNSVTD+264 00694000 SAVTLCBS EQU IEDNSVTD+260 00695000 SAVTRNMP EQU IEDNSVTD+256 00696000 SAVTTNTX EQU IEDNSVTD+252 00697000 SAVTNAX EQU IEDNSVTD+248 00698000 SAVTSUBV EQU IEDNSVTD+247 00699000 SAVTSUBA EQU IEDNSVTD+246 00700000 SAVTSIBC EQU IEDNSVTD+244 00701000 SAVTBSM EQU IEDNSVTD+240 00702000 SAVTSCPT EQU SAVTTCPU 00703000 SAVTRQTG EQU IEDNSVTD+236 00704000 SAVTRQCH EQU IEDNSVTD+232 00705000 SAVTMAND EQU IEDNSVTD+228 00706000 SAVTSPLN EQU IEDNSVTD+224 00707000 SAVTNADL EQU IEDNSVTD+222 00708000 SAVTNATL EQU IEDNSVTD+220 00709000 SAVTMHTB EQU IEDNSVTD+216 00710000 SAVTSSMH EQU IEDNSVTD+212 00711000 SAVTQRS EQU IEDNSVTD+208 00712000 SAVTRQIN EQU IEDNSVTD+204 00713000 SAVTDFCO EQU IEDNSVTD+200 00714000 SAVTSAO EQU IEDNSVTD+196 00715000 SAVTSARI EQU IEDNSVTD+192 00716000 SAVTSAC EQU IEDNSVTD+188 00717000 SAVTSAI EQU IEDNSVTD+184 00718000 SAVTCSCI EQU IEDNSVTD+180 00719000 SAVTSSRP EQU IEDNSVTD+176 00720000 SAVTSSRQ EQU IEDNSVTD+172 00721000 SAVTSCLU EQU IEDNSVTD+168 00722000 SAVTXTRQ EQU IEDNSVTD+164 00723000 SAVTMVBF EQU IEDNSVTD+160 00724000 @NM00095 EQU IEDNSVTD+148 00725000 SAVTIPCQ EQU IEDNSVTD+144 00726000 @NM00094 EQU IEDNSVTD+136 00727000 SAVTXFMI EQU IEDNSVTD+132 00728000 @NM00093 EQU IEDNSVTD+124 00729000 SAVTXFMO EQU IEDNSVTD+120 00730000 @NM00092 EQU IEDNSVTD+116 00731000 SAVTSSSR EQU IEDNSVTD+112 00732000 SAVTSCPQ EQU IEDNSVTD+108 00733000 SAVTSLCB EQU IEDNSVTD+104 00734000 SAVTLUSR EQU IEDNSVTD+100 00735000 @NM00091 EQU SAVTLUSQ+8 00736000 SAVTLUSP EQU SAVTLUSQ+4 00737000 SAVTLUSB EQU SAVTLUSQ 00738000 @NM00090 EQU IEDNSVTD+84 00739000 SAVTSAT EQU IEDNSVTD+80 00740000 SAVTNAT EQU IEDNSVTD+76 00741000 SAVTCLUP EQU IEDNSVTD+72 00742000 SAVTPIUT EQU IEDNSVTD+68 00743000 SAVTRNTA EQU IEDNSVTD+64 00744000 SAVTDNIR EQU IEDNSVTD+60 00745000 SAVTCNIR EQU IEDNSVTD+56 00746000 SAVTFLDH EQU IEDNSVTD+52 00747000 SAVTSRTN EQU IEDNSVTD+48 00748000 SAVTSREQ EQU IEDNSVTD+44 00749000 SAVTFAIL EQU IEDNSVTD+42 00750000 SAVTSUSE EQU IEDNSVTD+40 00751000 SAVTSIB EQU IEDNSVTD+36 00752000 SAVTPRTN EQU IEDNSVTD+32 00753000 @NM00089 EQU IEDNSVTD+28 00754000 SAVTWH20 EQU IEDNSVTD+26 00755000 SAVTPWT EQU IEDNSVTD+24 00756000 SAVTPRTQ EQU IEDNSVTD+20 00757000 SAVTPREQ EQU IEDNSVTD+16 00758000 SAVTPH20 EQU IEDNSVTD+14 00759000 SAVTPUSE EQU IEDNSVTD+12 00760000 SAVTPLCB EQU IEDNSVTD+8 00761000 SAVTPOOL EQU IEDNSVTD+4 00762000 SAVTPRMT EQU SAVTDIAF 00763000 SAVTVIRT EQU SAVTDIAF 00764000 AVTCPBNO EQU IEDQAVTD+1244 00765000 AVTHRESS EQU IEDQAVTD+1243 00766000 @NM00088 EQU IEDQAVTD+1242 00767000 @NM00087 EQU IEDQAVTD+1241 00768000 @NM00086 EQU IEDQAVTD+1240 00769000 @NM00085 EQU IEDQAVTD+1237 00770000 @NM00084 EQU IEDQAVTD+1236 00771000 AVTHRESE EQU @NM00083 00772000 AVTRADDR EQU IEDQAVTD+1228 00773000 AVTNADDR EQU IEDQAVTD+1224 00774000 AVTHRESN EQU IEDQAVTD+1220 00775000 AVTVOLRN EQU IEDQAVTD+1216 00776000 AVTTOTNN EQU IEDQAVTD+1212 00777000 AVTTRCYN EQU IEDQAVTD+1208 00778000 AVTRCTRN EQU IEDQAVTD+1204 00779000 AVTNOVON EQU IEDQAVTD+1200 00780000 AVTADEBN EQU IEDQAVTD+1196 00781000 AVTVOLRR EQU IEDQAVTD+1192 00782000 AVTTOTNR EQU IEDQAVTD+1188 00783000 AVTTRCYR EQU IEDQAVTD+1184 00784000 AVTRCTRR EQU IEDQAVTD+1180 00785000 AVTNOVOR EQU IEDQAVTD+1176 00786000 AVTADEBR EQU IEDQAVTD+1172 00787000 AVTLODPT EQU IEDQAVTD+1168 00788000 AVTIOBN EQU IEDQAVTD+1164 00789000 AVTIOBR EQU IEDQAVTD+1160 00790000 AVTCPBPT EQU IEDQAVTD+1156 00791000 AVTFCPB EQU IEDQAVTD+1152 00792000 @NM00082 EQU IEDQAVTD+1148 00793000 AVTINCPQ EQU IEDQAVTD+1144 00794000 @NM00081 EQU IEDQAVTD+1140 00795000 @NM00080 EQU IEDQAVTD+1137 00796000 @NM00079 EQU AVTBIT4 00797000 @NM00078 EQU AVTBIT4 00798000 @NM00077 EQU AVTBIT4 00799000 @NM00076 EQU AVTBIT4 00800000 @NM00075 EQU AVTBIT4 00801000 @NM00074 EQU AVTBIT4 00802000 @NM00073 EQU AVTBIT4 00803000 AVTRUFTN EQU AVTBIT4 00804000 @NM00072 EQU IEDQAVTD+1132 00805000 AVTNOBFQ EQU IEDQAVTD+1128 00806000 @NM00071 EQU IEDQAVTD+1124 00807000 AVTDKENQ EQU IEDQAVTD+1120 00808000 @NM00070 EQU IEDQAVTD+1116 00809000 AVTDKAPQ EQU IEDQAVTD+1112 00810000 AVTCOPY EQU IEDQAVTD+1108 00811000 AVTIA EQU IEDQAVTD+1104 00812000 AVTFL EQU IEDQAVTD+1100 00813000 @NM00069 EQU IEDQAVTD+1096 00814000 AVTNCPBQ EQU IEDQAVTD+1092 00815000 AVTTOTNC EQU IEDQAVTD+1088 00816000 AVTCMAX EQU IEDQAVTD+1084 00817000 AVTCMIN EQU IEDQAVTD+1080 00818000 AVTHM02 EQU IEDQAVTD+1076 00819000 AVTOPCIN EQU IEDQAVTD+1074 00820000 AVTDCTLN EQU IEDQAVTD+1072 00821000 AVTOPMSK EQU IEDQAVTD+1068 00822000 AVTDDFT EQU IEDQAVTD+1064 00823000 AVTSTEAL EQU IEDQAVTD+1060 00824000 AVTOPTN EQU IEDQAVTD+1056 00825000 AVTDSKCT EQU IEDQAVTD+1054 00826000 AVTCKRST EQU IEDQAVTD+1053 00827000 AVTSTAN EQU AVTBIT3 00828000 AVTSTACN EQU AVTBIT3 00829000 AVTSTAIN EQU AVTBIT3 00830000 AVTSTAYN EQU AVTBIT3 00831000 AVTOLTBN EQU AVTBIT3 00832000 AVTTSAB EQU AVTBIT3 00833000 AVTRFULN EQU AVTBIT3 00834000 AVTRECVN EQU AVTBIT3 00835000 @NM00068 EQU AVTBIT2 00836000 @NM00067 EQU AVTBIT2 00837000 AVTOPEIN EQU AVTBIT2 00838000 AVTSTRTN EQU AVTBIT2 00839000 AVTTOPOL EQU AVTBIT2 00840000 AVTCOPYN EQU AVTBIT2 00841000 AVTREUSN EQU AVTBIT2 00842000 AVTEXTSC EQU AVTBIT2 00843000 AVTDISKN EQU AVTBIT1 00844000 AVTQUCKN EQU AVTBIT1 00845000 AVTCLOSN EQU AVTBIT1 00846000 AVTREADN EQU AVTBIT1 00847000 AVTDLAYN EQU AVTBIT1 00848000 AVTAQTAN EQU AVTBIT1 00849000 AVTTSON EQU AVTBIT1 00850000 AVTAPLKN EQU AVTBIT1 00851000 AVTDUMBR EQU IEDQAVTD+1048 00852000 AVTDLQX EQU IEDQAVTD+1046 00853000 AVTINTLV EQU IEDQAVTD+1044 00854000 AVTSMCNT EQU IEDQAVTD+1042 00855000 AVTAVFCT EQU IEDQAVTD+1040 00856000 AVTOPCON EQU IEDQAVTD+1038 00857000 AVTOPCNT EQU IEDQAVTD+1036 00858000 AVTLNCNT EQU IEDQAVTD+1034 00859000 AVTKEYLE EQU IEDQAVTD+1032 00860000 AVTHA16 EQU IEDQAVTD+1030 00861000 AVTHA7 EQU IEDQAVTD+1028 00862000 AVTHA4 EQU IEDQAVTD+1026 00863000 AVTHA3 EQU IEDQAVTD+1024 00864000 AVTHA2 EQU IEDQAVTD+1022 00865000 AVTGETMS EQU IEDQAVTD+1021 00866000 @NM00066 EQU IEDQAVTD+1020 00867000 AVTGETMD EQU IEDQAVTD+1016 00868000 AVTGETMN EQU IEDQAVTD+1012 00869000 AVTCWTOT EQU IEDQAVTD+1008 00870000 AVTCWINT EQU IEDQAVTD+956 00871000 AVTDTRAP EQU IEDQAVTD+952 00872000 @NM00065 EQU IEDQAVTD+950 00873000 @NM00064 EQU AVTIOTR 00874000 AVTIOTRH EQU AVTIOTR 00875000 AVTIOTRE EQU AVTIOTR 00876000 @NM00063 EQU AVTSUBT 00877000 AVTSUBPT EQU AVTSUBT 00878000 AVTSUBON EQU AVTSUBT 00879000 AVTAFE30 EQU IEDQAVTD+944 00880000 AVTAFE20 EQU IEDQAVTD+940 00881000 AVTAFE10 EQU IEDQAVTD+936 00882000 AVTCWEC2 EQU IEDQAVTD+932 00883000 AVTCWPM2 EQU IEDQAVTD+928 00884000 AVTCWTS2 EQU IEDQAVTD+927 00885000 AVTCWTS1 EQU IEDQAVTD+926 00886000 AVTCWCLD EQU AVTCWFL2 00887000 AVTCWRAP EQU AVTCWFL2 00888000 @NM00062 EQU AVTCWFL2 00889000 @NM00061 EQU AVTCWFL2 00890000 @NM00060 EQU AVTCWFL2 00891000 @NM00059 EQU AVTCWFL2 00892000 @NM00058 EQU AVTCWFL2 00893000 AVTCWACT EQU AVTCWFL2 00894000 @NM00057 EQU AVTCWFL1 00895000 @NM00056 EQU AVTCWFL1 00896000 @NM00055 EQU AVTCWFL1 00897000 @NM00054 EQU AVTCWFL1 00898000 @NM00053 EQU AVTCWFL1 00899000 @NM00052 EQU AVTCWFL1 00900000 @NM00051 EQU AVTCWFL1 00901000 AVTCOMWN EQU AVTCWFL1 00902000 AVTCWEC1 EQU IEDQAVTD+920 00903000 AVTCWPM1 EQU IEDQAVTD+916 00904000 AVTCAREA EQU IEDQAVTD+912 00905000 AVTFZERO EQU IEDQAVTD+908 00906000 AVTCADDR EQU IEDQAVTD+904 00907000 AVTCOREC EQU IEDQAVTD+900 00908000 @NM00050 EQU IEDQAVTD+892 00909000 AVTCPBCB EQU IEDQAVTD+888 00910000 @NM00049 EQU IEDQAVTD+880 00911000 AVTDSIOB EQU IEDQAVTD+876 00912000 @NM00048 EQU IEDQAVTD+868 00913000 AVTCPRMB EQU IEDQAVTD+864 00914000 @NM00047 EQU IEDQAVTD+856 00915000 AVTCLOSB EQU IEDQAVTD+852 00916000 @NM00046 EQU IEDQAVTD+844 00917000 AVTACTIB EQU IEDQAVTD+840 00918000 @NM00045 EQU IEDQAVTD+836 00919000 AVTOLTEB EQU IEDQAVTD+832 00920000 AVTOLTCH EQU AVTOLTQB+1 00921000 AVTOLTVT EQU AVTOLTQB 00922000 @NM00044 EQU AVTOPCQB+8 00923000 @NM00043 EQU AVTOPCEC+1 00924000 @NM00042 EQU AVTOPCCC 00925000 AVTOPCPO EQU AVTOPCCC 00926000 AVTOPCWA EQU AVTOPCCC 00927000 AVTOPCCH EQU AVTOPCOB+1 00928000 AVTOPCVT EQU AVTOPCOB 00929000 @NM00041 EQU AVTCKPQB+9 00930000 AVTCKPTS EQU AVTCKPQB+8 00931000 @NM00040 EQU AVTCKPEC+1 00932000 @NM00039 EQU AVTCKPCC 00933000 AVTCKPPO EQU AVTCKPCC 00934000 AVTCKPWA EQU AVTCKPCC 00935000 AVTCKPCH EQU AVTCKPTB+1 00936000 AVTCKPVT EQU AVTCKPTB 00937000 @NM00038 EQU IEDQAVTD+796 00938000 AVTBFRTB EQU IEDQAVTD+792 00939000 @NM00037 EQU IEDQAVTD+784 00940000 AVTBFREB EQU IEDQAVTD+780 00941000 AVTTIMQ EQU IEDQAVTD+776 00942000 @NM00036 EQU IEDQAVTD+772 00943000 AVTIMQPS EQU IEDQAVTD+768 00944000 AVTINOUT EQU IEDQAVTD+766 00945000 AVTREFTM EQU IEDQAVTD+764 00946000 @NM00035 EQU IEDQAVTD+752 00947000 AVTDELYB EQU IEDQAVTD+748 00948000 AVTOCQPT EQU IEDQAVTD+744 00949000 AVTTSOPT EQU IEDQAVTD+740 00950000 AVTSUPPT EQU IEDQAVTD+736 00951000 AVTCBQCB EQU IEDQAVTD+732 00952000 AVTMSGS EQU IEDQAVTD+729 00953000 @NM00034 EQU AVTSYSER 00954000 @NM00033 EQU AVTSYSER 00955000 @NM00032 EQU AVTSYSER 00956000 @NM00031 EQU AVTSYSER 00957000 @NM00030 EQU AVTSYSER 00958000 @NM00029 EQU AVTSYSER 00959000 AVTCMAXN EQU AVTSYSER 00960000 AVTCMINN EQU AVTSYSER 00961000 AVT2260L EQU IEDQAVTD+724 00962000 AVTABEPL EQU AVTADBUF 00963000 AVTHFF EQU AVTCLRHI+2 00964000 @NM00028 EQU AVTCLRHI 00965000 AVTCCLNK EQU AVTCRELE+5 00966000 AVTCCPRI EQU AVTCRELE+4 00967000 AVTCCQCB EQU AVTCCELE+1 00968000 AVTCCKEY EQU AVTCCELE 00969000 AVTDELAD EQU IEDQAVTD+704 00970000 AVTDELEM EQU IEDQAVTD+700 00971000 AVTBSX EQU AVTCKLNK 00972000 AVTOPETR EQU AVTHG01 00973000 @NM00027 EQU AVTCKBYT 00974000 AVTCKONQ EQU AVTCKBYT 00975000 @NM00026 EQU AVTCKBYT 00976000 @NM00025 EQU AVTCKBYT 00977000 @NM00024 EQU AVTCKBYT 00978000 @NM00023 EQU AVTCKBYT 00979000 @NM00022 EQU AVTCKBYT 00980000 @NM00021 EQU AVTCKBYT 00981000 AVTOPERT EQU IEDQAVTD+690 00982000 AVTOPXCL EQU IEDQAVTD+688 00983000 AVTOPERL EQU IEDQAVTD+687 00984000 @NM00020 EQU IEDQAVTD+686 00985000 AVTCKTIM EQU IEDQAVTD+684 00986000 AVTCKELV EQU IEDQAVTD+682 00987000 AVTCPRCD EQU IEDQAVTD+681 00988000 AVTWARMN EQU AVTCKELF 00989000 AVTCRTLN EQU AVTCKELF 00990000 AVTCPIPN EQU AVTCKELF 00991000 AVTCCLCN EQU AVTCKELF 00992000 AVTCINCN EQU AVTCKELF 00993000 @NM00019 EQU AVTCKELF 00994000 AVTCMCPN EQU AVTCKELF 00995000 AVTCRDYN EQU AVTCKELF 00996000 AVTCKQAD EQU IEDQAVTD+677 00997000 AVTSCBSZ EQU IEDQAVTD+676 00998000 @NM00018 EQU IEDQAVTD+672 00999000 AVTCKELE EQU IEDQAVTD+668 01000000 @NM00017 EQU AVTCKPEL+8 01001000 AVTCKRLK EQU AVTCKPEL+5 01002000 AVTCKRPR EQU AVTCKPEL+4 01003000 AVTCKRMQ EQU AVTCKRMV+1 01004000 AVTCKRKY EQU AVTCKRMV 01005000 AVTHK EQU IEDQAVTD+648 01006000 AVTHI EQU IEDQAVTD+644 01007000 AVTIOT EQU IEDQAVTD+640 01008000 AVTNX EQU IEDQAVTD+636 01009000 AVTTONE EQU IEDQAVTD+632 01010000 AVTA3TL EQU IEDQAVTD+628 01011000 AVTDMECB EQU IEDQAVTD+624 01012000 AVTABEND EQU IEDQAVTD+618 01013000 AVTPLCBN EQU IEDQAVTD+616 01014000 @NM00016 EQU AVTSAVTP+1 01015000 @NM00015 EQU AVTSAVTF 01016000 AVTSNA EQU AVTSAVTF 01017000 AVTONSNA EQU AVTSAVTF 01018000 AVTVTMCP EQU AVTSAVTF 01019000 @NM00014 EQU IEDQAVTD+608 01020000 AVTCMBSS EQU IEDQAVTD+604 01021000 AVTRCV EQU IEDQAVTD+600 01022000 AVTSEND EQU IEDQAVTD+596 01023000 AVTCSCH EQU IEDQAVTD+592 01024000 AVTQ1 EQU IEDQAVTD+588 01025000 AVTE7 EQU IEDQAVTD+584 01026000 AVTHB EQU IEDQAVTD+580 01027000 AVTR1 EQU IEDQAVTD+576 01028000 AVTBZ EQU IEDQAVTD+572 01029000 AVTEZ EQU IEDQAVTD+568 01030000 AVTEC EQU IEDQAVTD+564 01031000 AVTEW EQU IEDQAVTD+560 01032000 AVTNDIAL EQU AVTSCOPT 01033000 AVTN2741 EQU AVTSCOPT 01034000 AVTCONCO EQU AVTSCOPT 01035000 AVTCONC EQU AVTSCOPT 01036000 AVTCMBUF EQU AVTSCOPT 01037000 AVTAPDMP EQU AVTSCOPT 01038000 @NM00013 EQU AVTSCOPT 01039000 AVTHA EQU AVTDISP 01040000 AVTEA EQU IEDQAVTD+548 01041000 AVTAX EQU IEDQAVTD+544 01042000 AVTA3 EQU IEDQAVTD+540 01043000 AVTGD EQU IEDQAVTD+536 01044000 AVTAL EQU IEDQAVTD+532 01045000 AVTOLTST EQU AVTHG02 01046000 AVTE8 EQU IEDQAVTD+524 01047000 AVTUI EQU IEDQAVTD+520 01048000 AVTCOMPT EQU IEDQAVTD+516 01049000 AVTCRSRF EQU IEDQAVTD+512 01050000 @NM00012 EQU IEDQAVTD+508 01051000 AVTKA02 EQU IEDQAVTD+504 01052000 AVTOPTPT EQU IEDQAVTD+500 01053000 AVTPCBPT EQU IEDQAVTD+496 01054000 AVTOSECB EQU IEDQAVTD+492 01055000 AVTOPECA EQU IEDQAVTD+488 01056000 AVTOLECA EQU IEDQAVTD+484 01057000 AVTCKECA EQU IEDQAVTD+480 01058000 AVTCWECA EQU IEDQAVTD+476 01059000 AVTCWTCB EQU IEDQAVTD+472 01060000 AVTOLTCB EQU IEDQAVTD+468 01061000 AVTOCTCB EQU IEDQAVTD+464 01062000 AVTCKTCB EQU IEDQAVTD+460 01063000 AVTAS EQU IEDQAVTD+456 01064000 AVTNOLBF EQU IEDQAVTD+454 01065000 AVTNCKPR EQU IEDQAVTD+453 01066000 AVTCIB EQU IEDQAVTD+452 01067000 AVTSPLPT EQU IEDQAVTD+448 01068000 AVTMVBFR EQU IEDQAVTD+444 01069000 AVTSBTA EQU IEDQAVTD+440 01070000 AVTRARTN EQU IEDQAVTD+436 01071000 AVTBSCAN EQU IEDQAVTD+432 01072000 AVTRDYA EQU IEDQAVTD+428 01073000 AVTRNMPT EQU IEDQAVTD+424 01074000 AVTDISTR EQU IEDQAVTD+420 01075000 AVTPARM3 EQU IEDQAVTD+416 01076000 @NM00011 EQU AVTPKF 01077000 @NM00010 EQU AVTPKF 01078000 @NM00009 EQU AVTPKF 01079000 AVTFTCHF EQU AVTPKF 01080000 @NM00008 EQU AVTPKF 01081000 @NM00007 EQU AVTPKF 01082000 @NM00006 EQU AVTPKF 01083000 @NM00005 EQU AVTPKF 01084000 AVTPARM EQU IEDQAVTD+408 01085000 AVTEXS2A EQU IEDQAVTD+402 01086000 AVTEXA2S EQU IEDQAVTD+396 01087000 AVTOCGET EQU IEDQAVTD+392 01088000 AVTCKAVT EQU @NM00003+1 01089000 @NM00004 EQU AVTCKFLG 01090000 AVTCKHLT EQU AVTCKFLG 01091000 AVTCKREQ EQU AVTCKFLG 01092000 AVTCKENV EQU AVTCKFLG 01093000 AVTCKNAC EQU AVTCKFLG 01094000 AVTCKTAC EQU AVTCKFLG 01095000 @NM00002 EQU IEDQAVTD+384 01096000 AVTREADD EQU IEDQAVTD+380 01097000 AVTREADY EQU IEDQAVTD+376 01098000 AVTRACE EQU IEDQAVTD+372 01099000 AVTTCB EQU IEDQAVTD+368 01100000 AVTPASWD EQU IEDQAVTD+360 01101000 AVTCTLCH EQU IEDQAVTD+352 01102000 AVTDOUBL EQU IEDQAVTD+344 01103000 AVTDOUBX EQU IEDQAVTD+336 01104000 AVTDPARM EQU IEDQAVTD+332 01105000 AVTCSTCS EQU IEDQAVTD+328 01106000 AVTDLQ EQU AVTSAVEX+32 01107000 @NM00001 EQU AVTSAVEX 01108000 AVTSAVE4 EQU IEDQAVTD+216 01109000 AVTSAVE3 EQU IEDQAVTD+144 01110000 AVTSAVE2 EQU IEDQAVTD+72 01111000 AVTSAVE1 EQU IEDQAVTD 01112000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 01113000 @RC00155 EQU @EL00001 01114000 @RC00190 EQU @RC00187 01115000 @ENDDATA EQU * 01116000 END IGC0C10D,(C'PLS0705',0701,76364) 01117000