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