TITLE 'IGG0198B - 3705 OPEN - LOAD 1 *00001000 ' 00002000 IGG0198B CSECT , 0001 00003000 @PROLOG BALR @03,0 0001 00004000 @PSTART DS 0H 0001 00005000 USING @PSTART,@03 0001 00006000 IGG0198B IEDHJN AFTERHJN,HJN IDENTIFICATION MACRO @Y17XANL 00007000 MODESET EXTKEY=SUPR GET INTO KEY 0 @G36XRNB 00008000 * RCORE=OWAREA; /* ADDR OF OPEN WORK AREA 0272 00009000 * @G36XRNB*/ 00010000 L RCORE,OWAREA(,RWTGC) 0272 00011000 * RDCB=DXUDCBAD; /* DCB ADDRESS @G36XRNB*/ 00012000 L RDCB,DXUDCBAD(,RCORE) 0273 00013000 * GEN(LA RDCB,0(RDCB) ZERO HIGH ORDER BYTE ); 0274 00014000 LA RDCB,0(RDCB) ZERO HIGH ORDER BYTE 00015000 * RAVT=DCBIOBAD; /* LOAD AVT BASE REGISTER */ 00016000 L RAVT,DCBIOBAD(,RDCB) 0275 00017000 * IF DXUKEY^='60'X THEN /* INVOKER IN KEY 6 (TCAM'S KEY) 00018000 * @G36XRNB*/ 00019000 CLI DXUKEY(RCORE),X'60' 0276 00020000 BNE @RT00276 0276 00021000 * GOTO ABEND32; /* NO- GO ABEND @G36XRNB*/ 00022000 * RFY 0278 00023000 * R12 UNRSTD; /* @G36XRNB*/ 00024000 * RFY 0279 00025000 * (RINDEX, 0279 00026000 * RJ, 0279 00027000 * IEDQTPTR, 0279 00028000 * RF) RSTD; /* @Y17XANL*/ 00029000 * RJ=ADDR(TNTFIRST)+TNTENLEN; /* POINT TO 1ST TERM ENTRY ADDR 00030000 * IN TNT @Y17XANL*/ 00031000 L @12,IEDQNPTR(,RAVT) 0280 00032000 LA RJ,TNTFIRST(,@12) 0280 00033000 SLR @11,@11 0280 00034000 IC @11,TNTENLEN(,@12) 0280 00035000 ALR RJ,@11 0280 00036000 * RF=NULL; /* CLEAR FOR DO LOOP CONTROL 0281 00037000 * @Y17XANL*/ 00038000 * 0281 00039000 SLR RF,RF 0281 00040000 * /*****************************************************************/ 00041000 * /* */ 00042000 * /* SEARCH THE TNT FOR THE ADDRESS OF AN NCP TERMINAL ENTRY WHOSE */ 00043000 * /* QCB POINTS TO THE DCB BEING OPENED. WHEN THE TERM ENTRY IS */ 00044000 * /* FOUND, EXIT FROM THE LOOP WITH RF CONTAINING THE TTE ADDR AND */ 00045000 * /* RINDEX THE TTCIN. @Y17XANL*/ 00046000 * /* */ 00047000 * /*****************************************************************/ 00048000 * 0282 00049000 * DO RINDEX=1 TO TNTLEN WHILE RF=NULL; 0282 00050000 LA RINDEX,1 0282 00051000 B @DE00282 0282 00052000 @DL00282 LTR RF,RF 0282 00053000 BNZ @DC00282 0282 00054000 * IEDQTPTR=TERMADDR; /* GET TERM ENTRY ADDR @Y17XANL*/ 00055000 SLR IEDQTPTR,IEDQTPTR 0283 00056000 ICM IEDQTPTR,7,TERMADDR(RJ) 0283 00057000 * IF TRMPREF=ON THEN /* IS THIS A 3705 RESOURCE 0284 00058000 * @Y17XANL*/ 00059000 TM TRMPREF(IEDQTPTR),B'00010000' 0284 00060000 BNO @RF00284 0284 00061000 * IF TRMTYPE=TRMLNCP THEN /* YES, IS IT AN NCP TTE @Y17XANL*/ 00062000 LR @12,IEDQTPTR 0285 00063000 AL @12,@CF03158 0285 00064000 CLI TRMTYPE-11(@12),X'0F' 0285 00065000 BNE @RF00285 0285 00066000 * IF RDCB=QCBDCBAD THEN /* YES, IS ITS DCB THE ONE BEING 00067000 * OPENED @Y17XANL*/ 00068000 L @12,IEDQQPTR-1(,IEDQTPTR) 0286 00069000 L @12,QCBDCBAD-1(,@12) 0286 00070000 LA @12,0(,@12) 0286 00071000 CR RDCB,@12 0286 00072000 BNE @RF00286 0286 00073000 * RF=IEDQTPTR; /* YES, SAVE THE TTE ADDR 0287 00074000 * @Y17XANL*/ 00075000 LR RF,IEDQTPTR 0287 00076000 * RJ=RJ+TNTENLEN+LENGTH(TERMADDR);/* POINT TO NEXT TERM ENTRY 0288 00077000 * ADDR @Y17XANL*/ 00078000 @RF00286 DS 0H 0288 00079000 @RF00285 DS 0H 0288 00080000 @RF00284 L @12,IEDQNPTR(,RAVT) 0288 00081000 LR @11,RJ 0288 00082000 SLR @00,@00 0288 00083000 IC @00,TNTENLEN(,@12) 0288 00084000 ALR @11,@00 0288 00085000 AL @11,@CF00032 0288 00086000 LR RJ,@11 0288 00087000 * END; /* @Y17XANL*/ 00088000 AL RINDEX,@CF00119 0289 00089000 @DE00282 L @12,IEDQNPTR(,RAVT) 0289 00090000 LH @12,TNTLEN(,@12) 0289 00091000 N @12,@CF03159 0289 00092000 CR RINDEX,@12 0289 00093000 BNH @DL00282 0289 00094000 @DC00282 DS 0H 0290 00095000 * RFY 0290 00096000 * (IEDQTPTR, 0290 00097000 * RJ) UNRSTD; /* @Y17XANL*/ 00098000 SPACE 1 00099000 * RINDEX=RINDEX-ONE; /* ADJUST TO CORRECT TNT OFFSET 00100000 * FOR LATER STORE IN LCB 0291 00101000 * @Y17XANL*/ 00102000 BCTR RINDEX,0 0291 00103000 * IF RF=NULL THEN /* WAS A MATCHING TERM ENTRY 0292 00104000 * FOUND @Y17XANL*/ 00105000 LTR RF,RF 0292 00106000 BZ @RT00292 0292 00107000 * GOTO ABENDJ; /* NO, GO SEND ERROR MESSAGE 0293 00108000 * @Y17XANL*/ 00109000 * RFY 0294 00110000 * R12 RSTD; /* @G36XRNB*/ 00111000 * IF DCBIPLTX^=BLANK THEN /* WAS IPLTXID NAME SPECIFIFIED 00112000 * ON DDCARD OR IN THE DCB 0295 00113000 * @Y17XANL*/ 00114000 CLC DCBIPLTX(8,RDCB),BLANK 0295 00115000 BE @RF00295 0295 00116000 * DO; /* YES, THEN UPDATE IPLTXID NAME 00117000 * IN TTE FOR NCP @Y17XANL*/ 00118000 * RFY 0297 00119000 * (RE, 0297 00120000 * RSAVE) RSTD; /* @Y17XANL*/ 00121000 * 0297 00122000 * /*************************************************************/ 00123000 * /* */ 00124000 * /* CALL DEVICE DEPENDENT FIELD LOOKUP CODE WITH REG 0 */ 00125000 * /* CONTAINING MASK FOR NCP DATA AND REG 1 THE ADDR OF THE */ 00126000 * /* TERMINAL ENTRY. R13 POINTS TO A SAVEAREA. THE LOOKUP CODE */ 00127000 * /* IS ADDRESSED BY AVTDDFT. @Y17XANL*/ 00128000 * /* */ 00129000 * /*************************************************************/ 00130000 * 0298 00131000 * RE=TRMNCPIM; /* SET MASK FOR NCP DEVICE INFO 00132000 * @Y17XANL*/ 00133000 LA RE,8 0298 00134000 * GEN REFS(RSAVE,RWTGC) SETS(RSAVE); 0299 00135000 * /* @YM04645*/ 00136000 * /* 00137000 L RSAVE,4(RWTGC) POINT AT SAVE AREA @YM04645 00138000 * CALL DEVCODE; /* CALL LOOKUP CODE @Y17XANL*/ 00139000 L @15,AVTDDFT(,RAVT) 0300 00140000 BALR @14,@15 0300 00141000 * RFY 0301 00142000 * (RE, 0301 00143000 * RF, 0301 00144000 * RSAVE) UNRSTD; /* @Y17XANL*/ 00145000 * RFY 0302 00146000 * RJ RSTD; /* @Y17XANL*/ 00147000 * 0302 00148000 * /*************************************************************/ 00149000 * /* */ 00150000 * /* ON RETURN, REG15 (RJ) HAS ADDRESS OF NCP DEVICE DEPENDENT */ 00151000 * /* FIELD. @Y17XANL*/ 00152000 * /* */ 00153000 * /*************************************************************/ 00154000 * 0303 00155000 * RJ->NCPTXID=DCBIPLTX; /* UPDATE IPLTXID FIELD @Y17XANL*/ 00156000 MVC NCPTXID(8,RJ),DCBIPLTX(RDCB) 0303 00157000 * RJ->NCPREST=OFF; /* INDICATE 'NO RESTART' @Y17XANL*/ 00158000 NI NCPREST(RJ),B'11101111' 0304 00159000 * END; /* @Y17XANL*/ 00160000 * RFY 0306 00161000 * RJ UNRSTD; /* @Y17XANL*/ 00162000 @RF00295 DS 0H 0307 00163000 * IF DCBBUFSITIOTPTR; /* GET TIOT ADDRESS */ 00173000 L RCORE,TIOTPTR(,RCORE) 0310 00174000 * RCORE=RCORE+DCBTIOT; /* GET TIOT ENTRY ADDRESS */ 00175000 AH RCORE,DCBTIOT(,RDCB) 0311 00176000 * IF RCORE->TIOEWTCT>1 /* CHECK THE NUMBER OF */ 00177000 * THEN 0312 00178000 CLI TIOEWTCT(RCORE),1 0312 00179000 BH @RT00312 0312 00180000 * GOTO ABEND17; /* EXTENTS - ONLY 1 ALLOWED FOR 00181000 * 3705 */ 00182000 * RESTRICT(RUCB); 0314 00183000 * RUCB=RCORE->TIOEFSRT; /* GET UCB ADDRESS */ 00184000 L RUCB,TIOEFSRT(,RCORE) 0315 00185000 * RCORE=RCORE+RCORE->TIOELNOH; /* BUMP TO NEXT TIOT ENTRY */ 00186000 SLR @11,@11 0316 00187000 IC @11,TIOELNOH(,RCORE) 0316 00188000 ALR RCORE,@11 0316 00189000 * IF RCORE->TIOELNOH^=0 /* CHECK FOR END OF TIOT */ 00190000 * THEN /* IF NOT AT END, CHECK FOR */ 00191000 CLI TIOELNOH(RCORE),0 0317 00192000 BE @RF00317 0317 00193000 * DO; /* CONCATENATION */ 00194000 * IF RCORE->TIOEDDNM(1)=' ' /* CHECK FOR CONCATENATED DD */ 00195000 * THEN 0319 00196000 CLI TIOEDDNM(RCORE),C' ' 0319 00197000 BE @RT00319 0319 00198000 * GOTO ABEND17; /* ENTRIES - INVALID FOR RN */ 00199000 * END; 0321 00200000 SPACE 2 00201000 * GEN FLOWS(ABEND10); 0322 00202000 @RF00317 DS 0H 0322 00203000 * /* @Y17XANL*/ 00204000 LA RUCB,0(RUCB) CLEAR HIGH ORDER BYTE 00205000 LTR RUCB,RUCB IS UCB ADDRESS ZERO 00206000 BZ ABEND10 YES, EXIT TO OPEN ERROR HANDLER 00207000 * IF UCBTYP^=MIDIRN /* CHK UCB FOR CORRECTOY03305 */ 00208000 * THEN 0323 00209000 CLC UCBTYP(4,UCBPTR),MIDIRN 0323 00210000 BE @RF00323 0323 00211000 * IF UCBTYP^=MAXIRN /* SPECIFICATION - IF OY03305 */ 00212000 * THEN 0324 00213000 CLC UCBTYP(4,UCBPTR),MAXIRN 0324 00214000 BNE @RT00324 0324 00215000 * GO TO ABEND6; /* INCORRECT, EXIT TO OPEN ERROR 00216000 * HANDLER ROUTINE TO ISSUE ABEND*/ 00217000 * AVTGETMS=POOLNO; /* SET SUBPOOL NUMBER FOR GETMAIN*/ 00218000 @RF00323 MVI AVTGETMS(RAVT),X'E6' 0326 00219000 * AVTGETMN=DEBSIZE; /* PUT SIZE TO GETMAIN IN 0327 00220000 * PARAMETER LIST */ 00221000 MVC AVTGETMN(4,RAVT),@CF03096 0327 00222000 * AVTGETMD=ADDR(AVTGETMD); /* PUT ADDRESS OF WORD FOR 0328 00223000 * GETMAIN TO PLACE THE DEB 0328 00224000 * ADDRESS INTO PARM LIST */ 00225000 LA @11,AVTGETMD(,RAVT) 0328 00226000 ST @11,AVTGETMD(,RAVT) 0328 00227000 * GEN; 0329 00228000 LA RF,AVTGETMN(RAVT) LOAD ADDR. OF THE PARM LIST 00229000 MODESET EXTKEY=DATAMGT GET INTO KEY 5 @G36XRNB 00230000 GETMAIN ,MF=(E,(1)) ISSUE GETMAIN FOR DEB 00231000 MODESET EXTKEY=SUPR BACK TO KEY 0 @G36XRNB 00232000 LTR RJ,RJ CHECK RETURN CODE 00233000 BNZ ABEND1 EXIT TO 1933 IF UNSUCCESSFUL 00234000 * RFY 0330 00235000 * RDEB RSTD; /* @Y17XANL*/ 00236000 * RDEB=AVTGETMD; /* GET DEB ADDRESS */ 00237000 L RDEB,AVTGETMD(,RAVT) 0331 00238000 * DEBCLEAR(1:DEBSIZE)=''B; /* CLEAR THE DEB @Y17XANL*/ 00239000 XC DEBCLEAR(104,RDEB),DEBCLEAR(RDEB) 0332 00240000 * DEBNMEXT=1; /* SET NO. OF EXTENTS TO ONE */ 00241000 LA @15,1 0333 00242000 STC @15,DEBNMEXT(,IEDQDPTR) 0333 00243000 * DEBAPPAD=RDEB; /* SET ADDR. OF APPENDAGE VECTOR 00244000 * TABLE */ 00245000 STCM RDEB,7,DEBAPPAD(IEDQDPTR) 0334 00246000 * DEBEXSCL=NDAD; /* SET CONSTANT FOR NON DIRECT 0335 00247000 * ACCESS DEVICE @Y17XANL*/ 00248000 MVI DEBEXSCL(IEDQDPTR),X'02' 0335 00249000 * DEBTCBAD=AVTTCB; /* MOVE IN TCB ADDRESS */ 00250000 L @14,AVTTCB(,RAVT) 0336 00251000 STCM @14,7,DEBTCBAD(IEDQDPTR) 0336 00252000 * DEBAPVT=CVTXAPG->DEBAPVT; /* SET UP APPENDAGE VECTOR TABLE */ 00253000 L @01,CVTPTR 0337 00254000 L @01,CVTXAPG(,@01) 0337 00255000 MVC DEBAPVT(20,IEDQDPTR),DEBAPVT(@01) 0337 00256000 * DEBDEBAD=TCBDEB; /* CHAIN DEB INTO TCB DEB */ 00257000 MVC DEBDEBAD(3,IEDQDPTR),TCBDEB+1(@14) 0338 00258000 * TCBDEB=ADDR(DEBNMSUB); /* CHAIN */ 00259000 LA @01,DEBNMSUB(,IEDQDPTR) 0339 00260000 ST @01,TCBDEB(,@14) 0339 00261000 * DCBDEBAD=ADDR(DEBNMSUB); /* SET DEB ADDRESS IN DCB */ 00262000 ST @01,DCBDEBAD(,RDCB) 0340 00263000 * DEBDCBAD=RDCB; /* SET DCB ADDRESS IN DEB */ 00264000 STCM RDCB,7,DEBDCBAD(IEDQDPTR) 0341 00265000 * DEBPROTG=TCBPKF|'0F'X; /* SET PROTECTION TAG IN DEB FROM 00266000 * TCB */ 00267000 MVC DEBPROTG(1,IEDQDPTR),TCBPKF(@14) 0342 00268000 OI DEBPROTG(IEDQDPTR),X'0F' 0342 00269000 * DEBLNGTH=DEBDWORD; /* SET NUMBER OF DOUBLE WORDS IN 00270000 * DEB */ 00271000 MVI DEBLNGTH(IEDQDPTR),X'0D' 0343 00272000 * DEBUCBAD=RUCB; /* SET UCB ADDRESS IN DEB */ 00273000 STCM RUCB,7,DEBUCBAD(IEDQDPTR) 0344 00274000 * DEBAMLNG=AMLNG; /* SET ACCESS METHOD WORKAREA 0345 00275000 * SIZE OY03305 */ 00276000 MVI DEBAMLNG(IEDQDPTR),X'06' 0345 00277000 * SAVEETI=UCBETI; /* SAVE ERROR TAB IN ACCESS 0346 00278000 * METHOD WORKAREA IN THE DEB 0346 00279000 * OY03305 */ 00280000 LA @14,DEBUCBS(,IEDQDPTR) 0346 00281000 SLA @15,2 0346 00282000 ALR @14,@15 0346 00283000 L @15,UCBEXTPT(,UCBPTR) 0346 00284000 MVC SAVEETI(1,@14),UCBETI(@15) 0346 00285000 * SAVEATI=UCBATI; /* SAVE ATTENTION TAB IN ACCESS 00286000 * METHOD WORKAREA IN THE DEB 0347 00287000 * OY03305 */ 00288000 MVC SAVEATI(1,@14),UCBATI(@15) 0347 00289000 * UCBATI=RNATI; /* SET 3705 ATTN TAB IN THE UCB 00290000 * OY03305 */ 00291000 MVI UCBATI(@15),X'14' 0348 00292000 * UCBETI=RNETI; /* SET 3705 ERROR TAB IN THE UCB 00293000 * @YM05684*/ 00294000 MVI UCBETI(@15),X'31' 0349 00295000 */* */ 00296000 * 0350 00297000 * GEN(DEBCHK (RDCB),TYPE=ADD,AM=TCAM INSERT DEB IN CHAIN ); 0350 00298000 DEBCHK (RDCB),TYPE=ADD,AM=TCAM INSERT DEB IN CHAIN 00299000 * RELEASE(RUCB); /* RELEASE UCB REGISTER */ 00300000 * GEN FLOWS(ABEND7); 0352 00301000 * /* @Y17XANL*/ 00302000 L RF,CVTPTR ADDRESS OF CVT Y05330 00303000 LA RE,PAGESZ VS/1 PAGE SIZE Y05330 00304000 TM CVTDCB(RF),SYSVS1 VS/1 OR VS/2 Y05330 00305000 BO VS1 BRANCH IF VS/1 Y05330 00306000 AR RE,RE VS/2 PAGE SIZE Y05330 00307000 VS1 EQU * Y05330 00308000 L RF,CVTAQAVT(,RF) ADDR. OF WORK AREA Y05330 00309000 LA RF,TCXAVAIL(,RF) ADDR. OF LCB AVAIL. @G36XRNB 00310000 LA RUCB,SIZELCB LENGTH OF LCB @Y17XANL 00311000 NC ZERO(FOUR,RF),ZERO(RF) CHAIN EMPTY Y05330 00312000 BZ GETLCB1 YES, ISSUE GETMAIN Y05330 00313000 GETLCB EQU * Y05330 00314000 LR RJ,RF SAVE OLD CHAIN POINTER Y05330 00315000 L RF,ZERO(RF) GET NEW CHAIN POINTER Y05330 00316000 L RLCB,FOUR(RF) LENGTH IN THIS PAGE Y05330 00317000 SR RLCB,RUCB REQUEST FIT IN THIS PAGE Y05330 00318000 BNM GETLCB2 YES, BRANCH Y05330 00319000 CLC ZERO(FOUR,RF),AVTFZERO(RAVT) END OF CHAIN Y05330 00320000 BNE GETLCB NO, BUMP TO NEXT PAGE Y05330 00321000 GETLCB1 EQU * Y05330 00322000 STM RE,RF,AVTGETMN(RAVT) SET GETMAIN PARMS Y05330 00323000 MVI AVTGETMN+9(RAVT),250 SET SUBPOOL Y05330 00324000 OI AVTGETMN+8(RAVT),PAGEREQ GETMAIN ON PAGE BOUND. Y05330 00325000 LA RF,AVTGETMN(RAVT) GETMAIN PARM LIST Y05330 00326000 MODESET EXTKEY=TCAM GET TO KEY 6 @G36XRNB 00327000 GETMAIN ,MF=(E,(1)) GET PAGE FOR LCBS Y05330 00328000 MODESET EXTKEY=SUPR BACK TO KEY 0 @G36XRNB 00329000 NI AVTGETMN+8(RAVT),X'FF'-PAGEREQ RESET PARM LIST Y05330 00330000 LTR RJ,RJ GOOD RETURN CODE Y05330 00331000 BNZ ABEND7 NO, EXIT Y05330 00332000 LM RE,RF,AVTGETMN(RAVT) LENGTH AND ADDRESS Y05330 00333000 L RF,ZERO(RF) ADDRESS OF GOTTEN CORE Y05330 00334000 MVC ZERO(FOUR,RF),AVTFZERO(RAVT) SET END OF CHAIN Y05330 00335000 LR RLCB,RE SAVE LENGTH Y05330 00336000 SR RLCB,RUCB FIND CORE LEFT AFTER LCB Y05330 00337000 GETLCB2 EQU * Y05330 00338000 BNZ GETLCB3 REQUEST NOT EQUAL AVAIL. Y05330 00339000 MVC ZERO(FOUR,RJ),ZERO(RF) REMOVE PAGE FROM CHAIN Y05330 00340000 B GETLCB4 CONTINUE Y05330 00341000 SIZELCB EQU X'C8' SIZE OF 3705 LCB @Y17XANL 00342000 CSA EQU 241 CSA SUBPOOL @G36XRNB 00343000 PAGEREQ EQU X'10' FLAG FOR PAGE GETMAIN Y05330 00344000 SYSVS1 EQU X'20' FLAG FOR VS/1 SYSTEM Y05330 00345000 PAGESZ EQU 2048 VS/1 PAGE SIZE Y05330 00346000 CHAINLCB EQU 60 OFFSET TO CHAIN OF CORE Y05330 00347000 * FOR LCBS Y05330 00348000 ZERO EQU 0 NUMERIC ZERO @Y17XANL 00349000 AD EQU 7 ICM/STCM MASK Y05330 00350000 GETLCB3 EQU * Y05330 00351000 ST RLCB,FOUR(,RF) UPDATE AVAILABLE CORE Y05330 00352000 GETLCB4 EQU * Y05330 00353000 LA RLCB,ZERO(RLCB,RF) ADDRESS OF LCB Y05330 00354000 XC ZERO(SIZELCB,RLCB),ZERO(RLCB) CLEAR LCB @Y17XANL 00355000 * 0353 00356000 * /*****************************************************************/ 00357000 * /* */ 00358000 * /* INITIALIZE THE LCB @Y17XANL*/ 00359000 * /* */ 00360000 * /*****************************************************************/ 00361000 * 0353 00362000 * DCBIOBAD=RLCB+LCBPRFSZ-SIZEIOB; /* POINT TO IOB MINUS THE SIZE OF 00363000 * THE IOB @Y17XANL*/ 00364000 LR @15,RLCB 0353 00365000 SL @15,@CF03153 0353 00366000 ST @15,DCBIOBAD(,RDCB) 0353 00367000 * DCBEIOBX=SIZEIOB; /* SET IOB SIZE @Y17XANL*/ 00368000 MVI DCBEIOBX(RDCB),X'C8' 0354 00369000 * LCBQCBA=RLCB; /* POINT LCB TO ITSELF */ 00370000 STCM RLCB,7,LCBQCBA(IEDQLPTR) 0355 00371000 * LCBSTART=ADDR(LCBCPA); /* POINT CCW STARTING ADDRESS TO 00372000 * CHANNEL PROGRAM AREA */ 00373000 LA @15,LCBCPA(,IEDQLPTR) 0356 00374000 STCM @15,7,LCBSTART(IEDQLPTR) 0356 00375000 * LCBSTCBA=ADDR(LCBRSKEY); /* SET RECEIVE SCHEDULER AS FIRST 00376000 * STCB IN LCB SUBTASK CHAIN */ 00377000 LA @15,LCBRSKEY(,IEDQLPTR) 0357 00378000 STCM @15,7,LCBSTCBA(IEDQLPTR) 0357 00379000 * LCBRSKEY=DSPLOCSC; /* SET RCV SCHEDULER KEY FOR RN 00380000 * TO LOCAL RCV SCHED. */ 00381000 MVI LCBRSKEY(IEDQLPTR),X'1E' 0358 00382000 * LCBDCBPT=RDCB; /* PUT DCB ADDRESS IN LCB */ 00383000 ST RDCB,LCBDCBPT(,IEDQLPTR) 0359 00384000 * LCBRSLNK=AVTDELAD; /* PUT THE DUMMY END ELEMENT AS 00385000 * THE LAST STCB IN LCB STCB 0360 00386000 * CHAIN */ 00387000 L @15,AVTDELAD(,RAVT) 0360 00388000 STCM @15,7,LCBRSLNK(IEDQLPTR) 0360 00389000 * LCBFLAG1='C2'X; /* SET IOS FLAG 1 */ 00390000 MVI LCBFLAG1(IEDQLPTR),X'C2' 0361 00391000 * LCBERRCT=4; /* SET RETRY COUNTER TO FOUR */ 00392000 MVC LCBERRCT(2,IEDQLPTR),@CH00071 0362 00393000 * LCBECBPT=ADDR(AVTDMECB); /* SET ECB POINTER TO FULL WORD 00394000 * OF ZEROES */ 00395000 LA @14,AVTDMECB(,RAVT) 0363 00396000 STCM @14,7,LCBECBPT(IEDQLPTR) 0363 00397000 * LCBRSPRI=RCVPRI; /* SET RECEIVE SCH PRIORITY 0364 00398000 * @Y17XANL*/ 00399000 MVI LCBRSPRI(IEDQLPTR),X'10' 0364 00400000 * LCBDLNKN='1'B; /* SET ERB POSTABLE */ 00401000 OI LCBDLNKN(IEDQLPTR),B'00000001' 0365 00402000 * LCBCQELE=AVTDELAD; /* POINT CORE QUEUE IN LCB TO 0366 00403000 * DUMMY LAST ELEMENT @Y17XANL*/ 00404000 ST @15,LCBCQELE(,IEDQLPTR) 0366 00405000 SPACE 1 00406000 * LCBTTCIN=RINDEX; /* SAVE TNT OFFSET OF NCP TTE 0367 00407000 * @Y17XANL*/ 00408000 STH RINDEX,LCBTTCIN(,IEDQLPTR) 0367 00409000 * RESPECIFY 0368 00410000 * (IEDQTPTR, 0368 00411000 * RF) RSTD; /* RESTRICT REGS @Y17XANT*/ 00412000 * RF=RINDEX; /* GET TTCIN @Y17XANT*/ 00413000 LR RF,RINDEX 0369 00414000 * CALL IEDQTNT; /* CONVERT TO TTE @Y17XANT*/ 00415000 L @15,AVTRNMPT(,RAVT) 0370 00416000 BALR @14,@15 0370 00417000 * IEDQTPTR=RF; /* SET TTE BASE @Y17XANT*/ 00418000 LR IEDQTPTR,RF 0371 00419000 * IF TRMRLMCT='80'X THEN 0372 00420000 LR @15,IEDQTPTR 0372 00421000 SL @15,@CF03152 0372 00422000 CLI TRMRLMCT(@15),128 0372 00423000 BNE @RF00372 0372 00424000 * DO; /* TRACE SET BY RESTRT @Y17XANT*/ 00425000 * LCBTRACE='1'B; /* SET TRACE IND ON @Y17XANT*/ 00426000 OI LCBTRACE(IEDQLPTR),B'10000000' 0374 00427000 * TRMRLMCT='00'X; /* CLEAR INDICATOR @Y17XANT*/ 00428000 MVI TRMRLMCT(@15),X'00' 0375 00429000 * END; /* @Y17XANT*/ 00430000 * RESPECIFY 0377 00431000 * (IEDQTPTR, 0377 00432000 * RF) UNRSTD; /* @Y17XANT*/ 00433000 @RF00372 DS 0H 0378 00434000 * RFY 0378 00435000 * RINDEX UNRSTD; /* @Y17XANL*/ 00436000 * 0379 00437000 * /*****************************************************************/ 00438000 * /* */ 00439000 * /* GET CORE FOR SRB/IOSB PAIR AND INITIALIZE @G36XRNB*/ 00440000 * /* */ 00441000 * /*****************************************************************/ 00442000 * 0379 00443000 * RFY 0379 00444000 * (R0, 0379 00445000 * R1, 0379 00446000 * R15) RSTD; /* @G36XRNB*/ 00447000 * RFY 0380 00448000 * IEDQTCXD BASED(R12); /* @G36XRNB*/ 00449000 * R0=LENGTH(SRBSECT)+LENGTH(IOSB)+CONTROL;/* SET UP LENGTH FOR 0381 00450000 * GETMAIN @G36XRNB*/ 00451000 LA R0,156 0381 00452000 * GEN(GETMAIN RC,LV=(0),SP=CSA); /* GET CORE FOR SRB/IOSB @G36XRNB*/ 00453000 GETMAIN RC,LV=(0),SP=CSA 00454000 * IF R15^=0 THEN /* SUCCESSFUL GETMAIN @G36XRNB*/ 00455000 LTR R15,R15 0383 00456000 BNZ @RT00383 0383 00457000 * GOTO ABEND33; /* NO-GO ABEND @G36XRNB*/ 00458000 * R12=16->PTR31->CVTAQAVT; /* ADDR OF TCX @G36XRNB*/ 00459000 LA @14,16 0385 00460000 L @14,PTR31(,@14) 0385 00461000 L R12,CVTAQAVT(,@14) 0385 00462000 * R1->PTR31=TCXNCPIO; /* CHAIN NEW SRB/IOSB PAIR ... 0386 00463000 * @G36XRNB*/ 00464000 L @14,TCXNCPIO(,R12) 0386 00465000 ST @14,PTR31(,R1) 0386 00466000 * TCXNCPIO=R1; /* ...INTO TCX @G36XRNB*/ 00467000 ST R1,TCXNCPIO(,R12) 0387 00468000 * LCBIOSB=R1+LENGTH(SRBSECT)+CONTROL;/* ADDR OF IOSB @G36XRNB*/ 00469000 LA @14,48 0388 00470000 ALR @14,R1 0388 00471000 STCM @14,7,LCBIOSB(IEDQLPTR) 0388 00472000 * IOSSRB=R1+CONTROL; /* ADDR OF SRB @G36XRNB*/ 00473000 L @14,IOSBPTR-1(,IEDQLPTR) 0389 00474000 LA @10,4 0389 00475000 ALR @10,R1 0389 00476000 ST @10,IOSSRB(,@14) 0389 00477000 */* PAGE FIX THE SRB/IOSB PAIR @G36XRNB*/ 00478000 * 0390 00479000 * R15=R1+LENGTH(SRBSECT)+LENGTH(IOSB)+CONTROL;/* GET ADDRESS OF END 00480000 * OF SRB/IOSB PAIR @G36XRNB*/ 00481000 LA R15,156 0390 00482000 ALR R15,R1 0390 00483000 * R0=ADDR(AVTDMECB); /* ADDR OF ECB @G36XRNB*/ 00484000 LA R0,AVTDMECB(,RAVT) 0391 00485000 * AVTDMECB=''B; /* INIT ECB TO ZERO @G36XRNB*/ 00486000 SLR @14,@14 0392 00487000 ST @14,AVTDMECB(,RAVT) 0392 00488000 * GEN(PGFIX R,A=(1),EA=(15),ECB=(0));/* PAGE FIX SRB/IOSB @G36XRNB*/ 00489000 PGFIX R,A=(1),EA=(15),ECB=(0) 00490000 * R1=ADDR(AVTDMECB); /* ADDRESS OF ECB @G36XRNB*/ 00491000 LA R1,AVTDMECB(,RAVT) 0394 00492000 * GEN(WAIT ECB=(1)); /* WAIT FOR PAGE FIX TO COMPLETE 00493000 * @G36XRNB*/ 00494000 WAIT ECB=(1) 00495000 * IF DMECB(4)^=0 THEN /* PAGE FIX SUCCESSFUL @G36XRNB*/ 00496000 CLI DMECB+3(RAVT),0 0396 00497000 BNE @RT00396 0396 00498000 * GOTO ABEND33; /* NO-GO ABEND @G36XRNB*/ 00499000 */* INITIALIZE THE SRB AND IOSB @G36XRNB*/ 00500000 * 0398 00501000 * SRBSECT=''B; /* INIT SRB TO ZEROS @G36XRNB*/ 00502000 L @14,IOSBPTR-1(,IEDQLPTR) 0398 00503000 LA @14,0(,@14) 0398 00504000 L @10,SRBPTR(,@14) 0398 00505000 XC SRBSECT(44,@10),SRBSECT(@10) 0398 00506000 * RJ=IOSSRB; /* SAVE SRB ADDRESS @G36XRNB*/ 00507000 L RJ,IOSSRB(,@14) 0399 00508000 * IOSB=''B; /* INIT IOSB TO ZEROS @G36XRNB*/ 00509000 XC IOSB(108,@14),IOSB(@14) 0400 00510000 * IOSSRB=RJ; /* SRB ADDRESS BACK TO IOSB 0401 00511000 * @G36XRNB*/ 00512000 ST RJ,IOSSRB(,@14) 0401 00513000 * SRBPARM=LCBIOSB; /* SRB POINTS TO IOSB @G36XRNB*/ 00514000 L @10,SRBPTR(,@14) 0402 00515000 L @14,LCBIOSB-1(,IEDQLPTR) 0402 00516000 LA @14,0(,@14) 0402 00517000 ST @14,SRBPARM(,@10) 0402 00518000 * SRBID='SRB '; /* SRB ID @G36XRNB*/ 00519000 MVC SRBID(4,@10),@CC03138 0403 00520000 * IOSDVRID=IOSTCMID; /* TCAM I/O DRIVER ID @G36XRNB*/ 00521000 L @14,IOSBPTR-1(,IEDQLPTR) 0404 00522000 LA @14,0(,@14) 0404 00523000 MVI IOSDVRID(@14),X'05' 0404 00524000 * IOSPGAD=ADDR(CVTBRET); /* PROGRAM ADDR = BR 14 @G36XRNB*/ 00525000 L @10,CVTPTR 0405 00526000 LA @10,CVTBRET(,@10) 0405 00527000 ST @10,IOSPGAD(,@14) 0405 00528000 * IOSASID=TCXASID; /* TCAM'S MEMORY'S ID @G36XRNB*/ 00529000 MVC IOSASID(2,@14),TCXASID(R12) 0406 00530000 * IOSUCB=DEBUCBAD; /* UCB ADDRESS @G36XRNB*/ 00531000 L @10,DEBUCBAD-1(,IEDQDPTR) 0407 00532000 LA @10,0(,@10) 0407 00533000 ST @10,IOSUCB(,@14) 0407 00534000 * IOSCKEY='60'X; /* TCAM'S STORAGE KEY @G36XRNB*/ 00535000 MVI IOSCKEY(@14),X'60' 0408 00536000 * IOSDSID=RDEB; /* DEB ADDRESS @G36XRNB*/ 00537000 ST RDEB,IOSDSID(,@14) 0409 00538000 * IOSUSE=RLCB; /* PUT LCB ADDRESS IN IOSB 0410 00539000 * @ZM46588*/ 00540000 ST RLCB,IOSUSE(,@14) 0410 00541000 */* SET UP VOID ENTRY IF NECESSARY(NOTE THAT TCAM'S VOID ENTRY 0411 00542000 * IS THE 6TH ONE IN THE TABLE. ITS KEYED OFF THE I/O DRIVER 0411 00543000 * NUMBER OF 5.) @G36XRNB*/ 00544000 * 0411 00545000 * RFY 0411 00546000 * VOID BASED(R12); /* @G36XRNB*/ 00547000 * R12=16->PTR31->CVTIXAVL->IOCVOID;/* ADDR OF THE VOID TBL @G36XRNB*/ 00548000 LA @14,16 0412 00549000 L @14,PTR31(,@14) 0412 00550000 L @14,CVTIXAVL(,@14) 0412 00551000 L R12,IOCVOID(,@14) 0412 00552000 * IF VOIPRG(IOSTCMID+1)=VOIRSTR(IOSTCMID+1) THEN/* VOID ALREADY SET 00553000 * UP @G36XRNB*/ 00554000 CLC VOIPRG+60(4,R12),VOIRSTR+60(R12) 0413 00555000 BNE @RF00413 0413 00556000 * DO; /* NO @G36XRNB*/ 00557000 * GEN(LOAD EP=IGC0010B); /* GET ADDR OF IEDQEB @G36XRNB*/ 00558000 LOAD EP=IGC0010B 00559000 * VOIPRG(IOSTCMID+1)=R0+R0->PURGEOFF;/* ADDR OF TCAM'S PURGE 0416 00560000 * ENTRY WHICH IS TO GO INTO THE 00561000 * VOID IS IN IEDQEB. THE OFFSET 00562000 * AT THE FRONT OF QEB IS WHERE 00563000 * THE PURGE EXIT STARTS. 0416 00564000 * @G36XRNB*/ 00565000 LR @14,R0 0416 00566000 LR @10,R0 0416 00567000 AH @14,PURGEOFF(,@10) 0416 00568000 ST @14,VOIPRG+60(,R12) 0416 00569000 * GEN(DELETE EP=IGC0010B); /* DELETE IEDQEB @G36XRNB*/ 00570000 DELETE EP=IGC0010B 00571000 * END; /* @G36XRNB*/ 00572000 * RFY 0419 00573000 * (R0, 0419 00574000 * R1, 0419 00575000 * R15) UNRSTD; /* @G36XRNB*/ 00576000 @RF00413 DS 0H 0420 00577000 * 0420 00578000 * /*****************************************************************/ 00579000 * /* */ 00580000 * /* EXIT CODING (SUPPLIED BY SYSTEM OPEN) @Y17XANL*/ 00581000 * /* */ 00582000 * /*****************************************************************/ 00583000 * 0420 00584000 * GEN; 0420 00585000 MVC 0(2,RWTGC),LOAD2ID XCTL TO 2ND LOAD @G36XRNB 00586000 L RJ,FOUR(RWTGC) GET WORK AREA ADDRESS 00587000 STM 0,15,0(RJ) SAVE REGISTERS FOR NEXT LOAD 00588000 RELOOP EQU * 00589000 LA RWTGC,EIGHT(RWTGC) INCREMENT CURRENT WTG REG 00590000 LA RPARC,FOUR(RPARC) INCREMENT CURRENT DCB REG 00591000 CLC 0(2,RWTGC),AMIDCNST IS THIS EXECUTOR NEEDED AGAIN 00592000 BCR 8,3 RETURN IF YES 00593000 CLC 0(2,RWTGC),OPIDCNST TEST FOR END OF TABLE 00594000 BNE RELOOP NO, CHECK NEXT ENTRY 00595000 LR RPARC,RPAR RESET DCB AND 00596000 LA RWTGC,FIRSTID(RWTG) WTG TABLE POINTERS 00597000 FIRSTID EQU 32 OFFSET TO FIRST WTG ENTRY 00598000 ZCHECK EQU * 00599000 CLI 0(RWTGC),0 IS THIS ENTRY ZERO 00600000 BNE XCTLRTNE NO, TRANSFER TO NEXT MODULE 00601000 LA RWTGC,EIGHT(RWTGC) IF ZERO INCREMENT POINTERS 00602000 LA RPARC,FOUR(RPARC) AND RETURN TO CHECK NEXT 00603000 B ZCHECK ENTRY 00604000 XCTLRTNE EQU * 00605000 LA RJ,DXCCW12(RJ) POINT TO DOUBLE WORD LIST 00606000 MVC 6(2,RWTG),0(RWTGC) MOVE ID TO NAME FIELD 00607000 TRANSFER EQU * Y05330 00608000 XCTL DE=(RWTG),SF=(E,(15)) XCTL TO NEXT LOAD 00609000 *WTGSETUP: 0421 00610000 * GEN; 0421 00611000 WTGSETUP DS 0H 0421 00612000 L RJ,FOUR(RWTGC) GET WORK AREA ADDRESS 00613000 STM 0,15,0(RJ) SAVE REGISTERS FOR NEXT LOAD 00614000 XC DXCCW10(4,RJ),DXCCW10(RJ) ZERO FOR ERROR LOAD 00615000 MVC AVTOPXCL(2,RAVT),AMIDCNST MOVE THE ID OF THE CURRENT 00616000 * EXECUTOR INTO THE AVT FOR 00617000 * RETURN TO THIS MODULE 00618000 MVC 0(2,RWTGC),OPENERP MOVE ERROR MODULE ID INTO WTG 00619000 * PARM LIST @G36XRNB 00620000 B XCTLRTNE GO TO TRANSFER CONTROL 00621000 AMIDCNST DC CL2'8B' ID OF CURRENT LOAD 00622000 OPIDCNST DC CL2'0S' ID OF SYSTEM LOAD 00623000 LOAD2ID DC CL2'8D' ID FOR NXT LOAD OF 3705 OPEN 00624000 OPENERP DC CL2'33' OPEN ERROR HANDLER ID 00625000 *ABEND1: 0422 00626000 * AVTOPERT=1; /* NO CORE FOR DEB */ 00627000 ABEND1 MVI AVTOPERT(RAVT),X'01' 0422 00628000 * GOTO WTGSETUP; /* EXIT TO ERROR MODULE */ 00629000 B WTGSETUP 0423 00630000 *ABEND6: 0424 00631000 * AVTOPERT=6; /* DEVICE IS NOT 3705 */ 00632000 ABEND6 MVI AVTOPERT(RAVT),X'06' 0424 00633000 * GOTO WTGSETUP; /* EXIT TO ERROR MODULE */ 00634000 B WTGSETUP 0425 00635000 *ABEND7: 0426 00636000 * AVTOPERT=7; /* NO CORE FOR LCB */ 00637000 ABEND7 MVI AVTOPERT(RAVT),X'07' 0426 00638000 * GOTO WTGSETUP; /* EXIT TO ERROR MODULE */ 00639000 B WTGSETUP 0427 00640000 *ABEND10: 0428 00641000 * AVTOPERT=17; /* NO LINES IN LINE GROUP */ 00642000 ABEND10 MVI AVTOPERT(RAVT),X'11' 0428 00643000 * GOTO WTGSETUP; /* EXIT TO ERROR MODULE */ 00644000 B WTGSETUP 0429 00645000 *ABEND17: 0430 00646000 * AVTOPERT=26; /* MORE THAN 1 LINE IN GROUP */ 00647000 ABEND17 MVI AVTOPERT(RAVT),X'1A' 0430 00648000 * GOTO WTGSETUP; /* EXIT TO ERROR MODULE */ 00649000 B WTGSETUP 0431 00650000 *ABENDJ: /* @Y17XANL*/ 00651000 * AVTOPERT=25; /* NO NCP TERMINAL MACRO IN MCP 00652000 * FOR THIS DCB @Y17XANL*/ 00653000 ABENDJ MVI AVTOPERT(RAVT),X'19' 0432 00654000 * GOTO WTGSETUP; /* EXIT TO ERROR MODULEY05330 */ 00655000 B WTGSETUP 0433 00656000 *ABEND32: /* @G36XRNB*/ 00657000 * AVTOPERT=32; /* BAD STORAGE KEY @G36XRNB*/ 00658000 ABEND32 MVI AVTOPERT(RAVT),X'20' 0434 00659000 * GOTO WTGSETUP; /* @G36XRNB*/ 00660000 B WTGSETUP 0435 00661000 *ABEND33: /* @G36XRNB*/ 00662000 * AVTOPERT=33; /* STORAGE PROBLEM FOR SRB/IOSB 00663000 * @G36XRNB*/ 00664000 ABEND33 MVI AVTOPERT(RAVT),X'21' 0436 00665000 * GOTO WTGSETUP; /* @G36XRNB*/ 00666000 B WTGSETUP 0437 00667000 * END IGG0198B 0438 00668000 * 0438 00669000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00670000 */*%INCLUDE SYSLIB (IECDSECT) */ 00671000 */*%INCLUDE SYSLIB (IECDIOSB) */ 00672000 */*%INCLUDE SYSLIB (IHASRB ) */ 00673000 */*%INCLUDE SYSLIB (IECDIOCM) */ 00674000 */*%INCLUDE SYSLIB (IECDVOID) */ 00675000 */*%INCLUDE SYSLIB (IEFUCBOB) */ 00676000 */*%INCLUDE SYSLIB (TTCXD ) */ 00677000 */*%INCLUDE SYSLIB (TAVTD ) */ 00678000 */*%INCLUDE SYSLIB (TLCBD ) */ 00679000 */*%INCLUDE SYSLIB (CVT ) */ 00680000 */*%INCLUDE SYSLIB (TDEBD ) */ 00681000 */*%INCLUDE SYSLIB (IHADCBDF) */ 00682000 */*%INCLUDE SYSLIB (IHADCB ) */ 00683000 */*%INCLUDE SYSLIB (TDISPD ) */ 00684000 */*%INCLUDE SYSLIB (TTRMD ) */ 00685000 */*%INCLUDE SYSLIB (TQCBD ) */ 00686000 */*%INCLUDE SYSLIB (TNCPID ) */ 00687000 */*%INCLUDE SYSLIB (TTNTD ) */ 00688000 * 0438 00689000 * ; 0438 00690000 @EL00001 DS 0H 0438 00691000 @EF00001 DS 0H 0438 00692000 @ER00001 BR @14 0438 00693000 @DATA DS 0H 00694000 @CH00071 DC H'4' 00695000 DS 0F 00696000 DS 0F 00697000 @CF00119 DC F'1' 00698000 @CF00032 DC F'3' 00699000 @CF03152 DC F'14' 00700000 @CF03096 DC F'104' 00701000 @CF03153 DC F'168' 00702000 @CF03158 DC F'-3' 00703000 @CF03159 DC XL4'0000FFFF' 00704000 DS 0D 00705000 @CC03138 DC C'SRB ' 00706000 MIDIRN DC X'50004015' 00707000 MAXIRN DC X'50004025' 00708000 BLANK DC CL8' ' 00709000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00710000 @01 EQU 01 00711000 @02 EQU 02 00712000 @03 EQU 03 00713000 @04 EQU 04 00714000 @05 EQU 05 00715000 @06 EQU 06 00716000 @07 EQU 07 00717000 @08 EQU 08 00718000 @09 EQU 09 00719000 @10 EQU 10 00720000 @11 EQU 11 00721000 @12 EQU 12 00722000 @13 EQU 13 00723000 @14 EQU 14 00724000 @15 EQU 15 00725000 @0 EQU 00 00726000 @1 EQU 01 00727000 @2 EQU 02 00728000 @3 EQU 03 00729000 @4 EQU 04 00730000 @5 EQU 05 00731000 @6 EQU 06 00732000 @7 EQU 07 00733000 @8 EQU 08 00734000 @9 EQU 09 00735000 @A EQU 10 00736000 @B EQU 11 00737000 @C EQU 12 00738000 @D EQU 13 00739000 @E EQU 14 00740000 @F EQU 15 00741000 RE EQU @00 00742000 R0 EQU @00 00743000 RF EQU @01 00744000 R1 EQU @01 00745000 RDCB EQU @02 00746000 DCBPTR EQU @02 00747000 RLCB EQU @04 00748000 RCORE EQU @04 00749000 IEDQLPTR EQU @04 00750000 RPAR EQU @05 00751000 RWTG EQU @06 00752000 RPARC EQU @07 00753000 RWTGC EQU @08 00754000 RAVT EQU @09 00755000 IEDQAPTR EQU @09 00756000 RINDEX EQU @10 00757000 RDEB EQU @11 00758000 IEDQDPTR EQU @11 00759000 RDISP EQU @11 00760000 RUCB EQU @12 00761000 UCBPTR EQU @12 00762000 R12 EQU @12 00763000 RSAVE EQU @13 00764000 IEDQTPTR EQU @14 00765000 RJ EQU @15 00766000 R15 EQU @15 00767000 LCBXPTR EQU @05 00768000 RBASE EQU @03 00769000 CVTPTR EQU 16 00770000 FORCORE EQU 0 00771000 DXDSCB EQU FORCORE 00772000 DXDAADDR EQU FORCORE+312 00773000 DXDCB EQU FORCORE+320 00774000 DXCCW EQU FORCORE+368 00775000 DXVOLSR EQU FORCORE+500 00776000 DXVOLSR1 EQU DXVOLSR 00777000 DXVOLSR2 EQU DXVOLSR+6 00778000 DXVOLSR3 EQU DXVOLSR+12 00779000 DXUKEY EQU FORCORE+526 00780000 DXUCBSAV EQU FORCORE+564 00781000 DXUDCBAD EQU FORCORE+568 00782000 DXPDCBAD EQU FORCORE+572 00783000 DXATCOM1 EQU FORCORE+588 00784000 DXATGENS EQU DXATCOM1 00785000 DXATVGIV EQU DXATGENS 00786000 DXATOUTA EQU DXATCOM1+2 00787000 DXATDACC EQU DXATCOM1+3 00788000 DXATCOM2 EQU FORCORE+592 00789000 DXATEOV EQU DXATCOM2 00790000 DXATOPEN EQU DXATCOM2+1 00791000 DXATALL EQU DXATCOM2+2 00792000 DXATEXC1 EQU FORCORE+604 00793000 DXATEXC2 EQU FORCORE+608 00794000 DXRACIND EQU FORCORE+612 00795000 DXRACFLG EQU FORCORE+616 00796000 DXWORKE EQU FORCORE+620 00797000 IOSB EQU 0 00798000 IOSFLA EQU IOSB 00799000 IOSACHN EQU IOSFLA 00800000 IOSFLB EQU IOSB+1 00801000 IOSFLC EQU IOSB+2 00802000 IOSDVALT EQU IOSFLC 00803000 IOSDVRID EQU IOSB+4 00804000 IOSASID EQU IOSB+6 00805000 IOSPGAD EQU IOSB+8 00806000 IOSPKEY EQU IOSB+12 00807000 IOSOPT EQU IOSB+14 00808000 IOSOPT2 EQU IOSB+15 00809000 IOSUCB EQU IOSB+16 00810000 @NM00017 EQU IOSB+20 00811000 IOSCSW EQU @NM00017+1 00812000 IOSTATUS EQU IOSCSW+3 00813000 IOSSRB EQU IOSB+28 00814000 IOSUSE EQU IOSB+32 00815000 IOSIPIB EQU IOSB+44 00816000 IOSDSID EQU IOSB+80 00817000 IOSPATH EQU IOSB+86 00818000 IOSCHN EQU IOSPATH 00819000 IOSCKEY EQU IOSB+89 00820000 IOSEEKA EQU IOSB+100 00821000 IOSCCHH EQU IOSEEKA+3 00822000 IOSSKHH EQU IOSCCHH+2 00823000 SRBSECT EQU 0 00824000 SRB EQU SRBSECT 00825000 SRBID EQU SRB 00826000 SRBFLC EQU SRB+12 00827000 SRBPARM EQU SRB+28 00828000 IOCOM EQU 0 00829000 IOCVOID EQU IOCOM+32 00830000 IOCOMPTR EQU 0 00831000 VOID EQU 0 00832000 VOIENTRY EQU VOID 00833000 VOIPRG EQU VOIENTRY 00834000 VOIRSTR EQU VOID+4 00835000 VOIDPTR EQU 0 00836000 UCB EQU -512 00837000 UCBOB EQU 0 00838000 UCBJBNR EQU UCBOB 00839000 UCBFL5 EQU UCBOB+1 00840000 UCBAF EQU UCBFL5 00841000 UCBSTAT EQU UCBOB+3 00842000 UCBCHAN EQU UCBOB+4 00843000 UCBSFLS EQU UCBOB+6 00844000 UCBFLA EQU UCBSFLS 00845000 UCBFL1 EQU UCBFLA 00846000 UCBBSY EQU UCBFL1 00847000 UCBNRY EQU UCBFL1 00848000 UCBPST EQU UCBFL1 00849000 UCBCUB EQU UCBFL1 00850000 UCBFLB EQU UCBSFLS+1 00851000 UCBCHM EQU UCBOB+8 00852000 UCBCHM1 EQU UCBCHM 00853000 UCBPTH0 EQU UCBCHM1 00854000 UCBPTH1 EQU UCBCHM1 00855000 UCBWGT EQU UCBOB+12 00856000 UCBTYP EQU UCBOB+16 00857000 UCBTBYT1 EQU UCBTYP 00858000 UCB1FEA5 EQU UCBTBYT1 00859000 UCB1FEA6 EQU UCBTBYT1 00860000 UCBTBYT2 EQU UCBTYP+1 00861000 UCB2OPT2 EQU UCBTBYT2 00862000 UCBDUDN1 EQU UCB2OPT2 00863000 UCB2OPT3 EQU UCBTBYT2 00864000 UCBDUDN2 EQU UCB2OPT3 00865000 UCB2OPT4 EQU UCBTBYT2 00866000 UCBRWTAU EQU UCB2OPT4 00867000 UCB2OPT6 EQU UCBTBYT2 00868000 UCB2OPT7 EQU UCBTBYT2 00869000 UCBTBYT3 EQU UCBTYP+2 00870000 UCBDVCLS EQU UCBTBYT3 00871000 UCBTBYT4 EQU UCBTYP+3 00872000 UCBEXTPT EQU UCBOB+20 00873000 UCBFLC EQU UCBEXTPT 00874000 UCBDEV EQU UCBOB+24 00875000 UCBCMEXT EQU 0 00876000 UCBETI EQU UCBCMEXT 00877000 UCBATI EQU UCBCMEXT+3 00878000 @NM00030 EQU UCBATI 00879000 UCBFLP1 EQU UCBCMEXT+5 00880000 UCBMT EQU 0 00881000 UCBOCR EQU 0 00882000 UCB3540X EQU 0 00883000 UCBDKBYT EQU UCB3540X+6 00884000 UCB3800X EQU 0 00885000 UCBOPTNS EQU UCB3800X 00886000 UCBACTIV EQU UCB3800X+3 00887000 UCBMDRBF EQU UCB3800X+36 00888000 UCBUCS EQU 0 00889000 UCBUCSOP EQU UCBUCS+4 00890000 UCBFCBOP EQU UCBUCS+5 00891000 IEDQTCXD EQU 0 00892000 TCXATTEN EQU IEDQTCXD+4 00893000 TCXASID EQU IEDQTCXD+32 00894000 TCXFLAG1 EQU IEDQTCXD+34 00895000 TCXBUFA EQU IEDQTCXD+80 00896000 TCXDSAVE EQU IEDQTCXD+104 00897000 TCXQE8 EQU IEDQTCXD+216 00898000 TCXNCPIO EQU IEDQTCXD+220 00899000 TCXPTR EQU 0 00900000 IEDQAVTD EQU 0 00901000 AVTSAVEX EQU IEDQAVTD+288 00902000 AVTTCB EQU IEDQAVTD+368 00903000 @NM00035 EQU IEDQAVTD+388 00904000 AVTCKFLG EQU @NM00035 00905000 AVTBASE EQU IEDQAVTD+412 00906000 AVTPKF EQU AVTBASE 00907000 AVTRNMPT EQU IEDQAVTD+424 00908000 AVTOSECB EQU IEDQAVTD+492 00909000 AVTECB1 EQU AVTOSECB 00910000 AVTHG02 EQU IEDQAVTD+528 00911000 AVTDISP EQU IEDQAVTD+552 00912000 AVTHD EQU IEDQAVTD+556 00913000 AVTSCOPT EQU AVTHD 00914000 AVTSAVTP EQU IEDQAVTD+612 00915000 AVTSAVTF EQU AVTSAVTP 00916000 AVTDMECB EQU IEDQAVTD+624 00917000 AVTCKPEL EQU IEDQAVTD+652 00918000 AVTCKRMV EQU AVTCKPEL 00919000 AVTCKELF EQU IEDQAVTD+680 00920000 AVTOPERT EQU IEDQAVTD+690 00921000 AVTCKBYT EQU IEDQAVTD+691 00922000 AVTHG01 EQU IEDQAVTD+692 00923000 AVTCKLNK EQU IEDQAVTD+696 00924000 AVTDELAD EQU IEDQAVTD+704 00925000 AVTCRELE EQU IEDQAVTD+708 00926000 AVTCCELE EQU AVTCRELE 00927000 AVTCLRHI EQU IEDQAVTD+716 00928000 AVTADBUF EQU IEDQAVTD+720 00929000 AVTSYSER EQU IEDQAVTD+728 00930000 AVTCKPQB EQU IEDQAVTD+804 00931000 AVTCKPTB EQU AVTCKPQB 00932000 AVTCKPEC EQU AVTCKPQB+4 00933000 AVTCKPCC EQU AVTCKPEC 00934000 AVTOPCQB EQU IEDQAVTD+816 00935000 AVTOPCOB EQU AVTOPCQB 00936000 AVTOPCEC EQU AVTOPCQB+4 00937000 AVTOPCCC EQU AVTOPCEC 00938000 AVTOLTQB EQU IEDQAVTD+828 00939000 AVTCWFL1 EQU IEDQAVTD+924 00940000 AVTCWFL2 EQU IEDQAVTD+925 00941000 AVTSUBT EQU IEDQAVTD+948 00942000 AVTIOTR EQU IEDQAVTD+949 00943000 AVTGETMN EQU IEDQAVTD+1012 00944000 AVTGETMD EQU IEDQAVTD+1016 00945000 AVTGETMS EQU IEDQAVTD+1021 00946000 AVTKEYLE EQU IEDQAVTD+1032 00947000 AVTBIT1 EQU IEDQAVTD+1050 00948000 AVTBIT2 EQU IEDQAVTD+1051 00949000 AVTBIT3 EQU IEDQAVTD+1052 00950000 AVTDDFT EQU IEDQAVTD+1064 00951000 AVTBIT4 EQU IEDQAVTD+1136 00952000 @NM00117 EQU IEDQAVTD+1232 00953000 IEDNSVTD EQU 0 00954000 SAVTDIAG EQU IEDNSVTD 00955000 SAVTDIAF EQU SAVTDIAG 00956000 SAVTLUSQ EQU IEDNSVTD+88 00957000 SAVTTCPU EQU IEDNSVTD+238 00958000 SAVTZELM EQU IEDNSVTD+270 00959000 SAVTRDRV EQU IEDNSVTD+284 00960000 SAVTCKQB EQU IEDNSVTD+300 00961000 SAVTCKTB EQU SAVTCKQB 00962000 SAVTCKEC EQU SAVTCKQB+4 00963000 SAVTCKCC EQU SAVTCKEC 00964000 IEDQLCB EQU 0 00965000 LCBRCB EQU IEDQLCB 00966000 LCBQCBA EQU LCBRCB+1 00967000 LCBRSKEY EQU IEDQLCB+8 00968000 LCBSTCBA EQU IEDQLCB+9 00969000 LCBRSPRI EQU IEDQLCB+12 00970000 LCBRSLNK EQU IEDQLCB+13 00971000 LCBTSOB EQU IEDQLCB+19 00972000 LCBCHAIN EQU IEDQLCB+20 00973000 LCBSCRNN EQU LCBCHAIN 00974000 LCBTETEN EQU LCBCHAIN 00975000 LCBINSRC EQU IEDQLCB+21 00976000 LCBLKMDE EQU LCBINSRC+2 00977000 LCBNTXT EQU IEDQLCB+24 00978000 LCBSTAT4 EQU LCBNTXT 00979000 LCBPHASE EQU LCBSTAT4 00980000 LCBSCBDA EQU IEDQLCB+25 00981000 LCBMHA EQU IEDQLCB+29 00982000 LCBFLAG1 EQU IEDQLCB+32 00983000 LCBIOBSN EQU IEDQLCB+33 00984000 LCBSNS EQU LCBIOBSN+1 00985000 LCBSENS0 EQU LCBSNS 00986000 LCBLOSDT EQU LCBSENS0 00987000 LCBTMOUT EQU LCBSENS0 00988000 LCBECBPT EQU LCBIOBSN+4 00989000 LCBFLAG3 EQU LCBIOBSN+7 00990000 LCBCSW EQU LCBIOBSN+8 00991000 LCBCSWST EQU LCBCSW+3 00992000 LCBCSWUS EQU LCBCSWST 00993000 LCBCSWCS EQU LCBCSWST+1 00994000 LCBSIOCC EQU LCBIOBSN+15 00995000 LCBSTART EQU LCBIOBSN+16 00996000 LCBDCBPT EQU IEDQLCB+52 00997000 LCBRCQCB EQU IEDQLCB+56 00998000 LCBTHSQ EQU IEDQLCB+60 00999000 LCBINCAM EQU LCBTHSQ 01000000 LCBERRCT EQU IEDQLCB+62 01001000 LCBLSPCI EQU IEDQLCB+65 01002000 LCBRCBFR EQU LCBLSPCI 01003000 LCBSTATE EQU IEDQLCB+70 01004000 LCBSTAT1 EQU LCBSTATE 01005000 LCBSTAT2 EQU LCBSTATE+1 01006000 LCBTRACE EQU LCBSTAT2 01007000 LCBBEOTN EQU LCBSTAT2 01008000 LCBSYNC EQU LCBSTAT2 01009000 LCBDIAL EQU LCBSTAT2 01010000 LCBTSTSW EQU IEDQLCB+72 01011000 LCBERB EQU IEDQLCB+76 01012000 LCBERBST EQU IEDQLCB+84 01013000 LCBDLNKN EQU LCBERBST 01014000 LCBERBCT EQU IEDQLCB+88 01015000 LCBRBCT2 EQU LCBERBCT+1 01016000 LCBTTCIN EQU IEDQLCB+90 01017000 LCBMSGFM EQU IEDQLCB+92 01018000 LCBOBRCH EQU IEDQLCB+96 01019000 LCBINVPT EQU LCBOBRCH+1 01020000 LCBBFRW EQU LCBINVPT 01021000 LCBTPCD EQU IEDQLCB+100 01022000 LCBSTAT5 EQU LCBTPCD 01023000 LCBSTAT6 EQU LCBTPCD+4 01024000 LCBRSPSV EQU LCBTPCD+8 01025000 LCBSAVSN EQU IEDQLCB+112 01026000 LCBERCCW EQU IEDQLCB+120 01027000 LCBCPA EQU IEDQLCB+144 01028000 LCBCCW5 EQU LCBCPA+32 01029000 LCBATTEL EQU LCBCCW5 01030000 LCBQEBPL EQU LCBATTEL 01031000 LCBIOSB EQU LCBQEBPL+1 01032000 IEDQLCBX EQU 0 01033000 LCBXCON EQU IEDQLCBX 01034000 LCBXFLAG EQU LCBXCON 01035000 LCBXDCT EQU LCBXCON+1 01036000 LCBXRADR EQU LCBXCON+4 01037000 CVTMAP EQU 0 01038000 CVTXAPG EQU CVTMAP+20 01039000 CVTDAR EQU CVTMAP+72 01040000 CVTFLGS1 EQU CVTDAR 01041000 CVTBRET EQU CVTMAP+82 01042000 CVTDCB EQU CVTMAP+116 01043000 CVTIXAVL EQU CVTMAP+124 01044000 CVTIERLC EQU CVTMAP+144 01045000 CVTOPTA EQU CVTMAP+182 01046000 CVTOPTB EQU CVTMAP+183 01047000 CVTGTF EQU CVTMAP+236 01048000 CVTGTFST EQU CVTGTF 01049000 CVTGTFS EQU CVTGTFST 01050000 CVTSTATE EQU CVTGTFST 01051000 CVTTMODE EQU CVTGTFST 01052000 CVTFORM EQU CVTGTFST 01053000 CVTAQAVT EQU CVTMAP+240 01054000 CVTTCMFG EQU CVTAQAVT 01055000 CVTVOLM2 EQU CVTMAP+244 01056000 CVTTATA EQU CVTVOLM2 01057000 CVTTSKS EQU CVTTATA 01058000 CVTVOLF2 EQU CVTTSKS 01059000 CVTTAT EQU CVTTATA+1 01060000 CVTATER EQU CVTMAP+248 01061000 CVTEXT1 EQU CVTMAP+252 01062000 CVTPURG EQU CVTMAP+260 01063000 CVTQMSG EQU CVTMAP+268 01064000 CVTDMSR EQU CVTMAP+272 01065000 CVTRSV37 EQU CVTDMSR 01066000 CVTDMSRF EQU CVTRSV37 01067000 CVTERPV EQU CVTMAP+316 01068000 CVTINTLA EQU CVTMAP+320 01069000 CVTAPF EQU CVTMAP+324 01070000 CVTEXT2 EQU CVTMAP+328 01071000 CVTHJES EQU CVTMAP+332 01072000 CVTPGSIA EQU CVTMAP+348 01073000 CVTA1F1 EQU CVTMAP+356 01074000 CVTSYSK EQU CVTMAP+357 01075000 CVTVOLM1 EQU CVTMAP+380 01076000 CVTVOLF1 EQU CVTVOLM1 01077000 CVTATMCT EQU CVTMAP+388 01078000 CVTXTNT1 EQU 0 01079000 CVTXTNT2 EQU 0 01080000 CVTDSSV EQU CVTXTNT2 01081000 CVTFLGBT EQU CVTXTNT2+5 01082000 CVTQID EQU CVTXTNT2+24 01083000 CVTSHS EQU CVTXTNT2+40 01084000 CVTRV400 EQU CVTXTNT2+52 01085000 CVTRV409 EQU CVTXTNT2+53 01086000 CVTATCVT EQU CVTXTNT2+64 01087000 CVTRV429 EQU CVTXTNT2+84 01088000 CVTRV438 EQU CVTXTNT2+85 01089000 CVTRV457 EQU CVTXTNT2+112 01090000 CVTRV466 EQU CVTXTNT2+113 01091000 CVTFIX EQU -256 01092000 CVTRELNO EQU CVTFIX+252 01093000 DEBCLEAR EQU 0 01094000 IEDQDEB EQU 0 01095000 DEBPRF EQU IEDQDEB 01096000 DEBAPVT EQU DEBPRF 01097000 DEBLNGTH EQU DEBPRF+32 01098000 DEBNMSUB EQU IEDQDEB+36 01099000 DEBTCBAD EQU IEDQDEB+37 01100000 DEBAMLNG EQU IEDQDEB+40 01101000 DEBDEBAD EQU IEDQDEB+41 01102000 DEBNMEXT EQU IEDQDEB+52 01103000 DEBPROTG EQU IEDQDEB+60 01104000 DEBDCBAD EQU IEDQDEB+61 01105000 DEBEXSCL EQU IEDQDEB+64 01106000 DEBAPPAD EQU IEDQDEB+65 01107000 DEBUCBS EQU IEDQDEB+68 01108000 DEBSUBR EQU 0 01109000 IHADCB EQU 0 01110000 IEDQDISP EQU 0 01111000 IEDQTRM EQU 0 01112000 TRMSTATE EQU IEDQTRM 01113000 TRMLOG EQU TRMSTATE 01114000 TRMPREF EQU TRMSTATE 01115000 TRMDESTQ EQU IEDQTRM+1 01116000 TRMINSEQ EQU IEDQTRM+4 01117000 TLISTCNT EQU TRMINSEQ 01118000 TRMOUTSQ EQU IEDQTRM+6 01119000 TLISTEN EQU TRMOUTSQ 01120000 TRMDSORG EQU TLISTEN 01121000 TRMALTD EQU IEDQTRM+8 01122000 TRMDEVFL EQU IEDQTRM+10 01123000 TRMSTAT EQU IEDQTRM+12 01124000 IEDNTRM EQU 0 01125000 TRMBYTE4 EQU IEDNTRM 01126000 TRMBYTE3 EQU IEDNTRM+1 01127000 TRMBYTE2 EQU IEDNTRM+2 01128000 TRMINPG EQU TRMBYTE2 01129000 TRMBYTE1 EQU IEDNTRM+3 01130000 TRMSCPRQ EQU TRMBYTE1 01131000 TRMBYTE0 EQU IEDNTRM+6 01132000 TRMSIBPT EQU IEDNTRM+7 01133000 TRMRLMCT EQU IEDNTRM+10 01134000 TRMTYPE EQU IEDNTRM+11 01135000 IEDQQCB EQU 0 01136000 QCBDSFLG EQU IEDQQCB 01137000 QCBDISK EQU QCBDSFLG 01138000 QCBEOLDT EQU IEDQQCB+16 01139000 QCBBYTE1 EQU QCBEOLDT+1 01140000 QCBLKRLN EQU IEDQQCB+18 01141000 QCBRETCT EQU QCBLKRLN 01142000 QCBSTAT EQU IEDQQCB+19 01143000 QCBINSRC EQU IEDQQCB+21 01144000 @NM00198 EQU QCBINSRC 01145000 QCBTSOF2 EQU @NM00198+1 01146000 QCBTSOF1 EQU @NM00198+2 01147000 QCBINTVL EQU IEDQQCB+24 01148000 QCBPREN EQU IEDQQCB+28 01149000 QCBLKRRN EQU QCBPREN+1 01150000 QCBDCBAD EQU IEDQQCB+33 01151000 QCBFLAG EQU IEDQQCB+36 01152000 IEDQPQCB EQU 40 01153000 QCBFHDLZ EQU IEDQPQCB+3 01154000 QCBPFEFO EQU QCBFHDLZ+1 01155000 QCBFHDTZ EQU IEDQPQCB+6 01156000 QCBINTLF EQU IEDQPQCB+12 01157000 IEDNQCB EQU 0 01158000 QCBSTAT1 EQU IEDNQCB+4 01159000 QCBPLCBA EQU IEDNQCB+5 01160000 IEDNCP EQU 0 01161000 NCPFLAG1 EQU IEDNCP+1 01162000 NCPREST EQU NCPFLAG1 01163000 NCPTXID EQU IEDNCP+10 01164000 IEDQTNTD EQU 0 01165000 IEDQTCDE EQU IEDQTNTD 01166000 TNTENLEN EQU IEDQTNTD+40 01167000 TNTLEN EQU IEDQTNTD+44 01168000 IEDQTDCE EQU IEDQTNTD+46 01169000 IEDTNTA EQU 0 01170000 TCB EQU 0 01171000 TCBDEB EQU TCB+8 01172000 TCBPKF EQU TCB+28 01173000 SDSECT EQU 0 01174000 ZERO1 EQU SDSECT 01175000 TIOELNOH EQU ZERO1 01176000 TIOEWTCT EQU ZERO1+2 01177000 TIOEDDNM EQU SDSECT+4 01178000 FOUR EQU TIOEDDNM 01179000 EIGHT EQU TIOEDDNM+4 01180000 TIOTPTR EQU SDSECT+12 01181000 TIOEFSRT EQU SDSECT+16 01182000 TERMADDR EQU 0 01183000 DEVCODE EQU 0 01184000 IEDQTNT EQU 0 01185000 PTR31 EQU 0 01186000 WTGTABLE EQU 0 01187000 OWAREA EQU WTGTABLE+4 01188000 QEBENTRY EQU 0 01189000 PURGEOFF EQU QEBENTRY+6 01190000 DSPBYPAS EQU 20 01191000 DSPCHAIN EQU 12 01192000 DSPDISP EQU 4 01193000 DSPLIFO EQU 56 01194000 DSPLIFOR EQU 60 01195000 DSPLIST EQU 8 01196000 DSPPOST EQU 24 01197000 DSPPOSTR EQU 28 01198000 DSPPRIO EQU 48 01199000 DSPPRIOR EQU 52 01200000 DSPTRACE EQU 64 01201000 DSPTSTQ EQU 32 01202000 DSPTSTQR EQU 36 01203000 DSPUNAV EQU 40 01204000 DSPUNAVR EQU 44 01205000 DSPWAIT EQU 16 01206000 UCBBGN EQU -512 01207000 IOSBPTR EQU LCBIOSB 01208000 IOSATTSC EQU IOSIPIB 01209000 IOSWTOWA EQU IOSIPIB 01210000 IOSPCISC EQU IOSIPIB 01211000 SRBPTR EQU IOSSRB 01212000 UCBOBS01 EQU UCBDEV 01213000 UCBSTAB EQU UCBOBS01+10 01214000 UCBBSVL EQU UCBSTAB 01215000 UCBPRSRS EQU UCBSTAB 01216000 UCBDMCT EQU UCBOBS01+11 01217000 UCBFL4 EQU UCBOBS01+13 01218000 UCBOBS02 EQU UCBDEV 01219000 UCBTFL1 EQU UCBOBS02+19 01220000 UCBXTN EQU UCBOBS02+20 01221000 UCBVOPT EQU UCBXTN 01222000 UCBOBS03 EQU UCBDEV 01223000 UCBXTADR EQU UCBOBS03 01224000 UCBOBS04 EQU UCBDEV 01225000 UCBBTA EQU UCBOBS04+12 01226000 UCBOBS06 EQU UCBDEV 01227000 UCBAOF EQU UCBOBS06 01228000 UCBAOF1 EQU UCBAOF 01229000 UCBAOF2 EQU UCBAOF+1 01230000 @NM00029 EQU UCBOBS06+3 01231000 UCBIRB EQU UCBOBS06+4 01232000 UCBGRAF EQU UCBIRB 01233000 UCBLDNCA EQU UCBOBS06+8 01234000 UCBRDYQ EQU UCBLDNCA 01235000 UCBIRLN EQU UCBRDYQ 01236000 UCBLDNCB EQU UCBRDYQ+1 01237000 UCBCTLNK EQU UCBOBS06+12 01238000 UCBOBS07 EQU UCBDEV 01239000 UCBOBS08 EQU UCBDEV 01240000 UCBCTCAD EQU UCBOBS08 01241000 UCBCTCF1 EQU UCBOBS08+4 01242000 UCBOBS09 EQU UCBDEV 01243000 LCBRSPIN EQU LCBIOBSN 01244000 LCBLUSNS EQU LCBRSPIN+5 01245000 LCBSCPRS EQU LCBRSPIN+9 01246000 LCBCSWU1 EQU LCBSCPRS+2 01247000 LCBRSPFG EQU LCBRSPIN+15 01248000 LCBCOREQ EQU LCBTPCD 01249000 LCBCQELE EQU LCBCOREQ 01250000 @NM00164 EQU LCBCPA+40 01251000 LCBQNX EQU LCBERCCW 01252000 LCBQNXMN EQU LCBQNX 01253000 LCBCANCL EQU LCBSAVSN 01254000 LCBCANFG EQU LCBCANCL 01255000 CVTS01 EQU CVTPGSIA 01256000 CVTLPDIA EQU CVTS01+12 01257000 CVTDIRST EQU CVTLPDIA 01258000 CVTSLIDA EQU CVTS01+24 01259000 CVTCTLFG EQU CVTS01+50 01260000 CVTRV210 EQU CVTS01+424 01261000 CVTRV219 EQU CVTS01+425 01262000 CVTRV228 EQU CVTS01+426 01263000 CVTRV237 EQU CVTS01+427 01264000 CVTMFRTR EQU CVTS01+452 01265000 CVTRV262 EQU CVTS01+468 01266000 CVTRV271 EQU CVTS01+469 01267000 CVTRV280 EQU CVTS01+470 01268000 CVTRV289 EQU CVTS01+471 01269000 CVTGSDA EQU CVTS01+600 01270000 DEBUCB EQU DEBUCBS 01271000 DEBDVMOD EQU DEBUCB 01272000 DEBUCBAD EQU DEBUCB+1 01273000 AMWKAREA EQU DEBSUBR 01274000 SAVEETI EQU AMWKAREA+4 01275000 SAVEATI EQU AMWKAREA+5 01276000 IHADCS1A EQU IHADCB+8 01277000 DCBIPLTX EQU IHADCS1A 01278000 DCBBCKUP EQU IHADCS1A+8 01279000 IHADCS2K EQU IHADCB+20 01280000 DCBDUMPD EQU IHADCS2K 01281000 DCBTRSTA EQU IHADCS2K+5 01282000 DCBDSORG EQU IHADCS2K+6 01283000 DCBDSRG2 EQU DCBDSORG+1 01284000 DCBIOBAD EQU IHADCS2K+8 01285000 DCBRNCKD EQU IHADCS2K+12 01286000 DCBEXLST EQU IHADCS2K+16 01287000 DCBEIOBX EQU DCBEXLST 01288000 IHADCS24 EQU IHADCB+40 01289000 DCBOFLGS EQU IHADCS24+8 01290000 DCBOFLWR EQU DCBOFLGS 01291000 DCBIFLG EQU IHADCS24+9 01292000 DCBIBPCT EQU DCBIFLG 01293000 DCBMACR EQU IHADCS24+10 01294000 DCBMACR1 EQU DCBMACR 01295000 DCBMRFE EQU DCBMACR1 01296000 DCBMRGET EQU DCBMRFE 01297000 DCBMRAPG EQU DCBMACR1 01298000 DCBMRRD EQU DCBMRAPG 01299000 DCBMRCI EQU DCBMACR1 01300000 DCBMRMVG EQU DCBMRCI 01301000 DCBMRLCG EQU DCBMACR1 01302000 DCBMRABC EQU DCBMACR1 01303000 DCBMRPT1 EQU DCBMRABC 01304000 DCBMRSBG EQU DCBMRPT1 01305000 DCBMRCRL EQU DCBMACR1 01306000 DCBMRCHK EQU DCBMRCRL 01307000 DCBMRRDX EQU DCBMRCHK 01308000 DCBMRDMG EQU DCBMACR1 01309000 DCBMACR2 EQU DCBMACR+1 01310000 DCBMRPUT EQU DCBMACR2 01311000 DCBMRWRT EQU DCBMACR2 01312000 DCBMRMVP EQU DCBMACR2 01313000 DCBMR5WD EQU DCBMACR2 01314000 DCBMRLDM EQU DCBMR5WD 01315000 DCBMRLCP EQU DCBMRLDM 01316000 DCBMR4WD EQU DCBMACR2 01317000 DCBMRPT2 EQU DCBMR4WD 01318000 DCBMRTMD EQU DCBMRPT2 01319000 DCBMR3WD EQU DCBMACR2 01320000 DCBMRCTL EQU DCBMR3WD 01321000 DCBMRSTK EQU DCBMRCTL 01322000 DCBMR1WD EQU DCBMACR2 01323000 DCBMRSWA EQU DCBMR1WD 01324000 DCBMRDMD EQU DCBMRSWA 01325000 IHADCS25 EQU IHADCB+40 01326000 DCBTIOT EQU IHADCS25 01327000 DCBMACRF EQU IHADCS25+2 01328000 DCBMACF1 EQU DCBMACRF 01329000 DCBMFFE EQU DCBMACF1 01330000 DCBMFGET EQU DCBMFFE 01331000 DCBMFAPG EQU DCBMACF1 01332000 DCBMFRD EQU DCBMFAPG 01333000 DCBMFCI EQU DCBMACF1 01334000 DCBMFMVG EQU DCBMFCI 01335000 DCBMFLCG EQU DCBMACF1 01336000 DCBMFABC EQU DCBMACF1 01337000 DCBMFPT1 EQU DCBMFABC 01338000 DCBMFSBG EQU DCBMFPT1 01339000 DCBMFCRL EQU DCBMACF1 01340000 DCBMFCHK EQU DCBMFCRL 01341000 DCBMFDMG EQU DCBMACF1 01342000 DCBMACF2 EQU DCBMACRF+1 01343000 DCBMFPUT EQU DCBMACF2 01344000 DCBMFWRT EQU DCBMACF2 01345000 DCBMFMVP EQU DCBMACF2 01346000 DCBMF5WD EQU DCBMACF2 01347000 DCBMFLDM EQU DCBMF5WD 01348000 DCBMFLCP EQU DCBMFLDM 01349000 DCBMF4WD EQU DCBMACF2 01350000 DCBMFPT2 EQU DCBMF4WD 01351000 DCBMFTMD EQU DCBMFPT2 01352000 DCBMF3WD EQU DCBMACF2 01353000 DCBMFCTL EQU DCBMF3WD 01354000 DCBMFSTK EQU DCBMFCTL 01355000 DCBMF1WD EQU DCBMACF2 01356000 DCBMFSWA EQU DCBMF1WD 01357000 DCBMFDMD EQU DCBMFSWA 01358000 DCBDEBAD EQU IHADCS25+4 01359000 DCBIFLGS EQU DCBDEBAD 01360000 DCBIFPCT EQU DCBIFLGS 01361000 IHADCS27 EQU IHADCB+48 01362000 DCBGET EQU IHADCS27 01363000 DCBPUT EQU DCBGET 01364000 DCBGETA EQU DCBPUT+1 01365000 IHADCS43 EQU IHADCB+48 01366000 DCBSCTAB EQU IHADCS43 01367000 DCBBUFSI EQU IHADCS43+6 01368000 TRMPRE1 EQU TRMBYTE4 01369000 TRMNCP1 EQU TRMBYTE4 01370000 TRMPRE EQU TRMBYTE3 01371000 TRMNCP EQU TRMBYTE3 01372000 TRMPU EQU TRMBYTE3 01373000 TRMLU EQU TRMBYTE3 01374000 TRMLINK EQU TRMBYTE3 01375000 IEDQQPTR EQU TRMDESTQ 01376000 IEDQNPTR EQU AVTRNMPT 01377000 TNTFIRST EQU IEDQTNTD+82 01378000 DMECB EQU AVTDMECB 01379000 QCBLDCB EQU IEDQQCB+120 01380000 TNTCODE EQU IEDQTCDE 01381000 TNTDCODE EQU IEDQTDCE 01382000 TRMOPT EQU IEDQTRM+20 01383000 * START UNREFERENCED COMPONENTS 01384000 @NM00195 EQU TRMLINK 01385000 TRMLSTAT EQU TRMLINK 01386000 TRMLINT EQU TRMLINK 01387000 TRMEPMOD EQU TRMLINK 01388000 TRMLULOG EQU TRMLU 01389000 TRMINERR EQU TRMLU 01390000 TRMLUREQ EQU TRMLU 01391000 TRMSESRQ EQU TRMLU 01392000 TRMTDIFF EQU TRMLU 01393000 TRMLUTM EQU TRMLU 01394000 TRMLUIT EQU TRMLU 01395000 TRMAUTO EQU TRMLU 01396000 TRMPCONT EQU TRMPU 01397000 @NM00194 EQU TRMPU 01398000 TRMNCONT EQU TRMNCP 01399000 TRMQUCKN EQU TRMNCP 01400000 TRMSLOWN EQU TRMNCP 01401000 TRMSYGEN EQU TRMNCP 01402000 TRMNCPCL EQU TRMNCP 01403000 TRMIPLDM EQU TRMNCP 01404000 TRMINOUT EQU TRMPRE 01405000 TRMRDOUT EQU TRMPRE 01406000 TRMNLOUT EQU TRMPRE 01407000 TRMWROUT EQU TRMPRE 01408000 TRMASNXI EQU TRMPRE 01409000 TRMSTMM EQU TRMPRE 01410000 TRMCMODE EQU TRMPRE 01411000 TRMSTPND EQU TRMPRE 01412000 @NM00193 EQU TRMNCP1 01413000 TRMINOP EQU TRMNCP1 01414000 TRMLYNCH EQU TRMPRE1 01415000 TRMSPOUT EQU TRMPRE1 01416000 TRMERLCK EQU TRMPRE1 01417000 TRMQNPL EQU TRMPRE1 01418000 TRMSPACT EQU TRMPRE1 01419000 TRMOCNI EQU TRMPRE1 01420000 TRMSESSN EQU TRMPRE1 01421000 TRMCONT EQU TRMPRE1 01422000 DCBUNTCT EQU IHADCS43+5 01423000 DCBILCT EQU IHADCS43+4 01424000 DCBSCTAD EQU DCBSCTAB+1 01425000 @NM00189 EQU DCBSCTAB 01426000 DCBPUTA EQU DCBGETA 01427000 @NM00188 EQU DCBPUT 01428000 DCBDEBA EQU DCBDEBAD+1 01429000 @NM00187 EQU DCBIFLGS 01430000 DCBIFIOE EQU DCBIFLGS 01431000 DCBCH12 EQU DCBIFPCT 01432000 DCBCH9 EQU DCBIFPCT 01433000 DCBIFEC EQU DCBIFLGS 01434000 DCBMFSTI EQU DCBMFDMD 01435000 DCBMFAWR EQU DCBMFSTK 01436000 DCBMFUIP EQU DCBMFTMD 01437000 DCBMFIDW EQU DCBMFLCP 01438000 DCBMFWRK EQU DCBMFMVP 01439000 DCBMFRDQ EQU DCBMFWRT 01440000 DCBMFGTQ EQU DCBMFPUT 01441000 DCBMFSTL EQU DCBMACF2 01442000 DCBMFCK EQU DCBMFDMG 01443000 DCBMFRDX EQU DCBMFCHK 01444000 DCBMFDBF EQU DCBMFSBG 01445000 DCBMFRDI EQU DCBMFLCG 01446000 DCBMFRDK EQU DCBMFMVG 01447000 DCBMFWRQ EQU DCBMFRD 01448000 DCBMFPTQ EQU DCBMFGET 01449000 DCBMFECP EQU DCBMACF1 01450000 DCBMRSTI EQU DCBMRDMD 01451000 DCBMRAWR EQU DCBMRSTK 01452000 DCBMRUIP EQU DCBMRTMD 01453000 DCBMRIDW EQU DCBMRLCP 01454000 DCBMRWRK EQU DCBMRMVP 01455000 DCBMRRDQ EQU DCBMRWRT 01456000 DCBMRGTQ EQU DCBMRPUT 01457000 DCBMRSTL EQU DCBMACR2 01458000 DCBMRCK EQU DCBMRDMG 01459000 DCBPGFXA EQU DCBMRRDX 01460000 DCBMRDBF EQU DCBMRSBG 01461000 DCBMRRDI EQU DCBMRLCG 01462000 DCBMRRDK EQU DCBMRMVG 01463000 DCBMRWRQ EQU DCBMRRD 01464000 DCBMRPTQ EQU DCBMRGET 01465000 DCBMRECP EQU DCBMACR1 01466000 @NM00186 EQU DCBIFLG 01467000 DCBIBIOE EQU DCBIFLG 01468000 DCBICH12 EQU DCBIBPCT 01469000 DCBICH9 EQU DCBIBPCT 01470000 DCBIBEC EQU DCBIFLG 01471000 DCBOFIOF EQU DCBOFLGS 01472000 DCBOFUEX EQU DCBOFLGS 01473000 DCBOFTM EQU DCBOFLGS 01474000 DCBOFPPC EQU DCBOFLGS 01475000 DCBOFOPN EQU DCBOFLGS 01476000 DCBOFEOV EQU DCBOFLGS 01477000 DCBOFLRB EQU DCBOFLGS 01478000 DCBOFIOD EQU DCBOFLWR 01479000 DCBDDNAM EQU IHADCS24 01480000 DCBEXLSA EQU DCBEXLST+1 01481000 DCBRNCKA EQU DCBRNCKD+1 01482000 @NM00185 EQU DCBRNCKD 01483000 DCBDSGTR EQU DCBDSRG2 01484000 @NM00184 EQU DCBDSRG2 01485000 DCBDSRG1 EQU DCBDSORG 01486000 DCBCHNGL EQU DCBTRSTA 01487000 DCBNIDLE EQU DCBTRSTA 01488000 DCBBAKUP EQU DCBTRSTA 01489000 DCBIPLED EQU DCBTRSTA 01490000 DCBRSTRT EQU DCBTRSTA 01491000 DCBINITL EQU DCBTRSTA 01492000 DCBAUTOD EQU DCBTRSTA 01493000 DCBAUTOI EQU DCBTRSTA 01494000 @NM00183 EQU IHADCS2K+4 01495000 DCBDUMPA EQU DCBDUMPD+1 01496000 DCBUNITN EQU DCBDUMPD 01497000 DCBBCKUA EQU DCBBCKUP+1 01498000 @NM00182 EQU DCBBCKUP 01499000 @NM00180 EQU AMWKAREA 01500000 CVTRV628 EQU CVTS01+728 01501000 CVTRV627 EQU CVTS01+724 01502000 CVTRV626 EQU CVTS01+720 01503000 CVTRV625 EQU CVTS01+716 01504000 CVTRV624 EQU CVTS01+712 01505000 CVTRV623 EQU CVTS01+708 01506000 CVTRV622 EQU CVTS01+704 01507000 CVTRV621 EQU CVTS01+700 01508000 CVTRV620 EQU CVTS01+696 01509000 CVTRV619 EQU CVTS01+692 01510000 CVTRV618 EQU CVTS01+688 01511000 CVTRV617 EQU CVTS01+684 01512000 CVTRV616 EQU CVTS01+680 01513000 CVTRV615 EQU CVTS01+676 01514000 CVTRV614 EQU CVTS01+672 01515000 CVTRV613 EQU CVTS01+668 01516000 CVTTCASP EQU CVTS01+664 01517000 CVT0PT03 EQU CVTS01+660 01518000 CVT0PT0E EQU CVTS01+656 01519000 CVTIRM EQU CVTS01+652 01520000 CVTCGK EQU CVTS01+648 01521000 CVTRV607 EQU CVTS01+644 01522000 CVTRV606 EQU CVTS01+640 01523000 CVTRV605 EQU CVTS01+636 01524000 CVTRV604 EQU CVTS01+632 01525000 CVTEFF02 EQU CVTS01+628 01526000 CVTCBBR EQU CVTS01+624 01527000 CVTSSCR EQU CVTS01+620 01528000 CVTEVENT EQU CVTS01+616 01529000 CVTCRCA EQU CVTS01+612 01530000 CVTTPIO EQU CVTS01+608 01531000 CVTADV EQU CVTS01+604 01532000 CVTGSDAB EQU CVTGSDA 01533000 CVTQV3 EQU CVTS01+596 01534000 CVTQV2 EQU CVTS01+592 01535000 CVTQV1 EQU CVTS01+588 01536000 CVTRPT EQU CVTS01+584 01537000 CVTSSRB EQU CVTS01+580 01538000 CVTCSDRL EQU CVTS01+576 01539000 CVTEXP1 EQU CVTS01+572 01540000 CVTRMPMT EQU CVTS01+568 01541000 CVTRMPTT EQU CVTS01+564 01542000 CVTVPSA EQU CVTS01+560 01543000 CVTVSTOP EQU CVTS01+556 01544000 CVTGTFR8 EQU CVTS01+552 01545000 CVTQUIT EQU CVTS01+548 01546000 CVTVACR EQU CVTS01+544 01547000 CVTWTCB EQU CVTS01+540 01548000 CVTSTPRS EQU CVTS01+536 01549000 CVT0PT02 EQU CVTS01+532 01550000 CVTDARCM EQU CVTS01+528 01551000 CVTIRECM EQU CVTS01+524 01552000 CVTJRECM EQU CVTS01+520 01553000 CVTVEMS0 EQU CVTS01+516 01554000 CVTSPFRR EQU CVTS01+512 01555000 CVTRLSTG EQU CVTS01+508 01556000 CVT0TC0A EQU CVTS01+504 01557000 CVTGMBR EQU CVTS01+500 01558000 CVTLFRM EQU CVTS01+496 01559000 CVTRMBR EQU CVTS01+492 01560000 CVTVIOP EQU CVTS01+488 01561000 CVTRV307 EQU CVTS01+486 01562000 CVTRV306 EQU CVTS01+484 01563000 CVTRV305 EQU CVTS01+482 01564000 CVTRV304 EQU CVTS01+480 01565000 CVTRV303 EQU CVTS01+478 01566000 CVTRV302 EQU CVTS01+476 01567000 CVTTRCA EQU CVTS01+472 01568000 CVTRV297 EQU CVTRV289 01569000 CVTRV296 EQU CVTRV289 01570000 CVTRV295 EQU CVTRV289 01571000 CVTRV294 EQU CVTRV289 01572000 CVTRV293 EQU CVTRV289 01573000 CVTRV292 EQU CVTRV289 01574000 CVTRV291 EQU CVTRV289 01575000 CVTRV290 EQU CVTRV289 01576000 CVTRV288 EQU CVTRV280 01577000 CVTRV287 EQU CVTRV280 01578000 CVTRV286 EQU CVTRV280 01579000 CVTRV285 EQU CVTRV280 01580000 CVTRV284 EQU CVTRV280 01581000 CVTRV283 EQU CVTRV280 01582000 CVTRV282 EQU CVTRV280 01583000 CVTRV281 EQU CVTRV280 01584000 CVTRV279 EQU CVTRV271 01585000 CVTRV278 EQU CVTRV271 01586000 CVTRV277 EQU CVTRV271 01587000 CVTRV276 EQU CVTRV271 01588000 CVTRV275 EQU CVTRV271 01589000 CVTRV274 EQU CVTRV271 01590000 CVTRV273 EQU CVTRV271 01591000 CVTRV272 EQU CVTRV271 01592000 CVTRV270 EQU CVTRV262 01593000 CVTRV269 EQU CVTRV262 01594000 CVTRV268 EQU CVTRV262 01595000 CVTRV267 EQU CVTRV262 01596000 CVTRV266 EQU CVTRV262 01597000 CVTRV265 EQU CVTRV262 01598000 CVTRV264 EQU CVTRV262 01599000 CVTRV263 EQU CVTRV262 01600000 CVTVFP EQU CVTS01+464 01601000 CVTVSI EQU CVTS01+460 01602000 CVTVPSIB EQU CVTS01+456 01603000 CVTMFACT EQU CVTMFRTR 01604000 CVTMFCTL EQU CVTS01+448 01605000 CVTPVBP EQU CVTS01+444 01606000 CVTPWI EQU CVTS01+440 01607000 CVTRV254 EQU CVTS01+438 01608000 CVTRV253 EQU CVTS01+436 01609000 CVTRV252 EQU CVTS01+434 01610000 CVTRV251 EQU CVTS01+433 01611000 CVTRV250 EQU CVTS01+432 01612000 CVTRV249 EQU CVTS01+431 01613000 CVTRV248 EQU CVTS01+430 01614000 CVTRV247 EQU CVTS01+429 01615000 CVTRV246 EQU CVTS01+428 01616000 CVTRV245 EQU CVTRV237 01617000 CVTRV244 EQU CVTRV237 01618000 CVTRV243 EQU CVTRV237 01619000 CVTRV242 EQU CVTRV237 01620000 CVTRV241 EQU CVTRV237 01621000 CVTRV240 EQU CVTRV237 01622000 CVTRV239 EQU CVTRV237 01623000 CVTRV238 EQU CVTRV237 01624000 CVTRV236 EQU CVTRV228 01625000 CVTRV235 EQU CVTRV228 01626000 CVTRV234 EQU CVTRV228 01627000 CVTRV233 EQU CVTRV228 01628000 CVTRV232 EQU CVTRV228 01629000 CVTRV231 EQU CVTRV228 01630000 CVTRV230 EQU CVTRV228 01631000 CVTRV229 EQU CVTRV228 01632000 CVTRV227 EQU CVTRV219 01633000 CVTRV226 EQU CVTRV219 01634000 CVTRV225 EQU CVTRV219 01635000 CVTRV224 EQU CVTRV219 01636000 CVTRV223 EQU CVTRV219 01637000 CVTRV222 EQU CVTRV219 01638000 CVTRV221 EQU CVTRV219 01639000 CVTRV220 EQU CVTRV219 01640000 CVTRV218 EQU CVTRV210 01641000 CVTRV217 EQU CVTRV210 01642000 CVTRV216 EQU CVTRV210 01643000 CVTRV215 EQU CVTRV210 01644000 CVTRV214 EQU CVTRV210 01645000 CVTRV213 EQU CVTRV210 01646000 CVTRV212 EQU CVTRV210 01647000 CVTRV211 EQU CVTRV210 01648000 CVTLCCAT EQU CVTS01+420 01649000 CVTPCCAT EQU CVTS01+416 01650000 CVTIPCRP EQU CVTS01+412 01651000 CVTIPCRI EQU CVTS01+408 01652000 CVTIPCDS EQU CVTS01+404 01653000 CVTAIDVT EQU CVTS01+400 01654000 CVTSSAP EQU CVTS01+396 01655000 CVTEHCIR EQU CVTS01+392 01656000 CVTEHDEF EQU CVTS01+388 01657000 CVTDAIR EQU CVTS01+384 01658000 CVTPERFM EQU CVTS01+380 01659000 CVT044R2 EQU CVTS01+376 01660000 CVTFETCH EQU CVTS01+372 01661000 CVTRSTWD EQU CVTS01+368 01662000 CVTSPOST EQU CVTS01+364 01663000 CVTIOBP EQU CVTS01+360 01664000 CVTASMVT EQU CVTS01+356 01665000 CVTRECRQ EQU CVTS01+352 01666000 CVTWSAC EQU CVTS01+348 01667000 CVTRV149 EQU CVTS01+344 01668000 CVTWSAL EQU CVTS01+340 01669000 CVTSPSA EQU CVTS01+336 01670000 CVTGLMN EQU CVTS01+332 01671000 CVTVEAC0 EQU CVTS01+328 01672000 CVT062R1 EQU CVTS01+324 01673000 CVTRPOST EQU CVTS01+320 01674000 CVTDQIQE EQU CVTS01+316 01675000 CVTCSD EQU CVTS01+312 01676000 CVTLKRMA EQU CVTS01+308 01677000 CVTRSPIE EQU CVTS01+304 01678000 CVTRENQ EQU CVTS01+300 01679000 CVTLQCB EQU CVTS01+296 01680000 CVTFQCB EQU CVTS01+292 01681000 CVTQCS01 EQU CVTS01+288 01682000 CVTAPFT EQU CVTS01+284 01683000 CVTPARRL EQU CVTS01+280 01684000 CVTVWAIT EQU CVTS01+276 01685000 CVTGSPL EQU CVTS01+272 01686000 CVTLSMQ EQU CVTS01+268 01687000 CVTGSMQ EQU CVTS01+264 01688000 CVTEXPRO EQU CVTS01+260 01689000 CVTOPCTP EQU CVTS01+256 01690000 CVTSIC EQU CVTS01+252 01691000 CVTTPIOS EQU CVTS01+248 01692000 CVTRTMS EQU CVTS01+244 01693000 CVTSDBF EQU CVTS01+240 01694000 CVTSCBP EQU CVTS01+236 01695000 CVTSDMP EQU CVTS01+232 01696000 CVTSV60 EQU CVTS01+228 01697000 CVTRTMCT EQU CVTS01+224 01698000 CVTASCBL EQU CVTS01+220 01699000 CVTASCBH EQU CVTS01+216 01700000 CVTGDA EQU CVTS01+212 01701000 CVTASVT EQU CVTS01+208 01702000 CVTVVMDI EQU CVTS01+204 01703000 CVTAQTOP EQU CVTS01+200 01704000 CVTIOSCS EQU CVTS01+196 01705000 CVTSDRM EQU CVTS01+192 01706000 CVTOPTE EQU CVTS01+188 01707000 CVTSTXU EQU CVTS01+184 01708000 CVTQUIS EQU CVTS01+180 01709000 CVTPARS EQU CVTS01+176 01710000 CVTS1EE EQU CVTS01+172 01711000 CVTFRAS EQU CVTS01+168 01712000 CVTQSAS EQU CVTS01+164 01713000 CVTCRAS EQU CVTS01+160 01714000 CVTCRMN EQU CVTS01+156 01715000 CVTDELCP EQU CVTS01+152 01716000 CVTFRECL EQU CVTS01+148 01717000 CVTGETCL EQU CVTS01+144 01718000 CVTBLDCP EQU CVTS01+140 01719000 CVTAUTHL EQU CVTS01+136 01720000 CVTSCAN EQU CVTS01+132 01721000 CVTRV144 EQU CVTS01+130 01722000 CVTMAXMP EQU CVTS01+128 01723000 CVTSTCK EQU CVTS01+124 01724000 CVTRV139 EQU CVTS01+123 01725000 CVTDSSAC EQU CVTS01+122 01726000 CVTRV513 EQU CVTS01+121 01727000 CVTIOSPL EQU CVTS01+120 01728000 CVTPTGT EQU CVTS01+116 01729000 CVTCSPIE EQU CVTS01+112 01730000 CVTSMFEX EQU CVTS01+108 01731000 CVTOLT0A EQU CVTS01+104 01732000 CVTSRBRT EQU CVTS01+100 01733000 CVTPUTL EQU CVTS01+96 01734000 CVTASCRL EQU CVTS01+92 01735000 CVTASCRF EQU CVTS01+88 01736000 CVTRV326 EQU CVTS01+84 01737000 CVTRV325 EQU CVTS01+80 01738000 CVTRV324 EQU CVTS01+76 01739000 CVT0VL01 EQU CVTS01+72 01740000 CVTSHRVM EQU CVTS01+68 01741000 CVTRV332 EQU CVTS01+64 01742000 CVTTAS EQU CVTS01+60 01743000 CVTRSCN EQU CVTS01+56 01744000 CVTTRAC2 EQU CVTS01+54 01745000 CVTTRACE EQU CVTS01+52 01746000 CVTAPG EQU CVTS01+51 01747000 CVTSDTRC EQU CVTCTLFG 01748000 CVTGTRCE EQU CVTCTLFG 01749000 CVTNOMP EQU CVTCTLFG 01750000 CVTRSV79 EQU CVTCTLFG 01751000 CVTDSTAT EQU CVTCTLFG 01752000 CVTRSV78 EQU CVTCTLFG 01753000 CVTRV333 EQU CVTCTLFG 01754000 CVTRV323 EQU CVTCTLFG 01755000 CVTSPVLK EQU CVTS01+49 01756000 CVTRSV77 EQU CVTS01+48 01757000 CVTRV331 EQU CVTS01+44 01758000 CVTRV330 EQU CVTS01+40 01759000 CVTRV329 EQU CVTS01+36 01760000 CVTRV328 EQU CVTS01+32 01761000 CVTRV322 EQU CVTS01+28 01762000 CVTSLID EQU CVTSLIDA+1 01763000 CVTSYLK EQU CVTSLIDA 01764000 CVTRV321 EQU CVTS01+20 01765000 CVTRV320 EQU CVTS01+16 01766000 CVTLPDIR EQU CVTLPDIA+1 01767000 CVTRSV69 EQU CVTDIRST 01768000 CVTRSV68 EQU CVTDIRST 01769000 CVTRSV67 EQU CVTDIRST 01770000 CVTRSV66 EQU CVTDIRST 01771000 CVTRSV65 EQU CVTDIRST 01772000 CVTRSV64 EQU CVTDIRST 01773000 CVTRSV63 EQU CVTDIRST 01774000 CVTDICOM EQU CVTDIRST 01775000 CVTPVTP EQU CVTS01+8 01776000 CVTLPDSR EQU CVTS01+4 01777000 CVTGETL EQU CVTS01 01778000 @NM00171 EQU LCBCANCL+3 01779000 LCBCANTH EQU LCBCANCL+1 01780000 @NM00170 EQU LCBCANFG 01781000 LCBCANCD EQU LCBCANFG 01782000 @NM00169 EQU LCBCANFG 01783000 LCBCANEB EQU LCBCANFG 01784000 LCBCANXT EQU LCBCANFG 01785000 LCBUNADD EQU LCBQNX+21 01786000 LCBUASZE EQU LCBQNX+20 01787000 LCBDSTEA EQU LCBQNX+16 01788000 @NM00168 EQU LCBQNX+4 01789000 LCBSTSAV EQU LCBQNX+1 01790000 @NM00167 EQU LCBQNXMN 01791000 LCBNX509 EQU LCBQNXMN 01792000 LCBNX162 EQU LCBQNXMN 01793000 LCBNX142 EQU LCBQNXMN 01794000 LCBNX064 EQU LCBQNXMN 01795000 @NM00166 EQU @NM00164+4 01796000 LCBNCPPT EQU @NM00164+1 01797000 @NM00165 EQU @NM00164 01798000 LCBWRSCH EQU LCBCOREQ+8 01799000 LCBCQLNK EQU LCBCOREQ+4 01800000 LCBPAKCH EQU LCBRSPIN+16 01801000 @NM00163 EQU LCBRSPFG 01802000 LCBRSRH EQU LCBRSPFG 01803000 LCBEXPI EQU LCBRSPFG 01804000 @NM00162 EQU LCBRSPIN+12 01805000 LCBUSUE1 EQU LCBCSWU1 01806000 @NM00161 EQU LCBCSWU1 01807000 @NM00160 EQU LCBSCPRS+1 01808000 LCBDFCMD EQU LCBSCPRS 01809000 LCBUSER EQU LCBLUSNS+2 01810000 LCBSMIN EQU LCBLUSNS+1 01811000 LCBSMAJ EQU LCBLUSNS 01812000 LCBRHSV EQU LCBRSPIN+2 01813000 LCBSNS0 EQU LCBRSPIN+1 01814000 @NM00159 EQU LCBRSPIN 01815000 UCBRV066 EQU UCBOBS09+4 01816000 UCBIOSBA EQU UCBOBS09 01817000 UCBRV042 EQU UCBOBS08+5 01818000 UCBRV082 EQU UCBCTCF1 01819000 UCBRV081 EQU UCBCTCF1 01820000 UCBRV080 EQU UCBCTCF1 01821000 UCBRV079 EQU UCBCTCF1 01822000 UCBRV078 EQU UCBCTCF1 01823000 UCBRV077 EQU UCBCTCF1 01824000 UCBRV076 EQU UCBCTCF1 01825000 UCBCTC80 EQU UCBCTCF1 01826000 UCBCTCAL EQU UCBCTCAD 01827000 UCBICNCB EQU UCBOBS07+4 01828000 UCBRV040 EQU UCBOBS07 01829000 UCBCTLNA EQU UCBCTLNK+1 01830000 UCBRLN EQU UCBCTLNK 01831000 UCBRDYQA EQU UCBLDNCB 01832000 UCBINRLN EQU UCBIRLN 01833000 UCBIRBA EQU UCBIRB+1 01834000 UCBRV039 EQU UCBGRAF 01835000 UCBDWNR EQU UCBGRAF 01836000 UCBRPND EQU UCBGRAF 01837000 UCBUPM EQU UCBGRAF 01838000 UCBBTAM EQU UCBGRAF 01839000 UCBDRNO EQU UCBGRAF 01840000 UCBDRO EQU UCBGRAF 01841000 UCBOIP EQU UCBGRAF 01842000 UCBATRCD EQU @NM00029 01843000 UCBSKPFG EQU @NM00029 01844000 UCBRIPND EQU @NM00029 01845000 UCBRTIAC EQU @NM00029 01846000 UCBRSV79 EQU @NM00029 01847000 UCBRSV78 EQU @NM00029 01848000 UCBRSV77 EQU @NM00029 01849000 UCBOLTEP EQU @NM00029 01850000 UCBATNCT EQU UCBOBS06+2 01851000 UCBRSV76 EQU UCBAOF2 01852000 UCBRSV75 EQU UCBAOF2 01853000 UCBRSV74 EQU UCBAOF2 01854000 UCBRSV73 EQU UCBAOF2 01855000 UCBRSV72 EQU UCBAOF2 01856000 UCBRSV71 EQU UCBAOF2 01857000 UCBRSV70 EQU UCBAOF2 01858000 UCBRSV69 EQU UCBAOF2 01859000 UCBRSV68 EQU UCBAOF1 01860000 UCBRSV67 EQU UCBAOF1 01861000 UCBRSV66 EQU UCBAOF1 01862000 UCBRSV65 EQU UCBAOF1 01863000 UCBRSV64 EQU UCBAOF1 01864000 UCBOFNL EQU UCBAOF1 01865000 UCBOFSP EQU UCBAOF1 01866000 UCBOFMCR EQU UCBAOF1 01867000 UCBBTB EQU UCBBTA+1 01868000 UCBDI EQU UCBBTA 01869000 UCBSNS EQU UCBOBS04+8 01870000 UCBTEB EQU UCBOBS04+4 01871000 UCBGCB EQU UCBOBS04+3 01872000 UCBOPEN EQU UCBOBS04+2 01873000 UCBSTART EQU UCBOBS04 01874000 UCBXTNB EQU UCBXTN+1 01875000 UCBRSV22 EQU UCBVOPT 01876000 UCBRSV21 EQU UCBVOPT 01877000 UCBRSV20 EQU UCBVOPT 01878000 UCBESVE EQU UCBVOPT 01879000 UCBERPC EQU UCBVOPT 01880000 UCBESVC EQU UCBVOPT 01881000 UCBEVA EQU UCBVOPT 01882000 UCBESV EQU UCBVOPT 01883000 UCBRV009 EQU UCBTFL1 01884000 UCBRV008 EQU UCBTFL1 01885000 UCBRV007 EQU UCBTFL1 01886000 UCBRV006 EQU UCBTFL1 01887000 UCBRV005 EQU UCBTFL1 01888000 UCBRV038 EQU UCBTFL1 01889000 UCBNSLTP EQU UCBTFL1 01890000 UCBNLTP EQU UCBTFL1 01891000 UCBRES1B EQU UCBOBS02+18 01892000 UCBFSER EQU UCBOBS02+12 01893000 @NM00028 EQU UCBOBS02+4 01894000 UCBFSEQ EQU UCBOBS02+2 01895000 UCBFSCT EQU UCBOBS02 01896000 UCBNEXP EQU UCBOBS01+20 01897000 UCBBASE EQU UCBOBS01+16 01898000 UCBRES1A EQU UCBOBS01+15 01899000 UCBUSER EQU UCBOBS01+14 01900000 UCBFL47 EQU UCBFL4 01901000 UCBFL46 EQU UCBFL4 01902000 UCBFL45 EQU UCBFL4 01903000 UCBRV065 EQU UCBFL4 01904000 UCBDSS EQU UCBFL4 01905000 UCBRV028 EQU UCBFL4 01906000 UCBWDAV EQU UCBFL4 01907000 UCBDAVV EQU UCBFL4 01908000 UCBSQC EQU UCBOBS01+12 01909000 UCBDATP EQU UCBOBS01+12 01910000 UCBDMC EQU UCBDMCT 01911000 UCBMOUNT EQU UCBDMCT 01912000 UCBBNUL EQU UCBSTAB 01913000 UCBSHAR EQU UCBSTAB 01914000 UCBBSTR EQU UCBSTAB 01915000 UCBBPUB EQU UCBSTAB 01916000 UCBBPRV EQU UCBSTAB 01917000 UCBBALB EQU UCBPRSRS 01918000 UCBPGFL EQU UCBSTAB 01919000 UCBDVSHR EQU UCBBSVL 01920000 UCBVOLI EQU UCBOBS01+4 01921000 UCBVTOC EQU UCBOBS01 01922000 IOSPCIWA EQU IOSPCISC+44 01923000 IOSPCIRS EQU IOSPCISC+8 01924000 @NM00022 EQU IOSPCISC+4 01925000 @NM00021 EQU IOSPCISC 01926000 IOSWRNDR EQU IOSWTOWA+4 01927000 IOSWTOPT EQU IOSWTOWA+3 01928000 IOSWTOCP EQU IOSWTOWA+2 01929000 IOSWTOCH EQU IOSWTOWA 01930000 IOSATTWA EQU IOSATTSC+40 01931000 @NM00020 EQU IOSATTSC+24 01932000 IOSATTSN EQU IOSATTSC 01933000 @NM00210 EQU QEBENTRY 01934000 @NM00209 EQU WTGTABLE 01935000 @NM00208 EQU EIGHT 01936000 BYTEFOUR EQU FOUR 01937000 @NM00207 EQU ZERO1+3 01938000 @NM00206 EQU ZERO1+1 01939000 BYTE0 EQU TIOELNOH 01940000 @NM00205 EQU TCB+12 01941000 @NM00204 EQU TCB 01942000 TNTTRMAD EQU IEDTNTA 01943000 TNTMIDEN EQU IEDQTNTD+41 01944000 TNTSRCHX EQU IEDQTNTD+38 01945000 NCPLTRAC EQU IEDNCP+26 01946000 NCPCKPT EQU IEDNCP+22 01947000 NCPDPDCB EQU IEDNCP+18 01948000 NCPBKUPN EQU IEDNCP+2 01949000 @NM00203 EQU NCPFLAG1 01950000 NCPTRACE EQU NCPFLAG1 01951000 NCPBKUP EQU NCPFLAG1 01952000 NCPIPLD EQU NCPFLAG1 01953000 NCPBGUP EQU NCPFLAG1 01954000 NCPDAUTO EQU NCPFLAG1 01955000 NCPIAUTO EQU NCPFLAG1 01956000 NCPLEN EQU IEDNCP 01957000 QCBTTCIN EQU QCBPLCBA+1 01958000 @NM00202 EQU QCBPLCBA 01959000 @NM00201 EQU QCBSTAT1 01960000 QCBFLUSH EQU QCBSTAT1 01961000 QCBNDXRQ EQU QCBSTAT1 01962000 QCBESIG EQU QCBSTAT1 01963000 QCBRCVRQ EQU QCBSTAT1 01964000 QCBSNDRQ EQU QCBSTAT1 01965000 QCBWAITC EQU QCBSTAT1 01966000 QCBPLCBN EQU QCBSTAT1 01967000 QCBCHAIN EQU IEDNQCB 01968000 QCBPQBCK EQU IEDQPQCB+25 01969000 QCBPRIPQ EQU IEDQPQCB+24 01970000 QCBCFHDR EQU IEDQPQCB+21 01971000 QCBLFEFO EQU IEDQPQCB+18 01972000 QCBFFEFO EQU IEDQPQCB+15 01973000 QCBPREVF EQU QCBINTLF 01974000 QCBINTFF EQU IEDQPQCB+9 01975000 QCBDATSQ EQU QCBFHDTZ+1 01976000 @NM00200 EQU QCBFHDTZ 01977000 @NM00199 EQU QCBPFEFO 01978000 QCBDATFL EQU QCBFHDLZ 01979000 QCBDNHDR EQU IEDQPQCB 01980000 QCBQBACK EQU IEDQQCB+37 01981000 QCBCKPT EQU QCBFLAG 01982000 QCBPROC EQU QCBFLAG 01983000 QCBSDFFO EQU QCBFLAG 01984000 QCBTERMQ EQU QCBFLAG 01985000 QCBRSRV EQU QCBFLAG 01986000 QCBREAD EQU QCBFLAG 01987000 QCBNOBRK EQU QCBFLAG 01988000 QCBTSSES EQU QCBFLAG 01989000 QCBLGBAD EQU QCBDCBAD 01990000 QCBRELLN EQU IEDQQCB+32 01991000 QCBTJID EQU QCBLKRRN+1 01992000 QCBCARCT EQU QCBLKRRN 01993000 QCBPRLVL EQU QCBPREN 01994000 QCBMSGCT EQU IEDQQCB+26 01995000 QCBEXTO EQU QCBINTVL 01996000 QCBDISC EQU QCBTSOF1 01997000 QCBDELAY EQU QCBTSOF1 01998000 QCBPARTO EQU QCBTSOF1 01999000 QCBSATRD EQU QCBTSOF1 02000000 QCBNOBUF EQU QCBTSOF1 02001000 QCBTPUT EQU QCBTSOF1 02002000 QCBTGET EQU QCBTSOF1 02003000 QCBWRBRK EQU QCBTSOF1 02004000 QCBSATLC EQU QCBTSOF2 02005000 QCBSATTI EQU QCBTSOF2 02006000 QCBSATCH EQU QCBTSOF2 02007000 QCBSIMRD EQU QCBTSOF2 02008000 QCBDSSMI EQU QCBTSOF2 02009000 QCBPOSTO EQU QCBTSOF2 02010000 QCBBUFQ EQU QCBTSOF2 02011000 QCBINHBN EQU QCBTSOF2 02012000 QCBSATCT EQU @NM00198 02013000 QCBSCBOF EQU IEDQQCB+20 02014000 QCBTIME EQU QCBSTAT 02015000 QCBCLOCK EQU QCBSTAT 02016000 QCBSCHDL EQU QCBSTAT 02017000 QCBSMODE EQU QCBSTAT 02018000 QCBSEND EQU QCBSTAT 02019000 QCBBUFRD EQU QCBSTAT 02020000 QCBTRMHO EQU QCBSTAT 02021000 QCBEOM EQU QCBSTAT 02022000 QCBHUCT EQU QCBRETCT 02023000 QCBIEND EQU QCBRETCT 02024000 QCBEND EQU QCBRETCT 02025000 QCBNL EQU QCBRETCT 02026000 QCBLOGCT EQU QCBRETCT 02027000 @NM00197 EQU QCBBYTE1 02028000 QCBRITRM EQU QCBBYTE1 02029000 @NM00196 EQU QCBEOLDT 02030000 QCBSLINK EQU IEDQQCB+13 02031000 QCBSTPRI EQU IEDQQCB+12 02032000 QCBSTCHN EQU IEDQQCB+9 02033000 QCBSTVTO EQU IEDQQCB+8 02034000 QCBLINK EQU IEDQQCB+5 02035000 QCBPRI EQU IEDQQCB+4 02036000 QCBELCHN EQU IEDQQCB+1 02037000 QCBHELD EQU QCBDSFLG 02038000 QCBFQCB EQU QCBDSFLG 02039000 QCBDRQQ EQU QCBDSFLG 02040000 QCBALTMH EQU QCBDSFLG 02041000 QCBREUS EQU QCBDISK 02042000 QCBNREUS EQU QCBDISK 02043000 QCBCORE EQU QCBDSFLG 02044000 QCBTSQ EQU QCBDSFLG 02045000 TRMSUBST EQU IEDNTRM+12 02046000 TRMCOHTG EQU TRMSIBPT+1 02047000 TRMGPCNT EQU TRMSIBPT 02048000 TRMBUFRD EQU TRMBYTE0 02049000 TRMSNA EQU TRMBYTE0 02050000 TRMGP EQU TRMBYTE0 02051000 TRMDIAL EQU TRMBYTE0 02052000 @NM00192 EQU TRMBYTE0 02053000 TRMOUTPT EQU TRMBYTE0 02054000 TRMINPUT EQU TRMBYTE0 02055000 TRMUDEF EQU TRMBYTE0 02056000 TRMCOHRT EQU IEDNTRM+4 02057000 TRMSTOTE EQU TRMBYTE1 02058000 TRMCKPRN EQU TRMBYTE1 02059000 TRMTSATN EQU TRMBYTE1 02060000 TRMTRACE EQU TRMBYTE1 02061000 TRMSWBCK EQU TRMBYTE1 02062000 TRMAUTOC EQU TRMBYTE1 02063000 TRMINPTP EQU TRMBYTE1 02064000 TRMWTNEG EQU TRMSCPRQ 02065000 TRMWRBRK EQU TRMBYTE2 02066000 TRMNOSND EQU TRMBYTE2 02067000 TRMPREP EQU TRMBYTE2 02068000 TRMGPACT EQU TRMBYTE2 02069000 TRMANDL EQU TRMBYTE2 02070000 TRMCLOSN EQU TRMINPG 02071000 TRMREMB EQU TRMBYTE2 02072000 TRMRSACT EQU TRMBYTE2 02073000 TRMOPTBL EQU IEDQTRM+18 02074000 TRMOPNO EQU IEDQTRM+17 02075000 TRMCHCIN EQU IEDQTRM+16 02076000 TRMSENSE EQU TRMSTAT+3 02077000 TRMTEMPR EQU TRMSTAT+2 02078000 TRMSIO EQU TRMSTAT 02079000 @NM00191 EQU TRMDEVFL+1 02080000 TRMTPIN EQU TRMDEVFL+1 02081000 TRMNCPI EQU TRMDEVFL+1 02082000 TRMRNTRM EQU TRMDEVFL+1 02083000 @NM00190 EQU TRMDEVFL+1 02084000 TRMLMD EQU TRMDEVFL+1 02085000 TRMCONC EQU TRMDEVFL+1 02086000 TRMTSOB EQU TRMDEVFL 02087000 TRMBFDY EQU TRMDEVFL 02088000 TRMTBLK EQU TRMDEVFL 02089000 TRMSBLK EQU TRMDEVFL 02090000 TRMBLKS EQU TRMDEVFL 02091000 TRMADDC EQU TRMDEVFL 02092000 TRMDDIG EQU TRMDEVFL 02093000 TRMBUFS EQU TRMDEVFL 02094000 TRMPRILK EQU TRMALTD 02095000 TRMLGB EQU TRMDSORG 02096000 TRMUTERM EQU TLISTCNT 02097000 TRMSCNYN EQU TRMSTATE 02098000 TRMOPTFN EQU TRMSTATE 02099000 TRMHELDN EQU TRMSTATE 02100000 TRMACPTN EQU TRMSTATE 02101000 TRMPROC EQU TRMLOG 02102000 TRMLIST EQU TRMLOG 02103000 TRMLINE EQU TRMSTATE 02104000 @NM00181 EQU IHADCB 02105000 DEBECBAD EQU IEDQDEB+57 02106000 DEBPRIOR EQU IEDQDEB+56 02107000 DEBUSRPG EQU IEDQDEB+53 02108000 DEBSYSPG EQU IEDQDEB+49 02109000 DEBOPATB EQU IEDQDEB+48 02110000 DEBIRBAD EQU IEDQDEB+45 02111000 DEBOFLGS EQU IEDQDEB+44 02112000 @NM00179 EQU DEBPRF+33 02113000 DEBDCBMK EQU DEBPRF+28 02114000 DEBDSCBA EQU DEBPRF+21 02115000 DEBWKARA EQU DEBPRF+20 02116000 DEBXCEA EQU DEBAPVT+16 02117000 DEBCEA EQU DEBAPVT+12 02118000 DEBPCIA EQU DEBAPVT+8 02119000 DEBSIOA EQU DEBAPVT+4 02120000 DEBEOEA EQU DEBAPVT 02121000 CVTLEVL EQU CVTRELNO+2 02122000 CVTNUMB EQU CVTRELNO 02123000 CVTMDL EQU CVTFIX+250 02124000 @NM00178 EQU CVTFIX+248 02125000 @NM00177 EQU CVTFIX 02126000 CVTRV482 EQU CVTXTNT2+128 02127000 CVTRV481 EQU CVTXTNT2+124 02128000 CVTRV480 EQU CVTXTNT2+120 02129000 CVTRV479 EQU CVTXTNT2+118 02130000 CVTRV478 EQU CVTXTNT2+117 02131000 CVTRV477 EQU CVTXTNT2+116 02132000 CVTRV476 EQU CVTXTNT2+115 02133000 CVTRV475 EQU CVTXTNT2+114 02134000 CVTRV474 EQU CVTRV466 02135000 CVTRV473 EQU CVTRV466 02136000 CVTRV472 EQU CVTRV466 02137000 CVTRV471 EQU CVTRV466 02138000 CVTRV470 EQU CVTRV466 02139000 CVTRV469 EQU CVTRV466 02140000 CVTRV468 EQU CVTRV466 02141000 CVTRV467 EQU CVTRV466 02142000 CVTRV465 EQU CVTRV457 02143000 CVTRV464 EQU CVTRV457 02144000 CVTRV463 EQU CVTRV457 02145000 CVTRV462 EQU CVTRV457 02146000 CVTRV461 EQU CVTRV457 02147000 CVTRV460 EQU CVTRV457 02148000 CVTRV459 EQU CVTRV457 02149000 CVTRV458 EQU CVTRV457 02150000 CVTRV456 EQU CVTXTNT2+108 02151000 CVTRV455 EQU CVTXTNT2+104 02152000 CVTRV454 EQU CVTXTNT2+100 02153000 CVTRV453 EQU CVTXTNT2+96 02154000 CVTRV452 EQU CVTXTNT2+94 02155000 CVTRV451 EQU CVTXTNT2+92 02156000 CVTRV450 EQU CVTXTNT2+90 02157000 CVTRV449 EQU CVTXTNT2+88 02158000 CVTRV448 EQU CVTXTNT2+87 02159000 CVTRV447 EQU CVTXTNT2+86 02160000 CVTRV446 EQU CVTRV438 02161000 CVTRV445 EQU CVTRV438 02162000 CVTRV444 EQU CVTRV438 02163000 CVTRV443 EQU CVTRV438 02164000 CVTRV442 EQU CVTRV438 02165000 CVTRV441 EQU CVTRV438 02166000 CVTRV440 EQU CVTRV438 02167000 CVTRV439 EQU CVTRV438 02168000 CVTRV437 EQU CVTRV429 02169000 CVTRV436 EQU CVTRV429 02170000 CVTRV435 EQU CVTRV429 02171000 CVTRV434 EQU CVTRV429 02172000 CVTRV433 EQU CVTRV429 02173000 CVTRV432 EQU CVTRV429 02174000 CVTRV431 EQU CVTRV429 02175000 CVTRV430 EQU CVTRV429 02176000 CVTRV428 EQU CVTXTNT2+80 02177000 CVTRV427 EQU CVTXTNT2+76 02178000 CVTRV426 EQU CVTXTNT2+72 02179000 CVTRV425 EQU CVTXTNT2+68 02180000 CVTATACT EQU CVTATCVT 02181000 CVTRV423 EQU CVTXTNT2+62 02182000 CVTRV422 EQU CVTXTNT2+60 02183000 CVTRV421 EQU CVTXTNT2+58 02184000 CVTRV420 EQU CVTXTNT2+56 02185000 CVTRV419 EQU CVTXTNT2+55 02186000 CVTRV418 EQU CVTXTNT2+54 02187000 CVTRV417 EQU CVTRV409 02188000 CVTRV416 EQU CVTRV409 02189000 CVTRV415 EQU CVTRV409 02190000 CVTRV414 EQU CVTRV409 02191000 CVTRV413 EQU CVTRV409 02192000 CVTRV412 EQU CVTRV409 02193000 CVTRV411 EQU CVTRV409 02194000 CVTRV410 EQU CVTRV409 02195000 CVTRV408 EQU CVTRV400 02196000 CVTRV407 EQU CVTRV400 02197000 CVTRV406 EQU CVTRV400 02198000 CVTRV405 EQU CVTRV400 02199000 CVTRV404 EQU CVTRV400 02200000 CVTRV403 EQU CVTRV400 02201000 CVTRV402 EQU CVTRV400 02202000 CVTRV401 EQU CVTRV400 02203000 CVTICB EQU CVTXTNT2+48 02204000 CVTSKTA EQU CVTXTNT2+44 02205000 CVTSHSB EQU CVTSHS 02206000 CVTRSV98 EQU CVTXTNT2+36 02207000 CVTRSV97 EQU CVTXTNT2+34 02208000 CVTRSV96 EQU CVTXTNT2+32 02209000 CVTOLTEP EQU CVTXTNT2+28 02210000 CVTQIDA EQU CVTQID+1 02211000 CVTRSV95 EQU CVTQID 02212000 CVTRSV94 EQU CVTXTNT2+20 02213000 CVTRSV93 EQU CVTXTNT2+16 02214000 CVTRSV92 EQU CVTXTNT2+12 02215000 CVTDEBVR EQU CVTXTNT2+8 02216000 CVTRSV91 EQU CVTXTNT2+6 02217000 CVTRSV9H EQU CVTFLGBT 02218000 CVTRSV9G EQU CVTFLGBT 02219000 CVTRSV9F EQU CVTFLGBT 02220000 CVTRSV9E EQU CVTFLGBT 02221000 CVTRSV9D EQU CVTFLGBT 02222000 CVTRSV9C EQU CVTFLGBT 02223000 CVTVME EQU CVTFLGBT 02224000 CVTNPE EQU CVTFLGBT 02225000 CVTNUCLS EQU CVTXTNT2+4 02226000 CVTDSSVA EQU CVTDSSV+1 02227000 CVTRSV89 EQU CVTDSSV 02228000 CVTRSV88 EQU CVTXTNT1+8 02229000 CVTRSV87 EQU CVTXTNT1+4 02230000 CVTFACHN EQU CVTXTNT1 02231000 CVTRV488 EQU CVTMAP+412 02232000 CVTRV487 EQU CVTMAP+408 02233000 CVTRV486 EQU CVTMAP+404 02234000 CVTRV485 EQU CVTMAP+400 02235000 CVTACTAP EQU CVTMAP+396 02236000 CVTAUTH EQU CVTMAP+392 02237000 CVTATMCA EQU CVTATMCT+1 02238000 CVTATMST EQU CVTATMCT 02239000 CVTRSV61 EQU CVTMAP+384 02240000 CVTVOLT1 EQU CVTVOLM1+1 02241000 CVTVOLI1 EQU CVTVOLF1 02242000 CVTSTOA EQU CVTMAP+376 02243000 CVTRSV58 EQU CVTMAP+374 02244000 CVTRSV57 EQU CVTMAP+372 02245000 CVTDDCE EQU CVTMAP+368 02246000 CVTPNWFR EQU CVTMAP+364 02247000 CVTSMF EQU CVTMAP+360 02248000 CVTSULK EQU CVTMAP+358 02249000 CVTSLKO EQU CVTSYSK 02250000 CVTSLKP EQU CVTSYSK 02251000 CVTSLKQ EQU CVTSYSK 02252000 CVTSLKR EQU CVTSYSK 02253000 CVTRSV56 EQU CVTSYSK 02254000 CVTRSV55 EQU CVTSYSK 02255000 CVTRSV54 EQU CVTSYSK 02256000 CVTRSV53 EQU CVTSYSK 02257000 CVTRSV52 EQU CVTA1F1 02258000 CVTRSV51 EQU CVTA1F1 02259000 CVTRSV50 EQU CVTA1F1 02260000 CVTRSV49 EQU CVTA1F1 02261000 CVTRSV48 EQU CVTA1F1 02262000 CVTRSV47 EQU CVTA1F1 02263000 CVTSRSW EQU CVTA1F1 02264000 CVTPFSW EQU CVTA1F1 02265000 CVTPCVT EQU CVTMAP+352 02266000 CVTRSV46 EQU CVTMAP+344 02267000 CVTRSV45 EQU CVTMAP+340 02268000 CVTRSV44 EQU CVTMAP+338 02269000 CVTRSV43 EQU CVTMAP+336 02270000 CVTHJESA EQU CVTHJES+1 02271000 CVTRSV42 EQU CVTHJES 02272000 CVTEXT2A EQU CVTEXT2+1 02273000 CVTRSV41 EQU CVTEXT2 02274000 CVTAPFA EQU CVTAPF+1 02275000 CVTRSV40 EQU CVTAPF 02276000 CVTRV518 EQU CVTINTLA 02277000 CVTRV517 EQU CVTERPV 02278000 CVTEORM EQU CVTMAP+312 02279000 CVTMCHPR EQU CVTMAP+308 02280000 CVTTZ EQU CVTMAP+304 02281000 CVTJEPS EQU CVTMAP+300 02282000 CVTJESCT EQU CVTMAP+296 02283000 CVTMODE EQU CVTMAP+292 02284000 CVTPTRV EQU CVTMAP+288 02285000 CVTREAL EQU CVTMAP+284 02286000 CVTRSV39 EQU CVTMAP+280 02287000 CVTRSV38 EQU CVTMAP+276 02288000 CVTDMSRA EQU CVTDMSR+1 02289000 CVTRV634 EQU CVTDMSRF 02290000 CVTRV633 EQU CVTDMSRF 02291000 CVTRV632 EQU CVTDMSRF 02292000 CVTRV631 EQU CVTDMSRF 02293000 CVTRV630 EQU CVTDMSRF 02294000 CVTRV629 EQU CVTDMSRF 02295000 CVTUDUMP EQU CVTDMSRF 02296000 CVTSDUMP EQU CVTDMSRF 02297000 CVTQMSGA EQU CVTQMSG+1 02298000 CVTRSV36 EQU CVTQMSG 02299000 CVTAMFF EQU CVTMAP+264 02300000 CVTPURGA EQU CVTPURG+1 02301000 CVTRSV35 EQU CVTPURG 02302000 CVTCBSP EQU CVTMAP+256 02303000 CVTATERA EQU CVTATER+1 02304000 CVTSYST EQU CVTATER 02305000 CVTVOLT2 EQU CVTTAT 02306000 CVTVOLI2 EQU CVTVOLF2 02307000 CVTAQAVB EQU CVTAQAVT+1 02308000 CVTRSV34 EQU CVTTCMFG 02309000 CVTRSV33 EQU CVTTCMFG 02310000 CVTRSV32 EQU CVTTCMFG 02311000 CVTRSV31 EQU CVTTCMFG 02312000 CVTRSV30 EQU CVTTCMFG 02313000 CVTRSV29 EQU CVTTCMFG 02314000 CVTRSV28 EQU CVTTCMFG 02315000 CVTTCRDY EQU CVTTCMFG 02316000 CVTGTFA EQU CVTGTF+1 02317000 CVTRSV27 EQU CVTGTFST 02318000 CVTRNIO EQU CVTGTFST 02319000 CVTUSR EQU CVTGTFST 02320000 CVTRV318 EQU CVTFORM 02321000 CVTRV317 EQU CVTTMODE 02322000 CVTRV316 EQU CVTSTATE 02323000 CVTRV315 EQU CVTGTFS 02324000 CVTGTFAV EQU CVTGTFS 02325000 CVT0SCR1 EQU CVTMAP+232 02326000 CVTRV515 EQU CVTMAP+228 02327000 CVTRMS EQU CVTMAP+224 02328000 CVTPATCH EQU CVTMAP+220 02329000 CVTTSCE EQU CVTMAP+216 02330000 CVTLNKSC EQU CVTMAP+214 02331000 CVTQABST EQU CVTMAP+212 02332000 CVTMDLDS EQU CVTMAP+208 02333000 CVTUSER EQU CVTMAP+204 02334000 CVTABEND EQU CVTMAP+200 02335000 CVTSMCA EQU CVTMAP+196 02336000 CVTRSV18 EQU CVTMAP+192 02337000 CVTQLPAQ EQU CVTMAP+188 02338000 CVTQCDSR EQU CVTMAP+184 02339000 CVTRSV17 EQU CVTOPTB 02340000 CVTRSV16 EQU CVTOPTB 02341000 CVTFP EQU CVTOPTB 02342000 CVTAPTHR EQU CVTOPTB 02343000 CVTNLOG EQU CVTOPTB 02344000 CVTTOD EQU CVTOPTB 02345000 CVTCTIMS EQU CVTOPTB 02346000 CVTPROT EQU CVTOPTB 02347000 CVTXPFP EQU CVTOPTA 02348000 CVTASCII EQU CVTOPTA 02349000 CVTRSV13 EQU CVTOPTA 02350000 CVTRSV12 EQU CVTOPTA 02351000 CVTNIP EQU CVTOPTA 02352000 CVTDDR EQU CVTOPTA 02353000 CVTAPR EQU CVTOPTA 02354000 CVTCCH EQU CVTOPTA 02355000 CVTSNCTR EQU CVTMAP+180 02356000 CVTQMWR EQU CVTMAP+176 02357000 CVTQOCR EQU CVTMAP+172 02358000 CVT1EF00 EQU CVTMAP+168 02359000 CVTMZ00 EQU CVTMAP+164 02360000 CVTHEAD EQU CVTMAP+160 02361000 CVTRSV11 EQU CVTMAP+156 02362000 CVT0PT01 EQU CVTMAP+152 02363000 CVTMSER EQU CVTMAP+148 02364000 CVTRV516 EQU CVTIERLC 02365000 CVTILCH EQU CVTMAP+140 02366000 CVT0DS EQU CVTMAP+136 02367000 CVTFBOSV EQU CVTMAP+132 02368000 CVTNUCB EQU CVTMAP+128 02369000 CVTIOQET EQU CVTMAP+120 02370000 CVTDCBA EQU CVTMAP+117 02371000 CVTMVS2 EQU CVTDCB 02372000 CVT6DAT EQU CVTDCB 02373000 CVT4MPS EQU CVTDCB 02374000 CVTRSV09 EQU CVTDCB 02375000 CVT4MS1 EQU CVTDCB 02376000 CVT2SPS EQU CVTDCB 02377000 CVT1SSS EQU CVTDCB 02378000 CVTRSV08 EQU CVTDCB 02379000 CVTSTB EQU CVTMAP+112 02380000 CVTQTD00 EQU CVTMAP+108 02381000 CVTQTE00 EQU CVTMAP+104 02382000 CVTCUCB EQU CVTMAP+100 02383000 CVTSJQ EQU CVTMAP+96 02384000 CVTPBLDL EQU CVTMAP+92 02385000 CVTTPC EQU CVTMAP+88 02386000 CVTSVDCB EQU CVTMAP+84 02387000 CVTEXIT EQU CVTMAP+80 02388000 CVT0FN00 EQU CVTMAP+76 02389000 CVTDARA EQU CVTDAR+1 02390000 CVTRSV07 EQU CVTFLGS1 02391000 CVTRSV06 EQU CVTFLGS1 02392000 CVTRSV05 EQU CVTFLGS1 02393000 CVTRSV04 EQU CVTFLGS1 02394000 CVTRSV03 EQU CVTFLGS1 02395000 CVTRSV02 EQU CVTFLGS1 02396000 CVTRSV01 EQU CVTFLGS1 02397000 CVTDMPLK EQU CVTFLGS1 02398000 CVTXITP EQU CVTMAP+68 02399000 CVTZDTAB EQU CVTMAP+64 02400000 CVTMSLT EQU CVTMAP+60 02401000 CVTDATE EQU CVTMAP+56 02402000 CVTBTERM EQU CVTMAP+52 02403000 CVTSYSAD EQU CVTMAP+48 02404000 CVTXTLER EQU CVTMAP+44 02405000 CVTILK2 EQU CVTMAP+40 02406000 CVTILK1 EQU CVTMAP+36 02407000 CVTPRLTV EQU CVTMAP+32 02408000 CVTPCNVT EQU CVTMAP+28 02409000 CVT0VL00 EQU CVTMAP+24 02410000 CVTBUF EQU CVTMAP+16 02411000 CVTJOB EQU CVTMAP+12 02412000 CVTLINK EQU CVTMAP+8 02413000 CVT0EF00 EQU CVTMAP+4 02414000 CVTTCBP EQU CVTMAP 02415000 CVT EQU CVTMAP 02416000 LCBERADR EQU LCBXRADR+1 02417000 LCBPCIRC EQU LCBXRADR 02418000 LCBDCT3 EQU LCBXDCT+2 02419000 LCBDCT2 EQU LCBXDCT+1 02420000 LCBDCT1 EQU LCBXDCT 02421000 @NM00176 EQU LCBXFLAG 02422000 LCBERPND EQU LCBXFLAG 02423000 LCBSRCPF EQU LCBXFLAG 02424000 LCBGPCTV EQU LCBXFLAG 02425000 @NM00175 EQU LCBXFLAG 02426000 @NM00174 EQU LCBXFLAG 02427000 @NM00173 EQU LCBXFLAG 02428000 @NM00172 EQU LCBXFLAG 02429000 LCBCCW10 EQU LCBCPA+72 02430000 LCBCCW9 EQU LCBCPA+64 02431000 LCBCCW8 EQU LCBCPA+56 02432000 LCBCCW7 EQU LCBCPA+48 02433000 LCBCCW6 EQU LCBCPA+40 02434000 LCBCP EQU LCBQEBPL+4 02435000 LCBSIO EQU LCBQEBPL 02436000 LCBCCW4 EQU LCBCPA+24 02437000 LCBCCW3 EQU LCBCPA+16 02438000 LCBCCW2 EQU LCBCPA+8 02439000 LCBCCW1 EQU LCBCPA 02440000 @NM00158 EQU LCBERCCW+16 02441000 LCBATL05 EQU LCBERCCW+8 02442000 @NM00157 EQU LCBERCCW 02443000 LCBCSWSV EQU LCBSAVSN+1 02444000 LCBSNSV EQU LCBSAVSN 02445000 LCBBFSNS EQU LCBRSPSV 02446000 LCBWAITC EQU LCBTPCD+5 02447000 LCBINPAK EQU LCBSTAT6 02448000 LCBMHBID EQU LCBSTAT6 02449000 LCBRTRRO EQU LCBSTAT6 02450000 LCBHDRPD EQU LCBSTAT6 02451000 LCBCHN EQU LCBSTAT6 02452000 LCBBFRSV EQU LCBTPCD+1 02453000 @NM00156 EQU LCBSTAT5 02454000 LCBLUS EQU LCBSTAT5 02455000 LCBLUNIT EQU LCBSTAT5 02456000 LCBPERM EQU LCBSTAT5 02457000 LCBNXCMD EQU LCBBFRW 02458000 LCBERMSK EQU LCBOBRCH 02459000 LCBSCBA EQU IEDQLCB+93 02460000 LCBOLT EQU LCBMSGFM 02461000 LCBEOT EQU LCBMSGFM 02462000 LCBENQ EQU LCBMSGFM 02463000 LCBTTD EQU LCBMSGFM 02464000 LCBRSTRT EQU LCBMSGFM 02465000 LCBVSTRT EQU LCBMSGFM 02466000 LCBACKI EQU LCBMSGFM 02467000 LCBNAK EQU LCBMSGFM 02468000 @NM00155 EQU LCBRBCT2 02469000 LCBDCNT EQU LCBRBCT2 02470000 LCBRBCT1 EQU LCBERBCT 02471000 LCBERBCH EQU IEDQLCB+85 02472000 LCBCOMPL EQU LCBDLNKN 02473000 LCBPRCPG EQU LCBERBST 02474000 LCBERROR EQU LCBERBST 02475000 @NM00154 EQU LCBERBST 02476000 LCBINQ EQU LCBERBST 02477000 LCBRDERR EQU LCBERBST 02478000 LCBEOMSG EQU LCBERBST 02479000 LCBMSG EQU LCBERBST 02480000 LCBERBLK EQU IEDQLCB+81 02481000 LCBERBPY EQU IEDQLCB+80 02482000 LCBERBQB EQU LCBERB+1 02483000 LCBERBKY EQU LCBERB 02484000 LCBRECAD EQU IEDQLCB+73 02485000 @NM00153 EQU LCBTSTSW 02486000 @NM00152 EQU LCBTSTSW 02487000 @NM00151 EQU LCBTSTSW 02488000 @NM00150 EQU LCBTSTSW 02489000 @NM00149 EQU LCBTSTSW 02490000 @NM00148 EQU LCBTSTSW 02491000 @NM00147 EQU LCBTSTSW 02492000 LCBCONCT EQU LCBTSTSW 02493000 LCBRESP EQU LCBSTAT2 02494000 LCBBFRAV EQU LCBDIAL 02495000 LCBATTN EQU LCBSYNC 02496000 LCBNEGRP EQU LCBSTAT2 02497000 LCBSNDPR EQU LCBSTAT2 02498000 LCBCONNN EQU LCBBEOTN 02499000 LCBMSGNN EQU LCBSTAT2 02500000 LCBSENDN EQU LCBSTAT1 02501000 LCBRECVN EQU LCBSTAT1 02502000 LCBFREEN EQU LCBSTAT1 02503000 LCBCONT EQU LCBSTAT1 02504000 LCBINITN EQU LCBSTAT1 02505000 LCBOCNI EQU LCBSTAT1 02506000 LCBOCWTN EQU LCBSTAT1 02507000 LCBRCLLN EQU LCBSTAT1 02508000 LCBRECOF EQU IEDQLCB+68 02509000 LCBRDBFR EQU LCBRCBFR 02510000 LCBUCBX EQU IEDQLCB+64 02511000 LCBTTBIN EQU LCBERRCT 02512000 @NM00146 EQU LCBINCAM 02513000 LCBGETMN EQU LCBINCAM 02514000 LCBRESTR EQU LCBRCQCB 02515000 LCBPCILK EQU LCBDCBPT 02516000 LCBAP4OL EQU LCBSIOCC 02517000 LCBAP3OL EQU LCBSIOCC 02518000 LCBAP2OL EQU LCBSIOCC 02519000 LCBAP1OL EQU LCBSIOCC 02520000 LCBSIOC2 EQU LCBSIOCC 02521000 LCBSIOC1 EQU LCBSIOCC 02522000 @NM00145 EQU LCBSIOCC 02523000 LCBCSWRC EQU LCBCSW+5 02524000 LCBCSCHC EQU LCBCSWCS 02525000 LCBCSICC EQU LCBCSWCS 02526000 LCBCSCCC EQU LCBCSWCS 02527000 LCBCSCDC EQU LCBCSWCS 02528000 LCBCSPTC EQU LCBCSWCS 02529000 LCBCSPGC EQU LCBCSWCS 02530000 LCBCSIL EQU LCBCSWCS 02531000 LCBCSPCI EQU LCBCSWCS 02532000 LCBUSUE EQU LCBCSWUS 02533000 LCBUSUC EQU LCBCSWUS 02534000 LCBUSDE EQU LCBCSWUS 02535000 LCBUSCE EQU LCBCSWUS 02536000 LCBUSBSY EQU LCBCSWUS 02537000 LCBUSCUE EQU LCBCSWUS 02538000 LCBUSSM EQU LCBCSWUS 02539000 LCBUSAT EQU LCBCSWUS 02540000 LCBCSWCA EQU LCBCSW 02541000 LCBOBR EQU LCBFLAG3 02542000 LCBOBRRD EQU LCBFLAG3 02543000 LCBIOMSG EQU LCBFLAG3 02544000 LCBSOHC EQU LCBFLAG3 02545000 LCBRLAD EQU LCBFLAG3 02546000 LCBSOHR EQU LCBFLAG3 02547000 @NM00144 EQU LCBFLAG3 02548000 LCBECBCC EQU LCBIOBSN+3 02549000 LCBSENS1 EQU LCBSNS+1 02550000 LCBABORT EQU LCBTMOUT 02551000 LCBNOTIN EQU LCBLOSDT 02552000 LCBOVRUN EQU LCBSENS0 02553000 LCBDATCK EQU LCBSENS0 02554000 LCBEQUCK EQU LCBSENS0 02555000 LCBBUSCK EQU LCBSENS0 02556000 LCBINTRQ EQU LCBSENS0 02557000 LCBCMDRJ EQU LCBSENS0 02558000 LCBFLAG2 EQU LCBIOBSN 02559000 @NM00143 EQU LCBFLAG1 02560000 LCBUNREL EQU LCBFLAG1 02561000 LCBEXCPN EQU LCBFLAG1 02562000 @NM00142 EQU LCBFLAG1 02563000 LCBERPIN EQU LCBFLAG1 02564000 @NM00141 EQU LCBFLAG1 02565000 LCBFSBFR EQU LCBMHA 02566000 LCBISZE EQU IEDQLCB+28 02567000 LCBLNENT EQU LCBSCBDA+1 02568000 @NM00140 EQU LCBSCBDA 02569000 LCBCPGMH EQU LCBSTAT4 02570000 LCBREAL EQU LCBPHASE 02571000 @NM00139 EQU LCBSTAT4 02572000 LCBACTRQ EQU LCBSTAT4 02573000 LCBIPLRQ EQU LCBSTAT4 02574000 LCBDACRQ EQU LCBSTAT4 02575000 LCBDMPRQ EQU LCBSTAT4 02576000 @NM00138 EQU LCBLKMDE 02577000 LCBLOCKI EQU LCBLKMDE 02578000 LCBLOCKR EQU LCBLKMDE 02579000 LCBHMFLG EQU LCBLKMDE 02580000 LCBBDFLG EQU LCBLKMDE 02581000 @NM00137 EQU LCBINSRC 02582000 LCBABRTN EQU LCBCHAIN 02583000 LCBCTLMD EQU LCBTETEN 02584000 LCBBFRSZ EQU LCBCHAIN 02585000 LCBUREQN EQU LCBCHAIN 02586000 LCBNORTY EQU LCBCHAIN 02587000 LCBERMSG EQU LCBCHAIN 02588000 LCBEXCP EQU LCBCHAIN 02589000 LCBINVRQ EQU LCBSCRNN 02590000 LCB2741N EQU LCBTSOB 02591000 LCBINHBN EQU LCBTSOB 02592000 LCBCIRCD EQU LCBTSOB 02593000 LCBPREP EQU LCBTSOB 02594000 LCBSOPL EQU LCBTSOB 02595000 LCBSATRD EQU LCBTSOB 02596000 LCBTSBUF EQU LCBTSOB 02597000 LCBWRBRK EQU LCBTSOB 02598000 LCBTDL EQU IEDQLCB+18 02599000 LCBEOLTD EQU IEDQLCB+16 02600000 LCBLINK EQU LCBRCB+5 02601000 LCBPRI EQU LCBRCB+4 02602000 LCBKEY EQU LCBRCB 02603000 SAVTBITN EQU IEDNSVTD+312 02604000 @NM00136 EQU SAVTCKQB+8 02605000 @NM00135 EQU SAVTCKEC+1 02606000 @NM00134 EQU SAVTCKCC 02607000 SAVTCKPO EQU SAVTCKCC 02608000 SAVTCKWA EQU SAVTCKCC 02609000 SAVTCKCH EQU SAVTCKTB+1 02610000 SAVTCKVT EQU SAVTCKTB 02611000 @NM00133 EQU IEDNSVTD+297 02612000 SAVTRDFG EQU SAVTRDRV+12 02613000 @NM00132 EQU SAVTRDRV+5 02614000 SAVTRDPY EQU SAVTRDRV+4 02615000 SAVTRDQB EQU SAVTRDRV+1 02616000 SAVTRDKY EQU SAVTRDRV 02617000 SAVTNID EQU IEDNSVTD+280 02618000 SAVTDVAS EQU IEDNSVTD+276 02619000 SAVTPLSZ EQU IEDNSVTD+274 02620000 @NM00131 EQU IEDNSVTD+273 02621000 SAVTSUBL EQU IEDNSVTD+272 02622000 @NM00130 EQU SAVTZELM+1 02623000 SAVTSUBM EQU SAVTZELM 02624000 SAVTMHDX EQU IEDNSVTD+268 02625000 SAVTNAT1 EQU IEDNSVTD+266 02626000 SAVTSH20 EQU IEDNSVTD+264 02627000 SAVTLCBS EQU IEDNSVTD+260 02628000 SAVTRNMP EQU IEDNSVTD+256 02629000 SAVTTNTX EQU IEDNSVTD+252 02630000 SAVTNAX EQU IEDNSVTD+248 02631000 SAVTSUBV EQU IEDNSVTD+247 02632000 SAVTSUBA EQU IEDNSVTD+246 02633000 SAVTSIBC EQU IEDNSVTD+244 02634000 SAVTBSM EQU IEDNSVTD+240 02635000 SAVTSCPT EQU SAVTTCPU 02636000 SAVTRQTG EQU IEDNSVTD+236 02637000 SAVTRQCH EQU IEDNSVTD+232 02638000 SAVTMAND EQU IEDNSVTD+228 02639000 SAVTSPLN EQU IEDNSVTD+224 02640000 SAVTNADL EQU IEDNSVTD+222 02641000 SAVTNATL EQU IEDNSVTD+220 02642000 SAVTMHTB EQU IEDNSVTD+216 02643000 SAVTSSMH EQU IEDNSVTD+212 02644000 SAVTQRS EQU IEDNSVTD+208 02645000 SAVTRQIN EQU IEDNSVTD+204 02646000 SAVTDFCO EQU IEDNSVTD+200 02647000 SAVTSAO EQU IEDNSVTD+196 02648000 SAVTSARI EQU IEDNSVTD+192 02649000 SAVTSAC EQU IEDNSVTD+188 02650000 SAVTSAI EQU IEDNSVTD+184 02651000 SAVTCSCI EQU IEDNSVTD+180 02652000 SAVTSSRP EQU IEDNSVTD+176 02653000 SAVTSSRQ EQU IEDNSVTD+172 02654000 SAVTSCLU EQU IEDNSVTD+168 02655000 SAVTXTRQ EQU IEDNSVTD+164 02656000 SAVTMVBF EQU IEDNSVTD+160 02657000 @NM00129 EQU IEDNSVTD+148 02658000 SAVTIPCQ EQU IEDNSVTD+144 02659000 @NM00128 EQU IEDNSVTD+136 02660000 SAVTXFMI EQU IEDNSVTD+132 02661000 @NM00127 EQU IEDNSVTD+124 02662000 SAVTXFMO EQU IEDNSVTD+120 02663000 @NM00126 EQU IEDNSVTD+116 02664000 SAVTSSSR EQU IEDNSVTD+112 02665000 SAVTSCPQ EQU IEDNSVTD+108 02666000 SAVTSLCB EQU IEDNSVTD+104 02667000 SAVTLUSR EQU IEDNSVTD+100 02668000 @NM00125 EQU SAVTLUSQ+8 02669000 SAVTLUSP EQU SAVTLUSQ+4 02670000 SAVTLUSB EQU SAVTLUSQ 02671000 @NM00124 EQU IEDNSVTD+84 02672000 SAVTSAT EQU IEDNSVTD+80 02673000 SAVTNAT EQU IEDNSVTD+76 02674000 SAVTCLUP EQU IEDNSVTD+72 02675000 SAVTPIUT EQU IEDNSVTD+68 02676000 SAVTRNTA EQU IEDNSVTD+64 02677000 SAVTDNIR EQU IEDNSVTD+60 02678000 SAVTCNIR EQU IEDNSVTD+56 02679000 SAVTFLDH EQU IEDNSVTD+52 02680000 SAVTSRTN EQU IEDNSVTD+48 02681000 SAVTSREQ EQU IEDNSVTD+44 02682000 SAVTFAIL EQU IEDNSVTD+42 02683000 SAVTSUSE EQU IEDNSVTD+40 02684000 SAVTSIB EQU IEDNSVTD+36 02685000 SAVTPRTN EQU IEDNSVTD+32 02686000 @NM00123 EQU IEDNSVTD+28 02687000 SAVTWH20 EQU IEDNSVTD+26 02688000 SAVTPWT EQU IEDNSVTD+24 02689000 SAVTPRTQ EQU IEDNSVTD+20 02690000 SAVTPREQ EQU IEDNSVTD+16 02691000 SAVTPH20 EQU IEDNSVTD+14 02692000 SAVTPUSE EQU IEDNSVTD+12 02693000 SAVTPLCB EQU IEDNSVTD+8 02694000 SAVTPOOL EQU IEDNSVTD+4 02695000 SAVTPRMT EQU SAVTDIAF 02696000 SAVTVIRT EQU SAVTDIAF 02697000 AVTCPBNO EQU IEDQAVTD+1244 02698000 AVTHRESS EQU IEDQAVTD+1243 02699000 @NM00122 EQU IEDQAVTD+1242 02700000 @NM00121 EQU IEDQAVTD+1241 02701000 @NM00120 EQU IEDQAVTD+1240 02702000 @NM00119 EQU IEDQAVTD+1237 02703000 @NM00118 EQU IEDQAVTD+1236 02704000 AVTHRESE EQU @NM00117 02705000 AVTRADDR EQU IEDQAVTD+1228 02706000 AVTNADDR EQU IEDQAVTD+1224 02707000 AVTHRESN EQU IEDQAVTD+1220 02708000 AVTVOLRN EQU IEDQAVTD+1216 02709000 AVTTOTNN EQU IEDQAVTD+1212 02710000 AVTTRCYN EQU IEDQAVTD+1208 02711000 AVTRCTRN EQU IEDQAVTD+1204 02712000 AVTNOVON EQU IEDQAVTD+1200 02713000 AVTADEBN EQU IEDQAVTD+1196 02714000 AVTVOLRR EQU IEDQAVTD+1192 02715000 AVTTOTNR EQU IEDQAVTD+1188 02716000 AVTTRCYR EQU IEDQAVTD+1184 02717000 AVTRCTRR EQU IEDQAVTD+1180 02718000 AVTNOVOR EQU IEDQAVTD+1176 02719000 AVTADEBR EQU IEDQAVTD+1172 02720000 AVTLODPT EQU IEDQAVTD+1168 02721000 AVTIOBN EQU IEDQAVTD+1164 02722000 AVTIOBR EQU IEDQAVTD+1160 02723000 AVTCPBPT EQU IEDQAVTD+1156 02724000 AVTFCPB EQU IEDQAVTD+1152 02725000 @NM00116 EQU IEDQAVTD+1148 02726000 AVTINCPQ EQU IEDQAVTD+1144 02727000 @NM00115 EQU IEDQAVTD+1140 02728000 @NM00114 EQU IEDQAVTD+1137 02729000 @NM00113 EQU AVTBIT4 02730000 @NM00112 EQU AVTBIT4 02731000 @NM00111 EQU AVTBIT4 02732000 @NM00110 EQU AVTBIT4 02733000 @NM00109 EQU AVTBIT4 02734000 @NM00108 EQU AVTBIT4 02735000 @NM00107 EQU AVTBIT4 02736000 AVTRUFTN EQU AVTBIT4 02737000 @NM00106 EQU IEDQAVTD+1132 02738000 AVTNOBFQ EQU IEDQAVTD+1128 02739000 @NM00105 EQU IEDQAVTD+1124 02740000 AVTDKENQ EQU IEDQAVTD+1120 02741000 @NM00104 EQU IEDQAVTD+1116 02742000 AVTDKAPQ EQU IEDQAVTD+1112 02743000 AVTCOPY EQU IEDQAVTD+1108 02744000 AVTIA EQU IEDQAVTD+1104 02745000 AVTFL EQU IEDQAVTD+1100 02746000 @NM00103 EQU IEDQAVTD+1096 02747000 AVTNCPBQ EQU IEDQAVTD+1092 02748000 AVTTOTNC EQU IEDQAVTD+1088 02749000 AVTCMAX EQU IEDQAVTD+1084 02750000 AVTCMIN EQU IEDQAVTD+1080 02751000 AVTHM02 EQU IEDQAVTD+1076 02752000 AVTOPCIN EQU IEDQAVTD+1074 02753000 AVTDCTLN EQU IEDQAVTD+1072 02754000 AVTOPMSK EQU IEDQAVTD+1068 02755000 AVTSTEAL EQU IEDQAVTD+1060 02756000 AVTOPTN EQU IEDQAVTD+1056 02757000 AVTDSKCT EQU IEDQAVTD+1054 02758000 AVTCKRST EQU IEDQAVTD+1053 02759000 AVTSTAN EQU AVTBIT3 02760000 AVTSTACN EQU AVTBIT3 02761000 AVTSTAIN EQU AVTBIT3 02762000 AVTSTAYN EQU AVTBIT3 02763000 AVTOLTBN EQU AVTBIT3 02764000 AVTTSAB EQU AVTBIT3 02765000 AVTRFULN EQU AVTBIT3 02766000 AVTRECVN EQU AVTBIT3 02767000 @NM00102 EQU AVTBIT2 02768000 @NM00101 EQU AVTBIT2 02769000 AVTOPEIN EQU AVTBIT2 02770000 AVTSTRTN EQU AVTBIT2 02771000 AVTTOPOL EQU AVTBIT2 02772000 AVTCOPYN EQU AVTBIT2 02773000 AVTREUSN EQU AVTBIT2 02774000 AVTEXTSC EQU AVTBIT2 02775000 AVTDISKN EQU AVTBIT1 02776000 AVTQUCKN EQU AVTBIT1 02777000 AVTCLOSN EQU AVTBIT1 02778000 AVTREADN EQU AVTBIT1 02779000 AVTDLAYN EQU AVTBIT1 02780000 AVTAQTAN EQU AVTBIT1 02781000 AVTTSON EQU AVTBIT1 02782000 AVTAPLKN EQU AVTBIT1 02783000 AVTDUMBR EQU IEDQAVTD+1048 02784000 AVTDLQX EQU IEDQAVTD+1046 02785000 AVTINTLV EQU IEDQAVTD+1044 02786000 AVTSMCNT EQU IEDQAVTD+1042 02787000 AVTAVFCT EQU IEDQAVTD+1040 02788000 AVTOPCON EQU IEDQAVTD+1038 02789000 AVTOPCNT EQU IEDQAVTD+1036 02790000 AVTLNCNT EQU IEDQAVTD+1034 02791000 AVTHA16 EQU IEDQAVTD+1030 02792000 AVTHA7 EQU IEDQAVTD+1028 02793000 AVTHA4 EQU IEDQAVTD+1026 02794000 AVTHA3 EQU IEDQAVTD+1024 02795000 AVTHA2 EQU IEDQAVTD+1022 02796000 @NM00100 EQU IEDQAVTD+1020 02797000 AVTCWTOT EQU IEDQAVTD+1008 02798000 AVTCWINT EQU IEDQAVTD+956 02799000 AVTDTRAP EQU IEDQAVTD+952 02800000 @NM00099 EQU IEDQAVTD+950 02801000 @NM00098 EQU AVTIOTR 02802000 AVTIOTRH EQU AVTIOTR 02803000 AVTIOTRE EQU AVTIOTR 02804000 @NM00097 EQU AVTSUBT 02805000 AVTSUBPT EQU AVTSUBT 02806000 AVTSUBON EQU AVTSUBT 02807000 AVTAFE30 EQU IEDQAVTD+944 02808000 AVTAFE20 EQU IEDQAVTD+940 02809000 AVTAFE10 EQU IEDQAVTD+936 02810000 AVTCWEC2 EQU IEDQAVTD+932 02811000 AVTCWPM2 EQU IEDQAVTD+928 02812000 AVTCWTS2 EQU IEDQAVTD+927 02813000 AVTCWTS1 EQU IEDQAVTD+926 02814000 AVTCWCLD EQU AVTCWFL2 02815000 AVTCWRAP EQU AVTCWFL2 02816000 @NM00096 EQU AVTCWFL2 02817000 @NM00095 EQU AVTCWFL2 02818000 @NM00094 EQU AVTCWFL2 02819000 @NM00093 EQU AVTCWFL2 02820000 @NM00092 EQU AVTCWFL2 02821000 AVTCWACT EQU AVTCWFL2 02822000 @NM00091 EQU AVTCWFL1 02823000 @NM00090 EQU AVTCWFL1 02824000 @NM00089 EQU AVTCWFL1 02825000 @NM00088 EQU AVTCWFL1 02826000 @NM00087 EQU AVTCWFL1 02827000 @NM00086 EQU AVTCWFL1 02828000 @NM00085 EQU AVTCWFL1 02829000 AVTCOMWN EQU AVTCWFL1 02830000 AVTCWEC1 EQU IEDQAVTD+920 02831000 AVTCWPM1 EQU IEDQAVTD+916 02832000 AVTCAREA EQU IEDQAVTD+912 02833000 AVTFZERO EQU IEDQAVTD+908 02834000 AVTCADDR EQU IEDQAVTD+904 02835000 AVTCOREC EQU IEDQAVTD+900 02836000 @NM00084 EQU IEDQAVTD+892 02837000 AVTCPBCB EQU IEDQAVTD+888 02838000 @NM00083 EQU IEDQAVTD+880 02839000 AVTDSIOB EQU IEDQAVTD+876 02840000 @NM00082 EQU IEDQAVTD+868 02841000 AVTCPRMB EQU IEDQAVTD+864 02842000 @NM00081 EQU IEDQAVTD+856 02843000 AVTCLOSB EQU IEDQAVTD+852 02844000 @NM00080 EQU IEDQAVTD+844 02845000 AVTACTIB EQU IEDQAVTD+840 02846000 @NM00079 EQU IEDQAVTD+836 02847000 AVTOLTEB EQU IEDQAVTD+832 02848000 AVTOLTCH EQU AVTOLTQB+1 02849000 AVTOLTVT EQU AVTOLTQB 02850000 @NM00078 EQU AVTOPCQB+8 02851000 @NM00077 EQU AVTOPCEC+1 02852000 @NM00076 EQU AVTOPCCC 02853000 AVTOPCPO EQU AVTOPCCC 02854000 AVTOPCWA EQU AVTOPCCC 02855000 AVTOPCCH EQU AVTOPCOB+1 02856000 AVTOPCVT EQU AVTOPCOB 02857000 @NM00075 EQU AVTCKPQB+9 02858000 AVTCKPTS EQU AVTCKPQB+8 02859000 @NM00074 EQU AVTCKPEC+1 02860000 @NM00073 EQU AVTCKPCC 02861000 AVTCKPPO EQU AVTCKPCC 02862000 AVTCKPWA EQU AVTCKPCC 02863000 AVTCKPCH EQU AVTCKPTB+1 02864000 AVTCKPVT EQU AVTCKPTB 02865000 @NM00072 EQU IEDQAVTD+796 02866000 AVTBFRTB EQU IEDQAVTD+792 02867000 @NM00071 EQU IEDQAVTD+784 02868000 AVTBFREB EQU IEDQAVTD+780 02869000 AVTTIMQ EQU IEDQAVTD+776 02870000 @NM00070 EQU IEDQAVTD+772 02871000 AVTIMQPS EQU IEDQAVTD+768 02872000 AVTINOUT EQU IEDQAVTD+766 02873000 AVTREFTM EQU IEDQAVTD+764 02874000 @NM00069 EQU IEDQAVTD+752 02875000 AVTDELYB EQU IEDQAVTD+748 02876000 AVTOCQPT EQU IEDQAVTD+744 02877000 AVTTSOPT EQU IEDQAVTD+740 02878000 AVTSUPPT EQU IEDQAVTD+736 02879000 AVTCBQCB EQU IEDQAVTD+732 02880000 AVTMSGS EQU IEDQAVTD+729 02881000 @NM00068 EQU AVTSYSER 02882000 @NM00067 EQU AVTSYSER 02883000 @NM00066 EQU AVTSYSER 02884000 @NM00065 EQU AVTSYSER 02885000 @NM00064 EQU AVTSYSER 02886000 @NM00063 EQU AVTSYSER 02887000 AVTCMAXN EQU AVTSYSER 02888000 AVTCMINN EQU AVTSYSER 02889000 AVT2260L EQU IEDQAVTD+724 02890000 AVTABEPL EQU AVTADBUF 02891000 AVTHFF EQU AVTCLRHI+2 02892000 @NM00062 EQU AVTCLRHI 02893000 AVTCCLNK EQU AVTCRELE+5 02894000 AVTCCPRI EQU AVTCRELE+4 02895000 AVTCCQCB EQU AVTCCELE+1 02896000 AVTCCKEY EQU AVTCCELE 02897000 AVTDELEM EQU IEDQAVTD+700 02898000 AVTBSX EQU AVTCKLNK 02899000 AVTOPETR EQU AVTHG01 02900000 @NM00061 EQU AVTCKBYT 02901000 AVTCKONQ EQU AVTCKBYT 02902000 @NM00060 EQU AVTCKBYT 02903000 @NM00059 EQU AVTCKBYT 02904000 @NM00058 EQU AVTCKBYT 02905000 @NM00057 EQU AVTCKBYT 02906000 @NM00056 EQU AVTCKBYT 02907000 @NM00055 EQU AVTCKBYT 02908000 AVTOPXCL EQU IEDQAVTD+688 02909000 AVTOPERL EQU IEDQAVTD+687 02910000 @NM00054 EQU IEDQAVTD+686 02911000 AVTCKTIM EQU IEDQAVTD+684 02912000 AVTCKELV EQU IEDQAVTD+682 02913000 AVTCPRCD EQU IEDQAVTD+681 02914000 AVTWARMN EQU AVTCKELF 02915000 AVTCRTLN EQU AVTCKELF 02916000 AVTCPIPN EQU AVTCKELF 02917000 AVTCCLCN EQU AVTCKELF 02918000 AVTCINCN EQU AVTCKELF 02919000 @NM00053 EQU AVTCKELF 02920000 AVTCMCPN EQU AVTCKELF 02921000 AVTNQBCK EQU AVTCKELF 02922000 AVTCKQAD EQU IEDQAVTD+677 02923000 AVTSCBSZ EQU IEDQAVTD+676 02924000 @NM00052 EQU IEDQAVTD+672 02925000 AVTCKELE EQU IEDQAVTD+668 02926000 @NM00051 EQU AVTCKPEL+8 02927000 AVTCKRLK EQU AVTCKPEL+5 02928000 AVTCKRPR EQU AVTCKPEL+4 02929000 AVTCKRMQ EQU AVTCKRMV+1 02930000 AVTCKRKY EQU AVTCKRMV 02931000 AVTHK EQU IEDQAVTD+648 02932000 AVTHI EQU IEDQAVTD+644 02933000 AVTIOT EQU IEDQAVTD+640 02934000 AVTNX EQU IEDQAVTD+636 02935000 AVTTONE EQU IEDQAVTD+632 02936000 AVTA3TL EQU IEDQAVTD+628 02937000 AVTABEND EQU IEDQAVTD+618 02938000 AVTPLCBN EQU IEDQAVTD+616 02939000 @NM00050 EQU AVTSAVTP+1 02940000 @NM00049 EQU AVTSAVTF 02941000 AVTSNA EQU AVTSAVTF 02942000 AVTONSNA EQU AVTSAVTF 02943000 AVTVTMCP EQU AVTSAVTF 02944000 @NM00048 EQU IEDQAVTD+608 02945000 AVTCMBSS EQU IEDQAVTD+604 02946000 AVTRCV EQU IEDQAVTD+600 02947000 AVTSEND EQU IEDQAVTD+596 02948000 AVTCSCH EQU IEDQAVTD+592 02949000 AVTQ1 EQU IEDQAVTD+588 02950000 AVTE7 EQU IEDQAVTD+584 02951000 AVTHB EQU IEDQAVTD+580 02952000 AVTR1 EQU IEDQAVTD+576 02953000 AVTBZ EQU IEDQAVTD+572 02954000 AVTEZ EQU IEDQAVTD+568 02955000 AVTEC EQU IEDQAVTD+564 02956000 AVTEW EQU IEDQAVTD+560 02957000 AVTNDIAL EQU AVTSCOPT 02958000 AVTN2741 EQU AVTSCOPT 02959000 AVTCONCO EQU AVTSCOPT 02960000 AVTCONC EQU AVTSCOPT 02961000 AVTCMBUF EQU AVTSCOPT 02962000 AVTAPDMP EQU AVTSCOPT 02963000 @NM00047 EQU AVTSCOPT 02964000 AVTHA EQU AVTDISP 02965000 AVTEA EQU IEDQAVTD+548 02966000 AVTAX EQU IEDQAVTD+544 02967000 AVTA3 EQU IEDQAVTD+540 02968000 AVTGD EQU IEDQAVTD+536 02969000 AVTAL EQU IEDQAVTD+532 02970000 AVTOLTST EQU AVTHG02 02971000 AVTE8 EQU IEDQAVTD+524 02972000 AVTUI EQU IEDQAVTD+520 02973000 AVTCOMPT EQU IEDQAVTD+516 02974000 AVTCRSRF EQU IEDQAVTD+512 02975000 @NM00046 EQU IEDQAVTD+508 02976000 AVTKA02 EQU IEDQAVTD+504 02977000 AVTOPTPT EQU IEDQAVTD+500 02978000 AVTPCBPT EQU IEDQAVTD+496 02979000 @NM00045 EQU AVTECB1 02980000 AVTCOMP EQU AVTECB1 02981000 @NM00044 EQU AVTECB1 02982000 AVTOPECA EQU IEDQAVTD+488 02983000 AVTOLECA EQU IEDQAVTD+484 02984000 AVTCKECA EQU IEDQAVTD+480 02985000 AVTCWECA EQU IEDQAVTD+476 02986000 AVTCWTCB EQU IEDQAVTD+472 02987000 AVTOLTCB EQU IEDQAVTD+468 02988000 AVTOCTCB EQU IEDQAVTD+464 02989000 AVTCKTCB EQU IEDQAVTD+460 02990000 AVTAS EQU IEDQAVTD+456 02991000 AVTNOLBF EQU IEDQAVTD+454 02992000 AVTNCKPR EQU IEDQAVTD+453 02993000 AVTCIB EQU IEDQAVTD+452 02994000 AVTSPLPT EQU IEDQAVTD+448 02995000 AVTMVBFR EQU IEDQAVTD+444 02996000 AVTSBTA EQU IEDQAVTD+440 02997000 AVTRARTN EQU IEDQAVTD+436 02998000 AVTBSCAN EQU IEDQAVTD+432 02999000 AVTRDYA EQU IEDQAVTD+428 03000000 AVTDISTR EQU IEDQAVTD+420 03001000 AVTPARM3 EQU IEDQAVTD+416 03002000 @NM00043 EQU AVTPKF 03003000 @NM00042 EQU AVTPKF 03004000 @NM00041 EQU AVTPKF 03005000 AVTFTCHF EQU AVTPKF 03006000 @NM00040 EQU AVTPKF 03007000 @NM00039 EQU AVTPKF 03008000 @NM00038 EQU AVTPKF 03009000 @NM00037 EQU AVTPKF 03010000 AVTPARM EQU IEDQAVTD+408 03011000 AVTEXS2A EQU IEDQAVTD+402 03012000 AVTEXA2S EQU IEDQAVTD+396 03013000 AVTOCGET EQU IEDQAVTD+392 03014000 AVTCKAVT EQU @NM00035+1 03015000 @NM00036 EQU AVTCKFLG 03016000 AVTCKHLT EQU AVTCKFLG 03017000 AVTCKREQ EQU AVTCKFLG 03018000 AVTCKENV EQU AVTCKFLG 03019000 AVTCKNAC EQU AVTCKFLG 03020000 AVTCKTAC EQU AVTCKFLG 03021000 @NM00034 EQU IEDQAVTD+384 03022000 AVTREADD EQU IEDQAVTD+380 03023000 AVTREADY EQU IEDQAVTD+376 03024000 AVTRACE EQU IEDQAVTD+372 03025000 AVTPASWD EQU IEDQAVTD+360 03026000 AVTCTLCH EQU IEDQAVTD+352 03027000 AVTDOUBL EQU IEDQAVTD+344 03028000 AVTDOUBX EQU IEDQAVTD+336 03029000 AVTDPARM EQU IEDQAVTD+332 03030000 AVTCSTCS EQU IEDQAVTD+328 03031000 AVTDLQ EQU AVTSAVEX+32 03032000 @NM00033 EQU AVTSAVEX 03033000 AVTSAVE4 EQU IEDQAVTD+216 03034000 AVTSAVE3 EQU IEDQAVTD+144 03035000 AVTSAVE2 EQU IEDQAVTD+72 03036000 AVTSAVE1 EQU IEDQAVTD 03037000 TCXEND EQU IEDQTCXD+224 03038000 TCXACTE8 EQU TCXQE8 03039000 TCXABEPL EQU IEDQTCXD+212 03040000 TCXSRBS EQU IEDQTCXD+208 03041000 TCXSIOSB EQU IEDQTCXD+204 03042000 TCXESAVE EQU IEDQTCXD+132 03043000 TCXERPPM EQU IEDQTCXD+128 03044000 TCXERPSV EQU IEDQTCXD+116 03045000 TCXSATTN EQU IEDQTCXD+112 03046000 @NM00032 EQU TCXDSAVE+4 03047000 @NM00031 EQU TCXDSAVE 03048000 TCXPLCB EQU IEDQTCXD+100 03049000 TCXBITS EQU IEDQTCXD+98 03050000 TCXSCBSZ EQU IEDQTCXD+97 03051000 TCXBIT1 EQU IEDQTCXD+96 03052000 TCXCOMPT EQU IEDQTCXD+92 03053000 TCXAVAIL EQU IEDQTCXD+88 03054000 TCXBUFL EQU IEDQTCXD+84 03055000 TCXTOTE EQU TCXBUFA 03056000 TCXCKPM EQU IEDQTCXD+79 03057000 TCXNCKPR EQU IEDQTCXD+78 03058000 TCXSZAIB EQU IEDQTCXD+76 03059000 TCXAIBC EQU IEDQTCXD+72 03060000 TCXPEBC EQU IEDQTCXD+68 03061000 TCXPEWAC EQU IEDQTCXD+64 03062000 TCXQRQ EQU IEDQTCXD+60 03063000 TCXOCQ EQU IEDQTCXD+56 03064000 TCXPNTQ EQU IEDQTCXD+52 03065000 TCXPUTQ EQU IEDQTCXD+48 03066000 TCXGETQ EQU IEDQTCXD+44 03067000 TCXTSI EQU IEDQTCXD+40 03068000 TCXRPT EQU IEDQTCXD+36 03069000 TCXCC3TS EQU IEDQTCXD+35 03070000 TCXAPDMP EQU TCXFLAG1 03071000 TCXAPPL EQU TCXFLAG1 03072000 TCXRTM EQU TCXFLAG1 03073000 TCXMCPCD EQU TCXFLAG1 03074000 TCXAUTH EQU TCXFLAG1 03075000 TCXASCB EQU IEDQTCXD+28 03076000 TCXREADY EQU IEDQTCXD+24 03077000 TCXPASWD EQU IEDQTCXD+16 03078000 TCXDISP EQU IEDQTCXD+12 03079000 TCXTCB EQU IEDQTCXD+8 03080000 TCXATTLN EQU TCXATTEN 03081000 TCXAVT EQU IEDQTCXD 03082000 UCBERADR EQU UCBUCS+12 03083000 UCBFCBID EQU UCBUCS+8 03084000 UCBERCNT EQU UCBUCS+7 03085000 UCBRSV51 EQU UCBUCS+6 03086000 UCBRSV50 EQU UCBFCBOP 03087000 UCBRSV49 EQU UCBFCBOP 03088000 UCBRSV48 EQU UCBFCBOP 03089000 UCBRSV47 EQU UCBFCBOP 03090000 UCBRSV46 EQU UCBFCBOP 03091000 UCBRSV45 EQU UCBFCBOP 03092000 UCBRSV44 EQU UCBFCBOP 03093000 UCBFCBO1 EQU UCBFCBOP 03094000 UCBUCSPE EQU UCBUCSOP 03095000 UCBRSV43 EQU UCBUCSOP 03096000 UCBRSV42 EQU UCBUCSOP 03097000 UCBRSV41 EQU UCBUCSOP 03098000 UCBRSV40 EQU UCBUCSOP 03099000 UCBRSV39 EQU UCBUCSOP 03100000 UCBUCSO2 EQU UCBUCSOP 03101000 UCBUCSO1 EQU UCBUCSOP 03102000 UCBUCSID EQU UCBUCS 03103000 UCBMDRBA EQU UCBMDRBF+1 03104000 UCBRV075 EQU UCBMDRBF 03105000 UCBRV074 EQU UCB3800X+32 03106000 UCBIMAGE EQU UCB3800X+28 03107000 UCBFCBNM EQU UCB3800X+24 03108000 UCBCHAR4 EQU UCB3800X+20 03109000 UCBCHAR3 EQU UCB3800X+16 03110000 UCBCHAR2 EQU UCB3800X+12 03111000 UCBCHAR1 EQU UCB3800X+8 03112000 UCBCGMID EQU UCB3800X+4 03113000 UCBBRSTA EQU UCBACTIV 03114000 UCBRV063 EQU UCBACTIV 03115000 UCBRV062 EQU UCBACTIV 03116000 UCBRV061 EQU UCBACTIV 03117000 UCBRV060 EQU UCBACTIV 03118000 UCBRV059 EQU UCBACTIV 03119000 UCBRV058 EQU UCBACTIV 03120000 UCBRV057 EQU UCBACTIV 03121000 UCBRV050 EQU UCB3800X+2 03122000 UCBCGMNO EQU UCB3800X+1 03123000 UCBRV083 EQU UCBOPTNS 03124000 UCBBRSTR EQU UCBOPTNS 03125000 UCBRV056 EQU UCBOPTNS 03126000 UCBRV055 EQU UCBOPTNS 03127000 UCBRV054 EQU UCBOPTNS 03128000 UCBRV053 EQU UCBOPTNS 03129000 UCBRV052 EQU UCBOPTNS 03130000 UCBRV051 EQU UCBOPTNS 03131000 UCBRV073 EQU UCB3540X+7 03132000 UCBRV072 EQU UCBDKBYT 03133000 UCBRV071 EQU UCBDKBYT 03134000 UCBRV070 EQU UCBDKBYT 03135000 UCBRV069 EQU UCBDKBYT 03136000 UCBRV068 EQU UCBDKBYT 03137000 UCBRV067 EQU UCBDKBYT 03138000 UCBVLVER EQU UCBDKBYT 03139000 UCBDKAMX EQU UCBDKBYT 03140000 UCBVLSER EQU UCB3540X 03141000 UCBRDATA EQU UCBOCR+4 03142000 UCBFRID EQU UCBOCR 03143000 UCBCLN EQU UCBMT+14 03144000 UCBERG EQU UCBMT+12 03145000 UCBMS EQU UCBMT+11 03146000 UCBNB EQU UCBMT+10 03147000 UCBPW EQU UCBMT+9 03148000 UCBPR EQU UCBMT+8 03149000 UCBSIO EQU UCBMT+6 03150000 UCBTW EQU UCBMT+5 03151000 UCBTR EQU UCBMT+4 03152000 UCBTWT EQU UCBMT+3 03153000 UCBTRT EQU UCBMT+2 03154000 UCBCTD EQU UCBMT 03155000 UCBWTOID EQU UCBCMEXT+17 03156000 UCBRV043 EQU UCBCMEXT+16 03157000 UCBASID EQU UCBCMEXT+14 03158000 UCBMFCNT EQU UCBCMEXT+12 03159000 UCBPMSK EQU UCBCMEXT+10 03160000 UCBCCWOF EQU UCBCMEXT+8 03161000 UCBRV041 EQU UCBCMEXT+6 03162000 UCBRV036 EQU UCBFLP1 03163000 UCBRV035 EQU UCBFLP1 03164000 UCBERLOG EQU UCBFLP1 03165000 UCBRV033 EQU UCBFLP1 03166000 UCBRV032 EQU UCBFLP1 03167000 UCBRV031 EQU UCBFLP1 03168000 UCBSHRUP EQU UCBFLP1 03169000 UCBNSRCH EQU UCBFLP1 03170000 UCBSNSCT EQU UCBCMEXT+4 03171000 UCBHPDV EQU @NM00030 03172000 UCBHALI EQU @NM00030 03173000 UCBRSV09 EQU @NM00030 03174000 UCBRSV08 EQU @NM00030 03175000 UCBRSV07 EQU @NM00030 03176000 UCBRSV06 EQU @NM00030 03177000 UCBRSV05 EQU @NM00030 03178000 UCBRSV04 EQU @NM00030 03179000 UCBDTI EQU UCBCMEXT+2 03180000 UCBSTI EQU UCBCMEXT+1 03181000 UCBEXTP EQU UCBEXTPT+1 03182000 UCBDDRSW EQU UCBFLC 03183000 UCBTICBT EQU UCBFLC 03184000 UCBIVRR EQU UCBFLC 03185000 UCBIVRS EQU UCBFLC 03186000 UCBITF EQU UCBFLC 03187000 UCBUDE EQU UCBFLC 03188000 UCBWAA EQU UCBFLC 03189000 UCBATTP EQU UCBFLC 03190000 UCBUNTYP EQU UCBTBYT4 03191000 UCBRSV11 EQU UCBDVCLS 03192000 UCBRSV10 EQU UCBDVCLS 03193000 UCB3CHAR EQU UCBDVCLS 03194000 UCB3UREC EQU UCBDVCLS 03195000 UCB3DISP EQU UCBDVCLS 03196000 UCB3DACC EQU UCBDVCLS 03197000 UCB3COMM EQU UCBDVCLS 03198000 UCB3TAPE EQU UCBDVCLS 03199000 UCBDVPWR EQU UCB2OPT7 03200000 UCBVLPWR EQU UCB2OPT6 03201000 UCB2OPT5 EQU UCBTBYT2 03202000 UCBRVDEV EQU UCBRWTAU 03203000 UCBRPS EQU UCBDUDN2 03204000 UCBRR EQU UCBDUDN1 03205000 UCB2OPT1 EQU UCBTBYT2 03206000 UCB2OPT0 EQU UCBTBYT2 03207000 UCB1FEA7 EQU UCBTBYT1 03208000 UCBD6250 EQU UCB1FEA6 03209000 UCBD1600 EQU UCB1FEA5 03210000 UCB1FEA4 EQU UCBTBYT1 03211000 UCB1FEA3 EQU UCBTBYT1 03212000 UCB1FEA2 EQU UCBTBYT1 03213000 UCB1FEA1 EQU UCBTBYT1 03214000 UCB1FEA0 EQU UCBTBYT1 03215000 UCBNAME EQU UCBOB+13 03216000 UCBRV029 EQU UCBWGT 03217000 UCBVHRSN EQU UCBWGT 03218000 UCBVORSN EQU UCBWGT 03219000 UCBMTPXP EQU UCBWGT 03220000 UCBREW EQU UCBWGT 03221000 UCBPUB EQU UCBWGT 03222000 UCBOUT EQU UCBWGT 03223000 UCBIN EQU UCBWGT 03224000 UCBCPU EQU UCBOB+11 03225000 UCBLCI EQU UCBOB+10 03226000 UCBCNT EQU UCBOB+9 03227000 UCBRV017 EQU UCBCHM1 03228000 UCBRV016 EQU UCBCHM1 03229000 UCBRV015 EQU UCBCHM1 03230000 UCBRV014 EQU UCBCHM1 03231000 UCBSPB EQU UCBPTH1 03232000 UCBPPB EQU UCBPTH1 03233000 UCBSPA EQU UCBPTH0 03234000 UCBPPA EQU UCBPTH0 03235000 UCBSIGP EQU UCBFLB 03236000 UCBVALPH EQU UCBFLB 03237000 UCBCRHSN EQU UCBFLB 03238000 UCBCRHRV EQU UCBFLB 03239000 UCBRESVH EQU UCBFLB 03240000 UCBSPST EQU UCBFLB 03241000 UCBASNS EQU UCBFLB 03242000 UCBIORST EQU UCBFLB 03243000 UCBQISCE EQU UCBFL1 03244000 UCBACTV EQU UCBFL1 03245000 UCBSAP EQU UCBFL1 03246000 UCBNOTRC EQU UCBCUB 03247000 UCBPSNS EQU UCBFL1 03248000 UCBUSING EQU UCBPST 03249000 UCBNOTRD EQU UCBNRY 03250000 UCBBUSYD EQU UCBBSY 03251000 UCBUA EQU UCBCHAN+1 03252000 UCBCHA EQU UCBCHAN 03253000 UCBDADI EQU UCBSTAT 03254000 UCBSYSR EQU UCBSTAT 03255000 UCBPRES EQU UCBSTAT 03256000 UCBALOC EQU UCBSTAT 03257000 UCBUNLD EQU UCBSTAT 03258000 UCBRESV EQU UCBSTAT 03259000 UCBCHGS EQU UCBSTAT 03260000 UCBONLI EQU UCBSTAT 03261000 UCBID EQU UCBOB+2 03262000 UCBALTPH EQU UCBFL5 03263000 UCBALTCU EQU UCBFL5 03264000 UCBNALOC EQU UCBFL5 03265000 UCBENVRD EQU UCBFL5 03266000 UCBVSDR EQU UCBFL5 03267000 UCBSASK EQU UCBFL5 03268000 UCBAMV EQU UCBAF 03269000 UCBDCC EQU UCBFL5 03270000 UCBMONT EQU UCBJBNR 03271000 UCBRV011 EQU UCBJBNR 03272000 UCBRSV02 EQU UCBJBNR 03273000 UCBOLDSM EQU UCBJBNR 03274000 UCBRV003 EQU UCBJBNR 03275000 UCBDUC EQU UCBJBNR 03276000 UCBJES3 EQU UCBJBNR 03277000 UCBVRDEV EQU UCBJBNR 03278000 UCBCMSEG EQU UCBOB 03279000 UCBPFXND EQU UCB+512 03280000 UCBIOQ EQU UCB+508 03281000 UCBLOCK EQU UCB+504 03282000 UCBPXST EQU UCB+504 03283000 @NM00027 EQU UCB 03284000 VOIEND EQU VOID+12 03285000 VOIEXTNT EQU VOID+8 03286000 IOCOEND EQU IOCOM+128 03287000 IOCPATCH EQU IOCOM+124 03288000 IOCUCBBM EQU IOCOM+120 03289000 IOCQCNT EQU IOCOM+116 03290000 IOCIOSDQ EQU IOCOM+112 03291000 IOCIOSEQ EQU IOCOM+108 03292000 IOCSVCF EQU IOCOM+104 03293000 IOCTCCW EQU IOCOM+100 03294000 IOCRSVTB EQU IOCOM+96 03295000 IOCMFCNT EQU IOCOM+92 03296000 IOCMFHK EQU IOCOM+88 03297000 IOCGENA EQU IOCOM+84 03298000 IOCCCH EQU IOCOM+80 03299000 IOCASYNQ EQU IOCOM+76 03300000 IOCLCHTB EQU IOCOM+72 03301000 IOCATTBL EQU IOCOM+68 03302000 IOCOMEX EQU IOCOM+64 03303000 IOCSYNCH EQU IOCOM+56 03304000 IOCCATLK EQU IOCOM+48 03305000 IOCPRGID EQU IOCOM+44 03306000 IOCIOSCP EQU IOCOM+40 03307000 IOCORMGT EQU IOCOM+36 03308000 IOCSTIO EQU IOCOM+28 03309000 @NM00026 EQU IOCOM+24 03310000 @NM00025 EQU IOCOM+20 03311000 IOCINT EQU IOCOM+16 03312000 IOCCTBL EQU IOCOM+12 03313000 IOCHIO EQU IOCOM+8 03314000 IOCPST EQU IOCOM+4 03315000 IOCPGCT EQU IOCOM+2 03316000 IOCVOICT EQU IOCOM 03317000 @NM00024 EQU SRB+40 03318000 @NM00023 EQU SRB+38 03319000 SRBPRIOR EQU SRB+37 03320000 SRBPKF EQU SRB+36 03321000 SRBSAVE EQU SRB+32 03322000 SRBRMTR EQU SRB+24 03323000 SRBEP EQU SRB+20 03324000 SRBPTCB EQU SRBFLC+4 03325000 SRBPASID EQU SRBFLC+2 03326000 SRBCPAFF EQU SRBFLC 03327000 SRBASCB EQU SRB+8 03328000 SRBFLNK EQU SRB+4 03329000 IOSEND EQU IOSB+108 03330000 IOSSKR EQU IOSEEKA+7 03331000 IOSSKH2 EQU IOSSKHH+1 03332000 IOSSKH1 EQU IOSSKHH 03333000 IOSSKCC EQU IOSCCHH 03334000 IOSSKBB EQU IOSEEKA+1 03335000 IOSSKM EQU IOSEEKA 03336000 IOSEEK EQU IOSB+92 03337000 IOSMDM EQU IOSB+91 03338000 IOSMDB EQU IOSB+90 03339000 IOSCKEY7 EQU IOSCKEY 03340000 IOSCKEY6 EQU IOSCKEY 03341000 IOSCKEY5 EQU IOSCKEY 03342000 IOSCKEY4 EQU IOSCKEY 03343000 @NM00019 EQU IOSCKEY 03344000 IOSFMSK EQU IOSB+88 03345000 IOSCUDEV EQU IOSPATH+1 03346000 @NM00018 EQU IOSCHN 03347000 IOSPATH3 EQU IOSCHN 03348000 IOSPATH2 EQU IOSCHN 03349000 IOSEXP EQU IOSCHN 03350000 IOSGDP EQU IOSCHN 03351000 IOSAFF EQU IOSB+85 03352000 IOSRSS1B EQU IOSB+84 03353000 IOSVST EQU IOSB+76 03354000 IOSRST EQU IOSB+72 03355000 IOSDIE EQU IOSB+68 03356000 IOSABN EQU IOSB+64 03357000 IOSNRM EQU IOSB+60 03358000 IOSPCI EQU IOSB+56 03359000 IOSERP EQU IOSB+52 03360000 IOSPCHN EQU IOSB+48 03361000 IOSSNS EQU IOSB+42 03362000 IOSAPMSK EQU IOSB+40 03363000 IOSRES4A EQU IOSB+36 03364000 IOSCSWRC EQU IOSCSW+5 03365000 IOSTSB EQU IOSTATUS+1 03366000 IOSTSA EQU IOSTATUS 03367000 IOSCSWCA EQU IOSCSW 03368000 IOSCC EQU @NM00017 03369000 IOSOPT2X EQU IOSOPT2 03370000 IOSHTP EQU IOSOPT2 03371000 IOSRELSE EQU IOSOPT 03372000 IOSAPR EQU IOSOPT 03373000 IOSTSLL EQU IOSOPT 03374000 IOSNERP EQU IOSOPT 03375000 IOSPSLL EQU IOSOPT 03376000 IOSQISCE EQU IOSOPT 03377000 IOSDEP EQU IOSOPT 03378000 IOSBYP EQU IOSOPT 03379000 IOSCOD EQU IOSB+13 03380000 IOSPKY7 EQU IOSPKEY 03381000 IOSPGDPX EQU IOSPKEY 03382000 IOSIDR EQU IOSPKEY 03383000 IOSLCL EQU IOSPKEY 03384000 @NM00016 EQU IOSPKEY 03385000 IOSPRLVL EQU IOSB+5 03386000 IOSPROC EQU IOSB+3 03387000 IOSFLC7 EQU IOSFLC 03388000 IOSFLC6 EQU IOSFLC 03389000 IOSRWAIT EQU IOSFLC 03390000 IOSTP EQU IOSFLC 03391000 IOSCC3WE EQU IOSFLC 03392000 IOSVERIF EQU IOSDVALT 03393000 IOSDVMNT EQU IOSFLC 03394000 IOSLOG EQU IOSFLB 03395000 IOSBDCST EQU IOSFLB 03396000 IOSMSG EQU IOSFLB 03397000 IOSFLB4 EQU IOSFLB 03398000 IOSFLB3 EQU IOSFLB 03399000 IOSFLB2 EQU IOSFLB 03400000 IOSSDR EQU IOSFLB 03401000 IOSDIESE EQU IOSFLB 03402000 IOSIOSB EQU IOSFLA 03403000 IOSDOM EQU IOSFLA 03404000 IOSEX EQU IOSFLA 03405000 IOSSMDB EQU IOSFLA 03406000 IOSSMDA EQU IOSFLA 03407000 IOSERR EQU IOSFLA 03408000 IOSCCHN EQU IOSACHN 03409000 IOSDCHN EQU IOSACHN 03410000 DSECTSIZ EQU FORCORE+652 03411000 DXWORKE8 EQU DXWORKE+28 03412000 DXWORKE7 EQU DXWORKE+24 03413000 DXWORKE6 EQU DXWORKE+20 03414000 DXWORKE5 EQU DXWORKE+16 03415000 DXWORKE4 EQU DXWORKE+12 03416000 DXWORKE3 EQU DXWORKE+8 03417000 DXWORKE2 EQU DXWORKE+4 03418000 DXWORKE1 EQU DXWORKE 03419000 DXRACRES EQU FORCORE+617 03420000 @NM00015 EQU DXRACFLG 03421000 DXRACUPD EQU DXRACFLG 03422000 DXRDELET EQU DXRACFLG 03423000 @NM00014 EQU DXRACFLG 03424000 DXRACID EQU FORCORE+613 03425000 @NM00013 EQU DXRACIND 03426000 DXRFOPEN EQU DXRACIND 03427000 @NM00012 EQU DXRACIND 03428000 DXATEXB2 EQU DXATEXC2 03429000 DXATEXB1 EQU DXATEXC1 03430000 DXATCOM4 EQU FORCORE+600 03431000 DXATCOM3 EQU FORCORE+596 03432000 @NM00011 EQU DXATCOM2+3 03433000 @NM00010 EQU DXATALL 03434000 DXATSWAP EQU DXATALL 03435000 DXATFC EQU DXATALL 03436000 @NM00009 EQU DXATOPEN 03437000 DXATDFIN EQU DXATOPEN 03438000 DXATDSIN EQU DXATOPEN 03439000 DXATMODM EQU DXATOPEN 03440000 DXATMODE EQU DXATOPEN 03441000 DXATMODS EQU DXATOPEN 03442000 DXATIGN EQU DXATOPEN 03443000 DXATVCAT EQU DXATEOV 03444000 DXATDADM EQU DXATEOV 03445000 DXATREMT EQU DXATEOV 03446000 DXATDNEW EQU DXATEOV 03447000 DXATDFRE EQU DXATEOV 03448000 DXATDCHN EQU DXATEOV 03449000 DXATNVOL EQU DXATEOV 03450000 DXATCCAT EQU DXATEOV 03451000 DXATRDDB EQU DXATDACC 03452000 DXATEOF EQU DXATDACC 03453000 @NM00008 EQU DXATDACC 03454000 DXATSMF EQU DXATDACC 03455000 DXATUPDB EQU DXATDACC 03456000 DXATDRCT EQU DXATDACC 03457000 DXATTRAK EQU DXATDACC 03458000 DXATF1CE EQU DXATDACC 03459000 DXATNSL EQU DXATOUTA 03460000 DXATTTM2 EQU DXATOUTA 03461000 DXATTTM1 EQU DXATOUTA 03462000 DXATTRL2 EQU DXATOUTA 03463000 DXATTRL1 EQU DXATOUTA 03464000 DXATDATM EQU DXATOUTA 03465000 DXATHDTM EQU DXATOUTA 03466000 DXATVLHD EQU DXATOUTA 03467000 DXATCLOS EQU DXATCOM1+1 03468000 DXATSRET EQU DXATGENS 03469000 DXATVCIG EQU DXATVGIV 03470000 DXATVTMG EQU DXATVGIV 03471000 DXATVSMG EQU DXATVGIV 03472000 DXATJFCB EQU DXATGENS 03473000 DXATDISP EQU DXATGENS 03474000 DXATREFR EQU DXATGENS 03475000 DXATDMCT EQU DXATGENS 03476000 DXMSGADR EQU FORCORE+584 03477000 DXPRPARC EQU FORCORE+580 03478000 DXUDCBML EQU FORCORE+578 03479000 DXUDCBPL EQU FORCORE+576 03480000 DXPACBAD EQU DXPDCBAD+1 03481000 @NM00007 EQU DXPDCBAD 03482000 DXUACBAD EQU DXUDCBAD+1 03483000 @NM00006 EQU DXUDCBAD 03484000 DXUCBSVV EQU DXUCBSAV+1 03485000 @NM00005 EQU DXUCBSAV 03486000 DXUCBADR EQU FORCORE+560 03487000 DXTIOTAD EQU FORCORE+556 03488000 DXDEBXAD EQU FORCORE+552 03489000 DXDSAB EQU FORCORE+548 03490000 DXDSABAD EQU FORCORE+544 03491000 DXDSABQD EQU FORCORE+540 03492000 DXJSCBAD EQU FORCORE+536 03493000 DXTCBADR EQU FORCORE+532 03494000 DXASCBAD EQU FORCORE+528 03495000 DXEXTSW EQU FORCORE+527 03496000 DXWKEYSV EQU FORCORE+525 03497000 DXRESSW EQU FORCORE+524 03498000 DXUNITOF EQU FORCORE+522 03499000 DXNOUNIT EQU FORCORE+520 03500000 DXVOLSEQ EQU FORCORE+518 03501000 DXVOLMT3 EQU DXVOLSR3 03502000 DXVOLMT2 EQU DXVOLSR2 03503000 DXVOLMT1 EQU DXVOLSR1 03504000 DXWORK4 EQU FORCORE+496 03505000 DXWORK3 EQU FORCORE+492 03506000 DXWORK2 EQU FORCORE+488 03507000 DXWORK1 EQU FORCORE+484 03508000 DXWORK EQU FORCORE+480 03509000 DXXCTL EQU FORCORE+472 03510000 @NM00004 EQU FORCORE+464 03511000 DXCCW12 EQU DXCCW+88 03512000 DXCCW11 EQU DXCCW+80 03513000 DXCCW10 EQU DXCCW+72 03514000 DXCCW9 EQU DXCCW+64 03515000 DXCCW8 EQU DXCCW+56 03516000 DXCCW7 EQU DXCCW+48 03517000 DXCCW6 EQU DXCCW+40 03518000 DXCCW5 EQU DXCCW+32 03519000 DXCCW4 EQU DXCCW+24 03520000 DXCCW3 EQU DXCCW+16 03521000 DXCCW2 EQU DXCCW+8 03522000 DXCCW1 EQU DXCCW 03523000 DXDCBDEB EQU DXDCB+44 03524000 @NM00003 EQU DXDCB+24 03525000 DXDEBDCB EQU DXDCB+20 03526000 @NM00002 EQU DXDCB 03527000 DXDEB EQU DXDAADDR+4 03528000 @NM00001 EQU DXDAADDR 03529000 DXIOB EQU FORCORE+280 03530000 DXECB EQU FORCORE+276 03531000 DXJBF EQU FORCORE+100 03532000 DSCCORE EQU FORCORE+96 03533000 DXLBL EQU DXDSCB 03534000 * END UNREFERENCED COMPONENTS 03535000 @RT00276 EQU ABEND32 03536000 @RT00292 EQU ABENDJ 03537000 @RT00312 EQU ABEND17 03538000 @RT00319 EQU ABEND17 03539000 @RT00324 EQU ABEND6 03540000 @RT00383 EQU ABEND33 03541000 @RT00396 EQU ABEND33 03542000 @EL01 EQU @EL00001 03543000 @ENDDATA EQU * 03544000 @DATEND EQU * 03545000 END IGG0198B,(C'PLS1554',0701,77164) 03546000