TITLE 'IEDQNV,3705 RESTART READ *00001000 ' 00002000 IEDQNV CSECT , 01S0001 00003000 @PROLOG DS 0H 01S0002 00004000 * RBASE=REG15; /* SET BASE REGISTER */ 00005000 LR RBASE,REG15 02S0357 00006000 * GEN REFS(RBASE) NOSETS; 02S0358 00007000 * /* 00008000 USING IEDQNV,RBASE ESTABLISH ADDRESSABILITY 00009000 IEDQNV IEDHJN AFTERHJN,HJN MODULE IDENTIFICATION MACRO 00010000 * STM(REG02,REG15,QNVSAV); /* SAVE QNF'S REGISTERS */ 00011000 STM REG02,REG15,QNVSAV 02S0359 00012000 * RCAVT=AVTCKAVT; /* GET ADDRESS OF THE CKPT AVT */ 00013000 L RCAVT,AVTCKAVT-1(,RAVT) 02S0360 00014000 LA RCAVT,0(,RCAVT) 02S0360 00015000 * RCKPT=CAVTNWA; /* GET ADDR OF CKPT WORK AREA */ 00016000 L RCKPT,CAVTNWA(,RCAVT) 02S0361 00017000 * ROPCE=OPCCKPTF; /* GET OPCE ADDRESS - OPCE TO BE 00018000 * CKPT'D IS THE FIRST ONE ON THE 00019000 * OP CONTROL QUEUE FOR 02S0362 00020000 * CHECKPOINT */ 00021000 L @10,ROPCAVT(,RAVT) 02S0362 00022000 L ROPCE,OPCCKPTF(,@10) 02S0362 00023000 * RSAVE=ADDR(CKPSAVE2); /* SET UP SAVE AREA PTR */ 00024000 LA RSAVE,CKPSAVE2(,RCKPT) 02S0363 00025000 * RFY 02S0364 00026000 * REG12 UNRSTD; 02S0364 00027000 * 02S0365 00028000 * /*****************************************************************/ 00029000 * /* */ 00030000 * /* PROCESS: THIS SEGMENT DOES THE PROCESSING THAT IS NECESSARY TO*/ 00031000 * /* PERFORM THE FUNCTION OF THE MODULE. */ 00032000 * /* */ 00033000 * /*****************************************************************/ 00034000 * 02S0365 00035000 * FLAGS=''B; /* INITIALIZE FLAGS AND SWITCHES */ 00036000 XC FLAGS(4),FLAGS 02S0365 00037000 * DO UNTIL LOOPFLAG=OFF; /* LOOP UNTIL GET SOMETHING TO 00038000 * SEND TO FF */ 00039000 @DL00366 DS 0H 02S0367 00040000 * LOOPFLAG=OFF; /* TURN OFF LOOP FLAG */ 00041000 NI LOOPFLAG,B'11111101' 02S0367 00042000 * IF CAVTWTG^=0 THEN /* IF NOT REQUEST FROM FF THEN */ 00043000 CLI CAVTWTG(RCAVT),0 02S0368 00044000 BE @RF00368 02S0368 00045000 * DO; 02S0369 00046000 * 02S0369 00047000 * /***********************************************************/ 00048000 * /* */ 00049000 * /* READ AND CHECK RESOURCE RECORDS */ 00050000 * /* */ 00051000 * /***********************************************************/ 00052000 * 02S0370 00053000 * 03S0370 00054000 * /***********************************************************/ 00055000 * /* */ 00056000 * /* PROCESS.READER: THIS SEGMENTDETERMINES IF THE READ JUST */ 00057000 * /* COMPLETED WAS FOR FLIP-FLOP 1 OR 2 FOR THE RESOURCE. IF */ 00058000 * /* COMPLETION OF 1, THEN THE READ FOR 2 IS INITIATED. IF */ 00059000 * /* THE COMPLETION IS FOR 2, THEN THE RESOURCE RECORDS ARE */ 00060000 * /* CHECKED TO DETERMINE IF THEY SHOULD BE GIVEN TO FF FOR */ 00061000 * /* PROCESSING. IF AN I/O ERROR IS ENCOUNTERED, THEN THE */ 00062000 * /* READ AREA IS CLEARED, AND PROCESSING CONTINUES. */ 00063000 * /* */ 00064000 * /***********************************************************/ 00065000 * 03S0370 00066000 * IF CKPNTRK=0 THEN /* IF THIS IS READ 1 THEN DO READ 00067000 * 2 */ 00068000 LH @12,CKPNTRK(,RCKPT) 03S0370 00069000 LTR @12,@12 03S0370 00070000 BNZ @RF00370 03S0370 00071000 * DO; 03S0371 00072000 * IF CKPIOECC^=CKPIOCOM THEN/* IF I/O ERROR */ 00073000 CLI CKPIOECC(RCKPT),X'7F' 03S0372 00074000 BE @RF00372 03S0372 00075000 * DO; 03S0373 00076000 * STORCTR=CKPBLKSZ; /* SET UP SIZE TO BE CLEARED */ 00077000 LH STORCTR,CKPBLKSZ(,RCKPT) 03S0374 00078000 * RFY 03S0375 00079000 * REG08 RSTD; /* RESTRICT REG */ 00080000 * REG08=NRAR1PTR; /* POINT TO AREA TO BE CLEARED */ 00081000 L @12,OCRSTGTM(,ROPCE) 03S0376 00082000 L REG08,NRAR1PTR(,@12) 03S0376 00083000 * CALL CLEARIT; /* AND CLEAR IT */ 00084000 BAL @14,CLEARIT 03S0377 00085000 * RFY 03S0378 00086000 * REG08 UNRSTD; 03S0378 00087000 * END; 03S0379 00088000 * ELSE 03S0380 00089000 * ; 03S0380 00090000 @RF00372 DS 0H 03S0381 00091000 * CKPNRSID=OCRESNUM; /* SET RESOURCE ID */ 00092000 LH @12,OCRESNUM(,ROPCE) 03S0381 00093000 N @12,@CF02214 03S0381 00094000 STH @12,CKPNRSID(,RCKPT) 03S0381 00095000 * CKPNTRK=CKPTRKCN; /* SET FOR READ */ 00096000 LH @12,CKPTRKCN(,RCKPT) 03S0382 00097000 STH @12,CKPNTRK(,RCKPT) 03S0382 00098000 * CKPRWCMD=CKPREAD; /* SET TO READ */ 00099000 MVI CKPRWCMD(RCKPT),X'06' 03S0383 00100000 * CKPRWADD=NRAR2PTR; /* READ INTO READ 2 AREA */ 00101000 L @12,OCRSTGTM(,ROPCE) 03S0384 00102000 MVC CKPRWADD(3,RCKPT),NRAR2PTR+1(@12) 03S0384 00103000 * CKPRWBC=CKPBLKSZ; /* SET AMOUNT TO READ */ 00104000 LH @12,CKPBLKSZ(,RCKPT) 03S0385 00105000 STH @12,CKPRWBC(,RCKPT) 03S0385 00106000 * CALL IEDQNW; /* INITIATE READ-WAIT */ 00107000 L @15,CAVTCRIO(,RCAVT) 03S0386 00108000 BALR @14,@15 03S0386 00109000 * CAVTWTG=CKPRNCP; /* SET WAIT RETURN TO THIS MODULE*/ 00110000 MVI CAVTWTG(RCAVT),X'70' 03S0387 00111000 * END; 03S0388 00112000 * ELSE /* ELSE IS COMPLETION OF READ 2 00113000 * SO COMPARE THE TWO */ 00114000 * DO; 03S0389 00115000 B @RC00370 03S0389 00116000 @RF00370 DS 0H 03S0390 00117000 * IF CKPIOECC^=CKPIOCOM THEN/* IF I/O ERROR */ 00118000 CLI CKPIOECC(RCKPT),X'7F' 03S0390 00119000 BE @RF00390 03S0390 00120000 * DO; 03S0391 00121000 * STORCTR=CKPBLKSZ; /* SET UP SIZE TO BE CLEARED */ 00122000 LH STORCTR,CKPBLKSZ(,RCKPT) 03S0392 00123000 * RFY 03S0393 00124000 * REG08 RSTD; /* RESTRICT REG */ 00125000 * REG08=NRAR2PTR; /* POINT TO AREA TO BE CLEARED */ 00126000 L @12,OCRSTGTM(,ROPCE) 03S0394 00127000 L REG08,NRAR2PTR(,@12) 03S0394 00128000 * CALL CLEARIT; /* AND CLEAR IT */ 00129000 BAL @14,CLEARIT 03S0395 00130000 * RFY 03S0396 00131000 * REG08 UNRSTD; 03S0396 00132000 * END; 03S0397 00133000 * ELSE 03S0398 00134000 * ; 03S0398 00135000 @RF00390 DS 0H 03S0399 00136000 * 04S0399 00137000 * /*******************************************************/ 00138000 * /* */ 00139000 * /* PROCESS.READER.CHECK: THIS SEGMENT COMPARES THE */ 00140000 * /* FLIP-FLOP 1 AND 2 RESOURCE RECORDS TO DETERMINE IF */ 00141000 * /* ANY COMMANDS HAVE BEEN CHECKPOINTED, AND IF SO WHICH*/ 00142000 * /* RECORD IS THE MOST RECENT. THE MOST RECENT IS */ 00143000 * /* CHECKED TO SEE IF IS MORE CURRENT THAN THE DATE-TIME*/ 00144000 * /* IN THE 3705 CONTROL RECORD. IF SO, IT IS TURNED OVER*/ 00145000 * /* TO FF TO PROCESS. ELSE, ANOTHER READ CYCLE IS */ 00146000 * /* INITIATED */ 00147000 * /* */ 00148000 * /*******************************************************/ 00149000 * 04S0399 00150000 * IF NRAR1PTR->CNRCNTL^=0 THEN/* IF CMNDS ON THIS READ */ 00151000 L @12,OCRSTGTM(,ROPCE) 04S0399 00152000 L @10,NRAR1PTR(,@12) 04S0399 00153000 LH @08,CNRCNTL(,@10) 04S0399 00154000 N @08,@CF02214 04S0399 00155000 LTR @08,@08 04S0399 00156000 BZ @RF00399 04S0399 00157000 * IF NRAR2PTR->CNRCNTL^=0 THEN/* AND READ 2 */ 00158000 L @08,NRAR2PTR(,@12) 04S0400 00159000 LH @02,CNRCNTL(,@08) 04S0400 00160000 N @02,@CF02214 04S0400 00161000 LTR @02,@02 04S0400 00162000 BZ @RF00400 04S0400 00163000 * IF NRAR1PTR->CNRDATTM>NRAR2PTR->CNRDATTM THEN/* SET 00164000 * PTR TO THE */ 00165000 CLC CNRDATTM(8,@10),CNRDATTM(@08) 04S0401 00166000 BNH @RF00401 04S0401 00167000 * NRACURR=NRAR1PTR;/* MOST RECENT ONE */ 00168000 ST @10,NRACURR(,@12) 04S0402 00169000 * ELSE 04S0403 00170000 * NRACURR=NRAR2PTR; 04S0403 00171000 B @RC00401 04S0403 00172000 @RF00401 L @12,OCRSTGTM(,ROPCE) 04S0403 00173000 L @10,NRAR2PTR(,@12) 04S0403 00174000 ST @10,NRACURR(,@12) 04S0403 00175000 * ELSE 04S0404 00176000 * NRACURR=NRAR1PTR; /* POINT TO READ 1 IF ONLY */ 00177000 B @RC00400 04S0404 00178000 @RF00400 L @12,OCRSTGTM(,ROPCE) 04S0404 00179000 L @10,NRAR1PTR(,@12) 04S0404 00180000 ST @10,NRACURR(,@12) 04S0404 00181000 * ELSE 04S0405 00182000 * IF NRAR2PTR->CNRCNTL^=0 THEN/* IF NO RD 1 BUT SOME RD 00183000 * 2 THEN */ 00184000 B @RC00399 04S0405 00185000 @RF00399 L @12,OCRSTGTM(,ROPCE) 04S0405 00186000 L @10,NRAR2PTR(,@12) 04S0405 00187000 LH @08,CNRCNTL(,@10) 04S0405 00188000 N @08,@CF02214 04S0405 00189000 LTR @08,@08 04S0405 00190000 BZ @RF00405 04S0405 00191000 * NRACURR=NRAR2PTR; /* POINT TO RD 2 */ 00192000 ST @10,NRACURR(,@12) 04S0406 00193000 * ELSE /* SET TO READ NEXT IF NONE TO BE 00194000 * PROCESSED */ 00195000 * DO; 04S0407 00196000 B @RC00405 04S0407 00197000 @RF00405 DS 0H 04S0408 00198000 * CAVTWTG=0; /* RESET WTG */ 00199000 MVI CAVTWTG(RCAVT),X'00' 04S0408 00200000 * LOOPFLAG=ON; /* AND SET TO LOOP */ 00201000 OI LOOPFLAG,B'00000010' 04S0409 00202000 * END; 04S0410 00203000 * IF LOOPFLAG=OFF THEN /* IF FOUND ONE */ 00204000 @RC00405 DS 0H 04S0411 00205000 @RC00399 TM LOOPFLAG,B'00000010' 04S0411 00206000 BNZ @RF00411 04S0411 00207000 * IF CKPDATTMCNRDATTM THEN/* AND MORE RECENT 00208000 * THAN LAST */ 00209000 L @12,OCRSTGTM(,ROPCE) 04S0412 00210000 L @12,NRACURR(,@12) 04S0412 00211000 CLC CKPDATTM(8,RCKPT),CNRDATTM(@12) 04S0412 00212000 BNL @RF00412 04S0412 00213000 * CALL GO06; /* SET UP TO GIVE TO FF FOR 04S0413 00214000 * PROCESSING */ 00215000 BAL @14,GO06 04S0413 00216000 * ELSE 04S0414 00217000 * DO; 04S0414 00218000 B @RC00412 04S0414 00219000 @RF00412 DS 0H 04S0415 00220000 * CAVTWTG=0; 04S0415 00221000 MVI CAVTWTG(RCAVT),X'00' 04S0415 00222000 * LOOPFLAG=ON; 04S0416 00223000 OI LOOPFLAG,B'00000010' 04S0416 00224000 * END; 04S0417 00225000 * END; 03S0418 00226000 * END; 02S0419 00227000 * ELSE /* ELSE IS REQUEST FROM IGCFF10D */ 00228000 * DO; 02S0420 00229000 * 02S0420 00230000 B @RC00368 02S0420 00231000 @RF00368 DS 0H 02S0421 00232000 * /***********************************************************/ 00233000 * /* */ 00234000 * /* START READ PROCESSING */ 00235000 * /* */ 00236000 * /***********************************************************/ 00237000 * 02S0421 00238000 * 03S0421 00239000 * /***********************************************************/ 00240000 * /* */ 00241000 * /* PROCESS.STARTER: THIS SEGMENT IS INVOKED IF THE OPCE IS */ 00242000 * /* A REQUEST FROM IGCFF10D TO FIND ANY APPLICABLE RESOURCE */ 00243000 * /* RECORDS TO BE SENT BACK TO THE 3705. IF THE RESOURCE */ 00244000 * /* NUMBER IN THE OPCE IS 0, THIS IS THE FIRST REQUEST AND */ 00245000 * /* AN AREA MUST BE GETMAINED FOR THE READ AREA. IF THE */ 00246000 * /* NUMBER IS NOT 0, THEN THE READ AREA IS CLEARED. ONE IS */ 00247000 * /* ADDED TO THE RESOURCE NO. AND IF THE RESULTANT NO. IS */ 00248000 * /* NOT GREATER THAN THE TOTAL NO. OF RESOURCES, THEN A READ*/ 00249000 * /* IS INITIATED FOR THE FIRST FLIP- FLOP RESOURCE RECORD */ 00250000 * /* FOR THE RESOURCE. IF THE NO. IS GREATER THAN THE TOTAL */ 00251000 * /* NO. OF RESOURCES, THE READ AREA IS FREEMAINED, AND THE */ 00252000 * /* RESOURCE NUMBER IS SET TO 0 TO SIGNAL FF THAT NO MORE */ 00253000 * /* RESOURCE RECORDS ARE TO BE READ. */ 00254000 * /* */ 00255000 * /***********************************************************/ 00256000 * 03S0421 00257000 * IF OCRESNUM^=0 THEN /* IF THIS IS NOT THE FIRST 03S0421 00258000 * REQUEST FROM FF */ 00259000 LH @12,OCRESNUM(,ROPCE) 03S0421 00260000 N @12,@CF02214 03S0421 00261000 LTR @12,@12 03S0421 00262000 BZ @RF00421 03S0421 00263000 * DO; /* THEN CLEAR THE READ AREAS */ 00264000 * RFY 03S0423 00265000 * REG08 RSTD; /* RESTRICT REG */ 00266000 * REG08=ADDR(NRAREAD); /* POINT TO READ AREA */ 00267000 L REG08,OCRSTGTM(,ROPCE) 03S0424 00268000 LA REG08,NRAREAD(,REG08) 03S0424 00269000 * STORCTR=(2*CKPBLKSZ); /* CLEAR BOTH READ AREAS */ 00270000 LH STORCTR,CKPBLKSZ(,RCKPT) 03S0425 00271000 ALR STORCTR,STORCTR 03S0425 00272000 * CALL CLEARIT; /* CALL THE CLEAR ROUTINE */ 00273000 BAL @14,CLEARIT 03S0426 00274000 * RFY 03S0427 00275000 * REG08 UNRSTD; /* RELEASE REG */ 00276000 * END; 03S0428 00277000 * ELSE /* ELSE MUST GETMAIN READ AREA */ 00278000 * DO; 03S0429 00279000 B @RC00421 03S0429 00280000 @RF00421 DS 0H 03S0430 00281000 * 04S0430 00282000 * /*******************************************************/ 00283000 * /* */ 00284000 * /* PROCESS.STARTER.SETUP: THIS SEGMENT PERFORMS THE */ 00285000 * /* GETMAIN FOR THE READ AREA AND INITIALIZES IT. IF THE*/ 00286000 * /* GETMAIN FAILS, A WTO IS PERFORMED TO NOTIFY THE */ 00287000 * /* OPERATOR, AND NO RESTART IS PERFORMED FOR THIS NCP. */ 00288000 * /* */ 00289000 * /*******************************************************/ 00290000 * 04S0430 00291000 * RFY 04S0430 00292000 * RSTGSZ RSTD; /* RESTRICT THE GETMAIN SIZE REG */ 00293000 * RSTGSZ=(2*CKPBLKSZ)+(ADDR(NRAREAD)-ADDR(IEDNRA));/* SET 00294000 * SIZE */ 00295000 LH RSTGSZ,CKPBLKSZ(,RCKPT) 04S0431 00296000 ALR RSTGSZ,RSTGSZ 04S0431 00297000 AL RSTGSZ,@CF00169 04S0431 00298000 * RPARM=ADDR(GETMLIST); /* SET PTR TO GETMAIN LIST */ 00299000 LA RPARM,GETMLIST 04S0432 00300000 * GEN REFS(GETMLIST,RSTGSZ) SETS(OCRSTGTM,REG15); 04S0433 00301000 * /* 00302000 GETMAIN EC,LV=(RSTGSZ),A=OCRSTGTM(ROPCE),MF=(E,(1)) 00303000 * IF REG15=0 THEN /* IF GETMAIN OK THEN INIT AREA */ 00304000 LTR REG15,REG15 04S0434 00305000 BNZ @RF00434 04S0434 00306000 * DO; 04S0435 00307000 * RFY 04S0436 00308000 * REG08 RSTD; /* RESTRICT REG */ 00309000 * STORCTR=RSTGSZ; /* SET STORCTR=SIZE TO CLEAR */ 00310000 LR STORCTR,RSTGSZ 04S0437 00311000 * REG08=OCRSTGTM; /* POINT REG08 TO AREA */ 00312000 L REG08,OCRSTGTM(,ROPCE) 04S0438 00313000 * CALL CLEARIT; /* AND CLEAR THE AREA */ 00314000 BAL @14,CLEARIT 04S0439 00315000 * NRASIZE=RSTGSZ; /* SAVE THE AREA SIZE */ 00316000 L @12,OCRSTGTM(,ROPCE) 04S0440 00317000 ST RSTGSZ,NRASIZE(,@12) 04S0440 00318000 * NRAR1PTR=ADDR(NRAREAD);/* SET PTR TO READ 1 AREA */ 00319000 LA @10,NRAREAD(,@12) 04S0441 00320000 ST @10,NRAR1PTR(,@12) 04S0441 00321000 * NRAR2PTR=ADDR(NRAREAD)+CKPBLKSZ;/* SET PTR TO READ 00322000 * 2 AREA */ 00323000 AH @10,CKPBLKSZ(,RCKPT) 04S0442 00324000 ST @10,NRAR2PTR(,@12) 04S0442 00325000 * RFY 04S0443 00326000 * REG08 UNRSTD; 04S0443 00327000 * END; 04S0444 00328000 * ELSE /* ELSE IF FAILURE THEN DO WTO */ 00329000 * DO; 04S0445 00330000 B @RC00434 04S0445 00331000 @RF00434 DS 0H 04S0446 00332000 * NAME=OCPTRSAV->OCBACKUP;/* PUT NCPNAME IN WTO TEXT */ 00333000 L @12,OCPTRSAV(,ROPCE) 04S0446 00334000 MVC NAME(8),OCBACKUP(@12) 04S0446 00335000 * RPARM=ADDR(WTOLIST);/* POINT TO WTOLIST */ 00336000 LA RPARM,WTOLIST 04S0447 00337000 * GEN REFS(WTOLIST,RPARM) SETS(REG00); 04S0448 00338000 * */ 00339000 WTO MF=(E,(1)) 00340000 * OCRESNUM=CKPTRKCN;/* SET RESOURCE TO MAX TO GET OUT*/ 00341000 LH @12,CKPTRKCN(,RCKPT) 04S0449 00342000 STH @12,OCRESNUM(,ROPCE) 04S0449 00343000 * SKIPSW=ON; /* SET TO BYPASS THE FREEMAIN */ 00344000 OI SKIPSW,B'00000001' 04S0450 00345000 * END; 04S0451 00346000 * RFY 04S0452 00347000 * RSTGSZ UNRSTD; 04S0452 00348000 @RC00434 DS 0H 04S0453 00349000 * END; 03S0453 00350000 * OCRESNUM=OCRESNUM+1; /* INCREMENT THE RESOURCE NUMBER */ 00351000 @RC00421 LA @12,1 03S0454 00352000 LH @10,OCRESNUM(,ROPCE) 03S0454 00353000 N @10,@CF02214 03S0454 00354000 ALR @12,@10 03S0454 00355000 STH @12,OCRESNUM(,ROPCE) 03S0454 00356000 * IF OCRESNUM>=CKPTRKCN THEN/* IF THE RESOURCE NUMBER IS GT 00357000 * THE TOTAL */ 00358000 CH @12,CKPTRKCN(,RCKPT) 03S0455 00359000 BL @RF00455 03S0455 00360000 * DO; /* NUMBER OF RESOURCES THEN THRU 00361000 * WITH RESTART */ 00362000 * OCRESNUM=0; /* SET RESOURCE NO TO 0 */ 00363000 SLR @12,@12 03S0457 00364000 STH @12,OCRESNUM(,ROPCE) 03S0457 00365000 * IF SKIPSW=OFF THEN /* FREEMAIN THE AREA UNLESS */ 00366000 TM SKIPSW,B'00000001' 03S0458 00367000 BNZ @RF00458 03S0458 00368000 * DO; /* WAS GETMAIN FAILURE */ 00369000 * RFY 03S0460 00370000 * RSTGSZ RSTD; /* RESTRICT REG WITH STORAGE SIZE*/ 00371000 * RSTGSZ=NRASIZE; /* SET AREA SIZE IN REG */ 00372000 L @12,OCRSTGTM(,ROPCE) 03S0461 00373000 L RSTGSZ,NRASIZE(,@12) 03S0461 00374000 * RPARM=ADDR(FREELIST);/* POINT REG1 TO FREEMAIN LIST*/ 00375000 LA RPARM,FREELIST 03S0462 00376000 * GEN REFS(FREELIST) SETS(RPARM,REG14); 03S0463 00377000 * /* 00378000 FREEMAIN E,LV=(RSTGSZ),A=OCRSTGTM(ROPCE),MF=(E,(1)) 00379000 * RFY 03S0464 00380000 * RSTGSZ UNRSTD; /* RELEASE REG */ 00381000 * END; 03S0465 00382000 * ELSE 03S0466 00383000 * ; 03S0466 00384000 @RF00458 DS 0H 03S0467 00385000 * CALL GO06; /* SET UP TO GO TO 06 */ 00386000 BAL @14,GO06 03S0467 00387000 * END; 03S0468 00388000 * ELSE /* ELSE SETUP TO INITIATE READ */ 00389000 * DO; 03S0469 00390000 B @RC00455 03S0469 00391000 @RF00455 DS 0H 03S0470 00392000 * CKPNRSID=OCRESNUM; /* SET RESOURCE NUMBER */ 00393000 LH @12,OCRESNUM(,ROPCE) 03S0470 00394000 N @12,@CF02214 03S0470 00395000 STH @12,CKPNRSID(,RCKPT) 03S0470 00396000 * CKPNTRK=0; /* SET TO READ FLIP-FLOP 1 */ 00397000 SLR @12,@12 03S0471 00398000 STH @12,CKPNTRK(,RCKPT) 03S0471 00399000 * CKPRWCMD=CKPREAD; /* SET TO READ */ 00400000 MVI CKPRWCMD(RCKPT),X'06' 03S0472 00401000 * CKPRWADD=NRAR1PTR; /* POINT TO READ 1 AREA */ 00402000 L @12,OCRSTGTM(,ROPCE) 03S0473 00403000 MVC CKPRWADD(3,RCKPT),NRAR1PTR+1(@12) 03S0473 00404000 * CKPRWBC=CKPBLKSZ; /* SET READ SIZE */ 00405000 LH @12,CKPBLKSZ(,RCKPT) 03S0474 00406000 STH @12,CKPRWBC(,RCKPT) 03S0474 00407000 * CALL IEDQNW; /* START I/O AND SET UP WAIT LIST*/ 00408000 L @15,CAVTCRIO(,RCAVT) 03S0475 00409000 BALR @14,@15 03S0475 00410000 * CAVTWTG=CKPRNCP; /* SET WTG BACK TO THIS MODULE */ 00411000 MVI CAVTWTG(RCAVT),X'70' 03S0476 00412000 * END; 03S0477 00413000 * END; 02S0478 00414000 @RC00455 DS 0H 02S0479 00415000 * END; 02S0479 00416000 @RC00368 DS 0H 02S0479 00417000 @DE00366 TM LOOPFLAG,B'00000010' 02S0479 00418000 BNZ @DL00366 02S0479 00419000 * 02S0480 00420000 * /*****************************************************************/ 00421000 * /* */ 00422000 * /* EPILOGUE: THIS SEGMENT COMPLETES THE EPILOGUE CODE THAT WAS */ 00423000 * /* ALTERED BY THE MODULE PROCEDURE STATEMENT. */ 00424000 * /* */ 00425000 * /*****************************************************************/ 00426000 * 02S0480 00427000 * LM(REG02,REG15,QNVSAV); /* RESTORE QNF'S REGISTERS */ 00428000 LM REG02,REG15,QNVSAV 02S0480 00429000 * REG14=REG14+CKPRETNL; /* RESTORE RETURN ADDRESS + 4 00430000 * (WHICH INDICATES THAT NO OTHER 00431000 * MODULE IS TO BE LOADED */ 00432000 AL REG14,@CF00331 02S0481 00433000 * 02S0482 00434000 * /*****************************************************************/ 00435000 * /* */ 00436000 * /* PROCESS.CLEARER: THIS SEGMENT CLEARS THE AREA POINTED TO BY */ 00437000 * /* REG08 FOR A LENGTH SPECIFIED BY STORCTR */ 00438000 * /* */ 00439000 * /*****************************************************************/ 00440000 * 02S0482 00441000 *CLEARIT: 02S0482 00442000 * PROC OPTIONS(RETREG,SAVE(14)); 02S0482 00443000 @EL00001 DS 0H 02S0482 00444000 @EF00001 DS 0H 02S0482 00445000 @ER00001 BR @14 02S0482 00446000 CLEARIT ST @14,12(,@13) 02S0482 00447000 * RFY 02S0483 00448000 * REG08 RSTD; 02S0483 00449000 * DO UNTIL STORCTR=0; /* LOOP TILL ALL CLEARED */ 00450000 @DL00484 DS 0H 02S0485 00451000 * IF STORCTR>=255 THEN /* IF GT 255 */ 00452000 LA @12,255 02S0485 00453000 CR STORCTR,@12 02S0485 00454000 BL @RF00485 02S0485 00455000 * DO; /* CLEAR 255 BYTES */ 00456000 * REG08->CLEAR(1:255)=''B; 02S0487 00457000 XC CLEAR(255,REG08),CLEAR(REG08) 02S0487 00458000 * REG08=REG08+255; /* BUMP CLEAR ADDR */ 00459000 ALR REG08,@12 02S0488 00460000 * STORCTR=STORCTR-255; /* DECREMENT STORAGE CLEAR SIZE */ 00461000 SLR STORCTR,@12 02S0489 00462000 * END; 02S0490 00463000 * ELSE /* ELSE CLEAR LT 255 BYTES */ 00464000 * DO; /* CLEAR THE REMAINDER */ 00465000 B @RC00485 02S0491 00466000 @RF00485 DS 0H 02S0492 00467000 * REG08->CLEAR(1:STORCTR)=REG08->CLEAR(1:STORCTR)&®08->CLEAR 00468000 * (1:STORCTR); 02S0492 00469000 LR @12,STORCTR 02S0492 00470000 BCTR @12,0 02S0492 00471000 EX @12,@SX02217 02S0492 00472000 * STORCTR=0; /* FINISHED WITH CLEAR */ 00473000 SLR STORCTR,STORCTR 02S0493 00474000 * END; 02S0494 00475000 * END; 02S0495 00476000 @RC00485 DS 0H 02S0495 00477000 @DE00484 LTR STORCTR,STORCTR 02S0495 00478000 BNZ @DL00484 02S0495 00479000 * RFY 02S0496 00480000 * REG08 UNRSTD; 02S0496 00481000 * END CLEARIT; 02S0497 00482000 @EL00002 DS 0H 02S0497 00483000 @EF00002 DS 0H 02S0497 00484000 @ER00002 L @14,12(,@13) 02S0497 00485000 BR @14 02S0497 00486000 * 02S0498 00487000 * /*****************************************************************/ 00488000 * /* */ 00489000 * /* PROCESS.GOTO06: THIS SEGMENT SETS UP TO GO TO 06 */ 00490000 * /* */ 00491000 * /*****************************************************************/ 00492000 * 02S0498 00493000 *GO06: 02S0498 00494000 * PROC OPTIONS(RETREG,SAVE(14)); 02S0498 00495000 GO06 ST @14,@SA00003 02S0498 00496000 * CAVTEOL2=EOL; /* RESET END OF WAIT LIST TO THE 00497000 * 3705 CKPT QUEUE */ 00498000 MVI CAVTEOL2(RCAVT),X'80' 02S0499 00499000 * CAVTEOL3=0; /* CLEAN UP WAIT LIST ENTRY ... */ 00500000 MVI CAVTEOL3(RCAVT),X'00' 02S0500 00501000 * CAVTNIOE=0; /* ... FOR 3705 CKPT IO ECB */ 00502000 SLR @12,@12 02S0501 00503000 STCM @12,7,CAVTNIOE(RCAVT) 02S0501 00504000 * CAVTWTG=0; /* CLEAR WHERE-TO-GO FIELD IN 00505000 * CKPT AVT */ 00506000 MVI CAVTWTG(RCAVT),X'00' 02S0502 00507000 * CAVTNWA=0; /* CLEAR POINTER TO THE CKPT 00508000 * WORKAREA */ 00509000 ST @12,CAVTNWA(,RCAVT) 02S0503 00510000 * AVTCCPRI=PRICKPT; /* SET PRIORITY */ 00511000 MVI AVTCCPRI(RAVT),X'EC' 02S0504 00512000 * AVTCCQCB=ADDR(AVTOPCQB); /* QUEUE REQUEST ELEMENT TO OP 00513000 * CONTROL */ 00514000 LA @12,AVTOPCQB(,RAVT) 02S0505 00515000 STCM @12,7,AVTCCQCB(RAVT) 02S0505 00516000 * RPARM=ADDR(AVTCCELE); /* GET ADDRESS OF THE REQUEST 00517000 * ELEMENT */ 00518000 LA RPARM,AVTCCELE(,RAVT) 02S0506 00519000 * REG15=CVTAQAVT; /* GET ADDRESS OF THE TCX */ 00520000 L @12,CVTPTR 02S0507 00521000 L REG15,CVTAQAVT(,@12) 02S0507 00522000 * REG00=TCXREADY; /* GET ADDR OF TOP ELEMENT ON 00523000 * ASYNCHRONOUS READY QUEUE */ 00524000 L REG00,TCXREADY(,REG15) 02S0508 00525000 *AGAIN: 02S0509 00526000 * AVTCCLNK=REG00; /* LINK REQUEST ELEMENT TO TOP ON 00527000 * THE QUEUE */ 00528000 AGAIN STCM REG00,7,AVTCCLNK(RAVT) 02S0509 00529000 * CS(REG00,RPARM,TCXREADY); /* UPDATE ASYNCHRONOUS READY 00530000 * QUEUE */ 00531000 CS REG00,@01,TCXREADY(REG15) 02S0510 00532000 * BC(7,AGAIN); /* IF QUEUE WAS UPDATED 02S0511 00533000 * ASYNCHRONOUSLY, TRY AGAIN */ 00534000 BC 7,AGAIN 02S0511 00535000 * GEN REFS(AVTOSECB) SETS(REG00,RPARM); 02S0512 00536000 * /* 00537000 POST AVTOSECB(,RAVT) POST TCAM'S MCP'S ECB COMPLETE 00538000 * END GO06; 02S0513 00539000 @EL00003 DS 0H 02S0513 00540000 @EF00003 DS 0H 02S0513 00541000 @ER00003 L @14,@SA00003 02S0513 00542000 BR @14 02S0513 00543000 * END IEDQNV 01S0514 00544000 * 01S0514 00545000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00546000 */*%INCLUDE SYSLIB (TAVTD ) */ 00547000 */*%INCLUDE SYSLIB (TCAVTD ) */ 00548000 */*%INCLUDE SYSLIB (TCNRD ) */ 00549000 */*%INCLUDE SYSLIB (TCKPD ) */ 00550000 */*%INCLUDE SYSLIB (CVT ) */ 00551000 */*%INCLUDE SYSLIB (TNRAD ) */ 00552000 */*%INCLUDE SYSLIB (TOPCED ) */ 00553000 */*%INCLUDE SYSLIB (TOPCAVTD) */ 00554000 */*%INCLUDE SYSLIB (TPRIOR ) */ 00555000 */*%INCLUDE SYSLIB (TTCXD ) */ 00556000 */*%INCLUDE SYSUT5 (RFY ) */ 00557000 */*%INCLUDE SYSUT5 (DCL ) */ 00558000 */*%INCLUDE SYSUT5 (PROLOGUE) */ 00559000 */*%INCLUDE SYSUT5 (PROCESS ) */ 00560000 */*%INCLUDE SYSUT5 (READER ) */ 00561000 */*%INCLUDE SYSUT5 (CHECK ) */ 00562000 */*%INCLUDE SYSUT5 (STARTER ) */ 00563000 */*%INCLUDE SYSUT5 (SETUP ) */ 00564000 */*%INCLUDE SYSUT5 (EPILOGUE) */ 00565000 */*%INCLUDE SYSUT5 (CLEARER ) */ 00566000 */*%INCLUDE SYSUT5 (GOTO06 ) */ 00567000 * 01S0514 00568000 * ; 01S0514 00569000 @DATA DS 0H 00570000 @SX02217 XC CLEAR(0,REG08),CLEAR(REG08) 00571000 DS 0F 00572000 @SA00003 DS 1F 00573000 DS 0F 00574000 @CF00331 DC F'4' 00575000 @CF00169 DC F'16' 00576000 @CF02214 DC XL4'0000FFFF' 00577000 DS 0D 00578000 QNVSAV DC XL72'0' 00579000 PATCH DC XL100'0' 00580000 WTOLIST DS CL70 00581000 ORG WTOLIST 00582000 MSGLEN DC X'0042' 00583000 MSGFLAGS DC X'8000' 00584000 MSGTEXT DS CL62 00585000 ORG MSGTEXT 00586000 MSGFST DC CL35'IED567I INSUFFICIENT CORE FOR 3705 ' 00587000 NAME DS CL8 00588000 MSGLST DC CL19' RESTART PROCESSING' 00589000 ORG WTOLIST+66 00590000 DESCODE DC X'0400' 00591000 RTGCODE DC X'4000' 00592000 ORG WTOLIST+70 00593000 DS CL2 00594000 FLAGS DS BL4 00595000 ORG FLAGS 00596000 @NM00163 DS BL4 00597000 LOOPFLAG EQU FLAGS+3 00598000 SKIPSW EQU FLAGS+3 00599000 ORG FLAGS+4 00600000 GETMLIST DS CL10 00601000 ORG GETMLIST 00602000 @NM00164 DC XL8'0' 00603000 ECMODE DC X'20' 00604000 SUBPOL DC X'00' 00605000 ORG GETMLIST+10 00606000 DS CL2 00607000 FREELIST DS CL10 00608000 ORG FREELIST 00609000 @NM00165 DC XL9'0' 00610000 SUBPL DC X'00' 00611000 ORG FREELIST+10 00612000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00613000 @01 EQU 01 00614000 @02 EQU 02 00615000 @03 EQU 03 00616000 @04 EQU 04 00617000 @05 EQU 05 00618000 @06 EQU 06 00619000 @07 EQU 07 00620000 @08 EQU 08 00621000 @09 EQU 09 00622000 @10 EQU 10 00623000 @11 EQU 11 00624000 @12 EQU 12 00625000 @13 EQU 13 00626000 @14 EQU 14 00627000 @15 EQU 15 00628000 STORCTR EQU @02 00629000 RCAVT EQU @05 00630000 RCKPREC EQU @10 00631000 RCKPT EQU @04 00632000 RNRA EQU @06 00633000 ROPCE EQU @03 00634000 RAVT EQU @09 00635000 REG15 EQU @15 00636000 REG00 EQU @00 00637000 RPARM EQU @01 00638000 REG02 EQU @02 00639000 RSTGSZ EQU @07 00640000 REG08 EQU @08 00641000 RBASE EQU @11 00642000 REG12 EQU @12 00643000 RSAVE EQU @13 00644000 REG14 EQU @14 00645000 REG01 EQU @01 00646000 REG03 EQU @03 00647000 REG04 EQU @04 00648000 REG05 EQU @05 00649000 REG06 EQU @06 00650000 REG07 EQU @07 00651000 REG2 EQU @02 00652000 CVTPTR EQU 16 00653000 IEDQAVTD EQU 0 00654000 AVTSAVEX EQU IEDQAVTD+288 00655000 @NM00003 EQU IEDQAVTD+388 00656000 AVTCKFLG EQU @NM00003 00657000 AVTCKAVT EQU @NM00003+1 00658000 AVTOCGET EQU IEDQAVTD+392 00659000 AVTBASE EQU IEDQAVTD+412 00660000 AVTPKF EQU AVTBASE 00661000 AVTOSECB EQU IEDQAVTD+492 00662000 AVTECB1 EQU AVTOSECB 00663000 AVTHG02 EQU IEDQAVTD+528 00664000 AVTDISP EQU IEDQAVTD+552 00665000 AVTHD EQU IEDQAVTD+556 00666000 AVTSCOPT EQU AVTHD 00667000 AVTSAVTP EQU IEDQAVTD+612 00668000 AVTSAVTF EQU AVTSAVTP 00669000 AVTCKPEL EQU IEDQAVTD+652 00670000 AVTCKRMV EQU AVTCKPEL 00671000 AVTCKELF EQU IEDQAVTD+680 00672000 AVTCKBYT EQU IEDQAVTD+691 00673000 AVTHG01 EQU IEDQAVTD+692 00674000 AVTCKLNK EQU IEDQAVTD+696 00675000 AVTCRELE EQU IEDQAVTD+708 00676000 AVTCCELE EQU AVTCRELE 00677000 AVTCCQCB EQU AVTCCELE+1 00678000 AVTCCPRI EQU AVTCRELE+4 00679000 AVTCCLNK EQU AVTCRELE+5 00680000 AVTCLRHI EQU IEDQAVTD+716 00681000 AVTADBUF EQU IEDQAVTD+720 00682000 AVTSYSER EQU IEDQAVTD+728 00683000 AVTCKPQB EQU IEDQAVTD+804 00684000 AVTCKPTB EQU AVTCKPQB 00685000 AVTCKPEC EQU AVTCKPQB+4 00686000 AVTCKPCC EQU AVTCKPEC 00687000 AVTOPCQB EQU IEDQAVTD+816 00688000 AVTOPCOB EQU AVTOPCQB 00689000 AVTOPCEC EQU AVTOPCQB+4 00690000 AVTOPCCC EQU AVTOPCEC 00691000 AVTOLTQB EQU IEDQAVTD+828 00692000 AVTCWFL1 EQU IEDQAVTD+924 00693000 AVTCWFL2 EQU IEDQAVTD+925 00694000 AVTSUBT EQU IEDQAVTD+948 00695000 AVTIOTR EQU IEDQAVTD+949 00696000 AVTBIT1 EQU IEDQAVTD+1050 00697000 AVTBIT2 EQU IEDQAVTD+1051 00698000 AVTBIT3 EQU IEDQAVTD+1052 00699000 AVTBIT4 EQU IEDQAVTD+1136 00700000 @NM00085 EQU IEDQAVTD+1232 00701000 IEDQAPTR EQU 0 00702000 IEDNSVTD EQU 0 00703000 SAVTDIAG EQU IEDNSVTD 00704000 SAVTDIAF EQU SAVTDIAG 00705000 SAVTLUSQ EQU IEDNSVTD+88 00706000 SAVTTCPU EQU IEDNSVTD+238 00707000 SAVTZELM EQU IEDNSVTD+270 00708000 SAVTRDRV EQU IEDNSVTD+284 00709000 SAVTCKQB EQU IEDNSVTD+300 00710000 SAVTCKTB EQU SAVTCKQB 00711000 SAVTCKEC EQU SAVTCKQB+4 00712000 SAVTCKCC EQU SAVTCKEC 00713000 IEDQCKAD EQU 0 00714000 CAVTNWA EQU IEDQCKAD+4 00715000 CAVTWTG EQU IEDQCKAD+8 00716000 CAVTWL1 EQU IEDQCKAD+12 00717000 CAVTWL2 EQU CAVTWL1+8 00718000 CAVTEOL2 EQU CAVTWL2 00719000 CAVTEOL3 EQU CAVTWL2+4 00720000 CAVTNIOE EQU CAVTWL2+5 00721000 CAVTCRIO EQU IEDQCKAD+28 00722000 IEDQCNRD EQU 0 00723000 CNRDATTM EQU IEDQCNRD+2 00724000 CNRCNTL EQU IEDQCNRD+10 00725000 CNRBHSET EQU IEDQCNRD+12 00726000 CNRBHFUN EQU CNRBHSET 00727000 IEDQCKPD EQU 0 00728000 CKPIOB EQU IEDQCKPD+72 00729000 CKPIOECB EQU CKPIOB+4 00730000 CKPIOECC EQU CKPIOECB 00731000 CKPIOSK EQU CKPIOB+32 00732000 CKPEXCP EQU IEDQCKPD+116 00733000 CKPECBL EQU IEDQCKPD+120 00734000 CKPCNVRT EQU CKPECBL 00735000 CKPIOQL EQU IEDQCKPD+132 00736000 @NM00111 EQU CKPIOQL 00737000 CKPCTTRB EQU IEDQCKPD+144 00738000 CKPCCWS EQU IEDQCKPD+168 00739000 CKPTIC EQU CKPCCWS+24 00740000 CKPRW EQU CKPCCWS+32 00741000 CKPRWCMD EQU CKPRW 00742000 CKPRWADD EQU CKPRW+1 00743000 CKPRWBC EQU CKPRW+6 00744000 @NM00114 EQU IEDQCKPD+208 00745000 CKPMSG EQU IEDQCKPD+220 00746000 CKPMSGTX EQU CKPMSG+4 00747000 CKPMSGTP EQU CKPMSG+41 00748000 CKPCNTLR EQU IEDQCKPD+288 00749000 CKPFLAGS EQU CKPCNTLR 00750000 CKPPRQNO EQU CKPCNTLR+17 00751000 IEDQCDRD EQU 0 00752000 CDRTTRLI EQU IEDQCDRD+9 00753000 CDRDATA EQU IEDQCDRD+12 00754000 IEDQCRED EQU 0 00755000 CRELINK EQU IEDQCRED+4 00756000 CREOFFS EQU IEDQCRED+12 00757000 CKPREQTB EQU 0 00758000 CKPCTFLG EQU CKPREQTB 00759000 CKPNRES EQU 0 00760000 CKPNFLG EQU CKPNRES+4 00761000 CKPAVT EQU 0 00762000 CVTMAP EQU 0 00763000 CVTDAR EQU CVTMAP+72 00764000 CVTFLGS1 EQU CVTDAR 00765000 CVTDCB EQU CVTMAP+116 00766000 CVTIERLC EQU CVTMAP+144 00767000 CVTOPTA EQU CVTMAP+182 00768000 CVTOPTB EQU CVTMAP+183 00769000 CVTGTF EQU CVTMAP+236 00770000 CVTGTFST EQU CVTGTF 00771000 CVTGTFS EQU CVTGTFST 00772000 CVTSTATE EQU CVTGTFST 00773000 CVTTMODE EQU CVTGTFST 00774000 CVTFORM EQU CVTGTFST 00775000 CVTAQAVT EQU CVTMAP+240 00776000 CVTTCMFG EQU CVTAQAVT 00777000 CVTVOLM2 EQU CVTMAP+244 00778000 CVTTATA EQU CVTVOLM2 00779000 CVTTSKS EQU CVTTATA 00780000 CVTVOLF2 EQU CVTTSKS 00781000 CVTTAT EQU CVTTATA+1 00782000 CVTATER EQU CVTMAP+248 00783000 CVTEXT1 EQU CVTMAP+252 00784000 CVTPURG EQU CVTMAP+260 00785000 CVTQMSG EQU CVTMAP+268 00786000 CVTDMSR EQU CVTMAP+272 00787000 CVTRSV37 EQU CVTDMSR 00788000 CVTDMSRF EQU CVTRSV37 00789000 CVTERPV EQU CVTMAP+316 00790000 CVTINTLA EQU CVTMAP+320 00791000 CVTAPF EQU CVTMAP+324 00792000 CVTEXT2 EQU CVTMAP+328 00793000 CVTHJES EQU CVTMAP+332 00794000 CVTPGSIA EQU CVTMAP+348 00795000 CVTA1F1 EQU CVTMAP+356 00796000 CVTSYSK EQU CVTMAP+357 00797000 CVTVOLM1 EQU CVTMAP+380 00798000 CVTVOLF1 EQU CVTVOLM1 00799000 CVTATMCT EQU CVTMAP+388 00800000 CVTXTNT1 EQU 0 00801000 CVTXTNT2 EQU 0 00802000 CVTDSSV EQU CVTXTNT2 00803000 CVTFLGBT EQU CVTXTNT2+5 00804000 CVTQID EQU CVTXTNT2+24 00805000 CVTSHS EQU CVTXTNT2+40 00806000 CVTRV400 EQU CVTXTNT2+52 00807000 CVTRV409 EQU CVTXTNT2+53 00808000 CVTATCVT EQU CVTXTNT2+64 00809000 CVTRV429 EQU CVTXTNT2+84 00810000 CVTRV438 EQU CVTXTNT2+85 00811000 CVTRV457 EQU CVTXTNT2+112 00812000 CVTRV466 EQU CVTXTNT2+113 00813000 CVTFIX EQU 0 00814000 CVTRELNO EQU CVTFIX+252 00815000 IEDNRA EQU 0 00816000 NRACURR EQU IEDNRA 00817000 NRASIZE EQU IEDNRA+4 00818000 NRAR1PTR EQU IEDNRA+8 00819000 NRAR2PTR EQU IEDNRA+12 00820000 NRAREAD EQU IEDNRA+16 00821000 IEDQOPCE EQU 0 00822000 OCELEM EQU IEDQOPCE+4 00823000 OCUNIT EQU IEDQOPCE+8 00824000 OCRUDEST EQU OCUNIT 00825000 OCCKPKEY EQU OCRUDEST 00826000 OCSCAN EQU OCCKPKEY 00827000 OCOPTCDE EQU IEDQOPCE+12 00828000 OCSWITCH EQU IEDQOPCE+13 00829000 OCFLAG EQU IEDQOPCE+14 00830000 @NM00136 EQU IEDQOPCE+16 00831000 OCDEST EQU @NM00136 00832000 OCREQVAL EQU OCDEST+1 00833000 OCLINENO EQU IEDQOPCE+22 00834000 OCTIOT EQU OCLINENO 00835000 OCTRUNIT EQU IEDQOPCE+24 00836000 OCRSID EQU OCTRUNIT 00837000 OCALSTAT EQU OCRSID 00838000 OCPARM EQU IEDQOPCE+28 00839000 OCRESNUM EQU OCPARM 00840000 OCBACKUP EQU IEDQOPCE+32 00841000 OCMODNME EQU IEDQOPCE+40 00842000 OCIPLWA EQU OCMODNME 00843000 OCPTRSAV EQU OCMODNME+4 00844000 OCCKDATA EQU IEDQOPCE+48 00845000 OCRSTGTM EQU OCCKDATA 00846000 IEDQOPCN EQU 0 00847000 OCLDNME EQU IEDQOPCN 00848000 OCLINTTE EQU OCLDNME 00849000 OCREQFLG EQU OCLINTTE+2 00850000 OCPREFLG EQU OCLINTTE+3 00851000 IEDQOPCD EQU 0 00852000 OPCAQCTL EQU IEDQOPCD+180 00853000 OPCLDNME EQU IEDQOPCD+212 00854000 OPCCKPTF EQU IEDQOPCD+248 00855000 OPCSPEC EQU IEDQOPCD+300 00856000 OPCPWCOB EQU IEDQOPCD+368 00857000 OPCPWQCB EQU OPCPWCOB 00858000 OPCPWECB EQU OPCPWCOB+4 00859000 IEDQTCXD EQU 0 00860000 TCXATTEN EQU IEDQTCXD+4 00861000 TCXREADY EQU IEDQTCXD+24 00862000 TCXFLAG1 EQU IEDQTCXD+34 00863000 TCXBUFA EQU IEDQTCXD+80 00864000 TCXDSAVE EQU IEDQTCXD+104 00865000 TCXQE8 EQU IEDQTCXD+216 00866000 TCXPTR EQU 0 00867000 CLEAR EQU 0 00868000 IEDQNW EQU 0 00869000 CKPINIT EQU CKPEXCP 00870000 CKPTWA EQU CKPMSGTX 00871000 CKPSAVE2 EQU CKPTWA 00872000 CKPNCNTL EQU CKPCNTLR 00873000 CKPBLKSZ EQU CKPNCNTL+12 00874000 CKPTRKCN EQU CKPNCNTL+16 00875000 CKPDATTM EQU CKPNCNTL+22 00876000 CKPNFLDS EQU CKPEXCP 00877000 CKPNSELT EQU CKPNFLDS+16 00878000 CKPNTRK EQU CKPNFLDS+20 00879000 CKPNRSID EQU CKPNFLDS+22 00880000 CKPOVER EQU CKPMSGTP+1 00881000 CKPOPNFL EQU CKPFLAGS 00882000 CDRINCFM EQU CDRTTRLI 00883000 CDRCREQR EQU IEDQCDRD 00884000 CDRCKFLG EQU CDRCREQR 00885000 CVTS01 EQU CVTPGSIA 00886000 CVTLPDIA EQU CVTS01+12 00887000 CVTDIRST EQU CVTLPDIA 00888000 CVTSLIDA EQU CVTS01+24 00889000 CVTCTLFG EQU CVTS01+50 00890000 CVTRV210 EQU CVTS01+424 00891000 CVTRV219 EQU CVTS01+425 00892000 CVTRV228 EQU CVTS01+426 00893000 CVTRV237 EQU CVTS01+427 00894000 CVTMFRTR EQU CVTS01+452 00895000 CVTRV262 EQU CVTS01+468 00896000 CVTRV271 EQU CVTS01+469 00897000 CVTRV280 EQU CVTS01+470 00898000 CVTRV289 EQU CVTS01+471 00899000 CVTGSDA EQU CVTS01+600 00900000 OCCKPKY1 EQU OCCKPKEY 00901000 OCCKPTYP EQU OCCKPKY1 00902000 OCICACTN EQU OCMODNME 00903000 OCICDADR EQU OCICACTN 00904000 OCICSW EQU OCICDADR+3 00905000 ROPCAVT EQU AVTOCGET 00906000 OPCAQWD EQU OPCAQCTL 00907000 OPCAQWD1 EQU OPCAQWD 00908000 OPCAQWD2 EQU OPCAQWD+4 00909000 OPCAQWD3 EQU OPCAQWD+8 00910000 CDROPCB EQU CDRDATA 00911000 CKPMSGPN EQU CKPMSGTP+6 00912000 CKPSLVAL EQU CKPNSELT 00913000 CKPTTRLT EQU CKPTIC+5 00914000 OCCIB EQU OCREQVAL 00915000 AGO .@UNREFD START UNREFERENCED COMPONENTS 00916000 OPCAQLST EQU OPCAQWD3+1 00917000 OPCAQRQ3 EQU OPCAQWD3 00918000 OPCAQSEC EQU OPCAQWD2+1 00919000 OPCAQRQ2 EQU OPCAQWD2 00920000 OPCAQFST EQU OPCAQWD1+1 00921000 OPCAQREQ EQU OPCAQWD1 00922000 OCICINAC EQU OCICSW 00923000 @NM00142 EQU OCICSW 00924000 OCICATST EQU OCICDADR+1 00925000 OCICTYPE EQU OCICDADR 00926000 @NM00141 EQU OCCKPKY1 00927000 OCCKPENV EQU OCCKPKY1 00928000 OCCKPRST EQU OCCKPTYP 00929000 OCCKPNCP EQU OCCKPTYP 00930000 OCCKPINC EQU OCCKPTYP 00931000 CVTRV628 EQU CVTS01+728 00932000 CVTRV627 EQU CVTS01+724 00933000 CVTRV626 EQU CVTS01+720 00934000 CVTRV625 EQU CVTS01+716 00935000 CVTRV624 EQU CVTS01+712 00936000 CVTRV623 EQU CVTS01+708 00937000 CVTRV622 EQU CVTS01+704 00938000 CVTRV621 EQU CVTS01+700 00939000 CVTRV620 EQU CVTS01+696 00940000 CVTRV619 EQU CVTS01+692 00941000 CVTRV618 EQU CVTS01+688 00942000 CVTRV617 EQU CVTS01+684 00943000 CVTRV616 EQU CVTS01+680 00944000 CVTRV615 EQU CVTS01+676 00945000 CVTRV614 EQU CVTS01+672 00946000 CVTRV613 EQU CVTS01+668 00947000 CVTTCASP EQU CVTS01+664 00948000 CVT0PT03 EQU CVTS01+660 00949000 CVT0PT0E EQU CVTS01+656 00950000 CVTIRM EQU CVTS01+652 00951000 CVTCGK EQU CVTS01+648 00952000 CVTRV607 EQU CVTS01+644 00953000 CVTRV606 EQU CVTS01+640 00954000 CVTRV605 EQU CVTS01+636 00955000 CVTRV604 EQU CVTS01+632 00956000 CVTEFF02 EQU CVTS01+628 00957000 CVTCBBR EQU CVTS01+624 00958000 CVTSSCR EQU CVTS01+620 00959000 CVTEVENT EQU CVTS01+616 00960000 CVTCRCA EQU CVTS01+612 00961000 CVTTPIO EQU CVTS01+608 00962000 CVTADV EQU CVTS01+604 00963000 CVTGSDAB EQU CVTGSDA 00964000 CVTQV3 EQU CVTS01+596 00965000 CVTQV2 EQU CVTS01+592 00966000 CVTQV1 EQU CVTS01+588 00967000 CVTRPT EQU CVTS01+584 00968000 CVTSSRB EQU CVTS01+580 00969000 CVTCSDRL EQU CVTS01+576 00970000 CVTEXP1 EQU CVTS01+572 00971000 CVTRMPMT EQU CVTS01+568 00972000 CVTRMPTT EQU CVTS01+564 00973000 CVTVPSA EQU CVTS01+560 00974000 CVTVSTOP EQU CVTS01+556 00975000 CVTGTFR8 EQU CVTS01+552 00976000 CVTQUIT EQU CVTS01+548 00977000 CVTVACR EQU CVTS01+544 00978000 CVTWTCB EQU CVTS01+540 00979000 CVTSTPRS EQU CVTS01+536 00980000 CVT0PT02 EQU CVTS01+532 00981000 CVTDARCM EQU CVTS01+528 00982000 CVTIRECM EQU CVTS01+524 00983000 CVTJRECM EQU CVTS01+520 00984000 CVTVEMS0 EQU CVTS01+516 00985000 CVTSPFRR EQU CVTS01+512 00986000 CVTRLSTG EQU CVTS01+508 00987000 CVT0TC0A EQU CVTS01+504 00988000 CVTGMBR EQU CVTS01+500 00989000 CVTLFRM EQU CVTS01+496 00990000 CVTRMBR EQU CVTS01+492 00991000 CVTVIOP EQU CVTS01+488 00992000 CVTRV307 EQU CVTS01+486 00993000 CVTRV306 EQU CVTS01+484 00994000 CVTRV305 EQU CVTS01+482 00995000 CVTRV304 EQU CVTS01+480 00996000 CVTRV303 EQU CVTS01+478 00997000 CVTRV302 EQU CVTS01+476 00998000 CVTTRCA EQU CVTS01+472 00999000 CVTRV297 EQU CVTRV289 01000000 CVTRV296 EQU CVTRV289 01001000 CVTRV295 EQU CVTRV289 01002000 CVTRV294 EQU CVTRV289 01003000 CVTRV293 EQU CVTRV289 01004000 CVTRV292 EQU CVTRV289 01005000 CVTRV291 EQU CVTRV289 01006000 CVTRV290 EQU CVTRV289 01007000 CVTRV288 EQU CVTRV280 01008000 CVTRV287 EQU CVTRV280 01009000 CVTRV286 EQU CVTRV280 01010000 CVTRV285 EQU CVTRV280 01011000 CVTRV284 EQU CVTRV280 01012000 CVTRV283 EQU CVTRV280 01013000 CVTRV282 EQU CVTRV280 01014000 CVTRV281 EQU CVTRV280 01015000 CVTRV279 EQU CVTRV271 01016000 CVTRV278 EQU CVTRV271 01017000 CVTRV277 EQU CVTRV271 01018000 CVTRV276 EQU CVTRV271 01019000 CVTRV275 EQU CVTRV271 01020000 CVTRV274 EQU CVTRV271 01021000 CVTRV273 EQU CVTRV271 01022000 CVTRV272 EQU CVTRV271 01023000 CVTRV270 EQU CVTRV262 01024000 CVTRV269 EQU CVTRV262 01025000 CVTRV268 EQU CVTRV262 01026000 CVTRV267 EQU CVTRV262 01027000 CVTRV266 EQU CVTRV262 01028000 CVTRV265 EQU CVTRV262 01029000 CVTRV264 EQU CVTRV262 01030000 CVTRV263 EQU CVTRV262 01031000 CVTVFP EQU CVTS01+464 01032000 CVTVSI EQU CVTS01+460 01033000 CVTVPSIB EQU CVTS01+456 01034000 CVTMFACT EQU CVTMFRTR 01035000 CVTMFCTL EQU CVTS01+448 01036000 CVTPVBP EQU CVTS01+444 01037000 CVTPWI EQU CVTS01+440 01038000 CVTRV254 EQU CVTS01+438 01039000 CVTRV253 EQU CVTS01+436 01040000 CVTRV252 EQU CVTS01+434 01041000 CVTRV251 EQU CVTS01+433 01042000 CVTRV250 EQU CVTS01+432 01043000 CVTRV249 EQU CVTS01+431 01044000 CVTRV248 EQU CVTS01+430 01045000 CVTRV247 EQU CVTS01+429 01046000 CVTRV246 EQU CVTS01+428 01047000 CVTRV245 EQU CVTRV237 01048000 CVTRV244 EQU CVTRV237 01049000 CVTRV243 EQU CVTRV237 01050000 CVTRV242 EQU CVTRV237 01051000 CVTRV241 EQU CVTRV237 01052000 CVTRV240 EQU CVTRV237 01053000 CVTRV239 EQU CVTRV237 01054000 CVTRV238 EQU CVTRV237 01055000 CVTRV236 EQU CVTRV228 01056000 CVTRV235 EQU CVTRV228 01057000 CVTRV234 EQU CVTRV228 01058000 CVTRV233 EQU CVTRV228 01059000 CVTRV232 EQU CVTRV228 01060000 CVTRV231 EQU CVTRV228 01061000 CVTRV230 EQU CVTRV228 01062000 CVTRV229 EQU CVTRV228 01063000 CVTRV227 EQU CVTRV219 01064000 CVTRV226 EQU CVTRV219 01065000 CVTRV225 EQU CVTRV219 01066000 CVTRV224 EQU CVTRV219 01067000 CVTRV223 EQU CVTRV219 01068000 CVTRV222 EQU CVTRV219 01069000 CVTRV221 EQU CVTRV219 01070000 CVTRV220 EQU CVTRV219 01071000 CVTRV218 EQU CVTRV210 01072000 CVTRV217 EQU CVTRV210 01073000 CVTRV216 EQU CVTRV210 01074000 CVTRV215 EQU CVTRV210 01075000 CVTRV214 EQU CVTRV210 01076000 CVTRV213 EQU CVTRV210 01077000 CVTRV212 EQU CVTRV210 01078000 CVTRV211 EQU CVTRV210 01079000 CVTLCCAT EQU CVTS01+420 01080000 CVTPCCAT EQU CVTS01+416 01081000 CVTIPCRP EQU CVTS01+412 01082000 CVTIPCRI EQU CVTS01+408 01083000 CVTIPCDS EQU CVTS01+404 01084000 CVTAIDVT EQU CVTS01+400 01085000 CVTSSAP EQU CVTS01+396 01086000 CVTEHCIR EQU CVTS01+392 01087000 CVTEHDEF EQU CVTS01+388 01088000 CVTDAIR EQU CVTS01+384 01089000 CVTPERFM EQU CVTS01+380 01090000 CVT044R2 EQU CVTS01+376 01091000 CVTFETCH EQU CVTS01+372 01092000 CVTRSTWD EQU CVTS01+368 01093000 CVTSPOST EQU CVTS01+364 01094000 CVTIOBP EQU CVTS01+360 01095000 CVTASMVT EQU CVTS01+356 01096000 CVTRECRQ EQU CVTS01+352 01097000 CVTWSAC EQU CVTS01+348 01098000 CVTRV149 EQU CVTS01+344 01099000 CVTWSAL EQU CVTS01+340 01100000 CVTSPSA EQU CVTS01+336 01101000 CVTGLMN EQU CVTS01+332 01102000 CVTVEAC0 EQU CVTS01+328 01103000 CVT062R1 EQU CVTS01+324 01104000 CVTRPOST EQU CVTS01+320 01105000 CVTDQIQE EQU CVTS01+316 01106000 CVTCSD EQU CVTS01+312 01107000 CVTLKRMA EQU CVTS01+308 01108000 CVTRSPIE EQU CVTS01+304 01109000 CVTRENQ EQU CVTS01+300 01110000 CVTLQCB EQU CVTS01+296 01111000 CVTFQCB EQU CVTS01+292 01112000 CVTQCS01 EQU CVTS01+288 01113000 CVTAPFT EQU CVTS01+284 01114000 CVTPARRL EQU CVTS01+280 01115000 CVTVWAIT EQU CVTS01+276 01116000 CVTGSPL EQU CVTS01+272 01117000 CVTLSMQ EQU CVTS01+268 01118000 CVTGSMQ EQU CVTS01+264 01119000 CVTEXPRO EQU CVTS01+260 01120000 CVTOPCTP EQU CVTS01+256 01121000 CVTSIC EQU CVTS01+252 01122000 CVTTPIOS EQU CVTS01+248 01123000 CVTRTMS EQU CVTS01+244 01124000 CVTSDBF EQU CVTS01+240 01125000 CVTSCBP EQU CVTS01+236 01126000 CVTSDMP EQU CVTS01+232 01127000 CVTSV60 EQU CVTS01+228 01128000 CVTRTMCT EQU CVTS01+224 01129000 CVTASCBL EQU CVTS01+220 01130000 CVTASCBH EQU CVTS01+216 01131000 CVTGDA EQU CVTS01+212 01132000 CVTASVT EQU CVTS01+208 01133000 CVTVVMDI EQU CVTS01+204 01134000 CVTAQTOP EQU CVTS01+200 01135000 CVTIOSCS EQU CVTS01+196 01136000 CVTSDRM EQU CVTS01+192 01137000 CVTOPTE EQU CVTS01+188 01138000 CVTSTXU EQU CVTS01+184 01139000 CVTQUIS EQU CVTS01+180 01140000 CVTPARS EQU CVTS01+176 01141000 CVTS1EE EQU CVTS01+172 01142000 CVTFRAS EQU CVTS01+168 01143000 CVTQSAS EQU CVTS01+164 01144000 CVTCRAS EQU CVTS01+160 01145000 CVTCRMN EQU CVTS01+156 01146000 CVTDELCP EQU CVTS01+152 01147000 CVTFRECL EQU CVTS01+148 01148000 CVTGETCL EQU CVTS01+144 01149000 CVTBLDCP EQU CVTS01+140 01150000 CVTAUTHL EQU CVTS01+136 01151000 CVTSCAN EQU CVTS01+132 01152000 CVTRV144 EQU CVTS01+130 01153000 CVTMAXMP EQU CVTS01+128 01154000 CVTSTCK EQU CVTS01+124 01155000 CVTRV139 EQU CVTS01+123 01156000 CVTDSSAC EQU CVTS01+122 01157000 CVTRV513 EQU CVTS01+121 01158000 CVTIOSPL EQU CVTS01+120 01159000 CVTPTGT EQU CVTS01+116 01160000 CVTCSPIE EQU CVTS01+112 01161000 CVTSMFEX EQU CVTS01+108 01162000 CVTOLT0A EQU CVTS01+104 01163000 CVTSRBRT EQU CVTS01+100 01164000 CVTPUTL EQU CVTS01+96 01165000 CVTASCRL EQU CVTS01+92 01166000 CVTASCRF EQU CVTS01+88 01167000 CVTRV326 EQU CVTS01+84 01168000 CVTRV325 EQU CVTS01+80 01169000 CVTRV324 EQU CVTS01+76 01170000 CVT0VL01 EQU CVTS01+72 01171000 CVTSHRVM EQU CVTS01+68 01172000 CVTRV332 EQU CVTS01+64 01173000 CVTTAS EQU CVTS01+60 01174000 CVTRSCN EQU CVTS01+56 01175000 CVTTRAC2 EQU CVTS01+54 01176000 CVTTRACE EQU CVTS01+52 01177000 CVTAPG EQU CVTS01+51 01178000 CVTSDTRC EQU CVTCTLFG 01179000 CVTGTRCE EQU CVTCTLFG 01180000 CVTNOMP EQU CVTCTLFG 01181000 CVTRSV79 EQU CVTCTLFG 01182000 CVTDSTAT EQU CVTCTLFG 01183000 CVTRSV78 EQU CVTCTLFG 01184000 CVTRV333 EQU CVTCTLFG 01185000 CVTRV323 EQU CVTCTLFG 01186000 CVTSPVLK EQU CVTS01+49 01187000 CVTRSV77 EQU CVTS01+48 01188000 CVTRV331 EQU CVTS01+44 01189000 CVTRV330 EQU CVTS01+40 01190000 CVTRV329 EQU CVTS01+36 01191000 CVTRV328 EQU CVTS01+32 01192000 CVTRV322 EQU CVTS01+28 01193000 CVTSLID EQU CVTSLIDA+1 01194000 CVTSYLK EQU CVTSLIDA 01195000 CVTRV321 EQU CVTS01+20 01196000 CVTRV320 EQU CVTS01+16 01197000 CVTLPDIR EQU CVTLPDIA+1 01198000 CVTRSV69 EQU CVTDIRST 01199000 CVTRSV68 EQU CVTDIRST 01200000 CVTRSV67 EQU CVTDIRST 01201000 CVTRSV66 EQU CVTDIRST 01202000 CVTRSV65 EQU CVTDIRST 01203000 CVTRSV64 EQU CVTDIRST 01204000 CVTRSV63 EQU CVTDIRST 01205000 CVTDICOM EQU CVTDIRST 01206000 CVTPVTP EQU CVTS01+8 01207000 CVTLPDSR EQU CVTS01+4 01208000 CVTGETL EQU CVTS01 01209000 CDRCKOPT EQU CDRCREQR+41 01210000 CDRCKPQB EQU CDRCREQR+38 01211000 CDRCKQCB EQU CDRCREQR+17 01212000 CDRCKQBC EQU CDRCREQR+14 01213000 CDRCKMSG EQU CDRCREQR+12 01214000 CDRCKOFF EQU CDRCREQR+10 01215000 @NM00128 EQU CDRCREQR+9 01216000 @NM00127 EQU CDRCREQR+8 01217000 CDRCKOUT EQU CDRCREQR+6 01218000 CDRCKIN EQU CDRCREQR+4 01219000 @NM00126 EQU CDRCREQR+1 01220000 CDRCKRNC EQU CDRCKFLG 01221000 CDROPTN EQU CDRINCFM+7 01222000 CDRSEQOU EQU CDRINCFM+5 01223000 CDRSEQIN EQU CDRINCFM+3 01224000 CDROFFS EQU CDRINCFM+1 01225000 CDRSTAT EQU CDRINCFM 01226000 @NM00125 EQU CKPOPNFL 01227000 CKPOPNCR EQU CKPOPNFL 01228000 CKPOPNIN EQU CKPOPNFL 01229000 CKPOPNEN EQU CKPOPNFL 01230000 @NM00124 EQU CKPOPNFL 01231000 CKPTRKSA EQU CKPOVER+4 01232000 CKPTRKLN EQU CKPOVER+2 01233000 CKPRCDSR EQU CKPOVER 01234000 CKPSLNEW EQU CKPNSELT+1 01235000 CKPCUSEL EQU CKPNSELT 01236000 CKPNDEVF EQU CKPNFLDS+12 01237000 CKPNTTE EQU CKPNFLDS+8 01238000 CKPENCDE EQU CKPNFLDS+7 01239000 @NM00123 EQU CKPNFLDS 01240000 CKPBCKUP EQU CKPNCNTL+30 01241000 CKPTIME EQU CKPDATTM+4 01242000 CKPDATE EQU CKPDATTM 01243000 @NM00122 EQU CKPNCNTL+21 01244000 CKPBLKPT EQU CKPNCNTL+20 01245000 @NM00121 EQU CKPNCNTL+18 01246000 @NM00120 EQU CKPNCNTL+14 01247000 CKPIPLTX EQU CKPNCNTL+4 01248000 CKPSWTCH EQU CKPNCNTL+3 01249000 CKPTRSTA EQU CKPNCNTL+2 01250000 @NM00119 EQU CKPNCNTL 01251000 CKPTRMAD EQU CKPTWA+60 01252000 CKPCTTRA EQU CKPINIT+24 01253000 @NM00118 EQU CKPINIT+22 01254000 CKPIPERE EQU CKPINIT+20 01255000 CKPDATIM EQU CKPINIT+12 01256000 CKPCTTRC EQU CKPINIT+8 01257000 CKPDATLN EQU CKPINIT+6 01258000 CKPKEYLN EQU CKPINIT+5 01259000 CKPRCDNO EQU CKPINIT+4 01260000 CKPHEDNO EQU CKPINIT+2 01261000 CKPCYLNO EQU CKPINIT 01262000 TCXEND EQU IEDQTCXD+224 01263000 TCXNCPIO EQU IEDQTCXD+220 01264000 TCXACTE8 EQU TCXQE8 01265000 TCXABEPL EQU IEDQTCXD+212 01266000 TCXSRBS EQU IEDQTCXD+208 01267000 TCXSIOSB EQU IEDQTCXD+204 01268000 TCXESAVE EQU IEDQTCXD+132 01269000 TCXERPPM EQU IEDQTCXD+128 01270000 TCXERPSV EQU IEDQTCXD+116 01271000 TCXSATTN EQU IEDQTCXD+112 01272000 @NM00162 EQU TCXDSAVE+4 01273000 @NM00161 EQU TCXDSAVE 01274000 TCXPLCB EQU IEDQTCXD+100 01275000 TCXBITS EQU IEDQTCXD+98 01276000 TCXSCBSZ EQU IEDQTCXD+97 01277000 TCXBIT1 EQU IEDQTCXD+96 01278000 TCXCOMPT EQU IEDQTCXD+92 01279000 TCXAVAIL EQU IEDQTCXD+88 01280000 TCXBUFL EQU IEDQTCXD+84 01281000 TCXTOTE EQU TCXBUFA 01282000 TCXCKPM EQU IEDQTCXD+79 01283000 TCXNCKPR EQU IEDQTCXD+78 01284000 TCXSZAIB EQU IEDQTCXD+76 01285000 TCXAIBC EQU IEDQTCXD+72 01286000 TCXPEBC EQU IEDQTCXD+68 01287000 TCXPEWAC EQU IEDQTCXD+64 01288000 TCXQRQ EQU IEDQTCXD+60 01289000 TCXOCQ EQU IEDQTCXD+56 01290000 TCXPNTQ EQU IEDQTCXD+52 01291000 TCXPUTQ EQU IEDQTCXD+48 01292000 TCXGETQ EQU IEDQTCXD+44 01293000 TCXTSI EQU IEDQTCXD+40 01294000 TCXRPT EQU IEDQTCXD+36 01295000 TCXCC3TS EQU IEDQTCXD+35 01296000 TCXAPDMP EQU TCXFLAG1 01297000 TCXAPPL EQU TCXFLAG1 01298000 TCXRTM EQU TCXFLAG1 01299000 TCXMCPCD EQU TCXFLAG1 01300000 TCXAUTH EQU TCXFLAG1 01301000 TCXASID EQU IEDQTCXD+32 01302000 TCXASCB EQU IEDQTCXD+28 01303000 TCXPASWD EQU IEDQTCXD+16 01304000 TCXDISP EQU IEDQTCXD+12 01305000 TCXTCB EQU IEDQTCXD+8 01306000 TCXATTLN EQU TCXATTEN 01307000 TCXAVT EQU IEDQTCXD 01308000 OPCBOTTM EQU IEDQOPCD+1184 01309000 @NM00160 EQU IEDQOPCD+1100 01310000 @NM00159 EQU IEDQOPCD+948 01311000 @NM00158 EQU IEDQOPCD+940 01312000 @NM00157 EQU IEDQOPCD+380 01313000 @NM00156 EQU OPCPWCOB+9 01314000 @NM00155 EQU OPCPWCOB+8 01315000 @NM00154 EQU OPCPWECB+1 01316000 OPCPWCCC EQU OPCPWECB 01317000 OPCPWCHN EQU OPCPWQCB+1 01318000 OPCPWVTO EQU OPCPWQCB 01319000 OPCWAITV EQU IEDQOPCD+364 01320000 OPCTOTCK EQU IEDQOPCD+360 01321000 OPCAPXTL EQU IEDQOPCD+356 01322000 OPCDECR EQU IEDQOPCD+352 01323000 OPCBUFWT EQU IEDQOPCD+348 01324000 OPCWRKSP EQU IEDQOPCD+320 01325000 OPCADGOT EQU IEDQOPCD+318 01326000 OPCRQCNT EQU IEDQOPCD+316 01327000 OPPOLSTP EQU IEDQOPCD+312 01328000 OPCCKCIB EQU IEDQOPCD+308 01329000 OPCEND EQU IEDQOPCD+307 01330000 OPCSTCBS EQU IEDQOPCD+306 01331000 OPCHNEND EQU IEDQOPCD+302 01332000 OPCOQSW EQU IEDQOPCD+301 01333000 @NM00153 EQU OPCSPEC 01334000 @NM00152 EQU OPCSPEC 01335000 @NM00151 EQU OPCSPEC 01336000 @NM00150 EQU OPCSPEC 01337000 OPCFRMCA EQU OPCSPEC 01338000 OPCRSTRT EQU OPCSPEC 01339000 OPCPART EQU OPCSPEC 01340000 OPCALTD EQU OPCSPEC 01341000 OPCBFEND EQU IEDQOPCD+296 01342000 OPCBFIRS EQU IEDQOPCD+292 01343000 OPCAVBUF EQU IEDQOPCD+290 01344000 OPCIPLCT EQU IEDQOPCD+289 01345000 OPCCLNTS EQU IEDQOPCD+288 01346000 OPCHA8 EQU IEDQOPCD+286 01347000 OPCBFREQ EQU IEDQOPCD+284 01348000 OPCFREBF EQU IEDQOPCD+280 01349000 OPCGETBF EQU IEDQOPCD+276 01350000 OPCNEXT EQU IEDQOPCD+272 01351000 OPCFMDFC EQU IEDQOPCD+268 01352000 OPCSCNC EQU IEDQOPCD+264 01353000 OPCHORTG EQU IEDQOPCD+260 01354000 OPCHORT EQU IEDQOPCD+256 01355000 OPCCKPTL EQU IEDQOPCD+252 01356000 OPCWAITA EQU IEDQOPCD+244 01357000 OPCWAITR EQU IEDQOPCD+240 01358000 OPCWAITP EQU IEDQOPCD+236 01359000 OPCWAITO EQU IEDQOPCD+232 01360000 OPCWAITN EQU IEDQOPCD+228 01361000 OPCWAITL EQU IEDQOPCD+224 01362000 OPCWAITC EQU IEDQOPCD+220 01363000 @NM00149 EQU OPCLDNME+5 01364000 OPCMODID EQU OPCLDNME+3 01365000 @NM00148 EQU OPCLDNME 01366000 OPCXCTL EQU IEDQOPCD+204 01367000 OPCWAIT EQU IEDQOPCD+192 01368000 OPCCKERB EQU IEDQOPCD+164 01369000 OPCBFERB EQU IEDQOPCD+148 01370000 OPCFLAG2 EQU IEDQOPCD+147 01371000 OPCFLAG1 EQU IEDQOPCD+146 01372000 OPCWRKSZ EQU IEDQOPCD+144 01373000 OPCWORK EQU IEDQOPCD+140 01374000 OPCRSAVE EQU IEDQOPCD+132 01375000 OPCQCBAD EQU IEDQOPCD+128 01376000 OPCSAVE EQU IEDQOPCD+56 01377000 OPCTRMWA EQU IEDQOPCD+52 01378000 OPCPSTWT EQU IEDQOPCD+48 01379000 OPCTNTEA EQU IEDQOPCD+44 01380000 OPCPGCK EQU IEDQOPCD+40 01381000 OPCLCB EQU IEDQOPCD+36 01382000 @NM00147 EQU IEDQOPCD+32 01383000 OPCIPLAD EQU IEDQOPCD+28 01384000 OPCTOFLK EQU IEDQOPCD+24 01385000 OPCOPTLK EQU IEDQOPCD+20 01386000 OPCDCBLK EQU IEDQOPCD+16 01387000 OPCCOPCE EQU IEDQOPCD+12 01388000 OPCAVTPT EQU IEDQOPCD+8 01389000 OPCDOUBL EQU IEDQOPCD 01390000 @NM00146 EQU OCLDNME+4 01391000 @NM00145 EQU OCPREFLG 01392000 OCTOTEP EQU OCPREFLG 01393000 OCREPOST EQU OCPREFLG 01394000 OCRSPSNT EQU OCPREFLG 01395000 OCBFREQ EQU OCPREFLG 01396000 OCIDLE EQU OCREQFLG 01397000 OCFORCE EQU OCREQFLG 01398000 OCDCARD EQU OCREQFLG 01399000 OCPARTAL EQU OCREQFLG 01400000 OCADNCP EQU OCREQFLG 01401000 @NM00144 EQU OCREQFLG 01402000 @NM00143 EQU OCREQFLG 01403000 OCFLUSHZ EQU OCREQFLG 01404000 OCRESPCT EQU OCLINTTE 01405000 OCCKPTWA EQU OCCKDATA+4 01406000 @NM00140 EQU OCRSTGTM+2 01407000 OCCKDAT2 EQU OCRSTGTM+1 01408000 OCCKDAT1 EQU OCRSTGTM 01409000 OCPUADR EQU OCIPLWA+2 01410000 OCWTGSAV EQU OCIPLWA 01411000 OCDVRDCT EQU OCBACKUP+6 01412000 OCNCP EQU OCBACKUP+4 01413000 OCBUFGOT EQU OCBACKUP+2 01414000 OCBUFNED EQU OCBACKUP 01415000 OCWTG EQU IEDQOPCE+30 01416000 OCSEQ EQU OCTRUNIT+2 01417000 @NM00139 EQU OCRSID+1 01418000 OCNONE EQU OCALSTAT 01419000 OCSOME EQU OCALSTAT 01420000 OCALLFLG EQU OCALSTAT 01421000 OCACTREQ EQU OCALSTAT 01422000 OCREDRVE EQU OCALSTAT 01423000 OCSEQIND EQU OCALSTAT 01424000 @NM00138 EQU OCALSTAT 01425000 OCRENTRD EQU OCALSTAT 01426000 OCWTGB EQU OCTIOT 01427000 OCTRMTBL EQU IEDQOPCE+20 01428000 @NM00137 EQU @NM00136+2 01429000 OCCONID EQU OCDEST 01430000 OCRLN EQU IEDQOPCE+15 01431000 OCRESP EQU OCFLAG 01432000 OCATTACH EQU OCFLAG 01433000 OCSSCP EQU OCFLAG 01434000 OCOUTPUT EQU OCFLAG 01435000 OCLINE EQU OCFLAG 01436000 OCMPP EQU OCFLAG 01437000 OCTOTE EQU OCFLAG 01438000 OCCONSOL EQU OCFLAG 01439000 @NM00135 EQU OCSWITCH 01440000 OCQUCKN EQU OCSWITCH 01441000 OCPRIFLG EQU OCOPTCDE 01442000 @NM00134 EQU OCRUDEST+1 01443000 @NM00133 EQU OCSCAN 01444000 OCNOTUCB EQU OCSCAN 01445000 OCNONAME EQU OCSCAN 01446000 OCALLRLN EQU OCSCAN 01447000 OCDDNAME EQU OCSCAN 01448000 OCDDNRLN EQU OCSCAN 01449000 OCADDR EQU OCSCAN 01450000 OCELMPTR EQU OCELEM+1 01451000 OCELMPRI EQU OCELEM 01452000 OCLINK EQU IEDQOPCE 01453000 CVTLEVL EQU CVTRELNO+2 01454000 CVTNUMB EQU CVTRELNO 01455000 CVTMDL EQU CVTFIX+250 01456000 @NM00132 EQU CVTFIX+248 01457000 @NM00131 EQU CVTFIX 01458000 CVTRV482 EQU CVTXTNT2+128 01459000 CVTRV481 EQU CVTXTNT2+124 01460000 CVTRV480 EQU CVTXTNT2+120 01461000 CVTRV479 EQU CVTXTNT2+118 01462000 CVTRV478 EQU CVTXTNT2+117 01463000 CVTRV477 EQU CVTXTNT2+116 01464000 CVTRV476 EQU CVTXTNT2+115 01465000 CVTRV475 EQU CVTXTNT2+114 01466000 CVTRV474 EQU CVTRV466 01467000 CVTRV473 EQU CVTRV466 01468000 CVTRV472 EQU CVTRV466 01469000 CVTRV471 EQU CVTRV466 01470000 CVTRV470 EQU CVTRV466 01471000 CVTRV469 EQU CVTRV466 01472000 CVTRV468 EQU CVTRV466 01473000 CVTRV467 EQU CVTRV466 01474000 CVTRV465 EQU CVTRV457 01475000 CVTRV464 EQU CVTRV457 01476000 CVTRV463 EQU CVTRV457 01477000 CVTRV462 EQU CVTRV457 01478000 CVTRV461 EQU CVTRV457 01479000 CVTRV460 EQU CVTRV457 01480000 CVTRV459 EQU CVTRV457 01481000 CVTRV458 EQU CVTRV457 01482000 CVTRV456 EQU CVTXTNT2+108 01483000 CVTRV455 EQU CVTXTNT2+104 01484000 CVTRV454 EQU CVTXTNT2+100 01485000 CVTRV453 EQU CVTXTNT2+96 01486000 CVTRV452 EQU CVTXTNT2+94 01487000 CVTRV451 EQU CVTXTNT2+92 01488000 CVTRV450 EQU CVTXTNT2+90 01489000 CVTRV449 EQU CVTXTNT2+88 01490000 CVTRV448 EQU CVTXTNT2+87 01491000 CVTRV447 EQU CVTXTNT2+86 01492000 CVTRV446 EQU CVTRV438 01493000 CVTRV445 EQU CVTRV438 01494000 CVTRV444 EQU CVTRV438 01495000 CVTRV443 EQU CVTRV438 01496000 CVTRV442 EQU CVTRV438 01497000 CVTRV441 EQU CVTRV438 01498000 CVTRV440 EQU CVTRV438 01499000 CVTRV439 EQU CVTRV438 01500000 CVTRV437 EQU CVTRV429 01501000 CVTRV436 EQU CVTRV429 01502000 CVTRV435 EQU CVTRV429 01503000 CVTRV434 EQU CVTRV429 01504000 CVTRV433 EQU CVTRV429 01505000 CVTRV432 EQU CVTRV429 01506000 CVTRV431 EQU CVTRV429 01507000 CVTRV430 EQU CVTRV429 01508000 CVTRV428 EQU CVTXTNT2+80 01509000 CVTRV427 EQU CVTXTNT2+76 01510000 CVTRV426 EQU CVTXTNT2+72 01511000 CVTRV425 EQU CVTXTNT2+68 01512000 CVTATACT EQU CVTATCVT 01513000 CVTRV423 EQU CVTXTNT2+62 01514000 CVTRV422 EQU CVTXTNT2+60 01515000 CVTRV421 EQU CVTXTNT2+58 01516000 CVTRV420 EQU CVTXTNT2+56 01517000 CVTRV419 EQU CVTXTNT2+55 01518000 CVTRV418 EQU CVTXTNT2+54 01519000 CVTRV417 EQU CVTRV409 01520000 CVTRV416 EQU CVTRV409 01521000 CVTRV415 EQU CVTRV409 01522000 CVTRV414 EQU CVTRV409 01523000 CVTRV413 EQU CVTRV409 01524000 CVTRV412 EQU CVTRV409 01525000 CVTRV411 EQU CVTRV409 01526000 CVTRV410 EQU CVTRV409 01527000 CVTRV408 EQU CVTRV400 01528000 CVTRV407 EQU CVTRV400 01529000 CVTRV406 EQU CVTRV400 01530000 CVTRV405 EQU CVTRV400 01531000 CVTRV404 EQU CVTRV400 01532000 CVTRV403 EQU CVTRV400 01533000 CVTRV402 EQU CVTRV400 01534000 CVTRV401 EQU CVTRV400 01535000 CVTICB EQU CVTXTNT2+48 01536000 CVTSKTA EQU CVTXTNT2+44 01537000 CVTSHSB EQU CVTSHS 01538000 CVTRSV98 EQU CVTXTNT2+36 01539000 CVTRSV97 EQU CVTXTNT2+34 01540000 CVTRSV96 EQU CVTXTNT2+32 01541000 CVTOLTEP EQU CVTXTNT2+28 01542000 CVTQIDA EQU CVTQID+1 01543000 CVTRSV95 EQU CVTQID 01544000 CVTRSV94 EQU CVTXTNT2+20 01545000 CVTRSV93 EQU CVTXTNT2+16 01546000 CVTRSV92 EQU CVTXTNT2+12 01547000 CVTDEBVR EQU CVTXTNT2+8 01548000 CVTRSV91 EQU CVTXTNT2+6 01549000 CVTRSV9H EQU CVTFLGBT 01550000 CVTRSV9G EQU CVTFLGBT 01551000 CVTRSV9F EQU CVTFLGBT 01552000 CVTRSV9E EQU CVTFLGBT 01553000 CVTRSV9D EQU CVTFLGBT 01554000 CVTRSV9C EQU CVTFLGBT 01555000 CVTVME EQU CVTFLGBT 01556000 CVTNPE EQU CVTFLGBT 01557000 CVTNUCLS EQU CVTXTNT2+4 01558000 CVTDSSVA EQU CVTDSSV+1 01559000 CVTRSV89 EQU CVTDSSV 01560000 CVTRSV88 EQU CVTXTNT1+8 01561000 CVTRSV87 EQU CVTXTNT1+4 01562000 CVTFACHN EQU CVTXTNT1 01563000 CVTRV488 EQU CVTMAP+412 01564000 CVTRV487 EQU CVTMAP+408 01565000 CVTRV486 EQU CVTMAP+404 01566000 CVTRV485 EQU CVTMAP+400 01567000 CVTACTAP EQU CVTMAP+396 01568000 CVTAUTH EQU CVTMAP+392 01569000 CVTATMCA EQU CVTATMCT+1 01570000 CVTATMST EQU CVTATMCT 01571000 CVTRSV61 EQU CVTMAP+384 01572000 CVTVOLT1 EQU CVTVOLM1+1 01573000 CVTVOLI1 EQU CVTVOLF1 01574000 CVTSTOA EQU CVTMAP+376 01575000 CVTRSV58 EQU CVTMAP+374 01576000 CVTRSV57 EQU CVTMAP+372 01577000 CVTDDCE EQU CVTMAP+368 01578000 CVTPNWFR EQU CVTMAP+364 01579000 CVTSMF EQU CVTMAP+360 01580000 CVTSULK EQU CVTMAP+358 01581000 CVTSLKO EQU CVTSYSK 01582000 CVTSLKP EQU CVTSYSK 01583000 CVTSLKQ EQU CVTSYSK 01584000 CVTSLKR EQU CVTSYSK 01585000 CVTRSV56 EQU CVTSYSK 01586000 CVTRSV55 EQU CVTSYSK 01587000 CVTRSV54 EQU CVTSYSK 01588000 CVTRSV53 EQU CVTSYSK 01589000 CVTRSV52 EQU CVTA1F1 01590000 CVTRSV51 EQU CVTA1F1 01591000 CVTRSV50 EQU CVTA1F1 01592000 CVTRSV49 EQU CVTA1F1 01593000 CVTRSV48 EQU CVTA1F1 01594000 CVTRSV47 EQU CVTA1F1 01595000 CVTSRSW EQU CVTA1F1 01596000 CVTPFSW EQU CVTA1F1 01597000 CVTPCVT EQU CVTMAP+352 01598000 CVTRSV46 EQU CVTMAP+344 01599000 CVTRSV45 EQU CVTMAP+340 01600000 CVTRSV44 EQU CVTMAP+338 01601000 CVTRSV43 EQU CVTMAP+336 01602000 CVTHJESA EQU CVTHJES+1 01603000 CVTRSV42 EQU CVTHJES 01604000 CVTEXT2A EQU CVTEXT2+1 01605000 CVTRSV41 EQU CVTEXT2 01606000 CVTAPFA EQU CVTAPF+1 01607000 CVTRSV40 EQU CVTAPF 01608000 CVTRV518 EQU CVTINTLA 01609000 CVTRV517 EQU CVTERPV 01610000 CVTEORM EQU CVTMAP+312 01611000 CVTMCHPR EQU CVTMAP+308 01612000 CVTTZ EQU CVTMAP+304 01613000 CVTJEPS EQU CVTMAP+300 01614000 CVTJESCT EQU CVTMAP+296 01615000 CVTMODE EQU CVTMAP+292 01616000 CVTPTRV EQU CVTMAP+288 01617000 CVTREAL EQU CVTMAP+284 01618000 CVTRSV39 EQU CVTMAP+280 01619000 CVTRSV38 EQU CVTMAP+276 01620000 CVTDMSRA EQU CVTDMSR+1 01621000 CVTRV634 EQU CVTDMSRF 01622000 CVTRV633 EQU CVTDMSRF 01623000 CVTRV632 EQU CVTDMSRF 01624000 CVTRV631 EQU CVTDMSRF 01625000 CVTRV630 EQU CVTDMSRF 01626000 CVTRV629 EQU CVTDMSRF 01627000 CVTUDUMP EQU CVTDMSRF 01628000 CVTSDUMP EQU CVTDMSRF 01629000 CVTQMSGA EQU CVTQMSG+1 01630000 CVTRSV36 EQU CVTQMSG 01631000 CVTAMFF EQU CVTMAP+264 01632000 CVTPURGA EQU CVTPURG+1 01633000 CVTRSV35 EQU CVTPURG 01634000 CVTCBSP EQU CVTMAP+256 01635000 CVTATERA EQU CVTATER+1 01636000 CVTSYST EQU CVTATER 01637000 CVTVOLT2 EQU CVTTAT 01638000 CVTVOLI2 EQU CVTVOLF2 01639000 CVTAQAVB EQU CVTAQAVT+1 01640000 CVTRSV34 EQU CVTTCMFG 01641000 CVTRSV33 EQU CVTTCMFG 01642000 CVTRSV32 EQU CVTTCMFG 01643000 CVTRSV31 EQU CVTTCMFG 01644000 CVTRSV30 EQU CVTTCMFG 01645000 CVTRSV29 EQU CVTTCMFG 01646000 CVTRSV28 EQU CVTTCMFG 01647000 CVTTCRDY EQU CVTTCMFG 01648000 CVTGTFA EQU CVTGTF+1 01649000 CVTRSV27 EQU CVTGTFST 01650000 CVTRNIO EQU CVTGTFST 01651000 CVTUSR EQU CVTGTFST 01652000 CVTRV318 EQU CVTFORM 01653000 CVTRV317 EQU CVTTMODE 01654000 CVTRV316 EQU CVTSTATE 01655000 CVTRV315 EQU CVTGTFS 01656000 CVTGTFAV EQU CVTGTFS 01657000 CVT0SCR1 EQU CVTMAP+232 01658000 CVTRV515 EQU CVTMAP+228 01659000 CVTRMS EQU CVTMAP+224 01660000 CVTPATCH EQU CVTMAP+220 01661000 CVTTSCE EQU CVTMAP+216 01662000 CVTLNKSC EQU CVTMAP+214 01663000 CVTQABST EQU CVTMAP+212 01664000 CVTMDLDS EQU CVTMAP+208 01665000 CVTUSER EQU CVTMAP+204 01666000 CVTABEND EQU CVTMAP+200 01667000 CVTSMCA EQU CVTMAP+196 01668000 CVTRSV18 EQU CVTMAP+192 01669000 CVTQLPAQ EQU CVTMAP+188 01670000 CVTQCDSR EQU CVTMAP+184 01671000 CVTRSV17 EQU CVTOPTB 01672000 CVTRSV16 EQU CVTOPTB 01673000 CVTFP EQU CVTOPTB 01674000 CVTAPTHR EQU CVTOPTB 01675000 CVTNLOG EQU CVTOPTB 01676000 CVTTOD EQU CVTOPTB 01677000 CVTCTIMS EQU CVTOPTB 01678000 CVTPROT EQU CVTOPTB 01679000 CVTXPFP EQU CVTOPTA 01680000 CVTASCII EQU CVTOPTA 01681000 CVTRSV13 EQU CVTOPTA 01682000 CVTRSV12 EQU CVTOPTA 01683000 CVTNIP EQU CVTOPTA 01684000 CVTDDR EQU CVTOPTA 01685000 CVTAPR EQU CVTOPTA 01686000 CVTCCH EQU CVTOPTA 01687000 CVTSNCTR EQU CVTMAP+180 01688000 CVTQMWR EQU CVTMAP+176 01689000 CVTQOCR EQU CVTMAP+172 01690000 CVT1EF00 EQU CVTMAP+168 01691000 CVTMZ00 EQU CVTMAP+164 01692000 CVTHEAD EQU CVTMAP+160 01693000 CVTRSV11 EQU CVTMAP+156 01694000 CVT0PT01 EQU CVTMAP+152 01695000 CVTMSER EQU CVTMAP+148 01696000 CVTRV516 EQU CVTIERLC 01697000 CVTILCH EQU CVTMAP+140 01698000 CVT0DS EQU CVTMAP+136 01699000 CVTFBOSV EQU CVTMAP+132 01700000 CVTNUCB EQU CVTMAP+128 01701000 CVTIXAVL EQU CVTMAP+124 01702000 CVTIOQET EQU CVTMAP+120 01703000 CVTDCBA EQU CVTMAP+117 01704000 CVTMVS2 EQU CVTDCB 01705000 CVT6DAT EQU CVTDCB 01706000 CVT4MPS EQU CVTDCB 01707000 CVTRSV09 EQU CVTDCB 01708000 CVT4MS1 EQU CVTDCB 01709000 CVT2SPS EQU CVTDCB 01710000 CVT1SSS EQU CVTDCB 01711000 CVTRSV08 EQU CVTDCB 01712000 CVTSTB EQU CVTMAP+112 01713000 CVTQTD00 EQU CVTMAP+108 01714000 CVTQTE00 EQU CVTMAP+104 01715000 CVTCUCB EQU CVTMAP+100 01716000 CVTSJQ EQU CVTMAP+96 01717000 CVTPBLDL EQU CVTMAP+92 01718000 CVTTPC EQU CVTMAP+88 01719000 CVTSVDCB EQU CVTMAP+84 01720000 CVTBRET EQU CVTMAP+82 01721000 CVTEXIT EQU CVTMAP+80 01722000 CVT0FN00 EQU CVTMAP+76 01723000 CVTDARA EQU CVTDAR+1 01724000 CVTRSV07 EQU CVTFLGS1 01725000 CVTRSV06 EQU CVTFLGS1 01726000 CVTRSV05 EQU CVTFLGS1 01727000 CVTRSV04 EQU CVTFLGS1 01728000 CVTRSV03 EQU CVTFLGS1 01729000 CVTRSV02 EQU CVTFLGS1 01730000 CVTRSV01 EQU CVTFLGS1 01731000 CVTDMPLK EQU CVTFLGS1 01732000 CVTXITP EQU CVTMAP+68 01733000 CVTZDTAB EQU CVTMAP+64 01734000 CVTMSLT EQU CVTMAP+60 01735000 CVTDATE EQU CVTMAP+56 01736000 CVTBTERM EQU CVTMAP+52 01737000 CVTSYSAD EQU CVTMAP+48 01738000 CVTXTLER EQU CVTMAP+44 01739000 CVTILK2 EQU CVTMAP+40 01740000 CVTILK1 EQU CVTMAP+36 01741000 CVTPRLTV EQU CVTMAP+32 01742000 CVTPCNVT EQU CVTMAP+28 01743000 CVT0VL00 EQU CVTMAP+24 01744000 CVTXAPG EQU CVTMAP+20 01745000 CVTBUF EQU CVTMAP+16 01746000 CVTJOB EQU CVTMAP+12 01747000 CVTLINK EQU CVTMAP+8 01748000 CVT0EF00 EQU CVTMAP+4 01749000 CVTTCBP EQU CVTMAP 01750000 CVT EQU CVTMAP 01751000 CKPIOTR EQU CKPAVT+21 01752000 CKPSUBT EQU CKPAVT+20 01753000 CKPLODPT EQU CKPAVT+16 01754000 CKPRADDR EQU CKPAVT+12 01755000 CKPNADDR EQU CKPAVT+8 01756000 CKPBIT2 EQU CKPAVT+7 01757000 CKPBIT1 EQU CKPAVT+6 01758000 CKPINTLV EQU CKPAVT+4 01759000 CKPOPCIN EQU CKPAVT+2 01760000 CKPOPCON EQU CKPAVT 01761000 CKPTYPE EQU CKPNRES+5 01762000 @NM00130 EQU CKPNFLG 01763000 CKPLULOG EQU CKPNFLG 01764000 CKPEPMOD EQU CKPNFLG 01765000 CKPRSACT EQU CKPNFLG 01766000 CKPREMB EQU CKPNFLG 01767000 CKPCOHRT EQU CKPNRES+2 01768000 CKPSUBST EQU CKPNRES 01769000 CKPCTSEC EQU CKPREQTB+6 01770000 CKPCTOFF EQU CKPREQTB+4 01771000 CKPCTTTR EQU CKPREQTB+1 01772000 CKPCTDER EQU CKPCTFLG 01773000 CKPCTACT EQU CKPCTFLG 01774000 CREDEB EQU CREOFFS 01775000 CREECB EQU IEDQCRED+8 01776000 @NM00129 EQU CRELINK+1 01777000 CREPRI EQU CRELINK 01778000 CREQCBAD EQU IEDQCRED+1 01779000 CREKEY EQU IEDQCRED 01780000 CDRKEY EQU IEDQCDRD+8 01781000 CDRTIME EQU IEDQCDRD+4 01782000 CDRDATE EQU IEDQCDRD 01783000 CKPSECT1 EQU CKPCNTLR+37 01784000 CKPTTRT1 EQU CKPCNTLR+34 01785000 CKPSECIN EQU CKPCNTLR+32 01786000 CKPSECCR EQU CKPCNTLR+30 01787000 CKPSECLI EQU CKPCNTLR+28 01788000 CKPSECLT EQU CKPCNTLR+26 01789000 CKPINCLN EQU CKPCNTLR+24 01790000 CKPTTRLI EQU CKPCNTLR+21 01791000 CKPRPERT EQU CKPCNTLR+20 01792000 CKPCKRLN EQU CKPCNTLR+18 01793000 CKPCPERT EQU CKPPRQNO 01794000 CKPIPERT EQU CKPCNTLR+16 01795000 CKPCPRCD EQU CKPCNTLR+15 01796000 CKPCKRQS EQU CKPCNTLR+14 01797000 CKPBPERR EQU CKPCNTLR+12 01798000 CKPTTRIN EQU CKPCNTLR+9 01799000 CKPINRNO EQU CKPCNTLR+8 01800000 CKPTTRCR EQU CKPCNTLR+5 01801000 CKPCRRNO EQU CKPCNTLR+4 01802000 CKPINCNO EQU CKPCNTLR+3 01803000 CKPINCNT EQU CKPCNTLR+2 01804000 CKPTTRCT EQU CKPCNTLR+1 01805000 CKPOPCRD EQU CKPFLAGS 01806000 CKPOPTFN EQU CKPFLAGS 01807000 CKPSTAIN EQU CKPFLAGS 01808000 CKPERR EQU CKPFLAGS 01809000 @NM00117 EQU CKPFLAGS 01810000 CKPFSCN2 EQU CKPFLAGS 01811000 CKPFSCN1 EQU CKPFLAGS 01812000 CKPNORML EQU CKPFLAGS 01813000 @NM00116 EQU CKPMSG+65 01814000 CKPMSGGL EQU CKPMSG+61 01815000 @NM00115 EQU CKPMSG+2 01816000 CKPMSGLN EQU CKPMSG 01817000 CKPWKALN EQU @NM00114+10 01818000 CKPGETML EQU @NM00114 01819000 @NM00113 EQU CKPRW+5 01820000 CKPRWFLG EQU CKPRW+4 01821000 CKPSCHID EQU CKPCCWS+16 01822000 CKPSETSC EQU CKPCCWS+8 01823000 CKPSEEKC EQU CKPCCWS 01824000 @NM00112 EQU IEDQCKPD+164 01825000 CKPERRCT EQU IEDQCKPD+163 01826000 CKPSWCH2 EQU IEDQCKPD+162 01827000 CKPSWCH1 EQU IEDQCKPD+161 01828000 CKPCRLEN EQU IEDQCKPD+160 01829000 CKPPARM2 EQU IEDQCKPD+156 01830000 CKPCPARM EQU IEDQCKPD+148 01831000 CKPSECTR EQU CKPCTTRB 01832000 CKPLDRB EQU IEDQCKPD+140 01833000 CKPLREB EQU IEDQCKPD+136 01834000 CKPNDRB EQU @NM00111 01835000 CKPIOQF EQU IEDQCKPD+128 01836000 CKPEPLOC EQU CKPCNVRT 01837000 CKPECB EQU IEDQCKPD+112 01838000 CKPIOR EQU CKPIOSK+7 01839000 CKPIOHH EQU CKPIOSK+5 01840000 CKPIOCC EQU CKPIOSK+3 01841000 CKPIOBB EQU CKPIOSK+1 01842000 CKPIOM EQU CKPIOSK 01843000 CKPIORC EQU CKPIOB+30 01844000 CKPIOBCI EQU CKPIOB+28 01845000 CKPIORST EQU CKPIOB+25 01846000 @NM00110 EQU CKPIOB+24 01847000 CKPIODCB EQU CKPIOB+21 01848000 @NM00109 EQU CKPIOB+20 01849000 CKPIOCPA EQU CKPIOB+17 01850000 CKPIOSIO EQU CKPIOB+16 01851000 CKPIOCSW EQU CKPIOB+9 01852000 CKPIOFL3 EQU CKPIOB+8 01853000 @NM00108 EQU CKPIOECB+1 01854000 CKPIOSN1 EQU CKPIOB+3 01855000 CKPIOSN0 EQU CKPIOB+2 01856000 CKPIOFL2 EQU CKPIOB+1 01857000 CKPIOFL1 EQU CKPIOB 01858000 CKPSAVE1 EQU IEDQCKPD 01859000 CNRDEVRC EQU IEDQCNRD+19 01860000 CNRMSSEL EQU IEDQCNRD+18 01861000 CNRCTLIM EQU IEDQCNRD+17 01862000 CNRCSLIM EQU IEDQCNRD+16 01863000 CNRNEGPL EQU IEDQCNRD+15 01864000 CNRSSPAU EQU IEDQCNRD+14 01865000 CNRBHPOS EQU CNRBHSET+1 01866000 @NM00107 EQU CNRBHFUN 01867000 CNRBHFN0 EQU CNRBHFUN 01868000 @NM00106 EQU CNRCNTL+1 01869000 CNRFRDR EQU CNRCNTL 01870000 CNRFMSS EQU CNRCNTL 01871000 CNRFCTL EQU CNRCNTL 01872000 CNRFCSL EQU CNRCNTL 01873000 CNRFNPL EQU CNRCNTL 01874000 CNRFSSP EQU CNRCNTL 01875000 CNRFBHSC EQU CNRCNTL 01876000 CNRFBHS EQU CNRCNTL 01877000 CNRTIME EQU CNRDATTM+4 01878000 CNRDATE EQU CNRDATTM 01879000 CNRTNTOF EQU IEDQCNRD 01880000 CAVTNQE EQU CAVTWL2+1 01881000 CAVTTIOE EQU CAVTWL1+5 01882000 CAVTEOL1 EQU CAVTWL1+4 01883000 CAVTTQE EQU CAVTWL1 01884000 @NM00105 EQU IEDQCKAD+10 01885000 CAVTFLGS EQU IEDQCKAD+9 01886000 CAVTTCWA EQU IEDQCKAD 01887000 SAVTBITN EQU IEDNSVTD+312 01888000 @NM00104 EQU SAVTCKQB+8 01889000 @NM00103 EQU SAVTCKEC+1 01890000 @NM00102 EQU SAVTCKCC 01891000 SAVTCKPO EQU SAVTCKCC 01892000 SAVTCKWA EQU SAVTCKCC 01893000 SAVTCKCH EQU SAVTCKTB+1 01894000 SAVTCKVT EQU SAVTCKTB 01895000 @NM00101 EQU IEDNSVTD+297 01896000 SAVTRDFG EQU SAVTRDRV+12 01897000 @NM00100 EQU SAVTRDRV+5 01898000 SAVTRDPY EQU SAVTRDRV+4 01899000 SAVTRDQB EQU SAVTRDRV+1 01900000 SAVTRDKY EQU SAVTRDRV 01901000 SAVTNID EQU IEDNSVTD+280 01902000 SAVTDVAS EQU IEDNSVTD+276 01903000 SAVTPLSZ EQU IEDNSVTD+274 01904000 @NM00099 EQU IEDNSVTD+273 01905000 SAVTSUBL EQU IEDNSVTD+272 01906000 @NM00098 EQU SAVTZELM+1 01907000 SAVTSUBM EQU SAVTZELM 01908000 SAVTMHDX EQU IEDNSVTD+268 01909000 SAVTNAT1 EQU IEDNSVTD+266 01910000 SAVTSH20 EQU IEDNSVTD+264 01911000 SAVTLCBS EQU IEDNSVTD+260 01912000 SAVTRNMP EQU IEDNSVTD+256 01913000 SAVTTNTX EQU IEDNSVTD+252 01914000 SAVTNAX EQU IEDNSVTD+248 01915000 SAVTSUBV EQU IEDNSVTD+247 01916000 SAVTSUBA EQU IEDNSVTD+246 01917000 SAVTSIBC EQU IEDNSVTD+244 01918000 SAVTBSM EQU IEDNSVTD+240 01919000 SAVTSCPT EQU SAVTTCPU 01920000 SAVTRQTG EQU IEDNSVTD+236 01921000 SAVTRQCH EQU IEDNSVTD+232 01922000 SAVTMAND EQU IEDNSVTD+228 01923000 SAVTSPLN EQU IEDNSVTD+224 01924000 SAVTNADL EQU IEDNSVTD+222 01925000 SAVTNATL EQU IEDNSVTD+220 01926000 SAVTMHTB EQU IEDNSVTD+216 01927000 SAVTSSMH EQU IEDNSVTD+212 01928000 SAVTQRS EQU IEDNSVTD+208 01929000 SAVTRQIN EQU IEDNSVTD+204 01930000 SAVTDFCO EQU IEDNSVTD+200 01931000 SAVTSAO EQU IEDNSVTD+196 01932000 SAVTSARI EQU IEDNSVTD+192 01933000 SAVTSAC EQU IEDNSVTD+188 01934000 SAVTSAI EQU IEDNSVTD+184 01935000 SAVTCSCI EQU IEDNSVTD+180 01936000 SAVTSSRP EQU IEDNSVTD+176 01937000 SAVTSSRQ EQU IEDNSVTD+172 01938000 SAVTSCLU EQU IEDNSVTD+168 01939000 SAVTXTRQ EQU IEDNSVTD+164 01940000 SAVTMVBF EQU IEDNSVTD+160 01941000 @NM00097 EQU IEDNSVTD+148 01942000 SAVTIPCQ EQU IEDNSVTD+144 01943000 @NM00096 EQU IEDNSVTD+136 01944000 SAVTXFMI EQU IEDNSVTD+132 01945000 @NM00095 EQU IEDNSVTD+124 01946000 SAVTXFMO EQU IEDNSVTD+120 01947000 @NM00094 EQU IEDNSVTD+116 01948000 SAVTSSSR EQU IEDNSVTD+112 01949000 SAVTSCPQ EQU IEDNSVTD+108 01950000 SAVTSLCB EQU IEDNSVTD+104 01951000 SAVTLUSR EQU IEDNSVTD+100 01952000 @NM00093 EQU SAVTLUSQ+8 01953000 SAVTLUSP EQU SAVTLUSQ+4 01954000 SAVTLUSB EQU SAVTLUSQ 01955000 @NM00092 EQU IEDNSVTD+84 01956000 SAVTSAT EQU IEDNSVTD+80 01957000 SAVTNAT EQU IEDNSVTD+76 01958000 SAVTCLUP EQU IEDNSVTD+72 01959000 SAVTPIUT EQU IEDNSVTD+68 01960000 SAVTRNTA EQU IEDNSVTD+64 01961000 SAVTDNIR EQU IEDNSVTD+60 01962000 SAVTCNIR EQU IEDNSVTD+56 01963000 SAVTFLDH EQU IEDNSVTD+52 01964000 SAVTSRTN EQU IEDNSVTD+48 01965000 SAVTSREQ EQU IEDNSVTD+44 01966000 SAVTFAIL EQU IEDNSVTD+42 01967000 SAVTSUSE EQU IEDNSVTD+40 01968000 SAVTSIB EQU IEDNSVTD+36 01969000 SAVTPRTN EQU IEDNSVTD+32 01970000 @NM00091 EQU IEDNSVTD+28 01971000 SAVTWH20 EQU IEDNSVTD+26 01972000 SAVTPWT EQU IEDNSVTD+24 01973000 SAVTPRTQ EQU IEDNSVTD+20 01974000 SAVTPREQ EQU IEDNSVTD+16 01975000 SAVTPH20 EQU IEDNSVTD+14 01976000 SAVTPUSE EQU IEDNSVTD+12 01977000 SAVTPLCB EQU IEDNSVTD+8 01978000 SAVTPOOL EQU IEDNSVTD+4 01979000 SAVTPRMT EQU SAVTDIAF 01980000 SAVTVIRT EQU SAVTDIAF 01981000 AVTCPBNO EQU IEDQAVTD+1244 01982000 AVTHRESS EQU IEDQAVTD+1243 01983000 @NM00090 EQU IEDQAVTD+1242 01984000 @NM00089 EQU IEDQAVTD+1241 01985000 @NM00088 EQU IEDQAVTD+1240 01986000 @NM00087 EQU IEDQAVTD+1237 01987000 @NM00086 EQU IEDQAVTD+1236 01988000 AVTHRESE EQU @NM00085 01989000 AVTRADDR EQU IEDQAVTD+1228 01990000 AVTNADDR EQU IEDQAVTD+1224 01991000 AVTHRESN EQU IEDQAVTD+1220 01992000 AVTVOLRN EQU IEDQAVTD+1216 01993000 AVTTOTNN EQU IEDQAVTD+1212 01994000 AVTTRCYN EQU IEDQAVTD+1208 01995000 AVTRCTRN EQU IEDQAVTD+1204 01996000 AVTNOVON EQU IEDQAVTD+1200 01997000 AVTADEBN EQU IEDQAVTD+1196 01998000 AVTVOLRR EQU IEDQAVTD+1192 01999000 AVTTOTNR EQU IEDQAVTD+1188 02000000 AVTTRCYR EQU IEDQAVTD+1184 02001000 AVTRCTRR EQU IEDQAVTD+1180 02002000 AVTNOVOR EQU IEDQAVTD+1176 02003000 AVTADEBR EQU IEDQAVTD+1172 02004000 AVTLODPT EQU IEDQAVTD+1168 02005000 AVTIOBN EQU IEDQAVTD+1164 02006000 AVTIOBR EQU IEDQAVTD+1160 02007000 AVTCPBPT EQU IEDQAVTD+1156 02008000 AVTFCPB EQU IEDQAVTD+1152 02009000 @NM00084 EQU IEDQAVTD+1148 02010000 AVTINCPQ EQU IEDQAVTD+1144 02011000 @NM00083 EQU IEDQAVTD+1140 02012000 @NM00082 EQU IEDQAVTD+1137 02013000 @NM00081 EQU AVTBIT4 02014000 @NM00080 EQU AVTBIT4 02015000 @NM00079 EQU AVTBIT4 02016000 @NM00078 EQU AVTBIT4 02017000 @NM00077 EQU AVTBIT4 02018000 @NM00076 EQU AVTBIT4 02019000 @NM00075 EQU AVTBIT4 02020000 AVTRUFTN EQU AVTBIT4 02021000 @NM00074 EQU IEDQAVTD+1132 02022000 AVTNOBFQ EQU IEDQAVTD+1128 02023000 @NM00073 EQU IEDQAVTD+1124 02024000 AVTDKENQ EQU IEDQAVTD+1120 02025000 @NM00072 EQU IEDQAVTD+1116 02026000 AVTDKAPQ EQU IEDQAVTD+1112 02027000 AVTCOPY EQU IEDQAVTD+1108 02028000 AVTIA EQU IEDQAVTD+1104 02029000 AVTFL EQU IEDQAVTD+1100 02030000 @NM00071 EQU IEDQAVTD+1096 02031000 AVTNCPBQ EQU IEDQAVTD+1092 02032000 AVTTOTNC EQU IEDQAVTD+1088 02033000 AVTCMAX EQU IEDQAVTD+1084 02034000 AVTCMIN EQU IEDQAVTD+1080 02035000 AVTHM02 EQU IEDQAVTD+1076 02036000 AVTOPCIN EQU IEDQAVTD+1074 02037000 AVTDCTLN EQU IEDQAVTD+1072 02038000 AVTOPMSK EQU IEDQAVTD+1068 02039000 AVTDDFT EQU IEDQAVTD+1064 02040000 AVTSTEAL EQU IEDQAVTD+1060 02041000 AVTOPTN EQU IEDQAVTD+1056 02042000 AVTDSKCT EQU IEDQAVTD+1054 02043000 AVTCKRST EQU IEDQAVTD+1053 02044000 AVTSTAN EQU AVTBIT3 02045000 AVTSTACN EQU AVTBIT3 02046000 AVTSTAIN EQU AVTBIT3 02047000 AVTSTAYN EQU AVTBIT3 02048000 AVTOLTBN EQU AVTBIT3 02049000 AVTTSAB EQU AVTBIT3 02050000 AVTRFULN EQU AVTBIT3 02051000 AVTRECVN EQU AVTBIT3 02052000 @NM00070 EQU AVTBIT2 02053000 @NM00069 EQU AVTBIT2 02054000 AVTOPEIN EQU AVTBIT2 02055000 AVTSTRTN EQU AVTBIT2 02056000 AVTTOPOL EQU AVTBIT2 02057000 AVTCOPYN EQU AVTBIT2 02058000 AVTREUSN EQU AVTBIT2 02059000 AVTEXTSC EQU AVTBIT2 02060000 AVTDISKN EQU AVTBIT1 02061000 AVTQUCKN EQU AVTBIT1 02062000 AVTCLOSN EQU AVTBIT1 02063000 AVTREADN EQU AVTBIT1 02064000 AVTDLAYN EQU AVTBIT1 02065000 AVTAQTAN EQU AVTBIT1 02066000 AVTTSON EQU AVTBIT1 02067000 AVTAPLKN EQU AVTBIT1 02068000 AVTDUMBR EQU IEDQAVTD+1048 02069000 AVTDLQX EQU IEDQAVTD+1046 02070000 AVTINTLV EQU IEDQAVTD+1044 02071000 AVTSMCNT EQU IEDQAVTD+1042 02072000 AVTAVFCT EQU IEDQAVTD+1040 02073000 AVTOPCON EQU IEDQAVTD+1038 02074000 AVTOPCNT EQU IEDQAVTD+1036 02075000 AVTLNCNT EQU IEDQAVTD+1034 02076000 AVTKEYLE EQU IEDQAVTD+1032 02077000 AVTHA16 EQU IEDQAVTD+1030 02078000 AVTHA7 EQU IEDQAVTD+1028 02079000 AVTHA4 EQU IEDQAVTD+1026 02080000 AVTHA3 EQU IEDQAVTD+1024 02081000 AVTHA2 EQU IEDQAVTD+1022 02082000 AVTGETMS EQU IEDQAVTD+1021 02083000 @NM00068 EQU IEDQAVTD+1020 02084000 AVTGETMD EQU IEDQAVTD+1016 02085000 AVTGETMN EQU IEDQAVTD+1012 02086000 AVTCWTOT EQU IEDQAVTD+1008 02087000 AVTCWINT EQU IEDQAVTD+956 02088000 AVTDTRAP EQU IEDQAVTD+952 02089000 @NM00067 EQU IEDQAVTD+950 02090000 @NM00066 EQU AVTIOTR 02091000 AVTIOTRH EQU AVTIOTR 02092000 AVTIOTRE EQU AVTIOTR 02093000 @NM00065 EQU AVTSUBT 02094000 AVTSUBPT EQU AVTSUBT 02095000 AVTSUBON EQU AVTSUBT 02096000 AVTAFE30 EQU IEDQAVTD+944 02097000 AVTAFE20 EQU IEDQAVTD+940 02098000 AVTAFE10 EQU IEDQAVTD+936 02099000 AVTCWEC2 EQU IEDQAVTD+932 02100000 AVTCWPM2 EQU IEDQAVTD+928 02101000 AVTCWTS2 EQU IEDQAVTD+927 02102000 AVTCWTS1 EQU IEDQAVTD+926 02103000 AVTCWCLD EQU AVTCWFL2 02104000 AVTCWRAP EQU AVTCWFL2 02105000 @NM00064 EQU AVTCWFL2 02106000 @NM00063 EQU AVTCWFL2 02107000 @NM00062 EQU AVTCWFL2 02108000 @NM00061 EQU AVTCWFL2 02109000 @NM00060 EQU AVTCWFL2 02110000 AVTCWACT EQU AVTCWFL2 02111000 @NM00059 EQU AVTCWFL1 02112000 @NM00058 EQU AVTCWFL1 02113000 @NM00057 EQU AVTCWFL1 02114000 @NM00056 EQU AVTCWFL1 02115000 @NM00055 EQU AVTCWFL1 02116000 @NM00054 EQU AVTCWFL1 02117000 @NM00053 EQU AVTCWFL1 02118000 AVTCOMWN EQU AVTCWFL1 02119000 AVTCWEC1 EQU IEDQAVTD+920 02120000 AVTCWPM1 EQU IEDQAVTD+916 02121000 AVTCAREA EQU IEDQAVTD+912 02122000 AVTFZERO EQU IEDQAVTD+908 02123000 AVTCADDR EQU IEDQAVTD+904 02124000 AVTCOREC EQU IEDQAVTD+900 02125000 @NM00052 EQU IEDQAVTD+892 02126000 AVTCPBCB EQU IEDQAVTD+888 02127000 @NM00051 EQU IEDQAVTD+880 02128000 AVTDSIOB EQU IEDQAVTD+876 02129000 @NM00050 EQU IEDQAVTD+868 02130000 AVTCPRMB EQU IEDQAVTD+864 02131000 @NM00049 EQU IEDQAVTD+856 02132000 AVTCLOSB EQU IEDQAVTD+852 02133000 @NM00048 EQU IEDQAVTD+844 02134000 AVTACTIB EQU IEDQAVTD+840 02135000 @NM00047 EQU IEDQAVTD+836 02136000 AVTOLTEB EQU IEDQAVTD+832 02137000 AVTOLTCH EQU AVTOLTQB+1 02138000 AVTOLTVT EQU AVTOLTQB 02139000 @NM00046 EQU AVTOPCQB+8 02140000 @NM00045 EQU AVTOPCEC+1 02141000 @NM00044 EQU AVTOPCCC 02142000 AVTOPCPO EQU AVTOPCCC 02143000 AVTOPCWA EQU AVTOPCCC 02144000 AVTOPCCH EQU AVTOPCOB+1 02145000 AVTOPCVT EQU AVTOPCOB 02146000 @NM00043 EQU AVTCKPQB+9 02147000 AVTCKPTS EQU AVTCKPQB+8 02148000 @NM00042 EQU AVTCKPEC+1 02149000 @NM00041 EQU AVTCKPCC 02150000 AVTCKPPO EQU AVTCKPCC 02151000 AVTCKPWA EQU AVTCKPCC 02152000 AVTCKPCH EQU AVTCKPTB+1 02153000 AVTCKPVT EQU AVTCKPTB 02154000 @NM00040 EQU IEDQAVTD+796 02155000 AVTBFRTB EQU IEDQAVTD+792 02156000 @NM00039 EQU IEDQAVTD+784 02157000 AVTBFREB EQU IEDQAVTD+780 02158000 AVTTIMQ EQU IEDQAVTD+776 02159000 @NM00038 EQU IEDQAVTD+772 02160000 AVTIMQPS EQU IEDQAVTD+768 02161000 AVTINOUT EQU IEDQAVTD+766 02162000 AVTREFTM EQU IEDQAVTD+764 02163000 @NM00037 EQU IEDQAVTD+752 02164000 AVTDELYB EQU IEDQAVTD+748 02165000 AVTOCQPT EQU IEDQAVTD+744 02166000 AVTTSOPT EQU IEDQAVTD+740 02167000 AVTSUPPT EQU IEDQAVTD+736 02168000 AVTCBQCB EQU IEDQAVTD+732 02169000 AVTMSGS EQU IEDQAVTD+729 02170000 @NM00036 EQU AVTSYSER 02171000 @NM00035 EQU AVTSYSER 02172000 @NM00034 EQU AVTSYSER 02173000 @NM00033 EQU AVTSYSER 02174000 @NM00032 EQU AVTSYSER 02175000 @NM00031 EQU AVTSYSER 02176000 AVTCMAXN EQU AVTSYSER 02177000 AVTCMINN EQU AVTSYSER 02178000 AVT2260L EQU IEDQAVTD+724 02179000 AVTABEPL EQU AVTADBUF 02180000 AVTHFF EQU AVTCLRHI+2 02181000 @NM00030 EQU AVTCLRHI 02182000 AVTCCKEY EQU AVTCCELE 02183000 AVTDELAD EQU IEDQAVTD+704 02184000 AVTDELEM EQU IEDQAVTD+700 02185000 AVTBSX EQU AVTCKLNK 02186000 AVTOPETR EQU AVTHG01 02187000 @NM00029 EQU AVTCKBYT 02188000 AVTCKONQ EQU AVTCKBYT 02189000 @NM00028 EQU AVTCKBYT 02190000 @NM00027 EQU AVTCKBYT 02191000 @NM00026 EQU AVTCKBYT 02192000 @NM00025 EQU AVTCKBYT 02193000 @NM00024 EQU AVTCKBYT 02194000 @NM00023 EQU AVTCKBYT 02195000 AVTOPERT EQU IEDQAVTD+690 02196000 AVTOPXCL EQU IEDQAVTD+688 02197000 AVTOPERL EQU IEDQAVTD+687 02198000 @NM00022 EQU IEDQAVTD+686 02199000 AVTCKTIM EQU IEDQAVTD+684 02200000 AVTCKELV EQU IEDQAVTD+682 02201000 AVTCPRCD EQU IEDQAVTD+681 02202000 AVTWARMN EQU AVTCKELF 02203000 AVTCRTLN EQU AVTCKELF 02204000 AVTCPIPN EQU AVTCKELF 02205000 AVTCCLCN EQU AVTCKELF 02206000 AVTCINCN EQU AVTCKELF 02207000 @NM00021 EQU AVTCKELF 02208000 AVTCMCPN EQU AVTCKELF 02209000 AVTCRDYN EQU AVTCKELF 02210000 AVTCKQAD EQU IEDQAVTD+677 02211000 AVTSCBSZ EQU IEDQAVTD+676 02212000 @NM00020 EQU IEDQAVTD+672 02213000 AVTCKELE EQU IEDQAVTD+668 02214000 @NM00019 EQU AVTCKPEL+8 02215000 AVTCKRLK EQU AVTCKPEL+5 02216000 AVTCKRPR EQU AVTCKPEL+4 02217000 AVTCKRMQ EQU AVTCKRMV+1 02218000 AVTCKRKY EQU AVTCKRMV 02219000 AVTHK EQU IEDQAVTD+648 02220000 AVTHI EQU IEDQAVTD+644 02221000 AVTIOT EQU IEDQAVTD+640 02222000 AVTNX EQU IEDQAVTD+636 02223000 AVTTONE EQU IEDQAVTD+632 02224000 AVTA3TL EQU IEDQAVTD+628 02225000 AVTDMECB EQU IEDQAVTD+624 02226000 AVTABEND EQU IEDQAVTD+618 02227000 AVTPLCBN EQU IEDQAVTD+616 02228000 @NM00018 EQU AVTSAVTP+1 02229000 @NM00017 EQU AVTSAVTF 02230000 AVTSNA EQU AVTSAVTF 02231000 AVTONSNA EQU AVTSAVTF 02232000 AVTVTMCP EQU AVTSAVTF 02233000 @NM00016 EQU IEDQAVTD+608 02234000 AVTCMBSS EQU IEDQAVTD+604 02235000 AVTRCV EQU IEDQAVTD+600 02236000 AVTSEND EQU IEDQAVTD+596 02237000 AVTCSCH EQU IEDQAVTD+592 02238000 AVTQ1 EQU IEDQAVTD+588 02239000 AVTE7 EQU IEDQAVTD+584 02240000 AVTHB EQU IEDQAVTD+580 02241000 AVTR1 EQU IEDQAVTD+576 02242000 AVTBZ EQU IEDQAVTD+572 02243000 AVTEZ EQU IEDQAVTD+568 02244000 AVTEC EQU IEDQAVTD+564 02245000 AVTEW EQU IEDQAVTD+560 02246000 AVTNDIAL EQU AVTSCOPT 02247000 AVTN2741 EQU AVTSCOPT 02248000 AVTCONCO EQU AVTSCOPT 02249000 AVTCONC EQU AVTSCOPT 02250000 AVTCMBUF EQU AVTSCOPT 02251000 AVTAPDMP EQU AVTSCOPT 02252000 @NM00015 EQU AVTSCOPT 02253000 AVTHA EQU AVTDISP 02254000 AVTEA EQU IEDQAVTD+548 02255000 AVTAX EQU IEDQAVTD+544 02256000 AVTA3 EQU IEDQAVTD+540 02257000 AVTGD EQU IEDQAVTD+536 02258000 AVTAL EQU IEDQAVTD+532 02259000 AVTOLTST EQU AVTHG02 02260000 AVTE8 EQU IEDQAVTD+524 02261000 AVTUI EQU IEDQAVTD+520 02262000 AVTCOMPT EQU IEDQAVTD+516 02263000 AVTCRSRF EQU IEDQAVTD+512 02264000 @NM00014 EQU IEDQAVTD+508 02265000 AVTKA02 EQU IEDQAVTD+504 02266000 AVTOPTPT EQU IEDQAVTD+500 02267000 AVTPCBPT EQU IEDQAVTD+496 02268000 @NM00013 EQU AVTECB1 02269000 AVTCOMP EQU AVTECB1 02270000 @NM00012 EQU AVTECB1 02271000 AVTOPECA EQU IEDQAVTD+488 02272000 AVTOLECA EQU IEDQAVTD+484 02273000 AVTCKECA EQU IEDQAVTD+480 02274000 AVTCWECA EQU IEDQAVTD+476 02275000 AVTCWTCB EQU IEDQAVTD+472 02276000 AVTOLTCB EQU IEDQAVTD+468 02277000 AVTOCTCB EQU IEDQAVTD+464 02278000 AVTCKTCB EQU IEDQAVTD+460 02279000 AVTAS EQU IEDQAVTD+456 02280000 AVTNOLBF EQU IEDQAVTD+454 02281000 AVTNCKPR EQU IEDQAVTD+453 02282000 AVTCIB EQU IEDQAVTD+452 02283000 AVTSPLPT EQU IEDQAVTD+448 02284000 AVTMVBFR EQU IEDQAVTD+444 02285000 AVTSBTA EQU IEDQAVTD+440 02286000 AVTRARTN EQU IEDQAVTD+436 02287000 AVTBSCAN EQU IEDQAVTD+432 02288000 AVTRDYA EQU IEDQAVTD+428 02289000 AVTRNMPT EQU IEDQAVTD+424 02290000 AVTDISTR EQU IEDQAVTD+420 02291000 AVTPARM3 EQU IEDQAVTD+416 02292000 @NM00011 EQU AVTPKF 02293000 @NM00010 EQU AVTPKF 02294000 @NM00009 EQU AVTPKF 02295000 AVTFTCHF EQU AVTPKF 02296000 @NM00008 EQU AVTPKF 02297000 @NM00007 EQU AVTPKF 02298000 @NM00006 EQU AVTPKF 02299000 @NM00005 EQU AVTPKF 02300000 AVTPARM EQU IEDQAVTD+408 02301000 AVTEXS2A EQU IEDQAVTD+402 02302000 AVTEXA2S EQU IEDQAVTD+396 02303000 @NM00004 EQU AVTCKFLG 02304000 AVTCKHLT EQU AVTCKFLG 02305000 AVTCKREQ EQU AVTCKFLG 02306000 AVTCKENV EQU AVTCKFLG 02307000 AVTCKNAC EQU AVTCKFLG 02308000 AVTCKTAC EQU AVTCKFLG 02309000 @NM00002 EQU IEDQAVTD+384 02310000 AVTREADD EQU IEDQAVTD+380 02311000 AVTREADY EQU IEDQAVTD+376 02312000 AVTRACE EQU IEDQAVTD+372 02313000 AVTTCB EQU IEDQAVTD+368 02314000 AVTPASWD EQU IEDQAVTD+360 02315000 AVTCTLCH EQU IEDQAVTD+352 02316000 AVTDOUBL EQU IEDQAVTD+344 02317000 AVTDOUBX EQU IEDQAVTD+336 02318000 AVTDPARM EQU IEDQAVTD+332 02319000 AVTCSTCS EQU IEDQAVTD+328 02320000 AVTDLQ EQU AVTSAVEX+32 02321000 @NM00001 EQU AVTSAVEX 02322000 AVTSAVE4 EQU IEDQAVTD+216 02323000 AVTSAVE3 EQU IEDQAVTD+144 02324000 AVTSAVE2 EQU IEDQAVTD+72 02325000 AVTSAVE1 EQU IEDQAVTD 02326000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 02327000 @RC00400 EQU @RC00399 02328000 @RC00370 EQU @RC00368 02329000 @RC00412 EQU @RC00368 02330000 @RF00411 EQU @RC00368 02331000 @PB00003 EQU @EL00001 02332000 @RC00401 EQU @RC00400 02333000 @PB00002 EQU @PB00003 02334000 @ENDDATA EQU * 02335000 END IEDQNV,(C'PLS2126',0701,77109) 02336000