TITLE 'IGCMU10D, MODEM SPEED SELECT' 00001000 IGCMU10D CSECT , 0001 00002000 @PROLOG DS 0H 0002 00003000 * 0425 00004000 * @Y17XARN*/ 00005000 USING *,RBASE @Y17XARN*/ 00006000 LR RBASE,RBRANCH @Y17XARN*/ 00007000 IGCMU10D IEDHJN AFTERHJN,HJN @Y17XARN*/ 00008000 */********************************************************************/ 00009000 */* INITIALIZE CONTROL BLOCK REGISTERS. */ 00010000 */********************************************************************/ 00011000 * 0426 00012000 * ROPCAVT=RPARM; /* SET BASE FOR OP CTL AVT */ 00013000 LR ROPCAVT,RPARM 0426 00014000 * IEDQAPTR=OPCAVTPT; /* SET BASE FOR TCAM AVT */ 00015000 L IEDQAPTR,OPCAVTPT(,ROPCAVT) 0427 00016000 * ROPCE=OPCCOPCE; /* PICK UP ELEMENT POINTER */ 00017000 L ROPCE,OPCCOPCE(,ROPCAVT) 0428 00018000 * RSAVE=ADDR(OPCSAVE); /* GET SAVE AREA ADDRESS */ 00019000 LA RSAVE,OPCSAVE(,ROPCAVT) 0429 00020000 */********************************************************************/ 00021000 */* IF OCRESP FLAG IS SET TO 0, THEN THE ELEMENT IS ASSOCIATED */ 00022000 */* WITH A SPEED SELECT COMMAND WHICH NEEDS OPERAND CHECKING */ 00023000 */* AND A BDU SENT. IF OCRESP IS SET TO 1, THEN THE ELEMENT */ 00024000 */* IS ASSOCIATED WITH A RESPONSE TO A BDU SENT ON A PREVIOUS */ 00025000 */* ENTRY INTO THIS MODULE. @Y17XARN*/ 00026000 */********************************************************************/ 00027000 * 0430 00028000 * IF OCRESP='1'B THEN /* DOES ELEMENT POINT TO A 0430 00029000 * RESPONSE BDU ? @Y17XARN*/ 00030000 TM OCRESP(ROPCE),B'00000001' 0430 00031000 BO @RT00430 0430 00032000 * GOTO PRORESP; /* YES, PROCESS THE RESPONSE */ 00033000 * IF RLEN=0 THEN /* ANOTHER OPERAND ? */ 00034000 LTR RLEN,RLEN 0432 00035000 BZ @RT00432 0432 00036000 * GOTO CMDINV; /* NO, COMMAND INVALID */ 00037000 * OCBACKUP=OPCDOUBL; /* SAVE LINE OR GROUP NAME */ 00038000 MVC OCBACKUP(8,ROPCE),OPCDOUBL(ROPCAVT) 0434 00039000 * IF SCANBYTE<'0' THEN /* IS FIRST SCAN BYTE NUMERIC? */ 00040000 CLI SCANBYTE(RAPTR),C'0' 0435 00041000 BL @RT00435 0435 00042000 * GOTO CMDINV; /* MUST SPECIFY GRPNAME,RLN */ 00043000 * 0437 00044000 */********************************************************************/ 00045000 */* SCAN THE FIRST OPERAND FOR VALID NUMERIC OF ONE TO THREE DIGITS. */ 00046000 */* IF THE OPERAND IS A VALID NUMERIC, PUT THE RLN INTO RPARM AND */ 00047000 */* CALL THE 'GRPNAME,RLN' CODE TO FIND THE LINE ENTRY. 'GRPNAME' */ 00048000 */* IS IN OPCDOUBL AT ENTRY. */ 00049000 */********************************************************************/ 00050000 * 0437 00051000 * RRPTR=RAPTR; /* SAVE POINTER TO RLN */ 00052000 LR RRPTR,RAPTR 0437 00053000 * RBYSCN=0; /* INITIALIZE BYTES SCANNED TO 0438 00054000 * ZERO */ 00055000 SLR RBYSCN,RBYSCN 0438 00056000 *SCAN: 0439 00057000 * IF RLEN^=0 THEN /* END OF SCAN ? */ 00058000 SCAN LTR RLEN,RLEN 0439 00059000 BZ @RF00439 0439 00060000 * DO; /* NO, SCAN OPERAND */ 00061000 * IF SCANBYTE=',' THEN /* SCAN BYTE A COMMA ? */ 00062000 CLI SCANBYTE(RAPTR),C',' 0441 00063000 BNE @RF00441 0441 00064000 * DO; /* YES */ 00065000 * RLEN=RLEN-1; /* REDUCE BYTES LEFT TO SCAN */ 00066000 BCTR RLEN,0 0443 00067000 * RAPTR=RAPTR+1; /* INCREMENT PAST COMMA */ 00068000 AL RAPTR,@CF00053 0444 00069000 * END; 0445 00070000 * ELSE 0446 00071000 * IF SCANBYTE>='0'& /* IS DIGIT A VALID NUMERIC ? */ 00072000 * SCANBYTE<=CNINE THEN 0446 00073000 B @RC00441 0446 00074000 @RF00441 CLI SCANBYTE(RAPTR),C'0' 0446 00075000 BL @RF00446 0446 00076000 CLI SCANBYTE(RAPTR),C'9' 0446 00077000 BH @RF00446 0446 00078000 * DO; /* YES */ 00079000 * RBYSCN=RBYSCN+1; /* INCREMENT BYTES SCANNED */ 00080000 LA @11,1 0448 00081000 ALR RBYSCN,@11 0448 00082000 * RAPTR=RAPTR+1; /* INCREMENT TO NEXT BYTE */ 00083000 ALR RAPTR,@11 0449 00084000 * RLEN=RLEN-1; /* REDUCE BYTES LEFT TO SCAN */ 00085000 BCTR RLEN,0 0450 00086000 * GOTO SCAN; /* CONTINUE SCAN */ 00087000 B SCAN 0451 00088000 * END; 0452 00089000 * ELSE /* NO */ 00090000 * GOTO CMDINV; /* COMMAND INVALID */ 00091000 * END; 0454 00092000 * ELSE 0455 00093000 * GOTO CMDINV; /* INVALID COMMAND */ 00094000 * IF RBYSCN=0| /* NO BYTES SCANNED OR */ 00095000 * RBYSCN>AVTHA3 THEN /* MORE THAN 3 BYTES SCANNED? */ 00096000 @RC00439 LTR RBYSCN,RBYSCN 0456 00097000 BZ @RT00456 0456 00098000 CH RBYSCN,AVTHA3(,IEDQAPTR) 0456 00099000 BH @RT00456 0456 00100000 * GOTO CMDINV; /* YES, COMMAND INVALID */ 00101000 */********************************************************************/ 00102000 */* CONVERT RLN FROM EBCDIC TO BINARY AND TEST FOR VALID RLN -- */ 00103000 */* 0 < RLN =< 255 */ 00104000 */********************************************************************/ 00105000 * 0458 00106000 * RBYSCN=RBYSCN-1; /* GET RLN LENGTH LESS 1 FOR 0458 00107000 * EXECUTE INSTRUCTION */ 00108000 BCTR RBYSCN,0 0458 00109000 * GEN REFS(RBYSCN,ROPCE) SETS(RPARM) NOEXIT SEQFLOW; 0459 00110000 * @Y17XARN*/ 00111000 Y@ EX RBYSCN,MOVE PUT RLN IN WORK AREA 00112000 EX RBYSCN,PACK PACK RLN IN WORK AREA 00113000 XC OCBACKUP(EQU6,ROPCE),OCBACKUP(ROPCE) 00114000 CVB RPARM,OCBACKUP(ROPCE) CONVERT RLN TO BINARY 00115000 * OCRLN=RPARM; /* SAVE RLN FOR MESSAGE */ 00116000 STC RPARM,OCRLN(,ROPCE) 0460 00117000 * IF RPARM=0| /* RLN=0 OR */ 00118000 * RPARM>255 THEN /* RLN GREATER THAN MAXIMUM ? */ 00119000 LTR RPARM,RPARM 0461 00120000 BZ @RT00461 0461 00121000 C RPARM,@CF01967 0461 00122000 BH @RT00461 0461 00123000 * GOTO CMDINV; /* YES, COMMAND INVALID */ 00124000 * 0463 00125000 */********************************************************************/ 00126000 */* CALL IEDQCA AT ENTRY POINT FOR 'GRPNAME,RLN' LOOKUP. RETURN WILL */ 00127000 */* BE THE FOLLOWING: */ 00128000 */* RRETURN+0 -- SUCCESSFUL */ 00129000 */* RRETURN+4 -- UNSUCCESSFUL */ 00130000 */* IF UNSUCCESSFUL, ONE OF THE FOLLOWING RETURN CODES WILL BE IN */ 00131000 */* RZERO: */ 00132000 */* X'01' - LGB NOT OPEN (NOTOPEN) */ 00133000 */* X'04' - NAME NOT FOUND (NONAME) */ 00134000 */* X'08' - INVALID RLN (INVRLN) */ 00135000 */* X'20' - NOT A 3705 LINE (NOT3705L) */ 00136000 */* X'02' - NCP NOT ACTIVE (NCPINACT) @Y17XARN*/ 00137000 */********************************************************************/ 00138000 * 0463 00139000 * RBRANCH=OPCDCBLK; /* GET ADDR OF LOOKUP ROUTINE */ 00140000 L RBRANCH,OPCDCBLK(,ROPCAVT) 0463 00141000 * GEN REFS(RRETURN,RBRANCH,SAVELINE) NOSETS FLOWS(SAVELINE); 0464 00142000 BALR RRETURN,RBRANCH /*CALL LOOKUP ROUTINE */ 00143000 B SAVELINE /*GOOD RETURN - SAVE LINE */ 00144000 * /*ENTRY ADDRESS */ 00145000 * OCBACKUP=OPCDOUBL; /* MOVE LGBNAME FOR MSG */ 00146000 MVC OCBACKUP(8,ROPCE),OPCDOUBL(ROPCAVT) 0465 00147000 * IF RZERO=1| /* LGB NOT OPEN OR */ 00148000 * RZERO=8 THEN /* RLN IS INVALID ? */ 00149000 C RZERO,@CF00053 0466 00150000 BE @RT00466 0466 00151000 C RZERO,@CF00058 0466 00152000 BNE @RF00466 0466 00153000 @RT00466 DS 0H 0467 00154000 * RMSGNO=17; /* SET 'LINE NOT OPEN' MSG */ 00155000 LA RMSGNO,17 0467 00156000 * ELSE 0468 00157000 * IF RZERO=32 THEN /* LINE NOT ON 3705 ? */ 00158000 B @RC00466 0468 00159000 @RF00466 C RZERO,@CF00080 0468 00160000 BNE @RF00468 0468 00161000 * RMSGNO=173; /* SET 'NOT 3705 LINE' MSG */ 00162000 LA RMSGNO,173 0469 00163000 * ELSE 0470 00164000 * IF RZERO=NCPINACT THEN /* NCP NOT ACTIVE ? */ 00165000 B @RC00468 0470 00166000 @RF00468 C RZERO,@CF00059 0470 00167000 BNE @RF00470 0470 00168000 * RMSGNO=MSG400; /* SET 'NCP NOT ACTIVE' MSG */ 00169000 LA RMSGNO,400 0471 00170000 * ELSE 0472 00171000 * RMSGNO=173; /* ASSUME NONAME - SET 'NAME NOT 00172000 * FOUND' MSG @Y17XARN*/ 00173000 B @RC00470 0472 00174000 @RF00470 LA RMSGNO,173 0472 00175000 * GOTO WRITE; /* WRITE THE MESSAGE */ 00176000 B WRITE 0473 00177000 * 0474 00178000 */********************************************************************/ 00179000 */* CHECK LAST OPERAND OF SPEED SELECT COMMAND FOR AN L (LOW) */ 00180000 */* OR AN H (HIGH). */ 00181000 */********************************************************************/ 00182000 * 0474 00183000 *SAVELINE: 0474 00184000 * RPARM=RZERO; /* SAVE LINE ENTRY ADDRESS */ 00185000 SAVELINE LR RPARM,RZERO 0474 00186000 * OCBACKUP=OPCDOUBL; /* MOVE LGBNAME FOR MSG */ 00187000 MVC OCBACKUP(8,ROPCE),OPCDOUBL(ROPCAVT) 0475 00188000 * IF RLEN=1 THEN /* ONE BYTE REMAINING ? */ 00189000 C RLEN,@CF00053 0476 00190000 BNE @RF00476 0476 00191000 * DO; /* YES, CHECK IT FOR L OR H */ 00192000 * IF SCANBYTE='L' THEN /* SWITCH TO LOW SPEED ? */ 00193000 CLI SCANBYTE(RAPTR),C'L' 0478 00194000 BNE @RF00478 0478 00195000 * OCWTG(1)='00'X; /* YES, USE OCWTG AS TEMPORARY 0479 00196000 * SWITCH FOR LOW SPEED INDICATOR*/ 00197000 MVI OCWTG(ROPCE),X'00' 0479 00198000 * ELSE 0480 00199000 * IF SCANBYTE='H' THEN /* SWITCH TO HIGH SPEED ? */ 00200000 B @RC00478 0480 00201000 @RF00478 CLI SCANBYTE(RAPTR),C'H' 0480 00202000 BNE @RF00480 0480 00203000 * OCWTG(1)='01'X; /* YES, USE OCWTG AS TEMPORARY 0481 00204000 * SWITCH FOR HIGH SPEED 0481 00205000 * INDICATOR */ 00206000 MVI OCWTG(ROPCE),X'01' 0481 00207000 * ELSE /* NO */ 00208000 * GOTO CMDINV; /* COMMAND INVALID */ 00209000 * END; 0483 00210000 * ELSE 0484 00211000 * GOTO CMDINV; /* COMMAND INVALID */ 00212000 */********************************************************************/ 00213000 */* CHECK LINE ENTRY TO DETERMINE THAT IT IS VALID LINE ENTRY */ 00214000 */* ATTACHED TO A 3705. @Y17XARN*/ 00215000 */********************************************************************/ 00216000 * 0485 00217000 * IEDQTPTR=RPARM; /* SET LINE ENTRY BASE */ 00218000 @RC00476 LR IEDQTPTR,RPARM 0485 00219000 * IF TRMPREF='1'B& /* 3705 RESOURCE? */ 00220000 * TRMTYPE=TRMNSDLC THEN 0486 00221000 TM TRMPREF(IEDQTPTR),B'00010000' 0486 00222000 BNO @RF00486 0486 00223000 LR @11,IEDQTPTR 0486 00224000 AL @11,@CF01518 0486 00225000 CLI TRMTYPE-21(@11),X'20' 0486 00226000 BNE @RF00486 0486 00227000 * DO; /* BYSC/SS LINE? */ 00228000 * END; /* YES, CONTINUE */ 00229000 * ELSE 0489 00230000 * DO; 0489 00231000 B @RC00486 0489 00232000 @RF00486 DS 0H 0490 00233000 * RMSGNO=173; /* SET 'INVALID ENTRY' MSG */ 00234000 LA RMSGNO,173 0490 00235000 * GOTO WRITE; /* WRITE THE MESSAGE */ 00236000 B WRITE 0491 00237000 * END; 0492 00238000 * 0493 00239000 */********************************************************************/ 00240000 */* GET BUFFER UNIT INTO WHICH THE SPEED SELECT BDU COMMAND WILL */ 00241000 */* BE BUILT */ 00242000 */********************************************************************/ 00243000 * 0493 00244000 * RPARM=1; /* GET ONE BUFFER UNIT */ 00245000 @RC00486 LA RPARM,1 0493 00246000 * RBRANCH=OPCGETBF; /* GET ADDRESS OF BUFFER 0494 00247000 * ALLOCATION ROUTINE */ 00248000 L RBRANCH,OPCGETBF(,ROPCAVT) 0494 00249000 * GEN( BALR RRETURN,RBRANCH ); /* CALL ALLOCATION ROUTINE */ 00250000 BALR RRETURN,RBRANCH 00251000 * OCUNIT=RPARM; /* PUT BUFFER UNIT ADDR INTO OPCE*/ 00252000 ST RPARM,OCUNIT(,ROPCE) 0496 00253000 */********************************************************************/ 00254000 */* BUILD PACKED RU FOR SPEED SELECT COMMAND @Y17XARN*/ 00255000 */********************************************************************/ 00256000 * 0497 00257000 * IEDPRUQP=RPARM; /* SET UP BUFFER ADDRESSABILITY */ 00258000 LR IEDPRUQP,RPARM 0497 00259000 * PRURH=TRHFID0; /* SETUP RH AND TH BYTES */ 00260000 LR @11,IEDPRUQP 0498 00261000 SL @11,@CF00058 0498 00262000 MVC PRURH(3,@11),@CB01616 0498 00263000 * PRUFIDN=TTH0BYT0; /* FOR FID0 */ 00264000 MVI PRUFIDN(@11),X'0C' 0499 00265000 * PRUTTCIN=OCTRMTBL; /* GET TTCIN FROM OC TERM TABLE */ 00266000 LH @11,OCTRMTBL(,ROPCE) 0500 00267000 N @11,@CF01991 0500 00268000 STH @11,PRUTTCIN(,IEDPRUQP) 0500 00269000 * PRUDATCT=SPDDATCN; /* GET DATA COUNT */ 00270000 MVC PRUDATCT(2,IEDPRUQP),@CH00056 0501 00271000 * PRUTIC=PRUINTIC; /* SETUP TIC */ 00272000 MVC PRUTIC(4,IEDPRUQP),@CB01582 0502 00273000 * RUDATA1=CD0CTRL; /* BDU COMMAND */ 00274000 MVI RUDATA1(IEDPRUQP),X'08' 0503 00275000 * RUDATA2=CD0CCMS; /* BDU MODIFIER */ 00276000 MVI RUDATA2(IEDPRUQP),X'12' 0504 00277000 * RUDATA7=OCWTG; /* SPEED HIGH OR LOW */ 00278000 MVC RUDATA7(1,IEDPRUQP),OCWTG(ROPCE) 0505 00279000 */********************************************************************/ 00280000 */* SET UP TO CALL PACKED RU DISPATCHER */ 00281000 */********************************************************************/ 00282000 * 0506 00283000 * OCCKDAT1=OCWTG; /* SAVE DATA BYTE IN OPCE FOR 0506 00284000 * CHECKPOINT */ 00285000 MVC OCCKDAT1(1,ROPCE),OCWTG(ROPCE) 0506 00286000 * OCWTG='MU'; /* WTG IS THIS MODULE - MU */ 00287000 MVC OCWTG(2,ROPCE),@CC01975 0507 00288000 * OCRESP='1'B; /* INDICATE RESPONSE FOR NEXT 0508 00289000 * ENTRY */ 00290000 OI OCRESP(ROPCE),B'00000001' 0508 00291000 * OPCMODID='02'; /* SET NEXT LOAD TO PACKED RU 0509 00292000 * DISPATCHER @Y17XARN*/ 00293000 MVC OPCMODID(2,ROPCAVT),@CC01976 0509 00294000 * RPARM=ROPCAVT; /* PASS @OP CTL AVT */ 00295000 LR RPARM,ROPCAVT 0510 00296000 * DO; /* IEDXCTL */ 00297000 * GEN EXIT REFS(ROPCAVT,OPCTRACE,OPCXCTL) NOSEQFLOW; 0512 00298000 * /* 00299000 LA 15,OPCXCTL(,ROPCAVT) POINT TO OPCXCTL LIST 00300000 EX 0,OPCTRACE(,ROPCAVT) INVOKE XCTL TRACE 00301000 XCTL SF=(E,(15)) XCTL TO NEXT MODULE 00302000 * END; /* END OF IEDXCTL @OZ35627 00303000 * XCTL TO BDU DISPATCHER */ 00304000 * 0514 00305000 */********************************************************************/ 00306000 */* PROCESS THE RESPONSE BDU FROM THE SPEED SELECT COMMAND. @Y17XARN*/ 00307000 */********************************************************************/ 00308000 * 0514 00309000 *PRORESP: 0514 00310000 * RFY 0514 00311000 * IEDBDU BASED(RBDU); /* BASE FOR IEDBDU DSECT */ 00312000 PRORESP DS 0H 0515 00313000 * RBDU=OCUNIT; /* SET ADDR OF BUFFER UNIT */ 00314000 L RBDU,OCUNIT(,ROPCE) 0515 00315000 * IF BDUSYRSP='60'X THEN /* NORMAL COMPLETION ? */ 00316000 CLI BDUSYRSP(RBDU),X'60' 0516 00317000 BNE @RF00516 0516 00318000 * RMSGNO=387; /* YES, SET MESSAGE FOR NORMAL 0517 00319000 * COMPLETION */ 00320000 LA RMSGNO,387 0517 00321000 * ELSE 0518 00322000 * IF BDUSYRSP='99'X THEN /* ALREADY AT REQUESTED SPEED?*/ 00323000 B @RC00516 0518 00324000 @RF00516 CLI BDUSYRSP(RBDU),X'99' 0518 00325000 BNE @RF00518 0518 00326000 * RMSGNO=385; /* YES, SET ALREADY MESSAGE */ 00327000 LA RMSGNO,385 0519 00328000 * ELSE 0520 00329000 * IF BDUSYRSP='9F'X&BDUEXRSP='82'X THEN/* MODEM CANNOT CHANGE 00330000 * SPEED */ 00331000 B @RC00518 0520 00332000 @RF00518 CLI BDUSYRSP(RBDU),X'9F' 0520 00333000 BNE @RF00520 0520 00334000 CLI BDUEXRSP(RBDU),X'82' 0520 00335000 BNE @RF00520 0520 00336000 * RMSGNO=386; /* YES, SET NO SPEED CHANGE 0521 00337000 * MESSAGE */ 00338000 LA RMSGNO,386 0521 00339000 * ELSE 0522 00340000 * RMSGNO=199; /* NO, SET MESSAGE FOR REQUEST 0522 00341000 * NOT HONORED */ 00342000 B @RC00520 0522 00343000 @RF00520 LA RMSGNO,199 0522 00344000 * IF BDUSYRSP='60'X THEN /* NORMAL MSG TO WRITE ? */ 00345000 @RC00520 DS 0H 0523 00346000 @RC00518 DS 0H 0523 00347000 @RC00516 CLI BDUSYRSP(RBDU),X'60' 0523 00348000 BNE @RF00523 0523 00349000 * DO; /* SET UP FOR EXIT */ 00350000 * OPCMODID='M3'; /* GOOD MSG WRITE RTN */ 00351000 MVC OPCMODID(2,ROPCAVT),@CC01984 0525 00352000 * GO TO WRITE1; /* EXIT */ 00353000 B WRITE1 0526 00354000 * END; 0527 00355000 * GOTO WRITE; /* WRITE THE MESSAGE */ 00356000 B WRITE 0528 00357000 */********************************************************************/ 00358000 */* COMMAND INVALID MESSAGE */ 00359000 */********************************************************************/ 00360000 * 0529 00361000 *CMDINV: 0529 00362000 * RMSGNO=18; /* SET 'COMMAND INVALID' MSG */ 00363000 CMDINV LA RMSGNO,18 0529 00364000 */********************************************************************/ 00365000 */* CALL THE MESSAGE WRITER MODULE TO WRITE THE MESSAGE */ 00366000 */* SPECIFIED IN RMSGNO. */ 00367000 */********************************************************************/ 00368000 * 0530 00369000 *WRITE: 0530 00370000 * OPCMODID='03'; /* SET UP TO GO TO THE MSG WRITER 00371000 * MODULE */ 00372000 WRITE MVC OPCMODID(2,ROPCAVT),@CC01987 0530 00373000 *WRITE1: 0531 00374000 * OCRESP='0'B; /* RESET RESPONSE INDICATOR */ 00375000 WRITE1 NI OCRESP(ROPCE),B'11111110' 0531 00376000 * RPARM=ROPCAVT; /* PASS OP CTL AVT */ 00377000 LR RPARM,ROPCAVT 0532 00378000 * DO; /* IEDXCTL */ 00379000 * GEN EXIT REFS(ROPCAVT,OPCTRACE,OPCXCTL) NOSEQFLOW; 0534 00380000 * /* 00381000 LA 15,OPCXCTL(,ROPCAVT) POINT TO OPCXCTL LIST 00382000 EX 0,OPCTRACE(,ROPCAVT) INVOKE XCTL TRACE 00383000 XCTL SF=(E,(15)) XCTL TO NEXT MODULE 00384000 * END; /* END OF IEDXCTL @OZ35627*/ 00385000 * GEN; 0536 00386000 MOVE MVC OCBACKUP(EQU0,ROPCE),EQU0(RRPTR) 00387000 PACK PACK OCBACKUP+EQU6(EQU2,ROPCE),OCBACKUP(EQU0,ROPCE) 00388000 EQU0 EQU 0 00389000 EQU2 EQU 2 00390000 EQU6 EQU 6 00391000 * END IGCMU10D 0537 00392000 * 0537 00393000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00394000 */*%INCLUDE SYSLIB (TAVTD ) */ 00395000 */*%INCLUDE SYSLIB (TBDUD ) */ 00396000 */*%INCLUDE SYSLIB (TCD0D ) */ 00397000 */*%INCLUDE SYSLIB (TOPCAVTD) */ 00398000 */*%INCLUDE SYSLIB (TOPCED ) */ 00399000 */*%INCLUDE SYSLIB (TPRUD ) */ 00400000 */*%INCLUDE SYSLIB (TRHD ) */ 00401000 */*%INCLUDE SYSLIB (TTHD ) */ 00402000 */*%INCLUDE SYSLIB (TTRMD ) */ 00403000 * 0537 00404000 * ; 0537 00405000 @EL00001 DS 0H 0537 00406000 @EF00001 DS 0H 0537 00407000 @ER00001 BR @14 0537 00408000 @DATA DS 0H 00409000 @CH00056 DC H'7' 00410000 @DATD DSECT 00411000 DS 0F 00412000 @ZTEMPS DS C 00413000 @ZTEMPND EQU * 00414000 @ZLEN EQU @ZTEMPND-@ZTEMPS 00415000 @TEMPS EQU @ZTEMPS 00416000 @L EQU @ZLEN 00417000 IGCMU10D CSECT 00418000 DS 0F 00419000 @CF00053 DC F'1' 00420000 @CF00059 DC F'2' 00421000 @CF00058 DC F'8' 00422000 @CF00080 DC F'32' 00423000 @CF01967 DC F'255' 00424000 @CF01518 DC F'-3' 00425000 @CF01991 DC XL4'0000FFFF' 00426000 @DATD DSECT 00427000 DS 0D 00428000 ORG *+1-(*-@DATD)/(*-@DATD) INSURE DSECT DATA 00429000 @ENDDATD EQU * 00430000 @DATEND EQU * 00431000 IGCMU10D CSECT 00432000 DS 0F 00433000 @SIZDATD DC AL1(0) 00434000 DC AL3(@ENDDATD-@DATD) 00435000 @SIZ001 EQU @SIZDATD 00436000 DS 0D 00437000 @CC01975 DC C'MU' 00438000 @CC01976 DC C'02' 00439000 @CC01984 DC C'M3' 00440000 @CC01987 DC C'03' 00441000 @CB01582 DC X'08000002' 00442000 @CB01616 DC X'0B8000' 00443000 DS CL1 00444000 ZAPAREA DC XL50'0' 00445000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00446000 @01 EQU 01 00447000 @02 EQU 02 00448000 @03 EQU 03 00449000 @04 EQU 04 00450000 @05 EQU 05 00451000 @06 EQU 06 00452000 @07 EQU 07 00453000 @08 EQU 08 00454000 @09 EQU 09 00455000 @10 EQU 10 00456000 @11 EQU 11 00457000 @12 EQU 12 00458000 @13 EQU 13 00459000 @14 EQU 14 00460000 @15 EQU 15 00461000 @0 EQU 00 00462000 @1 EQU 01 00463000 @2 EQU 02 00464000 @3 EQU 03 00465000 @4 EQU 04 00466000 @5 EQU 05 00467000 @6 EQU 06 00468000 @7 EQU 07 00469000 @8 EQU 08 00470000 @9 EQU 09 00471000 @A EQU 10 00472000 @B EQU 11 00473000 @C EQU 12 00474000 @D EQU 13 00475000 @E EQU 14 00476000 @F EQU 15 00477000 RMSGNO EQU @00 00478000 RZERO EQU @00 00479000 RPARM EQU @01 00480000 ROPCAVT EQU @02 00481000 ROPCE EQU @03 00482000 IEDQAPTR EQU @04 00483000 RWORKA EQU @05 00484000 RLEN EQU @06 00485000 IEDQTPTR EQU @07 00486000 RAPTR EQU @07 00487000 RRPTR EQU @08 00488000 RBYSCN EQU @09 00489000 RBASE EQU @12 00490000 RSAVE EQU @13 00491000 RRETURN EQU @14 00492000 RBRANCH EQU @15 00493000 IEDPRUQP EQU @06 00494000 RBDU EQU @06 00495000 SCANBYTE EQU 0 00496000 IEDQAVTD EQU 0 00497000 AVTSAVEX EQU IEDQAVTD+288 00498000 AVTREADD EQU IEDQAVTD+380 00499000 AVTBUFSW EQU IEDQAVTD+384 00500000 @NM00004 EQU IEDQAVTD+388 00501000 AVTCKFLG EQU @NM00004 00502000 AVTBASE EQU IEDQAVTD+412 00503000 AVTPKF EQU AVTBASE 00504000 AVTHG02 EQU IEDQAVTD+528 00505000 AVTDISP EQU IEDQAVTD+552 00506000 AVTHD EQU IEDQAVTD+556 00507000 AVTSCOPT EQU AVTHD 00508000 AVTSAVTP EQU IEDQAVTD+612 00509000 AVTSAVTF EQU AVTSAVTP 00510000 AVTCKPEL EQU IEDQAVTD+652 00511000 AVTCKRMV EQU AVTCKPEL 00512000 AVTCKELF EQU IEDQAVTD+680 00513000 AVTCKBYT EQU IEDQAVTD+691 00514000 AVTHG01 EQU IEDQAVTD+692 00515000 AVTCKLNK EQU IEDQAVTD+696 00516000 AVTCRELE EQU IEDQAVTD+708 00517000 AVTCCELE EQU AVTCRELE 00518000 AVTCLRHI EQU IEDQAVTD+716 00519000 AVTADBUF EQU IEDQAVTD+720 00520000 AVTSYSER EQU IEDQAVTD+728 00521000 AVTBFRFG EQU IEDQAVTD+784 00522000 AVTCKPQB EQU IEDQAVTD+804 00523000 AVTCKPTB EQU AVTCKPQB 00524000 AVTCKPEC EQU AVTCKPQB+4 00525000 AVTCKPCC EQU AVTCKPEC 00526000 AVTOPCQB EQU IEDQAVTD+816 00527000 AVTOPCOB EQU AVTOPCQB 00528000 AVTOPCEC EQU AVTOPCQB+4 00529000 AVTOPCCC EQU AVTOPCEC 00530000 AVTOLTQB EQU IEDQAVTD+828 00531000 AVTCWFL1 EQU IEDQAVTD+924 00532000 AVTCWFL2 EQU IEDQAVTD+925 00533000 AVTSUBT EQU IEDQAVTD+948 00534000 AVTIOTR EQU IEDQAVTD+949 00535000 AVTHA3 EQU IEDQAVTD+1024 00536000 AVTBIT1 EQU IEDQAVTD+1050 00537000 AVTBIT2 EQU IEDQAVTD+1051 00538000 AVTBIT3 EQU IEDQAVTD+1052 00539000 AVTBIT4 EQU IEDQAVTD+1136 00540000 @NM00083 EQU IEDQAVTD+1232 00541000 IEDNSVTD EQU 0 00542000 SAVTDIAG EQU IEDNSVTD 00543000 SAVTDIAF EQU SAVTDIAG 00544000 SAVTLUSQ EQU IEDNSVTD+88 00545000 SAVTSCLU EQU IEDNSVTD+168 00546000 SAVTTCPU EQU IEDNSVTD+238 00547000 SAVTZELM EQU IEDNSVTD+270 00548000 SAVTRDRV EQU IEDNSVTD+284 00549000 SAVTCKQB EQU IEDNSVTD+300 00550000 SAVTCKTB EQU SAVTCKQB 00551000 SAVTCKEC EQU SAVTCKQB+4 00552000 SAVTCKCC EQU SAVTCKEC 00553000 SAVTNETF EQU IEDNSVTD+324 00554000 SAVTCDRV EQU IEDNSVTD+332 00555000 IEDBDU EQU 0 00556000 BDUFNFLG EQU IEDBDU+2 00557000 BDUBDUFG EQU IEDBDU+3 00558000 BDURSP EQU IEDBDU+4 00559000 BDUSYRSP EQU BDURSP 00560000 BDUEXRSP EQU BDURSP+1 00561000 BDUEND EQU IEDBDU+6 00562000 IEDQOPCD EQU 0 00563000 OPCDOUBL EQU IEDQOPCD 00564000 OPCAVTPT EQU IEDQOPCD+8 00565000 OPCCOPCE EQU IEDQOPCD+12 00566000 OPCDCBLK EQU IEDQOPCD+16 00567000 OPCTRACE EQU IEDQOPCD+32 00568000 OPCSAVE EQU IEDQOPCD+56 00569000 OPCAQCTL EQU IEDQOPCD+180 00570000 OPCXCTL EQU IEDQOPCD+204 00571000 OPCLDNME EQU IEDQOPCD+212 00572000 OPCMODID EQU OPCLDNME+3 00573000 OPCGETBF EQU IEDQOPCD+276 00574000 OPCSPEC EQU IEDQOPCD+300 00575000 OPCPWCOB EQU IEDQOPCD+368 00576000 OPCPWQCB EQU OPCPWCOB 00577000 OPCPWECB EQU OPCPWCOB+4 00578000 OPCSESS EQU IEDQOPCD+384 00579000 OPCSFLAG EQU OPCSESS 00580000 OPCSENSE EQU OPCSESS+8 00581000 OPCSNSSY EQU OPCSENSE 00582000 OPCSNSUS EQU OPCSENSE+2 00583000 OPCPCID EQU IEDQOPCD+456 00584000 OPCUNIQP EQU OPCPCID+2 00585000 OPCSESSF EQU IEDQOPCD+464 00586000 IEDQOPCE EQU 0 00587000 OCELEM EQU IEDQOPCE+4 00588000 OCUNIT EQU IEDQOPCE+8 00589000 OCRUDEST EQU OCUNIT 00590000 OCCKPKEY EQU OCRUDEST 00591000 OCSCAN EQU OCCKPKEY 00592000 @NM00130 EQU OCRUDEST+1 00593000 OCUNITBF EQU @NM00130+2 00594000 OCOPTCDE EQU IEDQOPCE+12 00595000 OCSWITCH EQU IEDQOPCE+13 00596000 OCFLAG EQU IEDQOPCE+14 00597000 OCRESP EQU OCFLAG 00598000 OCRLN EQU IEDQOPCE+15 00599000 OCCIB EQU IEDQOPCE+16 00600000 OCMSTSAV EQU OCCIB 00601000 OCDEST EQU OCMSTSAV 00602000 OCTRMTBL EQU IEDQOPCE+20 00603000 OCLINENO EQU IEDQOPCE+22 00604000 OCTIOT EQU OCLINENO 00605000 OCWTGB EQU OCTIOT 00606000 OCTRUNIT EQU IEDQOPCE+24 00607000 OCRSID EQU OCTRUNIT 00608000 OCALSTAT EQU OCRSID 00609000 OCFNAALL EQU OCALSTAT 00610000 OCFLAG1 EQU OCRSID+1 00611000 OCPARM EQU IEDQOPCE+28 00612000 OCWTG EQU IEDQOPCE+30 00613000 OCBACKUP EQU IEDQOPCE+32 00614000 OCBUFNED EQU OCBACKUP 00615000 OCCOUNT1 EQU OCBUFNED 00616000 OCBUFGOT EQU OCBACKUP+2 00617000 OCCOUNT2 EQU OCBUFGOT 00618000 OCMODNME EQU IEDQOPCE+40 00619000 OCIPLWA EQU OCMODNME 00620000 OCPTRSAV EQU OCMODNME+4 00621000 OCCKDATA EQU IEDQOPCE+48 00622000 OCRSTGTM EQU OCCKDATA 00623000 OC379RRT EQU OCRSTGTM 00624000 OCCKDAT1 EQU OC379RRT 00625000 OCNCP EQU OCRSTGTM+2 00626000 OCOID EQU IEDQOPCE+56 00627000 IEDQOPCN EQU 0 00628000 OCLDNME EQU IEDQOPCN 00629000 OCLINTTE EQU OCLDNME 00630000 OCREQFLG EQU OCLINTTE+2 00631000 OCPREFLG EQU OCLINTTE+3 00632000 IEDPRUQD EQU 0 00633000 PRUTTCIN EQU IEDPRUQD 00634000 PRUDATCT EQU IEDPRUQD+2 00635000 PRUTIC EQU IEDPRUQD+8 00636000 PRUNUNIT EQU PRUTIC+1 00637000 PRUVTCHK EQU PRUNUNIT+2 00638000 PRUDATA EQU IEDPRUQD+12 00639000 IEDPRUND EQU 0 00640000 PRURHTH EQU IEDPRUND 00641000 PRURH EQU PRURHTH 00642000 PRURHFG0 EQU PRURH 00643000 PRURHFG1 EQU PRURH+1 00644000 PRURHFG2 EQU PRURH+2 00645000 PRUTH EQU PRURHTH+3 00646000 PRUFIDN EQU PRUTH 00647000 IEDRH EQU 0 00648000 TRHBYTE0 EQU IEDRH 00649000 TRHBYTE1 EQU IEDRH+1 00650000 TRHBYTE2 EQU IEDRH+2 00651000 IEDTH EQU 0 00652000 TTHBYTE0 EQU IEDTH 00653000 TTHSNF EQU IEDTH+6 00654000 TTHTAG EQU TTHSNF 00655000 TTHTAG1 EQU TTHTAG 00656000 IEDQTRM EQU 0 00657000 TRMSTATE EQU IEDQTRM 00658000 TRMLOG EQU TRMSTATE 00659000 TRMPREF EQU TRMSTATE 00660000 TRMDESTQ EQU IEDQTRM+1 00661000 TRMRSTRT EQU TRMDESTQ+2 00662000 TRMINSEQ EQU IEDQTRM+4 00663000 TLISTCNT EQU TRMINSEQ 00664000 TRMSESCT EQU TLISTCNT 00665000 TRMOUTSQ EQU IEDQTRM+6 00666000 TLISTEN EQU TRMOUTSQ 00667000 TRMDSORG EQU TLISTEN 00668000 TRMPLIM EQU TLISTEN+1 00669000 TRMALTD EQU IEDQTRM+8 00670000 TRMPRILK EQU TRMALTD 00671000 TRMDEVFL EQU IEDQTRM+10 00672000 TRMADDC EQU TRMDEVFL 00673000 TRMNCPI EQU TRMDEVFL+1 00674000 TRMSTAT EQU IEDQTRM+12 00675000 TRMAPB EQU TRMSTAT 00676000 TRMSIO EQU TRMAPB 00677000 TRMOWNER EQU TRMSIO 00678000 TRMSENSE EQU TRMAPB+3 00679000 IEDNTRM EQU 0 00680000 TRMDIALQ EQU IEDNTRM+1 00681000 TRMBYTE7 EQU TRMDIALQ+2 00682000 TRMATNDX EQU IEDNTRM+4 00683000 TRMINDEX EQU IEDNTRM+6 00684000 TRMCOHTG EQU IEDNTRM+8 00685000 TRMBYTE6 EQU TRMCOHTG 00686000 TRMCDF0 EQU TRMBYTE6 00687000 TRMBYTE5 EQU TRMCOHTG+1 00688000 TRMBYTE4 EQU IEDNTRM+10 00689000 TRMBYTE3 EQU IEDNTRM+11 00690000 TRMBYTE2 EQU IEDNTRM+12 00691000 TRMINPG EQU TRMBYTE2 00692000 TRMBYTE1 EQU IEDNTRM+13 00693000 TRMSCPRQ EQU TRMBYTE1 00694000 TRMBYTE0 EQU IEDNTRM+16 00695000 TRMNOWCD EQU TRMBYTE0 00696000 TRMSIBPT EQU IEDNTRM+17 00697000 TRMLTRAC EQU TRMSIBPT 00698000 TRMLBUFR EQU TRMLTRAC 00699000 TRMRLMCT EQU IEDNTRM+20 00700000 TRMLGBST EQU TRMRLMCT 00701000 TRMTYPE EQU IEDNTRM+21 00702000 RUDATA1 EQU PRUDATA 00703000 RUDATA2 EQU PRUDATA+1 00704000 RUDATA7 EQU PRUDATA+6 00705000 OPCAQWD EQU OPCAQCTL 00706000 OPCAQWD1 EQU OPCAQWD 00707000 OPCAQWD2 EQU OPCAQWD+4 00708000 OPCAQWD3 EQU OPCAQWD+8 00709000 @NM00137 EQU OCCKDATA 00710000 @NM00139 EQU OCCIB 00711000 @NM00140 EQU @NM00139+1 00712000 OCCKPKY1 EQU OCCKPKEY 00713000 OCCKPTYP EQU OCCKPKY1 00714000 OCICACTN EQU OCMODNME 00715000 OCICDADR EQU OCICACTN 00716000 OCICSW EQU OCICDADR+3 00717000 @NM00145 EQU OCBACKUP 00718000 @NM00146 EQU OCCKDATA 00719000 OCMSGFLG EQU OCPREFLG 00720000 OCBKUP1 EQU OCMODNME 00721000 @NM00150 EQU OCMODNME 00722000 OCBKUP2 EQU OCCKDATA 00723000 OCBKUP3 EQU OCLDNME 00724000 OCRESPTR EQU OCBKUP3+4 00725000 OCDIALLN EQU OCRESPTR 00726000 OCIPLDMP EQU OCLDNME+4 00727000 @NM00180 EQU TRMSTATE 00728000 TRMLUFD0 EQU TRMBYTE7 00729000 TRMSNAST EQU TRMBYTE6 00730000 TRMCDFD0 EQU TRMBYTE5 00731000 TRMPRE1 EQU TRMBYTE4 00732000 TRMNCP1 EQU TRMBYTE4 00733000 TRMLU1 EQU TRMBYTE4 00734000 TRMLINK1 EQU TRMBYTE4 00735000 TRMDCONS EQU TRMLINK1 00736000 TRMPRE EQU TRMBYTE3 00737000 TRMNCP EQU TRMBYTE3 00738000 TRMIPLDM EQU TRMNCP 00739000 TRMPU EQU TRMBYTE3 00740000 TRMLU EQU TRMBYTE3 00741000 TRMCDMGR EQU TRMBYTE3 00742000 TRMLINK EQU TRMBYTE3 00743000 BDUTEXT EQU BDUEND 00744000 OCLINRRT EQU OCTRUNIT 00745000 OCPCID EQU OCBACKUP 00746000 OCRSNCDE EQU OCALSTAT 00747000 OCSENSE EQU OCBACKUP 00748000 TRMOPT EQU IEDQTRM+20 00749000 TRMPOOLP EQU TRMINSEQ 00750000 TRMSRPTR EQU TRMPLIM 00751000 * START UNREFERENCED COMPONENTS 00752000 TRMLDISC EQU TRMLINK 00753000 @NM00199 EQU TRMLINK 00754000 TRMLALOC EQU TRMLINK 00755000 TRMLSTAT EQU TRMLINK 00756000 TRMLINT EQU TRMLINK 00757000 TRMEPMOD EQU TRMLINK 00758000 TRMCDLOG EQU TRMCDMGR 00759000 @NM00198 EQU TRMCDMGR 00760000 @NM00197 EQU TRMCDMGR 00761000 @NM00196 EQU TRMCDMGR 00762000 @NM00195 EQU TRMCDMGR 00763000 @NM00194 EQU TRMCDMGR 00764000 TRMBKDUP EQU TRMCDMGR 00765000 TRMLULOG EQU TRMLU 00766000 @NM00193 EQU TRMLU 00767000 @NM00192 EQU TRMLU 00768000 @NM00191 EQU TRMLU 00769000 TRMTDIFF EQU TRMLU 00770000 @NM00190 EQU TRMLU 00771000 @NM00189 EQU TRMLU 00772000 @NM00188 EQU TRMLU 00773000 TRMPCONT EQU TRMPU 00774000 TRMPDOCQ EQU TRMPU 00775000 TRMPULOC EQU TRMPU 00776000 TRMPDNAS EQU TRMPU 00777000 TRMPALOC EQU TRMPU 00778000 TRMNCONT EQU TRMNCP 00779000 TRMQUCKN EQU TRMNCP 00780000 TRMSLOWN EQU TRMNCP 00781000 TRMSYGEN EQU TRMNCP 00782000 TRMNCPCL EQU TRMNCP 00783000 TRMCONN EQU TRMIPLDM 00784000 TRMINOUT EQU TRMPRE 00785000 TRMRDOUT EQU TRMPRE 00786000 TRMNLOUT EQU TRMPRE 00787000 TRMWROUT EQU TRMPRE 00788000 TRMASNXI EQU TRMPRE 00789000 TRMSTMM EQU TRMPRE 00790000 TRMCMODE EQU TRMPRE 00791000 TRMSTPND EQU TRMPRE 00792000 TRMNCPLK EQU TRMLINK1 00793000 @NM00187 EQU TRMLINK1 00794000 TRMDCONN EQU TRMDCONS 00795000 TRMDCOP EQU TRMDCONS 00796000 TRMPMARY EQU TRMLU1 00797000 TRMLUNAS EQU TRMLU1 00798000 @NM00186 EQU TRMLU1 00799000 TRMLSCVP EQU TRMLU1 00800000 @NM00185 EQU TRMLU1 00801000 TRMCPOPT EQU TRMLU1 00802000 TRMCPREQ EQU TRMLU1 00803000 @NM00184 EQU TRMNCP1 00804000 TRMANS EQU TRMNCP1 00805000 TRMLINOP EQU TRMNCP1 00806000 TRMINOP EQU TRMNCP1 00807000 TRMLYNCH EQU TRMPRE1 00808000 TRMSPOUT EQU TRMPRE1 00809000 TRMERLCK EQU TRMPRE1 00810000 TRMQNPL EQU TRMPRE1 00811000 TRMSPACT EQU TRMPRE1 00812000 TRMOCNI EQU TRMPRE1 00813000 TRMSESSN EQU TRMPRE1 00814000 TRMCONT EQU TRMPRE1 00815000 TRMINERR EQU TRMCDFD0 00816000 TRMLUTM EQU TRMCDFD0 00817000 TRMLUIT EQU TRMCDFD0 00818000 TRMLUREQ EQU TRMCDFD0 00819000 TRMCDPRE EQU TRMCDFD0 00820000 TRMWASCD EQU TRMCDFD0 00821000 TRMSRPFG EQU TRMCDFD0 00822000 TRMSESRQ EQU TRMCDFD0 00823000 @NM00183 EQU TRMSNAST 00824000 TRMDRSRC EQU TRMSNAST 00825000 @NM00182 EQU TRMLUFD0 00826000 TRMNOINP EQU TRMLUFD0 00827000 TRMASSOC EQU TRMLUFD0 00828000 TRMAUTO EQU TRMLUFD0 00829000 @NM00181 EQU @NM00180 00830000 TRMENTRY EQU @NM00180 00831000 @NM00153 EQU OCIPLDMP 00832000 OCACTRQ EQU OCIPLDMP 00833000 OCDACRQ EQU OCIPLDMP 00834000 OCIPLRQ EQU OCIPLDMP 00835000 OCDMPRQ EQU OCIPLDMP 00836000 @NM00152 EQU OCRESPTR+2 00837000 OCOHNATA EQU OCDIALLN 00838000 OCRRTPTR EQU OCBKUP3 00839000 @NM00151 EQU OCBKUP2+4 00840000 OCNHITTC EQU OCBKUP2+2 00841000 OCLINTTC EQU OCBKUP2 00842000 OCCSIB EQU @NM00150 00843000 @NM00149 EQU OCBKUP1+6 00844000 OCTARTTC EQU OCBKUP1+4 00845000 OCSRTTC EQU OCBKUP1+2 00846000 OCRSTTC EQU OCBKUP1 00847000 @NM00148 EQU OCMSGFLG 00848000 OCRRT EQU OCMSGFLG 00849000 OCNAME EQU OCMSGFLG 00850000 OCLU1TTE EQU @NM00146+5 00851000 OCSFLAG EQU @NM00146+4 00852000 OCLU2TTI EQU @NM00146+2 00853000 OCLU1TTI EQU @NM00146 00854000 OCDISTLN EQU @NM00145+6 00855000 OCDISTAD EQU @NM00145+2 00856000 OCDISTNA EQU @NM00145 00857000 OCICINAC EQU OCICSW 00858000 @NM00144 EQU OCICSW 00859000 OCICATST EQU OCICDADR+1 00860000 OCICTYPE EQU OCICDADR 00861000 @NM00143 EQU OCCKPKY1 00862000 OCCKPENV EQU OCCKPKY1 00863000 OCCKPRST EQU OCCKPTYP 00864000 OCCKPNCP EQU OCCKPTYP 00865000 OCCKPINC EQU OCCKPTYP 00866000 @NM00142 EQU @NM00139+2 00867000 @NM00141 EQU @NM00140 00868000 OCTSTAT EQU @NM00140 00869000 OCREASON EQU @NM00139 00870000 @NM00138 EQU @NM00137+4 00871000 OCOIDEP EQU @NM00137 00872000 OPCAQLST EQU OPCAQWD3+1 00873000 OPCAQRQ3 EQU OPCAQWD3 00874000 OPCAQSEC EQU OPCAQWD2+1 00875000 OPCAQRQ2 EQU OPCAQWD2 00876000 OPCAQFST EQU OPCAQWD1+1 00877000 OPCAQREQ EQU OPCAQWD1 00878000 TRMSUBST EQU IEDNTRM+22 00879000 TRMPRIME EQU TRMLGBST 00880000 TRMOWNR EQU TRMLBUFR+1 00881000 TRMGPCNT EQU TRMLBUFR 00882000 TRMBUFRD EQU TRMBYTE0 00883000 TRMSNA EQU TRMBYTE0 00884000 TRMGP EQU TRMBYTE0 00885000 TRMDIAL EQU TRMBYTE0 00886000 TRMACDC EQU TRMNOWCD 00887000 TRMOUTPT EQU TRMBYTE0 00888000 TRMINPUT EQU TRMBYTE0 00889000 TRMUDEF EQU TRMBYTE0 00890000 TRMCOHRT EQU IEDNTRM+14 00891000 TRMSTOTE EQU TRMBYTE1 00892000 TRMCKPRN EQU TRMBYTE1 00893000 TRMTSATN EQU TRMBYTE1 00894000 TRMTRACE EQU TRMBYTE1 00895000 TRMSWBCK EQU TRMBYTE1 00896000 TRMAUTOC EQU TRMBYTE1 00897000 TRMINPTP EQU TRMBYTE1 00898000 TRMWTNEG EQU TRMSCPRQ 00899000 TRMWRBRK EQU TRMBYTE2 00900000 TRMNOSND EQU TRMBYTE2 00901000 TRMPREP EQU TRMBYTE2 00902000 TRMGPACT EQU TRMBYTE2 00903000 TRMANDL EQU TRMBYTE2 00904000 TRMCLOSN EQU TRMINPG 00905000 TRMREMB EQU TRMBYTE2 00906000 TRMRSACT EQU TRMBYTE2 00907000 TRMCINOP EQU TRMCDF0 00908000 TRMRSTPD EQU TRMCDF0 00909000 TRMCLNXI EQU TRMCDF0 00910000 TRMDVAS0 EQU TRMCDF0 00911000 TRMPURGE EQU TRMCDF0 00912000 TRMCDST EQU TRMINDEX 00913000 TRMASNDX EQU TRMATNDX 00914000 TRMBYTE8 EQU TRMDIALQ+1 00915000 @NM00179 EQU TRMDIALQ 00916000 @NM00178 EQU IEDNTRM 00917000 TRMOPTBL EQU IEDQTRM+18 00918000 TRMOPNO EQU IEDQTRM+17 00919000 TRMCHCIN EQU IEDQTRM+16 00920000 TRMLOCAD EQU TRMSENSE 00921000 TRMTEMPR EQU TRMAPB+2 00922000 TRMNADDR EQU TRMOWNER 00923000 @NM00177 EQU TRMDEVFL+1 00924000 TRMTPIN EQU TRMDEVFL+1 00925000 @NM00176 EQU TRMNCPI 00926000 TRMRNTRM EQU TRMDEVFL+1 00927000 @NM00175 EQU TRMDEVFL+1 00928000 TRMLMD EQU TRMDEVFL+1 00929000 TRMCONC EQU TRMDEVFL+1 00930000 TRMTSOB EQU TRMDEVFL 00931000 TRMBFDY EQU TRMDEVFL 00932000 TRMTBLK EQU TRMDEVFL 00933000 TRMSBLK EQU TRMDEVFL 00934000 TRMBLKS EQU TRMDEVFL 00935000 TRMSCV EQU TRMADDC 00936000 TRMDDIG EQU TRMDEVFL 00937000 TRMBUFS EQU TRMDEVFL 00938000 TRMSTEAL EQU TRMPRILK 00939000 TRMLGB EQU TRMDSORG 00940000 TRMUTERM EQU TRMSESCT 00941000 TRMVERIF EQU TRMRSTRT 00942000 @NM00174 EQU TRMRSTRT 00943000 @NM00173 EQU TRMDESTQ 00944000 TRMSCNYN EQU TRMSTATE 00945000 TRMOPTFN EQU TRMSTATE 00946000 TRMHELDN EQU TRMSTATE 00947000 TRMACPTN EQU TRMSTATE 00948000 TRMPROC EQU TRMLOG 00949000 TRMLIST EQU TRMLOG 00950000 TRMLINE EQU TRMSTATE 00951000 TTHDCF EQU IEDTH+8 00952000 TTHTAG2 EQU TTHTAG+1 00953000 @NM00172 EQU TTHTAG1 00954000 TTHTAGS EQU TTHTAG1 00955000 TTHOAF EQU IEDTH+4 00956000 TTHDAF EQU IEDTH+2 00957000 TTHBYTE1 EQU IEDTH+1 00958000 TTHEFI EQU TTHBYTE0 00959000 @NM00171 EQU TTHBYTE0 00960000 TTHEBIU EQU TTHBYTE0 00961000 TTHBBIU EQU TTHBYTE0 00962000 TTHFTYPE EQU TTHBYTE0 00963000 @NM00170 EQU TRHBYTE2 00964000 TRHPDI EQU TRHBYTE2 00965000 TRHEDI EQU TRHBYTE2 00966000 TRHCSI EQU TRHBYTE2 00967000 @NM00169 EQU TRHBYTE2 00968000 TRHCDI EQU TRHBYTE2 00969000 TRHEB EQU TRHBYTE2 00970000 TRHBB EQU TRHBYTE2 00971000 TRHPI EQU TRHBYTE1 00972000 TRHQRI EQU TRHBYTE1 00973000 @NM00168 EQU TRHBYTE1 00974000 @NM00167 EQU TRHBYTE1 00975000 TRHER EQU TRHBYTE1 00976000 TRHDR2 EQU TRHBYTE1 00977000 @NM00166 EQU TRHBYTE1 00978000 TRHDR1 EQU TRHBYTE1 00979000 TRHEC EQU TRHBYTE0 00980000 TRHBC EQU TRHBYTE0 00981000 TRHSDI EQU TRHBYTE0 00982000 TRHFI EQU TRHBYTE0 00983000 @NM00165 EQU TRHBYTE0 00984000 TRHRUCAT EQU TRHBYTE0 00985000 TRHTYPE EQU TRHBYTE0 00986000 @NM00164 EQU IEDPRUND+6 00987000 PRUTAG EQU IEDPRUND+4 00988000 PRUTHEFI EQU PRUFIDN 00989000 PRUTHUSS EQU PRUFIDN 00990000 PRUTHEIU EQU PRUFIDN 00991000 PRUTHBIU EQU PRUFIDN 00992000 PRUTHTYE EQU PRUFIDN 00993000 @NM00163 EQU PRURHFG2 00994000 PRURHCSI EQU PRURHFG2 00995000 @NM00162 EQU PRURHFG2 00996000 PRURHCDI EQU PRURHFG2 00997000 PRURHEB EQU PRURHFG2 00998000 PRURHBB EQU PRURHFG2 00999000 PRURHPI EQU PRURHFG1 01000000 @NM00161 EQU PRURHFG1 01001000 PRURHER EQU PRURHFG1 01002000 PRURHDR2 EQU PRURHFG1 01003000 @NM00160 EQU PRURHFG1 01004000 PRURHDR1 EQU PRURHFG1 01005000 PRURHEC EQU PRURHFG0 01006000 PRURHBC EQU PRURHFG0 01007000 PRURHSDI EQU PRURHFG0 01008000 PRURHFI EQU PRURHFG0 01009000 @NM00159 EQU PRURHFG0 01010000 PRURUCAT EQU PRURHFG0 01011000 PRURHTYP EQU PRURHFG0 01012000 @NM00158 EQU PRUVTCHK 01013000 PRUITSET EQU PRUVTCHK 01014000 @NM00157 EQU PRUVTCHK 01015000 @NM00156 EQU PRUNUNIT 01016000 @NM00155 EQU PRUTIC 01017000 @NM00154 EQU IEDPRUQD+4 01018000 @NM00147 EQU OCLDNME+6 01019000 OC1SQID EQU OCLDNME+4 01020000 OCWAITPC EQU OCPREFLG 01021000 OCSRCCLN EQU OCPREFLG 01022000 OCREMCON EQU OCPREFLG 01023000 OCCLNUP EQU OCPREFLG 01024000 OCTOTEP EQU OCPREFLG 01025000 OCREPOST EQU OCPREFLG 01026000 OCRSPSNT EQU OCPREFLG 01027000 OCBFREQ EQU OCPREFLG 01028000 OCIDLE EQU OCREQFLG 01029000 OCFORCE EQU OCREQFLG 01030000 OCDCARD EQU OCREQFLG 01031000 OCPARTAL EQU OCREQFLG 01032000 OCADNCP EQU OCREQFLG 01033000 OCRMPORQ EQU OCREQFLG 01034000 OCCDLACT EQU OCREQFLG 01035000 OCFLUSHZ EQU OCREQFLG 01036000 OCRESPCT EQU OCLINTTE 01037000 @NM00136 EQU IEDQOPCE+60 01038000 OCURC EQU OCOID 01039000 OCCKPTWA EQU OCCKDATA+4 01040000 OCSRCTTC EQU OCNCP 01041000 OCCKDAT2 EQU OC379RRT+1 01042000 OCECHOPT EQU OCPTRSAV 01043000 OCPUADR EQU OCIPLWA+2 01044000 OCWTGSAV EQU OCIPLWA 01045000 OCDVRDCT EQU OCBACKUP+6 01046000 @NM00135 EQU OCBACKUP+4 01047000 OCBUFRET EQU OCCOUNT2 01048000 OCBUFUSD EQU OCCOUNT1 01049000 OCRESNUM EQU OCPARM 01050000 OCSEQ EQU OCTRUNIT+2 01051000 OCTYPTRM EQU OCFLAG1 01052000 OCNONE EQU OCALSTAT 01053000 OCSOME EQU OCALSTAT 01054000 OCALLFLG EQU OCALSTAT 01055000 OCACTREQ EQU OCALSTAT 01056000 OCREDRVE EQU OCALSTAT 01057000 OCSEQIND EQU OCALSTAT 01058000 OCDACTIP EQU OCFNAALL 01059000 OCRENTRD EQU OCALSTAT 01060000 OCDIALX EQU OCWTGB 01061000 OCATNDX EQU OCMSTSAV+2 01062000 OCREQVAL EQU OCDEST+1 01063000 OCCONID EQU OCDEST 01064000 OCLOCAD EQU OCRLN 01065000 OCATTACH EQU OCFLAG 01066000 OCSSCP EQU OCFLAG 01067000 OCOUTPUT EQU OCFLAG 01068000 OCLINE EQU OCFLAG 01069000 OCMPP EQU OCFLAG 01070000 OCTOTE EQU OCFLAG 01071000 OCCONSOL EQU OCFLAG 01072000 @NM00134 EQU OCSWITCH 01073000 OCQUCKN EQU OCSWITCH 01074000 OCPRIFLG EQU OCOPTCDE 01075000 @NM00133 EQU OCUNITBF 01076000 OCINVTIC EQU OCUNITBF 01077000 @NM00132 EQU OCUNITBF 01078000 @NM00131 EQU @NM00130 01079000 @NM00129 EQU OCSCAN 01080000 OCNOTUCB EQU OCSCAN 01081000 OCNONAME EQU OCSCAN 01082000 OCALLRLN EQU OCSCAN 01083000 OCDDNAME EQU OCSCAN 01084000 OCDDNRLN EQU OCSCAN 01085000 OCADDR EQU OCSCAN 01086000 OCELMPTR EQU OCELEM+1 01087000 OCELMPRI EQU OCELEM 01088000 OCLINK EQU IEDQOPCE 01089000 OPCBOTTM EQU IEDQOPCD+3644 01090000 @NM00128 EQU IEDQOPCD+1948 01091000 @NM00127 EQU IEDQOPCD+1860 01092000 @NM00126 EQU IEDQOPCD+1772 01093000 @NM00125 EQU IEDQOPCD+1696 01094000 @NM00124 EQU IEDQOPCD+1620 01095000 OPCDSRWT EQU IEDQOPCD+1616 01096000 @NM00123 EQU IEDQOPCD+1532 01097000 @NM00122 EQU IEDQOPCD+1336 01098000 @NM00121 EQU IEDQOPCD+1328 01099000 @NM00120 EQU IEDQOPCD+528 01100000 OPCRSTRS EQU IEDQOPCD+524 01101000 OPCSAVES EQU IEDQOPCD+520 01102000 OPCRSPBD EQU IEDQOPCD+516 01103000 OPCNFY03 EQU IEDQOPCD+512 01104000 OPCNFY01 EQU IEDQOPCD+508 01105000 OPCURC EQU IEDQOPCD+504 01106000 OPCCINBD EQU IEDQOPCD+500 01107000 OPCCRKEY EQU IEDQOPCD+496 01108000 OPCDRSET EQU IEDQOPCD+492 01109000 OPCDRCLN EQU IEDQOPCD+488 01110000 OPCDRDEL EQU IEDQOPCD+484 01111000 OPCDRLOD EQU IEDQOPCD+480 01112000 OPCDRLOC EQU IEDQOPCD+476 01113000 OPCDRCVT EQU IEDQOPCD+472 01114000 OPCDRFST EQU IEDQOPCD+468 01115000 OPCLSABC EQU IEDQOPCD+466 01116000 @NM00119 EQU IEDQOPCD+465 01117000 @NM00118 EQU OPCSESSF 01118000 OPCUNIQV EQU OPCUNIQP+2 01119000 OPCUNIQU EQU OPCUNIQP 01120000 OPCOSSCP EQU OPCPCID 01121000 @NM00117 EQU IEDQOPCD+452 01122000 @NM00116 EQU IEDQOPCD+448 01123000 OPCSDUPU EQU IEDQOPCD+444 01124000 OPCSDULU EQU IEDQOPCD+440 01125000 OPCSDRVT EQU IEDQOPCD+436 01126000 OPCSDRET EQU IEDQOPCD+432 01127000 OPCSDHSY EQU IEDQOPCD+428 01128000 OPCSDENQ EQU IEDQOPCD+424 01129000 OPCSDDIA EQU IEDQOPCD+420 01130000 OPCSDAPU EQU IEDQOPCD+416 01131000 OPCSDALU EQU IEDQOPCD+412 01132000 OPCCSKEY EQU IEDQOPCD+408 01133000 OPCSSKEY EQU IEDQOPCD+404 01134000 OPCPRTTE EQU IEDQOPCD+400 01135000 OPCLU2TT EQU OPCSESS+14 01136000 OPCLU1TT EQU OPCSESS+12 01137000 OPCSNSU2 EQU OPCSNSUS+1 01138000 OPCSNSU1 EQU OPCSNSUS 01139000 OPCSNSMN EQU OPCSNSSY+1 01140000 OPCSNSMJ EQU OPCSNSSY 01141000 OPCCSIB EQU OPCSESS+4 01142000 OPCCTTE EQU OPCSESS+1 01143000 @NM00115 EQU OPCSFLAG 01144000 OPCISQUD EQU OPCSFLAG 01145000 OPCERRST EQU OPCSFLAG 01146000 OPCISRSP EQU OPCSFLAG 01147000 OPCISQUE EQU OPCSFLAG 01148000 OPCRAPMH EQU OPCSFLAG 01149000 OPCRAPI EQU OPCSFLAG 01150000 OPCGTSIB EQU IEDQOPCD+380 01151000 @NM00114 EQU OPCPWCOB+9 01152000 @NM00113 EQU OPCPWCOB+8 01153000 @NM00112 EQU OPCPWECB+1 01154000 OPCPWCCC EQU OPCPWECB 01155000 OPCPWCHN EQU OPCPWQCB+1 01156000 OPCPWVTO EQU OPCPWQCB 01157000 OPCWAITV EQU IEDQOPCD+364 01158000 OPCTOTCK EQU IEDQOPCD+360 01159000 OPCAPXTL EQU IEDQOPCD+356 01160000 OPCDECR EQU IEDQOPCD+352 01161000 OPCBUFWT EQU IEDQOPCD+348 01162000 OPCWRKSP EQU IEDQOPCD+320 01163000 OPCADGOT EQU IEDQOPCD+318 01164000 OPCRQCNT EQU IEDQOPCD+316 01165000 OPPOLSTP EQU IEDQOPCD+312 01166000 OPCCKCIB EQU IEDQOPCD+308 01167000 OPCEND EQU IEDQOPCD+307 01168000 OPCSTCBS EQU IEDQOPCD+306 01169000 OPCHNEND EQU IEDQOPCD+302 01170000 OPCOQSW EQU IEDQOPCD+301 01171000 @NM00111 EQU OPCSPEC 01172000 @NM00110 EQU OPCSPEC 01173000 @NM00109 EQU OPCSPEC 01174000 @NM00108 EQU OPCSPEC 01175000 OPCFRMCA EQU OPCSPEC 01176000 OPCRSTRT EQU OPCSPEC 01177000 OPCPART EQU OPCSPEC 01178000 OPCALTD EQU OPCSPEC 01179000 OPCBFEND EQU IEDQOPCD+296 01180000 OPCBFIRS EQU IEDQOPCD+292 01181000 OPCAVBUF EQU IEDQOPCD+290 01182000 OPCIPLCT EQU IEDQOPCD+289 01183000 OPCCLNTS EQU IEDQOPCD+288 01184000 OPCHA8 EQU IEDQOPCD+286 01185000 OPCBFREQ EQU IEDQOPCD+284 01186000 OPCFREBF EQU IEDQOPCD+280 01187000 OPCNEXT EQU IEDQOPCD+272 01188000 OPCFMDFC EQU IEDQOPCD+268 01189000 OPCSCNC EQU IEDQOPCD+264 01190000 OPCHORTG EQU IEDQOPCD+260 01191000 OPCHORT EQU IEDQOPCD+256 01192000 OPCCKPTL EQU IEDQOPCD+252 01193000 OPCCKPTF EQU IEDQOPCD+248 01194000 OPCWAITA EQU IEDQOPCD+244 01195000 OPCWAITR EQU IEDQOPCD+240 01196000 OPCWAITP EQU IEDQOPCD+236 01197000 OPCWAITO EQU IEDQOPCD+232 01198000 OPCWAITN EQU IEDQOPCD+228 01199000 OPCWAITL EQU IEDQOPCD+224 01200000 OPCWAITC EQU IEDQOPCD+220 01201000 @NM00107 EQU OPCLDNME+5 01202000 @NM00106 EQU OPCLDNME 01203000 OPCWAIT EQU IEDQOPCD+192 01204000 OPCCKERB EQU IEDQOPCD+164 01205000 OPCBFERB EQU IEDQOPCD+148 01206000 OPCFLAG2 EQU IEDQOPCD+147 01207000 OPCFLAG1 EQU IEDQOPCD+146 01208000 OPCWRKSZ EQU IEDQOPCD+144 01209000 OPCWORK EQU IEDQOPCD+140 01210000 OPCRSAVE EQU IEDQOPCD+132 01211000 OPCQCBAD EQU IEDQOPCD+128 01212000 OPCTRMWA EQU IEDQOPCD+52 01213000 OPCPSTWT EQU IEDQOPCD+48 01214000 OPCTNTEA EQU IEDQOPCD+44 01215000 OPCPGCK EQU IEDQOPCD+40 01216000 OPCLCB EQU IEDQOPCD+36 01217000 OPCIPLAD EQU IEDQOPCD+28 01218000 OPCTOFLK EQU IEDQOPCD+24 01219000 OPCOPTLK EQU IEDQOPCD+20 01220000 BDUXGRPH EQU BDUEXRSP 01221000 BDUXFINL EQU BDUEXRSP 01222000 BDUXINIT EQU BDUEXRSP 01223000 BDURESP EQU BDUSYRSP 01224000 BDUPHASE EQU BDUSYRSP 01225000 BDUERROR EQU BDUSYRSP 01226000 BDUXERLK EQU BDUBDUFG 01227000 BDUALTAK EQU BDUFNFLG 01228000 BDUNEGAK EQU BDUFNFLG 01229000 BDUPOSAK EQU BDUFNFLG 01230000 BDUTPTX EQU BDUFNFLG 01231000 BDUFRSTB EQU BDUFNFLG 01232000 BDULEADG EQU BDUFNFLG 01233000 BDUHEADR EQU BDUFNFLG 01234000 BDUSTHDR EQU BDUFNFLG 01235000 BDUMODIF EQU IEDBDU+1 01236000 BDUCMND EQU IEDBDU 01237000 SAVTSMAX EQU IEDNSVTD+500 01238000 SAVTSINO EQU IEDNSVTD+498 01239000 SAVTAMAX EQU IEDNSVTD+496 01240000 SAVTAENO EQU IEDNSVTD+494 01241000 SAVTAINO EQU IEDNSVTD+492 01242000 SAVTNMAX EQU IEDNSVTD+490 01243000 SAVTNENO EQU IEDNSVTD+488 01244000 SAVTNINO EQU IEDNSVTD+486 01245000 SAVTRSZE EQU IEDNSVTD+484 01246000 SAVTRMAX EQU IEDNSVTD+482 01247000 SAVTRENO EQU IEDNSVTD+480 01248000 SAVTRINO EQU IEDNSVTD+478 01249000 SAVTRMIN EQU IEDNSVTD+476 01250000 SAVTPMID EQU IEDNSVTD+474 01251000 SAVTRRTC EQU IEDNSVTD+472 01252000 SAVTLUSG EQU IEDNSVTD+468 01253000 SAVTACNQ EQU IEDNSVTD+464 01254000 SAVTCM20 EQU IEDNSVTD+460 01255000 SAVTCFDC EQU IEDNSVTD+456 01256000 SAVTCMOT EQU IEDNSVTD+452 01257000 SAVTCMIN EQU IEDNSVTD+448 01258000 SAVTCPCH EQU IEDNSVTD+444 01259000 SAVTCRGT EQU IEDNSVTD+440 01260000 SAVTNALC EQU IEDNSVTD+436 01261000 SAVTATCT EQU IEDNSVTD+434 01262000 SAVTCRIU EQU IEDNSVTD+432 01263000 SAVTCRHI EQU IEDNSVTD+430 01264000 SAVTCRIB EQU IEDNSVTD+428 01265000 SAVTLCQ EQU IEDNSVTD+424 01266000 SAVTDRSR EQU IEDNSVTD+420 01267000 SAVTATPT EQU IEDNSVTD+416 01268000 SAVTCSMI EQU IEDNSVTD+412 01269000 SAVTNXCR EQU IEDNSVTD+408 01270000 SAVTCRPT EQU IEDNSVTD+404 01271000 SAVTCIPH EQU IEDNSVTD+400 01272000 SAVTBTCO EQU IEDNSVTD+396 01273000 SAVTBTCI EQU IEDNSVTD+392 01274000 SAVTBPCO EQU IEDNSVTD+388 01275000 SAVTBPCI EQU IEDNSVTD+384 01276000 SAVTLLCB EQU IEDNSVTD+380 01277000 SAVTSCF0 EQU IEDNSVTD+376 01278000 SAVTLSNY EQU IEDNSVTD+372 01279000 SAVTLSZP EQU IEDNSVTD+368 01280000 SAVTOMSU EQU IEDNSVTD+364 01281000 SAVTGTSB EQU IEDNSVTD+360 01282000 SAVTHIBL EQU IEDNSVTD+356 01283000 SAVTHISY EQU IEDNSVTD+352 01284000 SAVTNAX2 EQU IEDNSVTD+348 01285000 SAVTCDRU EQU IEDNSVTD+344 01286000 SAVTPOLC EQU IEDNSVTD+342 01287000 SAVTPOLM EQU IEDNSVTD+340 01288000 SAVTPOLR EQU IEDNSVTD+336 01289000 SAVTCDRN EQU SAVTCDRV 01290000 SAVTPOLL EQU IEDNSVTD+328 01291000 SAVTPOLN EQU IEDNSVTD+326 01292000 @NM00105 EQU IEDNSVTD+325 01293000 @NM00104 EQU SAVTNETF 01294000 SAVTSDIS EQU SAVTNETF 01295000 SAVTROUT EQU SAVTNETF 01296000 SAVTNETW EQU SAVTNETF 01297000 SAVTDIAL EQU IEDNSVTD+320 01298000 SAVTRQUT EQU IEDNSVTD+316 01299000 SAVTBITN EQU IEDNSVTD+312 01300000 @NM00103 EQU SAVTCKQB+8 01301000 @NM00102 EQU SAVTCKEC+1 01302000 @NM00101 EQU SAVTCKCC 01303000 SAVTCKPO EQU SAVTCKCC 01304000 SAVTCKWA EQU SAVTCKCC 01305000 SAVTCKCH EQU SAVTCKTB+1 01306000 SAVTCKVT EQU SAVTCKTB 01307000 @NM00100 EQU IEDNSVTD+297 01308000 SAVTRDFG EQU SAVTRDRV+12 01309000 @NM00099 EQU SAVTRDRV+5 01310000 SAVTRDPY EQU SAVTRDRV+4 01311000 SAVTRDQB EQU SAVTRDRV+1 01312000 SAVTRDKY EQU SAVTRDRV 01313000 SAVTNID EQU IEDNSVTD+280 01314000 SAVTDVAS EQU IEDNSVTD+276 01315000 SAVTPLSZ EQU IEDNSVTD+274 01316000 @NM00098 EQU IEDNSVTD+273 01317000 SAVTSUBL EQU IEDNSVTD+272 01318000 @NM00097 EQU SAVTZELM+1 01319000 SAVTSUBM EQU SAVTZELM 01320000 SAVTMHDX EQU IEDNSVTD+268 01321000 SAVTNAT1 EQU IEDNSVTD+266 01322000 SAVTSH20 EQU IEDNSVTD+264 01323000 SAVTLCBS EQU IEDNSVTD+260 01324000 SAVTRNMP EQU IEDNSVTD+256 01325000 SAVTTNTX EQU IEDNSVTD+252 01326000 SAVTNAX EQU IEDNSVTD+248 01327000 SAVTSUBV EQU IEDNSVTD+247 01328000 SAVTSUBA EQU IEDNSVTD+246 01329000 SAVTSIBC EQU IEDNSVTD+244 01330000 SAVTBSM EQU IEDNSVTD+240 01331000 SAVTSCPT EQU SAVTTCPU 01332000 SAVTRQTG EQU IEDNSVTD+236 01333000 SAVTRQCH EQU IEDNSVTD+232 01334000 SAVTMAND EQU IEDNSVTD+228 01335000 SAVTSPLN EQU IEDNSVTD+224 01336000 SAVTNADL EQU IEDNSVTD+222 01337000 SAVTNATL EQU IEDNSVTD+220 01338000 SAVTMHTB EQU IEDNSVTD+216 01339000 SAVTSSMH EQU IEDNSVTD+212 01340000 SAVTQRS EQU IEDNSVTD+208 01341000 SAVTRQIN EQU IEDNSVTD+204 01342000 SAVTDFCO EQU IEDNSVTD+200 01343000 SAVTSAO EQU IEDNSVTD+196 01344000 SAVTSARI EQU IEDNSVTD+192 01345000 SAVTSAC EQU IEDNSVTD+188 01346000 SAVTSAI EQU IEDNSVTD+184 01347000 SAVTCSCI EQU IEDNSVTD+180 01348000 SAVTSSRP EQU IEDNSVTD+176 01349000 SAVTSSRQ EQU IEDNSVTD+172 01350000 SAVTEP EQU SAVTSCLU 01351000 SAVTXTRQ EQU IEDNSVTD+164 01352000 SAVTMVBF EQU IEDNSVTD+160 01353000 @NM00096 EQU IEDNSVTD+148 01354000 SAVTIPCQ EQU IEDNSVTD+144 01355000 @NM00095 EQU IEDNSVTD+136 01356000 SAVTXFMI EQU IEDNSVTD+132 01357000 @NM00094 EQU IEDNSVTD+124 01358000 SAVTXFMO EQU IEDNSVTD+120 01359000 @NM00093 EQU IEDNSVTD+116 01360000 SAVTSSSR EQU IEDNSVTD+112 01361000 SAVTSCPQ EQU IEDNSVTD+108 01362000 SAVTSLCB EQU IEDNSVTD+104 01363000 SAVTLUSR EQU IEDNSVTD+100 01364000 @NM00092 EQU SAVTLUSQ+8 01365000 SAVTLUSP EQU SAVTLUSQ+4 01366000 SAVTLUSB EQU SAVTLUSQ 01367000 @NM00091 EQU IEDNSVTD+84 01368000 SAVTSAT EQU IEDNSVTD+80 01369000 SAVTNAT EQU IEDNSVTD+76 01370000 SAVTCLUP EQU IEDNSVTD+72 01371000 SAVTPIUT EQU IEDNSVTD+68 01372000 SAVTRNTA EQU IEDNSVTD+64 01373000 SAVTDNIR EQU IEDNSVTD+60 01374000 SAVTCNIR EQU IEDNSVTD+56 01375000 SAVTFLDH EQU IEDNSVTD+52 01376000 SAVTSRTN EQU IEDNSVTD+48 01377000 SAVTSREQ EQU IEDNSVTD+44 01378000 SAVTFAIL EQU IEDNSVTD+42 01379000 SAVTSUSE EQU IEDNSVTD+40 01380000 SAVTSIB EQU IEDNSVTD+36 01381000 SAVTPRTN EQU IEDNSVTD+32 01382000 @NM00090 EQU IEDNSVTD+28 01383000 SAVTWH20 EQU IEDNSVTD+26 01384000 SAVTPWT EQU IEDNSVTD+24 01385000 SAVTPRTQ EQU IEDNSVTD+20 01386000 SAVTPREQ EQU IEDNSVTD+16 01387000 SAVTPH20 EQU IEDNSVTD+14 01388000 SAVTPUSE EQU IEDNSVTD+12 01389000 SAVTPLCB EQU IEDNSVTD+8 01390000 SAVTPOOL EQU IEDNSVTD+4 01391000 SAVTPRMT EQU SAVTDIAF 01392000 SAVTVIRT EQU SAVTDIAF 01393000 AVTTVT EQU IEDQAVTD+1268 01394000 AVTSITS EQU IEDQAVTD+1264 01395000 AVTMSUHI EQU IEDQAVTD+1260 01396000 AVTSITU EQU IEDQAVTD+1256 01397000 AVTSITP EQU IEDQAVTD+1252 01398000 AVTPADDR EQU IEDQAVTD+1248 01399000 @NM00089 EQU IEDQAVTD+1246 01400000 AVTCPBNO EQU IEDQAVTD+1244 01401000 AVTHRESS EQU IEDQAVTD+1243 01402000 @NM00088 EQU IEDQAVTD+1242 01403000 @NM00087 EQU IEDQAVTD+1241 01404000 @NM00086 EQU IEDQAVTD+1240 01405000 @NM00085 EQU IEDQAVTD+1237 01406000 @NM00084 EQU IEDQAVTD+1236 01407000 AVTHRESE EQU @NM00083 01408000 AVTRADDR EQU IEDQAVTD+1228 01409000 AVTNADDR EQU IEDQAVTD+1224 01410000 AVTHRESN EQU IEDQAVTD+1220 01411000 AVTVOLRN EQU IEDQAVTD+1216 01412000 AVTTOTNN EQU IEDQAVTD+1212 01413000 AVTTRCYN EQU IEDQAVTD+1208 01414000 AVTRCTRN EQU IEDQAVTD+1204 01415000 AVTNOVON EQU IEDQAVTD+1200 01416000 AVTADEBN EQU IEDQAVTD+1196 01417000 AVTVOLRR EQU IEDQAVTD+1192 01418000 AVTTOTNR EQU IEDQAVTD+1188 01419000 AVTTRCYR EQU IEDQAVTD+1184 01420000 AVTRCTRR EQU IEDQAVTD+1180 01421000 AVTNOVOR EQU IEDQAVTD+1176 01422000 AVTADEBR EQU IEDQAVTD+1172 01423000 AVTLODPT EQU IEDQAVTD+1168 01424000 AVTIOBN EQU IEDQAVTD+1164 01425000 AVTIOBR EQU IEDQAVTD+1160 01426000 AVTCPBPT EQU IEDQAVTD+1156 01427000 AVTFCPB EQU IEDQAVTD+1152 01428000 @NM00082 EQU IEDQAVTD+1148 01429000 AVTINCPQ EQU IEDQAVTD+1144 01430000 @NM00081 EQU IEDQAVTD+1140 01431000 @NM00080 EQU IEDQAVTD+1137 01432000 @NM00079 EQU AVTBIT4 01433000 @NM00078 EQU AVTBIT4 01434000 @NM00077 EQU AVTBIT4 01435000 @NM00076 EQU AVTBIT4 01436000 @NM00075 EQU AVTBIT4 01437000 @NM00074 EQU AVTBIT4 01438000 @NM00073 EQU AVTBIT4 01439000 AVTRUFTN EQU AVTBIT4 01440000 @NM00072 EQU IEDQAVTD+1132 01441000 AVTNOBFQ EQU IEDQAVTD+1128 01442000 @NM00071 EQU IEDQAVTD+1124 01443000 AVTDKENQ EQU IEDQAVTD+1120 01444000 @NM00070 EQU IEDQAVTD+1116 01445000 AVTDKAPQ EQU IEDQAVTD+1112 01446000 AVTCOPY EQU IEDQAVTD+1108 01447000 AVTIA EQU IEDQAVTD+1104 01448000 AVTFL EQU IEDQAVTD+1100 01449000 @NM00069 EQU IEDQAVTD+1096 01450000 AVTNCPBQ EQU IEDQAVTD+1092 01451000 AVTTOTNC EQU IEDQAVTD+1088 01452000 AVTCMAX EQU IEDQAVTD+1084 01453000 AVTCMIN EQU IEDQAVTD+1080 01454000 AVTHM02 EQU IEDQAVTD+1076 01455000 AVTOPCIN EQU IEDQAVTD+1074 01456000 AVTDCTLN EQU IEDQAVTD+1072 01457000 AVTOPMSK EQU IEDQAVTD+1068 01458000 AVTDDFT EQU IEDQAVTD+1064 01459000 AVTSTEAL EQU IEDQAVTD+1060 01460000 AVTOPTN EQU IEDQAVTD+1056 01461000 AVTDSKCT EQU IEDQAVTD+1054 01462000 AVTCKRST EQU IEDQAVTD+1053 01463000 AVTSTAN EQU AVTBIT3 01464000 AVTSTACN EQU AVTBIT3 01465000 AVTSTAIN EQU AVTBIT3 01466000 AVTSTAYN EQU AVTBIT3 01467000 AVTOLTBN EQU AVTBIT3 01468000 AVTTSAB EQU AVTBIT3 01469000 AVTRFULN EQU AVTBIT3 01470000 AVTRECVN EQU AVTBIT3 01471000 @NM00068 EQU AVTBIT2 01472000 @NM00067 EQU AVTBIT2 01473000 AVTOPEIN EQU AVTBIT2 01474000 AVTSTRTN EQU AVTBIT2 01475000 AVTTOPOL EQU AVTBIT2 01476000 AVTCOPYN EQU AVTBIT2 01477000 AVTREUSN EQU AVTBIT2 01478000 AVTEXTSC EQU AVTBIT2 01479000 AVTDISKN EQU AVTBIT1 01480000 AVTQUCKN EQU AVTBIT1 01481000 AVTCLOSN EQU AVTBIT1 01482000 AVTREADN EQU AVTBIT1 01483000 AVTDLAYN EQU AVTBIT1 01484000 AVTAQTAN EQU AVTBIT1 01485000 AVTTSON EQU AVTBIT1 01486000 AVTAPLKN EQU AVTBIT1 01487000 AVTDUMBR EQU IEDQAVTD+1048 01488000 AVTDLQX EQU IEDQAVTD+1046 01489000 AVTINTLV EQU IEDQAVTD+1044 01490000 AVTSMCNT EQU IEDQAVTD+1042 01491000 AVTAVFCT EQU IEDQAVTD+1040 01492000 AVTOPCON EQU IEDQAVTD+1038 01493000 AVTOPCNT EQU IEDQAVTD+1036 01494000 AVTLNCNT EQU IEDQAVTD+1034 01495000 AVTKEYLE EQU IEDQAVTD+1032 01496000 AVTHA16 EQU IEDQAVTD+1030 01497000 AVTHA7 EQU IEDQAVTD+1028 01498000 AVTHA4 EQU IEDQAVTD+1026 01499000 AVTHA2 EQU IEDQAVTD+1022 01500000 AVTGETMS EQU IEDQAVTD+1021 01501000 @NM00066 EQU IEDQAVTD+1020 01502000 AVTGETMD EQU IEDQAVTD+1016 01503000 AVTGETMN EQU IEDQAVTD+1012 01504000 AVTCWTOT EQU IEDQAVTD+1008 01505000 AVTCWINT EQU IEDQAVTD+956 01506000 AVTDTRAP EQU IEDQAVTD+952 01507000 @NM00065 EQU IEDQAVTD+950 01508000 @NM00064 EQU AVTIOTR 01509000 AVTIOTRH EQU AVTIOTR 01510000 AVTIOTRE EQU AVTIOTR 01511000 @NM00063 EQU AVTSUBT 01512000 AVTSUBPT EQU AVTSUBT 01513000 AVTSUBON EQU AVTSUBT 01514000 AVTAFE30 EQU IEDQAVTD+944 01515000 AVTAFE20 EQU IEDQAVTD+940 01516000 AVTAFE10 EQU IEDQAVTD+936 01517000 AVTCWEC2 EQU IEDQAVTD+932 01518000 AVTCWPM2 EQU IEDQAVTD+928 01519000 AVTCWTS2 EQU IEDQAVTD+927 01520000 AVTCWTS1 EQU IEDQAVTD+926 01521000 AVTCWCLD EQU AVTCWFL2 01522000 AVTCWRAP EQU AVTCWFL2 01523000 @NM00062 EQU AVTCWFL2 01524000 @NM00061 EQU AVTCWFL2 01525000 @NM00060 EQU AVTCWFL2 01526000 @NM00059 EQU AVTCWFL2 01527000 @NM00058 EQU AVTCWFL2 01528000 AVTCWACT EQU AVTCWFL2 01529000 @NM00057 EQU AVTCWFL1 01530000 @NM00056 EQU AVTCWFL1 01531000 @NM00055 EQU AVTCWFL1 01532000 @NM00054 EQU AVTCWFL1 01533000 @NM00053 EQU AVTCWFL1 01534000 @NM00052 EQU AVTCWFL1 01535000 @NM00051 EQU AVTCWFL1 01536000 AVTCOMWN EQU AVTCWFL1 01537000 AVTCWEC1 EQU IEDQAVTD+920 01538000 AVTCWPM1 EQU IEDQAVTD+916 01539000 AVTCAREA EQU IEDQAVTD+912 01540000 AVTFZERO EQU IEDQAVTD+908 01541000 AVTCADDR EQU IEDQAVTD+904 01542000 AVTCOREC EQU IEDQAVTD+900 01543000 @NM00050 EQU IEDQAVTD+892 01544000 AVTCPBCB EQU IEDQAVTD+888 01545000 @NM00049 EQU IEDQAVTD+880 01546000 AVTDSIOB EQU IEDQAVTD+876 01547000 @NM00048 EQU IEDQAVTD+868 01548000 AVTCPRMB EQU IEDQAVTD+864 01549000 @NM00047 EQU IEDQAVTD+856 01550000 AVTCLOSB EQU IEDQAVTD+852 01551000 @NM00046 EQU IEDQAVTD+844 01552000 AVTACTIB EQU IEDQAVTD+840 01553000 @NM00045 EQU IEDQAVTD+836 01554000 AVTOLTEB EQU IEDQAVTD+832 01555000 AVTOLTCH EQU AVTOLTQB+1 01556000 AVTOLTVT EQU AVTOLTQB 01557000 @NM00044 EQU AVTOPCQB+8 01558000 @NM00043 EQU AVTOPCEC+1 01559000 @NM00042 EQU AVTOPCCC 01560000 AVTOPCPO EQU AVTOPCCC 01561000 AVTOPCWA EQU AVTOPCCC 01562000 AVTOPCCH EQU AVTOPCOB+1 01563000 AVTOPCVT EQU AVTOPCOB 01564000 @NM00041 EQU AVTCKPQB+9 01565000 AVTCKPTS EQU AVTCKPQB+8 01566000 @NM00040 EQU AVTCKPEC+1 01567000 @NM00039 EQU AVTCKPCC 01568000 AVTCKPPO EQU AVTCKPCC 01569000 AVTCKPWA EQU AVTCKPCC 01570000 AVTCKPCH EQU AVTCKPTB+1 01571000 AVTCKPVT EQU AVTCKPTB 01572000 @NM00038 EQU IEDQAVTD+796 01573000 AVTBFRTB EQU IEDQAVTD+792 01574000 @NM00037 EQU IEDQAVTD+788 01575000 AVTSELCH EQU IEDQAVTD+785 01576000 AVTBFRTN EQU AVTBFRFG 01577000 AVTBFREB EQU IEDQAVTD+780 01578000 AVTTIMQ EQU IEDQAVTD+776 01579000 @NM00036 EQU IEDQAVTD+772 01580000 AVTIMQPS EQU IEDQAVTD+768 01581000 AVTINOUT EQU IEDQAVTD+766 01582000 AVTREFTM EQU IEDQAVTD+764 01583000 @NM00035 EQU IEDQAVTD+752 01584000 AVTDELYB EQU IEDQAVTD+748 01585000 AVTOCQPT EQU IEDQAVTD+744 01586000 AVTTSOPT EQU IEDQAVTD+740 01587000 AVTSUPPT EQU IEDQAVTD+736 01588000 AVTCBQCB EQU IEDQAVTD+732 01589000 AVTMSGS EQU IEDQAVTD+729 01590000 @NM00034 EQU AVTSYSER 01591000 @NM00033 EQU AVTSYSER 01592000 @NM00032 EQU AVTSYSER 01593000 @NM00031 EQU AVTSYSER 01594000 @NM00030 EQU AVTSYSER 01595000 @NM00029 EQU AVTSYSER 01596000 AVTCMAXN EQU AVTSYSER 01597000 AVTCMINN EQU AVTSYSER 01598000 AVT2260L EQU IEDQAVTD+724 01599000 AVTABEPL EQU AVTADBUF 01600000 AVTHFF EQU AVTCLRHI+2 01601000 @NM00028 EQU AVTCLRHI 01602000 AVTCCLNK EQU AVTCRELE+5 01603000 AVTCCPRI EQU AVTCRELE+4 01604000 AVTCCQCB EQU AVTCCELE+1 01605000 AVTCCKEY EQU AVTCCELE 01606000 AVTDELAD EQU IEDQAVTD+704 01607000 AVTDELEM EQU IEDQAVTD+700 01608000 AVTBSX EQU AVTCKLNK 01609000 AVTOPETR EQU AVTHG01 01610000 @NM00027 EQU AVTCKBYT 01611000 AVTCKONQ EQU AVTCKBYT 01612000 @NM00026 EQU AVTCKBYT 01613000 @NM00025 EQU AVTCKBYT 01614000 @NM00024 EQU AVTCKBYT 01615000 @NM00023 EQU AVTCKBYT 01616000 @NM00022 EQU AVTCKBYT 01617000 @NM00021 EQU AVTCKBYT 01618000 AVTOPERT EQU IEDQAVTD+690 01619000 AVTOPXCL EQU IEDQAVTD+688 01620000 AVTOPERL EQU IEDQAVTD+687 01621000 @NM00020 EQU IEDQAVTD+686 01622000 AVTCKTIM EQU IEDQAVTD+684 01623000 AVTCKELV EQU IEDQAVTD+682 01624000 AVTCPRCD EQU IEDQAVTD+681 01625000 AVTWARMN EQU AVTCKELF 01626000 AVTCRTLN EQU AVTCKELF 01627000 AVTCPIPN EQU AVTCKELF 01628000 AVTCCLCN EQU AVTCKELF 01629000 AVTCINCN EQU AVTCKELF 01630000 @NM00019 EQU AVTCKELF 01631000 AVTCMCPN EQU AVTCKELF 01632000 AVTNQBCK EQU AVTCKELF 01633000 AVTCKQAD EQU IEDQAVTD+677 01634000 AVTSCBSZ EQU IEDQAVTD+676 01635000 @NM00018 EQU IEDQAVTD+672 01636000 AVTCKELE EQU IEDQAVTD+668 01637000 @NM00017 EQU AVTCKPEL+8 01638000 AVTCKRLK EQU AVTCKPEL+5 01639000 AVTCKRPR EQU AVTCKPEL+4 01640000 AVTCKRMQ EQU AVTCKRMV+1 01641000 AVTCKRKY EQU AVTCKRMV 01642000 AVTHK EQU IEDQAVTD+648 01643000 AVTHI EQU IEDQAVTD+644 01644000 AVTIOT EQU IEDQAVTD+640 01645000 AVTNX EQU IEDQAVTD+636 01646000 AVTTONE EQU IEDQAVTD+632 01647000 AVTA3TL EQU IEDQAVTD+628 01648000 AVTDMECB EQU IEDQAVTD+624 01649000 AVTABEND EQU IEDQAVTD+618 01650000 AVTPLCBN EQU IEDQAVTD+616 01651000 @NM00016 EQU AVTSAVTP+1 01652000 @NM00015 EQU AVTSAVTF 01653000 AVTRAPI EQU AVTSAVTF 01654000 AVTLCLST EQU AVTSAVTF 01655000 AVT370X EQU AVTSAVTF 01656000 AVTSNA EQU AVTSAVTF 01657000 AVTONSNA EQU AVTSAVTF 01658000 AVTVTMCP EQU AVTSAVTF 01659000 AVTTRNOS EQU IEDQAVTD+608 01660000 AVTCMBSS EQU IEDQAVTD+604 01661000 AVTRCV EQU IEDQAVTD+600 01662000 AVTSEND EQU IEDQAVTD+596 01663000 AVTCSCH EQU IEDQAVTD+592 01664000 AVTQ1 EQU IEDQAVTD+588 01665000 AVTE7 EQU IEDQAVTD+584 01666000 AVTHB EQU IEDQAVTD+580 01667000 AVTR1 EQU IEDQAVTD+576 01668000 AVTBZ EQU IEDQAVTD+572 01669000 AVTEZ EQU IEDQAVTD+568 01670000 AVTEC EQU IEDQAVTD+564 01671000 AVTEW EQU IEDQAVTD+560 01672000 AVTNDIAL EQU AVTSCOPT 01673000 AVTN2741 EQU AVTSCOPT 01674000 AVTCONCO EQU AVTSCOPT 01675000 AVTCONC EQU AVTSCOPT 01676000 AVTCMBUF EQU AVTSCOPT 01677000 AVTAPDMP EQU AVTSCOPT 01678000 @NM00014 EQU AVTSCOPT 01679000 AVTHA EQU AVTDISP 01680000 AVTEA EQU IEDQAVTD+548 01681000 AVTAX EQU IEDQAVTD+544 01682000 AVTA3 EQU IEDQAVTD+540 01683000 AVTGD EQU IEDQAVTD+536 01684000 AVTAL EQU IEDQAVTD+532 01685000 AVTOLTST EQU AVTHG02 01686000 AVTE8 EQU IEDQAVTD+524 01687000 AVTUI EQU IEDQAVTD+520 01688000 AVTCOMPT EQU IEDQAVTD+516 01689000 AVTCRSRF EQU IEDQAVTD+512 01690000 @NM00013 EQU IEDQAVTD+508 01691000 AVTKA02 EQU IEDQAVTD+504 01692000 AVTOPTPT EQU IEDQAVTD+500 01693000 AVTPCBPT EQU IEDQAVTD+496 01694000 AVTECBAD EQU IEDQAVTD+492 01695000 AVTOPECA EQU IEDQAVTD+488 01696000 AVTOLECA EQU IEDQAVTD+484 01697000 AVTCKECA EQU IEDQAVTD+480 01698000 AVTCWECA EQU IEDQAVTD+476 01699000 AVTCWTCB EQU IEDQAVTD+472 01700000 AVTOLTCB EQU IEDQAVTD+468 01701000 AVTOCTCB EQU IEDQAVTD+464 01702000 AVTCKTCB EQU IEDQAVTD+460 01703000 AVTAS EQU IEDQAVTD+456 01704000 AVTNOLBF EQU IEDQAVTD+454 01705000 AVTNCKPR EQU IEDQAVTD+453 01706000 AVTCIB EQU IEDQAVTD+452 01707000 AVTSPLPT EQU IEDQAVTD+448 01708000 AVTMVBFR EQU IEDQAVTD+444 01709000 AVTSBTA EQU IEDQAVTD+440 01710000 AVTRARTN EQU IEDQAVTD+436 01711000 AVTBSCAN EQU IEDQAVTD+432 01712000 AVTRDYA EQU IEDQAVTD+428 01713000 AVTRNMPT EQU IEDQAVTD+424 01714000 AVTDISTR EQU IEDQAVTD+420 01715000 AVTPARM3 EQU IEDQAVTD+416 01716000 @NM00012 EQU AVTPKF 01717000 @NM00011 EQU AVTPKF 01718000 @NM00010 EQU AVTPKF 01719000 AVTFTCHF EQU AVTPKF 01720000 @NM00009 EQU AVTPKF 01721000 @NM00008 EQU AVTPKF 01722000 @NM00007 EQU AVTPKF 01723000 @NM00006 EQU AVTPKF 01724000 AVTPARM EQU IEDQAVTD+408 01725000 AVTEXS2A EQU IEDQAVTD+402 01726000 AVTEXA2S EQU IEDQAVTD+396 01727000 AVTOCGET EQU IEDQAVTD+392 01728000 AVTCKAVT EQU @NM00004+1 01729000 @NM00005 EQU AVTCKFLG 01730000 AVTCKHLT EQU AVTCKFLG 01731000 AVTCKREQ EQU AVTCKFLG 01732000 AVTCKENV EQU AVTCKFLG 01733000 AVTCKNAC EQU AVTCKFLG 01734000 AVTCKTAC EQU AVTCKFLG 01735000 AVTBUENT EQU IEDQAVTD+386 01736000 @NM00003 EQU IEDQAVTD+385 01737000 AVTFULLT EQU AVTBUFSW 01738000 AVTUNCON EQU AVTBUFSW 01739000 AVTTRAPI EQU AVTBUFSW 01740000 @NM00002 EQU AVTBUFSW 01741000 AVTBUFTR EQU AVTREADD 01742000 AVTREADY EQU IEDQAVTD+376 01743000 AVTRACE EQU IEDQAVTD+372 01744000 AVTTCB EQU IEDQAVTD+368 01745000 AVTPASWD EQU IEDQAVTD+360 01746000 AVTCTLCH EQU IEDQAVTD+352 01747000 AVTDOUBL EQU IEDQAVTD+344 01748000 AVTDOUBX EQU IEDQAVTD+336 01749000 AVTDPARM EQU IEDQAVTD+332 01750000 AVTCSTCS EQU IEDQAVTD+328 01751000 AVTDLQ EQU AVTSAVEX+32 01752000 @NM00001 EQU AVTSAVEX 01753000 AVTSAVE4 EQU IEDQAVTD+216 01754000 AVTSAVE3 EQU IEDQAVTD+144 01755000 AVTSAVE2 EQU IEDQAVTD+72 01756000 AVTSAVE1 EQU IEDQAVTD 01757000 * END UNREFERENCED COMPONENTS 01758000 @RT00430 EQU PRORESP 01759000 @RT00432 EQU CMDINV 01760000 @RT00435 EQU CMDINV 01761000 @RF00446 EQU CMDINV 01762000 @RC00441 EQU @RC00439 01763000 @RF00439 EQU CMDINV 01764000 @RT00456 EQU CMDINV 01765000 @RT00461 EQU CMDINV 01766000 @RC00470 EQU WRITE 01767000 @RC00468 EQU WRITE 01768000 @RC00466 EQU WRITE 01769000 @RF00480 EQU CMDINV 01770000 @RC00478 EQU @RC00476 01771000 @RF00476 EQU CMDINV 01772000 @RF00523 EQU WRITE 01773000 @EL01 EQU @EL00001 01774000 @ENDDATA EQU * 01775000 END IGCMU10D 01776000