TITLE 'IGCDB10D - DISPLAY 3705 SWITCHING STATUS *00001000 ' 00002000 IGCDB10D CSECT , 0001 00003000 @PROLOG DS 0H 0002 00004000 EJECT 00005000 EJECT 00006000 EJECT 00007000 EJECT 00008000 * RBASE=REG15; /* MOVE ENTRY POINT ADDRESS 0217 00009000 * @Y17XARK*/ 00010000 LR RBASE,REG15 0217 00011000 * RFY 0218 00012000 * REG15 UNRSTD; /* @Y17XARK*/ 00013000 * GEN CODE NODEFS NOSETS REFS(RBASE) NOEXIT SEQFLOW NOFLOWS; 0219 00014000 * /* 00015000 USING IGCDB10D,RBASE ESTABLISH CODE ADDRESSABILITY @Y17XARK 00016000 IGCDB10D IEDHJN AFTERHJN,HJN @Y17XARK 00017000 * ROPCAVT=RPARM; /* BASE FOR OP CTL AVT */ 00018000 LR ROPCAVT,RPARM 0220 00019000 * IEDQAPTR=OPCAVTPT; /* BASE FOR TCAM AVT */ 00020000 L IEDQAPTR,OPCAVTPT(,ROPCAVT) 0221 00021000 * ROPCE=OPCCOPCE; /* GET ELEMENT POINTER */ 00022000 L ROPCE,OPCCOPCE(,ROPCAVT) 0222 00023000 * RWORKA=OPCWORK; /* ADDRESS OF WORK AREA */ 00024000 L RWORKA,OPCWORK(,ROPCAVT) 0223 00025000 * OCBACKUP(1)=BLANK; /* TO BLANK FIELD */ 00026000 MVI OCBACKUP(ROPCE),C' ' 0224 00027000 * OCBACKUP(2:8)=OCBACKUP; /* BLANK OUT OCBACKUP */ 00028000 MVC OCBACKUP+1(7,ROPCE),OCBACKUP(ROPCE) 0225 00029000 * RESTRICT(RWKAPTR); 0226 00030000 * RWKAPTR=OCELEM; /* ADDR TO START THE SCAN */ 00031000 L RWKAPTR,OCELEM(,ROPCE) 0227 00032000 * IF RSOURCE=BLANK THEN /* BLANK IN 1ST POSITION */ 00033000 CLI RSOURCE(RWKAPTR),C' ' 0228 00034000 BE @RT00228 0228 00035000 * GO TO CMDINV; /* YES- CMD IS INVALID */ 00036000 * OCSCAN=0; /* CLEAR SCAN FIELD @OY12425*/ 00037000 MVI OCSCAN(ROPCE),X'00' 0230 00038000 * OCADDR='1'B; /* FLD IS A UCB ADDR @OY12425*/ 00039000 * OCDDNAME='1'B; /* OR A DDNAME @OY12425*/ 00040000 OI OCADDR(ROPCE),B'10100000' 0232 00041000 * RBRNCH=OPCDCBLK; /* PREPARE TO BRANCH @OY12425*/ 00042000 L RBRNCH,OPCDCBLK(,ROPCAVT) 0233 00043000 * GEN; 0234 00044000 * /* @OY12425*/ 00045000 BAL RRET,4(RBRNCH) GO TO DCBLOOKUP @OY12425 00046000 B GOODRTN NAME WAS FOUND @OY12425 00047000 B TTECHECK NAME NOT FOUND @OY12425 00048000 B CMDINV INVALID SYNTAX @OY12425 00049000 *TTECHECK: /* @Y17XARX*/ 00050000 * RSAVE=ADDR(OPCSAVE); /* SET SAVE AREA PTR @Y17XARX*/ 00051000 TTECHECK LA RSAVE,OPCSAVE(,ROPCAVT) 0235 00052000 * CALL TRMOFLOC; /* GET TTE PTR @Y17XARX*/ 00053000 L @15,OPCTOFLK(,ROPCAVT) 0236 00054000 BALR @14,@15 0236 00055000 * GO TO TTEOKAY; /* FOUND TTE @Y17XARX*/ 00056000 B TTEOKAY 0237 00057000 *DLABEL: 0238 00058000 * RZERO=173; /* SET ERROR MSG 173 @Y17XARX*/ 00059000 DLABEL LA RZERO,173 0238 00060000 * OCBACKUP(1:8)=OPCDOUBL; /* SET UP ERROR DATA @XM05731*/ 00061000 MVC OCBACKUP(8,ROPCE),OPCDOUBL(ROPCAVT) 0239 00062000 * GO TO ERREXIT; /* PRINT OUT ERROR MSG @Y17XARX*/ 00063000 B ERREXIT 0240 00064000 *TTEOKAY: /* @Y17XARX*/ 00065000 * IF TRMPROC='0'B&TRMPREF='1'B&TRMTYPE=TRMLNCP/* IS TTE NCP 0241 00066000 * @Y17XARX*/ 00067000 * THEN /* @Y17XARX*/ 00068000 TTEOKAY TM TRMPREF(IEDQTPTR),B'00010000' 0241 00069000 BNO @RF00241 0241 00070000 TM TRMPROC(IEDQTPTR),B'00100000' 0241 00071000 BNZ @RF00241 0241 00072000 LR @10,IEDQTPTR 0241 00073000 AL @10,@CF01205 0241 00074000 CLI TRMTYPE-11(@10),X'0F' 0241 00075000 BE @RT00241 0241 00076000 * GO TO VALIDTTE; /* YES @Y17XARX*/ 00077000 *TTEERROR: /* @Y17XARX*/ 00078000 * RZERO=173; /* SET ERROR MSG 173 @Y17XARX*/ 00079000 @RF00241 DS 0H 0243 00080000 TTEERROR LA RZERO,173 0243 00081000 * OCBACKUP(1:8)=OPCDOUBL; /* SET UP ERROR DATA @XM05731*/ 00082000 MVC OCBACKUP(8,ROPCE),OPCDOUBL(ROPCAVT) 0244 00083000 * GO TO ERREXIT; /* PRINT OUT ERROR MSG */ 00084000 B ERREXIT 0245 00085000 *GOODRTN: 0246 00086000 * OCBACKUP(1:8)=OPCDOUBL; /* SAVE GRPNME @OY12425*/ 00087000 GOODRTN MVC OCBACKUP(8,ROPCE),OPCDOUBL(ROPCAVT) 0246 00088000 * RDCB=RPARM; /* SET UP DCB ADDRESS */ 00089000 LR RDCB,RPARM 0247 00090000 * IF DCBDSGTR='0'B THEN /* IS THIS A 3705 DCB? @Y17XARX*/ 00091000 TM DCBDSGTR(DCBPTR),B'00000100' 0248 00092000 BZ @RT00248 0248 00093000 * GO TO TTECHECK; /* NO-CHECK NCP NAME @Y17XARX*/ 00094000 * RLCB=DCBIOBAD+DCBEIOBX-LCBOFF; /* FIRST LCB ADDR @Y17XARX*/ 00095000 SLR @10,@10 0250 00096000 IC @10,DCBEIOBX(,DCBPTR) 0250 00097000 AL @10,DCBIOBAD(,DCBPTR) 0250 00098000 SL @10,@CF00070 0250 00099000 LR RLCB,@10 0250 00100000 * RPARM=LCBTTCIN; /* GET NCP TTCIN @Y17XARX*/ 00101000 LH RPARM,LCBTTCIN(,IEDQLPTR) 0251 00102000 N RPARM,@CF01772 0251 00103000 * CALL TNTLOOK; /* GET NCP TTE @Y17XARX*/ 00104000 L @15,AVTRNMPT(,IEDQAPTR) 0252 00105000 BALR @14,@15 0252 00106000 *VALIDTTE: 0253 00107000 * SWTCHMSG=MSG176; /* MOVE MSG176 TO WORK AREA */ 00108000 VALIDTTE MVC SWTCHMSG(84,RWORKA),MSG176 0253 00109000 * RNNAME=OCBACKUP; /* SET NAME OF 3705 IN MSG */ 00110000 MVC RNNAME(8,RWORKA),OCBACKUP(ROPCE) 0254 00111000 * IF TRMRSACT='1'B THEN /* IDLE OR ACTIVE @Y17XARX*/ 00112000 LR @10,IEDQTPTR 0255 00113000 AL @10,@CF01773 0255 00114000 TM TRMRSACT-2(@10),B'10000000' 0255 00115000 BNO @RF00255 0255 00116000 * STATUS=ACTIVE; /* STATUS=NOT IDLE (ACTIVE) */ 00117000 MVC STATUS(8,RWORKA),ACTIVE 0256 00118000 * ELSE 0257 00119000 * STATUS=IDLE; /* STATUS IS IDLE */ 00120000 B @RC00255 0257 00121000 @RF00255 MVC STATUS(8,RWORKA),IDLE 0257 00122000 * RESPECIFY 0258 00123000 * RZERO RSTD; /* @Y17XARX*/ 00124000 @RC00255 DS 0H 0259 00125000 * RZERO=NCPDDFLD; /* SET NCP DD FIELD @Y17XARX*/ 00126000 LA RZERO,8 0259 00127000 * RSAVE=ADDR(OPCSAVE); /* SET SAVE AREA PTR @Y17XARX*/ 00128000 LA RSAVE,OPCSAVE(,ROPCAVT) 0260 00129000 * CALL DEVDEPLK; /* GET DEV DEP FIELD @Y17XARX*/ 00130000 L @15,AVTDDFT(,IEDQAPTR) 0261 00131000 BALR @14,@15 0261 00132000 * RESPECIFY 0262 00133000 * RZERO UNRSTD; /* @Y17XARX*/ 00134000 * RESPECIFY 0263 00135000 * RBRNCH RSTD; /* @Y17XARX*/ 00136000 * RNCPDD=RBRNCH; /* SAVE PTR @Y17XARX*/ 00137000 LR RNCPDD,RBRNCH 0264 00138000 * RESPECIFY 0265 00139000 * RBRNCH UNRSTD; /* @Y17XARX*/ 00140000 * IF NCPBKUPN(1)=0 THEN /* IS BACKUP SPECIFIED @Y17XARX*/ 00141000 CLI NCPBKUPN(RNCPDD),0 0266 00142000 BNE @RF00266 0266 00143000 * BACKUP=NONE; /* NO-SPECIFY NONE @Y17XARX*/ 00144000 MVC BACKUP(8,RWORKA),NONE 0267 00145000 * ELSE /* @Y17XARX*/ 00146000 * BACKUP=NCPBKUPN; /* YES - SET NAME @Y17XARX*/ 00147000 B @RC00266 0268 00148000 @RF00266 MVC BACKUP(8,RWORKA),NCPBKUPN(RNCPDD) 0268 00149000 * IF NCPBKUP='1'B THEN /* SWITCHING AVAILABLE @Y17XARX*/ 00150000 @RC00266 TM NCPBKUP(RNCPDD),B'00000100' 0269 00151000 BNO @RF00269 0269 00152000 * SWITCH=AVAIL; /* YES, SET MSG TO AVAIL */ 00153000 MVC SWITCH(8,RWORKA),AVAIL 0270 00154000 * ELSE 0271 00155000 * SWITCH=VOID; /* NO, SET MSG TO VOID OF BACKUP 00156000 * FOR SWITCHING */ 00157000 B @RC00269 0271 00158000 @RF00269 MVC SWITCH(8,RWORKA),VOID 0271 00159000 * LOAD=NCPTXID; /* NAME OF NCP USED FOR IPL 0272 00160000 * @Y17XARX*/ 00161000 @RC00269 MVC LOAD(7,RWORKA),NCPTXID(RNCPDD) 0272 00162000 * OPCLDNME(4:5)=WRTMSG; /* SET UP MSG WRITER MODULE */ 00163000 MVC OPCLDNME+3(2,ROPCAVT),WRTMSG 0273 00164000 * GO TO EXIT; 0274 00165000 B EXIT 0274 00166000 *NOTFOUND: 0275 00167000 * RZERO=17; /* SET ERROR MSG 17 @OY12425*/ 00168000 NOTFOUND LA RZERO,17 0275 00169000 * GO TO ERREXIT; /* PRINT ERROR MSG @OY12425*/ 00170000 B ERREXIT 0276 00171000 *CMDINV: 0277 00172000 * RZERO=18; /* SET ERROR MSG 18 */ 00173000 CMDINV LA RZERO,18 0277 00174000 *ERREXIT: 0278 00175000 * OCLINE='0'B; /* INDICATE NO RLN IN MSG */ 00176000 ERREXIT NI OCLINE(ROPCE),B'11101111' 0278 00177000 * OPCLDNME(4:5)=ERRORMOD; /* SET ERROR MODULE NAME */ 00178000 MVC OPCLDNME+3(2,ROPCAVT),ERRORMOD 0279 00179000 *EXIT: 0280 00180000 * OPCFLAG1=0; /* TURN OFF FLAGS */ 00181000 EXIT MVI OPCFLAG1(ROPCAVT),X'00' 0280 00182000 * RPARM=ROPCAVT; /* PASS AVT ADDRESS */ 00183000 LR RPARM,ROPCAVT 0281 00184000 * GEN; 0282 00185000 XCTL SF=(E,OPCXCTL(ROPCAVT)) CALL NEXT MODULE 00186000 * END IGCDB10D 0283 00187000 * 0283 00188000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00189000 */*%INCLUDE SYSLIB (TAVTD ) */ 00190000 */*%INCLUDE SYSLIB (TLCBD ) */ 00191000 */*%INCLUDE SYSLIB (TNCPID ) */ 00192000 */*%INCLUDE SYSLIB (TOPCED ) */ 00193000 */*%INCLUDE SYSLIB (TOPCAVTD) */ 00194000 */*%INCLUDE SYSLIB (TTRMD ) */ 00195000 */*%INCLUDE SYSLIB (IHADCBDF) */ 00196000 */*%INCLUDE SYSLIB (IHADCB ) */ 00197000 * 0283 00198000 * ; 0283 00199000 @EL00001 DS 0H 0283 00200000 @EF00001 DS 0H 0283 00201000 @ER00001 BR @14 0283 00202000 @DATA DS 0H 00203000 DS 0F 00204000 DS 0F 00205000 @CF00070 DC F'32' 00206000 @CF01773 DC F'-12' 00207000 @CF01205 DC F'-3' 00208000 @CF01772 DC XL4'0000FFFF' 00209000 DS 0D 00210000 WRTMSG DC CL2'07' 00211000 ERRORMOD DC CL2'03' 00212000 ACTIVE DC CL8'ACTIVE' 00213000 IDLE DC CL8'IDLE' 00214000 AVAIL DC CL8'AVAIL' 00215000 VOID DC CL8'VOID' 00216000 NONE DC CL8'NONE' 00217000 MSG176 DS CL84 00218000 ORG MSG176 00219000 MSGLEN DC H'80' 00220000 @NM00195 DS CL2 00221000 @NM00196 DC CL8'IED176I ' 00222000 @NM00197 DC CL8' ' 00223000 @NM00198 DC CL8' STATUS=' 00224000 @NM00199 DC CL8' ' 00225000 @NM00200 DC CL8' BACKUP=' 00226000 @NM00201 DC CL8' ' 00227000 @NM00202 DC CL11' SWITCHING=' 00228000 @NM00203 DC CL8' ' 00229000 @NM00204 DC CL6' LOAD=' 00230000 @NM00205 DC CL7' ' 00231000 ORG MSG176+84 00232000 ZAPAREA DC 50X'00' 00233000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00234000 @01 EQU 01 00235000 @02 EQU 02 00236000 @03 EQU 03 00237000 @04 EQU 04 00238000 @05 EQU 05 00239000 @06 EQU 06 00240000 @07 EQU 07 00241000 @08 EQU 08 00242000 @09 EQU 09 00243000 @10 EQU 10 00244000 @11 EQU 11 00245000 @12 EQU 12 00246000 @13 EQU 13 00247000 @14 EQU 14 00248000 @15 EQU 15 00249000 @0 EQU 00 00250000 @1 EQU 01 00251000 @2 EQU 02 00252000 @3 EQU 03 00253000 @4 EQU 04 00254000 @5 EQU 05 00255000 @6 EQU 06 00256000 @7 EQU 07 00257000 @8 EQU 08 00258000 @9 EQU 09 00259000 @A EQU 10 00260000 @B EQU 11 00261000 @C EQU 12 00262000 @D EQU 13 00263000 @E EQU 14 00264000 @F EQU 15 00265000 RZERO EQU @00 00266000 RPARM EQU @01 00267000 ROPCAVT EQU @02 00268000 ROPCE EQU @03 00269000 IEDQAPTR EQU @04 00270000 RWORKA EQU @05 00271000 DCBPTR EQU @07 00272000 RDCB EQU @07 00273000 RSAVE EQU @13 00274000 RLCB EQU @07 00275000 RNCPDD EQU @07 00276000 RWKAPTR EQU @11 00277000 RBASE EQU @12 00278000 RBRNCH EQU @15 00279000 REG15 EQU @15 00280000 IEDQLPTR EQU @07 00281000 IEDQTPTR EQU @01 00282000 LCBXPTR EQU @05 00283000 RRET EQU @14 00284000 RSOURCE EQU 0 00285000 IEDNCP EQU 0 00286000 NCPFLAG1 EQU IEDNCP+1 00287000 NCPBKUP EQU NCPFLAG1 00288000 NCPBKUPN EQU IEDNCP+2 00289000 NCPTXID EQU IEDNCP+10 00290000 IEDQAVTD EQU 0 00291000 AVTSAVEX EQU IEDQAVTD+288 00292000 @NM00003 EQU IEDQAVTD+388 00293000 AVTCKFLG EQU @NM00003 00294000 AVTBASE EQU IEDQAVTD+412 00295000 AVTPKF EQU AVTBASE 00296000 AVTRNMPT EQU IEDQAVTD+424 00297000 AVTOSECB EQU IEDQAVTD+492 00298000 AVTECB1 EQU AVTOSECB 00299000 AVTHG02 EQU IEDQAVTD+528 00300000 AVTDISP EQU IEDQAVTD+552 00301000 AVTHD EQU IEDQAVTD+556 00302000 AVTSCOPT EQU AVTHD 00303000 AVTSAVTP EQU IEDQAVTD+612 00304000 AVTSAVTF EQU AVTSAVTP 00305000 AVTCKPEL EQU IEDQAVTD+652 00306000 AVTCKRMV EQU AVTCKPEL 00307000 AVTCKELF EQU IEDQAVTD+680 00308000 AVTCKBYT EQU IEDQAVTD+691 00309000 AVTHG01 EQU IEDQAVTD+692 00310000 AVTCKLNK EQU IEDQAVTD+696 00311000 AVTCRELE EQU IEDQAVTD+708 00312000 AVTCCELE EQU AVTCRELE 00313000 AVTCLRHI EQU IEDQAVTD+716 00314000 AVTADBUF EQU IEDQAVTD+720 00315000 AVTSYSER EQU IEDQAVTD+728 00316000 AVTCKPQB EQU IEDQAVTD+804 00317000 AVTCKPTB EQU AVTCKPQB 00318000 AVTCKPEC EQU AVTCKPQB+4 00319000 AVTCKPCC EQU AVTCKPEC 00320000 AVTOPCQB EQU IEDQAVTD+816 00321000 AVTOPCOB EQU AVTOPCQB 00322000 AVTOPCEC EQU AVTOPCQB+4 00323000 AVTOPCCC EQU AVTOPCEC 00324000 AVTOLTQB EQU IEDQAVTD+828 00325000 AVTCWFL1 EQU IEDQAVTD+924 00326000 AVTCWFL2 EQU IEDQAVTD+925 00327000 AVTSUBT EQU IEDQAVTD+948 00328000 AVTIOTR EQU IEDQAVTD+949 00329000 AVTBIT1 EQU IEDQAVTD+1050 00330000 AVTBIT2 EQU IEDQAVTD+1051 00331000 AVTBIT3 EQU IEDQAVTD+1052 00332000 AVTDDFT EQU IEDQAVTD+1064 00333000 AVTBIT4 EQU IEDQAVTD+1136 00334000 @NM00085 EQU IEDQAVTD+1232 00335000 IEDNSVTD EQU 0 00336000 SAVTDIAG EQU IEDNSVTD 00337000 SAVTDIAF EQU SAVTDIAG 00338000 SAVTLUSQ EQU IEDNSVTD+88 00339000 SAVTTCPU EQU IEDNSVTD+238 00340000 SAVTZELM EQU IEDNSVTD+270 00341000 SAVTRDRV EQU IEDNSVTD+284 00342000 SAVTCKQB EQU IEDNSVTD+300 00343000 SAVTCKTB EQU SAVTCKQB 00344000 SAVTCKEC EQU SAVTCKQB+4 00345000 SAVTCKCC EQU SAVTCKEC 00346000 IEDQLCB EQU 0 00347000 LCBRCB EQU IEDQLCB 00348000 LCBTSOB EQU IEDQLCB+19 00349000 LCBCHAIN EQU IEDQLCB+20 00350000 LCBSCRNN EQU LCBCHAIN 00351000 LCBTETEN EQU LCBCHAIN 00352000 LCBINSRC EQU IEDQLCB+21 00353000 LCBLKMDE EQU LCBINSRC+2 00354000 LCBNTXT EQU IEDQLCB+24 00355000 LCBSTAT4 EQU LCBNTXT 00356000 LCBPHASE EQU LCBSTAT4 00357000 LCBSCBDA EQU IEDQLCB+25 00358000 LCBMHA EQU IEDQLCB+29 00359000 LCBFLAG1 EQU IEDQLCB+32 00360000 LCBIOBSN EQU IEDQLCB+33 00361000 LCBSNS EQU LCBIOBSN+1 00362000 LCBSENS0 EQU LCBSNS 00363000 LCBLOSDT EQU LCBSENS0 00364000 LCBTMOUT EQU LCBSENS0 00365000 LCBFLAG3 EQU LCBIOBSN+7 00366000 LCBCSW EQU LCBIOBSN+8 00367000 LCBCSWST EQU LCBCSW+3 00368000 LCBCSWUS EQU LCBCSWST 00369000 LCBCSWCS EQU LCBCSWST+1 00370000 LCBSIOCC EQU LCBIOBSN+15 00371000 LCBDCBPT EQU IEDQLCB+52 00372000 LCBRCQCB EQU IEDQLCB+56 00373000 LCBTHSQ EQU IEDQLCB+60 00374000 LCBINCAM EQU LCBTHSQ 00375000 LCBERRCT EQU IEDQLCB+62 00376000 LCBLSPCI EQU IEDQLCB+65 00377000 LCBRCBFR EQU LCBLSPCI 00378000 LCBSTATE EQU IEDQLCB+70 00379000 LCBSTAT1 EQU LCBSTATE 00380000 LCBSTAT2 EQU LCBSTATE+1 00381000 LCBBEOTN EQU LCBSTAT2 00382000 LCBSYNC EQU LCBSTAT2 00383000 LCBDIAL EQU LCBSTAT2 00384000 LCBTSTSW EQU IEDQLCB+72 00385000 LCBERB EQU IEDQLCB+76 00386000 LCBERBST EQU IEDQLCB+84 00387000 LCBDLNKN EQU LCBERBST 00388000 LCBERBCT EQU IEDQLCB+88 00389000 LCBRBCT2 EQU LCBERBCT+1 00390000 LCBTTCIN EQU IEDQLCB+90 00391000 LCBMSGFM EQU IEDQLCB+92 00392000 LCBOBRCH EQU IEDQLCB+96 00393000 LCBINVPT EQU LCBOBRCH+1 00394000 LCBBFRW EQU LCBINVPT 00395000 LCBTPCD EQU IEDQLCB+100 00396000 LCBSTAT5 EQU LCBTPCD 00397000 LCBSTAT6 EQU LCBTPCD+4 00398000 LCBRSPSV EQU LCBTPCD+8 00399000 LCBSAVSN EQU IEDQLCB+112 00400000 LCBERCCW EQU IEDQLCB+120 00401000 LCBCPA EQU IEDQLCB+144 00402000 LCBCCW5 EQU LCBCPA+32 00403000 IEDQLCBX EQU 0 00404000 LCBXCON EQU IEDQLCBX 00405000 LCBXFLAG EQU LCBXCON 00406000 LCBXDCT EQU LCBXCON+1 00407000 LCBXRADR EQU LCBXCON+4 00408000 IEDQOPCE EQU 0 00409000 OCELEM EQU IEDQOPCE+4 00410000 OCUNIT EQU IEDQOPCE+8 00411000 OCRUDEST EQU OCUNIT 00412000 OCCKPKEY EQU OCRUDEST 00413000 OCSCAN EQU OCCKPKEY 00414000 OCADDR EQU OCSCAN 00415000 OCDDNAME EQU OCSCAN 00416000 OCOPTCDE EQU IEDQOPCE+12 00417000 OCSWITCH EQU IEDQOPCE+13 00418000 OCFLAG EQU IEDQOPCE+14 00419000 OCLINE EQU OCFLAG 00420000 @NM00149 EQU IEDQOPCE+16 00421000 OCDEST EQU @NM00149 00422000 OCREQVAL EQU OCDEST+1 00423000 OCLINENO EQU IEDQOPCE+22 00424000 OCTIOT EQU OCLINENO 00425000 OCTRUNIT EQU IEDQOPCE+24 00426000 OCRSID EQU OCTRUNIT 00427000 OCALSTAT EQU OCRSID 00428000 OCPARM EQU IEDQOPCE+28 00429000 OCBACKUP EQU IEDQOPCE+32 00430000 OCMODNME EQU IEDQOPCE+40 00431000 OCIPLWA EQU OCMODNME 00432000 OCCKDATA EQU IEDQOPCE+48 00433000 OCRSTGTM EQU OCCKDATA 00434000 IEDQOPCN EQU 0 00435000 OCLDNME EQU IEDQOPCN 00436000 OCLINTTE EQU OCLDNME 00437000 OCREQFLG EQU OCLINTTE+2 00438000 OCPREFLG EQU OCLINTTE+3 00439000 IEDQOPCD EQU 0 00440000 OPCDOUBL EQU IEDQOPCD 00441000 OPCAVTPT EQU IEDQOPCD+8 00442000 OPCCOPCE EQU IEDQOPCD+12 00443000 OPCDCBLK EQU IEDQOPCD+16 00444000 OPCTOFLK EQU IEDQOPCD+24 00445000 OPCSAVE EQU IEDQOPCD+56 00446000 OPCWORK EQU IEDQOPCD+140 00447000 OPCFLAG1 EQU IEDQOPCD+146 00448000 OPCAQCTL EQU IEDQOPCD+180 00449000 OPCLDNME EQU IEDQOPCD+212 00450000 OPCSPEC EQU IEDQOPCD+300 00451000 OPCPWCOB EQU IEDQOPCD+368 00452000 OPCPWQCB EQU OPCPWCOB 00453000 OPCPWECB EQU OPCPWCOB+4 00454000 IEDQTRM EQU 0 00455000 TRMSTATE EQU IEDQTRM 00456000 TRMLOG EQU TRMSTATE 00457000 TRMPROC EQU TRMLOG 00458000 TRMPREF EQU TRMSTATE 00459000 TRMINSEQ EQU IEDQTRM+4 00460000 TLISTCNT EQU TRMINSEQ 00461000 TRMOUTSQ EQU IEDQTRM+6 00462000 TLISTEN EQU TRMOUTSQ 00463000 TRMDSORG EQU TLISTEN 00464000 TRMALTD EQU IEDQTRM+8 00465000 TRMDEVFL EQU IEDQTRM+10 00466000 TRMSTAT EQU IEDQTRM+12 00467000 IEDNTRM EQU 0 00468000 TRMBYTE4 EQU IEDNTRM 00469000 TRMBYTE3 EQU IEDNTRM+1 00470000 TRMBYTE2 EQU IEDNTRM+2 00471000 TRMRSACT EQU TRMBYTE2 00472000 TRMINPG EQU TRMBYTE2 00473000 TRMBYTE1 EQU IEDNTRM+3 00474000 TRMSCPRQ EQU TRMBYTE1 00475000 TRMBYTE0 EQU IEDNTRM+6 00476000 TRMSIBPT EQU IEDNTRM+7 00477000 TRMTYPE EQU IEDNTRM+11 00478000 IHADCB EQU 0 00479000 SWTCHMSG EQU 0 00480000 RNNAME EQU SWTCHMSG+12 00481000 STATUS EQU SWTCHMSG+28 00482000 BACKUP EQU SWTCHMSG+44 00483000 SWITCH EQU SWTCHMSG+63 00484000 LOAD EQU SWTCHMSG+77 00485000 TRMOFLOC EQU 0 00486000 TNTLOOK EQU 0 00487000 DEVDEPLK EQU 0 00488000 DDNAME EQU 4 00489000 TCBTIO EQU 12 00490000 UCBAD EQU 0 00491000 UCBNAME EQU 13 00492000 WORKAREA EQU 0 00493000 LCBRSPIN EQU LCBIOBSN 00494000 LCBLUSNS EQU LCBRSPIN+5 00495000 LCBSCPRS EQU LCBRSPIN+9 00496000 LCBCSWU1 EQU LCBSCPRS+2 00497000 LCBRSPFG EQU LCBRSPIN+15 00498000 LCBCOREQ EQU LCBTPCD 00499000 @NM00132 EQU LCBCPA+40 00500000 LCBQNX EQU LCBERCCW 00501000 LCBQNXMN EQU LCBQNX 00502000 LCBQEBPL EQU LCBQNX+4 00503000 LCBCANCL EQU LCBSAVSN 00504000 LCBCANFG EQU LCBCANCL 00505000 OCCKPKY1 EQU OCCKPKEY 00506000 OCCKPTYP EQU OCCKPKY1 00507000 OCICACTN EQU OCMODNME 00508000 OCICDADR EQU OCICACTN 00509000 OCICSW EQU OCICDADR+3 00510000 OPCAQWD EQU OPCAQCTL 00511000 OPCAQWD1 EQU OPCAQWD 00512000 OPCAQWD2 EQU OPCAQWD+4 00513000 OPCAQWD3 EQU OPCAQWD+8 00514000 TRMPRE1 EQU TRMBYTE4 00515000 TRMNCP1 EQU TRMBYTE4 00516000 TRMPRE EQU TRMBYTE3 00517000 TRMNCP EQU TRMBYTE3 00518000 TRMPU EQU TRMBYTE3 00519000 TRMLU EQU TRMBYTE3 00520000 TRMLINK EQU TRMBYTE3 00521000 IHADCS1A EQU IHADCB+8 00522000 DCBBCKUP EQU IHADCS1A+8 00523000 IHADCS2K EQU IHADCB+20 00524000 DCBDUMPD EQU IHADCS2K 00525000 DCBTRSTA EQU IHADCS2K+5 00526000 DCBDSORG EQU IHADCS2K+6 00527000 DCBDSRG2 EQU DCBDSORG+1 00528000 DCBDSGTR EQU DCBDSRG2 00529000 DCBIOBAD EQU IHADCS2K+8 00530000 DCBRNCKD EQU IHADCS2K+12 00531000 DCBEXLST EQU IHADCS2K+16 00532000 DCBEIOBX EQU DCBEXLST 00533000 IHADCS24 EQU IHADCB+40 00534000 DCBOFLGS EQU IHADCS24+8 00535000 DCBOFLWR EQU DCBOFLGS 00536000 DCBIFLG EQU IHADCS24+9 00537000 DCBIBPCT EQU DCBIFLG 00538000 DCBMACR EQU IHADCS24+10 00539000 DCBMACR1 EQU DCBMACR 00540000 DCBMRFE EQU DCBMACR1 00541000 DCBMRGET EQU DCBMRFE 00542000 DCBMRAPG EQU DCBMACR1 00543000 DCBMRRD EQU DCBMRAPG 00544000 DCBMRCI EQU DCBMACR1 00545000 DCBMRMVG EQU DCBMRCI 00546000 DCBMRLCG EQU DCBMACR1 00547000 DCBMRABC EQU DCBMACR1 00548000 DCBMRPT1 EQU DCBMRABC 00549000 DCBMRSBG EQU DCBMRPT1 00550000 DCBMRCRL EQU DCBMACR1 00551000 DCBMRCHK EQU DCBMRCRL 00552000 DCBMRRDX EQU DCBMRCHK 00553000 DCBMRDMG EQU DCBMACR1 00554000 DCBMACR2 EQU DCBMACR+1 00555000 DCBMRPUT EQU DCBMACR2 00556000 DCBMRWRT EQU DCBMACR2 00557000 DCBMRMVP EQU DCBMACR2 00558000 DCBMR5WD EQU DCBMACR2 00559000 DCBMRLDM EQU DCBMR5WD 00560000 DCBMRLCP EQU DCBMRLDM 00561000 DCBMR4WD EQU DCBMACR2 00562000 DCBMRPT2 EQU DCBMR4WD 00563000 DCBMRTMD EQU DCBMRPT2 00564000 DCBMR3WD EQU DCBMACR2 00565000 DCBMRCTL EQU DCBMR3WD 00566000 DCBMRSTK EQU DCBMRCTL 00567000 DCBMR1WD EQU DCBMACR2 00568000 DCBMRSWA EQU DCBMR1WD 00569000 DCBMRDMD EQU DCBMRSWA 00570000 IHADCS25 EQU IHADCB+40 00571000 DCBTIOT EQU IHADCS25 00572000 DCBMACRF EQU IHADCS25+2 00573000 DCBMACF1 EQU DCBMACRF 00574000 DCBMFFE EQU DCBMACF1 00575000 DCBMFGET EQU DCBMFFE 00576000 DCBMFAPG EQU DCBMACF1 00577000 DCBMFRD EQU DCBMFAPG 00578000 DCBMFCI EQU DCBMACF1 00579000 DCBMFMVG EQU DCBMFCI 00580000 DCBMFLCG EQU DCBMACF1 00581000 DCBMFABC EQU DCBMACF1 00582000 DCBMFPT1 EQU DCBMFABC 00583000 DCBMFSBG EQU DCBMFPT1 00584000 DCBMFCRL EQU DCBMACF1 00585000 DCBMFCHK EQU DCBMFCRL 00586000 DCBMFDMG EQU DCBMACF1 00587000 DCBMACF2 EQU DCBMACRF+1 00588000 DCBMFPUT EQU DCBMACF2 00589000 DCBMFWRT EQU DCBMACF2 00590000 DCBMFMVP EQU DCBMACF2 00591000 DCBMF5WD EQU DCBMACF2 00592000 DCBMFLDM EQU DCBMF5WD 00593000 DCBMFLCP EQU DCBMFLDM 00594000 DCBMF4WD EQU DCBMACF2 00595000 DCBMFPT2 EQU DCBMF4WD 00596000 DCBMFTMD EQU DCBMFPT2 00597000 DCBMF3WD EQU DCBMACF2 00598000 DCBMFCTL EQU DCBMF3WD 00599000 DCBMFSTK EQU DCBMFCTL 00600000 DCBMF1WD EQU DCBMACF2 00601000 DCBMFSWA EQU DCBMF1WD 00602000 DCBMFDMD EQU DCBMFSWA 00603000 DCBDEBAD EQU IHADCS25+4 00604000 DCBIFLGS EQU DCBDEBAD 00605000 DCBIFPCT EQU DCBIFLGS 00606000 IHADCS27 EQU IHADCB+48 00607000 DCBGET EQU IHADCS27 00608000 DCBPUT EQU DCBGET 00609000 DCBGETA EQU DCBPUT+1 00610000 IHADCS43 EQU IHADCB+48 00611000 DCBSCTAB EQU IHADCS43 00612000 DDNAME1 EQU DCBTIOT 00613000 OCCIB EQU OCREQVAL 00614000 TRMOPT EQU IEDQTRM+20 00615000 * START UNREFERENCED COMPONENTS 00616000 DCBBUFSI EQU IHADCS43+6 00617000 DCBUNTCT EQU IHADCS43+5 00618000 DCBILCT EQU IHADCS43+4 00619000 DCBSCTAD EQU DCBSCTAB+1 00620000 @NM00188 EQU DCBSCTAB 00621000 DCBPUTA EQU DCBGETA 00622000 @NM00187 EQU DCBPUT 00623000 DCBDEBA EQU DCBDEBAD+1 00624000 @NM00186 EQU DCBIFLGS 00625000 DCBIFIOE EQU DCBIFLGS 00626000 DCBCH12 EQU DCBIFPCT 00627000 DCBCH9 EQU DCBIFPCT 00628000 DCBIFEC EQU DCBIFLGS 00629000 DCBMFSTI EQU DCBMFDMD 00630000 DCBMFAWR EQU DCBMFSTK 00631000 DCBMFUIP EQU DCBMFTMD 00632000 DCBMFIDW EQU DCBMFLCP 00633000 DCBMFWRK EQU DCBMFMVP 00634000 DCBMFRDQ EQU DCBMFWRT 00635000 DCBMFGTQ EQU DCBMFPUT 00636000 DCBMFSTL EQU DCBMACF2 00637000 DCBMFCK EQU DCBMFDMG 00638000 DCBMFRDX EQU DCBMFCHK 00639000 DCBMFDBF EQU DCBMFSBG 00640000 DCBMFRDI EQU DCBMFLCG 00641000 DCBMFRDK EQU DCBMFMVG 00642000 DCBMFWRQ EQU DCBMFRD 00643000 DCBMFPTQ EQU DCBMFGET 00644000 DCBMFECP EQU DCBMACF1 00645000 DCBMRSTI EQU DCBMRDMD 00646000 DCBMRAWR EQU DCBMRSTK 00647000 DCBMRUIP EQU DCBMRTMD 00648000 DCBMRIDW EQU DCBMRLCP 00649000 DCBMRWRK EQU DCBMRMVP 00650000 DCBMRRDQ EQU DCBMRWRT 00651000 DCBMRGTQ EQU DCBMRPUT 00652000 DCBMRSTL EQU DCBMACR2 00653000 DCBMRCK EQU DCBMRDMG 00654000 DCBPGFXA EQU DCBMRRDX 00655000 DCBMRDBF EQU DCBMRSBG 00656000 DCBMRRDI EQU DCBMRLCG 00657000 DCBMRRDK EQU DCBMRMVG 00658000 DCBMRWRQ EQU DCBMRRD 00659000 DCBMRPTQ EQU DCBMRGET 00660000 DCBMRECP EQU DCBMACR1 00661000 @NM00185 EQU DCBIFLG 00662000 DCBIBIOE EQU DCBIFLG 00663000 DCBICH12 EQU DCBIBPCT 00664000 DCBICH9 EQU DCBIBPCT 00665000 DCBIBEC EQU DCBIFLG 00666000 DCBOFIOF EQU DCBOFLGS 00667000 DCBOFUEX EQU DCBOFLGS 00668000 DCBOFTM EQU DCBOFLGS 00669000 DCBOFPPC EQU DCBOFLGS 00670000 DCBOFOPN EQU DCBOFLGS 00671000 DCBOFEOV EQU DCBOFLGS 00672000 DCBOFLRB EQU DCBOFLGS 00673000 DCBOFIOD EQU DCBOFLWR 00674000 DCBDDNAM EQU IHADCS24 00675000 DCBEXLSA EQU DCBEXLST+1 00676000 DCBRNCKA EQU DCBRNCKD+1 00677000 @NM00184 EQU DCBRNCKD 00678000 @NM00183 EQU DCBDSRG2 00679000 DCBDSRG1 EQU DCBDSORG 00680000 DCBCHNGL EQU DCBTRSTA 00681000 DCBNIDLE EQU DCBTRSTA 00682000 DCBBAKUP EQU DCBTRSTA 00683000 DCBIPLED EQU DCBTRSTA 00684000 DCBRSTRT EQU DCBTRSTA 00685000 DCBINITL EQU DCBTRSTA 00686000 DCBAUTOD EQU DCBTRSTA 00687000 DCBAUTOI EQU DCBTRSTA 00688000 @NM00182 EQU IHADCS2K+4 00689000 DCBDUMPA EQU DCBDUMPD+1 00690000 DCBUNITN EQU DCBDUMPD 00691000 DCBBCKUA EQU DCBBCKUP+1 00692000 @NM00181 EQU DCBBCKUP 00693000 DCBIPLTX EQU IHADCS1A 00694000 @NM00179 EQU TRMLINK 00695000 TRMLSTAT EQU TRMLINK 00696000 TRMLINT EQU TRMLINK 00697000 TRMEPMOD EQU TRMLINK 00698000 TRMLULOG EQU TRMLU 00699000 TRMINERR EQU TRMLU 00700000 TRMLUREQ EQU TRMLU 00701000 TRMSESRQ EQU TRMLU 00702000 TRMTDIFF EQU TRMLU 00703000 TRMLUTM EQU TRMLU 00704000 TRMLUIT EQU TRMLU 00705000 TRMAUTO EQU TRMLU 00706000 TRMPCONT EQU TRMPU 00707000 @NM00178 EQU TRMPU 00708000 TRMNCONT EQU TRMNCP 00709000 TRMQUCKN EQU TRMNCP 00710000 TRMSLOWN EQU TRMNCP 00711000 TRMSYGEN EQU TRMNCP 00712000 TRMNCPCL EQU TRMNCP 00713000 TRMIPLDM EQU TRMNCP 00714000 TRMINOUT EQU TRMPRE 00715000 TRMRDOUT EQU TRMPRE 00716000 TRMNLOUT EQU TRMPRE 00717000 TRMWROUT EQU TRMPRE 00718000 TRMASNXI EQU TRMPRE 00719000 TRMSTMM EQU TRMPRE 00720000 TRMCMODE EQU TRMPRE 00721000 TRMSTPND EQU TRMPRE 00722000 @NM00177 EQU TRMNCP1 00723000 TRMINOP EQU TRMNCP1 00724000 TRMLYNCH EQU TRMPRE1 00725000 TRMSPOUT EQU TRMPRE1 00726000 TRMERLCK EQU TRMPRE1 00727000 TRMQNPL EQU TRMPRE1 00728000 TRMSPACT EQU TRMPRE1 00729000 TRMOCNI EQU TRMPRE1 00730000 TRMSESSN EQU TRMPRE1 00731000 TRMCONT EQU TRMPRE1 00732000 OPCAQLST EQU OPCAQWD3+1 00733000 OPCAQRQ3 EQU OPCAQWD3 00734000 OPCAQSEC EQU OPCAQWD2+1 00735000 OPCAQRQ2 EQU OPCAQWD2 00736000 OPCAQFST EQU OPCAQWD1+1 00737000 OPCAQREQ EQU OPCAQWD1 00738000 OCICINAC EQU OCICSW 00739000 @NM00155 EQU OCICSW 00740000 OCICATST EQU OCICDADR+1 00741000 OCICTYPE EQU OCICDADR 00742000 @NM00154 EQU OCCKPKY1 00743000 OCCKPENV EQU OCCKPKY1 00744000 OCCKPRST EQU OCCKPTYP 00745000 OCCKPNCP EQU OCCKPTYP 00746000 OCCKPINC EQU OCCKPTYP 00747000 @NM00139 EQU LCBCANCL+3 00748000 LCBCANTH EQU LCBCANCL+1 00749000 @NM00138 EQU LCBCANFG 00750000 LCBCANCD EQU LCBCANFG 00751000 @NM00137 EQU LCBCANFG 00752000 LCBCANEB EQU LCBCANFG 00753000 LCBCANXT EQU LCBCANFG 00754000 LCBUNADD EQU LCBQNX+21 00755000 LCBUASZE EQU LCBQNX+20 00756000 LCBDSTEA EQU LCBQNX+16 00757000 @NM00136 EQU LCBQNX+12 00758000 LCBCP EQU LCBQEBPL+4 00759000 LCBIOSB EQU LCBQEBPL+1 00760000 LCBSIO EQU LCBQEBPL 00761000 LCBSTSAV EQU LCBQNX+1 00762000 @NM00135 EQU LCBQNXMN 00763000 LCBNX509 EQU LCBQNXMN 00764000 LCBNX162 EQU LCBQNXMN 00765000 LCBNX142 EQU LCBQNXMN 00766000 LCBNX064 EQU LCBQNXMN 00767000 @NM00134 EQU @NM00132+4 00768000 LCBNCPPT EQU @NM00132+1 00769000 @NM00133 EQU @NM00132 00770000 LCBWRSCH EQU LCBCOREQ+8 00771000 LCBCQLNK EQU LCBCOREQ+4 00772000 LCBCQELE EQU LCBCOREQ 00773000 LCBPAKCH EQU LCBRSPIN+16 00774000 @NM00131 EQU LCBRSPFG 00775000 LCBRSRH EQU LCBRSPFG 00776000 LCBEXPI EQU LCBRSPFG 00777000 @NM00130 EQU LCBRSPIN+12 00778000 LCBUSUE1 EQU LCBCSWU1 00779000 @NM00129 EQU LCBCSWU1 00780000 @NM00128 EQU LCBSCPRS+1 00781000 LCBDFCMD EQU LCBSCPRS 00782000 LCBUSER EQU LCBLUSNS+2 00783000 LCBSMIN EQU LCBLUSNS+1 00784000 LCBSMAJ EQU LCBLUSNS 00785000 LCBRHSV EQU LCBRSPIN+2 00786000 LCBSNS0 EQU LCBRSPIN+1 00787000 @NM00127 EQU LCBRSPIN 00788000 @NM00194 EQU SWTCHMSG+71 00789000 @NM00193 EQU SWTCHMSG+52 00790000 @NM00192 EQU SWTCHMSG+36 00791000 @NM00191 EQU SWTCHMSG+20 00792000 @NM00190 EQU SWTCHMSG+4 00793000 @NM00189 EQU SWTCHMSG 00794000 @NM00180 EQU IHADCB 00795000 TRMSUBST EQU IEDNTRM+12 00796000 TRMRLMCT EQU IEDNTRM+10 00797000 TRMCOHTG EQU TRMSIBPT+1 00798000 TRMGPCNT EQU TRMSIBPT 00799000 TRMBUFRD EQU TRMBYTE0 00800000 TRMSNA EQU TRMBYTE0 00801000 TRMGP EQU TRMBYTE0 00802000 TRMDIAL EQU TRMBYTE0 00803000 @NM00176 EQU TRMBYTE0 00804000 TRMOUTPT EQU TRMBYTE0 00805000 TRMINPUT EQU TRMBYTE0 00806000 TRMUDEF EQU TRMBYTE0 00807000 TRMCOHRT EQU IEDNTRM+4 00808000 TRMSTOTE EQU TRMBYTE1 00809000 TRMCKPRN EQU TRMBYTE1 00810000 TRMTSATN EQU TRMBYTE1 00811000 TRMTRACE EQU TRMBYTE1 00812000 TRMSWBCK EQU TRMBYTE1 00813000 TRMAUTOC EQU TRMBYTE1 00814000 TRMINPTP EQU TRMBYTE1 00815000 TRMWTNEG EQU TRMSCPRQ 00816000 TRMWRBRK EQU TRMBYTE2 00817000 TRMNOSND EQU TRMBYTE2 00818000 TRMPREP EQU TRMBYTE2 00819000 TRMGPACT EQU TRMBYTE2 00820000 TRMANDL EQU TRMBYTE2 00821000 TRMCLOSN EQU TRMINPG 00822000 TRMREMB EQU TRMBYTE2 00823000 TRMOPTBL EQU IEDQTRM+18 00824000 TRMOPNO EQU IEDQTRM+17 00825000 TRMCHCIN EQU IEDQTRM+16 00826000 TRMSENSE EQU TRMSTAT+3 00827000 TRMTEMPR EQU TRMSTAT+2 00828000 TRMSIO EQU TRMSTAT 00829000 @NM00175 EQU TRMDEVFL+1 00830000 TRMTPIN EQU TRMDEVFL+1 00831000 TRMNCPI EQU TRMDEVFL+1 00832000 TRMRNTRM EQU TRMDEVFL+1 00833000 @NM00174 EQU TRMDEVFL+1 00834000 TRMLMD EQU TRMDEVFL+1 00835000 TRMCONC EQU TRMDEVFL+1 00836000 TRMTSOB EQU TRMDEVFL 00837000 TRMBFDY EQU TRMDEVFL 00838000 TRMTBLK EQU TRMDEVFL 00839000 TRMSBLK EQU TRMDEVFL 00840000 TRMBLKS EQU TRMDEVFL 00841000 TRMADDC EQU TRMDEVFL 00842000 TRMDDIG EQU TRMDEVFL 00843000 TRMBUFS EQU TRMDEVFL 00844000 TRMPRILK EQU TRMALTD 00845000 TRMLGB EQU TRMDSORG 00846000 TRMUTERM EQU TLISTCNT 00847000 TRMDESTQ EQU IEDQTRM+1 00848000 TRMSCNYN EQU TRMSTATE 00849000 TRMOPTFN EQU TRMSTATE 00850000 TRMHELDN EQU TRMSTATE 00851000 TRMACPTN EQU TRMSTATE 00852000 TRMLIST EQU TRMLOG 00853000 TRMLINE EQU TRMSTATE 00854000 OPCBOTTM EQU IEDQOPCD+1184 00855000 @NM00173 EQU IEDQOPCD+1100 00856000 @NM00172 EQU IEDQOPCD+948 00857000 @NM00171 EQU IEDQOPCD+940 00858000 @NM00170 EQU IEDQOPCD+380 00859000 @NM00169 EQU OPCPWCOB+9 00860000 @NM00168 EQU OPCPWCOB+8 00861000 @NM00167 EQU OPCPWECB+1 00862000 OPCPWCCC EQU OPCPWECB 00863000 OPCPWCHN EQU OPCPWQCB+1 00864000 OPCPWVTO EQU OPCPWQCB 00865000 OPCWAITV EQU IEDQOPCD+364 00866000 OPCTOTCK EQU IEDQOPCD+360 00867000 OPCAPXTL EQU IEDQOPCD+356 00868000 OPCDECR EQU IEDQOPCD+352 00869000 OPCBUFWT EQU IEDQOPCD+348 00870000 OPCWRKSP EQU IEDQOPCD+320 00871000 OPCADGOT EQU IEDQOPCD+318 00872000 OPCRQCNT EQU IEDQOPCD+316 00873000 OPPOLSTP EQU IEDQOPCD+312 00874000 OPCCKCIB EQU IEDQOPCD+308 00875000 OPCEND EQU IEDQOPCD+307 00876000 OPCSTCBS EQU IEDQOPCD+306 00877000 OPCHNEND EQU IEDQOPCD+302 00878000 OPCOQSW EQU IEDQOPCD+301 00879000 @NM00166 EQU OPCSPEC 00880000 @NM00165 EQU OPCSPEC 00881000 @NM00164 EQU OPCSPEC 00882000 @NM00163 EQU OPCSPEC 00883000 OPCFRMCA EQU OPCSPEC 00884000 OPCRSTRT EQU OPCSPEC 00885000 OPCPART EQU OPCSPEC 00886000 OPCALTD EQU OPCSPEC 00887000 OPCBFEND EQU IEDQOPCD+296 00888000 OPCBFIRS EQU IEDQOPCD+292 00889000 OPCAVBUF EQU IEDQOPCD+290 00890000 OPCIPLCT EQU IEDQOPCD+289 00891000 OPCCLNTS EQU IEDQOPCD+288 00892000 OPCHA8 EQU IEDQOPCD+286 00893000 OPCBFREQ EQU IEDQOPCD+284 00894000 OPCFREBF EQU IEDQOPCD+280 00895000 OPCGETBF EQU IEDQOPCD+276 00896000 OPCNEXT EQU IEDQOPCD+272 00897000 OPCFMDFC EQU IEDQOPCD+268 00898000 OPCSCNC EQU IEDQOPCD+264 00899000 OPCHORTG EQU IEDQOPCD+260 00900000 OPCHORT EQU IEDQOPCD+256 00901000 OPCCKPTL EQU IEDQOPCD+252 00902000 OPCCKPTF EQU IEDQOPCD+248 00903000 OPCWAITA EQU IEDQOPCD+244 00904000 OPCWAITR EQU IEDQOPCD+240 00905000 OPCWAITP EQU IEDQOPCD+236 00906000 OPCWAITO EQU IEDQOPCD+232 00907000 OPCWAITN EQU IEDQOPCD+228 00908000 OPCWAITL EQU IEDQOPCD+224 00909000 OPCWAITC EQU IEDQOPCD+220 00910000 @NM00162 EQU OPCLDNME+5 00911000 OPCMODID EQU OPCLDNME+3 00912000 @NM00161 EQU OPCLDNME 00913000 OPCXCTL EQU IEDQOPCD+204 00914000 OPCWAIT EQU IEDQOPCD+192 00915000 OPCCKERB EQU IEDQOPCD+164 00916000 OPCBFERB EQU IEDQOPCD+148 00917000 OPCFLAG2 EQU IEDQOPCD+147 00918000 OPCWRKSZ EQU IEDQOPCD+144 00919000 OPCRSAVE EQU IEDQOPCD+132 00920000 OPCQCBAD EQU IEDQOPCD+128 00921000 OPCTRMWA EQU IEDQOPCD+52 00922000 OPCPSTWT EQU IEDQOPCD+48 00923000 OPCTNTEA EQU IEDQOPCD+44 00924000 OPCPGCK EQU IEDQOPCD+40 00925000 OPCLCB EQU IEDQOPCD+36 00926000 @NM00160 EQU IEDQOPCD+32 00927000 OPCIPLAD EQU IEDQOPCD+28 00928000 OPCOPTLK EQU IEDQOPCD+20 00929000 @NM00159 EQU OCLDNME+4 00930000 @NM00158 EQU OCPREFLG 00931000 OCTOTEP EQU OCPREFLG 00932000 OCREPOST EQU OCPREFLG 00933000 OCRSPSNT EQU OCPREFLG 00934000 OCBFREQ EQU OCPREFLG 00935000 OCIDLE EQU OCREQFLG 00936000 OCFORCE EQU OCREQFLG 00937000 OCDCARD EQU OCREQFLG 00938000 OCPARTAL EQU OCREQFLG 00939000 OCADNCP EQU OCREQFLG 00940000 @NM00157 EQU OCREQFLG 00941000 @NM00156 EQU OCREQFLG 00942000 OCFLUSHZ EQU OCREQFLG 00943000 OCRESPCT EQU OCLINTTE 00944000 OCCKPTWA EQU OCCKDATA+4 00945000 @NM00153 EQU OCRSTGTM+2 00946000 OCCKDAT2 EQU OCRSTGTM+1 00947000 OCCKDAT1 EQU OCRSTGTM 00948000 OCPTRSAV EQU OCMODNME+4 00949000 OCPUADR EQU OCIPLWA+2 00950000 OCWTGSAV EQU OCIPLWA 00951000 OCDVRDCT EQU OCBACKUP+6 00952000 OCNCP EQU OCBACKUP+4 00953000 OCBUFGOT EQU OCBACKUP+2 00954000 OCBUFNED EQU OCBACKUP 00955000 OCWTG EQU IEDQOPCE+30 00956000 OCRESNUM EQU OCPARM 00957000 OCSEQ EQU OCTRUNIT+2 00958000 @NM00152 EQU OCRSID+1 00959000 OCNONE EQU OCALSTAT 00960000 OCSOME EQU OCALSTAT 00961000 OCALLFLG EQU OCALSTAT 00962000 OCACTREQ EQU OCALSTAT 00963000 OCREDRVE EQU OCALSTAT 00964000 OCSEQIND EQU OCALSTAT 00965000 @NM00151 EQU OCALSTAT 00966000 OCRENTRD EQU OCALSTAT 00967000 OCWTGB EQU OCTIOT 00968000 OCTRMTBL EQU IEDQOPCE+20 00969000 @NM00150 EQU @NM00149+2 00970000 OCCONID EQU OCDEST 00971000 OCRLN EQU IEDQOPCE+15 00972000 OCRESP EQU OCFLAG 00973000 OCATTACH EQU OCFLAG 00974000 OCSSCP EQU OCFLAG 00975000 OCOUTPUT EQU OCFLAG 00976000 OCMPP EQU OCFLAG 00977000 OCTOTE EQU OCFLAG 00978000 OCCONSOL EQU OCFLAG 00979000 @NM00148 EQU OCSWITCH 00980000 OCQUCKN EQU OCSWITCH 00981000 OCPRIFLG EQU OCOPTCDE 00982000 @NM00147 EQU OCRUDEST+1 00983000 @NM00146 EQU OCSCAN 00984000 OCNOTUCB EQU OCSCAN 00985000 OCNONAME EQU OCSCAN 00986000 OCALLRLN EQU OCSCAN 00987000 OCDDNRLN EQU OCSCAN 00988000 OCELMPTR EQU OCELEM+1 00989000 OCELMPRI EQU OCELEM 00990000 OCLINK EQU IEDQOPCE 00991000 LCBERADR EQU LCBXRADR+1 00992000 LCBPCIRC EQU LCBXRADR 00993000 LCBDCT3 EQU LCBXDCT+2 00994000 LCBDCT2 EQU LCBXDCT+1 00995000 LCBDCT1 EQU LCBXDCT 00996000 @NM00144 EQU LCBXFLAG 00997000 LCBERPND EQU LCBXFLAG 00998000 LCBSRCPF EQU LCBXFLAG 00999000 LCBGPCTV EQU LCBXFLAG 01000000 @NM00143 EQU LCBXFLAG 01001000 @NM00142 EQU LCBXFLAG 01002000 @NM00141 EQU LCBXFLAG 01003000 @NM00140 EQU LCBXFLAG 01004000 LCBCCW10 EQU LCBCPA+72 01005000 LCBCCW9 EQU LCBCPA+64 01006000 LCBCCW8 EQU LCBCPA+56 01007000 LCBCCW7 EQU LCBCPA+48 01008000 LCBCCW6 EQU LCBCPA+40 01009000 LCBATTEL EQU LCBCCW5 01010000 LCBCCW4 EQU LCBCPA+24 01011000 LCBCCW3 EQU LCBCPA+16 01012000 LCBCCW2 EQU LCBCPA+8 01013000 LCBCCW1 EQU LCBCPA 01014000 @NM00126 EQU LCBERCCW+16 01015000 LCBATL05 EQU LCBERCCW+8 01016000 @NM00125 EQU LCBERCCW 01017000 LCBCSWSV EQU LCBSAVSN+1 01018000 LCBSNSV EQU LCBSAVSN 01019000 LCBBFSNS EQU LCBRSPSV 01020000 LCBWAITC EQU LCBTPCD+5 01021000 LCBINPAK EQU LCBSTAT6 01022000 LCBMHBID EQU LCBSTAT6 01023000 LCBRTRRO EQU LCBSTAT6 01024000 LCBHDRPD EQU LCBSTAT6 01025000 LCBCHN EQU LCBSTAT6 01026000 LCBBFRSV EQU LCBTPCD+1 01027000 @NM00124 EQU LCBSTAT5 01028000 LCBLUS EQU LCBSTAT5 01029000 LCBLUNIT EQU LCBSTAT5 01030000 LCBPERM EQU LCBSTAT5 01031000 LCBNXCMD EQU LCBBFRW 01032000 LCBERMSK EQU LCBOBRCH 01033000 LCBSCBA EQU IEDQLCB+93 01034000 LCBOLT EQU LCBMSGFM 01035000 LCBEOT EQU LCBMSGFM 01036000 LCBENQ EQU LCBMSGFM 01037000 LCBTTD EQU LCBMSGFM 01038000 LCBRSTRT EQU LCBMSGFM 01039000 LCBVSTRT EQU LCBMSGFM 01040000 LCBACKI EQU LCBMSGFM 01041000 LCBNAK EQU LCBMSGFM 01042000 @NM00123 EQU LCBRBCT2 01043000 LCBDCNT EQU LCBRBCT2 01044000 LCBRBCT1 EQU LCBERBCT 01045000 LCBERBCH EQU IEDQLCB+85 01046000 LCBCOMPL EQU LCBDLNKN 01047000 LCBPRCPG EQU LCBERBST 01048000 LCBERROR EQU LCBERBST 01049000 @NM00122 EQU LCBERBST 01050000 LCBINQ EQU LCBERBST 01051000 LCBRDERR EQU LCBERBST 01052000 LCBEOMSG EQU LCBERBST 01053000 LCBMSG EQU LCBERBST 01054000 LCBERBLK EQU IEDQLCB+81 01055000 LCBERBPY EQU IEDQLCB+80 01056000 LCBERBQB EQU LCBERB+1 01057000 LCBERBKY EQU LCBERB 01058000 LCBRECAD EQU IEDQLCB+73 01059000 @NM00121 EQU LCBTSTSW 01060000 @NM00120 EQU LCBTSTSW 01061000 @NM00119 EQU LCBTSTSW 01062000 @NM00118 EQU LCBTSTSW 01063000 @NM00117 EQU LCBTSTSW 01064000 @NM00116 EQU LCBTSTSW 01065000 @NM00115 EQU LCBTSTSW 01066000 LCBCONCT EQU LCBTSTSW 01067000 LCBRESP EQU LCBSTAT2 01068000 LCBBFRAV EQU LCBDIAL 01069000 LCBATTN EQU LCBSYNC 01070000 LCBNEGRP EQU LCBSTAT2 01071000 LCBSNDPR EQU LCBSTAT2 01072000 LCBCONNN EQU LCBBEOTN 01073000 LCBMSGNN EQU LCBSTAT2 01074000 LCBTRACE EQU LCBSTAT2 01075000 LCBSENDN EQU LCBSTAT1 01076000 LCBRECVN EQU LCBSTAT1 01077000 LCBFREEN EQU LCBSTAT1 01078000 LCBCONT EQU LCBSTAT1 01079000 LCBINITN EQU LCBSTAT1 01080000 LCBOCNI EQU LCBSTAT1 01081000 LCBOCWTN EQU LCBSTAT1 01082000 LCBRCLLN EQU LCBSTAT1 01083000 LCBRECOF EQU IEDQLCB+68 01084000 LCBRDBFR EQU LCBRCBFR 01085000 LCBUCBX EQU IEDQLCB+64 01086000 LCBTTBIN EQU LCBERRCT 01087000 @NM00114 EQU LCBINCAM 01088000 LCBGETMN EQU LCBINCAM 01089000 LCBRESTR EQU LCBRCQCB 01090000 LCBPCILK EQU LCBDCBPT 01091000 LCBSTART EQU LCBIOBSN+16 01092000 LCBAP4OL EQU LCBSIOCC 01093000 LCBAP3OL EQU LCBSIOCC 01094000 LCBAP2OL EQU LCBSIOCC 01095000 LCBAP1OL EQU LCBSIOCC 01096000 LCBSIOC2 EQU LCBSIOCC 01097000 LCBSIOC1 EQU LCBSIOCC 01098000 @NM00113 EQU LCBSIOCC 01099000 LCBCSWRC EQU LCBCSW+5 01100000 LCBCSCHC EQU LCBCSWCS 01101000 LCBCSICC EQU LCBCSWCS 01102000 LCBCSCCC EQU LCBCSWCS 01103000 LCBCSCDC EQU LCBCSWCS 01104000 LCBCSPTC EQU LCBCSWCS 01105000 LCBCSPGC EQU LCBCSWCS 01106000 LCBCSIL EQU LCBCSWCS 01107000 LCBCSPCI EQU LCBCSWCS 01108000 LCBUSUE EQU LCBCSWUS 01109000 LCBUSUC EQU LCBCSWUS 01110000 LCBUSDE EQU LCBCSWUS 01111000 LCBUSCE EQU LCBCSWUS 01112000 LCBUSBSY EQU LCBCSWUS 01113000 LCBUSCUE EQU LCBCSWUS 01114000 LCBUSSM EQU LCBCSWUS 01115000 LCBUSAT EQU LCBCSWUS 01116000 LCBCSWCA EQU LCBCSW 01117000 LCBOBR EQU LCBFLAG3 01118000 LCBOBRRD EQU LCBFLAG3 01119000 LCBIOMSG EQU LCBFLAG3 01120000 LCBSOHC EQU LCBFLAG3 01121000 LCBRLAD EQU LCBFLAG3 01122000 LCBSOHR EQU LCBFLAG3 01123000 @NM00112 EQU LCBFLAG3 01124000 LCBECBPT EQU LCBIOBSN+4 01125000 LCBECBCC EQU LCBIOBSN+3 01126000 LCBSENS1 EQU LCBSNS+1 01127000 LCBABORT EQU LCBTMOUT 01128000 LCBNOTIN EQU LCBLOSDT 01129000 LCBOVRUN EQU LCBSENS0 01130000 LCBDATCK EQU LCBSENS0 01131000 LCBEQUCK EQU LCBSENS0 01132000 LCBBUSCK EQU LCBSENS0 01133000 LCBINTRQ EQU LCBSENS0 01134000 LCBCMDRJ EQU LCBSENS0 01135000 LCBFLAG2 EQU LCBIOBSN 01136000 @NM00111 EQU LCBFLAG1 01137000 LCBUNREL EQU LCBFLAG1 01138000 LCBEXCPN EQU LCBFLAG1 01139000 @NM00110 EQU LCBFLAG1 01140000 LCBERPIN EQU LCBFLAG1 01141000 @NM00109 EQU LCBFLAG1 01142000 LCBFSBFR EQU LCBMHA 01143000 LCBISZE EQU IEDQLCB+28 01144000 LCBLNENT EQU LCBSCBDA+1 01145000 @NM00108 EQU LCBSCBDA 01146000 LCBCPGMH EQU LCBSTAT4 01147000 LCBREAL EQU LCBPHASE 01148000 @NM00107 EQU LCBSTAT4 01149000 LCBACTRQ EQU LCBSTAT4 01150000 LCBIPLRQ EQU LCBSTAT4 01151000 LCBDACRQ EQU LCBSTAT4 01152000 LCBDMPRQ EQU LCBSTAT4 01153000 @NM00106 EQU LCBLKMDE 01154000 LCBLOCKI EQU LCBLKMDE 01155000 LCBLOCKR EQU LCBLKMDE 01156000 LCBHMFLG EQU LCBLKMDE 01157000 LCBBDFLG EQU LCBLKMDE 01158000 @NM00105 EQU LCBINSRC 01159000 LCBABRTN EQU LCBCHAIN 01160000 LCBCTLMD EQU LCBTETEN 01161000 LCBBFRSZ EQU LCBCHAIN 01162000 LCBUREQN EQU LCBCHAIN 01163000 LCBNORTY EQU LCBCHAIN 01164000 LCBERMSG EQU LCBCHAIN 01165000 LCBEXCP EQU LCBCHAIN 01166000 LCBINVRQ EQU LCBSCRNN 01167000 LCB2741N EQU LCBTSOB 01168000 LCBINHBN EQU LCBTSOB 01169000 LCBCIRCD EQU LCBTSOB 01170000 LCBPREP EQU LCBTSOB 01171000 LCBSOPL EQU LCBTSOB 01172000 LCBSATRD EQU LCBTSOB 01173000 LCBTSBUF EQU LCBTSOB 01174000 LCBWRBRK EQU LCBTSOB 01175000 LCBTDL EQU IEDQLCB+18 01176000 LCBEOLTD EQU IEDQLCB+16 01177000 LCBRSLNK EQU IEDQLCB+13 01178000 LCBRSPRI EQU IEDQLCB+12 01179000 LCBSTCBA EQU IEDQLCB+9 01180000 LCBRSKEY EQU IEDQLCB+8 01181000 LCBLINK EQU LCBRCB+5 01182000 LCBPRI EQU LCBRCB+4 01183000 LCBQCBA EQU LCBRCB+1 01184000 LCBKEY EQU LCBRCB 01185000 SAVTBITN EQU IEDNSVTD+312 01186000 @NM00104 EQU SAVTCKQB+8 01187000 @NM00103 EQU SAVTCKEC+1 01188000 @NM00102 EQU SAVTCKCC 01189000 SAVTCKPO EQU SAVTCKCC 01190000 SAVTCKWA EQU SAVTCKCC 01191000 SAVTCKCH EQU SAVTCKTB+1 01192000 SAVTCKVT EQU SAVTCKTB 01193000 @NM00101 EQU IEDNSVTD+297 01194000 SAVTRDFG EQU SAVTRDRV+12 01195000 @NM00100 EQU SAVTRDRV+5 01196000 SAVTRDPY EQU SAVTRDRV+4 01197000 SAVTRDQB EQU SAVTRDRV+1 01198000 SAVTRDKY EQU SAVTRDRV 01199000 SAVTNID EQU IEDNSVTD+280 01200000 SAVTDVAS EQU IEDNSVTD+276 01201000 SAVTPLSZ EQU IEDNSVTD+274 01202000 @NM00099 EQU IEDNSVTD+273 01203000 SAVTSUBL EQU IEDNSVTD+272 01204000 @NM00098 EQU SAVTZELM+1 01205000 SAVTSUBM EQU SAVTZELM 01206000 SAVTMHDX EQU IEDNSVTD+268 01207000 SAVTNAT1 EQU IEDNSVTD+266 01208000 SAVTSH20 EQU IEDNSVTD+264 01209000 SAVTLCBS EQU IEDNSVTD+260 01210000 SAVTRNMP EQU IEDNSVTD+256 01211000 SAVTTNTX EQU IEDNSVTD+252 01212000 SAVTNAX EQU IEDNSVTD+248 01213000 SAVTSUBV EQU IEDNSVTD+247 01214000 SAVTSUBA EQU IEDNSVTD+246 01215000 SAVTSIBC EQU IEDNSVTD+244 01216000 SAVTBSM EQU IEDNSVTD+240 01217000 SAVTSCPT EQU SAVTTCPU 01218000 SAVTRQTG EQU IEDNSVTD+236 01219000 SAVTRQCH EQU IEDNSVTD+232 01220000 SAVTMAND EQU IEDNSVTD+228 01221000 SAVTSPLN EQU IEDNSVTD+224 01222000 SAVTNADL EQU IEDNSVTD+222 01223000 SAVTNATL EQU IEDNSVTD+220 01224000 SAVTMHTB EQU IEDNSVTD+216 01225000 SAVTSSMH EQU IEDNSVTD+212 01226000 SAVTQRS EQU IEDNSVTD+208 01227000 SAVTRQIN EQU IEDNSVTD+204 01228000 SAVTDFCO EQU IEDNSVTD+200 01229000 SAVTSAO EQU IEDNSVTD+196 01230000 SAVTSARI EQU IEDNSVTD+192 01231000 SAVTSAC EQU IEDNSVTD+188 01232000 SAVTSAI EQU IEDNSVTD+184 01233000 SAVTCSCI EQU IEDNSVTD+180 01234000 SAVTSSRP EQU IEDNSVTD+176 01235000 SAVTSSRQ EQU IEDNSVTD+172 01236000 SAVTSCLU EQU IEDNSVTD+168 01237000 SAVTXTRQ EQU IEDNSVTD+164 01238000 SAVTMVBF EQU IEDNSVTD+160 01239000 @NM00097 EQU IEDNSVTD+148 01240000 SAVTIPCQ EQU IEDNSVTD+144 01241000 @NM00096 EQU IEDNSVTD+136 01242000 SAVTXFMI EQU IEDNSVTD+132 01243000 @NM00095 EQU IEDNSVTD+124 01244000 SAVTXFMO EQU IEDNSVTD+120 01245000 @NM00094 EQU IEDNSVTD+116 01246000 SAVTSSSR EQU IEDNSVTD+112 01247000 SAVTSCPQ EQU IEDNSVTD+108 01248000 SAVTSLCB EQU IEDNSVTD+104 01249000 SAVTLUSR EQU IEDNSVTD+100 01250000 @NM00093 EQU SAVTLUSQ+8 01251000 SAVTLUSP EQU SAVTLUSQ+4 01252000 SAVTLUSB EQU SAVTLUSQ 01253000 @NM00092 EQU IEDNSVTD+84 01254000 SAVTSAT EQU IEDNSVTD+80 01255000 SAVTNAT EQU IEDNSVTD+76 01256000 SAVTCLUP EQU IEDNSVTD+72 01257000 SAVTPIUT EQU IEDNSVTD+68 01258000 SAVTRNTA EQU IEDNSVTD+64 01259000 SAVTDNIR EQU IEDNSVTD+60 01260000 SAVTCNIR EQU IEDNSVTD+56 01261000 SAVTFLDH EQU IEDNSVTD+52 01262000 SAVTSRTN EQU IEDNSVTD+48 01263000 SAVTSREQ EQU IEDNSVTD+44 01264000 SAVTFAIL EQU IEDNSVTD+42 01265000 SAVTSUSE EQU IEDNSVTD+40 01266000 SAVTSIB EQU IEDNSVTD+36 01267000 SAVTPRTN EQU IEDNSVTD+32 01268000 @NM00091 EQU IEDNSVTD+28 01269000 SAVTWH20 EQU IEDNSVTD+26 01270000 SAVTPWT EQU IEDNSVTD+24 01271000 SAVTPRTQ EQU IEDNSVTD+20 01272000 SAVTPREQ EQU IEDNSVTD+16 01273000 SAVTPH20 EQU IEDNSVTD+14 01274000 SAVTPUSE EQU IEDNSVTD+12 01275000 SAVTPLCB EQU IEDNSVTD+8 01276000 SAVTPOOL EQU IEDNSVTD+4 01277000 SAVTPRMT EQU SAVTDIAF 01278000 SAVTVIRT EQU SAVTDIAF 01279000 AVTCPBNO EQU IEDQAVTD+1244 01280000 AVTHRESS EQU IEDQAVTD+1243 01281000 @NM00090 EQU IEDQAVTD+1242 01282000 @NM00089 EQU IEDQAVTD+1241 01283000 @NM00088 EQU IEDQAVTD+1240 01284000 @NM00087 EQU IEDQAVTD+1237 01285000 @NM00086 EQU IEDQAVTD+1236 01286000 AVTHRESE EQU @NM00085 01287000 AVTRADDR EQU IEDQAVTD+1228 01288000 AVTNADDR EQU IEDQAVTD+1224 01289000 AVTHRESN EQU IEDQAVTD+1220 01290000 AVTVOLRN EQU IEDQAVTD+1216 01291000 AVTTOTNN EQU IEDQAVTD+1212 01292000 AVTTRCYN EQU IEDQAVTD+1208 01293000 AVTRCTRN EQU IEDQAVTD+1204 01294000 AVTNOVON EQU IEDQAVTD+1200 01295000 AVTADEBN EQU IEDQAVTD+1196 01296000 AVTVOLRR EQU IEDQAVTD+1192 01297000 AVTTOTNR EQU IEDQAVTD+1188 01298000 AVTTRCYR EQU IEDQAVTD+1184 01299000 AVTRCTRR EQU IEDQAVTD+1180 01300000 AVTNOVOR EQU IEDQAVTD+1176 01301000 AVTADEBR EQU IEDQAVTD+1172 01302000 AVTLODPT EQU IEDQAVTD+1168 01303000 AVTIOBN EQU IEDQAVTD+1164 01304000 AVTIOBR EQU IEDQAVTD+1160 01305000 AVTCPBPT EQU IEDQAVTD+1156 01306000 AVTFCPB EQU IEDQAVTD+1152 01307000 @NM00084 EQU IEDQAVTD+1148 01308000 AVTINCPQ EQU IEDQAVTD+1144 01309000 @NM00083 EQU IEDQAVTD+1140 01310000 @NM00082 EQU IEDQAVTD+1137 01311000 @NM00081 EQU AVTBIT4 01312000 @NM00080 EQU AVTBIT4 01313000 @NM00079 EQU AVTBIT4 01314000 @NM00078 EQU AVTBIT4 01315000 @NM00077 EQU AVTBIT4 01316000 @NM00076 EQU AVTBIT4 01317000 @NM00075 EQU AVTBIT4 01318000 AVTRUFTN EQU AVTBIT4 01319000 @NM00074 EQU IEDQAVTD+1132 01320000 AVTNOBFQ EQU IEDQAVTD+1128 01321000 @NM00073 EQU IEDQAVTD+1124 01322000 AVTDKENQ EQU IEDQAVTD+1120 01323000 @NM00072 EQU IEDQAVTD+1116 01324000 AVTDKAPQ EQU IEDQAVTD+1112 01325000 AVTCOPY EQU IEDQAVTD+1108 01326000 AVTIA EQU IEDQAVTD+1104 01327000 AVTFL EQU IEDQAVTD+1100 01328000 @NM00071 EQU IEDQAVTD+1096 01329000 AVTNCPBQ EQU IEDQAVTD+1092 01330000 AVTTOTNC EQU IEDQAVTD+1088 01331000 AVTCMAX EQU IEDQAVTD+1084 01332000 AVTCMIN EQU IEDQAVTD+1080 01333000 AVTHM02 EQU IEDQAVTD+1076 01334000 AVTOPCIN EQU IEDQAVTD+1074 01335000 AVTDCTLN EQU IEDQAVTD+1072 01336000 AVTOPMSK EQU IEDQAVTD+1068 01337000 AVTSTEAL EQU IEDQAVTD+1060 01338000 AVTOPTN EQU IEDQAVTD+1056 01339000 AVTDSKCT EQU IEDQAVTD+1054 01340000 AVTCKRST EQU IEDQAVTD+1053 01341000 AVTSTAN EQU AVTBIT3 01342000 AVTSTACN EQU AVTBIT3 01343000 AVTSTAIN EQU AVTBIT3 01344000 AVTSTAYN EQU AVTBIT3 01345000 AVTOLTBN EQU AVTBIT3 01346000 AVTTSAB EQU AVTBIT3 01347000 AVTRFULN EQU AVTBIT3 01348000 AVTRECVN EQU AVTBIT3 01349000 @NM00070 EQU AVTBIT2 01350000 @NM00069 EQU AVTBIT2 01351000 AVTOPEIN EQU AVTBIT2 01352000 AVTSTRTN EQU AVTBIT2 01353000 AVTTOPOL EQU AVTBIT2 01354000 AVTCOPYN EQU AVTBIT2 01355000 AVTREUSN EQU AVTBIT2 01356000 AVTEXTSC EQU AVTBIT2 01357000 AVTDISKN EQU AVTBIT1 01358000 AVTQUCKN EQU AVTBIT1 01359000 AVTCLOSN EQU AVTBIT1 01360000 AVTREADN EQU AVTBIT1 01361000 AVTDLAYN EQU AVTBIT1 01362000 AVTAQTAN EQU AVTBIT1 01363000 AVTTSON EQU AVTBIT1 01364000 AVTAPLKN EQU AVTBIT1 01365000 AVTDUMBR EQU IEDQAVTD+1048 01366000 AVTDLQX EQU IEDQAVTD+1046 01367000 AVTINTLV EQU IEDQAVTD+1044 01368000 AVTSMCNT EQU IEDQAVTD+1042 01369000 AVTAVFCT EQU IEDQAVTD+1040 01370000 AVTOPCON EQU IEDQAVTD+1038 01371000 AVTOPCNT EQU IEDQAVTD+1036 01372000 AVTLNCNT EQU IEDQAVTD+1034 01373000 AVTKEYLE EQU IEDQAVTD+1032 01374000 AVTHA16 EQU IEDQAVTD+1030 01375000 AVTHA7 EQU IEDQAVTD+1028 01376000 AVTHA4 EQU IEDQAVTD+1026 01377000 AVTHA3 EQU IEDQAVTD+1024 01378000 AVTHA2 EQU IEDQAVTD+1022 01379000 AVTGETMS EQU IEDQAVTD+1021 01380000 @NM00068 EQU IEDQAVTD+1020 01381000 AVTGETMD EQU IEDQAVTD+1016 01382000 AVTGETMN EQU IEDQAVTD+1012 01383000 AVTCWTOT EQU IEDQAVTD+1008 01384000 AVTCWINT EQU IEDQAVTD+956 01385000 AVTDTRAP EQU IEDQAVTD+952 01386000 @NM00067 EQU IEDQAVTD+950 01387000 @NM00066 EQU AVTIOTR 01388000 AVTIOTRH EQU AVTIOTR 01389000 AVTIOTRE EQU AVTIOTR 01390000 @NM00065 EQU AVTSUBT 01391000 AVTSUBPT EQU AVTSUBT 01392000 AVTSUBON EQU AVTSUBT 01393000 AVTAFE30 EQU IEDQAVTD+944 01394000 AVTAFE20 EQU IEDQAVTD+940 01395000 AVTAFE10 EQU IEDQAVTD+936 01396000 AVTCWEC2 EQU IEDQAVTD+932 01397000 AVTCWPM2 EQU IEDQAVTD+928 01398000 AVTCWTS2 EQU IEDQAVTD+927 01399000 AVTCWTS1 EQU IEDQAVTD+926 01400000 AVTCWCLD EQU AVTCWFL2 01401000 AVTCWRAP EQU AVTCWFL2 01402000 @NM00064 EQU AVTCWFL2 01403000 @NM00063 EQU AVTCWFL2 01404000 @NM00062 EQU AVTCWFL2 01405000 @NM00061 EQU AVTCWFL2 01406000 @NM00060 EQU AVTCWFL2 01407000 AVTCWACT EQU AVTCWFL2 01408000 @NM00059 EQU AVTCWFL1 01409000 @NM00058 EQU AVTCWFL1 01410000 @NM00057 EQU AVTCWFL1 01411000 @NM00056 EQU AVTCWFL1 01412000 @NM00055 EQU AVTCWFL1 01413000 @NM00054 EQU AVTCWFL1 01414000 @NM00053 EQU AVTCWFL1 01415000 AVTCOMWN EQU AVTCWFL1 01416000 AVTCWEC1 EQU IEDQAVTD+920 01417000 AVTCWPM1 EQU IEDQAVTD+916 01418000 AVTCAREA EQU IEDQAVTD+912 01419000 AVTFZERO EQU IEDQAVTD+908 01420000 AVTCADDR EQU IEDQAVTD+904 01421000 AVTCOREC EQU IEDQAVTD+900 01422000 @NM00052 EQU IEDQAVTD+892 01423000 AVTCPBCB EQU IEDQAVTD+888 01424000 @NM00051 EQU IEDQAVTD+880 01425000 AVTDSIOB EQU IEDQAVTD+876 01426000 @NM00050 EQU IEDQAVTD+868 01427000 AVTCPRMB EQU IEDQAVTD+864 01428000 @NM00049 EQU IEDQAVTD+856 01429000 AVTCLOSB EQU IEDQAVTD+852 01430000 @NM00048 EQU IEDQAVTD+844 01431000 AVTACTIB EQU IEDQAVTD+840 01432000 @NM00047 EQU IEDQAVTD+836 01433000 AVTOLTEB EQU IEDQAVTD+832 01434000 AVTOLTCH EQU AVTOLTQB+1 01435000 AVTOLTVT EQU AVTOLTQB 01436000 @NM00046 EQU AVTOPCQB+8 01437000 @NM00045 EQU AVTOPCEC+1 01438000 @NM00044 EQU AVTOPCCC 01439000 AVTOPCPO EQU AVTOPCCC 01440000 AVTOPCWA EQU AVTOPCCC 01441000 AVTOPCCH EQU AVTOPCOB+1 01442000 AVTOPCVT EQU AVTOPCOB 01443000 @NM00043 EQU AVTCKPQB+9 01444000 AVTCKPTS EQU AVTCKPQB+8 01445000 @NM00042 EQU AVTCKPEC+1 01446000 @NM00041 EQU AVTCKPCC 01447000 AVTCKPPO EQU AVTCKPCC 01448000 AVTCKPWA EQU AVTCKPCC 01449000 AVTCKPCH EQU AVTCKPTB+1 01450000 AVTCKPVT EQU AVTCKPTB 01451000 @NM00040 EQU IEDQAVTD+796 01452000 AVTBFRTB EQU IEDQAVTD+792 01453000 @NM00039 EQU IEDQAVTD+784 01454000 AVTBFREB EQU IEDQAVTD+780 01455000 AVTTIMQ EQU IEDQAVTD+776 01456000 @NM00038 EQU IEDQAVTD+772 01457000 AVTIMQPS EQU IEDQAVTD+768 01458000 AVTINOUT EQU IEDQAVTD+766 01459000 AVTREFTM EQU IEDQAVTD+764 01460000 @NM00037 EQU IEDQAVTD+752 01461000 AVTDELYB EQU IEDQAVTD+748 01462000 AVTOCQPT EQU IEDQAVTD+744 01463000 AVTTSOPT EQU IEDQAVTD+740 01464000 AVTSUPPT EQU IEDQAVTD+736 01465000 AVTCBQCB EQU IEDQAVTD+732 01466000 AVTMSGS EQU IEDQAVTD+729 01467000 @NM00036 EQU AVTSYSER 01468000 @NM00035 EQU AVTSYSER 01469000 @NM00034 EQU AVTSYSER 01470000 @NM00033 EQU AVTSYSER 01471000 @NM00032 EQU AVTSYSER 01472000 @NM00031 EQU AVTSYSER 01473000 AVTCMAXN EQU AVTSYSER 01474000 AVTCMINN EQU AVTSYSER 01475000 AVT2260L EQU IEDQAVTD+724 01476000 AVTABEPL EQU AVTADBUF 01477000 AVTHFF EQU AVTCLRHI+2 01478000 @NM00030 EQU AVTCLRHI 01479000 AVTCCLNK EQU AVTCRELE+5 01480000 AVTCCPRI EQU AVTCRELE+4 01481000 AVTCCQCB EQU AVTCCELE+1 01482000 AVTCCKEY EQU AVTCCELE 01483000 AVTDELAD EQU IEDQAVTD+704 01484000 AVTDELEM EQU IEDQAVTD+700 01485000 AVTBSX EQU AVTCKLNK 01486000 AVTOPETR EQU AVTHG01 01487000 @NM00029 EQU AVTCKBYT 01488000 AVTCKONQ EQU AVTCKBYT 01489000 @NM00028 EQU AVTCKBYT 01490000 @NM00027 EQU AVTCKBYT 01491000 @NM00026 EQU AVTCKBYT 01492000 @NM00025 EQU AVTCKBYT 01493000 @NM00024 EQU AVTCKBYT 01494000 @NM00023 EQU AVTCKBYT 01495000 AVTOPERT EQU IEDQAVTD+690 01496000 AVTOPXCL EQU IEDQAVTD+688 01497000 AVTOPERL EQU IEDQAVTD+687 01498000 @NM00022 EQU IEDQAVTD+686 01499000 AVTCKTIM EQU IEDQAVTD+684 01500000 AVTCKELV EQU IEDQAVTD+682 01501000 AVTCPRCD EQU IEDQAVTD+681 01502000 AVTWARMN EQU AVTCKELF 01503000 AVTCRTLN EQU AVTCKELF 01504000 AVTCPIPN EQU AVTCKELF 01505000 AVTCCLCN EQU AVTCKELF 01506000 AVTCINCN EQU AVTCKELF 01507000 @NM00021 EQU AVTCKELF 01508000 AVTCMCPN EQU AVTCKELF 01509000 AVTNQBCK EQU AVTCKELF 01510000 AVTCKQAD EQU IEDQAVTD+677 01511000 AVTSCBSZ EQU IEDQAVTD+676 01512000 @NM00020 EQU IEDQAVTD+672 01513000 AVTCKELE EQU IEDQAVTD+668 01514000 @NM00019 EQU AVTCKPEL+8 01515000 AVTCKRLK EQU AVTCKPEL+5 01516000 AVTCKRPR EQU AVTCKPEL+4 01517000 AVTCKRMQ EQU AVTCKRMV+1 01518000 AVTCKRKY EQU AVTCKRMV 01519000 AVTHK EQU IEDQAVTD+648 01520000 AVTHI EQU IEDQAVTD+644 01521000 AVTIOT EQU IEDQAVTD+640 01522000 AVTNX EQU IEDQAVTD+636 01523000 AVTTONE EQU IEDQAVTD+632 01524000 AVTA3TL EQU IEDQAVTD+628 01525000 AVTDMECB EQU IEDQAVTD+624 01526000 AVTABEND EQU IEDQAVTD+618 01527000 AVTPLCBN EQU IEDQAVTD+616 01528000 @NM00018 EQU AVTSAVTP+1 01529000 @NM00017 EQU AVTSAVTF 01530000 AVTSNA EQU AVTSAVTF 01531000 AVTONSNA EQU AVTSAVTF 01532000 AVTVTMCP EQU AVTSAVTF 01533000 @NM00016 EQU IEDQAVTD+608 01534000 AVTCMBSS EQU IEDQAVTD+604 01535000 AVTRCV EQU IEDQAVTD+600 01536000 AVTSEND EQU IEDQAVTD+596 01537000 AVTCSCH EQU IEDQAVTD+592 01538000 AVTQ1 EQU IEDQAVTD+588 01539000 AVTE7 EQU IEDQAVTD+584 01540000 AVTHB EQU IEDQAVTD+580 01541000 AVTR1 EQU IEDQAVTD+576 01542000 AVTBZ EQU IEDQAVTD+572 01543000 AVTEZ EQU IEDQAVTD+568 01544000 AVTEC EQU IEDQAVTD+564 01545000 AVTEW EQU IEDQAVTD+560 01546000 AVTNDIAL EQU AVTSCOPT 01547000 AVTN2741 EQU AVTSCOPT 01548000 AVTCONCO EQU AVTSCOPT 01549000 AVTCONC EQU AVTSCOPT 01550000 AVTCMBUF EQU AVTSCOPT 01551000 AVTAPDMP EQU AVTSCOPT 01552000 @NM00015 EQU AVTSCOPT 01553000 AVTHA EQU AVTDISP 01554000 AVTEA EQU IEDQAVTD+548 01555000 AVTAX EQU IEDQAVTD+544 01556000 AVTA3 EQU IEDQAVTD+540 01557000 AVTGD EQU IEDQAVTD+536 01558000 AVTAL EQU IEDQAVTD+532 01559000 AVTOLTST EQU AVTHG02 01560000 AVTE8 EQU IEDQAVTD+524 01561000 AVTUI EQU IEDQAVTD+520 01562000 AVTCOMPT EQU IEDQAVTD+516 01563000 AVTCRSRF EQU IEDQAVTD+512 01564000 @NM00014 EQU IEDQAVTD+508 01565000 AVTKA02 EQU IEDQAVTD+504 01566000 AVTOPTPT EQU IEDQAVTD+500 01567000 AVTPCBPT EQU IEDQAVTD+496 01568000 @NM00013 EQU AVTECB1 01569000 AVTCOMP EQU AVTECB1 01570000 @NM00012 EQU AVTECB1 01571000 AVTOPECA EQU IEDQAVTD+488 01572000 AVTOLECA EQU IEDQAVTD+484 01573000 AVTCKECA EQU IEDQAVTD+480 01574000 AVTCWECA EQU IEDQAVTD+476 01575000 AVTCWTCB EQU IEDQAVTD+472 01576000 AVTOLTCB EQU IEDQAVTD+468 01577000 AVTOCTCB EQU IEDQAVTD+464 01578000 AVTCKTCB EQU IEDQAVTD+460 01579000 AVTAS EQU IEDQAVTD+456 01580000 AVTNOLBF EQU IEDQAVTD+454 01581000 AVTNCKPR EQU IEDQAVTD+453 01582000 AVTCIB EQU IEDQAVTD+452 01583000 AVTSPLPT EQU IEDQAVTD+448 01584000 AVTMVBFR EQU IEDQAVTD+444 01585000 AVTSBTA EQU IEDQAVTD+440 01586000 AVTRARTN EQU IEDQAVTD+436 01587000 AVTBSCAN EQU IEDQAVTD+432 01588000 AVTRDYA EQU IEDQAVTD+428 01589000 AVTDISTR EQU IEDQAVTD+420 01590000 AVTPARM3 EQU IEDQAVTD+416 01591000 @NM00011 EQU AVTPKF 01592000 @NM00010 EQU AVTPKF 01593000 @NM00009 EQU AVTPKF 01594000 AVTFTCHF EQU AVTPKF 01595000 @NM00008 EQU AVTPKF 01596000 @NM00007 EQU AVTPKF 01597000 @NM00006 EQU AVTPKF 01598000 @NM00005 EQU AVTPKF 01599000 AVTPARM EQU IEDQAVTD+408 01600000 AVTEXS2A EQU IEDQAVTD+402 01601000 AVTEXA2S EQU IEDQAVTD+396 01602000 AVTOCGET EQU IEDQAVTD+392 01603000 AVTCKAVT EQU @NM00003+1 01604000 @NM00004 EQU AVTCKFLG 01605000 AVTCKHLT EQU AVTCKFLG 01606000 AVTCKREQ EQU AVTCKFLG 01607000 AVTCKENV EQU AVTCKFLG 01608000 AVTCKNAC EQU AVTCKFLG 01609000 AVTCKTAC EQU AVTCKFLG 01610000 @NM00002 EQU IEDQAVTD+384 01611000 AVTREADD EQU IEDQAVTD+380 01612000 AVTREADY EQU IEDQAVTD+376 01613000 AVTRACE EQU IEDQAVTD+372 01614000 AVTTCB EQU IEDQAVTD+368 01615000 AVTPASWD EQU IEDQAVTD+360 01616000 AVTCTLCH EQU IEDQAVTD+352 01617000 AVTDOUBL EQU IEDQAVTD+344 01618000 AVTDOUBX EQU IEDQAVTD+336 01619000 AVTDPARM EQU IEDQAVTD+332 01620000 AVTCSTCS EQU IEDQAVTD+328 01621000 AVTDLQ EQU AVTSAVEX+32 01622000 @NM00001 EQU AVTSAVEX 01623000 AVTSAVE4 EQU IEDQAVTD+216 01624000 AVTSAVE3 EQU IEDQAVTD+144 01625000 AVTSAVE2 EQU IEDQAVTD+72 01626000 AVTSAVE1 EQU IEDQAVTD 01627000 NCPLTRAC EQU IEDNCP+26 01628000 NCPCKPT EQU IEDNCP+22 01629000 NCPDPDCB EQU IEDNCP+18 01630000 @NM00145 EQU NCPFLAG1 01631000 NCPTRACE EQU NCPFLAG1 01632000 NCPIPLD EQU NCPFLAG1 01633000 NCPREST EQU NCPFLAG1 01634000 NCPBGUP EQU NCPFLAG1 01635000 NCPDAUTO EQU NCPFLAG1 01636000 NCPIAUTO EQU NCPFLAG1 01637000 NCPLEN EQU IEDNCP 01638000 * END UNREFERENCED COMPONENTS 01639000 @RT00228 EQU CMDINV 01640000 @RT00241 EQU VALIDTTE 01641000 @RT00248 EQU TTECHECK 01642000 @EL01 EQU @EL00001 01643000 @ENDDATA EQU * 01644000 @DATEND EQU * 01645000 END IGCDB10D,(C'PLS1805',0701,77120) 01646000