TITLE 'IGCAG10D, CHANGE NEG POLL/SS PAUSE, SWITCH EP/NCP *00001000 ' 00002000 IGCAG10D CSECT , 0001 00003000 @PROLOG DS 0H 0002 00004000 * 0350 00005000 USING *,RBASE 00006000 LR RBASE,RF /* SET UP ADDRESSIBILITY */ 00007000 IGCAG10D IEDHJN START,HJN 00008000 */* */ 00009000 * 0351 00010000 * /* INITIALIZATION */ 00011000 * ROPCAVT=RPARM; /* OP CONTROL AVT ADDRESS */ 00012000 LR ROPCAVT,RPARM 0351 00013000 * ROPCE=OPCCOPCE; /* CURRENT ELEMENT ADDRESS */ 00014000 L ROPCE,OPCCOPCE(,ROPCAVT) 0352 00015000 * RAVT=OPCAVTPT; /* TCAM AVT ADDRESS */ 00016000 L RAVT,OPCAVTPT(,ROPCAVT) 0353 00017000 * RWORK=OPCWORK; /* OP CONTROL WORK AREA */ 00018000 L RWORK,OPCWORK(,ROPCAVT) 0354 00019000 * RSAVE=ADDR(OPCSAVE); /* OP CONTROL SAVE AREA */ 00020000 LA RSAVE,OPCSAVE(,ROPCAVT) 0355 00021000 */* */ 00022000 * 0356 00023000 * IF OCRESP=OFF THEN /* REQUEST FROM OP SERVICES */ 00024000 TM OCRESP(ROPCE),B'00000001' 0356 00025000 BNZ @RF00356 0356 00026000 * CALL REQUEST; /* YES... PROCESS REQUEST */ 00027000 BAL @14,REQUEST 0357 00028000 * ELSE 0358 00029000 * CALL RESPONSE; /* PROCESS RESPONSE */ 00030000 B @RC00356 0358 00031000 @RF00356 BAL @14,RESPONSE 0358 00032000 */* */ 00033000 * 0359 00034000 * RPARM=ROPCAVT; /* OP CONTROL AVT ADDRESS */ 00035000 @RC00356 LR RPARM,ROPCAVT 0359 00036000 * GEN REFS(ROPCAVT,OPCXCTL) EXIT; 0360 00037000 XCTL SF=(E,OPCXCTL(ROPCAVT)) 00038000 *REQUEST: 0361 00039000 * PROC OPTIONS(NOSAVE,NOSAVEAREA); 0361 00040000 * 0361 00041000 @EL00001 DS 0H 0361 00042000 @EF00001 DS 0H 0361 00043000 @ER00001 BR @14 0361 00044000 REQUEST DS 0H 0362 00045000 * /*****************************************************************/ 00046000 * /* */ 00047000 * /* THIS ROUTINE PROCESSES REQUESTS FOR CHANGE NEGATIVE POLL */ 00048000 * /* LIMIT, SERVICE SEEKING PAUSE, SWITCH TO EP AND NCP.THE ROUTINE*/ 00049000 * /* BUILDS THE VARIOUS COMMANDS IN A PACKED RU WHICH IS ATTACHED */ 00050000 * /* TO AN OPCE AND XCTLS TO IGC0210D. */ 00051000 * /* */ 00052000 * /*****************************************************************/ 00053000 * 0362 00054000 * RFY 0362 00055000 * RZERO RSTD; 0362 00056000 * SAVE1=RE; /* SAVE REG 14 */ 00057000 STCM RE,15,SAVE1(RWORK) 0363 00058000 * RPARM=1; /* PARAMETER FOR ALLOCBUF */ 00059000 LA RPARM,1 0364 00060000 * CALL ALLOCBUF; /* GET A BUFFER */ 00061000 L @15,OPCGETBF(,ROPCAVT) 0365 00062000 BALR @14,@15 0365 00063000 * OCUNIT=RPARM; /* SAVE BUFFER ADDRESS */ 00064000 ST RPARM,OCUNIT(,ROPCE) 0366 00065000 * OCWTGB=OCWTG; /* SAVE 'WHERE TO GO' */ 00066000 MVC OCWTGB(2,ROPCE),OCWTG(ROPCE) 0367 00067000 * RPARM=OCTRMTBL; /* PARAMETER FOR IEDQTNT */ 00068000 LH RPARM,OCTRMTBL(,ROPCE) 0368 00069000 N RPARM,@CF01463 0368 00070000 */* */ 00071000 * 0369 00072000 * CALL IEDQTNT; /* GET TERMINAL TABLE ENTRY */ 00073000 L @15,AVTRNMPT(,RAVT) 0369 00074000 BALR @14,@15 0369 00075000 * RTRM=RPARM; /* SAVE TTE ADDRESS */ 00076000 LR RTRM,RPARM 0370 00077000 * RZERO=OCTRMTBL; /* TNT FOR RESOURCE */ 00078000 LH RZERO,OCTRMTBL(,ROPCE) 0371 00079000 N RZERO,@CF01463 0371 00080000 */* */ 00081000 * 0372 00082000 * DO WHILE TRMTYPE^=TRMLNCP; /* LOCAL NCP? */ 00083000 B @DE00372 0372 00084000 @DL00372 DS 0H 0373 00085000 * CALL CHORTLK; /* NO- GET SUPERIOR RESOURCE */ 00086000 L @15,OPCHORT(,ROPCAVT) 0373 00087000 BALR @14,@15 0373 00088000 * RTRM=RPARM; /* SAVE TTE ADDRESS */ 00089000 LR RTRM,RPARM 0374 00090000 * END; 0375 00091000 @DE00372 LR @09,RTRM 0375 00092000 AL @09,@CF01121 0375 00093000 CLI TRMTYPE-11(@09),X'0F' 0375 00094000 BNE @DL00372 0375 00095000 * PRUTTCIN=RZERO; /* SAVE DESTINATION IN PACKED RU */ 00096000 L @09,OCUNIT(,ROPCE) 0376 00097000 STH RZERO,PRUTTCIN(,@09) 0376 00098000 */* */ 00099000 * 0377 00100000 * RPARM=OCTRMTBL; /* PARAMETER FOR IEDIAP04 */ 00101000 LH RPARM,OCTRMTBL(,ROPCE) 0377 00102000 N RPARM,@CF01463 0377 00103000 * CALL IEDIAP04; /* CONVERT TNT TO NET ADDR */ 00104000 L @09,AVTSAVTP(,RAVT) 0378 00105000 L @15,SAVTTNTX(,@09) 0378 00106000 BALR @14,@15 0378 00107000 */* */ 00108000 * 0379 00109000 * IF OCSWITCH=OCCHGNP| /* NEGATIVE POLL LIMIT OR */ 00110000 * OCSWITCH=OCCHGSSP THEN /* SERVICE SEEKING PAUSE? */ 00111000 CLI OCSWITCH(ROPCE),X'90' 0379 00112000 BE @RT00379 0379 00113000 CLI OCSWITCH(ROPCE),X'A0' 0379 00114000 BNE @RF00379 0379 00115000 @RT00379 DS 0H 0380 00116000 * DO; 0380 00117000 * PRURHTH=RHTHFMD; /* FM DATA RH & TH */ 00118000 L @09,OCUNIT(,ROPCE) 0381 00119000 LR @11,@09 0381 00120000 AL @11,@CF01464 0381 00121000 MVC PRURHTH(4,@11),@CB01445 0381 00122000 * PRUDATCT=LENGTH(IEDXNPLD); /* SET UP DATA COUNT FIELD */ 00123000 MVC PRUDATCT(2,@09),@CH00071 0382 00124000 */* */ 00125000 * 0383 00126000 * /* THE NPL DSECT WILL BE USED TO 00127000 * SET UP THE COMMON AREA OF THE 00128000 * CHANGE COMMANDS */ 00129000 * XNPLNETS=CD1NETS; /* SET UP CONSTANTS */ 00130000 AL @09,@CF00235 0383 00131000 MVI XNPLNETS(@09),X'01' 0383 00132000 * XNPLPRE=CD1PRE; /* SET UP CONSTANTS */ 00133000 MVI XNPLPRE(@09),X'00' 0384 00134000 * XNPLVAL=OCREQVAL; /* SET UP VALUE IN RU */ 00135000 MVC XNPLVAL(1,@09),OCREQVAL(ROPCE) 0385 00136000 * XNPLADDR=RF; /* SET UP NETWORK ADDRESS */ 00137000 STCM RF,3,XNPLADDR(@09) 0386 00138000 * IF OCSWITCH=OCCHGNP THEN /* NEGATIVE POLL LIMIT */ 00139000 CLI OCSWITCH(ROPCE),X'90' 0387 00140000 BNE @RF00387 0387 00141000 * XNPLREQ=CD1CGNPL; /* SET UP COMMAND CODE */ 00142000 MVI XNPLREQ(@09),X'02' 0388 00143000 * ELSE /* SERVICE SEEKING PAUSE */ 00144000 * XNPLREQ=CD1CGSSP; /* SET UP COMMAND CODE */ 00145000 B @RC00387 0389 00146000 @RF00387 L @09,OCUNIT(,ROPCE) 0389 00147000 MVI XNPLREQ+12(@09),X'04' 0389 00148000 * END; 0390 00149000 * 0390 00150000 */* */ 00151000 * 0391 00152000 * ELSE 0391 00153000 * DO; 0391 00154000 B @RC00379 0391 00155000 @RF00379 DS 0H 0392 00156000 * PRURHTH=RHTHNC; /* NETWORK CONTROL RH & TH THE 0392 00157000 * SEP DSECT WILL BE USED TO 0392 00158000 * BUILD THE SWITCH CMDS */ 00159000 L @09,OCUNIT(,ROPCE) 0392 00160000 LR @11,@09 0392 00161000 AL @11,@CF01464 0392 00162000 MVC PRURHTH(4,@11),@CB01447 0392 00163000 * PRUDATCT=LENGTH(IEDXSEPD); /* SET UP DATA COUNT FIELD */ 00164000 MVC PRUDATCT(2,@09),@CH00066 0393 00165000 * XSEPADDR=RF; /* SET UP NETWORK ADDRESS */ 00166000 AL @09,@CF00235 0394 00167000 STCM RF,3,XSEPADDR(@09) 0394 00168000 * IF OCSWITCH=OCSWEP THEN /* SWITCH TO EP */ 00169000 CLI OCSWITCH(ROPCE),X'C0' 0395 00170000 BNE @RF00395 0395 00171000 * XSEPCODE=CD1SWEP; /* SET UP COMMAND CODE */ 00172000 MVI XSEPCODE(@09),X'52' 0396 00173000 * ELSE /* SWITCH TO NCP */ 00174000 * XSEPCODE=CD1SWNCP; /* SET UP COMMAND CODE */ 00175000 B @RC00395 0397 00176000 @RF00395 L @09,OCUNIT(,ROPCE) 0397 00177000 MVI XSEPCODE+12(@09),X'51' 0397 00178000 * END; 0398 00179000 * 0398 00180000 @RC00395 DS 0H 0399 00181000 */* */ 00182000 * 0399 00183000 * OPCMODID=MODID02; /* XCTL TO IGC0210D */ 00184000 @RC00379 MVC OPCMODID(2,ROPCAVT),@CC01451 0399 00185000 * OCWTG=MODIDAG; /* RETURN TO THIS MODULE */ 00186000 MVC OCWTG(2,ROPCE),@CC01449 0400 00187000 * RE=SAVE1; /* RESTORE REG 14 */ 00188000 ICM RE,15,SAVE1(RWORK) 0401 00189000 * RFY 0402 00190000 * RZERO UNRSTD; 0402 00191000 * END REQUEST; /* RETURN */ 00192000 @EL00002 DS 0H 0403 00193000 @EF00002 DS 0H 0403 00194000 @ER00002 BR @14 0403 00195000 *RESPONSE: 0404 00196000 * PROC OPTIONS(NOSAVE,NOSAVEAREA); 0404 00197000 * 0404 00198000 RESPONSE DS 0H 0405 00199000 * /*****************************************************************/ 00200000 * /* */ 00201000 * /* THIS ROUTINE PROCESSES THE RESPONSE TO CHANGE NEGATIVE POLL */ 00202000 * /* LIMIT, CHANGE SERVICE SEEKING PAUSE, SWITCH TO EP AND SWITCH */ 00203000 * /* TO NCP. THE OPCE WITH THE ATTACHED RESPONSE IS RETURNED TO THE*/ 00204000 * /* ORIGINAL REQUESTOR. */ 00205000 * /* */ 00206000 * /*****************************************************************/ 00207000 * 0405 00208000 * IF PRURHSDI=OFF THEN /* NO SENSE INCLUDED */ 00209000 L @09,OCUNIT(,ROPCE) 0405 00210000 AL @09,@CF01464 0405 00211000 TM PRURHSDI(@09),B'00000100' 0405 00212000 BNZ @RF00405 0405 00213000 * OCPARM=OCRCGPOS; /* SET GOOD RETURN CODE */ 00214000 MVC OCPARM(2,ROPCE),@CH00060 0406 00215000 * ELSE 0407 00216000 * IF SNSMAJ=SNSRQREJ&SNSMIN=SNSACTV THEN/* LINE IN REQUESTED MODE*/ 00217000 B @RC00405 0407 00218000 @RF00405 LA @09,12 0407 00219000 AL @09,OCUNIT(,ROPCE) 0407 00220000 CLI SNSMAJ(@09),X'08' 0407 00221000 BNE @RF00407 0407 00222000 CLI SNSMIN(@09),X'15' 0407 00223000 BNE @RF00407 0407 00224000 * OCPARM=OCRCGNEG; /* SET GOOD RETURN CODE */ 00225000 MVC OCPARM(2,ROPCE),@CH00127 0408 00226000 * ELSE 0409 00227000 * OCPARM=OCRCBNEG; /* SET BAD RETURN CODE PREPARE TO 00228000 * XCTL TO */ 00229000 B @RC00407 0409 00230000 @RF00407 MVC OCPARM(2,ROPCE),@CH01117 0409 00231000 * OPCMODID=OCWTGB; /* ORIGINAL REQUESTOR */ 00232000 @RC00407 DS 0H 0410 00233000 @RC00405 MVC OPCMODID(2,ROPCAVT),OCWTGB(ROPCE) 0410 00234000 * END RESPONSE; /* RETURN */ 00235000 @EL00003 DS 0H 0411 00236000 @EF00003 DS 0H 0411 00237000 @ER00003 BR @14 0411 00238000 * END IGCAG10D 0412 00239000 * 0412 00240000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00241000 */*%INCLUDE SYSLIB (TAVTD ) */ 00242000 */*%INCLUDE SYSLIB (TCD1D ) */ 00243000 */*%INCLUDE SYSLIB (TOPCAVTD) */ 00244000 */*%INCLUDE SYSLIB (TOPCED ) */ 00245000 */*%INCLUDE SYSLIB (TPRUD ) */ 00246000 */*%INCLUDE SYSLIB (TTRMD ) */ 00247000 */*%INCLUDE SYSLIB (TSNSD ) */ 00248000 */*%INCLUDE SYSLIB (TXNPLD ) */ 00249000 */*%INCLUDE SYSLIB (TXSEPD ) */ 00250000 */*%INCLUDE SYSLIB (TXSNPD ) */ 00251000 */*%INCLUDE SYSLIB (TXSSPD ) */ 00252000 * 0412 00253000 * ; 0412 00254000 @DATA DS 0H 00255000 @CH00060 DC H'1' 00256000 @CH00127 DC H'2' 00257000 @CH00066 DC H'3' 00258000 @CH00071 DC H'6' 00259000 @CH01117 DC H'-1' 00260000 DS 0F 00261000 DS 0F 00262000 @CF00235 DC F'12' 00263000 @CF01464 DC F'-8' 00264000 @CF01121 DC F'-3' 00265000 @CF01463 DC XL4'0000FFFF' 00266000 DS 0D 00267000 @CC01449 DC C'AG' 00268000 @CC01451 DC C'02' 00269000 @CB01445 DC X'0B80001C' 00270000 @CB01447 DC X'2B80001D' 00271000 PATCH DC 100X'00' 00272000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00273000 @01 EQU 01 00274000 @02 EQU 02 00275000 @03 EQU 03 00276000 @04 EQU 04 00277000 @05 EQU 05 00278000 @06 EQU 06 00279000 @07 EQU 07 00280000 @08 EQU 08 00281000 @09 EQU 09 00282000 @10 EQU 10 00283000 @11 EQU 11 00284000 @12 EQU 12 00285000 @13 EQU 13 00286000 @14 EQU 14 00287000 @15 EQU 15 00288000 IEDQAPTR EQU @04 00289000 ROPCAVT EQU @02 00290000 ROPCE EQU @03 00291000 RZERO EQU @00 00292000 RPARM EQU @01 00293000 RAVT EQU @04 00294000 RWORK EQU @05 00295000 RTRM EQU @08 00296000 RBASE EQU @12 00297000 RSAVE EQU @13 00298000 RE EQU @14 00299000 RF EQU @15 00300000 IEDQAVTD EQU 0 00301000 AVTSAVEX EQU IEDQAVTD+288 00302000 @NM00003 EQU IEDQAVTD+388 00303000 AVTCKFLG EQU @NM00003 00304000 AVTBASE EQU IEDQAVTD+412 00305000 AVTPKF EQU AVTBASE 00306000 AVTRNMPT EQU IEDQAVTD+424 00307000 AVTHG02 EQU IEDQAVTD+528 00308000 AVTDISP EQU IEDQAVTD+552 00309000 AVTHD EQU IEDQAVTD+556 00310000 AVTSCOPT EQU AVTHD 00311000 AVTSAVTP EQU IEDQAVTD+612 00312000 AVTSAVTF EQU AVTSAVTP 00313000 AVTCKPEL EQU IEDQAVTD+652 00314000 AVTCKRMV EQU AVTCKPEL 00315000 AVTCKELF EQU IEDQAVTD+680 00316000 AVTCKBYT EQU IEDQAVTD+691 00317000 AVTHG01 EQU IEDQAVTD+692 00318000 AVTCKLNK EQU IEDQAVTD+696 00319000 AVTCRELE EQU IEDQAVTD+708 00320000 AVTCCELE EQU AVTCRELE 00321000 AVTCLRHI EQU IEDQAVTD+716 00322000 AVTADBUF EQU IEDQAVTD+720 00323000 AVTSYSER EQU IEDQAVTD+728 00324000 AVTCKPQB EQU IEDQAVTD+804 00325000 AVTCKPTB EQU AVTCKPQB 00326000 AVTCKPEC EQU AVTCKPQB+4 00327000 AVTCKPCC EQU AVTCKPEC 00328000 AVTOPCQB EQU IEDQAVTD+816 00329000 AVTOPCOB EQU AVTOPCQB 00330000 AVTOPCEC EQU AVTOPCQB+4 00331000 AVTOPCCC EQU AVTOPCEC 00332000 AVTOLTQB EQU IEDQAVTD+828 00333000 AVTCWFL1 EQU IEDQAVTD+924 00334000 AVTCWFL2 EQU IEDQAVTD+925 00335000 AVTSUBT EQU IEDQAVTD+948 00336000 AVTIOTR EQU IEDQAVTD+949 00337000 AVTBIT1 EQU IEDQAVTD+1050 00338000 AVTBIT2 EQU IEDQAVTD+1051 00339000 AVTBIT3 EQU IEDQAVTD+1052 00340000 AVTBIT4 EQU IEDQAVTD+1136 00341000 @NM00083 EQU IEDQAVTD+1232 00342000 IEDNSVTD EQU 0 00343000 SAVTDIAG EQU IEDNSVTD 00344000 SAVTDIAF EQU SAVTDIAG 00345000 SAVTLUSQ EQU IEDNSVTD+88 00346000 SAVTTCPU EQU IEDNSVTD+238 00347000 SAVTTNTX EQU IEDNSVTD+252 00348000 SAVTZELM EQU IEDNSVTD+270 00349000 SAVTRDRV EQU IEDNSVTD+284 00350000 SAVTCKQB EQU IEDNSVTD+300 00351000 SAVTCKTB EQU SAVTCKQB 00352000 SAVTCKEC EQU SAVTCKQB+4 00353000 SAVTCKCC EQU SAVTCKEC 00354000 IEDQOPCD EQU 0 00355000 OPCAVTPT EQU IEDQOPCD+8 00356000 OPCCOPCE EQU IEDQOPCD+12 00357000 OPCSAVE EQU IEDQOPCD+56 00358000 OPCWORK EQU IEDQOPCD+140 00359000 OPCAQCTL EQU IEDQOPCD+180 00360000 OPCXCTL EQU IEDQOPCD+204 00361000 OPCLDNME EQU IEDQOPCD+212 00362000 OPCMODID EQU OPCLDNME+3 00363000 OPCHORT EQU IEDQOPCD+256 00364000 OPCGETBF EQU IEDQOPCD+276 00365000 OPCSPEC EQU IEDQOPCD+300 00366000 IEDQOPCE EQU 0 00367000 OCELEM EQU IEDQOPCE+4 00368000 OCUNIT EQU IEDQOPCE+8 00369000 OCRUDEST EQU OCUNIT 00370000 OCCKPKEY EQU OCRUDEST 00371000 OCSCAN EQU OCCKPKEY 00372000 OCOPTCDE EQU IEDQOPCE+12 00373000 OCSWITCH EQU IEDQOPCE+13 00374000 OCFLAG EQU IEDQOPCE+14 00375000 OCRESP EQU OCFLAG 00376000 @NM00118 EQU IEDQOPCE+16 00377000 OCDEST EQU @NM00118 00378000 OCREQVAL EQU OCDEST+1 00379000 OCTRMTBL EQU IEDQOPCE+20 00380000 OCLINENO EQU IEDQOPCE+22 00381000 OCTIOT EQU OCLINENO 00382000 OCWTGB EQU OCTIOT 00383000 OCTRUNIT EQU IEDQOPCE+24 00384000 OCRSID EQU OCTRUNIT 00385000 OCALSTAT EQU OCRSID 00386000 OCPARM EQU IEDQOPCE+28 00387000 OCWTG EQU IEDQOPCE+30 00388000 OCBACKUP EQU IEDQOPCE+32 00389000 OCMODNME EQU IEDQOPCE+40 00390000 OCIPLWA EQU OCMODNME 00391000 OCCKDATA EQU IEDQOPCE+48 00392000 OCRSTGTM EQU OCCKDATA 00393000 IEDQOPCN EQU 0 00394000 OCLDNME EQU IEDQOPCN 00395000 OCLINTTE EQU OCLDNME 00396000 OCREQFLG EQU OCLINTTE+2 00397000 OCPREFLG EQU OCLINTTE+3 00398000 IEDPRUQD EQU 0 00399000 PRUTTCIN EQU IEDPRUQD 00400000 PRUDATCT EQU IEDPRUQD+2 00401000 PRUTIC EQU IEDPRUQD+8 00402000 PRUDATA EQU IEDPRUQD+12 00403000 IEDPRUQP EQU 0 00404000 IEDPRUND EQU 0 00405000 PRURHTH EQU IEDPRUND 00406000 PRURH EQU PRURHTH 00407000 PRURHFG0 EQU PRURH 00408000 PRURHSDI EQU PRURHFG0 00409000 PRURHFG1 EQU PRURH+1 00410000 PRURHFG2 EQU PRURH+2 00411000 PRUTH EQU PRURHTH+3 00412000 PRUFIDN EQU PRUTH 00413000 IEDQTRM EQU 0 00414000 TRMSTATE EQU IEDQTRM 00415000 TRMLOG EQU TRMSTATE 00416000 TRMINSEQ EQU IEDQTRM+4 00417000 TLISTCNT EQU TRMINSEQ 00418000 TRMOUTSQ EQU IEDQTRM+6 00419000 TLISTEN EQU TRMOUTSQ 00420000 TRMDSORG EQU TLISTEN 00421000 TRMALTD EQU IEDQTRM+8 00422000 TRMDEVFL EQU IEDQTRM+10 00423000 TRMSTAT EQU IEDQTRM+12 00424000 IEDQTPTR EQU 0 00425000 IEDNTRM EQU 0 00426000 TRMBYTE4 EQU IEDNTRM 00427000 TRMBYTE3 EQU IEDNTRM+1 00428000 TRMBYTE2 EQU IEDNTRM+2 00429000 TRMINPG EQU TRMBYTE2 00430000 TRMBYTE1 EQU IEDNTRM+3 00431000 TRMSCPRQ EQU TRMBYTE1 00432000 TRMBYTE0 EQU IEDNTRM+6 00433000 TRMSIBPT EQU IEDNTRM+7 00434000 TRMTYPE EQU IEDNTRM+11 00435000 IEDSNSD EQU 0 00436000 SNSSYSTM EQU IEDSNSD 00437000 SNSMAJ EQU SNSSYSTM 00438000 SNSMIN EQU SNSSYSTM+1 00439000 SNSUSER EQU IEDSNSD+2 00440000 SNSPTR EQU 0 00441000 IEDXNPLD EQU 0 00442000 XNPLCMD EQU IEDXNPLD 00443000 XNPLCODE EQU XNPLCMD 00444000 XNPLNETS EQU XNPLCODE 00445000 XNPLPRE EQU XNPLCODE+1 00446000 XNPLREQ EQU XNPLCODE+2 00447000 XNPLADDR EQU XNPLCMD+3 00448000 XNPLVAL EQU XNPLCMD+5 00449000 XNPLPTR EQU 0 00450000 IEDXSEPD EQU 0 00451000 XSEPCMD EQU IEDXSEPD 00452000 XSEPCODE EQU XSEPCMD 00453000 XSEPADDR EQU XSEPCMD+1 00454000 XSEPPTR EQU 0 00455000 IEDXSNPD EQU 0 00456000 XSNPCMD EQU IEDXSNPD 00457000 XSNPPTR EQU 0 00458000 IEDXSSPD EQU 0 00459000 XSSPCMD EQU IEDXSSPD 00460000 XSSPCODE EQU XSSPCMD 00461000 XSSPPTR EQU 0 00462000 ALLOCBUF EQU 0 00463000 CHORTLK EQU 0 00464000 IEDIAP04 EQU 0 00465000 IEDQTNT EQU 0 00466000 WORKAREA EQU 0 00467000 SAVE1 EQU WORKAREA 00468000 OPCAQWD EQU OPCAQCTL 00469000 OPCAQWD1 EQU OPCAQWD 00470000 OPCAQWD2 EQU OPCAQWD+4 00471000 OPCAQWD3 EQU OPCAQWD+8 00472000 OCCKPKY1 EQU OCCKPKEY 00473000 OCCKPTYP EQU OCCKPKY1 00474000 OCICACTN EQU OCMODNME 00475000 OCICDADR EQU OCICACTN 00476000 OCICSW EQU OCICDADR+3 00477000 TRMPRE1 EQU TRMBYTE4 00478000 TRMPRE EQU TRMBYTE3 00479000 TRMNCP EQU TRMBYTE3 00480000 TRMPU EQU TRMBYTE3 00481000 TRMLU EQU TRMBYTE3 00482000 TRMLINK EQU TRMBYTE3 00483000 OCCIB EQU OCREQVAL 00484000 TRMOPT EQU IEDQTRM+20 00485000 AGO .@UNREFD START UNREFERENCED COMPONENTS 00486000 @NM00141 EQU TRMLINK 00487000 TRMLSTAT EQU TRMLINK 00488000 TRMLINT EQU TRMLINK 00489000 TRMEPMOD EQU TRMLINK 00490000 TRMLULOG EQU TRMLU 00491000 TRMINERR EQU TRMLU 00492000 TRMLUREQ EQU TRMLU 00493000 TRMSESRQ EQU TRMLU 00494000 TRMTDIFF EQU TRMLU 00495000 TRMLUTM EQU TRMLU 00496000 TRMLUIT EQU TRMLU 00497000 TRMAUTO EQU TRMLU 00498000 TRMPCONT EQU TRMPU 00499000 @NM00140 EQU TRMPU 00500000 TRMNCONT EQU TRMNCP 00501000 TRMQUCKN EQU TRMNCP 00502000 TRMSLOWN EQU TRMNCP 00503000 TRMSYGEN EQU TRMNCP 00504000 TRMNCPCL EQU TRMNCP 00505000 TRMIPLDM EQU TRMNCP 00506000 TRMINOUT EQU TRMPRE 00507000 TRMRDOUT EQU TRMPRE 00508000 TRMNLOUT EQU TRMPRE 00509000 TRMWROUT EQU TRMPRE 00510000 TRMASNXI EQU TRMPRE 00511000 TRMSTMM EQU TRMPRE 00512000 TRMCMODE EQU TRMPRE 00513000 TRMSTPND EQU TRMPRE 00514000 TRMLYNCH EQU TRMPRE1 00515000 TRMSPOUT EQU TRMPRE1 00516000 TRMERLCK EQU TRMPRE1 00517000 TRMQNPL EQU TRMPRE1 00518000 TRMSPACT EQU TRMPRE1 00519000 TRMOCNI EQU TRMPRE1 00520000 TRMSESSN EQU TRMPRE1 00521000 TRMCONT EQU TRMPRE1 00522000 OCICINAC EQU OCICSW 00523000 @NM00124 EQU OCICSW 00524000 OCICATST EQU OCICDADR+1 00525000 OCICTYPE EQU OCICDADR 00526000 @NM00123 EQU OCCKPKY1 00527000 OCCKPENV EQU OCCKPKY1 00528000 OCCKPRST EQU OCCKPTYP 00529000 OCCKPNCP EQU OCCKPTYP 00530000 OCCKPINC EQU OCCKPTYP 00531000 OPCAQLST EQU OPCAQWD3+1 00532000 OPCAQRQ3 EQU OPCAQWD3 00533000 OPCAQSEC EQU OPCAQWD2+1 00534000 OPCAQRQ2 EQU OPCAQWD2 00535000 OPCAQFST EQU OPCAQWD1+1 00536000 OPCAQREQ EQU OPCAQWD1 00537000 XSSPVAL EQU XSSPCMD+5 00538000 XSSPADDR EQU XSSPCMD+3 00539000 XSSPREQ EQU XSSPCODE+2 00540000 XSSPPRE EQU XSSPCODE+1 00541000 XSSPNETS EQU XSSPCODE 00542000 XSNPADDR EQU XSNPCMD+1 00543000 XSNPCODE EQU XSNPCMD 00544000 SNSUSR2 EQU SNSUSER+1 00545000 SNSUSR1 EQU SNSUSER 00546000 TRMSUBST EQU IEDNTRM+12 00547000 TRMRLMCT EQU IEDNTRM+10 00548000 TRMCOHTG EQU TRMSIBPT+1 00549000 TRMGPCNT EQU TRMSIBPT 00550000 TRMBUFRD EQU TRMBYTE0 00551000 TRMSNA EQU TRMBYTE0 00552000 TRMGP EQU TRMBYTE0 00553000 TRMDIAL EQU TRMBYTE0 00554000 @NM00139 EQU TRMBYTE0 00555000 TRMOUTPT EQU TRMBYTE0 00556000 TRMINPUT EQU TRMBYTE0 00557000 TRMUDEF EQU TRMBYTE0 00558000 TRMCOHRT EQU IEDNTRM+4 00559000 TRMSTOTE EQU TRMBYTE1 00560000 TRMCKPRN EQU TRMBYTE1 00561000 TRMTSATN EQU TRMBYTE1 00562000 TRMTRACE EQU TRMBYTE1 00563000 TRMSWBCK EQU TRMBYTE1 00564000 TRMAUTOC EQU TRMBYTE1 00565000 TRMINPTP EQU TRMBYTE1 00566000 TRMWTNEG EQU TRMSCPRQ 00567000 TRMWRBRK EQU TRMBYTE2 00568000 TRMNOSND EQU TRMBYTE2 00569000 TRMPREP EQU TRMBYTE2 00570000 TRMGPACT EQU TRMBYTE2 00571000 TRMANDL EQU TRMBYTE2 00572000 TRMCLOSN EQU TRMINPG 00573000 TRMREMB EQU TRMBYTE2 00574000 TRMRSACT EQU TRMBYTE2 00575000 TRMOPTBL EQU IEDQTRM+18 00576000 TRMOPNO EQU IEDQTRM+17 00577000 TRMCHCIN EQU IEDQTRM+16 00578000 TRMSENSE EQU TRMSTAT+3 00579000 TRMTEMPR EQU TRMSTAT+2 00580000 TRMSIO EQU TRMSTAT 00581000 @NM00138 EQU TRMDEVFL+1 00582000 TRMTPIN EQU TRMDEVFL+1 00583000 TRMNCPI EQU TRMDEVFL+1 00584000 TRMRNTRM EQU TRMDEVFL+1 00585000 @NM00137 EQU TRMDEVFL+1 00586000 TRMLMD EQU TRMDEVFL+1 00587000 TRMCONC EQU TRMDEVFL+1 00588000 TRMTSOB EQU TRMDEVFL 00589000 TRMBFDY EQU TRMDEVFL 00590000 TRMTBLK EQU TRMDEVFL 00591000 TRMSBLK EQU TRMDEVFL 00592000 TRMBLKS EQU TRMDEVFL 00593000 TRMADDC EQU TRMDEVFL 00594000 TRMDDIG EQU TRMDEVFL 00595000 TRMBUFS EQU TRMDEVFL 00596000 TRMPRILK EQU TRMALTD 00597000 TRMLGB EQU TRMDSORG 00598000 TRMUTERM EQU TLISTCNT 00599000 TRMDESTQ EQU IEDQTRM+1 00600000 TRMSCNYN EQU TRMSTATE 00601000 TRMOPTFN EQU TRMSTATE 00602000 TRMHELDN EQU TRMSTATE 00603000 TRMACPTN EQU TRMSTATE 00604000 TRMPREF EQU TRMSTATE 00605000 TRMPROC EQU TRMLOG 00606000 TRMLIST EQU TRMLOG 00607000 TRMLINE EQU TRMSTATE 00608000 @NM00136 EQU IEDPRUND+4 00609000 PRUTHEFI EQU PRUFIDN 00610000 PRUTHUSS EQU PRUFIDN 00611000 PRUTHEIU EQU PRUFIDN 00612000 PRUTHBIU EQU PRUFIDN 00613000 PRUTHTYE EQU PRUFIDN 00614000 @NM00135 EQU PRURHFG2 00615000 PRURHCSI EQU PRURHFG2 00616000 @NM00134 EQU PRURHFG2 00617000 PRURHCDI EQU PRURHFG2 00618000 PRURHEB EQU PRURHFG2 00619000 PRURHBB EQU PRURHFG2 00620000 PRURHPI EQU PRURHFG1 00621000 @NM00133 EQU PRURHFG1 00622000 PRURHER EQU PRURHFG1 00623000 PRURHDR2 EQU PRURHFG1 00624000 @NM00132 EQU PRURHFG1 00625000 PRURHDR1 EQU PRURHFG1 00626000 PRURHEC EQU PRURHFG0 00627000 PRURHBC EQU PRURHFG0 00628000 PRURHFI EQU PRURHFG0 00629000 @NM00131 EQU PRURHFG0 00630000 PRURUCAT EQU PRURHFG0 00631000 PRURHTYP EQU PRURHFG0 00632000 PRUNUNIT EQU PRUTIC+1 00633000 @NM00130 EQU PRUTIC 00634000 @NM00129 EQU IEDPRUQD+4 00635000 @NM00128 EQU OCLDNME+4 00636000 @NM00127 EQU OCPREFLG 00637000 OCTOTEP EQU OCPREFLG 00638000 OCREPOST EQU OCPREFLG 00639000 OCRSPSNT EQU OCPREFLG 00640000 OCBFREQ EQU OCPREFLG 00641000 OCIDLE EQU OCREQFLG 00642000 OCFORCE EQU OCREQFLG 00643000 OCDCARD EQU OCREQFLG 00644000 OCPARTAL EQU OCREQFLG 00645000 OCADNCP EQU OCREQFLG 00646000 @NM00126 EQU OCREQFLG 00647000 @NM00125 EQU OCREQFLG 00648000 OCFLUSHZ EQU OCREQFLG 00649000 OCRESPCT EQU OCLINTTE 00650000 OCCKPTWA EQU OCCKDATA+4 00651000 @NM00122 EQU OCRSTGTM+2 00652000 OCCKDAT2 EQU OCRSTGTM+1 00653000 OCCKDAT1 EQU OCRSTGTM 00654000 OCPTRSAV EQU OCMODNME+4 00655000 OCPUADR EQU OCIPLWA+2 00656000 OCWTGSAV EQU OCIPLWA 00657000 OCDVRDCT EQU OCBACKUP+6 00658000 OCNCP EQU OCBACKUP+4 00659000 OCBUFGOT EQU OCBACKUP+2 00660000 OCBUFNED EQU OCBACKUP 00661000 OCRESNUM EQU OCPARM 00662000 OCSEQ EQU OCTRUNIT+2 00663000 @NM00121 EQU OCRSID+1 00664000 OCNONE EQU OCALSTAT 00665000 OCSOME EQU OCALSTAT 00666000 OCALLFLG EQU OCALSTAT 00667000 OCACTREQ EQU OCALSTAT 00668000 OCREDRVE EQU OCALSTAT 00669000 OCSEQIND EQU OCALSTAT 00670000 @NM00120 EQU OCALSTAT 00671000 OCRENTRD EQU OCALSTAT 00672000 @NM00119 EQU @NM00118+2 00673000 OCCONID EQU OCDEST 00674000 OCRLN EQU IEDQOPCE+15 00675000 OCATTACH EQU OCFLAG 00676000 OCSSCP EQU OCFLAG 00677000 OCOUTPUT EQU OCFLAG 00678000 OCLINE EQU OCFLAG 00679000 OCMPP EQU OCFLAG 00680000 OCTOTE EQU OCFLAG 00681000 OCCONSOL EQU OCFLAG 00682000 @NM00117 EQU OCSWITCH 00683000 OCQUCKN EQU OCSWITCH 00684000 OCPRIFLG EQU OCOPTCDE 00685000 @NM00116 EQU OCRUDEST+1 00686000 @NM00115 EQU OCSCAN 00687000 OCNOTUCB EQU OCSCAN 00688000 OCNONAME EQU OCSCAN 00689000 OCALLRLN EQU OCSCAN 00690000 OCDDNAME EQU OCSCAN 00691000 OCDDNRLN EQU OCSCAN 00692000 OCADDR EQU OCSCAN 00693000 OCELMPTR EQU OCELEM+1 00694000 OCELMPRI EQU OCELEM 00695000 OCLINK EQU IEDQOPCE 00696000 OPCBOTTM EQU IEDQOPCD+1172 00697000 @NM00114 EQU IEDQOPCD+1088 00698000 @NM00113 EQU IEDQOPCD+936 00699000 @NM00112 EQU IEDQOPCD+928 00700000 @NM00111 EQU IEDQOPCD+368 00701000 OPCWAITV EQU IEDQOPCD+364 00702000 OPCTOTCK EQU IEDQOPCD+360 00703000 OPCAPXTL EQU IEDQOPCD+356 00704000 OPCDECR EQU IEDQOPCD+352 00705000 OPCBUFWT EQU IEDQOPCD+348 00706000 OPCWRKSP EQU IEDQOPCD+320 00707000 OPCADGOT EQU IEDQOPCD+318 00708000 OPCRQCNT EQU IEDQOPCD+316 00709000 OPPOLSTP EQU IEDQOPCD+312 00710000 OPCCKCIB EQU IEDQOPCD+308 00711000 OPCEND EQU IEDQOPCD+307 00712000 OPCSTCBS EQU IEDQOPCD+306 00713000 OPCHNEND EQU IEDQOPCD+302 00714000 OPCOQSW EQU IEDQOPCD+301 00715000 @NM00110 EQU OPCSPEC 00716000 @NM00109 EQU OPCSPEC 00717000 @NM00108 EQU OPCSPEC 00718000 @NM00107 EQU OPCSPEC 00719000 OPCFRMCA EQU OPCSPEC 00720000 OPCRSTRT EQU OPCSPEC 00721000 OPCPART EQU OPCSPEC 00722000 OPCALTD EQU OPCSPEC 00723000 OPCBFEND EQU IEDQOPCD+296 00724000 OPCBFIRS EQU IEDQOPCD+292 00725000 OPCAVBUF EQU IEDQOPCD+290 00726000 @NM00106 EQU IEDQOPCD+289 00727000 OPCCLNTS EQU IEDQOPCD+288 00728000 OPCHA8 EQU IEDQOPCD+286 00729000 OPCBFREQ EQU IEDQOPCD+284 00730000 OPCFREBF EQU IEDQOPCD+280 00731000 OPCNEXT EQU IEDQOPCD+272 00732000 OPCFMDFC EQU IEDQOPCD+268 00733000 OPCSCNC EQU IEDQOPCD+264 00734000 OPCHORTG EQU IEDQOPCD+260 00735000 OPCCKPTL EQU IEDQOPCD+252 00736000 OPCCKPTF EQU IEDQOPCD+248 00737000 OPCWAITA EQU IEDQOPCD+244 00738000 OPCWAITR EQU IEDQOPCD+240 00739000 OPCWAITP EQU IEDQOPCD+236 00740000 OPCWAITO EQU IEDQOPCD+232 00741000 OPCWAITN EQU IEDQOPCD+228 00742000 OPCWAITL EQU IEDQOPCD+224 00743000 OPCWAITC EQU IEDQOPCD+220 00744000 @NM00105 EQU OPCLDNME+5 00745000 @NM00104 EQU OPCLDNME 00746000 OPCWAIT EQU IEDQOPCD+192 00747000 OPCCKERB EQU IEDQOPCD+164 00748000 OPCBFERB EQU IEDQOPCD+148 00749000 OPCFLAG2 EQU IEDQOPCD+147 00750000 OPCFLAG1 EQU IEDQOPCD+146 00751000 OPCWRKSZ EQU IEDQOPCD+144 00752000 OPCRSAVE EQU IEDQOPCD+132 00753000 OPCQCBAD EQU IEDQOPCD+128 00754000 OPCTRMWA EQU IEDQOPCD+52 00755000 OPCPSTWT EQU IEDQOPCD+48 00756000 OPCTNTEA EQU IEDQOPCD+44 00757000 OPCPGCK EQU IEDQOPCD+40 00758000 OPCLCB EQU IEDQOPCD+36 00759000 @NM00103 EQU IEDQOPCD+32 00760000 OPCIPLAD EQU IEDQOPCD+28 00761000 OPCTOFLK EQU IEDQOPCD+24 00762000 OPCOPTLK EQU IEDQOPCD+20 00763000 OPCDCBLK EQU IEDQOPCD+16 00764000 OPCDOUBL EQU IEDQOPCD 00765000 SAVTBITN EQU IEDNSVTD+312 00766000 @NM00102 EQU SAVTCKQB+8 00767000 @NM00101 EQU SAVTCKEC+1 00768000 @NM00100 EQU SAVTCKCC 00769000 SAVTCKPO EQU SAVTCKCC 00770000 SAVTCKWA EQU SAVTCKCC 00771000 SAVTCKCH EQU SAVTCKTB+1 00772000 SAVTCKVT EQU SAVTCKTB 00773000 @NM00099 EQU IEDNSVTD+297 00774000 SAVTRDFG EQU SAVTRDRV+12 00775000 @NM00098 EQU SAVTRDRV+5 00776000 SAVTRDPY EQU SAVTRDRV+4 00777000 SAVTRDQB EQU SAVTRDRV+1 00778000 SAVTRDKY EQU SAVTRDRV 00779000 SAVTNID EQU IEDNSVTD+280 00780000 SAVTDVAS EQU IEDNSVTD+276 00781000 SAVTPLSZ EQU IEDNSVTD+274 00782000 @NM00097 EQU IEDNSVTD+273 00783000 SAVTSUBL EQU IEDNSVTD+272 00784000 @NM00096 EQU SAVTZELM+1 00785000 SAVTSUBM EQU SAVTZELM 00786000 SAVTMHDX EQU IEDNSVTD+268 00787000 SAVTNAT1 EQU IEDNSVTD+266 00788000 SAVTSH20 EQU IEDNSVTD+264 00789000 SAVTLCBS EQU IEDNSVTD+260 00790000 SAVTRNMP EQU IEDNSVTD+256 00791000 SAVTNAX EQU IEDNSVTD+248 00792000 SAVTSUBV EQU IEDNSVTD+247 00793000 SAVTSUBA EQU IEDNSVTD+246 00794000 SAVTSIBC EQU IEDNSVTD+244 00795000 SAVTBSM EQU IEDNSVTD+240 00796000 SAVTSCPT EQU SAVTTCPU 00797000 SAVTRQTG EQU IEDNSVTD+236 00798000 SAVTRQCH EQU IEDNSVTD+232 00799000 SAVTMAND EQU IEDNSVTD+228 00800000 SAVTSPLN EQU IEDNSVTD+224 00801000 SAVTNADL EQU IEDNSVTD+222 00802000 SAVTNATL EQU IEDNSVTD+220 00803000 SAVTMHTB EQU IEDNSVTD+216 00804000 SAVTSSMH EQU IEDNSVTD+212 00805000 SAVTQRS EQU IEDNSVTD+208 00806000 SAVTRQIN EQU IEDNSVTD+204 00807000 SAVTDFCO EQU IEDNSVTD+200 00808000 SAVTSAO EQU IEDNSVTD+196 00809000 SAVTSARI EQU IEDNSVTD+192 00810000 SAVTSAC EQU IEDNSVTD+188 00811000 SAVTSAI EQU IEDNSVTD+184 00812000 SAVTCSCI EQU IEDNSVTD+180 00813000 SAVTSSRP EQU IEDNSVTD+176 00814000 SAVTSSRQ EQU IEDNSVTD+172 00815000 SAVTSCLU EQU IEDNSVTD+168 00816000 SAVTXTRQ EQU IEDNSVTD+164 00817000 SAVTMVBF EQU IEDNSVTD+160 00818000 @NM00095 EQU IEDNSVTD+148 00819000 SAVTIPCQ EQU IEDNSVTD+144 00820000 @NM00094 EQU IEDNSVTD+136 00821000 SAVTXFMI EQU IEDNSVTD+132 00822000 @NM00093 EQU IEDNSVTD+124 00823000 SAVTXFMO EQU IEDNSVTD+120 00824000 @NM00092 EQU IEDNSVTD+116 00825000 SAVTSSSR EQU IEDNSVTD+112 00826000 SAVTSCPQ EQU IEDNSVTD+108 00827000 SAVTSLCB EQU IEDNSVTD+104 00828000 SAVTLUSR EQU IEDNSVTD+100 00829000 @NM00091 EQU SAVTLUSQ+8 00830000 SAVTLUSP EQU SAVTLUSQ+4 00831000 SAVTLUSB EQU SAVTLUSQ 00832000 @NM00090 EQU IEDNSVTD+84 00833000 SAVTSAT EQU IEDNSVTD+80 00834000 SAVTNAT EQU IEDNSVTD+76 00835000 SAVTCLUP EQU IEDNSVTD+72 00836000 SAVTPIUT EQU IEDNSVTD+68 00837000 SAVTRNTA EQU IEDNSVTD+64 00838000 SAVTDNIR EQU IEDNSVTD+60 00839000 SAVTCNIR EQU IEDNSVTD+56 00840000 SAVTFLDH EQU IEDNSVTD+52 00841000 SAVTSRTN EQU IEDNSVTD+48 00842000 SAVTSREQ EQU IEDNSVTD+44 00843000 SAVTFAIL EQU IEDNSVTD+42 00844000 SAVTSUSE EQU IEDNSVTD+40 00845000 SAVTSIB EQU IEDNSVTD+36 00846000 SAVTPRTN EQU IEDNSVTD+32 00847000 @NM00089 EQU IEDNSVTD+28 00848000 SAVTWH20 EQU IEDNSVTD+26 00849000 SAVTPWT EQU IEDNSVTD+24 00850000 SAVTPRTQ EQU IEDNSVTD+20 00851000 SAVTPREQ EQU IEDNSVTD+16 00852000 SAVTPH20 EQU IEDNSVTD+14 00853000 SAVTPUSE EQU IEDNSVTD+12 00854000 SAVTPLCB EQU IEDNSVTD+8 00855000 SAVTPOOL EQU IEDNSVTD+4 00856000 SAVTPRMT EQU SAVTDIAF 00857000 SAVTVIRT EQU SAVTDIAF 00858000 AVTCPBNO EQU IEDQAVTD+1244 00859000 AVTHRESS EQU IEDQAVTD+1243 00860000 @NM00088 EQU IEDQAVTD+1242 00861000 @NM00087 EQU IEDQAVTD+1241 00862000 @NM00086 EQU IEDQAVTD+1240 00863000 @NM00085 EQU IEDQAVTD+1237 00864000 @NM00084 EQU IEDQAVTD+1236 00865000 AVTHRESE EQU @NM00083 00866000 AVTRADDR EQU IEDQAVTD+1228 00867000 AVTNADDR EQU IEDQAVTD+1224 00868000 AVTHRESN EQU IEDQAVTD+1220 00869000 AVTVOLRN EQU IEDQAVTD+1216 00870000 AVTTOTNN EQU IEDQAVTD+1212 00871000 AVTTRCYN EQU IEDQAVTD+1208 00872000 AVTRCTRN EQU IEDQAVTD+1204 00873000 AVTNOVON EQU IEDQAVTD+1200 00874000 AVTADEBN EQU IEDQAVTD+1196 00875000 AVTVOLRR EQU IEDQAVTD+1192 00876000 AVTTOTNR EQU IEDQAVTD+1188 00877000 AVTTRCYR EQU IEDQAVTD+1184 00878000 AVTRCTRR EQU IEDQAVTD+1180 00879000 AVTNOVOR EQU IEDQAVTD+1176 00880000 AVTADEBR EQU IEDQAVTD+1172 00881000 AVTLODPT EQU IEDQAVTD+1168 00882000 AVTIOBN EQU IEDQAVTD+1164 00883000 AVTIOBR EQU IEDQAVTD+1160 00884000 AVTCPBPT EQU IEDQAVTD+1156 00885000 AVTFCPB EQU IEDQAVTD+1152 00886000 @NM00082 EQU IEDQAVTD+1148 00887000 AVTINCPQ EQU IEDQAVTD+1144 00888000 @NM00081 EQU IEDQAVTD+1140 00889000 @NM00080 EQU IEDQAVTD+1137 00890000 @NM00079 EQU AVTBIT4 00891000 @NM00078 EQU AVTBIT4 00892000 @NM00077 EQU AVTBIT4 00893000 @NM00076 EQU AVTBIT4 00894000 @NM00075 EQU AVTBIT4 00895000 @NM00074 EQU AVTBIT4 00896000 @NM00073 EQU AVTBIT4 00897000 AVTRUFTN EQU AVTBIT4 00898000 @NM00072 EQU IEDQAVTD+1132 00899000 AVTNOBFQ EQU IEDQAVTD+1128 00900000 @NM00071 EQU IEDQAVTD+1124 00901000 AVTDKENQ EQU IEDQAVTD+1120 00902000 @NM00070 EQU IEDQAVTD+1116 00903000 AVTDKAPQ EQU IEDQAVTD+1112 00904000 AVTCOPY EQU IEDQAVTD+1108 00905000 AVTIA EQU IEDQAVTD+1104 00906000 AVTFL EQU IEDQAVTD+1100 00907000 @NM00069 EQU IEDQAVTD+1096 00908000 AVTNCPBQ EQU IEDQAVTD+1092 00909000 AVTTOTNC EQU IEDQAVTD+1088 00910000 AVTCMAX EQU IEDQAVTD+1084 00911000 AVTCMIN EQU IEDQAVTD+1080 00912000 AVTHM02 EQU IEDQAVTD+1076 00913000 AVTOPCIN EQU IEDQAVTD+1074 00914000 AVTDCTLN EQU IEDQAVTD+1072 00915000 AVTOPMSK EQU IEDQAVTD+1068 00916000 AVTDDFT EQU IEDQAVTD+1064 00917000 AVTSTEAL EQU IEDQAVTD+1060 00918000 AVTOPTN EQU IEDQAVTD+1056 00919000 AVTDSKCT EQU IEDQAVTD+1054 00920000 AVTCKRST EQU IEDQAVTD+1053 00921000 AVTSTAN EQU AVTBIT3 00922000 AVTSTACN EQU AVTBIT3 00923000 AVTSTAIN EQU AVTBIT3 00924000 AVTSTAYN EQU AVTBIT3 00925000 AVTOLTBN EQU AVTBIT3 00926000 AVTTSAB EQU AVTBIT3 00927000 AVTRFULN EQU AVTBIT3 00928000 AVTRECVN EQU AVTBIT3 00929000 @NM00068 EQU AVTBIT2 00930000 @NM00067 EQU AVTBIT2 00931000 AVTOPEIN EQU AVTBIT2 00932000 AVTSTRTN EQU AVTBIT2 00933000 AVTTOPOL EQU AVTBIT2 00934000 AVTCOPYN EQU AVTBIT2 00935000 AVTREUSN EQU AVTBIT2 00936000 AVTEXTSC EQU AVTBIT2 00937000 AVTDISKN EQU AVTBIT1 00938000 AVTQUCKN EQU AVTBIT1 00939000 AVTCLOSN EQU AVTBIT1 00940000 AVTREADN EQU AVTBIT1 00941000 AVTDLAYN EQU AVTBIT1 00942000 AVTAQTAN EQU AVTBIT1 00943000 AVTTSON EQU AVTBIT1 00944000 AVTAPLKN EQU AVTBIT1 00945000 AVTDUMBR EQU IEDQAVTD+1048 00946000 AVTDLQX EQU IEDQAVTD+1046 00947000 AVTINTLV EQU IEDQAVTD+1044 00948000 AVTSMCNT EQU IEDQAVTD+1042 00949000 AVTAVFCT EQU IEDQAVTD+1040 00950000 AVTOPCON EQU IEDQAVTD+1038 00951000 AVTOPCNT EQU IEDQAVTD+1036 00952000 AVTLNCNT EQU IEDQAVTD+1034 00953000 AVTKEYLE EQU IEDQAVTD+1032 00954000 AVTHA16 EQU IEDQAVTD+1030 00955000 AVTHA7 EQU IEDQAVTD+1028 00956000 AVTHA4 EQU IEDQAVTD+1026 00957000 AVTHA3 EQU IEDQAVTD+1024 00958000 AVTHA2 EQU IEDQAVTD+1022 00959000 AVTGETMS EQU IEDQAVTD+1021 00960000 @NM00066 EQU IEDQAVTD+1020 00961000 AVTGETMD EQU IEDQAVTD+1016 00962000 AVTGETMN EQU IEDQAVTD+1012 00963000 AVTCWTOT EQU IEDQAVTD+1008 00964000 AVTCWINT EQU IEDQAVTD+956 00965000 AVTDTRAP EQU IEDQAVTD+952 00966000 @NM00065 EQU IEDQAVTD+950 00967000 @NM00064 EQU AVTIOTR 00968000 AVTIOTRH EQU AVTIOTR 00969000 AVTIOTRE EQU AVTIOTR 00970000 @NM00063 EQU AVTSUBT 00971000 AVTSUBPT EQU AVTSUBT 00972000 AVTSUBON EQU AVTSUBT 00973000 AVTAFE30 EQU IEDQAVTD+944 00974000 AVTAFE20 EQU IEDQAVTD+940 00975000 AVTAFE10 EQU IEDQAVTD+936 00976000 AVTCWEC2 EQU IEDQAVTD+932 00977000 AVTCWPM2 EQU IEDQAVTD+928 00978000 AVTCWTS2 EQU IEDQAVTD+927 00979000 AVTCWTS1 EQU IEDQAVTD+926 00980000 AVTCWCLD EQU AVTCWFL2 00981000 AVTCWRAP EQU AVTCWFL2 00982000 @NM00062 EQU AVTCWFL2 00983000 @NM00061 EQU AVTCWFL2 00984000 @NM00060 EQU AVTCWFL2 00985000 @NM00059 EQU AVTCWFL2 00986000 @NM00058 EQU AVTCWFL2 00987000 AVTCWACT EQU AVTCWFL2 00988000 @NM00057 EQU AVTCWFL1 00989000 @NM00056 EQU AVTCWFL1 00990000 @NM00055 EQU AVTCWFL1 00991000 @NM00054 EQU AVTCWFL1 00992000 @NM00053 EQU AVTCWFL1 00993000 @NM00052 EQU AVTCWFL1 00994000 @NM00051 EQU AVTCWFL1 00995000 AVTCOMWN EQU AVTCWFL1 00996000 AVTCWEC1 EQU IEDQAVTD+920 00997000 AVTCWPM1 EQU IEDQAVTD+916 00998000 AVTCAREA EQU IEDQAVTD+912 00999000 AVTFZERO EQU IEDQAVTD+908 01000000 AVTCADDR EQU IEDQAVTD+904 01001000 AVTCOREC EQU IEDQAVTD+900 01002000 @NM00050 EQU IEDQAVTD+892 01003000 AVTCPBCB EQU IEDQAVTD+888 01004000 @NM00049 EQU IEDQAVTD+880 01005000 AVTDSIOB EQU IEDQAVTD+876 01006000 @NM00048 EQU IEDQAVTD+868 01007000 AVTCPRMB EQU IEDQAVTD+864 01008000 @NM00047 EQU IEDQAVTD+856 01009000 AVTCLOSB EQU IEDQAVTD+852 01010000 @NM00046 EQU IEDQAVTD+844 01011000 AVTACTIB EQU IEDQAVTD+840 01012000 @NM00045 EQU IEDQAVTD+836 01013000 AVTOLTEB EQU IEDQAVTD+832 01014000 AVTOLTCH EQU AVTOLTQB+1 01015000 AVTOLTVT EQU AVTOLTQB 01016000 @NM00044 EQU AVTOPCQB+8 01017000 @NM00043 EQU AVTOPCEC+1 01018000 @NM00042 EQU AVTOPCCC 01019000 AVTOPCPO EQU AVTOPCCC 01020000 AVTOPCWA EQU AVTOPCCC 01021000 AVTOPCCH EQU AVTOPCOB+1 01022000 AVTOPCVT EQU AVTOPCOB 01023000 @NM00041 EQU AVTCKPQB+9 01024000 AVTCKPTS EQU AVTCKPQB+8 01025000 @NM00040 EQU AVTCKPEC+1 01026000 @NM00039 EQU AVTCKPCC 01027000 AVTCKPPO EQU AVTCKPCC 01028000 AVTCKPWA EQU AVTCKPCC 01029000 AVTCKPCH EQU AVTCKPTB+1 01030000 AVTCKPVT EQU AVTCKPTB 01031000 @NM00038 EQU IEDQAVTD+796 01032000 AVTBFRTB EQU IEDQAVTD+792 01033000 @NM00037 EQU IEDQAVTD+784 01034000 AVTBFREB EQU IEDQAVTD+780 01035000 AVTTIMQ EQU IEDQAVTD+776 01036000 @NM00036 EQU IEDQAVTD+772 01037000 AVTIMQPS EQU IEDQAVTD+768 01038000 AVTINOUT EQU IEDQAVTD+766 01039000 AVTREFTM EQU IEDQAVTD+764 01040000 @NM00035 EQU IEDQAVTD+752 01041000 AVTDELYB EQU IEDQAVTD+748 01042000 AVTOCQPT EQU IEDQAVTD+744 01043000 AVTTSOPT EQU IEDQAVTD+740 01044000 AVTSUPPT EQU IEDQAVTD+736 01045000 AVTCBQCB EQU IEDQAVTD+732 01046000 AVTMSGS EQU IEDQAVTD+729 01047000 @NM00034 EQU AVTSYSER 01048000 @NM00033 EQU AVTSYSER 01049000 @NM00032 EQU AVTSYSER 01050000 @NM00031 EQU AVTSYSER 01051000 @NM00030 EQU AVTSYSER 01052000 @NM00029 EQU AVTSYSER 01053000 AVTCMAXN EQU AVTSYSER 01054000 AVTCMINN EQU AVTSYSER 01055000 AVT2260L EQU IEDQAVTD+724 01056000 AVTABEPL EQU AVTADBUF 01057000 AVTHFF EQU AVTCLRHI+2 01058000 @NM00028 EQU AVTCLRHI 01059000 AVTCCLNK EQU AVTCRELE+5 01060000 AVTCCPRI EQU AVTCRELE+4 01061000 AVTCCQCB EQU AVTCCELE+1 01062000 AVTCCKEY EQU AVTCCELE 01063000 AVTDELAD EQU IEDQAVTD+704 01064000 AVTDELEM EQU IEDQAVTD+700 01065000 AVTBSX EQU AVTCKLNK 01066000 AVTOPETR EQU AVTHG01 01067000 @NM00027 EQU AVTCKBYT 01068000 AVTCKONQ EQU AVTCKBYT 01069000 @NM00026 EQU AVTCKBYT 01070000 @NM00025 EQU AVTCKBYT 01071000 @NM00024 EQU AVTCKBYT 01072000 @NM00023 EQU AVTCKBYT 01073000 @NM00022 EQU AVTCKBYT 01074000 @NM00021 EQU AVTCKBYT 01075000 AVTOPERT EQU IEDQAVTD+690 01076000 AVTOPXCL EQU IEDQAVTD+688 01077000 AVTOPERL EQU IEDQAVTD+687 01078000 @NM00020 EQU IEDQAVTD+686 01079000 AVTCKTIM EQU IEDQAVTD+684 01080000 AVTCKELV EQU IEDQAVTD+682 01081000 AVTCPRCD EQU IEDQAVTD+681 01082000 AVTWARMN EQU AVTCKELF 01083000 AVTCRTLN EQU AVTCKELF 01084000 AVTCPIPN EQU AVTCKELF 01085000 AVTCCLCN EQU AVTCKELF 01086000 AVTCINCN EQU AVTCKELF 01087000 @NM00019 EQU AVTCKELF 01088000 AVTCMCPN EQU AVTCKELF 01089000 AVTCRDYN EQU AVTCKELF 01090000 AVTCKQAD EQU IEDQAVTD+677 01091000 AVTSCBSZ EQU IEDQAVTD+676 01092000 @NM00018 EQU IEDQAVTD+672 01093000 AVTCKELE EQU IEDQAVTD+668 01094000 @NM00017 EQU AVTCKPEL+8 01095000 AVTCKRLK EQU AVTCKPEL+5 01096000 AVTCKRPR EQU AVTCKPEL+4 01097000 AVTCKRMQ EQU AVTCKRMV+1 01098000 AVTCKRKY EQU AVTCKRMV 01099000 AVTHK EQU IEDQAVTD+648 01100000 AVTHI EQU IEDQAVTD+644 01101000 AVTIOT EQU IEDQAVTD+640 01102000 AVTNX EQU IEDQAVTD+636 01103000 AVTTONE EQU IEDQAVTD+632 01104000 AVTA3TL EQU IEDQAVTD+628 01105000 AVTDMECB EQU IEDQAVTD+624 01106000 AVTABEND EQU IEDQAVTD+618 01107000 AVTPLCBN EQU IEDQAVTD+616 01108000 @NM00016 EQU AVTSAVTP+1 01109000 @NM00015 EQU AVTSAVTF 01110000 AVTSNA EQU AVTSAVTF 01111000 AVTONSNA EQU AVTSAVTF 01112000 AVTVTMCP EQU AVTSAVTF 01113000 @NM00014 EQU IEDQAVTD+608 01114000 AVTCMBSS EQU IEDQAVTD+604 01115000 AVTRCV EQU IEDQAVTD+600 01116000 AVTSEND EQU IEDQAVTD+596 01117000 AVTCSCH EQU IEDQAVTD+592 01118000 AVTQ1 EQU IEDQAVTD+588 01119000 AVTE7 EQU IEDQAVTD+584 01120000 AVTHB EQU IEDQAVTD+580 01121000 AVTR1 EQU IEDQAVTD+576 01122000 AVTBZ EQU IEDQAVTD+572 01123000 AVTEZ EQU IEDQAVTD+568 01124000 AVTEC EQU IEDQAVTD+564 01125000 AVTEW EQU IEDQAVTD+560 01126000 AVTNDIAL EQU AVTSCOPT 01127000 AVTN2741 EQU AVTSCOPT 01128000 AVTCONCO EQU AVTSCOPT 01129000 AVTCONC EQU AVTSCOPT 01130000 AVTCMBUF EQU AVTSCOPT 01131000 AVTAPDMP EQU AVTSCOPT 01132000 @NM00013 EQU AVTSCOPT 01133000 AVTHA EQU AVTDISP 01134000 AVTEA EQU IEDQAVTD+548 01135000 AVTAX EQU IEDQAVTD+544 01136000 AVTA3 EQU IEDQAVTD+540 01137000 AVTGD EQU IEDQAVTD+536 01138000 AVTAL EQU IEDQAVTD+532 01139000 AVTOLTST EQU AVTHG02 01140000 AVTE8 EQU IEDQAVTD+524 01141000 AVTUI EQU IEDQAVTD+520 01142000 AVTCOMPT EQU IEDQAVTD+516 01143000 AVTCRSRF EQU IEDQAVTD+512 01144000 @NM00012 EQU IEDQAVTD+508 01145000 AVTKA02 EQU IEDQAVTD+504 01146000 AVTOPTPT EQU IEDQAVTD+500 01147000 AVTPCBPT EQU IEDQAVTD+496 01148000 AVTOSECB EQU IEDQAVTD+492 01149000 AVTOPECA EQU IEDQAVTD+488 01150000 AVTOLECA EQU IEDQAVTD+484 01151000 AVTCKECA EQU IEDQAVTD+480 01152000 AVTCWECA EQU IEDQAVTD+476 01153000 AVTCWTCB EQU IEDQAVTD+472 01154000 AVTOLTCB EQU IEDQAVTD+468 01155000 AVTOCTCB EQU IEDQAVTD+464 01156000 AVTCKTCB EQU IEDQAVTD+460 01157000 AVTAS EQU IEDQAVTD+456 01158000 AVTNOLBF EQU IEDQAVTD+454 01159000 AVTNCKPR EQU IEDQAVTD+453 01160000 AVTCIB EQU IEDQAVTD+452 01161000 AVTSPLPT EQU IEDQAVTD+448 01162000 AVTMVBFR EQU IEDQAVTD+444 01163000 AVTSBTA EQU IEDQAVTD+440 01164000 AVTRARTN EQU IEDQAVTD+436 01165000 AVTBSCAN EQU IEDQAVTD+432 01166000 AVTRDYA EQU IEDQAVTD+428 01167000 AVTDISTR EQU IEDQAVTD+420 01168000 AVTPARM3 EQU IEDQAVTD+416 01169000 @NM00011 EQU AVTPKF 01170000 @NM00010 EQU AVTPKF 01171000 @NM00009 EQU AVTPKF 01172000 AVTFTCHF EQU AVTPKF 01173000 @NM00008 EQU AVTPKF 01174000 @NM00007 EQU AVTPKF 01175000 @NM00006 EQU AVTPKF 01176000 @NM00005 EQU AVTPKF 01177000 AVTPARM EQU IEDQAVTD+408 01178000 AVTEXS2A EQU IEDQAVTD+402 01179000 AVTEXA2S EQU IEDQAVTD+396 01180000 AVTOCGET EQU IEDQAVTD+392 01181000 AVTCKAVT EQU @NM00003+1 01182000 @NM00004 EQU AVTCKFLG 01183000 AVTCKHLT EQU AVTCKFLG 01184000 AVTCKREQ EQU AVTCKFLG 01185000 AVTCKENV EQU AVTCKFLG 01186000 AVTCKNAC EQU AVTCKFLG 01187000 AVTCKTAC EQU AVTCKFLG 01188000 @NM00002 EQU IEDQAVTD+384 01189000 AVTREADD EQU IEDQAVTD+380 01190000 AVTREADY EQU IEDQAVTD+376 01191000 AVTRACE EQU IEDQAVTD+372 01192000 AVTTCB EQU IEDQAVTD+368 01193000 AVTPASWD EQU IEDQAVTD+360 01194000 AVTCTLCH EQU IEDQAVTD+352 01195000 AVTDOUBL EQU IEDQAVTD+344 01196000 AVTDOUBX EQU IEDQAVTD+336 01197000 AVTDPARM EQU IEDQAVTD+332 01198000 AVTCSTCS EQU IEDQAVTD+328 01199000 AVTDLQ EQU AVTSAVEX+32 01200000 @NM00001 EQU AVTSAVEX 01201000 AVTSAVE4 EQU IEDQAVTD+216 01202000 AVTSAVE3 EQU IEDQAVTD+144 01203000 AVTSAVE2 EQU IEDQAVTD+72 01204000 AVTSAVE1 EQU IEDQAVTD 01205000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 01206000 @RC00387 EQU @RC00379 01207000 @PB00003 EQU @EL00001 01208000 @PB00002 EQU @PB00003 01209000 @ENDDATA EQU * 01210000 END IGCAG10D,(C'PLS2054',0701,76363) 01211000