|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 57854 (0xe1fe)
Notes: pts_type(SC)
Names: »DMTASK.SC«
└─⟦245262b9f⟧ Bits:30009679 Philips computer tape "600220"
└─⟦this⟧ »M:92SP/DMTASK.SC«
└─⟦a25d6defe⟧ Bits:30009676 Philips computer tape "600210"
└─⟦this⟧ »M:92SP/DMTASK.SC«
IDENT DMTASK REL 9.2 79-11-16 870105040920 =5, PR5649 REL 9.1 79-11-01 =4,CURRENCY INSERT REL 9.1 79-07-02 =3,TEST KEY REL 9.1 79-07-02 =2,CH REQ REL 8.2 =1,PR 790116 REL 8.2 **************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DMTASK = HANDLES DATAMANAGEMENT DISC I/O * * * * * **************************************************** * * THIS MODULE IS ACTIVATED FROM TIODM. * * INPUT PARAMETERS: * A1 = FDB ADDRESS * A2 = TID TASK IDENT OF DMTASK AT PRESENT NOT USED * * THE SECTOR TO BE ACCESSED IS DEFINED IN FDB (FDBDMI, -FC, -SNR). * ALL BUFFERS ARE CHECKED TO FIND OUT IF THIS SECTOR * IS ALREADY PRESENT IN A BUFFER. IF SO THE BUFFER STATUS IS SET * TO USED AND ACTIONS ACCORDING TO THE ORDER ARE TAKEN. IF NOT * THE SECTOR MUST FIRST BE READ INTO A FREE BUFFER. * * ALL I/O LKM REQUESTS IN THIS MODULE ARE WITH ACTIVATION AND ARE * FOLLOWED BY AN EXIT LKM REQUEST. * INDEX FILES ARE HANDLED IN SUBROUTINE RDNXTR WHERE * ALL I/O ARE MADE IN WAIT MODE * * BY MEANS OF CONDITIONAL ASSEMBLY THE EXCLUSIVE ACCESS CHECK * FOR INDEXED DELETE AND FOR INDEXED REWRITE AND * FOR RANDOM WRITE AND RANDOM DELETE CAN BE EXCLUDED. * * QNOEXA=1 EXCLUSIVE ACCESS CHECK INCLUDED * QNOEXA=0 EXCLUSIVE ACCESS CHECK EXCLUDED EJECT * *************** * ENTRIES * *************** * * ENTRY DMTASK ENTRY SQR EXTERNAL CODE SEQ READ ENTRY QSW ENTRY DMTWM ENTRY QIRN,QIRR EJECT * ***************** * EXTERNALS * ***************** * * EXTRN SCTTCT,SCTCDT EXTRN TTB:ID TASK IDENTIFICATION EXTRN TTB:TD,FDBSTA EXTRN FNDTID EXTRN TENDIO EXTRN FDBECB EXTRN FDBSNR EXTRN FDBRRO EXTRN FDBRLE EXTRN FDBBLF EXTRN FDBTNR EXTRN FDBVTO EXTRN FDBCEX EXTRN FDBEXT EXTRN EXTDMI EXTRN EXTFC EXTRN EXTLEN EXTRN EXTBAS EXTRN EXTELE EXTRN FDBLRN EXTRN FDBMIA EXTRN FDBEAL EXTRN FDBADF EXTRN FDBAI1 EXTRN FDBCRL EXTRN FDBDBR,FDBMRN,FDBMRO EXTRN ECBFC EXTRN ECBBA EXTRN ECBRL EXTRN ECBEL EXTRN ECBRC EXTRN ECBCW EXTRN CLRBUF EXTRN BUFLNK EXTRN BUFDMI EXTRN BUFFC EXTRN BUFSNR EXTRN BUFOR EXTRN BUFSTA EXTRN CURBUF EXTRN DWTECB EXTRN DWTUEC EXTRN DWTOR EXTRN DWTST,DWTTDM,DWTTQ EXTRN DWTWAT EXTRN DMTRBU RELEASE A DISC BUFFER EXTRN VTLRN EXTRN VLVBA EXTRN VLVRL EXTRN DMTIOT,DIVMOD EXTRN MPYMOD,CHKKEY EXTRN CALSNO EXTRN DSUMOD EXTRN EATEST,EASETB,CRNGET,EARELB,GTBKBU EXTRN QTJOB,GTLGRN EXTRN FNDKEY EXTRN CRNCIF,CRNCDF,CRNQUE EXTRN MXIND EXTRN FDBKA,FDBNIF,RDNXTR EXTRN FDBKEY SAVE AREA FOR KEY IN INDEXED ACCESS EXTRN BUFAR1,BUFAR2,SECTLE,DMTIOZ,CRNUPD EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA EXTRN MOV:SU MOVE FROM SYSTEM TO USER AREA EXTRN MONMMU EXTRN PRUN TTAB ADDRESS OF RUNNING TASK EXTRN TTB:MT MMU TABLE EXTRN SCTPLD PROGRAM LOADING DEVICE EJECT * * * ************************ * CONDITIONAL ASSEMBLY * ************************ * * CHECK OF EXCLUSIVE ACCESS BIT CAN BE EXCLUDED AT * RANDOM WRITE AND RANDOM DELETE BY SETTING X:A=0. * * X:A EQU 1 X:B EQU 0 X:C EQU 0 X:D EQU 1 X:E EQU 0 * QNOEXA EQU 00001 * INDEXED ACCEXSS FUNCTIONS CAN BE OMITTED WITH * INDXAC EQU 1 = INDEX ACCESS INCLUDED * INDXAC EQU 0 = INDEX ACCESS FUNCTIONS OMITTED INDXAC EQU 00000 RECBFZ EQU 00004 INDEX RECORD BUFFER SIZE IN WORDS FLXDSC EQU X:D FLEXIBLE DISC INCLUDED WHEN EQU 1 INSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1 * EJECT DMTASK * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 1 * * * A PROGRAM VERSION USING TOSS DISC PAGING * IS OBTAINED BY SETTING DSKPAG EQU 1. * DSKPAG EQU 1 * * * A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK * BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. * SWPBLK EQU 0 * EJECT * ************************ * DATA DEFINITIONS * ************************ * * EABIT EQU /20 EA-BIT IN DWT STATUS BYTE * VTOBLK EQU 9 VTOC BLOCKING FACTOR * * THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE * POSITION IN TIODM-TABLE TIODMF * QCL EQU 0 DMTAFU DATA DMCLOSE CLOSE QRV EQU 2 DATA DMREVT READ VTOC RECORD QIRN EQU 4 IFT INDXAC=1 DATA DMIRN INDEXED READ NEXT QINS EQU 6 DATA DMINS INDEXED INSERT QDEL EQU 8 DATA DMDEL INDEXED DELETE QIRW EQU 10 DATA DMIRW INDEXED REWRITE DATA DMIRR INDEXED RANDOM RESAD XIF QIRR EQU 12 IFF INDXAC=1 DATA DMTERR,DMTERR,DMTERR,DMTERR,DMTERR XIF QRD EQU 14 DATA DMRDDE RANDOM DELETE QRW EQU 16 DATA DMRDWR RANDOM WRITE QRR EQU 18 DATA DMRDRE RANDOM READ QREA EQU 20 DATA DMTERR RELEASE EXCLUSIVE ACCESS QSW EQU 22 DATA DMSQWR SEQUENTIAL WRITE SQR EQU 2 EXTERNAL ORDER CODE SEQ READ QSR EQU 24 DATA DMSQRE SEQUENTIAL READ QGCUR EQU 26 DATA DMTERR GET CURRENCY IFT INDXAC=1 QINIX EQU 28 DATA DMINIX INSERT INDEX QDELX EQU 30 DATA DMDELX DELETE INDEX XIF IFF INDXAC=1 DATA DMTERR,DMTERR XIF QGCURX EQU 32 DATA DMTERR GET CURRENT INDEX QRWD EQU 34 DATA DMRDWD DELAYED RANDOM WRITE QRDD EQU 36 DATA DMRDDD DELAYED RANDOM DELETE QRRRB EQU 38 DATA DMRRRB RAND READ REL BUFF * VTOCRL DATA 0 VTOC RECORD LENGTH EJECT * ************** * DMTFRL * ************** * * ENTRY DMTFRL FIND RECORD LENGTH * * INPUT A1 = RETURN CODE IF INCORRECT LENGTH * A6 = FDB ADDRESS * A9 = USER ECB ADDRESS * * OUTPUT A2 = RECORD LENGTH TO BE USED * A1 IS ORED INTO ECBRC IF ECBRL < REC LENGTH * A2 IS STORED IN ECBEL * DMTFRL EQU * LD A2,ECBRL,A9 CW A2,FDBRLE,A6 RF(E) DMTF20 ECBRL = REC LENGTH RF(L) DMTF10 ECBRL < REC LENGTH LD A2,FDBRLE,A6 ECBRL > REC LENGTH RF DMTF20 DMTF10 ORS A1,ECBRC,A9 SET RETURN CODE DMTF20 ST A2,ECBEL,A9 SET EFFECTIVE LENGTH RTN A14 EJECT * ************ * DMTWM * ************ * * ENTRY DMTWM WORD MOVE * * INPUT A1 = FROM ADDRESS * A2 = NO OF BYTES TO BE MOVED * A3 = TO ADDRESS * * A4 WILL BE DESTROYED * * DMTWM EQU * SUK A2,2 RF(N) DMTW10 LAST WORD MOVED LDR* A4,A1 STR A4,A3 ADK A1,2 ADK A3,2 RB DMTWM DMTW10 ANK A2,/01 RF(E) DMTW20 LCR A4,A1 MOVE LAST CHAR SCR A4,A3 DMTW20 RTN A14 EJECT * ************* * DMTBM * ************* * * ENTRY DMTBM BYTE MOVE * * INPUT A1 = FROM ADDRESS * A2 = NO OF BYTES TO BE MOVED * A3 = TO ADDRESS * * A4 WILL BE DESTROYED * * OUTPUT A3 = NEXT CHAR * * DMTBM EQU * SUK A2,1 RF(N) DMTB10 LAST BYTE MOVED LCR A4,A1 SCR A4,A3 ADK A1,1 ADK A3,1 RB DMTBM DMTB10 RTN A14 * * DMTBMR HAS THE SAME FUNCTION AS DMTBM BUT * MOVES FROM THE END * DMTBMR ADR A1,A2 ADR A3,A2 DMTB20 SUK A2,1 RB(N) DMTB10 SUK A1,1 SUK A3,1 LCR A4,A1 SCR A4,A3 RB DMTB20 EJECT ****DESCRIPTION************************************* * * FNDFDB WILL SEARCH TTAB AND SCTCDT FOR A FILE CODE * ****ENTRY PARAMETERS******************************** * * A1 = TTAB ADDR * A2 = FILE CODE TO SEARCH FOR * A5 NOT= 0 WHEN ONLY TTAB SHALL BE SEARCHED * ****EXIT PARAMETERS********************************* * * A1 = UNCHANGED * A2 = FILE CODE. = 0 WHEN NO CODE IS FOUND * A4 = TTAB/SCTCDT ENTRY ADDR WHEN CODE IS FOUND * A5 = 0 WHEN FOUND IN SCTCDT = 1 WHEN TTAB * ****USED REGISTERS********************************** * * A1-A5 * ****************************************************** * * LOOK FOR FILE CODE IN TTAB * FNDFDB EQU * LD A3,TTB:TD,A1 LENGTH DEV DESCR FND030 EQU * SUK A3,4 RF(NP) FND040 FILE CODE NOT IN TTAB LDR A4,A1 ADKL A4,TTB:TD =1 ADR A4,A3 CWR* A2,A4 =1 RB(NE) FND030 * =1 LDK A5,1 RF FND080 CODE FOUND IN TTAB * * SEARCH FILE CODE IN SCTCDT * FND040 EQU * LDR A5,A5 RF(NZ) FND060 ONLY TTAB IS SEACHED LD* A4,SCTCDT FND050 EQU * SUK A4,4 RF(NP) FND060 CODE NOT FOUND AT ALL LD A3,SCTCDT ADR A3,A4 CWR* A2,A3 =1 RB(NE) FND050 AD A4,SCTCDT RF FND080 CODE FOUND FND060 EQU * LDK A2,0 NO CODE FND080 EQU * RTN A14 EJECT * ************** * DMTREM * ************** * * ENTRY DMTREM MOVE RECORD FROM BUFFER TO USER RECORD AREA * * INPUT RELATIVE REC OFFSET IN FDBRRO,A6 * BUFFER ADDRESS IN A5 * USER REC AREA IN ECBBA,A9 * RECORD LENGTH IN A2 * * * * MOVE THE RECORD * IF (FROM) AND (TO) ADDRESSES BOTH EVEN THEN WORD MOVE * IF (FROM AND (TO) ADDRESSES BOTH ODD THEN MOVE FIRST BYTE * WITH BYTE INSTRUCTIONS AND THE REST WITH WORD MOVE * ELSE USE BYTE MOVE INSTRUCTIONS FOR THE WHOLE REC * DMTREM EQU * LD A1,FDBRRO,A6 ADR A1,A5 FROM ADDRESS * IFT MMUPAG=0 LDR A4,A1 LD A3,ECBBA,A9 TO ADDRESS XRR A4,A3 ANK A4,/01 RF(Z) DMT210 BOTH ODD OR BOTH EVEN CF A14,DMTBM ONE ODD AND ONE EVEN RF DMT225 * DMT210 LDR A4,A1 ANK A4,/01 RF(E) DMT220 BOTH EVEN SUK A2,1 BOTH ODD LCR A4,A1 SCR A4,A3 ADK A1,1 ADK A3,1 DMT220 CF A14,DMTWM WORD MOVE DMT225 EQU * XIF * IFT MMUPAG=1 LD A4,DWTTDM,A6 GET TTAB ADDRESS LC A3,TTB:ID,A4 ID CALLING TASK CCK A3,'##' RF(NE) DMTREN NOT DMTASK LDK A3,QRR CC A3,DWTOR+1,A6 RF(NE) DMTREQ NOT RANDOM READ LD A4,DWTWAT,A6 PAR BLOCK ADDRESS LD A4,4,A4 FDB ADDR INDEX FILE LD A4,DWTTDM,A4 USER TTAB DMTREN EQU * INH TL TTB:MT,A4 LOAD MMU REGISTERS DMTREP EQU * LD A4,PRUN GET DM TTAB ADDRESS TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE ENB LDR A3,A2 GET LENGTH LD A2,ECBBA,A9 GET RECEIVING BUFFER ADDRESS CF A14,MOV:SU MOVE RECORD FROM SYSTEM TO USER AREA XIF * RTN A14 IFT MMUPAG=1 DMTREQ INH TL MONMMU SYSTEM MMU RB DMTREP XIF EJECT * * SET UP A14 STACK * GETA14 EQU * LD A14,PRUN GET DM TTAB ADDRESS AD A14,TTB:TD,A14 LENGTH DEVICE DESCR ADKL A14,TTB:TD+32 STACK RTN A15 RETURN AND ENABLE * EJECT * ************** * DMTASK * ************** * * DMTASK EQU * * * SET UP A14 STACK * CF A15,GETA14 LDR A6,A1 FDB ADDR LDKL A5,-1 CW A5,FDBRRO,A6 SPECIAL PARAMETER -1 RF(E) DMT090 FOR ORDERS XR,DX,IX (SEE TIODM) DMT020 EQU * LD A4,FDBDBR,A1 RF(NN) DMT025 NO DELAY ANKL A4,/C0FF LD A2,DWTOR,A1 ANK A2,/3F CWK A2,QCL RF(E) DMT024 CLOSE CWK A2,QRV RF(E) DMT024 READ VTOC SUK A2,QRRRB RF(E) DMT024 RAND READ REL BUFFER ORKL A4,/100 DMT024 EQU * ST A4,FDBDBR,A1 DMT025 EQU * LDR A8,A1 ADKL A8,FDBECB ECB ADDR CF A14,GTBKBU GET BLOCK BUFFER LDR A2,A2 RF(NN) DMT080 BUFFER WAS BEFORE * * READ SECTOR INTO BUFFER AND EXIT * SUK A5,QCL RF(Z) DMT030 CLOSE LDK A7,/11 PHYSICAL READ LKM DATA -1 I/O AND ACTIVATION DATA DMTAR1 DMTASK RESTART #1 LKM DATA 3 EXIT * DMT030 EQU * I/O WITH WAIT FOR CLOSE LDK A7,/91 LKM DATA 1 RF DMT050 CHECK RETURN CODES EJECT ************** * DMTAR1 * ************** * RESTART POINT AFTER READ * DMTAR1 EQU * * * SET UP A14 STACK * CF A15,GETA14 DMT050 EQU * CF A14,DMTIOT CHECK RETURN CODES FROM DISC I/O LDR A1,A1 ABL(NE) DMTERR LD A5,ECBBA,A8 RF DMT090 DMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER LDR A5,A3 ADK A5,8 SKIP BUFFER HEADER ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB DMT090 EQU * * * HANDLE ACTUAL ORDER ORDER INDEX IN DWTOR * ADK A5,2 SKIP CYLID WORD LD A7,DWTOR,A6 * A7 = INTERNAL ORDER CODE ANK A7,/3F ABI DMTAFU,A7 DMTASK FUNCTION TABLE EJECT DMRRRB EQU * RAND READ REL BUFF * DMSQRE EQU * SEQUENTIAL READ * DMRDRE EQU * RANDOM READ * * CHECK STATUS IF NOT USED THEN ERROR RETURN * LD A2,FDBRRO,A6 AD A2,FDBRLE,A6 ADR A2,A5 LDK A1,0 CCR A1,A2 STATUS BYTE IN A1 RF(NE) DMT200 USED LDKL A1,/800 NO DATA ABL DMTERR DMT200 LDK A1,/8 INCORRECT LENGTH CF A14,DMTFRL A2 := RECORD LENGTH * * MOVE THE RECORD * CF A14,DMTREM * * UPDATE CRN AND SET EXCLUSIVE ACCESS BIT * DMT230 EQU * ABL DMT400 PUT CRN AND EA EJECT DMREVT EQU * READ VTOC RECORD * DMCLOSE EQU * CLOSE A FILE * LD A2,FDBSNR,A6 RF(NZ) DMT270 VTOC SECTOR IN BUFFER * * VOLUME LABEL IN BUFFER * FIND VTOC SECTOR NUMBER AND RELATIVE RECORD OFFSET WITHIN SECTOR * FOR VTOC RECORD AND READ THIS SECTOR INTO BUFFER * LDR A10,A6 SAVE FDB ADDR LDR A9,A8 SAVE ECB ADDR LD A3,VLVRL-2,A5 ST A3,VTOCRL LDK A6,VTOBLK VTOC BLOCKING FACTIOR LD A2,FDBVTO,A10 VTOC RECORD NUMBER LDK A1,0 CF A14,DIVMOD A2=A1,A2/A6.A1=REMAINDRER LDR A3,A2 QUOTIENT LDR A6,A10 FDB ADDR LDR A2,A1 REST RF(Z) DMT240 REST = 0 ADK A3,1 RECORD IN NEXT SECTOR RF DMT250 DMT240 LDK A2,VTOBLK LAST RECORD IN SECTOR DMT250 AD A3,VLVBA-2,A5 VTOC BASE ST A3,FDBSNR,A6 LDK A3,0 DMT255 SUK A2,1 RF(Z) DMT260 AD A3,VLVRL-2,A5 ADK A3,1 SKIP STATUS BYTE RB DMT255 DMT260 ST A3,FDBRRO,A6 * * RELEASE BUFFER * LD A3,ECBBA,A9 SUK A3,8 CF A14,DMTRBU RELEASE BUFFER CF A14,CLRBUF CLEAR FREE BUFFERS ENB ENB LDR A1,A6 FDB ADDR RB DMT020 READ VTOC SECTOR EJECT DMT270 EQU * SUK A7,QRV ABL(Z) DMT500 READ VTOC RECORD * CLOSE FILE * UPDATE VTOC LAST RECORD NUMBER * AND WRITE SECTOR BACK ON DISC AD A5,FDBRRO,A6 LDK A2,0 LC A2,FDBLRN,A6 SC A2,VTLRN,A5 LD A2,FDBLRN+1,A6 ST A2,VTLRN+1,A5 * CLOSE FILE. WRITE VTOC * LDK A7,/95 LKM DATA 1 * LDR A1,A6 FDBADDRESS IN A1 CF A14,DMTIOT CHECK RETURN CODES LDR A1,A1 RF(NZ) DMT724 ERROR DMT720 EQU * LD A1,DWTTDM,A6 TTAB ADDR * =1 START LD A2,FDBMIA,A6 MASTER INDEX ADDR RF(Z) DMT721 DATA FILE LDK A2,/FF -1 DMT721 ADK A2,1 0 OR 1 ECR A2,A2 =1 END LC A2,ECBFC,A9 FILE CODE LDK A5,0 TRY LOCAL AND GLOBAL CF A14,FNDFDB GET ENTRY IN TTAB CDTADTAB LDR A13,A5 LOCAL/GLOBAL INDICATOR LDR A2,A2 RF(NZ) DMT725 FC FOUND LDKL A1,/8000 REQ ERR DMT724 ABL DMTERR DMT725 EQU * LD A5,2,A4 FDB ADDRESS LDR A11,A4 SAVE TABLE ENTRY ADDR LDR A12,A1 SAVE TTEAB ADDR SUR A10,A10 MARK THAT FDB NOT SHALL BE RELEASED EJECT * CHECK IF THIS FDB ADDR IS USED ELEWHERE * * SEARCH ALL TTABS * LD* A2,SCTTCT DMT730 EQU * SUK A2,2 RF(NP) DMT780 NOT FOUND IN ANY TTAB LD A3,SCTTCT ADR A3,A2 LDR* A1,A3 LC A3,TTB:ID,A1 TASK ID CCK A3,'##' RB(E) DMT730 JUMP IF MONITOR TASK LD A3,TTB:TD,A1 ADKL A1,TTB:TD+2 DEV DESCR TABLE +2 DMT770 EQU * SUK A3,4 RB(NP) DMT730 NOT IN THIS TTAB LDR A4,A1 ADR A4,A3 CWR* A5,A4 RB(NE) DMT770 LDR A7,A11 TTAB ENTRY ADK A7,2 FDB OFFSET CWR A4,A7 RB(E) DMT770 SAME ENTRY RF DMT895 MORE USERS ON THIS FDB * * NOW SEARCH SCTCDT * DMT780 EQU * LD* A4,SCTCDT DMT790 EQU * SUK A4,4 RF(NP) DMT800 THIS FDB HAS NO OTHER USER LD A2,SCTCDT ADR A2,A4 CW A5,2,A2 RB(NE) DMT790 LDR A7,A4 AD A7,SCTCDT CWR A7,A11 RB(E) DMT790 SAME ENTRY RF DMT895 THIS FDB HAS MORE USERS EJECT * * NOW RELEASE THIS FDB * DMT800 EQU * * * RELEASE EA-BUFFERS * LDKL A2,/8000 ALL EA-BUFFERS ARE RELEASED LDR A1,A6 FDB ADDR CF A14,EARELB * * RELEASE CRN BUFFERS * LDKL A5,FDBCRL ADR A5,A6 LINK ROOT LDR* A4,A5 CMR A5 CLEAR FDB RF DMT830 DMT820 EQU * LDR A4,A5 BUFFER ADDRESS DMT830 EQU * RF(Z) DMT840 ALL BUFFER S REMOVED LDR* A5,A4 NEXT BUFFER ADDRESS * * RETIURN BUFFER TO POOL * INH LD A3,CRNQUE STR A3,A4 ST A4,CRNQUE ENB RB DMT820 DMT840 EQU * IFT FLXDSC=1 * * NOW CHECK DEVICE CODES. WHEN LAST FILE IS CLOSED ON * A FLEXIBLE DISC UNIT, AN UNLOC IS MADE FOR THIS VOLUME * LDK A1,4 EXTENT COUNTER LDR A5,A6 FDB ADDR ADKL A5,FDBEXT+1 ZADDR OF FIRST VOL CODE SUKL A5,EXTELE EXT LENGTH IN FDB LDK A4,0 FOR VOL CODE DMT880 EQU * ENB SEE LABEL 910 ENB SUK A1,1 LOOP ABL(NN) DMT900 CHECK THIS EXTENT XIF IFT INDXAC=1 EJECT * * ALL EXTENTS CHECKED * RELEASE MASRTER INDEX * INH LD A1,FDBMIA,A6 MASTER INDEX ADDR RF(Z) DMT894 NO MATER IX LD A5,MXIND LENTH SUK A5,2 DMT885 EQU * SUK A5,4 RF(Z) DMT890 FIRST INDEX RF(N) DMT894 NO MATER IX CW A1,MXIND+2,A5 RB(NE) DMT885 LD A4,MXIND,A5 RF(N) DMT890 PREVIOUS ENTRY USED LD A4,MXIND+4,A5 NO OF WORDS ANKL A4,/7FFF REMOV USE BIT ADS A4,MXIND,A5 NR OF WORDS * * MOVE UP REST OF MXIND * LDKL A1,MXIND+6 ADR A1,A5 FROM ADDR LDR A3,A1 SUK A3,4 TO ADDR LD A2,MXIND SUR A2,A5 SUK A2,2 NO OF CHAR CF A14,DMTWM MOVE UOP RF DMT894 DMT890 EQU * LDKL A4,/7FFF ANS A4,MXIND+4,A5 REMOVE USE BIT XIF EJECT DMT894 EQU * LDKL A10,1 MARK THAT FDB SHALL BE RELEASED DMT895 EQU * INH INH * * DELETE TTAB/SCTCDT ENTRY * CMR A11 FILE CODE CM 2,A11 FDB ADDR * * RELEASE DWT-QUEUQ IN THIS FDB-DWT * LDR A1,A6 FDBADDR ADKL A1,DWTTQ ADDR QUEUE START LDR* A5,A1 NEXT TTAB ADDR RF(Z) DMTA20 NO Q CMR A1 KILL ROOT DMTA10 LDR* A1,A5 NEXT IN QUEUE CF A15,QTJOB DISPATCH Q LDR A5,A1 NEXT RB(NZ) DMTA10 MORE DMTA20 EQU * * * NEXT ENTRY IN TTAB/CDATAB * LDR A1,A12 TTAB ADDR LDK A2,0 LC A2,ECBFC,A9 FILE CODE USERT ECB LDR A5,A13 LOCAL/GLOBAL INDICATOR CF A14,FNDFDB SEARCH TTAB SCTCDT LDK A7,0 INDICATES A2 = 0 IFT INDXAC=1 LDR A2,A2 RF(Z) DMTA30 * * MOV DWT TO NEXT FDB * AN INDEX FILE SHALL ALSO BE RELEASED * LD A7,2,A4 NEXT FDB ADDR TO CLOSE LDK A1,2 ADR A1,A6 FROM ADDR LDK A3,2 ADR A3,A7 TO ADDR LDK A2,12 NO OF BYTES CF A14,DMTWM MOVE DWT IFT MMUPAG=1 LD A3,DWTUEC,A6 ST A3,DWTUEC,A7 MMU USER ECB ADDR XIF IFT INDXAC=1 LD A3,DWTTDM,A6 ST A3,DWTTDM,A7 MOVE CM FDBSNR,A7 SECTOR NR LDKL A3,FDBEXT ADR A3,A7 ST A3,FDBCEX,A7 1ST EXTENT LDR A10,A10 =1 RF(Z) DMTA30 NO RELEASE =1 LDKL A3,/8000 ST A3,DWTST,A6 NOT BUSY DMTA30 EQU * XIF ENB ENB * * RELEASE BUFFER * LD A3,ECBBA,A8 SUK A3,8 CF A14,DMTRBU * * RELEASE FDB * LDR A10,A10 RF(Z) DMTA40 NO RELEASE IFT INDXAC=1 * * REMOVE ALL OTHER REFERAENCES TO THIS FDB * LDK A1,10 2*MAX NR OF FDBS DMTA50 SUK A1,2 RF(N) DMTA70 ALL FDBS CHECKED LDR A2,A6 ADR A2,A1 LD A3,FDBADF,A2 OTHER FDB ADDR RB(Z) DMTA50 LDK A4,10 2*MAX NR OF FDBS DMTA60 SUK A4,2 RB(N) DMTA50 ALL ADDR CHECKED IN OTHER FDB LDR A5,A3 ADR A5,A4 CW A6,FDBADF,A5 RB(NE) DMTA60 * * DELETE THIS REFERENCE TO THE FDB THAT SHALL BE RELEASED * CM FDBADF,A5 RB DMTA50 XIF EJECT DMTA70 EQU * LDKL A3,/FFFE INH INH ANRS A3,A6 SET FDB FREE DMTA40 EQU * CF A14,CLRBUF REMOVE ALL FREE BUFFERS LDR A1,A7 NEW FDB ADDR ABL(Z) DMTERX NO MORE FDBS IFT INDXAC=1 ENB ENB * * FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT * LDK A7,0 LC A7,FDBEXT,A1 TASK 1ST EXT ADKL A7,'#D' TASK ID LKM DATA -4 DATA DMTASK LKM DATA 3 EXIT XIF IFT FLXDSC=1 EJECT DMT900 EQU * * UNLOCK FLEXDISC IN THIS LOOP * * REGISTERS * A1 = EXTENT COUNTER * A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR * A6 = FDB ADDR * A8 = ECB ADDR A9 = DM ECB ADDR * A10-A12 USED * ADKL A5,EXTELE EXT LENGTH IN FDB LCR A7,A5 VOLUME CODE ANK A7,/FF ABL(Z) DMT880 NO CODE * * FLEXDICSC IF BIT 8-13 = 111110 * ANK A7,/F8 SUK A7,/F8 ABL(NE) DMT880 NO FLEXDISC * * IF SAME FLEXDISC AS LAST, DO NOT SCHECK AGAIN * CCR A4,A5 ABL(E) DMT880 SAME * * NOW SEARCH ALL FDBS FOR THOIS FLEXIBLE DISC VOL CODE * DMT910 EQU * LCR A4,A5 SAVE VOL CODE LDKL A3,FDBSTA FDB LINK ROOT INH INH RF DMT925 DMT920 EQU * LDR* A3,A3 FDB ADDR DMT925 EQU * ANKL A3,/FFFE FDB ADDR RF(Z) DMT980 ALL FDBS CHECKED LDR* A7,A3 ANK A7,1 RB(Z) DMT920 FREE CWR A6,A3 RB(E) DMT920 CURRENT FDB LDK A7,4 EXTENT COUNTER LDR A2,A3 FDB ADDR ADKL A2,FDBEXT+1 * ADDR OF 1ST VOL CODE SUKL A2,EXTELE EXT LENGTH IN FDB DMT930 EQU * SUK A7,1 RB(N) DMT920 ALL EXTENTS CHECKED ADKL A2,EXTELE CCR A4,A2 VOLUME CODE ABL(E) DMT880 CODE USED. NO UNLOCK RB DMT930 NEXT EXTENT * * ALL FSDBS CHECKED. MAKE UNLOAD * DMT980 EQU * ENB ENB * * NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED * WITH THIS REQUEST * SC A4,ECBFC,A8 VOL CODE * IFF DSKPAG+SWPBLK=0 LDK A1,0 CC A4,SCTPLD+1 CHECK FILE CODE ABL(E) DMT880 PROGRAM LOADING DEVICE? XIF * IFT FLXDSC=1 LDK A7,/B8 UNLOAD WAIT LKM DATA 1 LD A1,ECBRC,A8 ANK A1,1 INOPER ABL(NZ) DMTERR ABL DMT880 CHECK NEXT EXT XIF EJECT DMT500 EQU * READ VTOC RECORD * LD A2,VTOCRL VTOC REC LENGTH CW A2,ECBRL,A9 RF(NG) DMT510 MOVE THE WHOLE VTOC REC LDK A1,/8 INCORRECT LENGTH ORS A1,ECBRC,A9 SET RC BUT CONTINUE LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU DMT510 EQU * ST A2,ECBEL,A9 CF A14,DMTREM MOVE RECORD DMAEX EQU * ABL DMTAEX EXIT EJECT DMSQWR EQU * SEQUENTIAL WRITE * DMRDWR EQU * RANDOM WRITE * DMRDDE EQU * RANDOM DELETE * DMINS EQU * INDEXED INSERT * DMDEL EQU * INDEXED DELETE * DMIRW EQU * INDEXED REWRITE * DMRDWD EQU * DELAYED RANDOM WRITE * DMRDDD EQU * DELAYED RANDOM DELETE * * TEST STATUS LD A10,FDBRRO,A6 AD A10,FDBRLE,A6 ADR A10,A5 STATUS BYTE ADDRESS LDR A11,A5 BUFFER ADDR LDR A1,A6 FDB ADDR LD A2,ECBCW+2,A9 ANK A2,/FF LD A3,ECBCW,A9 LOG REC NR LDK A4,0 CCR A4,A10 RF(E) DMS010 FREE IFT INDXAC=1 LDR A4,A7 SUK A4,QINS RF(E) DMEAER INDEXED INSERT XIF LDR A4,A7 SUK A4,QSW RF(E) DMEAER SEQ WRITE IFT QNOEXA=1 * NO EA-CHECK IF EA-BIT = 1 * LC A4,DWTST,A6 ANK A4,EABIT RF(NZ) DMS020 EA=1, NO CHECK * EA MUST BE SET * CF A14,EATEST LDR A4,A4 RTN CODE RF(NP) DMEAER NO EA THIS TASK XIF RF DMS100 DMS010 EQU * IFT INDXAC=1 LDR A4,A7 SUK A4,QIRW RF(Z) DMERND INDEXED REWRITE LDR A4,A7 SUK A4,QDEL RF(Z) DMERND INDEXED DELETE XIF DMS020 EQU * CF A14,EATEST LDR A4,A4 RTN CODE RF(N) DMEAER EA OTHER TASK DMS100 EQU * LDK A1,0 SET STATUS FREE IFT INDXAC=1 LDR A2,A7 SUK A2,QIRW RF(E) CHK010 INDEXED REWRITE LDR A2,A7 SUK A2,QINS RF(E) CHK010 INDEXED INSERT LDR A2,A7 SUK A2,QDEL RF(E) CHK010 INDEXED DELETE XIF LDR A2,A7 SUK A2,QRD RF(E) DMT350 RANDOM DELETE LDR A2,A7 SUK A2,QRDD RF(E) DMT350 DELAYED RANDOM DELETE RF DMT310 RW,RWD,SW IFT INDXAC=1 EJECT CHK010 EQU * * INDEXED REWRITE,INDEXED INSERT AND INDEXED DELETE ENTERS HERE * * COUNT NR OF INDEXES AND * COMPARE KEYS IN FILE AND USER BUFFER * LDR A1,A6 FDB ADDR LDK A5,8 MAX 4 INDEX SUR A12,A12 INDEX COUNTER CHK040 EQU * SUK A5,2 RF(N) CHK100 ALL INDEX CHECKED LDR A2,A1 FDB ADD ADR A2,A5 LD A6,FDBAI1,A2 FDB ADDR INDEX FILE RB(Z) CHK040 NO INDEX ADKL A12,1 COUNT INDEX FILES LD A2,DWTOR,A1 ORDER =3 ANK A2,/3F ORDER INDEX SUK A2,QIRW RB(NE) CHK040 NOT INDEXED REWRITE * IFT MMUPAG=1 LDR A7,A1 SAVE A1 LD A1,FDBKA,A6 GET KEY START ADDRESS AD A1,ECBBA,A9 LDKL A2,FDBKEY GET KEY SAVE AREA DISPLACEMENT ADR A2,A6 ADD FDB ADDRESS LDR A13,A2 SAVE A2 LD A3,FDBRLE,A6 RECORD LENGTH SUK A3,6 KEY LENGTH INH LD A4,DWTTDM,A7 GET TTAB ADDRESS TL TTB:MT,A4 LOAD MMU REGISTERS LD A4,PRUN GET DM TTAB ADDRESS TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE ENB CF A14,MOV:US MOVE KEY TO FDB KEY AREA LDR A1,A7 RESTORE A1 LDR A2,A13 RESTORE A2 LD A3,FDBKA,A6 GET KEY START ADDRESS XIF * IFT INDXAC=1 IFT MMUPAG=0 LD A2,FDBKA,A6 KEY START ADDR LDR A3,A2 AD A2,ECBBA,A9 KEY IN BUFFER XIF * IFT INDXAC=1 AD A3,FDBRRO,A1 ADR A3,A11 KEY IN FILE LDK A7,0 LD A6,FDBRLE,A6 RECORD LENGTH SUK A6,6 KEY LENGTH CF A14,CHKKEY COMPARE KEYS CWR A6,A7 RB(E) CHK040 KEY UNCHANGED CHECK NEXT LDR A6,A1 FDB ADDR LDKL A1,/4000 KEY NOT FOUND RF DMERR CHK100 EQU * LDR A6,A1 FDB ADDR LD A7,DWTOR,A6 ANK A7,/3F ORDER INDEX LDK A2,0 LC A2,FDBNIF,A6 CWR A2,A12 RF(E) DMT310 ALL INDEX IS EXISTING LDKL A1,/8000 REQ ERR RF DMERR DMERND LDKL A1,/800 NO DATA RF DMERR XIF DMEAER LDKL A1,/2000 EA PROTECT DMERR ABL DMTERR EJECT * * MOVE RECORD * DMT310 EQU * IFT INDXAC=1 LDR A2,A7 SUK A2,QDEL ABL(E) DMXDEL INDEXED DELETE XIF LD A2,FDBRLE,A6 RECORD LENGTH LD A3,FDBRRO,A6 ADR A3,A11 TO ADDRESS LDR A4,A3 LD A1,ECBBA,A9 FROM ADDRESS * IFT MMUPAG=0 XRR A4,A1 ANK A4,/01 RF(E) DMT320 BOTH ODD OR BOTH EVEN CF A14,DMTBM ONE ODD AND ONE EVEN RF DMT340 * DMT320 LDR A4,A3 ANK A4,/01 RF(E) DMT330 BOTH EVEN SUK A2,1 BOTH ODD LCR A4,A1 SCR A4,A3 ADK A1,1 ADK A3,1 DMT330 CF A14,DMTWM WORD MOVE * XIF * IFT MMUPAG=1 LDR A3,A2 GET LENGTH LDR A2,A4 GET RECEIVING BUFFER ADDRESS INH LD A4,DWTTDM,A6 GET TTAB ADDRESS TL TTB:MT,A4 LOAD MMU REGISTERS LD A4,PRUN GET DM TTAB ADDRESS TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE ENB CF A14,MOV:US MOVE RECORD FROM USER TO SYSTEM AREA XIF * DMT340 EQU * * * SET STATUS USED * LDK A1,/FF DMT350 SCR A1,A10 LD A3,FDBDBR,A6 RF(NN) DMT394 NO DELAY LDR A2,A7 SUK A2,QSW RF(E) DMT360 SEQUENTIAL WRITE LDR A2,A7 SUK A2,QRWD RF(E) DMT400 DELAYED RANDOM WRITE SUK A7,QRDD RF(E) DMT400 DELAYED RANDOM DELETE RF DMT390 * WRITE IF LAST REC IN SECTOR * DMT360 LD A4,FDBRRO,A6 CW A4,FDBMRO,A6 RF(NE) DMT400 NOT LAST RECORD DMT390 LDK A7,/05 BASIC WRITE SLL A3,1 RF(N) DMT395 BASIC WANTED DMT394 LDK A7,/15 PHYSICAL WRITE DMT395 EQU * * * WRITE SECTOR ONTO DISC AND EXIT * LDR A1,A6 FDB ADDRESS AS PARAMETER LKM DATA -1 I/O AND ACTIVATION DATA DMTAR2 DMTASK RESTART #2 LKM DATA 3 EXIT EJECT * ************** * DMTAR2 * ************** * * DMTAR2 EQU * DMTASK RESTART AFTER WRITE * * SET UP A14 STACK * CF A15,GETA14 * CF A14,DMTIOT CHECK DISC I/O LDR A1,A1 RF(NZ) DMTERR LDKL A1,/C0FF ANS A1,FDBDBR,A6 RELEASE BUFFER DMT400 EQU * LDR A1,A6 FDB ADDR DATA FILE LD A2,ECBCW+2,A9 ANK A2,/FF LD A3,ECBCW,A9 LOG REC NR LC A11,ECBFC,A9 FILE CODE LD A7,DWTOR,A1 ANK A7,/3F ORDER INDEX LDK A4,QSW CWR A7,A4 RF(E) DMT460 SEQ WRITE LDK A4,QRD CWR A7,A4 RF(E) DMT420 RAND DEL LDK A4,QRDD CWR A7,A4 RF(E) DMT420 DELAYED RANDEOM DELETE IFT INDXAC=1 LDK A4,QDEL CWR A7,A4 RF(E) DMT420 INDEXED DELETE XIF LDR A5,A2 SAVE REC NO PART 1 LDR A9,A3 * * UPDATE CRN * CF A14,CRNGET GET CRN BUFFER LDR A10,A2 BUFFER ADDR IFT INDXAC=1 =2 START LDK A3,QIRW CWR A7,A3 RF(E) DMT410 INDEXED REWRITE XIF =2 END CM CRNCIF,A2 * CLEAR INDEX CRN CM CRNCIF+2,A2 DMT410 EQU * =2 LDR A2,A5 LDR A3,A9 ST A2,CRNCDF,A10 ST A3,CRNCDF+2,A10 CRN DATA FILE SC A11,CRNCDF,A10 CRN FIL E CODE IFT INDXAC=1 LDK A4,QINS CWR A7,A4 RF(E) DMT460 INDEXED INSERT XIF DMT420 EQU * LDK A4,QSR CWR A7,A4 RF(E) DMT450 SEQ READ LDK A4,QRR CWR A7,A4 RF(E) DMT450 RANDOM READ LDK A4,QRRRB CWR A7,A4 RF(E) DMT450 RAND READ REL BUFFER DMT440 EQU * * * RELEASE EA * CF A14,EARELB REL EA RF DMTAEX DMT450 EQU * LC A4,DWTST,A1 DWTSTATUS ANK A4,EABIT EA-BIT RF(NZ) DMTAEX EA=1. NO EA WANTED * * CHECK IF EA IS SET ALREADY * CF A14,EATEST CHECK EA LDR A4,A4 RF(NZ) DMTAEX EA ALREADY SET * * SET EA * CF A14,EASETB RF DMTAEX DMT460 EQU * * * UPDATE LRN * SC A2,FDBLRN,A1 ST A3,FDBLRN+1,A1 IFT INDXAC=1 LDK A4,QINS CWR A7,A4 ABL(E) DMINS2 INDEXED INSERT XIF EJECT DMTAEX LDK A1,0 CORRECT RETURN * DMTERR LD A3,FDBDBR,A6 RF(NN) DMTEX1 NOT DELAY ANKL A3,/3F00 RF(NZ) DMTERX NO RELEASE OF BUFFER DMTEX1 LD A3,ECBBA,A8 SUK A3,8 DMTEX2 EQU * CF A14,DMTRBU RELEASE BUFFER AT A3 DMTERX EQU * INH * A1 = RET CODE * A6 = DWT ADDR CF A15,TENDIO ENB EXIT EQU * LKM DATA 3 IFT INDXAC=1 EJECT DMIRR EQU * * INDEXED RANDOM READ ********************************************* LD A9,DWTECB,A1 USER ECB ADDR IFT MMUPAG=0 LD A8,ECBCW,A9 ADDR OF KEY XIF IFT INDXAC=1 IFT MMUPAG=1 LDR A8,A1 FDB ADDR ADKL A8,FDBKEY KEY AREA ADDR XIF IFT INDXAC=1 SUR A11,A11 LC A11,ECBCW+3,A9 NO OF CHAR * =5 LDR A13,A1 ADKL A13,FDBECB ECB ADDR CF A14,FNDKEY GET INDEX RECORD DMR006 EQU * FROM INDEXED READ NEXT LD A9,DWTECB,A1 LDR A6,A1 FDB ADR LDKL A8,FDBECB ADR A8,A6 ECB ADDRESS LDR A2,A2 RETURN CODE RF(NZ) DMI030 KEY NOT FOUND * * KEY RECORD FOUN * CHECK IF NEXT RECORD HAS THE SAME KEY * LD A2,FDBRRO,A1 RECORD OFFSET ADK A2,10 BUFFER HEADER ADR A2,A3 REC ADDR LD A4,FDBRLE,A1 REC LENGTH SUK A4,6 KEY LENGTH ADR A2,A4 CC A4,2,A2 DUPLICATE KEY CHAR RF(NE) DMR020 NEXT KEY NOT SAME LDKL A5,/200 BIT 6 ORS A5,ECBRC,A9 NEXT KEY SAME DMR020 EQU * * * MOVE LOG REC NO TO ECB * LDK A5,0 LC A5,3,A2 SC A5,ECBCW+3,A8 LC A5,4,A2 ECR A5,A5 LC A5,5,A2 ST A5,ECBCW,A8 * * RELEASE BLOCK BUFFER * CF A14,DMTRBU EJECT * * PERFORM RANDOM READ ON THOIS DATA RECORD * LDR A6,A1 FDB ADDR LC A2,DWTST,A6 USER REQUESRT ANK A2,EABIT GET EA BIT SLL A2,1 LDK A7,/A RANDOM READ NO WAIT ORR A7,A2 EA BIT * * MOVE USER ECB * LDR A1,A9 FROM ECB ADDR LDR A3,A8 TO ECB ADDR LDK A2,6 NO OF CHAR CF A14,DMTWM MOVE ECB LDR A1,A6 FDB ADDR LKM DATA -1 DATA DMTAR4 LD A7,ECBRC,A8 RF(N) DMTAR4 REQ ERR LKM DATA 3 EXIT DMTAR4 EQU * * * SET UP A14 STACK * CF A15,GETA14 LDR A6,A1 LDKL A8,FDBECB ADR A8,A6 RR ECB LD A9,DWTECB,A6 USER ECB LD A1,ECBRC,A8 ORS A1,ECBRC,A9 RET CODE TO USER ANKL A1,/EEF7 BIT 3,7 AND 12 NOT GRAVE ERROR RB(NZ) DMTERX NOT OK * * SET CRN FOR INDEX FILE * LD A1,FDBADF,A6 FDB ADDR DATA FILEP CF A14,CRNGET GET CRN BUFFER ADDR LDR A10,A2 CRN BUFFER ADDR LDR A1,A6 FDB ADDR INDEX FILE CF A14,GTLGRN GET INDE X LOG REC NO SC A2,CRNCIF+1,A10 ST A3,CRNCIF+2,A10 CRN INDEX FILE LC A2,ECBFC,A9 SC A2,CRNCIF,A10 * THAT WAS FILE CODE CRN * * SET RERTURN CODEXS * LD A2,ECBEL,A8 EFFECTIVE LENGTH ST A2,ECBEL,A9 LDK A1,0 RETURN CODE ABL DMTERX TENDIO EJECT DMIRN EQU * INDEXED READ NEXT ********************************************* LDR A1,A6 FDB INDEX LD A2,FDBRRO,A1 RECORD OFFSET LDR A3,A5 SUK A3,10 BUFFER ADDR DMI100 EQU * ADR A2,A3 BUFFADR ADK A2,10 RECORD ADDR AD A2,FDBRLE,A1 ADDR OF STATUS CHAR LDK A5,/FF USED MARK CCR A5,A2 STATUS RF(E) DMI120 USED LD A4,FDBMRO,A1 ST A4,FDBRRO,A1 LAST REC IN SECT * * CHECK IF END OF FILE * LDR A9,A3 SAVE CF A14,GTLGRN GET REC NR CC A2,FDBLRN,A1 RF(L) DMI106 NOT EOF RF(G) DMI105 EOF CW A3,FDBLRN+1,A1 RF(L) DMI106 NOT EOF DMI105 LDR A3,A9 RF DMI030 EOF DMI106 LDR A3,A9 RESTORE RF DMI010 NEXT REC DMI120 EQU * * INDEX RECORD IS FOUND * LDK A2,0 MARK FOUND ABL DMR006 CONT AS FOR INDEXED RAND READ DMI010 EQU * CF A14,RDNXTR GET NEXT INDEX RECORD RB DMI100 RECORD FOUND LDR A6,A1 FDB ADDR DMI030 LDKL A1,/4000 KEY NOT FOUND DMI035 EQU * LDR A3,A3 BUFFER ADDR ABL(Z) DMTERX NO BUFFER ABL DMTERR ERROR AND BUFFER EJECT * DMINS2 EQU * INDEXED INSERT PART 2 * ********************************************* ENB ENB LD A3,ECBBA,A8 SUK A3,8 BUFSTA CF A14,DMTRBU RELEASE BUFFER DMXDEL EQU * INDEXED DELETE ************************************************* LDR A11,A7 ORDER CODE LDR A12,A8 PHYS ECB ADDR LDK A5,0 SC A5,FDBDBR,A1 ZEROE INDEX FILE COUNTER LDK A5,8 NR OF INDEX * 2 LDR A10,A1 FDB DATA DXI020 SUK A5,2 RF(N) DXI100 ALL INDEXES LDR A6,A10 ADR A6,A5 LD A1,FDBAI1,A6 FDB ADDR INDEX FILE RB(Z) DXI020 NO INDEX * * GET FILE CODE FOR THIS FDB ADDR * LD* A6,SCTCDT DXI030 SUK A6,4 LD A7,SCTCDT ADR A7,A6 CW A1,2,A7 RB(NE) DXI030 SEARCH NEXT LDR A8,A1 FDB INDEX ADKL A8,FDBECB ECB ADDR LC A6,1,A7 SC A6,ECBFC,A8 INDEX FILE LDR A6,A11 SUK A6,QINS RF(E) DXI080 INDEXED DELETE * * GET ADDRESSS OF DATA RECORD * LD A6,ECBBA,A12 SECTOR ADDR ADK A6,2 CYLID AD A6,FDBRRO,A10 ADDR DATA REC AD A6,FDBKA,A1 KEY OFFSET LDK A7,/20 DELETE INDEX NOWAIT RF DXI090 DXI080 EQU * LD A9,DWTECB,A10 USER ECB ADDR LD A6,ECBBA,A9 USER BUFFER ADDR AD A6,FDBKA,A1 KEY OFFSET IFT MMUPAG=1 LDR A6,A1 ADKL A6,FDBKEY ADDR KEY AREA XIF IFT INDXAC=1 LDK A7,/1F INSERT INDEX NOWAIT DXI090 EQU * * * A6 = KEY ADDRESS * ST A6,ECBBA,A8 * A1 = FDB ADDR IN DE XFILE LKM DATA -1 DATA DMTAR5 LD A7,ECBRC,A8 RF(N) DMTAR5 REQ ERR RB DXI020 NEXT INDEX DIRECT DXI100 LKM DATA 3 EXIT DMTAR5 EQU * LD A6,FDBADF,A1 FDB DATA FILE LD A9,DWTECB,A6 USER ECB LDKL A8,FDBECB ADR A1,A8 ECB INSERT INDEX ADR A8,A6 ECB DISC IO LD A1,ECBRC,A1 RET CODE BIT 10 AND 14 POSSIBLE ORS A1,ECBRC,A9 RC TO USER LDK A1,0 RETURN CODE LC A2,FDBDBR,A6 NR OF READY INDEX ADK A2,1 COUNT INDEXES CC A2,FDBNIF,A6 TOT NR OF INDEX RF(NE) DXI200 LD A7,DWTOR,A6 ANK A7,/3F ORDER CODE SUK A7,QINS INDEXED INSERT ABL(E) DMTERX READY * RESTORE REGISTERS FOR INDEXED DELETE * LD A10,FDBECB+2,A6 SECTOR ADDR ADKL A10,2 CYLID AD A10,FDBRRO,A6 AD A10,FDBRLE,A6 ADDR STATUS CHAR LDK A1,0 STATUS FREE ABL DMT350 CONTINUE AS FOR RANDOM DELETE DXI200 EQU * SC A2,FDBDBR,A6 LKM DATA 3 EXIT. MORE INDEX LEFT EJECT DMINIX EQU * INSERT INDEX * DMDELX EQU * DELETE INDEX RECORD ********************************************* LD A9,DWTECB,A1 USER ECB ADDR LD A8,ECBBA,A9 BUFFER ADDR USER LDR A12,A8 LD A11,FDBRLE,A1 RECORD LENGTH SUKL A11,6 KEY LENGTH LDR A13,A14 ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS CF A14,FNDKEY GET INDEX RECORD LDR A6,A1 FDB ADDR LDR A1,A2 RET CODE LDR A3,A3 ABL(Z) DMI035 NO SECTOR FOUND LDR A13,A3 BUFFER ADDR LD A4,FDBADF,A6 FDB DATA FILE LD A5,DWTECB,A4 USER ECB LD A1,DWTOR,A6 ANK A1,/3F SUK A1,QDELX ABL(E) DEL000 DELETE INDEX RECORD * * SET RC BIT 6 TO USER IF NEXT KEY * IS SAME IN REQUESTED INDEX * LDR A2,A2 RF(NZ) INS050 NEXT KEY NOT SAME * (SHORT KEY NOT ALLOWED IN FILE) * LC A4,ECBFC,A5 FILE CODE CC A4,FDBECB+1,A6 RF(NE) INS049 NOT REQUESTED FILE CODE LDKL A4,/200 BIT 6 ORS A4,ECBRC,A5 NEXT KEY SAME INS049 EQU * IFT INSLAS=1 * * INSERT SAME KEY LAST * LDR A1,A6 FDB LD A2,FDBRRO,A1 REC OFFS RF INS100 INS080 EQU * CF A14,RDNXTR GET NEXT REC RF INS100 OK ABL DEL045 ERROR INS100 EQU * ADR A2,A3 ADK A2,10 REC ADDR AD A2,FDBRLE,A1 ADDR STATUS LDK A5,/FF CCR A5,A2 RF(E) INS150 USED LD A5,FDBMRO,A1 ST A5,FDBRRO,A1 RB INS080 GET FIRST RE C IN NXT SECT INS150 EQU * LC A5,-4,A2 DUPL KEY CHAR CWR A5,A11 KEY LENGTH RB(E) INS080 NEXT SAME GET NEXT * * UPDATE LAST SAME RECORD * SC A11,-4,A2 NEXT SAME LD A7,FDBRRO,A1 CW A7,FDBMRO,A1 RF(NE) INS160 SECT WRITTEN LATER * * WRITE SECTOR * LDK A7,/95 WRITE,WAIT LKM DATA 1 CF A14,DMTIOZ IO CHECK LDR A1,A1 ABL(NZ) DMTERR * * GET NEXT RECORD * INS160 EQU * LDR A7,A5 NR OF SAME IN NEXT LDR A1,A6 FDB CF A14,RDNXTR GET NEXT RC RF INS170 OK ABL DEL045 ERROR INS170 EQU * LDR A13,A3 BUFFER ADDR LD A5,FDBADF,A6 LD A5,DWTECB,A5 USER ECB ADDR XIF IFT INDXAC=1 INS050 EQU * * * CREATE AN INDE XRECORD IN AREA 1 * LDR A1,A12 FROM ADDR * LDR A3,A14 ADK A3,2 TO ADDR LDR A2,A11 KEY LENGTH CF A14,DMTBM MOVE KEY LDK A2,0 SCR A2,A3 DUMMY ADK A3,1 SCR A2,A3 DUMMY ADK A3,1 SCR A7,A3 NR OF SAME CHAR ADK A3,1 LDR A7,A3 ADDR OF LOG REC NR LD A2,ECBCW+2,A5 LD A3,ECBCW,A5 REC NR DATA FILE REC SCR A2,A7 ADK A7,2 SCR A3,A7 ECR A3,A3 SUK A7,1 SCR A3,A7 LOG REC NR ADK A7,2 LDK A1,/FF USED SCR A1,A7 STATUS CHAR LDR A1,A6 FDB INDEX CF A14,GTLGRN GET REC NR INDEX * * SAVE RECORD NR FOR FIRST MOVED INDEX * ST A2,-28,A14 ST A3,-26,A14 EJECT * * BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING * USED RECORDS ROLLED FORWARD * A6,A11,A13 IS USED AT ENTRY ADKL A11,7 RECORD LENGTH TOTAL * * USE D REGISTERS * A6 = FDB ADDR INDEX * A10 = AREA ADDR * A11 = RECORD LENGTH INDEX * A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 * A13 = BUFFER ADDRESS SECTOR * INS190 EQU * LDKL A12,1 BUFADR2 INS200 EQU * LDK A1,0 LDR A12,A12 RF(Z) INS210 BUFAR1 LDKL A1,RECBFZ RECORD BUUFFER SIZE SLL A1,1 BYTE INS210 LDR A10,A14 ADK A1,2 ADR A10,A1 RECORD BUFFER AREA ADDR * * SAVE LAST RECORD * LDR A1,A13 ADK A1,10 BUFSTA+2 AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT LDR A2,A11 LDR A3,A10 CF A14,DMTBM SAVE LAST RECORD * MOVE REST OF SECTOR * LDR A1,A13 ADK A1,10 BUFSTA+2 AD A1,FDBRRO,A6 FROM ADDR LDR A5,A1 LD A2,FDBMRO,A6 SU A2,FDBRRO,A6 NR OF CHAR LDR A3,A1 ADR A3,A11 TO ADDR CF A14,DMTBMR MOVE * INSERT NEW RECORD * LDKL A1,RECBFZ BUFFER SIZE SLL A1,1 BYTE NO LDR A12,A12 RF(Z) INS250 BUFAR1 LDK A1,0 SELECT OTHER BUFFER INS250 EQU * ADR A1,A14 FROM ADDR ADK A1,2 FROM ADDR LDR A2,A11 NR OF CHAR LDR A3,A5 TO ADDR CF A14,DMTBM MOVE * WRITE BUFFER * LDR A8,A14 USE STACK AS ECB SUKL A8,24 LC A2,FDBEXT+1,A6 VOL DEV CODE ANK A2,/FF STR A2,A8 LDR A2,A13 ADK A2,8 BUFSTA ST A2,ECBBA,A8 SECTOR ADDR LDKL A2,SECTLE SECTOR LGTH ST A2,ECBRL,A8 LD A2,FDBSNR,A6 SECTOR NR ST A2,ECBCW,A8 SECTOR NR LDK A7,/95 WRITE , WAIT LKM DATA 1 LDR A1,A6 FDB INDEX CF A14,DMTIOZ IO CHECK LDR A1,A1 ABL(NZ) DMTERR * * IF SPILLED RECORD IS FREE, OPERATION IS READY * LDR A2,A10 RECORD AREA ADDR ADR A2,A11 REC LGTH SUK A2,1 ADDR OF STATUS CHAR LD A4,FDBMRO,A6 ST A4,FDBRRO,A6 MAX OFFSET IN SECT CCR A1,A2 RF(Z) INS400 FREE RECORD * * GET NEXT SECTOR * LDR A1,A6 FDB ADDR LDR A3,A13 BUFFER ADDR CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR RF INS260 OK LDR A1,A5 ABL DMI035 ERROR INS260 EQU * LDR A13,A3 NEW BUFFER ADDR LDR A12,A12 RB(Z) INS190 SWITCH RECORD BUFFERS SUR A12,A12 RB INS200 EJECT INS400 EQU * * * UPDATE LRN IF EOF IS ENCOUNTERED * LDR A1,A6 FDB INDEX CF A14,GTLGRN CC A2,FDBLRN,A1 RF(L) INS430 NO EOF RF(G) INS410 EOF CW A3,FDBLRN+1,A1 RF(NG) INS430 NO EOF INS410 EQU * SC A2,FDBLRN,A6 LLAST REC NR ST A3,FDBLRN+1,A6 LDKL A1,/1000 EOF ORS A1,ECBRC,A9 EOF TO USER INS430 EQU * * * UPDATE CRN-LINK FOR MOVED INDEX RECORDS * LDKL A12,1 ADD ON E TO CRN LDR A8,A2 LDR A9,A3 LAST REC NR MOVED LD A10,-28,A14 LD A11,-26,A14 FIRST REC NR MOVED CF A14,CRNUPD ADD 1 TO RECORD NUMBERS * * UPDATE CRN IF SAME FILE CODE * LD A1,FDBADF,A5 FDB DATA F CF A14,CRNGET GET CRN BUFFER LD A9,DWTECB,A1 USER ECB ADDR =4 LC A4,ECBFC,A9 USER FILE CODE CC A4,FDBECB+1,A5 RF(NE) INS440 OTHRER FILE ST A10,CRNCIF,A2 ST A11,CRNCIF+2,A2 REC NR SC A4,CRNCIF,A2 FILE CODE INS440 EQU * LDR A6,A5 FDB INDEX LDK A1,0 OK RET CODE LDR A3,A13 BUFFER ADDR ABL DMTEX2 EJECT DEL000 EQU * DELETE INDEX RECORD CONT LDR A12,A5 USER ECB ADDR LDR A2,A2 DEL010 EQU * ABL(NZ) DMI030 KEY NOT FOUND * * CHECK RECORD NR DATA REC * DEL020 EQU * LD A1,FDBRRO,A6 ADR A1,A3 AD A1,FDBRLE,A6 ADK A1,7 BUFSTA+2-3=ADDR REC NR LCR A2,A1 CC A2,ECBCW+3,A12 REC NR RF(NE) DEL030 WRONG RECORD LC A2,1,A1 ECR A2,A2 LC A2,2,A1 REC NR CW A2,ECBCW,A12 RF(E) DEL200 RECORD FOUND DEL030 EQU * * * CHECK IF NEXT KEY SAME * CC A11,-1,A1 KEY LENGTH RB(NE) DEL010 NEXT KEY NOT SAME LDR A1,A6 FDB INDEX DEL040 EQU * CF A14,RDNXTR GET NEXT INDEX RECORD RF DEL050 OK DEL045 LDR A1,A5 ERROR CODE ABL DMI035 ERROR DEL050 EQU * * * CHECK IF RECORD IS USED * LDR A13,A3 NEW BUFFER ADDR ADR A2,A3 ADK A2,10 BUFSTA + 2 AD A2,FDBRLE,A1 ADDR OF STATUS LDK A5,/FF CCR A5,A2 RB(E) DEL020 USED LD A4,FDBMRO,A1 ST A4,FDBRRO,A1 LAST REC IN SECTOR RB DEL040 NEXT REC EJECT DEL200 EQU * RECORD FOUND * * SET RC BIT 6 IF NEXT KEY SAME * LC A2,ECBFC,A12 USER FILE CODE LDK A7,0 LC A7,-1,A1 NR OF SAME CHAR ST A7,16,A14 SAVE IN RECORD BUFFER AFTER ECB CC A2,FDBECB+1,A6 RF(NE) DEL220 NOT REQUESTED FILE CODE CWR A11,A7 KEY LENGTH RF(NE) DEL220 NEXT KEY NOT SAME LDKL A4,/200 ORS A4,ECBRC,A12 NEXT KEY SAME DEL220 EQU * * * MOVE UP RECORDS OVER DELETED * ADKL A11,7 TOTAL RECORD LENGTH LDR A3,A13 ADK A3,10 BUFSTA+2 AD A3,FDBRRO,A6 TO ADDR LDR A1,A3 ADR A1,A11 FROM ADDR LD A2,FDBMRO,A6 SU A2,FDBRRO,A6 NR OF CHAR CF A14,DMTBM MOVE * * SET LAST RECORD FREE * ADR A3,A11 SUK A3,1 LDK A1,0 SCR A1,A3 STATUS FREE * * UPDATE CRN FOR MOVED RECORDS * LDR A1,A6 FDB ADDR CF A14,GTLGRN GET REC NR LDR A10,A2 LDR A11,A3 FIRST REC NR MOVED LD A12,FDBRRO,A6 OLD OFFSET LD A4,FDBMRO,A6 ST A4,FDBRRO,A6 MAX OFFSET CF A14,GTLGRN LAST REC NR MOVED LDR A8,A2 LDR A9,A3 REC NR ST A12,FDBRRO,A6 RESET OFFSET LDKL A12,-1 CF A14,CRNUPD UPDATE CRN BUFFERS LDKL A12,1 MARK BUFFER CHANGED DEL240 EQU * LD A4,FDBRRO,A5 RF(NZ) DEL290 NOT FIRST RECORD LDR A1,A5 FDB CF A14,GTLGRN GET REC NR LDR A1,A2 LDR A2,A3 LDK A6,0 LDK A7,1 CF A14,DSUMOD A1,A2 = A1,A2 - 1 RF(Z) DEL600 FILE START LDR A6,A5 FDB ADDR CF A14,CALSNO GET SECTOR NR LDR A5,A6 FDB ADDR LDR A1,A1 RF(NZ) DEL600 FILE START LDR A8,A14 ADKL A8,2 ECB ADDR LDR A12,A12 RF(Z) DEL245 BUFFER NOT CHANGED * * WRITE SECTOR * LDK A7,/95 WRITE WAIT LKM DATA 1 LDR A1,A5 FDB CF A14,DMTIOZ IO CHECK LDR A1,A1 ABL(NZ) DMTERR SUR A12,A12 BUFFER NOT CHANGED YET DEL245 EQU * LDR A3,A13 CF A14,DMTRBU RELEASE BUFFER * * GET PREVIOUS SECTOR * LDR A1,A5 FDB ADDR LDK A3,0 CF A14,RDNXTR GET SECTOR RF DEL250 OK LDR A6,A1 FDB ADDR RB DEL045 DEL250 EQU * LDR A5,A1 FDB LDR A13,A3 NEW BUFFER ADDR LD A4,FDBMRO,A5 RF DEL300 DEL290 EQU * SU A4,FDBRLE,A5 SUK A4,1 DEL300 EQU * ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET ADK A4,10 BUFSTA+2 ADR A4,A13 RECORD ADDR AD A4,FDBRLE,A5 STATUS CHAR ADDR LDK A2,/FF CCR A2,A4 RB(NE) DEL240 FREE LC A2,17,A14 NR OF SAME IN DELETED RECORD CC A2,-4,A4 RF(NL) DEL600 SC A2,-4,A4 MAKE NR OF SAME SMALLER RF DEL700 WRITE SECTOR DEL600 EQU * LDR A12,A12 RF(Z) DEL900 BUFFER NOT CHANGED * * WRITE SECTOR * DEL700 EQU * LDR A8,A14 ADKL A8,2 ECB ADDR LDK A7,/95 WRITE WAIT LKM DATA 1 LDR A1,A5 FDB ADDR CF A14,DMTIOZ IO CHECK LDR A1,A1 ABL(NZ) DMTERR DEL900 EQU * ABL INS440 XIF END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DMTASK REL 9.2 79-11-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0054 Head {h00=0x0012, h01=0x0050, text=» =5, PR5649 «, t00=0x0000, t01=0x0042}
0x0054…0070 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-11-01 «, t00=0x0000, t01=0x0058}
0x0070…008e Head {h00=0x001a, h01=0x0050, text=» =4,CURRENCY INSERT «, t00=0x0000, t01=0x0074}
0x008e…00aa Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-07-02 «, t00=0x0000, t01=0x0092}
0x00aa…00c0 Head {h00=0x0012, h01=0x0050, text=» =3,TEST KEY«, t00=0x0000, t01=0x00ae}
0x00c0…00dc Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-07-02 «, t00=0x0000, t01=0x00c4}
0x00dc…00f0 Head {h00=0x0010, h01=0x0050, text=» =2,CH REQ«, t00=0x0000, t01=0x00e0}
0x00f0…0102 Head {h00=0x000e, h01=0x0050, text=» REL 8.2«, t00=0x0000, t01=0x00f4}
0x0102…011a Head {h00=0x0014, h01=0x0050, text=» =1,PR 790116 «, t00=0x0000, t01=0x0106}
0x011a…012c Head {h00=0x000e, h01=0x0050, text=» REL 8.2«, t00=0x0000, t01=0x011e}
0x012c…0168 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x0130}
0x0168…0172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016c}
0x0172…019a Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0000, t01=0x0176}
0x019a…01a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000e}
0x01a4…01d8 Head {h00=0x0030, h01=0x0050, text=»* DMTASK = HANDLES DATAMANAGEMENT DISC I/O«, t00=0x0001, t01=0x0018}
0x01d8…01e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004c}
0x01e2…01ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0056}
0x01ec…01f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0060}
0x01f6…0200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006a}
0x0200…020a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0074}
0x020a…0246 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0001, t01=0x007e}
0x0246…0250 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ba}
0x0250…0280 Head {h00=0x002c, h01=0x0050, text=»* THIS MODULE IS ACTIVATED FROM TIODM.«, t00=0x0001, t01=0x00c4}
0x0280…028a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f4}
0x028a…02a8 Head {h00=0x001a, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0001, t01=0x00fe}
0x02a8…02c4 Head {h00=0x0018, h01=0x0050, text=»* A1 = FDB ADDRESS«, t00=0x0001, t01=0x011c}
0x02c4…0304 Head {h00=0x003c, h01=0x0050, text=»* A2 = TID TASK IDENT OF DMTASK AT PRESENT NOT USED«, t00=0x0001, t01=0x0138}
0x0304…030e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0178}
0x030e…035a Head {h00=0x0048, h01=0x0050, text=»* THE SECTOR TO BE ACCESSED IS DEFINED IN FDB (FDBDMI, -FC, -SNR).«, t00=0x0001, t01=0x0182}
0x035a…0398 Head {h00=0x003a, h01=0x0050, text=»* ALL BUFFERS ARE CHECKED TO FIND OUT IF THIS SECTOR«, t00=0x0002, t01=0x003e}
0x0398…03e2 Head {h00=0x0046, h01=0x0050, text=»* IS ALREADY PRESENT IN A BUFFER. IF SO THE BUFFER STATUS IS SET«, t00=0x0002, t01=0x007c}
0x03e2…042a Head {h00=0x0044, h01=0x0050, text=»* TO USED AND ACTIONS ACCORDING TO THE ORDER ARE TAKEN. IF NOT«, t00=0x0002, t01=0x00c6}
0x042a…0468 Head {h00=0x003a, h01=0x0050, text=»* THE SECTOR MUST FIRST BE READ INTO A FREE BUFFER. «, t00=0x0002, t01=0x010e}
0x0468…0472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014c}
0x0472…04be Head {h00=0x0048, h01=0x0050, text=»* ALL I/O LKM REQUESTS IN THIS MODULE ARE WITH ACTIVATION AND ARE «, t00=0x0002, t01=0x0156}
0x04be…04ea Head {h00=0x0028, h01=0x0050, text=»* FOLLOWED BY AN EXIT LKM REQUEST.«, t00=0x0003, t01=0x0012}
0x04ea…0528 Head {h00=0x003a, h01=0x0050, text=»* INDEX FILES ARE HANDLED IN SUBROUTINE RDNXTR WHERE«, t00=0x0003, t01=0x003e}
0x0528…0552 Head {h00=0x0026, h01=0x0050, text=»* ALL I/O ARE MADE IN WAIT MODE «, t00=0x0003, t01=0x007c}
0x0552…055c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a6}
0x055c…05a4 Head {h00=0x0044, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY THE EXCLUSIVE ACCESS CHECK «, t00=0x0003, t01=0x00b0}
0x05a4…05de Head {h00=0x0036, h01=0x0050, text=»* FOR INDEXED DELETE AND FOR INDEXED REWRITE AND«, t00=0x0003, t01=0x00f8}
0x05de…061e Head {h00=0x003c, h01=0x0050, text=»* FOR RANDOM WRITE AND RANDOM DELETE CAN BE EXCLUDED. «, t00=0x0003, t01=0x0132}
0x061e…0628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0172}
0x0628…065e Head {h00=0x0032, h01=0x0050, text=»* QNOEXA=1 EXCLUSIVE ACCESS CHECK INCLUDED«, t00=0x0003, t01=0x017c}
0x065e…0694 Head {h00=0x0032, h01=0x0050, text=»* QNOEXA=0 EXCLUSIVE ACCESS CHECK EXCLUDED«, t00=0x0004, t01=0x0022}
0x0694…06a2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0058}
0x06a2…06ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0066}
0x06ac…06c4 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0004, t01=0x0070}
0x06c4…06dc Head {h00=0x0014, h01=0x0050, text=»* ENTRIES * «, t00=0x0004, t01=0x0088}
0x06dc…06f4 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0004, t01=0x00a0}
0x06f4…06fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b8}
0x06fe…0708 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00c2}
0x0708…071e Head {h00=0x0012, h01=0x0050, text=» ENTRY DMTASK «, t00=0x0004, t01=0x00cc}
0x071e…0748 Head {h00=0x0026, h01=0x0050, text=» ENTRY SQR EXTERNAL CODE SEQ READ «, t00=0x0004, t01=0x00e2}
0x0748…075a Head {h00=0x000e, h01=0x0050, text=» ENTRY QSW«, t00=0x0004, t01=0x010c}
0x075a…076e Head {h00=0x0010, h01=0x0050, text=» ENTRY DMTWM«, t00=0x0004, t01=0x011e}
0x076e…0786 Head {h00=0x0014, h01=0x0050, text=» ENTRY QIRN,QIRR«, t00=0x0004, t01=0x0132}
0x0786…0794 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x014a}
0x0794…079e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0158}
0x079e…07b8 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0004, t01=0x0162}
0x07b8…07d2 Head {h00=0x0016, h01=0x0050, text=»* EXTERNALS * «, t00=0x0004, t01=0x017c}
0x07d2…07ec Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0005, t01=0x0008}
0x07ec…07f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0022}
0x07f6…0800 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x002c}
0x0800…081c Head {h00=0x0018, h01=0x0050, text=» EXTRN SCTTCT,SCTCDT«, t00=0x0005, t01=0x0036}
0x081c…0846 Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:ID TASK IDENTIFICATION «, t00=0x0005, t01=0x0052}
0x0846…0862 Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:TD,FDBSTA«, t00=0x0005, t01=0x007c}
0x0862…0878 Head {h00=0x0012, h01=0x0050, text=» EXTRN FNDTID «, t00=0x0005, t01=0x0098}
0x0878…088e Head {h00=0x0012, h01=0x0050, text=» EXTRN TENDIO «, t00=0x0005, t01=0x00ae}
0x088e…08a4 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBECB «, t00=0x0005, t01=0x00c4}
0x08a4…08ba Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBSNR «, t00=0x0005, t01=0x00da}
0x08ba…08d0 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBRRO «, t00=0x0005, t01=0x00f0}
0x08d0…08e6 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBRLE «, t00=0x0005, t01=0x0106}
0x08e6…08fc Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBBLF «, t00=0x0005, t01=0x011c}
0x08fc…0912 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBTNR «, t00=0x0005, t01=0x0132}
0x0912…0928 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBVTO «, t00=0x0005, t01=0x0148}
0x0928…093e Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBCEX «, t00=0x0005, t01=0x015e}
0x093e…0954 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBEXT «, t00=0x0005, t01=0x0174}
0x0954…096a Head {h00=0x0012, h01=0x0050, text=» EXTRN EXTDMI «, t00=0x0005, t01=0x018a}
0x096a…097e Head {h00=0x0010, h01=0x0050, text=» EXTRN EXTFC«, t00=0x0006, t01=0x0010}
0x097e…0994 Head {h00=0x0012, h01=0x0050, text=» EXTRN EXTLEN «, t00=0x0006, t01=0x0024}
0x0994…09aa Head {h00=0x0012, h01=0x0050, text=» EXTRN EXTBAS «, t00=0x0006, t01=0x003a}
0x09aa…09c0 Head {h00=0x0012, h01=0x0050, text=» EXTRN EXTELE «, t00=0x0006, t01=0x0050}
0x09c0…09d6 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBLRN «, t00=0x0006, t01=0x0066}
0x09d6…09ec Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBMIA «, t00=0x0006, t01=0x007c}
0x09ec…0a02 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBEAL «, t00=0x0006, t01=0x0092}
0x0a02…0a18 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBADF «, t00=0x0006, t01=0x00a8}
0x0a18…0a2e Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBAI1 «, t00=0x0006, t01=0x00be}
0x0a2e…0a44 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBCRL «, t00=0x0006, t01=0x00d4}
0x0a44…0a68 Head {h00=0x0020, h01=0x0050, text=» EXTRN FDBDBR,FDBMRN,FDBMRO «, t00=0x0006, t01=0x00ea}
0x0a68…0a7c Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBFC«, t00=0x0006, t01=0x010e}
0x0a7c…0a90 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBBA«, t00=0x0006, t01=0x0122}
0x0a90…0aa4 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRL«, t00=0x0006, t01=0x0136}
0x0aa4…0ab8 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBEL«, t00=0x0006, t01=0x014a}
0x0ab8…0acc Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRC«, t00=0x0006, t01=0x015e}
0x0acc…0ae0 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBCW«, t00=0x0006, t01=0x0172}
0x0ae0…0af6 Head {h00=0x0012, h01=0x0050, text=» EXTRN CLRBUF «, t00=0x0006, t01=0x0186}
0x0af6…0b0c Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFLNK «, t00=0x0007, t01=0x000c}
0x0b0c…0b22 Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFDMI «, t00=0x0007, t01=0x0022}
0x0b22…0b36 Head {h00=0x0010, h01=0x0050, text=» EXTRN BUFFC«, t00=0x0007, t01=0x0038}
0x0b36…0b4c Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFSNR «, t00=0x0007, t01=0x004c}
0x0b4c…0b60 Head {h00=0x0010, h01=0x0050, text=» EXTRN BUFOR«, t00=0x0007, t01=0x0062}
0x0b60…0b76 Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFSTA «, t00=0x0007, t01=0x0076}
0x0b76…0b8c Head {h00=0x0012, h01=0x0050, text=» EXTRN CURBUF «, t00=0x0007, t01=0x008c}
0x0b8c…0ba2 Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTECB «, t00=0x0007, t01=0x00a2}
0x0ba2…0bb8 Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTUEC «, t00=0x0007, t01=0x00b8}
0x0bb8…0bcc Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTOR«, t00=0x0007, t01=0x00ce}
0x0bcc…0bee Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTST,DWTTDM,DWTTQ «, t00=0x0007, t01=0x00e2}
0x0bee…0c04 Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTWAT «, t00=0x0007, t01=0x0104}
0x0c04…0c30 Head {h00=0x0028, h01=0x0050, text=» EXTRN DMTRBU RELEASE A DISC BUFFER «, t00=0x0007, t01=0x011a}
0x0c30…0c44 Head {h00=0x0010, h01=0x0050, text=» EXTRN VTLRN«, t00=0x0007, t01=0x0146}
0x0c44…0c58 Head {h00=0x0010, h01=0x0050, text=» EXTRN VLVBA«, t00=0x0007, t01=0x015a}
0x0c58…0c6c Head {h00=0x0010, h01=0x0050, text=» EXTRN VLVRL«, t00=0x0007, t01=0x016e}
0x0c6c…0c88 Head {h00=0x0018, h01=0x0050, text=» EXTRN DMTIOT,DIVMOD«, t00=0x0007, t01=0x0182}
0x0c88…0ca4 Head {h00=0x0018, h01=0x0050, text=» EXTRN MPYMOD,CHKKEY«, t00=0x0008, t01=0x000e}
0x0ca4…0cba Head {h00=0x0012, h01=0x0050, text=» EXTRN CALSNO «, t00=0x0008, t01=0x002a}
0x0cba…0cd0 Head {h00=0x0012, h01=0x0050, text=» EXTRN DSUMOD «, t00=0x0008, t01=0x0040}
0x0cd0…0d02 Head {h00=0x002e, h01=0x0050, text=» EXTRN EATEST,EASETB,CRNGET,EARELB,GTBKBU «, t00=0x0008, t01=0x0056}
0x0d02…0d1e Head {h00=0x0018, h01=0x0050, text=» EXTRN QTJOB,GTLGRN «, t00=0x0008, t01=0x0088}
0x0d1e…0d34 Head {h00=0x0012, h01=0x0050, text=» EXTRN FNDKEY «, t00=0x0008, t01=0x00a4}
0x0d34…0d58 Head {h00=0x0020, h01=0x0050, text=» EXTRN CRNCIF,CRNCDF,CRNQUE «, t00=0x0008, t01=0x00ba}
0x0d58…0d6c Head {h00=0x0010, h01=0x0050, text=» EXTRN MXIND«, t00=0x0008, t01=0x00de}
0x0d6c…0d8e Head {h00=0x001e, h01=0x0050, text=» EXTRN FDBKA,FDBNIF,RDNXTR«, t00=0x0008, t01=0x00f2}
0x0d8e…0dc8 Head {h00=0x0036, h01=0x0050, text=» EXTRN FDBKEY SAVE AREA FOR KEY IN INDEXED ACCESS «, t00=0x0008, t01=0x0114}
0x0dc8…0dfa Head {h00=0x002e, h01=0x0050, text=» EXTRN BUFAR1,BUFAR2,SECTLE,DMTIOZ,CRNUPD «, t00=0x0008, t01=0x014e}
0x0dfa…0e2e Head {h00=0x0030, h01=0x0050, text=» EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA «, t00=0x0008, t01=0x0180}
0x0e2e…0e62 Head {h00=0x0030, h01=0x0050, text=» EXTRN MOV:SU MOVE FROM SYSTEM TO USER AREA «, t00=0x0009, t01=0x0024}
0x0e62…0e78 Head {h00=0x0012, h01=0x0050, text=» EXTRN MONMMU «, t00=0x0009, t01=0x0058}
0x0e78…0ea8 Head {h00=0x002c, h01=0x0050, text=» EXTRN PRUN TTAB ADDRESS OF RUNNING TASK«, t00=0x0009, t01=0x006e}
0x0ea8…0ec8 Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:MT MMU TABLE «, t00=0x0009, t01=0x009e}
0x0ec8…0ef4 Head {h00=0x0028, h01=0x0050, text=» EXTRN SCTPLD PROGRAM LOADING DEVICE«, t00=0x0009, t01=0x00be}
0x0ef4…0f02 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00ea}
0x0f02…0f0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00f8}
0x0f0c…0f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0102}
0x0f16…0f20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x010c}
0x0f20…0f40 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x0116}
0x0f40…0f60 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x0009, t01=0x0136}
0x0f60…0f80 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x0156}
0x0f80…0f8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0176}
0x0f8a…0fc6 Head {h00=0x0038, h01=0x0050, text=»* CHECK OF EXCLUSIVE ACCESS BIT CAN BE EXCLUDED AT«, t00=0x0009, t01=0x0180}
0x0fc6…1002 Head {h00=0x0038, h01=0x0050, text=»* RANDOM WRITE AND RANDOM DELETE BY SETTING X:A=0.«, t00=0x000a, t01=0x002c}
0x1002…100c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0068}
0x100c…1016 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0072}
0x1016…1028 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000a, t01=0x007c}
0x1028…103a Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000a, t01=0x008e}
0x103a…104c Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x000a, t01=0x00a0}
0x104c…105e Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x000a, t01=0x00b2}
0x105e…1070 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000a, t01=0x00c4}
0x1070…107a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d6}
0x107a…1092 Head {h00=0x0014, h01=0x0050, text=»QNOEXA EQU 00001«, t00=0x000a, t01=0x00e0}
0x1092…10cc Head {h00=0x0036, h01=0x0050, text=»* INDEXED ACCEXSS FUNCTIONS CAN BE OMITTED WITH «, t00=0x000a, t01=0x00f8}
0x10cc…10fc Head {h00=0x002c, h01=0x0050, text=»* INDXAC EQU 1 = INDEX ACCESS INCLUDED«, t00=0x000a, t01=0x0132}
0x10fc…1136 Head {h00=0x0036, h01=0x0050, text=»* INDXAC EQU 0 = INDEX ACCESS FUNCTIONS OMITTED «, t00=0x000a, t01=0x0162}
0x1136…114e Head {h00=0x0014, h01=0x0050, text=»INDXAC EQU 00000«, t00=0x000b, t01=0x000c}
0x114e…1188 Head {h00=0x0036, h01=0x0050, text=»RECBFZ EQU 00004 INDEX RECORD BUFFER SIZE IN WORDS«, t00=0x000b, t01=0x0024}
0x1188…11c0 Head {h00=0x0034, h01=0x0050, text=»FLXDSC EQU X:D FLEXIBLE DISC INCLUDED WHEN EQU 1«, t00=0x000b, t01=0x005e}
0x11c0…11f4 Head {h00=0x0030, h01=0x0050, text=»INSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1«, t00=0x000b, t01=0x0096}
0x11f4…11fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ca}
0x11fe…1216 Head {h00=0x0014, h01=0x0050, text=» EJECT DMTASK «, t00=0x000b, t01=0x00d4}
0x1216…1220 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ec}
0x1220…122a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00f6}
0x122a…125c Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000b, t01=0x0100}
0x125c…128a Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000b, t01=0x0132}
0x128a…1294 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0160}
0x1294…12a8 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000b, t01=0x016a}
0x12a8…12b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017e}
0x12b2…12bc Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000b, t01=0x0188}
0x12bc…12ee (12, 0, 400) Head {h00=0x002e, h01=0x002a, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x000c, t01=0x0004}
0x12ee…131c Head {h00=0x002a, h01=0x0026, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x000c, t01=0x0036}
0x131c…1326 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000c, t01=0x0064}
0x1326…133a Head {h00=0x0010, h01=0x0050, text=»DSKPAG EQU 1«, t00=0x000c, t01=0x006e}
0x133a…1344 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000c, t01=0x0082}
0x1344…134e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008c}
0x134e…1388 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK «, t00=0x000c, t01=0x0096}
0x1388…13be Head {h00=0x0032, h01=0x0050, text=»* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. «, t00=0x000c, t01=0x00d0}
0x13be…13c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0106}
0x13c8…13dc Head {h00=0x0010, h01=0x0050, text=»SWPBLK EQU 0«, t00=0x000c, t01=0x0110}
0x13dc…13e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0124}
0x13e6…13f4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x012e}
0x13f4…13fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013c}
0x13fe…141e Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x0146}
0x141e…143e Head {h00=0x001c, h01=0x0050, text=»* DATA DEFINITIONS *«, t00=0x000c, t01=0x0166}
0x143e…145e Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x0186}
0x145e…1468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0016}
0x1468…1472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0020}
0x1472…14a2 Head {h00=0x002c, h01=0x0050, text=»EABIT EQU /20 EA-BIT IN DWT STATUS BYTE «, t00=0x000d, t01=0x002a}
0x14a2…14ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x005a}
0x14ac…14d6 Head {h00=0x0026, h01=0x0050, text=»VTOBLK EQU 9 VTOC BLOCKING FACTOR «, t00=0x000d, t01=0x0064}
0x14d6…14e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x008e}
0x14e0…151e Head {h00=0x003a, h01=0x0050, text=»* THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE«, t00=0x000d, t01=0x0098}
0x151e…1548 Head {h00=0x0026, h01=0x0050, text=»* POSITION IN TIODM-TABLE TIODMF«, t00=0x000d, t01=0x00d6}
0x1548…1552 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0100}
0x1552…1564 Head {h00=0x000e, h01=0x0050, text=»QCL EQU 0 «, t00=0x000d, t01=0x010a}
0x1564…1586 Head {h00=0x001e, h01=0x0050, text=»DMTAFU DATA DMCLOSE CLOSE «, t00=0x000d, t01=0x011c}
0x1586…1598 Head {h00=0x000e, h01=0x0050, text=»QRV EQU 2 «, t00=0x000d, t01=0x013e}
0x1598…15be Head {h00=0x0022, h01=0x0050, text=» DATA DMREVT READ VTOC RECORD «, t00=0x000d, t01=0x0150}
0x15be…15d0 Head {h00=0x000e, h01=0x0050, text=»QIRN EQU 4«, t00=0x000d, t01=0x0176}
0x15d0…15e6 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000d, t01=0x0188}
0x15e6…160c Head {h00=0x0022, h01=0x0050, text=» DATA DMIRN INDEXED READ NEXT «, t00=0x000e, t01=0x000e}
0x160c…161e Head {h00=0x000e, h01=0x0050, text=»QINS EQU 6«, t00=0x000e, t01=0x0034}
0x161e…1640 Head {h00=0x001e, h01=0x0050, text=» DATA DMINS INDEXED INSERT«, t00=0x000e, t01=0x0046}
0x1640…1652 Head {h00=0x000e, h01=0x0050, text=»QDEL EQU 8«, t00=0x000e, t01=0x0068}
0x1652…1674 Head {h00=0x001e, h01=0x0050, text=» DATA DMDEL INDEXED DELETE«, t00=0x000e, t01=0x007a}
0x1674…1688 Head {h00=0x0010, h01=0x0050, text=»QIRW EQU 10 «, t00=0x000e, t01=0x009c}
0x1688…16ac Head {h00=0x0020, h01=0x0050, text=» DATA DMIRW INDEXED REWRITE «, t00=0x000e, t01=0x00b0}
0x16ac…16d4 Head {h00=0x0024, h01=0x0050, text=» DATA DMIRR INDEXED RANDOM RESAD«, t00=0x000e, t01=0x00d4}
0x16d4…16e0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00fc}
0x16e0…16f4 Head {h00=0x0010, h01=0x0050, text=»QIRR EQU 12 «, t00=0x000e, t01=0x0108}
0x16f4…170a Head {h00=0x0012, h01=0x0050, text=» IFF INDXAC=1 «, t00=0x000e, t01=0x011c}
0x170a…173a Head {h00=0x002c, h01=0x0050, text=» DATA DMTERR,DMTERR,DMTERR,DMTERR,DMTERR«, t00=0x000e, t01=0x0132}
0x173a…1746 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0162}
0x1746…1758 Head {h00=0x000e, h01=0x0050, text=»QRD EQU 14«, t00=0x000e, t01=0x016e}
0x1758…177a Head {h00=0x001e, h01=0x0050, text=» DATA DMRDDE RANDOM DELETE«, t00=0x000e, t01=0x0180}
0x177a…178c Head {h00=0x000e, h01=0x0050, text=»QRW EQU 16«, t00=0x000f, t01=0x0012}
0x178c…17ae Head {h00=0x001e, h01=0x0050, text=» DATA DMRDWR RANDOM WRITE «, t00=0x000f, t01=0x0024}
0x17ae…17c0 Head {h00=0x000e, h01=0x0050, text=»QRR EQU 18«, t00=0x000f, t01=0x0046}
0x17c0…17e0 Head {h00=0x001c, h01=0x0050, text=» DATA DMRDRE RANDOM READ«, t00=0x000f, t01=0x0058}
0x17e0…17f4 Head {h00=0x0010, h01=0x0050, text=»QREA EQU 20 «, t00=0x000f, t01=0x0078}
0x17f4…1822 Head {h00=0x002a, h01=0x0050, text=» DATA DMTERR RELEASE EXCLUSIVE ACCESS «, t00=0x000f, t01=0x008c}
0x1822…1834 Head {h00=0x000e, h01=0x0050, text=»QSW EQU 22«, t00=0x000f, t01=0x00ba}
0x1834…185a Head {h00=0x0022, h01=0x0050, text=» DATA DMSQWR SEQUENTIAL WRITE «, t00=0x000f, t01=0x00cc}
0x185a…1888 Head {h00=0x002a, h01=0x0050, text=»SQR EQU 2 EXTERNAL ORDER CODE SEQ READ«, t00=0x000f, t01=0x00f2}
0x1888…189a Head {h00=0x000e, h01=0x0050, text=»QSR EQU 24«, t00=0x000f, t01=0x0120}
0x189a…18be Head {h00=0x0020, h01=0x0050, text=» DATA DMSQRE SEQUENTIAL READ«, t00=0x000f, t01=0x0132}
0x18be…18d2 Head {h00=0x0010, h01=0x0050, text=»QGCUR EQU 26«, t00=0x000f, t01=0x0156}
0x18d2…18f4 Head {h00=0x001e, h01=0x0050, text=» DATA DMTERR GET CURRENCY «, t00=0x000f, t01=0x016a}
0x18f4…190a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000f, t01=0x018c}
0x190a…191e Head {h00=0x0010, h01=0x0050, text=»QINIX EQU 28«, t00=0x0010, t01=0x0012}
0x191e…1940 Head {h00=0x001e, h01=0x0050, text=» DATA DMINIX INSERT INDEX «, t00=0x0010, t01=0x0026}
0x1940…1954 Head {h00=0x0010, h01=0x0050, text=»QDELX EQU 30«, t00=0x0010, t01=0x0048}
0x1954…1976 Head {h00=0x001e, h01=0x0050, text=» DATA DMDELX DELETE INDEX «, t00=0x0010, t01=0x005c}
0x1976…1982 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x007e}
0x1982…1998 Head {h00=0x0012, h01=0x0050, text=» IFF INDXAC=1 «, t00=0x0010, t01=0x008a}
0x1998…19b4 Head {h00=0x0018, h01=0x0050, text=» DATA DMTERR,DMTERR «, t00=0x0010, t01=0x00a0}
0x19b4…19c0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00bc}
0x19c0…19d6 Head {h00=0x0012, h01=0x0050, text=»QGCURX EQU 32 «, t00=0x0010, t01=0x00c8}
0x19d6…19fc Head {h00=0x0022, h01=0x0050, text=» DATA DMTERR GET CURRENT INDEX«, t00=0x0010, t01=0x00de}
0x19fc…1a10 Head {h00=0x0010, h01=0x0050, text=»QRWD EQU 34 «, t00=0x0010, t01=0x0104}
0x1a10…1a3a Head {h00=0x0026, h01=0x0050, text=» DATA DMRDWD DELAYED RANDOM WRITE «, t00=0x0010, t01=0x0118}
0x1a3a…1a4e Head {h00=0x0010, h01=0x0050, text=»QRDD EQU 36 «, t00=0x0010, t01=0x0142}
0x1a4e…1a78 Head {h00=0x0026, h01=0x0050, text=» DATA DMRDDD DELAYED RANDOM DELETE«, t00=0x0010, t01=0x0156}
0x1a78…1a8c Head {h00=0x0010, h01=0x0050, text=»QRRRB EQU 38«, t00=0x0010, t01=0x0180}
0x1a8c…1ab4 (17, 0, 400) Head {h00=0x0024, h01=0x0050, text=» DATA DMRRRB RAND READ REL BUFF «, t00=0x0011, t01=0x0004}
0x1ab4…1abe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x002c}
0x1abe…1ae6 Head {h00=0x0024, h01=0x0050, text=»VTOCRL DATA 0 VTOC RECORD LENGTH«, t00=0x0011, t01=0x0036}
0x1ae6…1af4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x005e}
0x1af4…1afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006c}
0x1afe…1b14 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0011, t01=0x0076}
0x1b14…1b2a Head {h00=0x0012, h01=0x0050, text=»* DMTFRL *«, t00=0x0011, t01=0x008c}
0x1b2a…1b40 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0011, t01=0x00a2}
0x1b40…1b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b8}
0x1b4a…1b7a Head {h00=0x002c, h01=0x0050, text=»* ENTRY DMTFRL FIND RECORD LENGTH «, t00=0x0011, t01=0x00c2}
0x1b7a…1b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f2}
0x1b84…1bbc Head {h00=0x0034, h01=0x0050, text=»* INPUT A1 = RETURN CODE IF INCORRECT LENGTH«, t00=0x0011, t01=0x00fc}
0x1bbc…1be0 Head {h00=0x0020, h01=0x0050, text=»* A6 = FDB ADDRESS«, t00=0x0011, t01=0x0134}
0x1be0…1c0a Head {h00=0x0026, h01=0x0050, text=»* A9 = USER ECB ADDRESS «, t00=0x0011, t01=0x0158}
0x1c0a…1c14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0182}
0x1c14…1c46 Head {h00=0x002e, h01=0x0050, text=»* OUTPUT A2 = RECORD LENGTH TO BE USED «, t00=0x0011, t01=0x018c}
0x1c46…1c86 Head {h00=0x003c, h01=0x0050, text=»* A1 IS ORED INTO ECBRC IF ECBRL < REC LENGTH «, t00=0x0012, t01=0x002e}
0x1c86…1cb0 Head {h00=0x0026, h01=0x0050, text=»* A2 IS STORED IN ECBEL «, t00=0x0012, t01=0x006e}
0x1cb0…1cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0098}
0x1cba…1cce Head {h00=0x0010, h01=0x0050, text=»DMTFRL EQU *«, t00=0x0012, t01=0x00a2}
0x1cce…1ce6 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A9 «, t00=0x0012, t01=0x00b6}
0x1ce6…1cfe Head {h00=0x0014, h01=0x0050, text=» CW A2,FDBRLE,A6«, t00=0x0012, t01=0x00ce}
0x1cfe…1d26 Head {h00=0x0024, h01=0x0050, text=» RF(E) DMTF20 ECBRL = REC LENGTH«, t00=0x0012, t01=0x00e6}
0x1d26…1d4e Head {h00=0x0024, h01=0x0050, text=» RF(L) DMTF10 ECBRL < REC LENGTH«, t00=0x0012, t01=0x010e}
0x1d4e…1d7a Head {h00=0x0028, h01=0x0050, text=» LD A2,FDBRLE,A6 ECBRL > REC LENGTH «, t00=0x0012, t01=0x0136}
0x1d7a…1d8c Head {h00=0x000e, h01=0x0050, text=» RF DMTF20«, t00=0x0012, t01=0x0162}
0x1d8c…1dba Head {h00=0x002a, h01=0x0050, text=»DMTF10 ORS A1,ECBRC,A9 SET RETURN CODE«, t00=0x0012, t01=0x0174}
0x1dba…1dec Head {h00=0x002e, h01=0x0050, text=»DMTF20 ST A2,ECBEL,A9 SET EFFECTIVE LENGTH«, t00=0x0013, t01=0x0012}
0x1dec…1dfc Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0013, t01=0x0044}
0x1dfc…1e0a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0054}
0x1e0a…1e14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0062}
0x1e14…1e28 Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0013, t01=0x006c}
0x1e28…1e3c Head {h00=0x0010, h01=0x0050, text=»* DMTWM *«, t00=0x0013, t01=0x0080}
0x1e3c…1e50 Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0013, t01=0x0094}
0x1e50…1e5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a8}
0x1e5a…1e80 Head {h00=0x0022, h01=0x0050, text=»* ENTRY DMTWM WORD MOVE «, t00=0x0013, t01=0x00b2}
0x1e80…1e8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d8}
0x1e8a…1eb0 Head {h00=0x0022, h01=0x0050, text=»* INPUT A1 = FROM ADDRESS «, t00=0x0013, t01=0x00e2}
0x1eb0…1ee0 Head {h00=0x002c, h01=0x0050, text=»* A2 = NO OF BYTES TO BE MOVED«, t00=0x0013, t01=0x0108}
0x1ee0…1f04 Head {h00=0x0020, h01=0x0050, text=»* A3 = TO ADDRESS «, t00=0x0013, t01=0x0138}
0x1f04…1f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x015c}
0x1f0e…1f36 Head {h00=0x0024, h01=0x0050, text=»* A4 WILL BE DESTROYED«, t00=0x0013, t01=0x0166}
0x1f36…1f40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x018e}
0x1f40…1f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0008}
0x1f4a…1f5e Head {h00=0x0010, h01=0x0050, text=»DMTWM EQU * «, t00=0x0014, t01=0x0012}
0x1f5e…1f70 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0014, t01=0x0026}
0x1f70…1f96 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMTW10 LAST WORD MOVED «, t00=0x0014, t01=0x0038}
0x1f96…1faa Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A1 «, t00=0x0014, t01=0x005e}
0x1faa…1fbc Head {h00=0x000e, h01=0x0050, text=» STR A4,A3«, t00=0x0014, t01=0x0072}
0x1fbc…1fce Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0014, t01=0x0084}
0x1fce…1fe0 Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0014, t01=0x0096}
0x1fe0…1ff2 Head {h00=0x000e, h01=0x0050, text=» RB DMTWM «, t00=0x0014, t01=0x00a8}
0x1ff2…200c Head {h00=0x0016, h01=0x0050, text=»DMTW10 ANK A2,/01 «, t00=0x0014, t01=0x00ba}
0x200c…2022 Head {h00=0x0012, h01=0x0050, text=» RF(E) DMTW20 «, t00=0x0014, t01=0x00d4}
0x2022…2044 Head {h00=0x001e, h01=0x0050, text=» LCR A4,A1 MOVE LAST CHAR «, t00=0x0014, t01=0x00ea}
0x2044…2056 Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0014, t01=0x010c}
0x2056…206c Head {h00=0x0012, h01=0x0050, text=»DMTW20 RTN A14«, t00=0x0014, t01=0x011e}
0x206c…207a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0134}
0x207a…2084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0142}
0x2084…209a Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0014, t01=0x014c}
0x209a…20b0 Head {h00=0x0012, h01=0x0050, text=»* DMTBM * «, t00=0x0014, t01=0x0162}
0x20b0…20c6 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0014, t01=0x0178}
0x20c6…20d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x018e}
0x20d0…20f6 Head {h00=0x0022, h01=0x0050, text=»* ENTRY DMTBM BYTE MOVE «, t00=0x0015, t01=0x0008}
0x20f6…2100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x002e}
0x2100…2126 Head {h00=0x0022, h01=0x0050, text=»* INPUT A1 = FROM ADDRESS «, t00=0x0015, t01=0x0038}
0x2126…2156 Head {h00=0x002c, h01=0x0050, text=»* A2 = NO OF BYTES TO BE MOVED«, t00=0x0015, t01=0x005e}
0x2156…217a Head {h00=0x0020, h01=0x0050, text=»* A3 = TO ADDRESS «, t00=0x0015, t01=0x008e}
0x217a…2184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00b2}
0x2184…21ac Head {h00=0x0024, h01=0x0050, text=»* A4 WILL BE DESTROYED«, t00=0x0015, t01=0x00bc}
0x21ac…21b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00e4}
0x21b6…21d8 Head {h00=0x001e, h01=0x0050, text=»* OUTPUT A3 = NEXT CHAR «, t00=0x0015, t01=0x00ee}
0x21d8…21e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0110}
0x21e2…21ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011a}
0x21ec…2200 Head {h00=0x0010, h01=0x0050, text=»DMTBM EQU * «, t00=0x0015, t01=0x0124}
0x2200…2212 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0015, t01=0x0138}
0x2212…2238 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMTB10 LAST BYTE MOVED «, t00=0x0015, t01=0x014a}
0x2238…224a Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0015, t01=0x0170}
0x224a…225c Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0015, t01=0x0182}
0x225c…226e (22, 0, 400) Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0016, t01=0x0004}
0x226e…2280 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0016, t01=0x0016}
0x2280…2292 Head {h00=0x000e, h01=0x0050, text=» RB DMTBM «, t00=0x0016, t01=0x0028}
0x2292…22a8 Head {h00=0x0012, h01=0x0050, text=»DMTB10 RTN A14«, t00=0x0016, t01=0x003a}
0x22a8…22b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0050}
0x22b2…22e8 Head {h00=0x0032, h01=0x0050, text=»* DMTBMR HAS THE SAME FUNCTION AS DMTBM BUT «, t00=0x0016, t01=0x005a}
0x22e8…2306 Head {h00=0x001a, h01=0x0050, text=»* MOVES FROM THE END«, t00=0x0016, t01=0x0090}
0x2306…2310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ae}
0x2310…2328 Head {h00=0x0014, h01=0x0050, text=»DMTBMR ADR A1,A2«, t00=0x0016, t01=0x00b8}
0x2328…233a Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0016, t01=0x00d0}
0x233a…2352 Head {h00=0x0014, h01=0x0050, text=»DMTB20 SUK A2,1 «, t00=0x0016, t01=0x00e2}
0x2352…2368 Head {h00=0x0012, h01=0x0050, text=» RB(N) DMTB10 «, t00=0x0016, t01=0x00fa}
0x2368…237a Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0016, t01=0x0110}
0x237a…238c Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0016, t01=0x0122}
0x238c…239e Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0016, t01=0x0134}
0x239e…23b0 Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0016, t01=0x0146}
0x23b0…23c2 Head {h00=0x000e, h01=0x0050, text=» RB DMTB20«, t00=0x0016, t01=0x0158}
0x23c2…23d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x016a}
0x23d0…240c Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x0016, t01=0x0178}
0x240c…2416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0024}
0x2416…2454 Head {h00=0x003a, h01=0x0050, text=»* FNDFDB WILL SEARCH TTAB AND SCTCDT FOR A FILE CODE«, t00=0x0017, t01=0x002e}
0x2454…245e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x006c}
0x245e…249a Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x0017, t01=0x0076}
0x249a…24a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b2}
0x24a4…24be Head {h00=0x0016, h01=0x0050, text=»* A1 = TTAB ADDR«, t00=0x0017, t01=0x00bc}
0x24be…24e6 Head {h00=0x0024, h01=0x0050, text=»* A2 = FILE CODE TO SEARCH FOR«, t00=0x0017, t01=0x00d6}
0x24e6…251e Head {h00=0x0034, h01=0x0050, text=»* A5 NOT= 0 WHEN ONLY TTAB SHALL BE SEARCHED «, t00=0x0017, t01=0x00fe}
0x251e…2528 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0136}
0x2528…2564 Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x0017, t01=0x0140}
0x2564…256e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x017c}
0x256e…2588 Head {h00=0x0016, h01=0x0050, text=»* A1 = UNCHANGED«, t00=0x0017, t01=0x0186}
0x2588…25be Head {h00=0x0032, h01=0x0050, text=»* A2 = FILE CODE. = 0 WHEN NO CODE IS FOUND «, t00=0x0018, t01=0x0010}
0x25be…25f8 Head {h00=0x0036, h01=0x0050, text=»* A4 = TTAB/SCTCDT ENTRY ADDR WHEN CODE IS FOUND«, t00=0x0018, t01=0x0046}
0x25f8…262e Head {h00=0x0032, h01=0x0050, text=»* A5 = 0 WHEN FOUND IN SCTCDT = 1 WHEN TTAB «, t00=0x0018, t01=0x0080}
0x262e…2638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00b6}
0x2638…2674 Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x0018, t01=0x00c0}
0x2674…267e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00fc}
0x267e…2690 Head {h00=0x000e, h01=0x0050, text=»* A1-A5 «, t00=0x0018, t01=0x0106}
0x2690…269a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0118}
0x269a…26d8 Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0018, t01=0x0122}
0x26d8…26e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0160}
0x26e2…2708 Head {h00=0x0022, h01=0x0050, text=»* LOOK FOR FILE CODE IN TTAB«, t00=0x0018, t01=0x016a}
0x2708…2712 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0190}
0x2712…2726 Head {h00=0x0010, h01=0x0050, text=»FNDFDB EQU *«, t00=0x0019, t01=0x000a}
0x2726…2750 Head {h00=0x0026, h01=0x0050, text=» LD A3,TTB:TD,A1 LENGTH DEV DESCR «, t00=0x0019, t01=0x001e}
0x2750…2764 Head {h00=0x0010, h01=0x0050, text=»FND030 EQU *«, t00=0x0019, t01=0x0048}
0x2764…2776 Head {h00=0x000e, h01=0x0050, text=» SUK A3,4 «, t00=0x0019, t01=0x005c}
0x2776…27a2 Head {h00=0x0028, h01=0x0050, text=» RF(NP) FND040 FILE CODE NOT IN TTAB«, t00=0x0019, t01=0x006e}
0x27a2…27b4 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0019, t01=0x009a}
0x27b4…27d0 Head {h00=0x0018, h01=0x0050, text=» ADKL A4,TTB:TD =1 «, t00=0x0019, t01=0x00ac}
0x27d0…27e2 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A3«, t00=0x0019, t01=0x00c8}
0x27e2…27fa Head {h00=0x0014, h01=0x0050, text=» CWR* A2,A4 =1 «, t00=0x0019, t01=0x00da}
0x27fa…2810 Head {h00=0x0012, h01=0x0050, text=» RB(NE) FND030«, t00=0x0019, t01=0x00f2}
0x2810…2820 Head {h00=0x000c, h01=0x0050, text=»* =1 «, t00=0x0019, t01=0x0108}
0x2820…2832 Head {h00=0x000e, h01=0x0050, text=» LDK A5,1 «, t00=0x0019, t01=0x0118}
0x2832…2858 Head {h00=0x0022, h01=0x0050, text=» RF FND080 CODE FOUND IN TTAB «, t00=0x0019, t01=0x012a}
0x2858…2862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0150}
0x2862…2888 Head {h00=0x0022, h01=0x0050, text=»* SEARCH FILE CODE IN SCTCDT«, t00=0x0019, t01=0x015a}
0x2888…2892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0180}
0x2892…28a6 Head {h00=0x0010, h01=0x0050, text=»FND040 EQU *«, t00=0x0019, t01=0x018a}
0x28a6…28b8 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x001a, t01=0x000e}
0x28b8…28e4 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) FND060 ONLY TTAB IS SEACHED «, t00=0x001a, t01=0x0020}
0x28e4…28fa Head {h00=0x0012, h01=0x0050, text=» LD* A4,SCTCDT«, t00=0x001a, t01=0x004c}
0x28fa…290e Head {h00=0x0010, h01=0x0050, text=»FND050 EQU *«, t00=0x001a, t01=0x0062}
0x290e…2920 Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x001a, t01=0x0076}
0x2920…294c Head {h00=0x0028, h01=0x0050, text=» RF(NP) FND060 CODE NOT FOUND AT ALL«, t00=0x001a, t01=0x0088}
0x294c…2962 Head {h00=0x0012, h01=0x0050, text=» LD A3,SCTCDT «, t00=0x001a, t01=0x00b4}
0x2962…2974 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A4«, t00=0x001a, t01=0x00ca}
0x2974…298c Head {h00=0x0014, h01=0x0050, text=» CWR* A2,A3 =1 «, t00=0x001a, t01=0x00dc}
0x298c…29a2 Head {h00=0x0012, h01=0x0050, text=» RB(NE) FND050«, t00=0x001a, t01=0x00f4}
0x29a2…29b8 Head {h00=0x0012, h01=0x0050, text=» AD A4,SCTCDT «, t00=0x001a, t01=0x010a}
0x29b8…29d6 Head {h00=0x001a, h01=0x0050, text=» RF FND080 CODE FOUND «, t00=0x001a, t01=0x0120}
0x29d6…29ea Head {h00=0x0010, h01=0x0050, text=»FND060 EQU *«, t00=0x001a, t01=0x013e}
0x29ea…2a04 Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 NO CODE «, t00=0x001a, t01=0x0152}
0x2a04…2a18 Head {h00=0x0010, h01=0x0050, text=»FND080 EQU *«, t00=0x001a, t01=0x016c}
0x2a18…2a28 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001a, t01=0x0180}
0x2a28…2a36 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0190}
0x2a36…2a40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x000e}
0x2a40…2a56 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x001b, t01=0x0018}
0x2a56…2a6c Head {h00=0x0012, h01=0x0050, text=»* DMTREM *«, t00=0x001b, t01=0x002e}
0x2a6c…2a82 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x001b, t01=0x0044}
0x2a82…2a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x005a}
0x2a8c…2ad4 Head {h00=0x0044, h01=0x0050, text=»* ENTRY DMTREM MOVE RECORD FROM BUFFER TO USER RECORD AREA«, t00=0x001b, t01=0x0064}
0x2ad4…2ade Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ac}
0x2ade…2b12 Head {h00=0x0030, h01=0x0050, text=»* INPUT RELATIVE REC OFFSET IN FDBRRO,A6«, t00=0x001b, t01=0x00b6}
0x2b12…2b3a Head {h00=0x0024, h01=0x0050, text=»* BUFFER ADDRESS IN A5«, t00=0x001b, t01=0x00ea}
0x2b3a…2b68 Head {h00=0x002a, h01=0x0050, text=»* USER REC AREA IN ECBBA,A9 «, t00=0x001b, t01=0x0112}
0x2b68…2b90 Head {h00=0x0024, h01=0x0050, text=»* RECORD LENGTH IN A2 «, t00=0x001b, t01=0x0140}
0x2b90…2b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0168}
0x2b9a…2ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0172}
0x2ba4…2bae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x017c}
0x2bae…2bca Head {h00=0x0018, h01=0x0050, text=»* MOVE THE RECORD «, t00=0x001b, t01=0x0186}
0x2bca…2c0c Head {h00=0x003e, h01=0x0050, text=»* IF (FROM) AND (TO) ADDRESSES BOTH EVEN THEN WORD MOVE «, t00=0x001c, t01=0x0012}
0x2c0c…2c52 Head {h00=0x0042, h01=0x0050, text=»* IF (FROM AND (TO) ADDRESSES BOTH ODD THEN MOVE FIRST BYTE «, t00=0x001c, t01=0x0054}
0x2c52…2c94 Head {h00=0x003e, h01=0x0050, text=»* WITH BYTE INSTRUCTIONS AND THE REST WITH WORD MOVE «, t00=0x001c, t01=0x009a}
0x2c94…2cd2 Head {h00=0x003a, h01=0x0050, text=»* ELSE USE BYTE MOVE INSTRUCTIONS FOR THE WHOLE REC «, t00=0x001c, t01=0x00dc}
0x2cd2…2cdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x011a}
0x2cdc…2cf0 Head {h00=0x0010, h01=0x0050, text=»DMTREM EQU *«, t00=0x001c, t01=0x0124}
0x2cf0…2d08 Head {h00=0x0014, h01=0x0050, text=» LD A1,FDBRRO,A6«, t00=0x001c, t01=0x0138}
0x2d08…2d28 Head {h00=0x001c, h01=0x0050, text=» ADR A1,A5 FROM ADDRESS «, t00=0x001c, t01=0x0150}
0x2d28…2d32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0170}
0x2d32…2d48 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001c, t01=0x017a}
0x2d48…2d5a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x001c, t01=0x0190}
0x2d5a…2d7c Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBBA,A9 TO ADDRESS«, t00=0x001d, t01=0x0012}
0x2d7c…2d8e Head {h00=0x000e, h01=0x0050, text=» XRR A4,A3«, t00=0x001d, t01=0x0034}
0x2d8e…2da2 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x001d, t01=0x0046}
0x2da2…2dce Head {h00=0x0028, h01=0x0050, text=» RF(Z) DMT210 BOTH ODD OR BOTH EVEN «, t00=0x001d, t01=0x005a}
0x2dce…2df8 Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTBM ONE ODD AND ONE EVEN«, t00=0x001d, t01=0x0086}
0x2df8…2e0a Head {h00=0x000e, h01=0x0050, text=» RF DMT225«, t00=0x001d, t01=0x00b0}
0x2e0a…2e14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c2}
0x2e14…2e2c Head {h00=0x0014, h01=0x0050, text=»DMT210 LDR A4,A1«, t00=0x001d, t01=0x00cc}
0x2e2c…2e40 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x001d, t01=0x00e4}
0x2e40…2e60 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT220 BOTH EVEN «, t00=0x001d, t01=0x00f8}
0x2e60…2e7a Head {h00=0x0016, h01=0x0050, text=» SUK A2,1 BOTH ODD«, t00=0x001d, t01=0x0118}
0x2e7a…2e8c Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x001d, t01=0x0132}
0x2e8c…2e9e Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x001d, t01=0x0144}
0x2e9e…2eb0 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x001d, t01=0x0156}
0x2eb0…2ec2 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x001d, t01=0x0168}
0x2ec2…2ee8 Head {h00=0x0022, h01=0x0050, text=»DMT220 CF A14,DMTWM WORD MOVE «, t00=0x001d, t01=0x017a}
0x2ee8…2efc Head {h00=0x0010, h01=0x0050, text=»DMT225 EQU *«, t00=0x001e, t01=0x0010}
0x2efc…2f08 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0024}
0x2f08…2f12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0030}
0x2f12…2f28 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x003a}
0x2f28…2f52 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTDM,A6 GET TTAB ADDRESS «, t00=0x001e, t01=0x0050}
0x2f52…2f7a Head {h00=0x0024, h01=0x0050, text=» LC A3,TTB:ID,A4 ID CALLING TASK«, t00=0x001e, t01=0x007a}
0x2f7a…2f8e Head {h00=0x0010, h01=0x0050, text=» CCK A3,'##'«, t00=0x001e, t01=0x00a2}
0x2f8e…2fb0 Head {h00=0x001e, h01=0x0050, text=» RF(NE) DMTREN NOT DMTASK «, t00=0x001e, t01=0x00b6}
0x2fb0…2fc4 Head {h00=0x0010, h01=0x0050, text=» LDK A3,QRR «, t00=0x001e, t01=0x00d8}
0x2fc4…2fde Head {h00=0x0016, h01=0x0050, text=» CC A3,DWTOR+1,A6 «, t00=0x001e, t01=0x00ec}
0x2fde…3004 Head {h00=0x0022, h01=0x0050, text=» RF(NE) DMTREQ NOT RANDOM READ«, t00=0x001e, t01=0x0106}
0x3004…302e Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTWAT,A6 PAR BLOCK ADDRESS«, t00=0x001e, t01=0x012c}
0x302e…3056 Head {h00=0x0024, h01=0x0050, text=» LD A4,4,A4 FDB ADDR INDEX FILE «, t00=0x001e, t01=0x0156}
0x3056…3078 Head {h00=0x001e, h01=0x0050, text=» LD A4,DWTTDM,A4 USER TTAB«, t00=0x001e, t01=0x017e}
0x3078…308c Head {h00=0x0010, h01=0x0050, text=»DMTREN EQU *«, t00=0x001f, t01=0x0010}
0x308c…3098 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001f, t01=0x0024}
0x3098…30c0 Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A4 LOAD MMU REGISTERS«, t00=0x001f, t01=0x0030}
0x30c0…30d4 Head {h00=0x0010, h01=0x0050, text=»DMTREP EQU *«, t00=0x001f, t01=0x0058}
0x30d4…30fc Head {h00=0x0024, h01=0x0050, text=» LD A4,PRUN GET DM TTAB ADDRESS «, t00=0x001f, t01=0x006c}
0x30fc…3130 Head {h00=0x0030, h01=0x0050, text=» TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE«, t00=0x001f, t01=0x0094}
0x3130…313c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x001f, t01=0x00c8}
0x313c…315a Head {h00=0x001a, h01=0x0050, text=» LDR A3,A2 GET LENGTH «, t00=0x001f, t01=0x00d4}
0x315a…318e Head {h00=0x0030, h01=0x0050, text=» LD A2,ECBBA,A9 GET RECEIVING BUFFER ADDRESS«, t00=0x001f, t01=0x00f2}
0x318e…31ca Head {h00=0x0038, h01=0x0050, text=» CF A14,MOV:SU MOVE RECORD FROM SYSTEM TO USER AREA «, t00=0x001f, t01=0x0126}
0x31ca…31d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0162}
0x31d6…31e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x016e}
0x31e0…31f0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001f, t01=0x0178}
0x31f0…3206 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001f, t01=0x0188}
0x3206…3218 Head {h00=0x000e, h01=0x0050, text=»DMTREQ INH«, t00=0x0020, t01=0x000e}
0x3218…3236 Head {h00=0x001a, h01=0x0050, text=» TL MONMMU SYSTEM MMU «, t00=0x0020, t01=0x0020}
0x3236…3248 Head {h00=0x000e, h01=0x0050, text=» RB DMTREP«, t00=0x0020, t01=0x003e}
0x3248…3254 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0050}
0x3254…3262 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x005c}
0x3262…326c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x006a}
0x326c…3288 Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0020, t01=0x0074}
0x3288…3292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0090}
0x3292…32a6 Head {h00=0x0010, h01=0x0050, text=»GETA14 EQU *«, t00=0x0020, t01=0x009a}
0x32a6…32ce Head {h00=0x0024, h01=0x0050, text=» LD A14,PRUN GET DM TTAB ADDRESS«, t00=0x0020, t01=0x00ae}
0x32ce…32fc Head {h00=0x002a, h01=0x0050, text=» AD A14,TTB:TD,A14 LENGTH DEVICE DESCR«, t00=0x0020, t01=0x00d6}
0x32fc…331e Head {h00=0x001e, h01=0x0050, text=» ADKL A14,TTB:TD+32 STACK «, t00=0x0020, t01=0x0104}
0x331e…3340 Head {h00=0x001e, h01=0x0050, text=» RTN A15 RETURN AND ENABLE«, t00=0x0020, t01=0x0126}
0x3340…334a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0148}
0x334a…3358 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x0152}
0x3358…3362 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0160}
0x3362…3378 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0020, t01=0x016a}
0x3378…338e Head {h00=0x0012, h01=0x0050, text=»* DMTASK *«, t00=0x0020, t01=0x0180}
0x338e…33a4 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0021, t01=0x0008}
0x33a4…33ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x001e}
0x33ae…33b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0028}
0x33b8…33cc Head {h00=0x0010, h01=0x0050, text=»DMTASK EQU *«, t00=0x0021, t01=0x0032}
0x33cc…33d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0046}
0x33d6…33f2 Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0021, t01=0x0050}
0x33f2…33fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x006c}
0x33fc…3412 Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x0021, t01=0x0076}
0x3412…342e Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0021, t01=0x008c}
0x342e…3442 Head {h00=0x0010, h01=0x0050, text=» LDKL A5,-1 «, t00=0x0021, t01=0x00a8}
0x3442…3470 Head {h00=0x002a, h01=0x0050, text=» CW A5,FDBRRO,A6 SPECIAL PARAMETER -1 «, t00=0x0021, t01=0x00bc}
0x3470…34a6 Head {h00=0x0032, h01=0x0050, text=» RF(E) DMT090 FOR ORDERS XR,DX,IX (SEE TIODM)«, t00=0x0021, t01=0x00ea}
0x34a6…34ba Head {h00=0x0010, h01=0x0050, text=»DMT020 EQU *«, t00=0x0021, t01=0x0120}
0x34ba…34d2 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBDBR,A1«, t00=0x0021, t01=0x0134}
0x34d2…34f2 Head {h00=0x001c, h01=0x0050, text=» RF(NN) DMT025 NO DELAY «, t00=0x0021, t01=0x014c}
0x34f2…3508 Head {h00=0x0012, h01=0x0050, text=» ANKL A4,/C0FF«, t00=0x0021, t01=0x016c}
0x3508…3520 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTOR,A1 «, t00=0x0021, t01=0x0182}
0x3520…3534 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/3F «, t00=0x0022, t01=0x000a}
0x3534…3548 Head {h00=0x0010, h01=0x0050, text=» CWK A2,QCL «, t00=0x0022, t01=0x001e}
0x3548…3564 Head {h00=0x0018, h01=0x0050, text=» RF(E) DMT024 CLOSE «, t00=0x0022, t01=0x0032}
0x3564…3578 Head {h00=0x0010, h01=0x0050, text=» CWK A2,QRV «, t00=0x0022, t01=0x004e}
0x3578…3598 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT024 READ VTOC «, t00=0x0022, t01=0x0062}
0x3598…35ae Head {h00=0x0012, h01=0x0050, text=» SUK A2,QRRRB «, t00=0x0022, t01=0x0082}
0x35ae…35d8 Head {h00=0x0026, h01=0x0050, text=» RF(E) DMT024 RAND READ REL BUFFER«, t00=0x0022, t01=0x0098}
0x35d8…35ee Head {h00=0x0012, h01=0x0050, text=» ORKL A4,/100 «, t00=0x0022, t01=0x00c2}
0x35ee…3602 Head {h00=0x0010, h01=0x0050, text=»DMT024 EQU *«, t00=0x0022, t01=0x00d8}
0x3602…361a Head {h00=0x0014, h01=0x0050, text=» ST A4,FDBDBR,A1«, t00=0x0022, t01=0x00ec}
0x361a…362e Head {h00=0x0010, h01=0x0050, text=»DMT025 EQU *«, t00=0x0022, t01=0x0104}
0x362e…3640 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0022, t01=0x0118}
0x3640…3660 Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0022, t01=0x012a}
0x3660…3688 Head {h00=0x0024, h01=0x0050, text=» CF A14,GTBKBU GET BLOCK BUFFER «, t00=0x0022, t01=0x014a}
0x3688…369a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0022, t01=0x0172}
0x369a…36c2 Head {h00=0x0024, h01=0x0050, text=» RF(NN) DMT080 BUFFER WAS BEFORE«, t00=0x0022, t01=0x0184}
0x36c2…36cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x001c}
0x36cc…36f8 Head {h00=0x0028, h01=0x0050, text=»* READ SECTOR INTO BUFFER AND EXIT«, t00=0x0023, t01=0x0026}
0x36f8…3702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0052}
0x3702…3716 Head {h00=0x0010, h01=0x0050, text=» SUK A5,QCL «, t00=0x0023, t01=0x005c}
0x3716…3732 Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMT030 CLOSE «, t00=0x0023, t01=0x0070}
0x3732…3754 Head {h00=0x001e, h01=0x0050, text=» LDK A7,/11 PHYSICAL READ «, t00=0x0023, t01=0x008c}
0x3754…3760 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0023, t01=0x00ae}
0x3760…3784 Head {h00=0x0020, h01=0x0050, text=» DATA -1 I/O AND ACTIVATION «, t00=0x0023, t01=0x00ba}
0x3784…37aa Head {h00=0x0022, h01=0x0050, text=» DATA DMTAR1 DMTASK RESTART #1«, t00=0x0023, t01=0x00de}
0x37aa…37b6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0023, t01=0x0104}
0x37b6…37ca Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x0023, t01=0x0110}
0x37ca…37d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0124}
0x37d4…3800 Head {h00=0x0028, h01=0x0050, text=»DMT030 EQU * I/O WITH WAIT FOR CLOSE«, t00=0x0023, t01=0x012e}
0x3800…3814 Head {h00=0x0010, h01=0x0050, text=» LDK A7,/91 «, t00=0x0023, t01=0x015a}
0x3814…3820 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0023, t01=0x016e}
0x3820…3830 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0023, t01=0x017a}
0x3830…3856 Head {h00=0x0022, h01=0x0050, text=» RF DMT050 CHECK RETURN CODES «, t00=0x0023, t01=0x018a}
0x3856…3864 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0020}
0x3864…387a Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0024, t01=0x002e}
0x387a…3890 Head {h00=0x0012, h01=0x0050, text=»* DMTAR1 *«, t00=0x0024, t01=0x0044}
0x3890…38a6 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0024, t01=0x005a}
0x38a6…38ca Head {h00=0x0020, h01=0x0050, text=»* RESTART POINT AFTER READ«, t00=0x0024, t01=0x0070}
0x38ca…38d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0094}
0x38d4…38e8 Head {h00=0x0010, h01=0x0050, text=»DMTAR1 EQU *«, t00=0x0024, t01=0x009e}
0x38e8…38f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b2}
0x38f2…390e Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0024, t01=0x00bc}
0x390e…3918 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d8}
0x3918…392e Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x0024, t01=0x00e2}
0x392e…3942 Head {h00=0x0010, h01=0x0050, text=»DMT050 EQU *«, t00=0x0024, t01=0x00f8}
0x3942…397a Head {h00=0x0034, h01=0x0050, text=» CF A14,DMTIOT CHECK RETURN CODES FROM DISC I/O «, t00=0x0024, t01=0x010c}
0x397a…398c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0024, t01=0x0144}
0x398c…39a4 Head {h00=0x0014, h01=0x0050, text=» ABL(NE) DMTERR «, t00=0x0024, t01=0x0156}
0x39a4…39bc Head {h00=0x0014, h01=0x0050, text=» LD A5,ECBBA,A8 «, t00=0x0024, t01=0x016e}
0x39bc…39ce Head {h00=0x000e, h01=0x0050, text=» RF DMT090«, t00=0x0024, t01=0x0186}
0x39ce…3a02 Head {h00=0x0030, h01=0x0050, text=»DMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER«, t00=0x0025, t01=0x0008}
0x3a02…3a14 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x0025, t01=0x003c}
0x3a14…3a38 Head {h00=0x0020, h01=0x0050, text=» ADK A5,8 SKIP BUFFER HEADER«, t00=0x0025, t01=0x004e}
0x3a38…3a66 Head {h00=0x002a, h01=0x0050, text=» ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB«, t00=0x0025, t01=0x0072}
0x3a66…3a7a Head {h00=0x0010, h01=0x0050, text=»DMT090 EQU *«, t00=0x0025, t01=0x00a0}
0x3a7a…3a84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00b4}
0x3a84…3abc Head {h00=0x0034, h01=0x0050, text=»* HANDLE ACTUAL ORDER ORDER INDEX IN DWTOR«, t00=0x0025, t01=0x00be}
0x3abc…3ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f6}
0x3ac6…3ae8 Head {h00=0x001e, h01=0x0050, text=» ADK A5,2 SKIP CYLID WORD «, t00=0x0025, t01=0x0100}
0x3ae8…3b00 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0025, t01=0x0122}
0x3b00…3b24 Head {h00=0x0020, h01=0x0050, text=»* A7 = INTERNAL ORDER CODE«, t00=0x0025, t01=0x013a}
0x3b24…3b38 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x0025, t01=0x015e}
0x3b38…3b64 Head {h00=0x0028, h01=0x0050, text=» ABI DMTAFU,A7 DMTASK FUNCTION TABLE«, t00=0x0025, t01=0x0172}
0x3b64…3b72 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x000e}
0x3b72…3b9a Head {h00=0x0024, h01=0x0050, text=»DMRRRB EQU * RAND READ REL BUFF «, t00=0x0026, t01=0x001c}
0x3b9a…3ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0044}
0x3ba4…3bc8 Head {h00=0x0020, h01=0x0050, text=»DMSQRE EQU * SEQUENTIAL READ«, t00=0x0026, t01=0x004e}
0x3bc8…3bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0072}
0x3bd2…3bf2 Head {h00=0x001c, h01=0x0050, text=»DMRDRE EQU * RANDOM READ«, t00=0x0026, t01=0x007c}
0x3bf2…3bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x009c}
0x3bfc…3c34 Head {h00=0x0034, h01=0x0050, text=»* CHECK STATUS IF NOT USED THEN ERROR RETURN«, t00=0x0026, t01=0x00a6}
0x3c34…3c3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00de}
0x3c3e…3c56 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBRRO,A6«, t00=0x0026, t01=0x00e8}
0x3c56…3c6e Head {h00=0x0014, h01=0x0050, text=» AD A2,FDBRLE,A6«, t00=0x0026, t01=0x0100}
0x3c6e…3c80 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x0026, t01=0x0118}
0x3c80…3c92 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0026, t01=0x012a}
0x3c92…3cb6 Head {h00=0x0020, h01=0x0050, text=» CCR A1,A2 STATUS BYTE IN A1«, t00=0x0026, t01=0x013c}
0x3cb6…3cd2 Head {h00=0x0018, h01=0x0050, text=» RF(NE) DMT200 USED «, t00=0x0026, t01=0x0160}
0x3cd2…3cf0 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/800 NO DATA «, t00=0x0026, t01=0x017c}
0x3cf0…3d04 Head {h00=0x0010, h01=0x0050, text=» ABL DMTERR «, t00=0x0027, t01=0x000a}
0x3d04…3d2e Head {h00=0x0026, h01=0x0050, text=»DMT200 LDK A1,/8 INCORRECT LENGTH «, t00=0x0027, t01=0x001e}
0x3d2e…3d58 Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTFRL A2 := RECORD LENGTH«, t00=0x0027, t01=0x0048}
0x3d58…3d62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0072}
0x3d62…3d7e Head {h00=0x0018, h01=0x0050, text=»* MOVE THE RECORD «, t00=0x0027, t01=0x007c}
0x3d7e…3d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0098}
0x3d88…3d9e Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTREM«, t00=0x0027, t01=0x00a2}
0x3d9e…3da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b8}
0x3da8…3ddc Head {h00=0x0030, h01=0x0050, text=»* UPDATE CRN AND SET EXCLUSIVE ACCESS BIT «, t00=0x0027, t01=0x00c2}
0x3ddc…3de6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00f6}
0x3de6…3dfa Head {h00=0x0010, h01=0x0050, text=»DMT230 EQU *«, t00=0x0027, t01=0x0100}
0x3dfa…3e1c Head {h00=0x001e, h01=0x0050, text=» ABL DMT400 PUT CRN AND EA«, t00=0x0027, t01=0x0114}
0x3e1c…3e2a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0136}
0x3e2a…3e50 Head {h00=0x0022, h01=0x0050, text=»DMREVT EQU * READ VTOC RECORD «, t00=0x0027, t01=0x0144}
0x3e50…3e5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x016a}
0x3e5a…3e7c Head {h00=0x001e, h01=0x0050, text=»DMCLOSE EQU * CLOSE A FILE«, t00=0x0027, t01=0x0174}
0x3e7c…3e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0008}
0x3e86…3e9e Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBSNR,A6«, t00=0x0028, t01=0x0012}
0x3e9e…3eca Head {h00=0x0028, h01=0x0050, text=» RF(NZ) DMT270 VTOC SECTOR IN BUFFER«, t00=0x0028, t01=0x002a}
0x3eca…3ed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0056}
0x3ed4…3ef6 Head {h00=0x001e, h01=0x0050, text=»* VOLUME LABEL IN BUFFER«, t00=0x0028, t01=0x0060}
0x3ef6…3f42 Head {h00=0x0048, h01=0x0050, text=»* FIND VTOC SECTOR NUMBER AND RELATIVE RECORD OFFSET WITHIN SECTOR«, t00=0x0028, t01=0x0082}
0x3f42…3f7e Head {h00=0x0038, h01=0x0050, text=»* FOR VTOC RECORD AND READ THIS SECTOR INTO BUFFER«, t00=0x0028, t01=0x00ce}
0x3f7e…3f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x010a}
0x3f88…3faa Head {h00=0x001e, h01=0x0050, text=» LDR A10,A6 SAVE FDB ADDR «, t00=0x0028, t01=0x0114}
0x3faa…3fca Head {h00=0x001c, h01=0x0050, text=» LDR A9,A8 SAVE ECB ADDR«, t00=0x0028, t01=0x0136}
0x3fca…3fe4 Head {h00=0x0016, h01=0x0050, text=» LD A3,VLVRL-2,A5 «, t00=0x0028, t01=0x0156}
0x3fe4…3ffa Head {h00=0x0012, h01=0x0050, text=» ST A3,VTOCRL «, t00=0x0028, t01=0x0170}
0x3ffa…4026 Head {h00=0x0028, h01=0x0050, text=» LDK A6,VTOBLK VTOC BLOCKING FACTIOR«, t00=0x0028, t01=0x0186}
0x4026…4052 Head {h00=0x0028, h01=0x0050, text=» LD A2,FDBVTO,A10 VTOC RECORD NUMBER«, t00=0x0029, t01=0x0022}
0x4052…4064 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0029, t01=0x004e}
0x4064…4094 Head {h00=0x002c, h01=0x0050, text=» CF A14,DIVMOD A2=A1,A2/A6.A1=REMAINDRER«, t00=0x0029, t01=0x0060}
0x4094…40b0 Head {h00=0x0018, h01=0x0050, text=» LDR A3,A2 QUOTIENT «, t00=0x0029, t01=0x0090}
0x40b0…40cc Head {h00=0x0018, h01=0x0050, text=» LDR A6,A10 FDB ADDR«, t00=0x0029, t01=0x00ac}
0x40cc…40e4 Head {h00=0x0014, h01=0x0050, text=» LDR A2,A1 REST «, t00=0x0029, t01=0x00c8}
0x40e4…4102 Head {h00=0x001a, h01=0x0050, text=» RF(Z) DMT240 REST = 0«, t00=0x0029, t01=0x00e0}
0x4102…412a Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 RECORD IN NEXT SECTOR «, t00=0x0029, t01=0x00fe}
0x412a…413c Head {h00=0x000e, h01=0x0050, text=» RF DMT250«, t00=0x0029, t01=0x0126}
0x413c…416e Head {h00=0x002e, h01=0x0050, text=»DMT240 LDK A2,VTOBLK LAST RECORD IN SECTOR«, t00=0x0029, t01=0x0138}
0x416e…4198 Head {h00=0x0026, h01=0x0050, text=»DMT250 AD A3,VLVBA-2,A5 VTOC BASE «, t00=0x0029, t01=0x016a}
0x4198…41b0 (42, 0, 400) Head {h00=0x0014, h01=0x0050, text=» ST A3,FDBSNR,A6«, t00=0x002a, t01=0x0004}
0x41b0…41c2 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002a, t01=0x001c}
0x41c2…41da Head {h00=0x0014, h01=0x0050, text=»DMT255 SUK A2,1 «, t00=0x002a, t01=0x002e}
0x41da…41f0 Head {h00=0x0012, h01=0x0050, text=» RF(Z) DMT260 «, t00=0x002a, t01=0x0046}
0x41f0…420a Head {h00=0x0016, h01=0x0050, text=» AD A3,VLVRL-2,A5 «, t00=0x002a, t01=0x005c}
0x420a…422c Head {h00=0x001e, h01=0x0050, text=» ADK A3,1 SKIP STATUS BYTE«, t00=0x002a, t01=0x0076}
0x422c…423e Head {h00=0x000e, h01=0x0050, text=» RB DMT255«, t00=0x002a, t01=0x0098}
0x423e…425c Head {h00=0x001a, h01=0x0050, text=»DMT260 ST A3,FDBRRO,A6«, t00=0x002a, t01=0x00aa}
0x425c…4266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00c8}
0x4266…4280 Head {h00=0x0016, h01=0x0050, text=»* RELEASE BUFFER«, t00=0x002a, t01=0x00d2}
0x4280…428a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ec}
0x428a…42a2 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A9 «, t00=0x002a, t01=0x00f6}
0x42a2…42b4 Head {h00=0x000e, h01=0x0050, text=» SUK A3,8 «, t00=0x002a, t01=0x010e}
0x42b4…42da Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x002a, t01=0x0120}
0x42da…4304 Head {h00=0x0026, h01=0x0050, text=» CF A14,CLRBUF CLEAR FREE BUFFERS «, t00=0x002a, t01=0x0146}
0x4304…4316 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x002a, t01=0x0170}
0x4316…4332 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x002a, t01=0x0182}
0x4332…4356 Head {h00=0x0020, h01=0x0050, text=» RB DMT020 READ VTOC SECTOR «, t00=0x002b, t01=0x000e}
0x4356…4364 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0032}
0x4364…4378 Head {h00=0x0010, h01=0x0050, text=»DMT270 EQU *«, t00=0x002b, t01=0x0040}
0x4378…438c Head {h00=0x0010, h01=0x0050, text=» SUK A7,QRV «, t00=0x002b, t01=0x0054}
0x438c…43b4 Head {h00=0x0024, h01=0x0050, text=» ABL(Z) DMT500 READ VTOC RECORD «, t00=0x002b, t01=0x0068}
0x43b4…43ca Head {h00=0x0012, h01=0x0050, text=»* CLOSE FILE«, t00=0x002b, t01=0x0090}
0x43ca…43f4 Head {h00=0x0026, h01=0x0050, text=»* UPDATE VTOC LAST RECORD NUMBER«, t00=0x002b, t01=0x00a6}
0x43f4…441e Head {h00=0x0026, h01=0x0050, text=»* AND WRITE SECTOR BACK ON DISC «, t00=0x002b, t01=0x00d0}
0x441e…4436 Head {h00=0x0014, h01=0x0050, text=» AD A5,FDBRRO,A6«, t00=0x002b, t01=0x00fa}
0x4436…4448 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x002b, t01=0x0112}
0x4448…4460 Head {h00=0x0014, h01=0x0050, text=» LC A2,FDBLRN,A6«, t00=0x002b, t01=0x0124}
0x4460…4478 Head {h00=0x0014, h01=0x0050, text=» SC A2,VTLRN,A5 «, t00=0x002b, t01=0x013c}
0x4478…4492 Head {h00=0x0016, h01=0x0050, text=» LD A2,FDBLRN+1,A6«, t00=0x002b, t01=0x0154}
0x4492…44ac Head {h00=0x0016, h01=0x0050, text=» ST A2,VTLRN+1,A5 «, t00=0x002b, t01=0x016e}
0x44ac…44ce Head {h00=0x001e, h01=0x0050, text=»* CLOSE FILE. WRITE VTOC«, t00=0x002b, t01=0x0188}
0x44ce…44d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x001a}
0x44d8…44ec Head {h00=0x0010, h01=0x0050, text=» LDK A7,/95 «, t00=0x002c, t01=0x0024}
0x44ec…44f8 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002c, t01=0x0038}
0x44f8…4508 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x002c, t01=0x0044}
0x4508…4512 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0054}
0x4512…4536 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A6 FDBADDRESS IN A1 «, t00=0x002c, t01=0x005e}
0x4536…4560 Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTIOT CHECK RETURN CODES «, t00=0x002c, t01=0x0082}
0x4560…4572 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x002c, t01=0x00ac}
0x4572…458e Head {h00=0x0018, h01=0x0050, text=» RF(NZ) DMT724 ERROR«, t00=0x002c, t01=0x00be}
0x458e…45a2 Head {h00=0x0010, h01=0x0050, text=»DMT720 EQU *«, t00=0x002c, t01=0x00da}
0x45a2…45c4 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTTDM,A6 TTAB ADDR«, t00=0x002c, t01=0x00ee}
0x45c4…45da Head {h00=0x0012, h01=0x0050, text=»* =1 START «, t00=0x002c, t01=0x0110}
0x45da…4604 Head {h00=0x0026, h01=0x0050, text=» LD A2,FDBMIA,A6 MASTER INDEX ADDR«, t00=0x002c, t01=0x0126}
0x4604…4624 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DMT721 DATA FILE «, t00=0x002c, t01=0x0150}
0x4624…463a Head {h00=0x0012, h01=0x0050, text=» LDK A2,/FF -1«, t00=0x002c, t01=0x0170}
0x463a…4658 Head {h00=0x001a, h01=0x0050, text=»DMT721 ADK A2,1 0 OR 1«, t00=0x002c, t01=0x0186}
0x4658…4672 Head {h00=0x0016, h01=0x0050, text=» ECR A2,A2 =1 END«, t00=0x002d, t01=0x0014}
0x4672…4694 Head {h00=0x001e, h01=0x0050, text=» LC A2,ECBFC,A9 FILE CODE «, t00=0x002d, t01=0x002e}
0x4694…46ba Head {h00=0x0022, h01=0x0050, text=» LDK A5,0 TRY LOCAL AND GLOBAL«, t00=0x002d, t01=0x0050}
0x46ba…46ec Head {h00=0x002e, h01=0x0050, text=» CF A14,FNDFDB GET ENTRY IN TTAB CDTADTAB «, t00=0x002d, t01=0x0076}
0x46ec…4716 Head {h00=0x0026, h01=0x0050, text=» LDR A13,A5 LOCAL/GLOBAL INDICATOR«, t00=0x002d, t01=0x00a8}
0x4716…4728 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x002d, t01=0x00d2}
0x4728…4748 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) DMT725 FC FOUND «, t00=0x002d, t01=0x00e4}
0x4748…4766 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/8000 REQ ERR«, t00=0x002d, t01=0x0104}
0x4766…4780 Head {h00=0x0016, h01=0x0050, text=»DMT724 ABL DMTERR «, t00=0x002d, t01=0x0122}
0x4780…4794 Head {h00=0x0010, h01=0x0050, text=»DMT725 EQU *«, t00=0x002d, t01=0x013c}
0x4794…47b4 Head {h00=0x001c, h01=0x0050, text=» LD A5,2,A4 FDB ADDRESS «, t00=0x002d, t01=0x0150}
0x47b4…47de Head {h00=0x0026, h01=0x0050, text=» LDR A11,A4 SAVE TABLE ENTRY ADDR «, t00=0x002d, t01=0x0170}
0x47de…4802 Head {h00=0x0020, h01=0x0050, text=» LDR A12,A1 SAVE TTEAB ADDR «, t00=0x002e, t01=0x000a}
0x4802…483a Head {h00=0x0034, h01=0x0050, text=» SUR A10,A10 MARK THAT FDB NOT SHALL BE RELEASED«, t00=0x002e, t01=0x002e}
0x483a…4848 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0066}
0x4848…487c Head {h00=0x0030, h01=0x0050, text=»* CHECK IF THIS FDB ADDR IS USED ELEWHERE «, t00=0x002e, t01=0x0074}
0x487c…4886 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00a8}
0x4886…48a2 Head {h00=0x0018, h01=0x0050, text=»* SEARCH ALL TTABS«, t00=0x002e, t01=0x00b2}
0x48a2…48ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00ce}
0x48ac…48c2 Head {h00=0x0012, h01=0x0050, text=» LD* A2,SCTTCT«, t00=0x002e, t01=0x00d8}
0x48c2…48d6 Head {h00=0x0010, h01=0x0050, text=»DMT730 EQU *«, t00=0x002e, t01=0x00ee}
0x48d6…48e8 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x002e, t01=0x0102}
0x48e8…4914 Head {h00=0x0028, h01=0x0050, text=» RF(NP) DMT780 NOT FOUND IN ANY TTAB«, t00=0x002e, t01=0x0114}
0x4914…492a Head {h00=0x0012, h01=0x0050, text=» LD A3,SCTTCT «, t00=0x002e, t01=0x0140}
0x492a…493c Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x002e, t01=0x0156}
0x493c…4950 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A3 «, t00=0x002e, t01=0x0168}
0x4950…4970 Head {h00=0x001c, h01=0x0050, text=» LC A3,TTB:ID,A1 TASK ID«, t00=0x002e, t01=0x017c}
0x4970…4984 Head {h00=0x0010, h01=0x0050, text=» CCK A3,'##'«, t00=0x002f, t01=0x000c}
0x4984…49ae Head {h00=0x0026, h01=0x0050, text=» RB(E) DMT730 JUMP IF MONITOR TASK«, t00=0x002f, t01=0x0020}
0x49ae…49c6 Head {h00=0x0014, h01=0x0050, text=» LD A3,TTB:TD,A1«, t00=0x002f, t01=0x004a}
0x49c6…49f2 Head {h00=0x0028, h01=0x0050, text=» ADKL A1,TTB:TD+2 DEV DESCR TABLE +2«, t00=0x002f, t01=0x0062}
0x49f2…4a06 Head {h00=0x0010, h01=0x0050, text=»DMT770 EQU *«, t00=0x002f, t01=0x008e}
0x4a06…4a18 Head {h00=0x000e, h01=0x0050, text=» SUK A3,4 «, t00=0x002f, t01=0x00a2}
0x4a18…4a40 Head {h00=0x0024, h01=0x0050, text=» RB(NP) DMT730 NOT IN THIS TTAB «, t00=0x002f, t01=0x00b4}
0x4a40…4a52 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x002f, t01=0x00dc}
0x4a52…4a64 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A3«, t00=0x002f, t01=0x00ee}
0x4a64…4a78 Head {h00=0x0010, h01=0x0050, text=» CWR* A5,A4 «, t00=0x002f, t01=0x0100}
0x4a78…4a8e Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMT770«, t00=0x002f, t01=0x0114}
0x4a8e…4aac Head {h00=0x001a, h01=0x0050, text=» LDR A7,A11 TTAB ENTRY«, t00=0x002f, t01=0x012a}
0x4aac…4ac8 Head {h00=0x0018, h01=0x0050, text=» ADK A7,2 FDB OFFSET«, t00=0x002f, t01=0x0148}
0x4ac8…4ada Head {h00=0x000e, h01=0x0050, text=» CWR A4,A7«, t00=0x002f, t01=0x0164}
0x4ada…4afa Head {h00=0x001c, h01=0x0050, text=» RB(E) DMT770 SAME ENTRY«, t00=0x002f, t01=0x0176}
0x4afa…4b24 Head {h00=0x0026, h01=0x0050, text=» RF DMT895 MORE USERS ON THIS FDB «, t00=0x0030, t01=0x0008}
0x4b24…4b2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0032}
0x4b2e…4b4c Head {h00=0x001a, h01=0x0050, text=»* NOW SEARCH SCTCDT «, t00=0x0030, t01=0x003c}
0x4b4c…4b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x005a}
0x4b56…4b6a Head {h00=0x0010, h01=0x0050, text=»DMT780 EQU *«, t00=0x0030, t01=0x0064}
0x4b6a…4b80 Head {h00=0x0012, h01=0x0050, text=» LD* A4,SCTCDT«, t00=0x0030, t01=0x0078}
0x4b80…4b94 Head {h00=0x0010, h01=0x0050, text=»DMT790 EQU *«, t00=0x0030, t01=0x008e}
0x4b94…4ba6 Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0030, t01=0x00a2}
0x4ba6…4bd8 Head {h00=0x002e, h01=0x0050, text=» RF(NP) DMT800 THIS FDB HAS NO OTHER USER «, t00=0x0030, t01=0x00b4}
0x4bd8…4bee Head {h00=0x0012, h01=0x0050, text=» LD A2,SCTCDT «, t00=0x0030, t01=0x00e6}
0x4bee…4c00 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A4«, t00=0x0030, t01=0x00fc}
0x4c00…4c14 Head {h00=0x0010, h01=0x0050, text=» CW A5,2,A2 «, t00=0x0030, t01=0x010e}
0x4c14…4c2a Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMT790«, t00=0x0030, t01=0x0122}
0x4c2a…4c3c Head {h00=0x000e, h01=0x0050, text=» LDR A7,A4«, t00=0x0030, t01=0x0138}
0x4c3c…4c52 Head {h00=0x0012, h01=0x0050, text=» AD A7,SCTCDT «, t00=0x0030, t01=0x014a}
0x4c52…4c66 Head {h00=0x0010, h01=0x0050, text=» CWR A7,A11 «, t00=0x0030, t01=0x0160}
0x4c66…4c86 Head {h00=0x001c, h01=0x0050, text=» RB(E) DMT790 SAME ENTRY«, t00=0x0030, t01=0x0174}
0x4c86…4cb0 (49, 0, 398) Head {h00=0x0026, h01=0x0050, text=» RF DMT895 THIS FDB HAS MORE USERS«, t00=0x0031, t01=0x0004}
0x4cb0…4cbe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x002e}
0x4cbe…4cc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x003c}
0x4cc8…4ce8 Head {h00=0x001c, h01=0x0050, text=»* NOW RELEASE THIS FDB«, t00=0x0031, t01=0x0046}
0x4ce8…4cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0066}
0x4cf2…4d06 Head {h00=0x0010, h01=0x0050, text=»DMT800 EQU *«, t00=0x0031, t01=0x0070}
0x4d06…4d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0084}
0x4d10…4d2e Head {h00=0x001a, h01=0x0050, text=»* RELEASE EA-BUFFERS«, t00=0x0031, t01=0x008e}
0x4d2e…4d38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ac}
0x4d38…4d6a Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/8000 ALL EA-BUFFERS ARE RELEASED«, t00=0x0031, t01=0x00b6}
0x4d6a…4d86 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0031, t01=0x00e8}
0x4d86…4d9c Head {h00=0x0012, h01=0x0050, text=» CF A14,EARELB«, t00=0x0031, t01=0x0104}
0x4d9c…4da6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x011a}
0x4da6…4dc6 Head {h00=0x001c, h01=0x0050, text=»* RELEASE CRN BUFFERS «, t00=0x0031, t01=0x0124}
0x4dc6…4dd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0144}
0x4dd0…4de8 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,FDBCRL «, t00=0x0031, t01=0x014e}
0x4de8…4e04 Head {h00=0x0018, h01=0x0050, text=» ADR A5,A6 LINK ROOT«, t00=0x0031, t01=0x0166}
0x4e04…4e18 Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A5 «, t00=0x0031, t01=0x0182}
0x4e18…4e32 Head {h00=0x0016, h01=0x0050, text=» CMR A5 CLEAR FDB «, t00=0x0032, t01=0x0008}
0x4e32…4e44 Head {h00=0x000e, h01=0x0050, text=» RF DMT830«, t00=0x0032, t01=0x0022}
0x4e44…4e58 Head {h00=0x0010, h01=0x0050, text=»DMT820 EQU *«, t00=0x0032, t01=0x0034}
0x4e58…4e7a Head {h00=0x001e, h01=0x0050, text=» LDR A4,A5 BUFFER ADDRESS «, t00=0x0032, t01=0x0048}
0x4e7a…4e8e Head {h00=0x0010, h01=0x0050, text=»DMT830 EQU *«, t00=0x0032, t01=0x006a}
0x4e8e…4eb8 Head {h00=0x0026, h01=0x0050, text=» RF(Z) DMT840 ALL BUFFER S REMOVED«, t00=0x0032, t01=0x007e}
0x4eb8…4ee0 Head {h00=0x0024, h01=0x0050, text=» LDR* A5,A4 NEXT BUFFER ADDRESS «, t00=0x0032, t01=0x00a8}
0x4ee0…4eea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d0}
0x4eea…4f0c Head {h00=0x001e, h01=0x0050, text=»* RETIURN BUFFER TO POOL«, t00=0x0032, t01=0x00da}
0x4f0c…4f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00fc}
0x4f16…4f22 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0032, t01=0x0106}
0x4f22…4f38 Head {h00=0x0012, h01=0x0050, text=» LD A3,CRNQUE «, t00=0x0032, t01=0x0112}
0x4f38…4f4a Head {h00=0x000e, h01=0x0050, text=» STR A3,A4«, t00=0x0032, t01=0x0128}
0x4f4a…4f60 Head {h00=0x0012, h01=0x0050, text=» ST A4,CRNQUE «, t00=0x0032, t01=0x013a}
0x4f60…4f6c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0032, t01=0x0150}
0x4f6c…4f7e Head {h00=0x000e, h01=0x0050, text=» RB DMT820«, t00=0x0032, t01=0x015c}
0x4f7e…4f92 Head {h00=0x0010, h01=0x0050, text=»DMT840 EQU *«, t00=0x0032, t01=0x016e}
0x4f92…4fa8 Head {h00=0x0012, h01=0x0050, text=» IFT FLXDSC=1 «, t00=0x0032, t01=0x0182}
0x4fa8…4fb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0008}
0x4fb2…4ff2 Head {h00=0x003c, h01=0x0050, text=»* NOW CHECK DEVICE CODES. WHEN LAST FILE IS CLOSED ON «, t00=0x0033, t01=0x0012}
0x4ff2…5034 Head {h00=0x003e, h01=0x0050, text=»* A FLEXIBLE DISC UNIT, AN UNLOC IS MADE FOR THIS VOLUME«, t00=0x0033, t01=0x0052}
0x5034…503e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0094}
0x503e…505e Head {h00=0x001c, h01=0x0050, text=» LDK A1,4 EXTENT COUNTER«, t00=0x0033, t01=0x009e}
0x505e…507a Head {h00=0x0018, h01=0x0050, text=» LDR A5,A6 FDB ADDR «, t00=0x0033, t01=0x00be}
0x507a…50ac Head {h00=0x002e, h01=0x0050, text=» ADKL A5,FDBEXT+1 ZADDR OF FIRST VOL CODE «, t00=0x0033, t01=0x00da}
0x50ac…50d6 Head {h00=0x0026, h01=0x0050, text=» SUKL A5,EXTELE EXT LENGTH IN FDB «, t00=0x0033, t01=0x010c}
0x50d6…50f4 Head {h00=0x001a, h01=0x0050, text=» LDK A4,0 FOR VOL CODE«, t00=0x0033, t01=0x0136}
0x50f4…5108 Head {h00=0x0010, h01=0x0050, text=»DMT880 EQU *«, t00=0x0033, t01=0x0154}
0x5108…5128 Head {h00=0x001c, h01=0x0050, text=» ENB SEE LABEL 910 ENB «, t00=0x0033, t01=0x0168}
0x5128…513e Head {h00=0x0012, h01=0x0050, text=» SUK A1,1 LOOP«, t00=0x0033, t01=0x0188}
0x513e…5168 Head {h00=0x0026, h01=0x0050, text=» ABL(NN) DMT900 CHECK THIS EXTENT «, t00=0x0034, t01=0x000e}
0x5168…5174 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0038}
0x5174…518a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0034, t01=0x0044}
0x518a…5198 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x005a}
0x5198…51a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0068}
0x51a2…51c2 Head {h00=0x001c, h01=0x0050, text=»* ALL EXTENTS CHECKED «, t00=0x0034, t01=0x0072}
0x51c2…51e4 Head {h00=0x001e, h01=0x0050, text=»* RELEASE MASRTER INDEX «, t00=0x0034, t01=0x0092}
0x51e4…51ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00b4}
0x51ee…51fa Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0034, t01=0x00be}
0x51fa…5224 Head {h00=0x0026, h01=0x0050, text=» LD A1,FDBMIA,A6 MASTER INDEX ADDR«, t00=0x0034, t01=0x00ca}
0x5224…5246 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT894 NO MATER IX «, t00=0x0034, t01=0x00f4}
0x5246…5260 Head {h00=0x0016, h01=0x0050, text=» LD A5,MXIND LENTH«, t00=0x0034, t01=0x0116}
0x5260…5272 Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0034, t01=0x0130}
0x5272…5286 Head {h00=0x0010, h01=0x0050, text=»DMT885 EQU *«, t00=0x0034, t01=0x0142}
0x5286…5298 Head {h00=0x000e, h01=0x0050, text=» SUK A5,4 «, t00=0x0034, t01=0x0156}
0x5298…52ba Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT890 FIRST INDEX «, t00=0x0034, t01=0x0168}
0x52ba…52dc Head {h00=0x001e, h01=0x0050, text=» RF(N) DMT894 NO MATER IX «, t00=0x0034, t01=0x018a}
0x52dc…52f6 Head {h00=0x0016, h01=0x0050, text=» CW A1,MXIND+2,A5 «, t00=0x0035, t01=0x001c}
0x52f6…530c Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMT885«, t00=0x0035, t01=0x0036}
0x530c…5324 Head {h00=0x0014, h01=0x0050, text=» LD A4,MXIND,A5 «, t00=0x0035, t01=0x004c}
0x5324…534e Head {h00=0x0026, h01=0x0050, text=» RF(N) DMT890 PREVIOUS ENTRY USED «, t00=0x0035, t01=0x0064}
0x534e…5374 Head {h00=0x0022, h01=0x0050, text=» LD A4,MXIND+4,A5 NO OF WORDS «, t00=0x0035, t01=0x008e}
0x5374…5398 Head {h00=0x0020, h01=0x0050, text=» ANKL A4,/7FFF REMOV USE BIT«, t00=0x0035, t01=0x00b4}
0x5398…53bc Head {h00=0x0020, h01=0x0050, text=» ADS A4,MXIND,A5 NR OF WORDS«, t00=0x0035, t01=0x00d8}
0x53bc…53c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00fc}
0x53c6…53e8 Head {h00=0x001e, h01=0x0050, text=»* MOVE UP REST OF MXIND «, t00=0x0035, t01=0x0106}
0x53e8…53f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0128}
0x53f2…540a Head {h00=0x0014, h01=0x0050, text=» LDKL A1,MXIND+6«, t00=0x0035, t01=0x0132}
0x540a…5426 Head {h00=0x0018, h01=0x0050, text=» ADR A1,A5 FROM ADDR«, t00=0x0035, t01=0x014a}
0x5426…5438 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0035, t01=0x0166}
0x5438…5452 Head {h00=0x0016, h01=0x0050, text=» SUK A3,4 TO ADDR «, t00=0x0035, t01=0x0178}
0x5452…5466 (54, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LD A2,MXIND«, t00=0x0036, t01=0x0004}
0x5466…5478 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A5«, t00=0x0036, t01=0x0018}
0x5478…5494 Head {h00=0x0018, h01=0x0050, text=» SUK A2,2 NO OF CHAR«, t00=0x0036, t01=0x002a}
0x5494…54b2 Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTWM MOVE UOP«, t00=0x0036, t01=0x0046}
0x54b2…54c4 Head {h00=0x000e, h01=0x0050, text=» RF DMT894«, t00=0x0036, t01=0x0064}
0x54c4…54d8 Head {h00=0x0010, h01=0x0050, text=»DMT890 EQU *«, t00=0x0036, t01=0x0076}
0x54d8…54ee Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/7FFF«, t00=0x0036, t01=0x008a}
0x54ee…5518 Head {h00=0x0026, h01=0x0050, text=» ANS A4,MXIND+4,A5 REMOVE USE BIT «, t00=0x0036, t01=0x00a0}
0x5518…5524 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00ca}
0x5524…5532 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x00d6}
0x5532…5546 Head {h00=0x0010, h01=0x0050, text=»DMT894 EQU *«, t00=0x0036, t01=0x00e4}
0x5546…557a Head {h00=0x0030, h01=0x0050, text=» LDKL A10,1 MARK THAT FDB SHALL BE RELEASED «, t00=0x0036, t01=0x00f8}
0x557a…558e Head {h00=0x0010, h01=0x0050, text=»DMT895 EQU *«, t00=0x0036, t01=0x012c}
0x558e…55a0 Head {h00=0x000e, h01=0x0050, text=» INH INH«, t00=0x0036, t01=0x0140}
0x55a0…55aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0152}
0x55aa…55ce Head {h00=0x0020, h01=0x0050, text=»* DELETE TTAB/SCTCDT ENTRY«, t00=0x0036, t01=0x015c}
0x55ce…55d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0180}
0x55d8…55f2 Head {h00=0x0016, h01=0x0050, text=» CMR A11 FILE CODE«, t00=0x0036, t01=0x018a}
0x55f2…560c Head {h00=0x0016, h01=0x0050, text=» CM 2,A11 FDB ADDR«, t00=0x0037, t01=0x0014}
0x560c…5616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x002e}
0x5616…5644 Head {h00=0x002a, h01=0x0050, text=»* RELEASE DWT-QUEUQ IN THIS FDB-DWT «, t00=0x0037, t01=0x0038}
0x5644…564e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0066}
0x564e…5668 Head {h00=0x0016, h01=0x0050, text=» LDR A1,A6 FDBADDR«, t00=0x0037, t01=0x0070}
0x5668…5690 Head {h00=0x0024, h01=0x0050, text=» ADKL A1,DWTTQ ADDR QUEUE START «, t00=0x0037, t01=0x008a}
0x5690…56b2 Head {h00=0x001e, h01=0x0050, text=» LDR* A5,A1 NEXT TTAB ADDR«, t00=0x0037, t01=0x00b2}
0x56b2…56cc Head {h00=0x0016, h01=0x0050, text=» RF(Z) DMTA20 NO Q«, t00=0x0037, t01=0x00d4}
0x56cc…56e6 Head {h00=0x0016, h01=0x0050, text=» CMR A1 KILL ROOT «, t00=0x0037, t01=0x00ee}
0x56e6…570e Head {h00=0x0024, h01=0x0050, text=»DMTA10 LDR* A1,A5 NEXT IN QUEUE «, t00=0x0037, t01=0x0108}
0x570e…572e Head {h00=0x001c, h01=0x0050, text=» CF A15,QTJOB DISPATCH Q«, t00=0x0037, t01=0x0130}
0x572e…5746 Head {h00=0x0014, h01=0x0050, text=» LDR A5,A1 NEXT «, t00=0x0037, t01=0x0150}
0x5746…5762 Head {h00=0x0018, h01=0x0050, text=» RB(NZ) DMTA10 MORE «, t00=0x0037, t01=0x0168}
0x5762…5776 Head {h00=0x0010, h01=0x0050, text=»DMTA20 EQU *«, t00=0x0037, t01=0x0184}
0x5776…5780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0008}
0x5780…57a6 Head {h00=0x0022, h01=0x0050, text=»* NEXT ENTRY IN TTAB/CDATAB «, t00=0x0038, t01=0x0012}
0x57a6…57b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0038}
0x57b0…57ce Head {h00=0x001a, h01=0x0050, text=» LDR A1,A12 TTAB ADDR «, t00=0x0038, t01=0x0042}
0x57ce…57e0 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0038, t01=0x0060}
0x57e0…580c Head {h00=0x0028, h01=0x0050, text=» LC A2,ECBFC,A9 FILE CODE USERT ECB «, t00=0x0038, t01=0x0072}
0x580c…5836 Head {h00=0x0026, h01=0x0050, text=» LDR A5,A13 LOCAL/GLOBAL INDICATOR«, t00=0x0038, t01=0x009e}
0x5836…5860 Head {h00=0x0026, h01=0x0050, text=» CF A14,FNDFDB SEARCH TTAB SCTCDT «, t00=0x0038, t01=0x00c8}
0x5860…5882 Head {h00=0x001e, h01=0x0050, text=» LDK A7,0 INDICATES A2 = 0«, t00=0x0038, t01=0x00f2}
0x5882…5898 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0038, t01=0x0114}
0x5898…58aa Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0038, t01=0x012a}
0x58aa…58c0 Head {h00=0x0012, h01=0x0050, text=» RF(Z) DMTA30 «, t00=0x0038, t01=0x013c}
0x58c0…58ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0152}
0x58ca…58ea Head {h00=0x001c, h01=0x0050, text=»* MOV DWT TO NEXT FDB «, t00=0x0038, t01=0x015c}
0x58ea…591a Head {h00=0x002c, h01=0x0050, text=»* AN INDEX FILE SHALL ALSO BE RELEASED«, t00=0x0038, t01=0x017c}
0x591a…5924 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x001c}
0x5924…594e Head {h00=0x0026, h01=0x0050, text=» LD A7,2,A4 NEXT FDB ADDR TO CLOSE«, t00=0x0039, t01=0x0026}
0x594e…5960 Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0039, t01=0x0050}
0x5960…597c Head {h00=0x0018, h01=0x0050, text=» ADR A1,A6 FROM ADDR«, t00=0x0039, t01=0x0062}
0x597c…598e Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0039, t01=0x007e}
0x598e…59a8 Head {h00=0x0016, h01=0x0050, text=» ADR A3,A7 TO ADDR«, t00=0x0039, t01=0x0090}
0x59a8…59c6 Head {h00=0x001a, h01=0x0050, text=» LDK A2,12 NO OF BYTES«, t00=0x0039, t01=0x00aa}
0x59c6…59e4 Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTWM MOVE DWT«, t00=0x0039, t01=0x00c8}
0x59e4…59fa Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0039, t01=0x00e6}
0x59fa…5a12 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTUEC,A6«, t00=0x0039, t01=0x00fc}
0x5a12…5a3c Head {h00=0x0026, h01=0x0050, text=» ST A3,DWTUEC,A7 MMU USER ECB ADDR«, t00=0x0039, t01=0x0114}
0x5a3c…5a48 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x013e}
0x5a48…5a5e Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0039, t01=0x014a}
0x5a5e…5a76 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTDM,A6«, t00=0x0039, t01=0x0160}
0x5a76…5a94 Head {h00=0x001a, h01=0x0050, text=» ST A3,DWTTDM,A7 MOVE «, t00=0x0039, t01=0x0178}
0x5a94…5ab4 Head {h00=0x001c, h01=0x0050, text=» CM FDBSNR,A7 SECTOR NR «, t00=0x003a, t01=0x0008}
0x5ab4…5acc Head {h00=0x0014, h01=0x0050, text=» LDKL A3,FDBEXT «, t00=0x003a, t01=0x0028}
0x5acc…5ade Head {h00=0x000e, h01=0x0050, text=» ADR A3,A7«, t00=0x003a, t01=0x0040}
0x5ade…5b02 Head {h00=0x0020, h01=0x0050, text=» ST A3,FDBCEX,A7 1ST EXTENT «, t00=0x003a, t01=0x0052}
0x5b02…5b1a Head {h00=0x0014, h01=0x0050, text=» LDR A10,A10 =1«, t00=0x003a, t01=0x0076}
0x5b1a…5b3e Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMTA30 NO RELEASE =1«, t00=0x003a, t01=0x008e}
0x5b3e…5b54 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/8000«, t00=0x003a, t01=0x00b2}
0x5b54…5b74 Head {h00=0x001c, h01=0x0050, text=» ST A3,DWTST,A6 NOT BUSY«, t00=0x003a, t01=0x00c8}
0x5b74…5b88 Head {h00=0x0010, h01=0x0050, text=»DMTA30 EQU *«, t00=0x003a, t01=0x00e8}
0x5b88…5b94 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x00fc}
0x5b94…5ba6 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x003a, t01=0x0108}
0x5ba6…5bb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x011a}
0x5bb0…5bca Head {h00=0x0016, h01=0x0050, text=»* RELEASE BUFFER«, t00=0x003a, t01=0x0124}
0x5bca…5bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x013e}
0x5bd4…5bec Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x003a, t01=0x0148}
0x5bec…5bfe Head {h00=0x000e, h01=0x0050, text=» SUK A3,8 «, t00=0x003a, t01=0x0160}
0x5bfe…5c14 Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTRBU«, t00=0x003a, t01=0x0172}
0x5c14…5c1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0188}
0x5c1e…5c36 (59, 0, 400) Head {h00=0x0014, h01=0x0050, text=»* RELEASE FDB «, t00=0x003b, t01=0x0004}
0x5c36…5c40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x001c}
0x5c40…5c54 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A10«, t00=0x003b, t01=0x0026}
0x5c54…5c74 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DMTA40 NO RELEASE«, t00=0x003b, t01=0x003a}
0x5c74…5c8a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x003b, t01=0x005a}
0x5c8a…5c94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0070}
0x5c94…5cc8 Head {h00=0x0030, h01=0x0050, text=»* REMOVE ALL OTHER REFERAENCES TO THIS FDB«, t00=0x003b, t01=0x007a}
0x5cc8…5cd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00ae}
0x5cd2…5cf6 Head {h00=0x0020, h01=0x0050, text=» LDK A1,10 2*MAX NR OF FDBS «, t00=0x003b, t01=0x00b8}
0x5cf6…5d0e Head {h00=0x0014, h01=0x0050, text=»DMTA50 SUK A1,2 «, t00=0x003b, t01=0x00dc}
0x5d0e…5d34 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMTA70 ALL FDBS CHECKED«, t00=0x003b, t01=0x00f4}
0x5d34…5d46 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x003b, t01=0x011a}
0x5d46…5d58 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A1«, t00=0x003b, t01=0x012c}
0x5d58…5d80 Head {h00=0x0024, h01=0x0050, text=» LD A3,FDBADF,A2 OTHER FDB ADDR «, t00=0x003b, t01=0x013e}
0x5d80…5d96 Head {h00=0x0012, h01=0x0050, text=» RB(Z) DMTA50 «, t00=0x003b, t01=0x0166}
0x5d96…5dba Head {h00=0x0020, h01=0x0050, text=» LDK A4,10 2*MAX NR OF FDBS «, t00=0x003b, t01=0x017c}
0x5dba…5dd2 Head {h00=0x0014, h01=0x0050, text=»DMTA60 SUK A4,2 «, t00=0x003c, t01=0x0010}
0x5dd2…5e06 Head {h00=0x0030, h01=0x0050, text=» RB(N) DMTA50 ALL ADDR CHECKED IN OTHER FDB «, t00=0x003c, t01=0x0028}
0x5e06…5e18 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x003c, t01=0x005c}
0x5e18…5e2a Head {h00=0x000e, h01=0x0050, text=» ADR A5,A4«, t00=0x003c, t01=0x006e}
0x5e2a…5e42 Head {h00=0x0014, h01=0x0050, text=» CW A6,FDBADF,A5«, t00=0x003c, t01=0x0080}
0x5e42…5e58 Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMTA60«, t00=0x003c, t01=0x0098}
0x5e58…5e62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00ae}
0x5e62…5ea6 Head {h00=0x0040, h01=0x0050, text=»* DELETE THIS REFERENCE TO THE FDB THAT SHALL BE RELEASED «, t00=0x003c, t01=0x00b8}
0x5ea6…5eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00fc}
0x5eb0…5ec6 Head {h00=0x0012, h01=0x0050, text=» CM FDBADF,A5 «, t00=0x003c, t01=0x0106}
0x5ec6…5ed8 Head {h00=0x000e, h01=0x0050, text=» RB DMTA50«, t00=0x003c, t01=0x011c}
0x5ed8…5ee4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x012e}
0x5ee4…5ef2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x013a}
0x5ef2…5f06 Head {h00=0x0010, h01=0x0050, text=»DMTA70 EQU *«, t00=0x003c, t01=0x0148}
0x5f06…5f1c Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/FFFE«, t00=0x003c, t01=0x015c}
0x5f1c…5f2e Head {h00=0x000e, h01=0x0050, text=» INH INH«, t00=0x003c, t01=0x0172}
0x5f2e…5f4e Head {h00=0x001c, h01=0x0050, text=» ANRS A3,A6 SET FDB FREE«, t00=0x003c, t01=0x0184}
0x5f4e…5f62 Head {h00=0x0010, h01=0x0050, text=»DMTA40 EQU *«, t00=0x003d, t01=0x0014}
0x5f62…5f90 Head {h00=0x002a, h01=0x0050, text=» CF A14,CLRBUF REMOVE ALL FREE BUFFERS«, t00=0x003d, t01=0x0028}
0x5f90…5fb0 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A7 NEW FDB ADDR «, t00=0x003d, t01=0x0056}
0x5fb0…5fd4 Head {h00=0x0020, h01=0x0050, text=» ABL(Z) DMTERX NO MORE FDBS «, t00=0x003d, t01=0x0076}
0x5fd4…5fea Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x003d, t01=0x009a}
0x5fea…5ffc Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x003d, t01=0x00b0}
0x5ffc…6006 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00c2}
0x6006…603e Head {h00=0x0034, h01=0x0050, text=»* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT «, t00=0x003d, t01=0x00cc}
0x603e…6048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0104}
0x6048…605a Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x003d, t01=0x010e}
0x605a…6080 Head {h00=0x0022, h01=0x0050, text=» LC A7,FDBEXT,A1 TASK 1ST EXT «, t00=0x003d, t01=0x0120}
0x6080…609e Head {h00=0x001a, h01=0x0050, text=» ADKL A7,'#D' TASK ID «, t00=0x003d, t01=0x0146}
0x609e…60aa Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x003d, t01=0x0164}
0x60aa…60ba Head {h00=0x000c, h01=0x0050, text=» DATA -4«, t00=0x003d, t01=0x0170}
0x60ba…60ce Head {h00=0x0010, h01=0x0050, text=» DATA DMTASK«, t00=0x003d, t01=0x0180}
0x60ce…60da (62, 0, 400) Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x003e, t01=0x0004}
0x60da…60ee Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x003e, t01=0x0010}
0x60ee…60fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0024}
0x60fa…6110 Head {h00=0x0012, h01=0x0050, text=» IFT FLXDSC=1 «, t00=0x003e, t01=0x0030}
0x6110…611e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003e, t01=0x0046}
0x611e…6132 Head {h00=0x0010, h01=0x0050, text=»DMT900 EQU *«, t00=0x003e, t01=0x0054}
0x6132…615a Head {h00=0x0024, h01=0x0050, text=»* UNLOCK FLEXDISC IN THIS LOOP«, t00=0x003e, t01=0x0068}
0x615a…6164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0090}
0x6164…617a Head {h00=0x0012, h01=0x0050, text=»* REGISTERS «, t00=0x003e, t01=0x009a}
0x617a…619a Head {h00=0x001c, h01=0x0050, text=»* A1 = EXTENT COUNTER «, t00=0x003e, t01=0x00b0}
0x619a…61d4 Head {h00=0x0036, h01=0x0050, text=»* A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR «, t00=0x003e, t01=0x00d0}
0x61d4…61ee Head {h00=0x0016, h01=0x0050, text=»* A6 = FDB ADDR «, t00=0x003e, t01=0x010a}
0x61ee…6222 Head {h00=0x0030, h01=0x0050, text=»* A8 = ECB ADDR A9 = DM ECB ADDR «, t00=0x003e, t01=0x0124}
0x6222…623a Head {h00=0x0014, h01=0x0050, text=»* A10-A12 USED«, t00=0x003e, t01=0x0158}
0x623a…6244 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0170}
0x6244…626e Head {h00=0x0026, h01=0x0050, text=» ADKL A5,EXTELE EXT LENGTH IN FDB «, t00=0x003e, t01=0x017a}
0x626e…628c Head {h00=0x001a, h01=0x0050, text=» LCR A7,A5 VOLUME CODE«, t00=0x003f, t01=0x0014}
0x628c…62a0 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x003f, t01=0x0032}
0x62a0…62be Head {h00=0x001a, h01=0x0050, text=» ABL(Z) DMT880 NO CODE«, t00=0x003f, t01=0x0046}
0x62be…62c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0064}
0x62c8…62f2 Head {h00=0x0026, h01=0x0050, text=»* FLEXDICSC IF BIT 8-13 = 111110«, t00=0x003f, t01=0x006e}
0x62f2…62fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0098}
0x62fc…6310 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/F8 «, t00=0x003f, t01=0x00a2}
0x6310…6324 Head {h00=0x0010, h01=0x0050, text=» SUK A7,/F8 «, t00=0x003f, t01=0x00b6}
0x6324…6348 Head {h00=0x0020, h01=0x0050, text=» ABL(NE) DMT880 NO FLEXDISC «, t00=0x003f, t01=0x00ca}
0x6348…6352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00ee}
0x6352…638c Head {h00=0x0036, h01=0x0050, text=»* IF SAME FLEXDISC AS LAST, DO NOT SCHECK AGAIN «, t00=0x003f, t01=0x00f8}
0x638c…6396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0132}
0x6396…63a8 Head {h00=0x000e, h01=0x0050, text=» CCR A4,A5«, t00=0x003f, t01=0x013c}
0x63a8…63c4 Head {h00=0x0018, h01=0x0050, text=» ABL(E) DMT880 SAME «, t00=0x003f, t01=0x014e}
0x63c4…63ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x016a}
0x63ce…640e Head {h00=0x003c, h01=0x0050, text=»* NOW SEARCH ALL FDBS FOR THOIS FLEXIBLE DISC VOL CODE«, t00=0x003f, t01=0x0174}
0x640e…6418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0024}
0x6418…642c Head {h00=0x0010, h01=0x0050, text=»DMT910 EQU *«, t00=0x0040, t01=0x002e}
0x642c…644c Head {h00=0x001c, h01=0x0050, text=» LCR A4,A5 SAVE VOL CODE«, t00=0x0040, t01=0x0042}
0x644c…6472 Head {h00=0x0022, h01=0x0050, text=» LDKL A3,FDBSTA FDB LINK ROOT «, t00=0x0040, t01=0x0062}
0x6472…6484 Head {h00=0x000e, h01=0x0050, text=» INH INH«, t00=0x0040, t01=0x0088}
0x6484…6496 Head {h00=0x000e, h01=0x0050, text=» RF DMT925«, t00=0x0040, t01=0x009a}
0x6496…64aa Head {h00=0x0010, h01=0x0050, text=»DMT920 EQU *«, t00=0x0040, t01=0x00ac}
0x64aa…64c6 Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A3 FDB ADDR«, t00=0x0040, t01=0x00c0}
0x64c6…64da Head {h00=0x0010, h01=0x0050, text=»DMT925 EQU *«, t00=0x0040, t01=0x00dc}
0x64da…64fc Head {h00=0x001e, h01=0x0050, text=» ANKL A3,/FFFE FDB ADDR «, t00=0x0040, t01=0x00f0}
0x64fc…6522 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DMT980 ALL FDBS CHECKED«, t00=0x0040, t01=0x0112}
0x6522…6536 Head {h00=0x0010, h01=0x0050, text=» LDR* A7,A3 «, t00=0x0040, t01=0x0138}
0x6536…6548 Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x0040, t01=0x014c}
0x6548…6562 Head {h00=0x0016, h01=0x0050, text=» RB(Z) DMT920 FREE«, t00=0x0040, t01=0x015e}
0x6562…6574 Head {h00=0x000e, h01=0x0050, text=» CWR A6,A3«, t00=0x0040, t01=0x0178}
0x6574…6596 Head {h00=0x001e, h01=0x0050, text=» RB(E) DMT920 CURRENT FDB «, t00=0x0040, t01=0x018a}
0x6596…65b6 Head {h00=0x001c, h01=0x0050, text=» LDK A7,4 EXTENT COUNTER«, t00=0x0041, t01=0x001c}
0x65b6…65d2 Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 FDB ADDR «, t00=0x0041, t01=0x003c}
0x65d2…65ec Head {h00=0x0016, h01=0x0050, text=» ADKL A2,FDBEXT+1 «, t00=0x0041, t01=0x0058}
0x65ec…660c Head {h00=0x001c, h01=0x0050, text=»* ADDR OF 1ST VOL CODE«, t00=0x0041, t01=0x0072}
0x660c…6636 Head {h00=0x0026, h01=0x0050, text=» SUKL A2,EXTELE EXT LENGTH IN FDB «, t00=0x0041, t01=0x0092}
0x6636…664a Head {h00=0x0010, h01=0x0050, text=»DMT930 EQU *«, t00=0x0041, t01=0x00bc}
0x664a…665c Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0041, t01=0x00d0}
0x665c…6686 Head {h00=0x0026, h01=0x0050, text=» RB(N) DMT920 ALL EXTENTS CHECKED «, t00=0x0041, t01=0x00e2}
0x6686…669e Head {h00=0x0014, h01=0x0050, text=» ADKL A2,EXTELE «, t00=0x0041, t01=0x010c}
0x669e…66bc Head {h00=0x001a, h01=0x0050, text=» CCR A4,A2 VOLUME CODE«, t00=0x0041, t01=0x0124}
0x66bc…66e8 Head {h00=0x0028, h01=0x0050, text=» ABL(E) DMT880 CODE USED. NO UNLOCK «, t00=0x0041, t01=0x0142}
0x66e8…6706 Head {h00=0x001a, h01=0x0050, text=» RB DMT930 NEXT EXTENT«, t00=0x0041, t01=0x016e}
0x6706…6710 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x018c}
0x6710…673a Head {h00=0x0026, h01=0x0050, text=»* ALL FSDBS CHECKED. MAKE UNLOAD«, t00=0x0042, t01=0x0008}
0x673a…6744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0032}
0x6744…6758 Head {h00=0x0010, h01=0x0050, text=»DMT980 EQU *«, t00=0x0042, t01=0x003c}
0x6758…676a Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x0042, t01=0x0050}
0x676a…6774 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0062}
0x6774…67ae Head {h00=0x0036, h01=0x0050, text=»* NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED «, t00=0x0042, t01=0x006c}
0x67ae…67cc Head {h00=0x001a, h01=0x0050, text=»* WITH THIS REQUEST «, t00=0x0042, t01=0x00a6}
0x67cc…67d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00c4}
0x67d6…67f6 Head {h00=0x001c, h01=0x0050, text=» SC A4,ECBFC,A8 VOL CODE«, t00=0x0042, t01=0x00ce}
0x67f6…6800 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00ee}
0x6800…681c Head {h00=0x0018, h01=0x0050, text=» IFF DSKPAG+SWPBLK=0«, t00=0x0042, t01=0x00f8}
0x681c…682e Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0042, t01=0x0114}
0x682e…6856 Head {h00=0x0024, h01=0x0050, text=» CC A4,SCTPLD+1 CHECK FILE CODE «, t00=0x0042, t01=0x0126}
0x6856…6884 Head {h00=0x002a, h01=0x0050, text=» ABL(E) DMT880 PROGRAM LOADING DEVICE?«, t00=0x0042, t01=0x014e}
0x6884…6890 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x017c}
0x6890…689a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0188}
0x689a…68b0 (67, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT FLXDSC=1 «, t00=0x0043, t01=0x0004}
0x68b0…68d0 Head {h00=0x001c, h01=0x0050, text=» LDK A7,/B8 UNLOAD WAIT «, t00=0x0043, t01=0x001a}
0x68d0…68dc Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0043, t01=0x003a}
0x68dc…68ec Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0043, t01=0x0046}
0x68ec…6904 Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBRC,A8 «, t00=0x0043, t01=0x0056}
0x6904…691c Head {h00=0x0014, h01=0x0050, text=» ANK A1,1 INOPER«, t00=0x0043, t01=0x006e}
0x691c…6934 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0043, t01=0x0086}
0x6934…6956 Head {h00=0x001e, h01=0x0050, text=» ABL DMT880 CHECK NEXT EXT«, t00=0x0043, t01=0x009e}
0x6956…6962 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x00c0}
0x6962…6970 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x00cc}
0x6970…6996 Head {h00=0x0022, h01=0x0050, text=»DMT500 EQU * READ VTOC RECORD «, t00=0x0043, t01=0x00da}
0x6996…69a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0100}
0x69a0…69c6 Head {h00=0x0022, h01=0x0050, text=» LD A2,VTOCRL VTOC REC LENGTH «, t00=0x0043, t01=0x010a}
0x69c6…69de Head {h00=0x0014, h01=0x0050, text=» CW A2,ECBRL,A9 «, t00=0x0043, t01=0x0130}
0x69de…6a0c Head {h00=0x002a, h01=0x0050, text=» RF(NG) DMT510 MOVE THE WHOLE VTOC REC«, t00=0x0043, t01=0x0148}
0x6a0c…6a30 Head {h00=0x0020, h01=0x0050, text=» LDK A1,/8 INCORRECT LENGTH «, t00=0x0043, t01=0x0176}
0x6a30…6a5c Head {h00=0x0028, h01=0x0050, text=» ORS A1,ECBRC,A9 SET RC BUT CONTINUE«, t00=0x0044, t01=0x000a}
0x6a5c…6a8c Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU «, t00=0x0044, t01=0x0036}
0x6a8c…6aa0 Head {h00=0x0010, h01=0x0050, text=»DMT510 EQU *«, t00=0x0044, t01=0x0066}
0x6aa0…6ab8 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBEL,A9 «, t00=0x0044, t01=0x007a}
0x6ab8…6ada Head {h00=0x001e, h01=0x0050, text=» CF A14,DMTREM MOVE RECORD«, t00=0x0044, t01=0x0092}
0x6ada…6aee Head {h00=0x0010, h01=0x0050, text=»DMAEX EQU * «, t00=0x0044, t01=0x00b4}
0x6aee…6b06 Head {h00=0x0014, h01=0x0050, text=» ABL DMTAEX EXIT«, t00=0x0044, t01=0x00c8}
0x6b06…6b14 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x00e0}
0x6b14…6b3a Head {h00=0x0022, h01=0x0050, text=»DMSQWR EQU * SEQUENTIAL WRITE «, t00=0x0044, t01=0x00ee}
0x6b3a…6b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0114}
0x6b44…6b66 Head {h00=0x001e, h01=0x0050, text=»DMRDWR EQU * RANDOM WRITE «, t00=0x0044, t01=0x011e}
0x6b66…6b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0140}
0x6b70…6b92 Head {h00=0x001e, h01=0x0050, text=»DMRDDE EQU * RANDOM DELETE«, t00=0x0044, t01=0x014a}
0x6b92…6b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x016c}
0x6b9c…6bbe Head {h00=0x001e, h01=0x0050, text=»DMINS EQU * INDEXED INSERT«, t00=0x0044, t01=0x0176}
0x6bbe…6bc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0008}
0x6bc8…6bea Head {h00=0x001e, h01=0x0050, text=»DMDEL EQU * INDEXED DELETE«, t00=0x0045, t01=0x0012}
0x6bea…6bf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0034}
0x6bf4…6c18 Head {h00=0x0020, h01=0x0050, text=»DMIRW EQU * INDEXED REWRITE «, t00=0x0045, t01=0x003e}
0x6c18…6c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0062}
0x6c22…6c4c Head {h00=0x0026, h01=0x0050, text=»DMRDWD EQU * DELAYED RANDOM WRITE «, t00=0x0045, t01=0x006c}
0x6c4c…6c56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0096}
0x6c56…6c80 Head {h00=0x0026, h01=0x0050, text=»DMRDDD EQU * DELAYED RANDOM DELETE«, t00=0x0045, t01=0x00a0}
0x6c80…6c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ca}
0x6c8a…6ca2 Head {h00=0x0014, h01=0x0050, text=»* TEST STATUS «, t00=0x0045, t01=0x00d4}
0x6ca2…6cbc Head {h00=0x0016, h01=0x0050, text=» LD A10,FDBRRO,A6 «, t00=0x0045, t01=0x00ec}
0x6cbc…6cd6 Head {h00=0x0016, h01=0x0050, text=» AD A10,FDBRLE,A6 «, t00=0x0045, t01=0x0106}
0x6cd6…6cfe Head {h00=0x0024, h01=0x0050, text=» ADR A10,A5 STATUS BYTE ADDRESS «, t00=0x0045, t01=0x0120}
0x6cfe…6d1e Head {h00=0x001c, h01=0x0050, text=» LDR A11,A5 BUFFER ADDR «, t00=0x0045, t01=0x0148}
0x6d1e…6d3a Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0045, t01=0x0168}
0x6d3a…6d54 Head {h00=0x0016, h01=0x0050, text=» LD A2,ECBCW+2,A9 «, t00=0x0045, t01=0x0184}
0x6d54…6d68 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0046, t01=0x000e}
0x6d68…6d8a Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBCW,A9 LOG REC NR«, t00=0x0046, t01=0x0022}
0x6d8a…6d9c Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0046, t01=0x0044}
0x6d9c…6db0 Head {h00=0x0010, h01=0x0050, text=» CCR A4,A10 «, t00=0x0046, t01=0x0056}
0x6db0…6dca Head {h00=0x0016, h01=0x0050, text=» RF(E) DMS010 FREE«, t00=0x0046, t01=0x006a}
0x6dca…6de0 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0046, t01=0x0084}
0x6de0…6df2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0046, t01=0x009a}
0x6df2…6e06 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QINS«, t00=0x0046, t01=0x00ac}
0x6e06…6e2a Head {h00=0x0020, h01=0x0050, text=» RF(E) DMEAER INDEXED INSERT«, t00=0x0046, t01=0x00c0}
0x6e2a…6e36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x00e4}
0x6e36…6e48 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0046, t01=0x00f0}
0x6e48…6e5c Head {h00=0x0010, h01=0x0050, text=» SUK A4,QSW «, t00=0x0046, t01=0x0102}
0x6e5c…6e7c Head {h00=0x001c, h01=0x0050, text=» RF(E) DMEAER SEQ WRITE «, t00=0x0046, t01=0x0116}
0x6e7c…6e92 Head {h00=0x0012, h01=0x0050, text=» IFT QNOEXA=1 «, t00=0x0046, t01=0x0136}
0x6e92…6eb8 Head {h00=0x0022, h01=0x0050, text=»* NO EA-CHECK IF EA-BIT = 1 «, t00=0x0046, t01=0x014c}
0x6eb8…6ec2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0172}
0x6ec2…6eda Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTST,A6 «, t00=0x0046, t01=0x017c}
0x6eda…6ef0 (71, 0, 400) Head {h00=0x0012, h01=0x0050, text=» ANK A4,EABIT «, t00=0x0047, t01=0x0004}
0x6ef0…6f16 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DMS020 EA=1, NO CHECK «, t00=0x0047, t01=0x001a}
0x6f16…6f30 Head {h00=0x0016, h01=0x0050, text=»* EA MUST BE SET«, t00=0x0047, t01=0x0040}
0x6f30…6f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x005a}
0x6f3a…6f50 Head {h00=0x0012, h01=0x0050, text=» CF A14,EATEST«, t00=0x0047, t01=0x0064}
0x6f50…6f6c Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 RTN CODE «, t00=0x0047, t01=0x007a}
0x6f6c…6f92 Head {h00=0x0022, h01=0x0050, text=» RF(NP) DMEAER NO EA THIS TASK«, t00=0x0047, t01=0x0096}
0x6f92…6f9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x00bc}
0x6f9e…6fb0 Head {h00=0x000e, h01=0x0050, text=» RF DMS100«, t00=0x0047, t01=0x00c8}
0x6fb0…6fc4 Head {h00=0x0010, h01=0x0050, text=»DMS010 EQU *«, t00=0x0047, t01=0x00da}
0x6fc4…6fda Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0047, t01=0x00ee}
0x6fda…6fec Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0047, t01=0x0104}
0x6fec…7000 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QIRW«, t00=0x0047, t01=0x0116}
0x7000…7026 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DMERND INDEXED REWRITE «, t00=0x0047, t01=0x012a}
0x7026…7038 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0047, t01=0x0150}
0x7038…704c Head {h00=0x0010, h01=0x0050, text=» SUK A4,QDEL«, t00=0x0047, t01=0x0162}
0x704c…7070 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMERND INDEXED DELETE«, t00=0x0047, t01=0x0176}
0x7070…707c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x000a}
0x707c…7090 Head {h00=0x0010, h01=0x0050, text=»DMS020 EQU *«, t00=0x0048, t01=0x0016}
0x7090…70a6 Head {h00=0x0012, h01=0x0050, text=» CF A14,EATEST«, t00=0x0048, t01=0x002a}
0x70a6…70c2 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 RTN CODE «, t00=0x0048, t01=0x0040}
0x70c2…70e6 Head {h00=0x0020, h01=0x0050, text=» RF(N) DMEAER EA OTHER TASK «, t00=0x0048, t01=0x005c}
0x70e6…70fa Head {h00=0x0010, h01=0x0050, text=»DMS100 EQU *«, t00=0x0048, t01=0x0080}
0x70fa…711c Head {h00=0x001e, h01=0x0050, text=» LDK A1,0 SET STATUS FREE «, t00=0x0048, t01=0x0094}
0x711c…7132 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0048, t01=0x00b6}
0x7132…7144 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0048, t01=0x00cc}
0x7144…7158 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QIRW«, t00=0x0048, t01=0x00de}
0x7158…717e Head {h00=0x0022, h01=0x0050, text=» RF(E) CHK010 INDEXED REWRITE «, t00=0x0048, t01=0x00f2}
0x717e…7190 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0048, t01=0x0118}
0x7190…71a4 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QINS«, t00=0x0048, t01=0x012a}
0x71a4…71c8 Head {h00=0x0020, h01=0x0050, text=» RF(E) CHK010 INDEXED INSERT«, t00=0x0048, t01=0x013e}
0x71c8…71da Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0048, t01=0x0162}
0x71da…71ee Head {h00=0x0010, h01=0x0050, text=» SUK A2,QDEL«, t00=0x0048, t01=0x0174}
0x71ee…7212 Head {h00=0x0020, h01=0x0050, text=» RF(E) CHK010 INDEXED DELETE«, t00=0x0048, t01=0x0188}
0x7212…721e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x001c}
0x721e…7230 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0049, t01=0x0028}
0x7230…7244 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QRD «, t00=0x0049, t01=0x003a}
0x7244…7268 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT350 RANDOM DELETE «, t00=0x0049, t01=0x004e}
0x7268…727a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0049, t01=0x0072}
0x727a…728e Head {h00=0x0010, h01=0x0050, text=» SUK A2,QRDD«, t00=0x0049, t01=0x0084}
0x728e…72ba Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT350 DELAYED RANDOM DELETE «, t00=0x0049, t01=0x0098}
0x72ba…72d6 Head {h00=0x0018, h01=0x0050, text=» RF DMT310 RW,RWD,SW«, t00=0x0049, t01=0x00c4}
0x72d6…72ec Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0049, t01=0x00e0}
0x72ec…72fa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x00f6}
0x72fa…730e Head {h00=0x0010, h01=0x0050, text=»CHK010 EQU *«, t00=0x0049, t01=0x0104}
0x730e…7358 Head {h00=0x0046, h01=0x0050, text=»* INDEXED REWRITE,INDEXED INSERT AND INDEXED DELETE ENTERS HERE «, t00=0x0049, t01=0x0118}
0x7358…7362 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0162}
0x7362…7386 Head {h00=0x0020, h01=0x0050, text=»* COUNT NR OF INDEXES AND «, t00=0x0049, t01=0x016c}
0x7386…73b6 Head {h00=0x002c, h01=0x0050, text=»* COMPARE KEYS IN FILE AND USER BUFFER«, t00=0x0049, t01=0x0190}
0x73b6…73c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0030}
0x73c0…73dc Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x004a, t01=0x003a}
0x73dc…73fa Head {h00=0x001a, h01=0x0050, text=» LDK A5,8 MAX 4 INDEX «, t00=0x004a, t01=0x0056}
0x73fa…741c Head {h00=0x001e, h01=0x0050, text=» SUR A12,A12 INDEX COUNTER«, t00=0x004a, t01=0x0074}
0x741c…7430 Head {h00=0x0010, h01=0x0050, text=»CHK040 EQU *«, t00=0x004a, t01=0x0096}
0x7430…7442 Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x004a, t01=0x00aa}
0x7442…746a Head {h00=0x0024, h01=0x0050, text=» RF(N) CHK100 ALL INDEX CHECKED «, t00=0x004a, t01=0x00bc}
0x746a…7484 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A1 FDB ADD«, t00=0x004a, t01=0x00e4}
0x7484…7496 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x004a, t01=0x00fe}
0x7496…74c2 Head {h00=0x0028, h01=0x0050, text=» LD A6,FDBAI1,A2 FDB ADDR INDEX FILE«, t00=0x004a, t01=0x0110}
0x74c2…74e0 Head {h00=0x001a, h01=0x0050, text=» RB(Z) CHK040 NO INDEX«, t00=0x004a, t01=0x013c}
0x74e0…7506 Head {h00=0x0022, h01=0x0050, text=» ADKL A12,1 COUNT INDEX FILES «, t00=0x004a, t01=0x015a}
0x7506…7526 Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A1 ORDER =3«, t00=0x004a, t01=0x0180}
0x7526…7546 Head {h00=0x001c, h01=0x0050, text=» ANK A2,/3F ORDER INDEX «, t00=0x004b, t01=0x0010}
0x7546…755a Head {h00=0x0010, h01=0x0050, text=» SUK A2,QIRW«, t00=0x004b, t01=0x0030}
0x755a…7584 Head {h00=0x0026, h01=0x0050, text=» RB(NE) CHK040 NOT INDEXED REWRITE«, t00=0x004b, t01=0x0044}
0x7584…758e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x006e}
0x758e…75a4 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004b, t01=0x0078}
0x75a4…75be Head {h00=0x0016, h01=0x0050, text=» LDR A7,A1 SAVE A1«, t00=0x004b, t01=0x008e}
0x75be…75ec Head {h00=0x002a, h01=0x0050, text=» LD A1,FDBKA,A6 GET KEY START ADDRESS «, t00=0x004b, t01=0x00a8}
0x75ec…7604 Head {h00=0x0014, h01=0x0050, text=» AD A1,ECBBA,A9 «, t00=0x004b, t01=0x00d6}
0x7604…763a Head {h00=0x0032, h01=0x0050, text=» LDKL A2,FDBKEY GET KEY SAVE AREA DISPLACEMENT«, t00=0x004b, t01=0x00ee}
0x763a…765c Head {h00=0x001e, h01=0x0050, text=» ADR A2,A6 ADD FDB ADDRESS«, t00=0x004b, t01=0x0124}
0x765c…7678 Head {h00=0x0018, h01=0x0050, text=» LDR A13,A2 SAVE A2 «, t00=0x004b, t01=0x0146}
0x7678…769e Head {h00=0x0022, h01=0x0050, text=» LD A3,FDBRLE,A6 RECORD LENGTH«, t00=0x004b, t01=0x0162}
0x769e…76ba Head {h00=0x0018, h01=0x0050, text=» SUK A3,6 KEY LENGTH«, t00=0x004b, t01=0x0188}
0x76ba…76c6 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x004c, t01=0x0014}
0x76c6…76f0 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTDM,A7 GET TTAB ADDRESS «, t00=0x004c, t01=0x0020}
0x76f0…7718 Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A4 LOAD MMU REGISTERS«, t00=0x004c, t01=0x004a}
0x7718…7740 Head {h00=0x0024, h01=0x0050, text=» LD A4,PRUN GET DM TTAB ADDRESS «, t00=0x004c, t01=0x0072}
0x7740…7774 Head {h00=0x0030, h01=0x0050, text=» TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE«, t00=0x004c, t01=0x009a}
0x7774…7780 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x004c, t01=0x00ce}
0x7780…77b0 Head {h00=0x002c, h01=0x0050, text=» CF A14,MOV:US MOVE KEY TO FDB KEY AREA «, t00=0x004c, t01=0x00da}
0x77b0…77ce Head {h00=0x001a, h01=0x0050, text=» LDR A1,A7 RESTORE A1 «, t00=0x004c, t01=0x010a}
0x77ce…77ec Head {h00=0x001a, h01=0x0050, text=» LDR A2,A13 RESTORE A2«, t00=0x004c, t01=0x0128}
0x77ec…781a Head {h00=0x002a, h01=0x0050, text=» LD A3,FDBKA,A6 GET KEY START ADDRESS «, t00=0x004c, t01=0x0146}
0x781a…7826 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0174}
0x7826…7830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0180}
0x7830…7846 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x004c, t01=0x018a}
0x7846…785c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004d, t01=0x0010}
0x785c…7882 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBKA,A6 KEY START ADDR«, t00=0x004d, t01=0x0026}
0x7882…7894 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x004d, t01=0x004c}
0x7894…78ba Head {h00=0x0022, h01=0x0050, text=» AD A2,ECBBA,A9 KEY IN BUFFER «, t00=0x004d, t01=0x005e}
0x78ba…78c6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0084}
0x78c6…78d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0090}
0x78d0…78e6 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x004d, t01=0x009a}
0x78e6…78fe Head {h00=0x0014, h01=0x0050, text=» AD A3,FDBRRO,A1«, t00=0x004d, t01=0x00b0}
0x78fe…791e Head {h00=0x001c, h01=0x0050, text=» ADR A3,A11 KEY IN FILE «, t00=0x004d, t01=0x00c8}
0x791e…7930 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x004d, t01=0x00e8}
0x7930…7956 Head {h00=0x0022, h01=0x0050, text=» LD A6,FDBRLE,A6 RECORD LENGTH«, t00=0x004d, t01=0x00fa}
0x7956…7972 Head {h00=0x0018, h01=0x0050, text=» SUK A6,6 KEY LENGTH«, t00=0x004d, t01=0x0120}
0x7972…7996 Head {h00=0x0020, h01=0x0050, text=» CF A14,CHKKEY COMPARE KEYS «, t00=0x004d, t01=0x013c}
0x7996…79a8 Head {h00=0x000e, h01=0x0050, text=» CWR A6,A7«, t00=0x004d, t01=0x0160}
0x79a8…79d6 Head {h00=0x002a, h01=0x0050, text=» RB(E) CHK040 KEY UNCHANGED CHECK NEXT«, t00=0x004d, t01=0x0172}
0x79d6…79f2 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x004e, t01=0x0010}
0x79f2…7a16 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/4000 KEY NOT FOUND«, t00=0x004e, t01=0x002c}
0x7a16…7a28 Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x004e, t01=0x0050}
0x7a28…7a3c Head {h00=0x0010, h01=0x0050, text=»CHK100 EQU *«, t00=0x004e, t01=0x0062}
0x7a3c…7a58 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x004e, t01=0x0076}
0x7a58…7a70 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x004e, t01=0x0092}
0x7a70…7a90 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/3F ORDER INDEX «, t00=0x004e, t01=0x00aa}
0x7a90…7aa2 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x004e, t01=0x00ca}
0x7aa2…7aba Head {h00=0x0014, h01=0x0050, text=» LC A2,FDBNIF,A6«, t00=0x004e, t01=0x00dc}
0x7aba…7ace Head {h00=0x0010, h01=0x0050, text=» CWR A2,A12 «, t00=0x004e, t01=0x00f4}
0x7ace…7afa Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT310 ALL INDEX IS EXISTING «, t00=0x004e, t01=0x0108}
0x7afa…7b18 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/8000 REQ ERR«, t00=0x004e, t01=0x0134}
0x7b18…7b2a Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x004e, t01=0x0152}
0x7b2a…7b4e Head {h00=0x0020, h01=0x0050, text=»DMERND LDKL A1,/800 NO DATA «, t00=0x004e, t01=0x0164}
0x7b4e…7b60 Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x004e, t01=0x0188}
0x7b60…7b6c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x000a}
0x7b6c…7b94 Head {h00=0x0024, h01=0x0050, text=»DMEAER LDKL A1,/2000 EA PROTECT «, t00=0x004f, t01=0x0016}
0x7b94…7bac Head {h00=0x0014, h01=0x0050, text=»DMERR ABL DMTERR«, t00=0x004f, t01=0x003e}
0x7bac…7bba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x0056}
0x7bba…7bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0064}
0x7bc4…7bdc Head {h00=0x0014, h01=0x0050, text=»* MOVE RECORD «, t00=0x004f, t01=0x006e}
0x7bdc…7be6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0086}
0x7be6…7bfa Head {h00=0x0010, h01=0x0050, text=»DMT310 EQU *«, t00=0x004f, t01=0x0090}
0x7bfa…7c10 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x004f, t01=0x00a4}
0x7c10…7c22 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x004f, t01=0x00ba}
0x7c22…7c36 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QDEL«, t00=0x004f, t01=0x00cc}
0x7c36…7c5c Head {h00=0x0022, h01=0x0050, text=» ABL(E) DMXDEL INDEXED DELETE «, t00=0x004f, t01=0x00e0}
0x7c5c…7c68 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x0106}
0x7c68…7c8e Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRLE,A6 RECORD LENGTH«, t00=0x004f, t01=0x0112}
0x7c8e…7ca6 Head {h00=0x0014, h01=0x0050, text=» LD A3,FDBRRO,A6«, t00=0x004f, t01=0x0138}
0x7ca6…7cc4 Head {h00=0x001a, h01=0x0050, text=» ADR A3,A11 TO ADDRESS«, t00=0x004f, t01=0x0150}
0x7cc4…7cd6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x004f, t01=0x016e}
0x7cd6…7cfa Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBBA,A9 FROM ADDRESS«, t00=0x004f, t01=0x0180}
0x7cfa…7d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0014}
0x7d04…7d1a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0050, t01=0x001e}
0x7d1a…7d2c Head {h00=0x000e, h01=0x0050, text=» XRR A4,A1«, t00=0x0050, t01=0x0034}
0x7d2c…7d40 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x0050, t01=0x0046}
0x7d40…7d6c Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT320 BOTH ODD OR BOTH EVEN «, t00=0x0050, t01=0x005a}
0x7d6c…7d96 Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTBM ONE ODD AND ONE EVEN«, t00=0x0050, t01=0x0086}
0x7d96…7da8 Head {h00=0x000e, h01=0x0050, text=» RF DMT340«, t00=0x0050, t01=0x00b0}
0x7da8…7db2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00c2}
0x7db2…7dca Head {h00=0x0014, h01=0x0050, text=»DMT320 LDR A4,A3«, t00=0x0050, t01=0x00cc}
0x7dca…7dde Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x0050, t01=0x00e4}
0x7dde…7dfe Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT330 BOTH EVEN «, t00=0x0050, t01=0x00f8}
0x7dfe…7e18 Head {h00=0x0016, h01=0x0050, text=» SUK A2,1 BOTH ODD«, t00=0x0050, t01=0x0118}
0x7e18…7e2a Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0050, t01=0x0132}
0x7e2a…7e3c Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0050, t01=0x0144}
0x7e3c…7e4e Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0050, t01=0x0156}
0x7e4e…7e60 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0050, t01=0x0168}
0x7e60…7e86 Head {h00=0x0022, h01=0x0050, text=»DMT330 CF A14,DMTWM WORD MOVE «, t00=0x0050, t01=0x017a}
0x7e86…7e90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0010}
0x7e90…7e9c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x001a}
0x7e9c…7ea6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0026}
0x7ea6…7ebc Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0051, t01=0x0030}
0x7ebc…7eda Head {h00=0x001a, h01=0x0050, text=» LDR A3,A2 GET LENGTH «, t00=0x0051, t01=0x0046}
0x7eda…7f0a Head {h00=0x002c, h01=0x0050, text=» LDR A2,A4 GET RECEIVING BUFFER ADDRESS «, t00=0x0051, t01=0x0064}
0x7f0a…7f16 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0051, t01=0x0094}
0x7f16…7f40 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTDM,A6 GET TTAB ADDRESS «, t00=0x0051, t01=0x00a0}
0x7f40…7f68 Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A4 LOAD MMU REGISTERS«, t00=0x0051, t01=0x00ca}
0x7f68…7f90 Head {h00=0x0024, h01=0x0050, text=» LD A4,PRUN GET DM TTAB ADDRESS «, t00=0x0051, t01=0x00f2}
0x7f90…7fc4 Head {h00=0x0030, h01=0x0050, text=» TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE«, t00=0x0051, t01=0x011a}
0x7fc4…7fd0 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0051, t01=0x014e}
0x7fd0…800c Head {h00=0x0038, h01=0x0050, text=» CF A14,MOV:US MOVE RECORD FROM USER TO SYSTEM AREA «, t00=0x0051, t01=0x015a}
0x800c…8018 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0008}
0x8018…8022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0014}
0x8022…8036 Head {h00=0x0010, h01=0x0050, text=»DMT340 EQU *«, t00=0x0052, t01=0x001e}
0x8036…8040 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0032}
0x8040…805c Head {h00=0x0018, h01=0x0050, text=»* SET STATUS USED «, t00=0x0052, t01=0x003c}
0x805c…8066 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0058}
0x8066…807a Head {h00=0x0010, h01=0x0050, text=» LDK A1,/FF «, t00=0x0052, t01=0x0062}
0x807a…8094 Head {h00=0x0016, h01=0x0050, text=»DMT350 SCR A1,A10 «, t00=0x0052, t01=0x0076}
0x8094…80ac Head {h00=0x0014, h01=0x0050, text=» LD A3,FDBDBR,A6«, t00=0x0052, t01=0x0090}
0x80ac…80cc Head {h00=0x001c, h01=0x0050, text=» RF(NN) DMT394 NO DELAY «, t00=0x0052, t01=0x00a8}
0x80cc…80de Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0052, t01=0x00c8}
0x80de…80f2 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QSW «, t00=0x0052, t01=0x00da}
0x80f2…8118 Head {h00=0x0022, h01=0x0050, text=» RF(E) DMT360 SEQUENTIAL WRITE«, t00=0x0052, t01=0x00ee}
0x8118…812a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0052, t01=0x0114}
0x812a…813e Head {h00=0x0010, h01=0x0050, text=» SUK A2,QRWD«, t00=0x0052, t01=0x0126}
0x813e…8168 Head {h00=0x0026, h01=0x0050, text=» RF(E) DMT400 DELAYED RANDOM WRITE«, t00=0x0052, t01=0x013a}
0x8168…817c Head {h00=0x0010, h01=0x0050, text=» SUK A7,QRDD«, t00=0x0052, t01=0x0164}
0x817c…81a8 Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT400 DELAYED RANDOM DELETE «, t00=0x0052, t01=0x0178}
0x81a8…81ba Head {h00=0x000e, h01=0x0050, text=» RF DMT390«, t00=0x0053, t01=0x0014}
0x81ba…81e2 Head {h00=0x0024, h01=0x0050, text=»* WRITE IF LAST REC IN SECTOR «, t00=0x0053, t01=0x0026}
0x81e2…81ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x004e}
0x81ec…820a Head {h00=0x001a, h01=0x0050, text=»DMT360 LD A4,FDBRRO,A6«, t00=0x0053, t01=0x0058}
0x820a…8222 Head {h00=0x0014, h01=0x0050, text=» CW A4,FDBMRO,A6«, t00=0x0053, t01=0x0076}
0x8222…8248 Head {h00=0x0022, h01=0x0050, text=» RF(NE) DMT400 NOT LAST RECORD«, t00=0x0053, t01=0x008e}
0x8248…826e Head {h00=0x0022, h01=0x0050, text=»DMT390 LDK A7,/05 BASIC WRITE «, t00=0x0053, t01=0x00b4}
0x826e…8280 Head {h00=0x000e, h01=0x0050, text=» SLL A3,1 «, t00=0x0053, t01=0x00da}
0x8280…82a2 Head {h00=0x001e, h01=0x0050, text=» RF(N) DMT395 BASIC WANTED«, t00=0x0053, t01=0x00ec}
0x82a2…82ca Head {h00=0x0024, h01=0x0050, text=»DMT394 LDK A7,/15 PHYSICAL WRITE«, t00=0x0053, t01=0x010e}
0x82ca…82de Head {h00=0x0010, h01=0x0050, text=»DMT395 EQU *«, t00=0x0053, t01=0x0136}
0x82de…82e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x014a}
0x82e8…8314 Head {h00=0x0028, h01=0x0050, text=»* WRITE SECTOR ONTO DISC AND EXIT«, t00=0x0053, t01=0x0154}
0x8314…831e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0180}
0x831e…834a Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 FDB ADDRESS AS PARAMETER «, t00=0x0053, t01=0x018a}
0x834a…8356 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0054, t01=0x0026}
0x8356…837a Head {h00=0x0020, h01=0x0050, text=» DATA -1 I/O AND ACTIVATION «, t00=0x0054, t01=0x0032}
0x837a…83a0 Head {h00=0x0022, h01=0x0050, text=» DATA DMTAR2 DMTASK RESTART #2«, t00=0x0054, t01=0x0056}
0x83a0…83ac Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0054, t01=0x007c}
0x83ac…83c0 Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x0054, t01=0x0088}
0x83c0…83ce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x009c}
0x83ce…83d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00aa}
0x83d8…83ee Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0054, t01=0x00b4}
0x83ee…8404 Head {h00=0x0012, h01=0x0050, text=»* DMTAR2 *«, t00=0x0054, t01=0x00ca}
0x8404…841a Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0054, t01=0x00e0}
0x841a…8424 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00f6}
0x8424…842e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0100}
0x842e…845e Head {h00=0x002c, h01=0x0050, text=»DMTAR2 EQU * DMTASK RESTART AFTER WRITE «, t00=0x0054, t01=0x010a}
0x845e…8468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x013a}
0x8468…8484 Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0054, t01=0x0144}
0x8484…848e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0160}
0x848e…84a4 Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x0054, t01=0x016a}
0x84a4…84ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0180}
0x84ae…84d4 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTIOT CHECK DISC I/O «, t00=0x0054, t01=0x018a}
0x84d4…84e6 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0055, t01=0x0020}
0x84e6…84fc Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DMTERR«, t00=0x0055, t01=0x0032}
0x84fc…8512 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C0FF«, t00=0x0055, t01=0x0048}
0x8512…853a Head {h00=0x0024, h01=0x0050, text=» ANS A1,FDBDBR,A6 RELEASE BUFFER«, t00=0x0055, t01=0x005e}
0x853a…854e Head {h00=0x0010, h01=0x0050, text=»DMT400 EQU *«, t00=0x0055, t01=0x0086}
0x854e…8574 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A6 FDB ADDR DATA FILE «, t00=0x0055, t01=0x009a}
0x8574…858e Head {h00=0x0016, h01=0x0050, text=» LD A2,ECBCW+2,A9 «, t00=0x0055, t01=0x00c0}
0x858e…85a2 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0055, t01=0x00da}
0x85a2…85c4 Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBCW,A9 LOG REC NR«, t00=0x0055, t01=0x00ee}
0x85c4…85e6 Head {h00=0x001e, h01=0x0050, text=» LC A11,ECBFC,A9 FILE CODE«, t00=0x0055, t01=0x0110}
0x85e6…85fe Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A1 «, t00=0x0055, t01=0x0132}
0x85fe…861e Head {h00=0x001c, h01=0x0050, text=» ANK A7,/3F ORDER INDEX «, t00=0x0055, t01=0x014a}
0x861e…8632 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QSW «, t00=0x0055, t01=0x016a}
0x8632…8644 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0055, t01=0x017e}
0x8644…8664 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT460 SEQ WRITE «, t00=0x0055, t01=0x0190}
0x8664…8678 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QRD «, t00=0x0056, t01=0x0020}
0x8678…868a Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0056, t01=0x0034}
0x868a…86a8 Head {h00=0x001a, h01=0x0050, text=» RF(E) DMT420 RAND DEL«, t00=0x0056, t01=0x0046}
0x86a8…86bc Head {h00=0x0010, h01=0x0050, text=» LDK A4,QRDD«, t00=0x0056, t01=0x0064}
0x86bc…86ce Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0056, t01=0x0078}
0x86ce…86fa Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT420 DELAYED RANDEOM DELETE«, t00=0x0056, t01=0x008a}
0x86fa…8710 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0056, t01=0x00b6}
0x8710…8724 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QDEL«, t00=0x0056, t01=0x00cc}
0x8724…8736 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0056, t01=0x00e0}
0x8736…875a Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT420 INDEXED DELETE«, t00=0x0056, t01=0x00f2}
0x875a…8766 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0116}
0x8766…878c Head {h00=0x0022, h01=0x0050, text=» LDR A5,A2 SAVE REC NO PART 1 «, t00=0x0056, t01=0x0122}
0x878c…879e Head {h00=0x000e, h01=0x0050, text=» LDR A9,A3«, t00=0x0056, t01=0x0148}
0x879e…87a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x015a}
0x87a8…87be Head {h00=0x0012, h01=0x0050, text=»* UPDATE CRN«, t00=0x0056, t01=0x0164}
0x87be…87c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x017a}
0x87c8…87ee Head {h00=0x0022, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER «, t00=0x0056, t01=0x0184}
0x87ee…880e Head {h00=0x001c, h01=0x0050, text=» LDR A10,A2 BUFFER ADDR «, t00=0x0057, t01=0x001a}
0x880e…882e Head {h00=0x001c, h01=0x0050, text=» IFT INDXAC=1 =2 START «, t00=0x0057, t01=0x003a}
0x882e…8842 Head {h00=0x0010, h01=0x0050, text=» LDK A3,QIRW«, t00=0x0057, t01=0x005a}
0x8842…8854 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A3«, t00=0x0057, t01=0x006e}
0x8854…887a Head {h00=0x0022, h01=0x0050, text=» RF(E) DMT410 INDEXED REWRITE «, t00=0x0057, t01=0x0080}
0x887a…8890 Head {h00=0x0012, h01=0x0050, text=» XIF =2 END «, t00=0x0057, t01=0x00a6}
0x8890…88a6 Head {h00=0x0012, h01=0x0050, text=» CM CRNCIF,A2 «, t00=0x0057, t01=0x00bc}
0x88a6…88c2 Head {h00=0x0018, h01=0x0050, text=»* CLEAR INDEX CRN «, t00=0x0057, t01=0x00d2}
0x88c2…88da Head {h00=0x0014, h01=0x0050, text=» CM CRNCIF+2,A2 «, t00=0x0057, t01=0x00ee}
0x88da…88f2 Head {h00=0x0014, h01=0x0050, text=»DMT410 EQU * =2«, t00=0x0057, t01=0x0106}
0x88f2…8904 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A5«, t00=0x0057, t01=0x011e}
0x8904…8916 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A9«, t00=0x0057, t01=0x0130}
0x8916…8930 Head {h00=0x0016, h01=0x0050, text=» ST A2,CRNCDF,A10 «, t00=0x0057, t01=0x0142}
0x8930…895a Head {h00=0x0026, h01=0x0050, text=» ST A3,CRNCDF+2,A10 CRN DATA FILE «, t00=0x0057, t01=0x015c}
0x895a…8984 Head {h00=0x0026, h01=0x0050, text=» SC A11,CRNCDF,A10 CRN FIL E CODE «, t00=0x0057, t01=0x0186}
0x8984…899a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0058, t01=0x0020}
0x899a…89ae Head {h00=0x0010, h01=0x0050, text=» LDK A4,QINS«, t00=0x0058, t01=0x0036}
0x89ae…89c0 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0058, t01=0x004a}
0x89c0…89e4 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT460 INDEXED INSERT«, t00=0x0058, t01=0x005c}
0x89e4…89f0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0080}
0x89f0…8a04 Head {h00=0x0010, h01=0x0050, text=»DMT420 EQU *«, t00=0x0058, t01=0x008c}
0x8a04…8a18 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QSR «, t00=0x0058, t01=0x00a0}
0x8a18…8a2a Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0058, t01=0x00b4}
0x8a2a…8a48 Head {h00=0x001a, h01=0x0050, text=» RF(E) DMT450 SEQ READ«, t00=0x0058, t01=0x00c6}
0x8a48…8a5c Head {h00=0x0010, h01=0x0050, text=» LDK A4,QRR «, t00=0x0058, t01=0x00e4}
0x8a5c…8a6e Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0058, t01=0x00f8}
0x8a6e…8a90 Head {h00=0x001e, h01=0x0050, text=» RF(E) DMT450 RANDOM READ «, t00=0x0058, t01=0x010a}
0x8a90…8aa6 Head {h00=0x0012, h01=0x0050, text=» LDK A4,QRRRB «, t00=0x0058, t01=0x012c}
0x8aa6…8ab8 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0058, t01=0x0142}
0x8ab8…8ae2 Head {h00=0x0026, h01=0x0050, text=» RF(E) DMT450 RAND READ REL BUFFER«, t00=0x0058, t01=0x0154}
0x8ae2…8af6 Head {h00=0x0010, h01=0x0050, text=»DMT440 EQU *«, t00=0x0058, t01=0x017e}
0x8af6…8b00 (89, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0004}
0x8b00…8b16 Head {h00=0x0012, h01=0x0050, text=»* RELEASE EA«, t00=0x0059, t01=0x000e}
0x8b16…8b20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0024}
0x8b20…8b3e Head {h00=0x001a, h01=0x0050, text=» CF A14,EARELB REL EA «, t00=0x0059, t01=0x002e}
0x8b3e…8b50 Head {h00=0x000e, h01=0x0050, text=» RF DMTAEX«, t00=0x0059, t01=0x004c}
0x8b50…8b64 Head {h00=0x0010, h01=0x0050, text=»DMT450 EQU *«, t00=0x0059, t01=0x005e}
0x8b64…8b86 Head {h00=0x001e, h01=0x0050, text=» LC A4,DWTST,A1 DWTSTATUS «, t00=0x0059, t01=0x0072}
0x8b86…8ba2 Head {h00=0x0018, h01=0x0050, text=» ANK A4,EABIT EA-BIT«, t00=0x0059, t01=0x0094}
0x8ba2…8bcc Head {h00=0x0026, h01=0x0050, text=» RF(NZ) DMTAEX EA=1. NO EA WANTED «, t00=0x0059, t01=0x00b0}
0x8bcc…8bd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00da}
0x8bd6…8bfc Head {h00=0x0022, h01=0x0050, text=»* CHECK IF EA IS SET ALREADY«, t00=0x0059, t01=0x00e4}
0x8bfc…8c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x010a}
0x8c06…8c26 Head {h00=0x001c, h01=0x0050, text=» CF A14,EATEST CHECK EA «, t00=0x0059, t01=0x0114}
0x8c26…8c38 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0059, t01=0x0134}
0x8c38…8c5e Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DMTAEX EA ALREADY SET «, t00=0x0059, t01=0x0146}
0x8c5e…8c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x016c}
0x8c68…8c7a Head {h00=0x000e, h01=0x0050, text=»* SET EA«, t00=0x0059, t01=0x0176}
0x8c7a…8c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0188}
0x8c84…8c9a (90, 0, 400) Head {h00=0x0012, h01=0x0050, text=» CF A14,EASETB«, t00=0x005a, t01=0x0004}
0x8c9a…8cac Head {h00=0x000e, h01=0x0050, text=» RF DMTAEX«, t00=0x005a, t01=0x001a}
0x8cac…8cc0 Head {h00=0x0010, h01=0x0050, text=»DMT460 EQU *«, t00=0x005a, t01=0x002c}
0x8cc0…8cca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0040}
0x8cca…8ce0 Head {h00=0x0012, h01=0x0050, text=»* UPDATE LRN«, t00=0x005a, t01=0x004a}
0x8ce0…8cea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0060}
0x8cea…8d02 Head {h00=0x0014, h01=0x0050, text=» SC A2,FDBLRN,A1«, t00=0x005a, t01=0x006a}
0x8d02…8d1c Head {h00=0x0016, h01=0x0050, text=» ST A3,FDBLRN+1,A1«, t00=0x005a, t01=0x0082}
0x8d1c…8d32 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x005a, t01=0x009c}
0x8d32…8d46 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QINS«, t00=0x005a, t01=0x00b2}
0x8d46…8d58 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x005a, t01=0x00c6}
0x8d58…8d7e Head {h00=0x0022, h01=0x0050, text=» ABL(E) DMINS2 INDEXED INSERT «, t00=0x005a, t01=0x00d8}
0x8d7e…8d8a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x00fe}
0x8d8a…8d98 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x010a}
0x8d98…8dbe Head {h00=0x0022, h01=0x0050, text=»DMTAEX LDK A1,0 CORRECT RETURN«, t00=0x005a, t01=0x0118}
0x8dbe…8dc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x013e}
0x8dc8…8de6 Head {h00=0x001a, h01=0x0050, text=»DMTERR LD A3,FDBDBR,A6«, t00=0x005a, t01=0x0148}
0x8de6…8e06 Head {h00=0x001c, h01=0x0050, text=» RF(NN) DMTEX1 NOT DELAY«, t00=0x005a, t01=0x0166}
0x8e06…8e1c Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/3F00«, t00=0x005a, t01=0x0186}
0x8e1c…8e48 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) DMTERX NO RELEASE OF BUFFER «, t00=0x005b, t01=0x000c}
0x8e48…8e66 Head {h00=0x001a, h01=0x0050, text=»DMTEX1 LD A3,ECBBA,A8 «, t00=0x005b, t01=0x0038}
0x8e66…8e78 Head {h00=0x000e, h01=0x0050, text=» SUK A3,8 «, t00=0x005b, t01=0x0056}
0x8e78…8e8c Head {h00=0x0010, h01=0x0050, text=»DMTEX2 EQU *«, t00=0x005b, t01=0x0068}
0x8e8c…8eb8 Head {h00=0x0028, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER AT A3 «, t00=0x005b, t01=0x007c}
0x8eb8…8ecc Head {h00=0x0010, h01=0x0050, text=»DMTERX EQU *«, t00=0x005b, t01=0x00a8}
0x8ecc…8ed8 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x005b, t01=0x00bc}
0x8ed8…8ef2 Head {h00=0x0016, h01=0x0050, text=»* A1 = RET CODE «, t00=0x005b, t01=0x00c8}
0x8ef2…8f0c Head {h00=0x0016, h01=0x0050, text=»* A6 = DWT ADDR «, t00=0x005b, t01=0x00e2}
0x8f0c…8f22 Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x005b, t01=0x00fc}
0x8f22…8f2e Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x005b, t01=0x0112}
0x8f2e…8f40 Head {h00=0x000e, h01=0x0050, text=»EXIT EQU *«, t00=0x005b, t01=0x011e}
0x8f40…8f4c Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x005b, t01=0x0130}
0x8f4c…8f5c Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x005b, t01=0x013c}
0x8f5c…8f72 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x005b, t01=0x014c}
0x8f72…8f80 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x0162}
0x8f80…8f94 Head {h00=0x0010, h01=0x0050, text=»DMIRR EQU * «, t00=0x005b, t01=0x0170}
0x8f94…8fb4 Head {h00=0x001c, h01=0x0050, text=»* INDEXED RANDOM READ «, t00=0x005b, t01=0x0184}
0x8fb4…8fea Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x005c, t01=0x0014}
0x8fea…9010 Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB ADDR«, t00=0x005c, t01=0x004a}
0x9010…9026 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x005c, t01=0x0070}
0x9026…904a Head {h00=0x0020, h01=0x0050, text=» LD A8,ECBCW,A9 ADDR OF KEY «, t00=0x005c, t01=0x0086}
0x904a…9056 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x00aa}
0x9056…906c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x005c, t01=0x00b6}
0x906c…9082 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005c, t01=0x00cc}
0x9082…909e Head {h00=0x0018, h01=0x0050, text=» LDR A8,A1 FDB ADDR «, t00=0x005c, t01=0x00e2}
0x909e…90c4 Head {h00=0x0022, h01=0x0050, text=» ADKL A8,FDBKEY KEY AREA ADDR «, t00=0x005c, t01=0x00fe}
0x90c4…90d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x0124}
0x90d0…90e6 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x005c, t01=0x0130}
0x90e6…90fa Head {h00=0x0010, h01=0x0050, text=» SUR A11,A11«, t00=0x005c, t01=0x0146}
0x90fa…9120 Head {h00=0x0022, h01=0x0050, text=» LC A11,ECBCW+3,A9 NO OF CHAR «, t00=0x005c, t01=0x015a}
0x9120…9130 Head {h00=0x000c, h01=0x0050, text=»* =5 «, t00=0x005c, t01=0x0180}
0x9130…9144 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A1 «, t00=0x005c, t01=0x0190}
0x9144…9166 Head {h00=0x001e, h01=0x0050, text=» ADKL A13,FDBECB ECB ADDR «, t00=0x005d, t01=0x0014}
0x9166…918e Head {h00=0x0024, h01=0x0050, text=» CF A14,FNDKEY GET INDEX RECORD «, t00=0x005d, t01=0x0036}
0x918e…91ba Head {h00=0x0028, h01=0x0050, text=»DMR006 EQU * FROM INDEXED READ NEXT «, t00=0x005d, t01=0x005e}
0x91ba…91d2 Head {h00=0x0014, h01=0x0050, text=» LD A9,DWTECB,A1«, t00=0x005d, t01=0x008a}
0x91d2…91ec Head {h00=0x0016, h01=0x0050, text=» LDR A6,A1 FDB ADR«, t00=0x005d, t01=0x00a2}
0x91ec…9204 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x005d, t01=0x00bc}
0x9204…9222 Head {h00=0x001a, h01=0x0050, text=» ADR A8,A6 ECB ADDRESS«, t00=0x005d, t01=0x00d4}
0x9222…9240 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A2 RETURN CODE«, t00=0x005d, t01=0x00f2}
0x9240…9264 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DMI030 KEY NOT FOUND«, t00=0x005d, t01=0x0110}
0x9264…926e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0134}
0x926e…928a Head {h00=0x0018, h01=0x0050, text=»* KEY RECORD FOUN «, t00=0x005d, t01=0x013e}
0x928a…92bc Head {h00=0x002e, h01=0x0050, text=»* CHECK IF NEXT RECORD HAS THE SAME KEY «, t00=0x005d, t01=0x015a}
0x92bc…92c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x018c}
0x92c6…92ec Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD OFFSET«, t00=0x005e, t01=0x0008}
0x92ec…930c Head {h00=0x001c, h01=0x0050, text=» ADK A2,10 BUFFER HEADER«, t00=0x005e, t01=0x002e}
0x930c…9328 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 REC ADDR «, t00=0x005e, t01=0x004e}
0x9328…934c Head {h00=0x0020, h01=0x0050, text=» LD A4,FDBRLE,A1 REC LENGTH «, t00=0x005e, t01=0x006a}
0x934c…9368 Head {h00=0x0018, h01=0x0050, text=» SUK A4,6 KEY LENGTH«, t00=0x005e, t01=0x008e}
0x9368…937a Head {h00=0x000e, h01=0x0050, text=» ADR A2,A4«, t00=0x005e, t01=0x00aa}
0x937a…93a0 Head {h00=0x0022, h01=0x0050, text=» CC A4,2,A2 DUPLICATE KEY CHAR«, t00=0x005e, t01=0x00bc}
0x93a0…93c8 Head {h00=0x0024, h01=0x0050, text=» RF(NE) DMR020 NEXT KEY NOT SAME«, t00=0x005e, t01=0x00e2}
0x93c8…93e4 Head {h00=0x0018, h01=0x0050, text=» LDKL A5,/200 BIT 6 «, t00=0x005e, t01=0x010a}
0x93e4…940a Head {h00=0x0022, h01=0x0050, text=» ORS A5,ECBRC,A9 NEXT KEY SAME«, t00=0x005e, t01=0x0126}
0x940a…941e Head {h00=0x0010, h01=0x0050, text=»DMR020 EQU *«, t00=0x005e, t01=0x014c}
0x941e…9428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0160}
0x9428…944a Head {h00=0x001e, h01=0x0050, text=»* MOVE LOG REC NO TO ECB«, t00=0x005e, t01=0x016a}
0x944a…9454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x018c}
0x9454…9466 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x005f, t01=0x0008}
0x9466…947a Head {h00=0x0010, h01=0x0050, text=» LC A5,3,A2 «, t00=0x005f, t01=0x001a}
0x947a…9494 Head {h00=0x0016, h01=0x0050, text=» SC A5,ECBCW+3,A8 «, t00=0x005f, t01=0x002e}
0x9494…94a8 Head {h00=0x0010, h01=0x0050, text=» LC A5,4,A2 «, t00=0x005f, t01=0x0048}
0x94a8…94ba Head {h00=0x000e, h01=0x0050, text=» ECR A5,A5«, t00=0x005f, t01=0x005c}
0x94ba…94ce Head {h00=0x0010, h01=0x0050, text=» LC A5,5,A2 «, t00=0x005f, t01=0x006e}
0x94ce…94e6 Head {h00=0x0014, h01=0x0050, text=» ST A5,ECBCW,A8 «, t00=0x005f, t01=0x0082}
0x94e6…94f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x009a}
0x94f0…9510 Head {h00=0x001c, h01=0x0050, text=»* RELEASE BLOCK BUFFER«, t00=0x005f, t01=0x00a4}
0x9510…951a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00c4}
0x951a…9530 Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTRBU«, t00=0x005f, t01=0x00ce}
0x9530…953e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x00e4}
0x953e…9548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00f2}
0x9548…957c Head {h00=0x0030, h01=0x0050, text=»* PERFORM RANDOM READ ON THOIS DATA RECORD«, t00=0x005f, t01=0x00fc}
0x957c…9586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0130}
0x9586…95a2 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x005f, t01=0x013a}
0x95a2…95c8 Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTST,A6 USER REQUESRT «, t00=0x005f, t01=0x0156}
0x95c8…95e8 Head {h00=0x001c, h01=0x0050, text=» ANK A2,EABIT GET EA BIT«, t00=0x005f, t01=0x017c}
0x95e8…95fa Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0060, t01=0x000c}
0x95fa…9620 Head {h00=0x0022, h01=0x0050, text=» LDK A7,/A RANDOM READ NO WAIT«, t00=0x0060, t01=0x001e}
0x9620…963a Head {h00=0x0016, h01=0x0050, text=» ORR A7,A2 EA BIT «, t00=0x0060, t01=0x0044}
0x963a…9644 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x005e}
0x9644…965e Head {h00=0x0016, h01=0x0050, text=»* MOVE USER ECB «, t00=0x0060, t01=0x0068}
0x965e…9668 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0082}
0x9668…9688 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A9 FROM ECB ADDR«, t00=0x0060, t01=0x008c}
0x9688…96a6 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A8 TO ECB ADDR«, t00=0x0060, t01=0x00ac}
0x96a6…96c2 Head {h00=0x0018, h01=0x0050, text=» LDK A2,6 NO OF CHAR«, t00=0x0060, t01=0x00ca}
0x96c2…96e0 Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTWM MOVE ECB«, t00=0x0060, t01=0x00e6}
0x96e0…96fc Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0060, t01=0x0104}
0x96fc…9708 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0060, t01=0x0120}
0x9708…9718 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0060, t01=0x012c}
0x9718…972c Head {h00=0x0010, h01=0x0050, text=» DATA DMTAR4«, t00=0x0060, t01=0x013c}
0x972c…9744 Head {h00=0x0014, h01=0x0050, text=» LD A7,ECBRC,A8 «, t00=0x0060, t01=0x0150}
0x9744…9762 Head {h00=0x001a, h01=0x0050, text=» RF(N) DMTAR4 REQ ERR «, t00=0x0060, t01=0x0168}
0x9762…976e Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0060, t01=0x0186}
0x976e…9782 (97, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x0061, t01=0x0004}
0x9782…9796 Head {h00=0x0010, h01=0x0050, text=»DMTAR4 EQU *«, t00=0x0061, t01=0x0018}
0x9796…97a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x002c}
0x97a0…97bc Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0061, t01=0x0036}
0x97bc…97c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0052}
0x97c6…97dc Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x0061, t01=0x005c}
0x97dc…97ee Head {h00=0x000e, h01=0x0050, text=» LDR A6,A1«, t00=0x0061, t01=0x0072}
0x97ee…9806 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x0061, t01=0x0084}
0x9806…9820 Head {h00=0x0016, h01=0x0050, text=» ADR A8,A6 RR ECB «, t00=0x0061, t01=0x009c}
0x9820…9842 Head {h00=0x001e, h01=0x0050, text=» LD A9,DWTECB,A6 USER ECB «, t00=0x0061, t01=0x00b6}
0x9842…985a Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBRC,A8 «, t00=0x0061, t01=0x00d8}
0x985a…9884 Head {h00=0x0026, h01=0x0050, text=» ORS A1,ECBRC,A9 RET CODE TO USER «, t00=0x0061, t01=0x00f0}
0x9884…98ba Head {h00=0x0032, h01=0x0050, text=» ANKL A1,/EEF7 BIT 3,7 AND 12 NOT GRAVE ERROR «, t00=0x0061, t01=0x011a}
0x98ba…98d8 Head {h00=0x001a, h01=0x0050, text=» RB(NZ) DMTERX NOT OK «, t00=0x0061, t01=0x0150}
0x98d8…98e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x016e}
0x98e2…9904 Head {h00=0x001e, h01=0x0050, text=»* SET CRN FOR INDEX FILE«, t00=0x0061, t01=0x0178}
0x9904…990e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x000a}
0x990e…993a Head {h00=0x0028, h01=0x0050, text=» LD A1,FDBADF,A6 FDB ADDR DATA FILEP«, t00=0x0062, t01=0x0014}
0x993a…9964 Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER ADDR«, t00=0x0062, t01=0x0040}
0x9964…9988 Head {h00=0x0020, h01=0x0050, text=» LDR A10,A2 CRN BUFFER ADDR «, t00=0x0062, t01=0x006a}
0x9988…99ae Head {h00=0x0022, h01=0x0050, text=» LDR A1,A6 FDB ADDR INDEX FILE«, t00=0x0062, t01=0x008e}
0x99ae…99da Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLGRN GET INDE X LOG REC NO«, t00=0x0062, t01=0x00b4}
0x99da…99f6 Head {h00=0x0018, h01=0x0050, text=» SC A2,CRNCIF+1,A10 «, t00=0x0062, t01=0x00e0}
0x99f6…9a20 Head {h00=0x0026, h01=0x0050, text=» ST A3,CRNCIF+2,A10 CRN INDEX FILE«, t00=0x0062, t01=0x00fc}
0x9a20…9a38 Head {h00=0x0014, h01=0x0050, text=» LC A2,ECBFC,A9 «, t00=0x0062, t01=0x0126}
0x9a38…9a52 Head {h00=0x0016, h01=0x0050, text=» SC A2,CRNCIF,A10 «, t00=0x0062, t01=0x013e}
0x9a52…9a74 Head {h00=0x001e, h01=0x0050, text=»* THAT WAS FILE CODE CRN«, t00=0x0062, t01=0x0158}
0x9a74…9a7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x017a}
0x9a7e…9a9c Head {h00=0x001a, h01=0x0050, text=»* SET RERTURN CODEXS«, t00=0x0062, t01=0x0184}
0x9a9c…9aa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0012}
0x9aa6…9ace Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x0063, t01=0x001c}
0x9ace…9ae6 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBEL,A9 «, t00=0x0063, t01=0x0044}
0x9ae6…9b04 Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 RETURN CODE «, t00=0x0063, t01=0x005c}
0x9b04…9b1e Head {h00=0x0016, h01=0x0050, text=» ABL DMTERX TENDIO«, t00=0x0063, t01=0x007a}
0x9b1e…9b2c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x0094}
0x9b2c…9b52 Head {h00=0x0022, h01=0x0050, text=»DMIRN EQU * INDEXED READ NEXT «, t00=0x0063, t01=0x00a2}
0x9b52…9b88 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0063, t01=0x00c8}
0x9b88…9ba4 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0063, t01=0x00fe}
0x9ba4…9bca Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD OFFSET«, t00=0x0063, t01=0x011a}
0x9bca…9bdc Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0063, t01=0x0140}
0x9bdc…9bfa Head {h00=0x001a, h01=0x0050, text=» SUK A3,10 BUFFER ADDR«, t00=0x0063, t01=0x0152}
0x9bfa…9c0e Head {h00=0x0010, h01=0x0050, text=»DMI100 EQU *«, t00=0x0063, t01=0x0170}
0x9c0e…9c28 Head {h00=0x0016, h01=0x0050, text=» ADR A2,A3 BUFFADR«, t00=0x0063, t01=0x0184}
0x9c28…9c46 Head {h00=0x001a, h01=0x0050, text=» ADK A2,10 RECORD ADDR«, t00=0x0064, t01=0x000e}
0x9c46…9c72 Head {h00=0x0028, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR OF STATUS CHAR«, t00=0x0064, t01=0x002c}
0x9c72…9c90 Head {h00=0x001a, h01=0x0050, text=» LDK A5,/FF USED MARK «, t00=0x0064, t01=0x0058}
0x9c90…9caa Head {h00=0x0016, h01=0x0050, text=» CCR A5,A2 STATUS «, t00=0x0064, t01=0x0076}
0x9caa…9cc4 Head {h00=0x0016, h01=0x0050, text=» RF(E) DMI120 USED«, t00=0x0064, t01=0x0090}
0x9cc4…9cdc Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A1«, t00=0x0064, t01=0x00aa}
0x9cdc…9d06 Head {h00=0x0026, h01=0x0050, text=» ST A4,FDBRRO,A1 LAST REC IN SECT «, t00=0x0064, t01=0x00c2}
0x9d06…9d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00ec}
0x9d10…9d30 Head {h00=0x001c, h01=0x0050, text=»* CHECK IF END OF FILE«, t00=0x0064, t01=0x00f6}
0x9d30…9d3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0116}
0x9d3a…9d52 Head {h00=0x0014, h01=0x0050, text=» LDR A9,A3 SAVE «, t00=0x0064, t01=0x0120}
0x9d52…9d74 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0064, t01=0x0138}
0x9d74…9d8c Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x0064, t01=0x015a}
0x9d8c…9daa Head {h00=0x001a, h01=0x0050, text=» RF(L) DMI106 NOT EOF «, t00=0x0064, t01=0x0172}
0x9daa…9dc4 Head {h00=0x0016, h01=0x0050, text=» RF(G) DMI105 EOF «, t00=0x0064, t01=0x0190}
0x9dc4…9dde Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x0065, t01=0x001a}
0x9dde…9dfc Head {h00=0x001a, h01=0x0050, text=» RF(L) DMI106 NOT EOF «, t00=0x0065, t01=0x0034}
0x9dfc…9e14 Head {h00=0x0014, h01=0x0050, text=»DMI105 LDR A3,A9«, t00=0x0065, t01=0x0052}
0x9e14…9e2a Head {h00=0x0012, h01=0x0050, text=» RF DMI030 EOF«, t00=0x0065, t01=0x006a}
0x9e2a…9e4a Head {h00=0x001c, h01=0x0050, text=»DMI106 LDR A3,A9 RESTORE«, t00=0x0065, t01=0x0080}
0x9e4a…9e66 Head {h00=0x0018, h01=0x0050, text=» RF DMI010 NEXT REC «, t00=0x0065, t01=0x00a0}
0x9e66…9e7c Head {h00=0x0012, h01=0x0050, text=»DMI120 EQU * «, t00=0x0065, t01=0x00bc}
0x9e7c…9e9e Head {h00=0x001e, h01=0x0050, text=»* INDEX RECORD IS FOUND «, t00=0x0065, t01=0x00d2}
0x9e9e…9ea8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00f4}
0x9ea8…9ec4 Head {h00=0x0018, h01=0x0050, text=» LDK A2,0 MARK FOUND«, t00=0x0065, t01=0x00fe}
0x9ec4…9ef6 Head {h00=0x002e, h01=0x0050, text=» ABL DMR006 CONT AS FOR INDEXED RAND READ «, t00=0x0065, t01=0x011a}
0x9ef6…9f0a Head {h00=0x0010, h01=0x0050, text=»DMI010 EQU *«, t00=0x0065, t01=0x014c}
0x9f0a…9f36 Head {h00=0x0028, h01=0x0050, text=» CF A14,RDNXTR GET NEXT INDEX RECORD«, t00=0x0065, t01=0x0160}
0x9f36…9f56 Head {h00=0x001c, h01=0x0050, text=» RB DMI100 RECORD FOUND «, t00=0x0065, t01=0x018c}
0x9f56…9f72 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0066, t01=0x001c}
0x9f72…9f9c Head {h00=0x0026, h01=0x0050, text=»DMI030 LDKL A1,/4000 KEY NOT FOUND«, t00=0x0066, t01=0x0038}
0x9f9c…9fb0 Head {h00=0x0010, h01=0x0050, text=»DMI035 EQU *«, t00=0x0066, t01=0x0062}
0x9fb0…9fce Head {h00=0x001a, h01=0x0050, text=» LDR A3,A3 BUFFER ADDR«, t00=0x0066, t01=0x0076}
0x9fce…9fee Head {h00=0x001c, h01=0x0050, text=» ABL(Z) DMTERX NO BUFFER«, t00=0x0066, t01=0x0094}
0x9fee…a012 Head {h00=0x0020, h01=0x0050, text=» ABL DMTERR ERROR AND BUFFER«, t00=0x0066, t01=0x00b4}
0xa012…a020 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0066, t01=0x00d8}
0xa020…a02a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00e6}
0xa02a…a054 Head {h00=0x0026, h01=0x0050, text=»DMINS2 EQU * INDEXED INSERT PART 2«, t00=0x0066, t01=0x00f0}
0xa054…a05e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x011a}
0xa05e…a094 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0066, t01=0x0124}
0xa094…a0a6 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x0066, t01=0x015a}
0xa0a6…a0be Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x0066, t01=0x016c}
0xa0be…a0d6 Head {h00=0x0014, h01=0x0050, text=» SUK A3,8 BUFSTA«, t00=0x0066, t01=0x0184}
0xa0d6…a0fc Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0067, t01=0x000c}
0xa0fc…a120 Head {h00=0x0020, h01=0x0050, text=»DMXDEL EQU * INDEXED DELETE «, t00=0x0067, t01=0x0032}
0xa120…a15a Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0067, t01=0x0056}
0xa15a…a178 Head {h00=0x001a, h01=0x0050, text=» LDR A11,A7 ORDER CODE«, t00=0x0067, t01=0x0090}
0xa178…a19a Head {h00=0x001e, h01=0x0050, text=» LDR A12,A8 PHYS ECB ADDR «, t00=0x0067, t01=0x00ae}
0xa19a…a1ac Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0067, t01=0x00d0}
0xa1ac…a1de Head {h00=0x002e, h01=0x0050, text=» SC A5,FDBDBR,A1 ZEROE INDEX FILE COUNTER «, t00=0x0067, t01=0x00e2}
0xa1de…a200 Head {h00=0x001e, h01=0x0050, text=» LDK A5,8 NR OF INDEX * 2 «, t00=0x0067, t01=0x0114}
0xa200…a21c Head {h00=0x0018, h01=0x0050, text=» LDR A10,A1 FDB DATA«, t00=0x0067, t01=0x0136}
0xa21c…a234 Head {h00=0x0014, h01=0x0050, text=»DXI020 SUK A5,2 «, t00=0x0067, t01=0x0152}
0xa234…a256 Head {h00=0x001e, h01=0x0050, text=» RF(N) DXI100 ALL INDEXES «, t00=0x0067, t01=0x016a}
0xa256…a26a Head {h00=0x0010, h01=0x0050, text=» LDR A6,A10 «, t00=0x0067, t01=0x018c}
0xa26a…a27c Head {h00=0x000e, h01=0x0050, text=» ADR A6,A5«, t00=0x0068, t01=0x0010}
0xa27c…a2a8 Head {h00=0x0028, h01=0x0050, text=» LD A1,FDBAI1,A6 FDB ADDR INDEX FILE«, t00=0x0068, t01=0x0022}
0xa2a8…a2c6 Head {h00=0x001a, h01=0x0050, text=» RB(Z) DXI020 NO INDEX«, t00=0x0068, t01=0x004e}
0xa2c6…a2d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x006c}
0xa2d0…a2fc Head {h00=0x0028, h01=0x0050, text=»* GET FILE CODE FOR THIS FDB ADDR «, t00=0x0068, t01=0x0076}
0xa2fc…a306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00a2}
0xa306…a31c Head {h00=0x0012, h01=0x0050, text=» LD* A6,SCTCDT«, t00=0x0068, t01=0x00ac}
0xa31c…a334 Head {h00=0x0014, h01=0x0050, text=»DXI030 SUK A6,4 «, t00=0x0068, t01=0x00c2}
0xa334…a34a Head {h00=0x0012, h01=0x0050, text=» LD A7,SCTCDT «, t00=0x0068, t01=0x00da}
0xa34a…a35c Head {h00=0x000e, h01=0x0050, text=» ADR A7,A6«, t00=0x0068, t01=0x00f0}
0xa35c…a370 Head {h00=0x0010, h01=0x0050, text=» CW A1,2,A7 «, t00=0x0068, t01=0x0102}
0xa370…a392 Head {h00=0x001e, h01=0x0050, text=» RB(NE) DXI030 SEARCH NEXT«, t00=0x0068, t01=0x0116}
0xa392…a3ae Head {h00=0x0018, h01=0x0050, text=» LDR A8,A1 FDB INDEX«, t00=0x0068, t01=0x0138}
0xa3ae…a3ce Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0068, t01=0x0154}
0xa3ce…a3e2 Head {h00=0x0010, h01=0x0050, text=» LC A6,1,A7 «, t00=0x0068, t01=0x0174}
0xa3e2…a404 Head {h00=0x001e, h01=0x0050, text=» SC A6,ECBFC,A8 INDEX FILE«, t00=0x0068, t01=0x0188}
0xa404…a418 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x0069, t01=0x001a}
0xa418…a42c Head {h00=0x0010, h01=0x0050, text=» SUK A6,QINS«, t00=0x0069, t01=0x002e}
0xa42c…a450 Head {h00=0x0020, h01=0x0050, text=» RF(E) DXI080 INDEXED DELETE«, t00=0x0069, t01=0x0042}
0xa450…a45a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0066}
0xa45a…a482 Head {h00=0x0024, h01=0x0050, text=»* GET ADDRESSS OF DATA RECORD «, t00=0x0069, t01=0x0070}
0xa482…a48c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0098}
0xa48c…a4b0 Head {h00=0x0020, h01=0x0050, text=» LD A6,ECBBA,A12 SECTOR ADDR«, t00=0x0069, t01=0x00a2}
0xa4b0…a4c8 Head {h00=0x0014, h01=0x0050, text=» ADK A6,2 CYLID «, t00=0x0069, t01=0x00c6}
0xa4c8…a4f0 Head {h00=0x0024, h01=0x0050, text=» AD A6,FDBRRO,A10 ADDR DATA REC «, t00=0x0069, t01=0x00de}
0xa4f0…a512 Head {h00=0x001e, h01=0x0050, text=» AD A6,FDBKA,A1 KEY OFFSET«, t00=0x0069, t01=0x0106}
0xa512…a53a Head {h00=0x0024, h01=0x0050, text=» LDK A7,/20 DELETE INDEX NOWAIT «, t00=0x0069, t01=0x0128}
0xa53a…a54c Head {h00=0x000e, h01=0x0050, text=» RF DXI090«, t00=0x0069, t01=0x0150}
0xa54c…a560 Head {h00=0x0010, h01=0x0050, text=»DXI080 EQU *«, t00=0x0069, t01=0x0162}
0xa560…a588 Head {h00=0x0024, h01=0x0050, text=» LD A9,DWTECB,A10 USER ECB ADDR «, t00=0x0069, t01=0x0176}
0xa588…a5b0 Head {h00=0x0024, h01=0x0050, text=» LD A6,ECBBA,A9 USER BUFFER ADDR«, t00=0x006a, t01=0x000e}
0xa5b0…a5d2 Head {h00=0x001e, h01=0x0050, text=» AD A6,FDBKA,A1 KEY OFFSET«, t00=0x006a, t01=0x0036}
0xa5d2…a5e8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x006a, t01=0x0058}
0xa5e8…a5fa Head {h00=0x000e, h01=0x0050, text=» LDR A6,A1«, t00=0x006a, t01=0x006e}
0xa5fa…a620 Head {h00=0x0022, h01=0x0050, text=» ADKL A6,FDBKEY ADDR KEY AREA «, t00=0x006a, t01=0x0080}
0xa620…a62c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x00a6}
0xa62c…a642 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x006a, t01=0x00b2}
0xa642…a66a Head {h00=0x0024, h01=0x0050, text=» LDK A7,/1F INSERT INDEX NOWAIT «, t00=0x006a, t01=0x00c8}
0xa66a…a67e Head {h00=0x0010, h01=0x0050, text=»DXI090 EQU *«, t00=0x006a, t01=0x00f0}
0xa67e…a688 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0104}
0xa688…a6a4 Head {h00=0x0018, h01=0x0050, text=»* A6 = KEY ADDRESS«, t00=0x006a, t01=0x010e}
0xa6a4…a6ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x012a}
0xa6ae…a6c6 Head {h00=0x0014, h01=0x0050, text=» ST A6,ECBBA,A8 «, t00=0x006a, t01=0x0134}
0xa6c6…a6ec Head {h00=0x0022, h01=0x0050, text=»* A1 = FDB ADDR IN DE XFILE «, t00=0x006a, t01=0x014c}
0xa6ec…a6fa Head {h00=0x000a, h01=0x0050, text=» LKM «, t00=0x006a, t01=0x0172}
0xa6fa…a70a Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x006a, t01=0x0180}
0xa70a…a71e Head {h00=0x0010, h01=0x0050, text=» DATA DMTAR5«, t00=0x006a, t01=0x0190}
0xa71e…a736 Head {h00=0x0014, h01=0x0050, text=» LD A7,ECBRC,A8 «, t00=0x006b, t01=0x0014}
0xa736…a754 Head {h00=0x001a, h01=0x0050, text=» RF(N) DMTAR5 REQ ERR «, t00=0x006b, t01=0x002c}
0xa754…a778 Head {h00=0x0020, h01=0x0050, text=» RB DXI020 NEXT INDEX DIRECT«, t00=0x006b, t01=0x004a}
0xa778…a78a Head {h00=0x000e, h01=0x0050, text=»DXI100 LKM«, t00=0x006b, t01=0x006e}
0xa78a…a79e Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x006b, t01=0x0080}
0xa79e…a7b2 Head {h00=0x0010, h01=0x0050, text=»DMTAR5 EQU *«, t00=0x006b, t01=0x0094}
0xa7b2…a7d8 Head {h00=0x0022, h01=0x0050, text=» LD A6,FDBADF,A1 FDB DATA FILE«, t00=0x006b, t01=0x00a8}
0xa7d8…a7fa Head {h00=0x001e, h01=0x0050, text=» LD A9,DWTECB,A6 USER ECB «, t00=0x006b, t01=0x00ce}
0xa7fa…a812 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x006b, t01=0x00f0}
0xa812…a836 Head {h00=0x0020, h01=0x0050, text=» ADR A1,A8 ECB INSERT INDEX «, t00=0x006b, t01=0x0108}
0xa836…a854 Head {h00=0x001a, h01=0x0050, text=» ADR A8,A6 ECB DISC IO«, t00=0x006b, t01=0x012c}
0xa854…a88c Head {h00=0x0034, h01=0x0050, text=» LD A1,ECBRC,A1 RET CODE BIT 10 AND 14 POSSIBLE «, t00=0x006b, t01=0x014a}
0xa88c…a8b0 Head {h00=0x0020, h01=0x0050, text=» ORS A1,ECBRC,A9 RC TO USER «, t00=0x006b, t01=0x0182}
0xa8b0…a8ce Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 RETURN CODE «, t00=0x006c, t01=0x0016}
0xa8ce…a8f8 Head {h00=0x0026, h01=0x0050, text=» LC A2,FDBDBR,A6 NR OF READY INDEX«, t00=0x006c, t01=0x0034}
0xa8f8…a918 Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 COUNT INDEXES «, t00=0x006c, t01=0x005e}
0xa918…a940 Head {h00=0x0024, h01=0x0050, text=» CC A2,FDBNIF,A6 TOT NR OF INDEX«, t00=0x006c, t01=0x007e}
0xa940…a956 Head {h00=0x0012, h01=0x0050, text=» RF(NE) DXI200«, t00=0x006c, t01=0x00a6}
0xa956…a96e Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x006c, t01=0x00bc}
0xa96e…a98c Head {h00=0x001a, h01=0x0050, text=» ANK A7,/3F ORDER CODE«, t00=0x006c, t01=0x00d4}
0xa98c…a9b0 Head {h00=0x0020, h01=0x0050, text=» SUK A7,QINS INDEXED INSERT «, t00=0x006c, t01=0x00f2}
0xa9b0…a9cc Head {h00=0x0018, h01=0x0050, text=» ABL(E) DMTERX READY«, t00=0x006c, t01=0x0116}
0xa9cc…a9fc Head {h00=0x002c, h01=0x0050, text=»* RESTORE REGISTERS FOR INDEXED DELETE«, t00=0x006c, t01=0x0132}
0xa9fc…aa06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0162}
0xaa06…aa2e Head {h00=0x0024, h01=0x0050, text=» LD A10,FDBECB+2,A6 SECTOR ADDR «, t00=0x006c, t01=0x016c}
0xaa2e…aa48 (109, 0, 400) Head {h00=0x0016, h01=0x0050, text=» ADKL A10,2 CYLID «, t00=0x006d, t01=0x0004}
0xaa48…aa62 Head {h00=0x0016, h01=0x0050, text=» AD A10,FDBRRO,A6 «, t00=0x006d, t01=0x001e}
0xaa62…aa8c Head {h00=0x0026, h01=0x0050, text=» AD A10,FDBRLE,A6 ADDR STATUS CHAR«, t00=0x006d, t01=0x0038}
0xaa8c…aaaa Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 STATUS FREE «, t00=0x006d, t01=0x0062}
0xaaaa…aadc Head {h00=0x002e, h01=0x0050, text=» ABL DMT350 CONTINUE AS FOR RANDOM DELETE «, t00=0x006d, t01=0x0080}
0xaadc…aaf0 Head {h00=0x0010, h01=0x0050, text=»DXI200 EQU *«, t00=0x006d, t01=0x00b2}
0xaaf0…ab08 Head {h00=0x0014, h01=0x0050, text=» SC A2,FDBDBR,A6«, t00=0x006d, t01=0x00c6}
0xab08…ab14 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x006d, t01=0x00de}
0xab14…ab3a Head {h00=0x0022, h01=0x0050, text=» DATA 3 EXIT. MORE INDEX LEFT «, t00=0x006d, t01=0x00ea}
0xab3a…ab48 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x0110}
0xab48…ab6a Head {h00=0x001e, h01=0x0050, text=»DMINIX EQU * INSERT INDEX «, t00=0x006d, t01=0x011e}
0xab6a…ab74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0140}
0xab74…ab9c Head {h00=0x0024, h01=0x0050, text=»DMDELX EQU * DELETE INDEX RECORD«, t00=0x006d, t01=0x014a}
0xab9c…abd2 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x006d, t01=0x0172}
0xabd2…abf8 Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB ADDR«, t00=0x006e, t01=0x0018}
0xabf8…ac20 Head {h00=0x0024, h01=0x0050, text=» LD A8,ECBBA,A9 BUFFER ADDR USER«, t00=0x006e, t01=0x003e}
0xac20…ac34 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A8 «, t00=0x006e, t01=0x0066}
0xac34…ac5c Head {h00=0x0024, h01=0x0050, text=» LD A11,FDBRLE,A1 RECORD LENGTH «, t00=0x006e, t01=0x007a}
0xac5c…ac7a Head {h00=0x001a, h01=0x0050, text=» SUKL A11,6 KEY LENGTH«, t00=0x006e, t01=0x00a2}
0xac7a…ac8e Head {h00=0x0010, h01=0x0050, text=» LDR A13,A14«, t00=0x006e, t01=0x00c0}
0xac8e…acc2 Head {h00=0x0030, h01=0x0050, text=» ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS«, t00=0x006e, t01=0x00d4}
0xacc2…acea Head {h00=0x0024, h01=0x0050, text=» CF A14,FNDKEY GET INDEX RECORD «, t00=0x006e, t01=0x0108}
0xacea…ad06 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x006e, t01=0x0130}
0xad06…ad22 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A2 RET CODE «, t00=0x006e, t01=0x014c}
0xad22…ad34 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x006e, t01=0x0168}
0xad34…ad5a Head {h00=0x0022, h01=0x0050, text=» ABL(Z) DMI035 NO SECTOR FOUND«, t00=0x006e, t01=0x017a}
0xad5a…ad7a Head {h00=0x001c, h01=0x0050, text=» LDR A13,A3 BUFFER ADDR «, t00=0x006f, t01=0x0010}
0xad7a…ada0 Head {h00=0x0022, h01=0x0050, text=» LD A4,FDBADF,A6 FDB DATA FILE«, t00=0x006f, t01=0x0030}
0xada0…adc2 Head {h00=0x001e, h01=0x0050, text=» LD A5,DWTECB,A4 USER ECB «, t00=0x006f, t01=0x0056}
0xadc2…adda Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTOR,A6 «, t00=0x006f, t01=0x0078}
0xadda…adee Head {h00=0x0010, h01=0x0050, text=» ANK A1,/3F «, t00=0x006f, t01=0x0090}
0xadee…ae04 Head {h00=0x0012, h01=0x0050, text=» SUK A1,QDELX «, t00=0x006f, t01=0x00a4}
0xae04…ae2e Head {h00=0x0026, h01=0x0050, text=» ABL(E) DEL000 DELETE INDEX RECORD«, t00=0x006f, t01=0x00ba}
0xae2e…ae38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00e4}
0xae38…ae64 Head {h00=0x0028, h01=0x0050, text=»* SET RC BIT 6 TO USER IF NEXT KEY«, t00=0x006f, t01=0x00ee}
0xae64…ae8a Head {h00=0x0022, h01=0x0050, text=»* IS SAME IN REQUESTED INDEX«, t00=0x006f, t01=0x011a}
0xae8a…ae94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0140}
0xae94…aea6 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x006f, t01=0x014a}
0xaea6…aece Head {h00=0x0024, h01=0x0050, text=» RF(NZ) INS050 NEXT KEY NOT SAME«, t00=0x006f, t01=0x015c}
0xaece…aefa Head {h00=0x0028, h01=0x0050, text=»* (SHORT KEY NOT ALLOWED IN FILE) «, t00=0x006f, t01=0x0184}
0xaefa…af04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0020}
0xaf04…af26 Head {h00=0x001e, h01=0x0050, text=» LC A4,ECBFC,A5 FILE CODE «, t00=0x0070, t01=0x002a}
0xaf26…af40 Head {h00=0x0016, h01=0x0050, text=» CC A4,FDBECB+1,A6«, t00=0x0070, t01=0x004c}
0xaf40…af6e Head {h00=0x002a, h01=0x0050, text=» RF(NE) INS049 NOT REQUESTED FILE CODE«, t00=0x0070, t01=0x0066}
0xaf6e…af8a Head {h00=0x0018, h01=0x0050, text=» LDKL A4,/200 BIT 6 «, t00=0x0070, t01=0x0094}
0xaf8a…afb0 Head {h00=0x0022, h01=0x0050, text=» ORS A4,ECBRC,A5 NEXT KEY SAME«, t00=0x0070, t01=0x00b0}
0xafb0…afc4 Head {h00=0x0010, h01=0x0050, text=»INS049 EQU *«, t00=0x0070, t01=0x00d6}
0xafc4…afda Head {h00=0x0012, h01=0x0050, text=» IFT INSLAS=1 «, t00=0x0070, t01=0x00ea}
0xafda…afe4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0100}
0xafe4…b004 Head {h00=0x001c, h01=0x0050, text=»* INSERT SAME KEY LAST«, t00=0x0070, t01=0x010a}
0xb004…b00e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x012a}
0xb00e…b024 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A6 FDB«, t00=0x0070, t01=0x0134}
0xb024…b046 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBRRO,A1 REC OFFS «, t00=0x0070, t01=0x014a}
0xb046…b058 Head {h00=0x000e, h01=0x0050, text=» RF INS100«, t00=0x0070, t01=0x016c}
0xb058…b06c Head {h00=0x0010, h01=0x0050, text=»INS080 EQU *«, t00=0x0070, t01=0x017e}
0xb06c…b090 (113, 0, 398) Head {h00=0x0020, h01=0x0050, text=» CF A14,RDNXTR GET NEXT REC «, t00=0x0071, t01=0x0004}
0xb090…b0a6 Head {h00=0x0012, h01=0x0050, text=» RF INS100 OK «, t00=0x0071, t01=0x0028}
0xb0a6…b0c0 Head {h00=0x0016, h01=0x0050, text=» ABL DEL045 ERROR «, t00=0x0071, t01=0x003e}
0xb0c0…b0d4 Head {h00=0x0010, h01=0x0050, text=»INS100 EQU *«, t00=0x0071, t01=0x0058}
0xb0d4…b0e6 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0071, t01=0x006c}
0xb0e6…b102 Head {h00=0x0018, h01=0x0050, text=» ADK A2,10 REC ADDR «, t00=0x0071, t01=0x007e}
0xb102…b126 Head {h00=0x0020, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR STATUS«, t00=0x0071, t01=0x009a}
0xb126…b13a Head {h00=0x0010, h01=0x0050, text=» LDK A5,/FF «, t00=0x0071, t01=0x00be}
0xb13a…b14c Head {h00=0x000e, h01=0x0050, text=» CCR A5,A2«, t00=0x0071, t01=0x00d2}
0xb14c…b166 Head {h00=0x0016, h01=0x0050, text=» RF(E) INS150 USED«, t00=0x0071, t01=0x00e4}
0xb166…b17e Head {h00=0x0014, h01=0x0050, text=» LD A5,FDBMRO,A1«, t00=0x0071, t01=0x00fe}
0xb17e…b196 Head {h00=0x0014, h01=0x0050, text=» ST A5,FDBRRO,A1«, t00=0x0071, t01=0x0116}
0xb196…b1c4 Head {h00=0x002a, h01=0x0050, text=» RB INS080 GET FIRST RE C IN NXT SECT «, t00=0x0071, t01=0x012e}
0xb1c4…b1d8 Head {h00=0x0010, h01=0x0050, text=»INS150 EQU *«, t00=0x0071, t01=0x015c}
0xb1d8…b1fa Head {h00=0x001e, h01=0x0050, text=» LC A5,-4,A2 DUPL KEY CHAR«, t00=0x0071, t01=0x0170}
0xb1fa…b218 (114, 0, 400) Head {h00=0x001a, h01=0x0050, text=» CWR A5,A11 KEY LENGTH«, t00=0x0072, t01=0x0004}
0xb218…b240 Head {h00=0x0024, h01=0x0050, text=» RB(E) INS080 NEXT SAME GET NEXT«, t00=0x0072, t01=0x0022}
0xb240…b24a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x004a}
0xb24a…b26e Head {h00=0x0020, h01=0x0050, text=»* UPDATE LAST SAME RECORD «, t00=0x0072, t01=0x0054}
0xb26e…b278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0078}
0xb278…b298 Head {h00=0x001c, h01=0x0050, text=» SC A11,-4,A2 NEXT SAME «, t00=0x0072, t01=0x0082}
0xb298…b2b0 Head {h00=0x0014, h01=0x0050, text=» LD A7,FDBRRO,A1«, t00=0x0072, t01=0x00a2}
0xb2b0…b2c8 Head {h00=0x0014, h01=0x0050, text=» CW A7,FDBMRO,A1«, t00=0x0072, t01=0x00ba}
0xb2c8…b2f2 Head {h00=0x0026, h01=0x0050, text=» RF(NE) INS160 SECT WRITTEN LATER «, t00=0x0072, t01=0x00d2}
0xb2f2…b2fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00fc}
0xb2fc…b314 Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x0072, t01=0x0106}
0xb314…b31e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x011e}
0xb31e…b33c Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE,WAIT«, t00=0x0072, t01=0x0128}
0xb33c…b348 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0072, t01=0x0146}
0xb348…b358 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0072, t01=0x0152}
0xb358…b378 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x0072, t01=0x0162}
0xb378…b38a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0072, t01=0x0182}
0xb38a…b3a2 (115, 0, 398) Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0073, t01=0x0004}
0xb3a2…b3ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x001c}
0xb3ac…b3c8 Head {h00=0x0018, h01=0x0050, text=»* GET NEXT RECORD «, t00=0x0073, t01=0x0026}
0xb3c8…b3d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0042}
0xb3d2…b3e6 Head {h00=0x0010, h01=0x0050, text=»INS160 EQU *«, t00=0x0073, t01=0x004c}
0xb3e6…b40c Head {h00=0x0022, h01=0x0050, text=» LDR A7,A5 NR OF SAME IN NEXT «, t00=0x0073, t01=0x0060}
0xb40c…b422 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A6 FDB«, t00=0x0073, t01=0x0086}
0xb422…b444 Head {h00=0x001e, h01=0x0050, text=» CF A14,RDNXTR GET NEXT RC«, t00=0x0073, t01=0x009c}
0xb444…b45a Head {h00=0x0012, h01=0x0050, text=» RF INS170 OK «, t00=0x0073, t01=0x00be}
0xb45a…b474 Head {h00=0x0016, h01=0x0050, text=» ABL DEL045 ERROR «, t00=0x0073, t01=0x00d4}
0xb474…b488 Head {h00=0x0010, h01=0x0050, text=»INS170 EQU *«, t00=0x0073, t01=0x00ee}
0xb488…b4a8 Head {h00=0x001c, h01=0x0050, text=» LDR A13,A3 BUFFER ADDR «, t00=0x0073, t01=0x0102}
0xb4a8…b4c0 Head {h00=0x0014, h01=0x0050, text=» LD A5,FDBADF,A6«, t00=0x0073, t01=0x0122}
0xb4c0…b4e6 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTECB,A5 USER ECB ADDR«, t00=0x0073, t01=0x013a}
0xb4e6…b4f2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x0160}
0xb4f2…b508 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0073, t01=0x016c}
0xb508…b51c Head {h00=0x0010, h01=0x0050, text=»INS050 EQU *«, t00=0x0073, t01=0x0182}
0xb51c…b526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0008}
0xb526…b552 Head {h00=0x0028, h01=0x0050, text=»* CREATE AN INDE XRECORD IN AREA 1«, t00=0x0074, t01=0x0012}
0xb552…b55c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x003e}
0xb55c…b57a Head {h00=0x001a, h01=0x0050, text=» LDR A1,A12 FROM ADDR «, t00=0x0074, t01=0x0048}
0xb57a…b584 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0066}
0xb584…b598 Head {h00=0x0010, h01=0x0050, text=» LDR A3,A14 «, t00=0x0074, t01=0x0070}
0xb598…b5b2 Head {h00=0x0016, h01=0x0050, text=» ADK A3,2 TO ADDR «, t00=0x0074, t01=0x0084}
0xb5b2…b5d0 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A11 KEY LENGTH«, t00=0x0074, t01=0x009e}
0xb5d0…b5ee Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTBM MOVE KEY«, t00=0x0074, t01=0x00bc}
0xb5ee…b600 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0074, t01=0x00da}
0xb600…b618 Head {h00=0x0014, h01=0x0050, text=» SCR A2,A3 DUMMY«, t00=0x0074, t01=0x00ec}
0xb618…b62a Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0074, t01=0x0104}
0xb62a…b642 Head {h00=0x0014, h01=0x0050, text=» SCR A2,A3 DUMMY«, t00=0x0074, t01=0x0116}
0xb642…b654 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0074, t01=0x012e}
0xb654…b676 Head {h00=0x001e, h01=0x0050, text=» SCR A7,A3 NR OF SAME CHAR«, t00=0x0074, t01=0x0140}
0xb676…b688 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0074, t01=0x0162}
0xb688…b6ae Head {h00=0x0022, h01=0x0050, text=» LDR A7,A3 ADDR OF LOG REC NR «, t00=0x0074, t01=0x0174}
0xb6ae…b6c8 Head {h00=0x0016, h01=0x0050, text=» LD A2,ECBCW+2,A5 «, t00=0x0075, t01=0x000a}
0xb6c8…b6f4 Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBCW,A5 REC NR DATA FILE REC«, t00=0x0075, t01=0x0024}
0xb6f4…b706 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A7«, t00=0x0075, t01=0x0050}
0xb706…b718 Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0075, t01=0x0062}
0xb718…b72a Head {h00=0x000e, h01=0x0050, text=» SCR A3,A7«, t00=0x0075, t01=0x0074}
0xb72a…b73c Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0075, t01=0x0086}
0xb73c…b74e Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0075, t01=0x0098}
0xb74e…b76c Head {h00=0x001a, h01=0x0050, text=» SCR A3,A7 LOG REC NR «, t00=0x0075, t01=0x00aa}
0xb76c…b77e Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0075, t01=0x00c8}
0xb77e…b796 Head {h00=0x0014, h01=0x0050, text=» LDK A1,/FF USED«, t00=0x0075, t01=0x00da}
0xb796…b7b4 Head {h00=0x001a, h01=0x0050, text=» SCR A1,A7 STATUS CHAR«, t00=0x0075, t01=0x00f2}
0xb7b4…b7d0 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0075, t01=0x0110}
0xb7d0…b7f8 Head {h00=0x0024, h01=0x0050, text=» CF A14,GTLGRN GET REC NR INDEX «, t00=0x0075, t01=0x012c}
0xb7f8…b802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0154}
0xb802…b832 Head {h00=0x002c, h01=0x0050, text=»* SAVE RECORD NR FOR FIRST MOVED INDEX«, t00=0x0075, t01=0x015e}
0xb832…b83c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x018e}
0xb83c…b852 Head {h00=0x0012, h01=0x0050, text=» ST A2,-28,A14«, t00=0x0076, t01=0x0008}
0xb852…b868 Head {h00=0x0012, h01=0x0050, text=» ST A3,-26,A14«, t00=0x0076, t01=0x001e}
0xb868…b876 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0076, t01=0x0034}
0xb876…b880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0042}
0xb880…b8be Head {h00=0x003a, h01=0x0050, text=»* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING«, t00=0x0076, t01=0x004c}
0xb8be…b8e6 Head {h00=0x0024, h01=0x0050, text=»* USED RECORDS ROLLED FORWARD «, t00=0x0076, t01=0x008a}
0xb8e6…b90e Head {h00=0x0024, h01=0x0050, text=»* A6,A11,A13 IS USED AT ENTRY «, t00=0x0076, t01=0x00b2}
0xb90e…b936 Head {h00=0x0024, h01=0x0050, text=» ADKL A11,7 RECORD LENGTH TOTAL «, t00=0x0076, t01=0x00da}
0xb936…b940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0102}
0xb940…b95c Head {h00=0x0018, h01=0x0050, text=»* USE D REGISTERS «, t00=0x0076, t01=0x010c}
0xb95c…b97e Head {h00=0x001e, h01=0x0050, text=»* A6 = FDB ADDR INDEX «, t00=0x0076, t01=0x0128}
0xb97e…b99a Head {h00=0x0018, h01=0x0050, text=»* A10 = AREA ADDR«, t00=0x0076, t01=0x014a}
0xb99a…b9c0 Head {h00=0x0022, h01=0x0050, text=»* A11 = RECORD LENGTH INDEX«, t00=0x0076, t01=0x0166}
0xb9c0…b9f0 Head {h00=0x002c, h01=0x0050, text=»* A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 «, t00=0x0076, t01=0x018c}
0xb9f0…ba18 Head {h00=0x0024, h01=0x0050, text=»* A13 = BUFFER ADDRESS SECTOR«, t00=0x0077, t01=0x002c}
0xba18…ba22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0054}
0xba22…ba36 Head {h00=0x0010, h01=0x0050, text=»INS190 EQU *«, t00=0x0077, t01=0x005e}
0xba36…ba52 Head {h00=0x0018, h01=0x0050, text=» LDKL A12,1 BUFADR2 «, t00=0x0077, t01=0x0072}
0xba52…ba66 Head {h00=0x0010, h01=0x0050, text=»INS200 EQU *«, t00=0x0077, t01=0x008e}
0xba66…ba78 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0077, t01=0x00a2}
0xba78…ba8c Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0077, t01=0x00b4}
0xba8c…baa8 Head {h00=0x0018, h01=0x0050, text=» RF(Z) INS210 BUFAR1«, t00=0x0077, t01=0x00c8}
0xbaa8…bad4 Head {h00=0x0028, h01=0x0050, text=» LDKL A1,RECBFZ RECORD BUUFFER SIZE «, t00=0x0077, t01=0x00e4}
0xbad4…baea Head {h00=0x0012, h01=0x0050, text=» SLL A1,1 BYTE«, t00=0x0077, t01=0x0110}
0xbaea…bb04 Head {h00=0x0016, h01=0x0050, text=»INS210 LDR A10,A14«, t00=0x0077, t01=0x0126}
0xbb04…bb16 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0077, t01=0x0140}
0xbb16…bb42 Head {h00=0x0028, h01=0x0050, text=» ADR A10,A1 RECORD BUFFER AREA ADDR «, t00=0x0077, t01=0x0152}
0xbb42…bb4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x017e}
0xbb4c…bb68 Head {h00=0x0018, h01=0x0050, text=»* SAVE LAST RECORD«, t00=0x0077, t01=0x0188}
0xbb68…bb72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0014}
0xbb72…bb86 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x0078, t01=0x001e}
0xbb86…bba2 Head {h00=0x0018, h01=0x0050, text=» ADK A1,10 BUFSTA+2 «, t00=0x0078, t01=0x0032}
0xbba2…bbd4 Head {h00=0x002e, h01=0x0050, text=» AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT «, t00=0x0078, t01=0x004e}
0xbbd4…bbe8 Head {h00=0x0010, h01=0x0050, text=» LDR A2,A11 «, t00=0x0078, t01=0x0080}
0xbbe8…bbfc Head {h00=0x0010, h01=0x0050, text=» LDR A3,A10 «, t00=0x0078, t01=0x0094}
0xbbfc…bc22 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTBM SAVE LAST RECORD«, t00=0x0078, t01=0x00a8}
0xbc22…bc42 Head {h00=0x001c, h01=0x0050, text=»* MOVE REST OF SECTOR «, t00=0x0078, t01=0x00ce}
0xbc42…bc4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00ee}
0xbc4c…bc60 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x0078, t01=0x00f8}
0xbc60…bc7c Head {h00=0x0018, h01=0x0050, text=» ADK A1,10 BUFSTA+2 «, t00=0x0078, t01=0x010c}
0xbc7c…bc9e Head {h00=0x001e, h01=0x0050, text=» AD A1,FDBRRO,A6 FROM ADDR«, t00=0x0078, t01=0x0128}
0xbc9e…bcb0 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A1«, t00=0x0078, t01=0x014a}
0xbcb0…bcc8 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBMRO,A6«, t00=0x0078, t01=0x015c}
0xbcc8…bcec Head {h00=0x0020, h01=0x0050, text=» SU A2,FDBRRO,A6 NR OF CHAR «, t00=0x0078, t01=0x0174}
0xbcec…bcfe Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0079, t01=0x0008}
0xbcfe…bd1a Head {h00=0x0018, h01=0x0050, text=» ADR A3,A11 TO ADDR «, t00=0x0079, t01=0x001a}
0xbd1a…bd36 Head {h00=0x0018, h01=0x0050, text=» CF A14,DMTBMR MOVE «, t00=0x0079, t01=0x0036}
0xbd36…bd54 Head {h00=0x001a, h01=0x0050, text=»* INSERT NEW RECORD «, t00=0x0079, t01=0x0052}
0xbd54…bd5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0070}
0xbd5e…bd82 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,RECBFZ BUFFER SIZE «, t00=0x0079, t01=0x007a}
0xbd82…bd9c Head {h00=0x0016, h01=0x0050, text=» SLL A1,1 BYTE NO «, t00=0x0079, t01=0x009e}
0xbd9c…bdb0 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0079, t01=0x00b8}
0xbdb0…bdcc Head {h00=0x0018, h01=0x0050, text=» RF(Z) INS250 BUFAR1«, t00=0x0079, t01=0x00cc}
0xbdcc…bdf2 Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 SELECT OTHER BUFFER «, t00=0x0079, t01=0x00e8}
0xbdf2…be06 Head {h00=0x0010, h01=0x0050, text=»INS250 EQU *«, t00=0x0079, t01=0x010e}
0xbe06…be24 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A14 FROM ADDR «, t00=0x0079, t01=0x0122}
0xbe24…be40 Head {h00=0x0018, h01=0x0050, text=» ADK A1,2 FROM ADDR «, t00=0x0079, t01=0x0140}
0xbe40…be5e Head {h00=0x001a, h01=0x0050, text=» LDR A2,A11 NR OF CHAR«, t00=0x0079, t01=0x015c}
0xbe5e…be78 Head {h00=0x0016, h01=0x0050, text=» LDR A3,A5 TO ADDR«, t00=0x0079, t01=0x017a}
0xbe78…be92 (122, 0, 400) Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x007a, t01=0x0004}
0xbe92…beaa Head {h00=0x0014, h01=0x0050, text=»* WRITE BUFFER«, t00=0x007a, t01=0x001e}
0xbeaa…beb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0036}
0xbeb4…bed8 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A14 USE STACK AS ECB«, t00=0x007a, t01=0x0040}
0xbed8…beec Head {h00=0x0010, h01=0x0050, text=» SUKL A8,24 «, t00=0x007a, t01=0x0064}
0xbeec…bf14 Head {h00=0x0024, h01=0x0050, text=» LC A2,FDBEXT+1,A6 VOL DEV CODE «, t00=0x007a, t01=0x0078}
0xbf14…bf28 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007a, t01=0x00a0}
0xbf28…bf3c Head {h00=0x0010, h01=0x0050, text=» STR A2,A8 «, t00=0x007a, t01=0x00b4}
0xbf3c…bf50 Head {h00=0x0010, h01=0x0050, text=» LDR A2,A13 «, t00=0x007a, t01=0x00c8}
0xbf50…bf68 Head {h00=0x0014, h01=0x0050, text=» ADK A2,8 BUFSTA«, t00=0x007a, t01=0x00dc}
0xbf68…bf8c Head {h00=0x0020, h01=0x0050, text=» ST A2,ECBBA,A8 SECTOR ADDR «, t00=0x007a, t01=0x00f4}
0xbf8c…bfb0 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,SECTLE SECTOR LGTH «, t00=0x007a, t01=0x0118}
0xbfb0…bfc8 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBRL,A8 «, t00=0x007a, t01=0x013c}
0xbfc8…bfea Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBSNR,A6 SECTOR NR«, t00=0x007a, t01=0x0154}
0xbfea…c00c Head {h00=0x001e, h01=0x0050, text=» ST A2,ECBCW,A8 SECTOR NR «, t00=0x007a, t01=0x0176}
0xc00c…c02c Head {h00=0x001c, h01=0x0050, text=» LDK A7,/95 WRITE , WAIT«, t00=0x007b, t01=0x0008}
0xc02c…c038 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x007b, t01=0x0028}
0xc038…c048 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x007b, t01=0x0034}
0xc048…c064 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x007b, t01=0x0044}
0xc064…c084 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x007b, t01=0x0060}
0xc084…c096 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x007b, t01=0x0080}
0xc096…c0ae Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x007b, t01=0x0092}
0xc0ae…c0b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00aa}
0xc0b8…c0f2 Head {h00=0x0036, h01=0x0050, text=»* IF SPILLED RECORD IS FREE, OPERATION IS READY «, t00=0x007b, t01=0x00b4}
0xc0f2…c0fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00ee}
0xc0fc…c120 Head {h00=0x0020, h01=0x0050, text=» LDR A2,A10 RECORD AREA ADDR«, t00=0x007b, t01=0x00f8}
0xc120…c13c Head {h00=0x0018, h01=0x0050, text=» ADR A2,A11 REC LGTH«, t00=0x007b, t01=0x011c}
0xc13c…c162 Head {h00=0x0022, h01=0x0050, text=» SUK A2,1 ADDR OF STATUS CHAR «, t00=0x007b, t01=0x0138}
0xc162…c17a Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A6«, t00=0x007b, t01=0x015e}
0xc17a…c1a6 Head {h00=0x0028, h01=0x0050, text=» ST A4,FDBRRO,A6 MAX OFFSET IN SECT «, t00=0x007b, t01=0x0176}
0xc1a6…c1b8 Head {h00=0x000e, h01=0x0050, text=» CCR A1,A2«, t00=0x007c, t01=0x0012}
0xc1b8…c1da Head {h00=0x001e, h01=0x0050, text=» RF(Z) INS400 FREE RECORD «, t00=0x007c, t01=0x0024}
0xc1da…c1e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0046}
0xc1e4…c200 Head {h00=0x0018, h01=0x0050, text=»* GET NEXT SECTOR «, t00=0x007c, t01=0x0050}
0xc200…c20a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x006c}
0xc20a…c226 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x007c, t01=0x0076}
0xc226…c246 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A13 BUFFER ADDR «, t00=0x007c, t01=0x0092}
0xc246…c27c Head {h00=0x0032, h01=0x0050, text=» CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR«, t00=0x007c, t01=0x00b2}
0xc27c…c292 Head {h00=0x0012, h01=0x0050, text=» RF INS260 OK «, t00=0x007c, t01=0x00e8}
0xc292…c2a4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A5«, t00=0x007c, t01=0x00fe}
0xc2a4…c2be Head {h00=0x0016, h01=0x0050, text=» ABL DMI035 ERROR «, t00=0x007c, t01=0x0110}
0xc2be…c2d2 Head {h00=0x0010, h01=0x0050, text=»INS260 EQU *«, t00=0x007c, t01=0x012a}
0xc2d2…c2f6 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x007c, t01=0x013e}
0xc2f6…c30a Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x007c, t01=0x0162}
0xc30a…c336 Head {h00=0x0028, h01=0x0050, text=» RB(Z) INS190 SWITCH RECORD BUFFERS «, t00=0x007c, t01=0x0176}
0xc336…c34a Head {h00=0x0010, h01=0x0050, text=» SUR A12,A12«, t00=0x007d, t01=0x0012}
0xc34a…c35c Head {h00=0x000e, h01=0x0050, text=» RB INS200«, t00=0x007d, t01=0x0026}
0xc35c…c36a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x0038}
0xc36a…c37e Head {h00=0x0010, h01=0x0050, text=»INS400 EQU *«, t00=0x007d, t01=0x0046}
0xc37e…c388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x005a}
0xc388…c3b4 Head {h00=0x0028, h01=0x0050, text=»* UPDATE LRN IF EOF IS ENCOUNTERED«, t00=0x007d, t01=0x0064}
0xc3b4…c3be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0090}
0xc3be…c3da Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x007d, t01=0x009a}
0xc3da…c3f2 Head {h00=0x0014, h01=0x0050, text=» CF A14,GTLGRN «, t00=0x007d, t01=0x00b6}
0xc3f2…c40a Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x007d, t01=0x00ce}
0xc40a…c426 Head {h00=0x0018, h01=0x0050, text=» RF(L) INS430 NO EOF«, t00=0x007d, t01=0x00e6}
0xc426…c440 Head {h00=0x0016, h01=0x0050, text=» RF(G) INS410 EOF «, t00=0x007d, t01=0x0102}
0xc440…c45a Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x007d, t01=0x011c}
0xc45a…c478 Head {h00=0x001a, h01=0x0050, text=» RF(NG) INS430 NO EOF «, t00=0x007d, t01=0x0136}
0xc478…c48c Head {h00=0x0010, h01=0x0050, text=»INS410 EQU *«, t00=0x007d, t01=0x0154}
0xc48c…c4b2 Head {h00=0x0022, h01=0x0050, text=» SC A2,FDBLRN,A6 LLAST REC NR «, t00=0x007d, t01=0x0168}
0xc4b2…c4ce Head {h00=0x0018, h01=0x0050, text=» ST A3,FDBLRN+1,A6 «, t00=0x007d, t01=0x018e}
0xc4ce…c4e8 Head {h00=0x0016, h01=0x0050, text=» LDKL A1,/1000 EOF«, t00=0x007e, t01=0x001a}
0xc4e8…c50c Head {h00=0x0020, h01=0x0050, text=» ORS A1,ECBRC,A9 EOF TO USER«, t00=0x007e, t01=0x0034}
0xc50c…c520 Head {h00=0x0010, h01=0x0050, text=»INS430 EQU *«, t00=0x007e, t01=0x0058}
0xc520…c52a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x006c}
0xc52a…c55e Head {h00=0x0030, h01=0x0050, text=»* UPDATE CRN-LINK FOR MOVED INDEX RECORDS «, t00=0x007e, t01=0x0076}
0xc55e…c568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00aa}
0xc568…c58c Head {h00=0x0020, h01=0x0050, text=» LDKL A12,1 ADD ON E TO CRN «, t00=0x007e, t01=0x00b4}
0xc58c…c59e Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x007e, t01=0x00d8}
0xc59e…c5c2 Head {h00=0x0020, h01=0x0050, text=» LDR A9,A3 LAST REC NR MOVED«, t00=0x007e, t01=0x00ea}
0xc5c2…c5da Head {h00=0x0014, h01=0x0050, text=» LD A10,-28,A14 «, t00=0x007e, t01=0x010e}
0xc5da…c604 Head {h00=0x0026, h01=0x0050, text=» LD A11,-26,A14 FIRST REC NR MOVED«, t00=0x007e, t01=0x0126}
0xc604…c632 Head {h00=0x002a, h01=0x0050, text=» CF A14,CRNUPD ADD 1 TO RECORD NUMBERS«, t00=0x007e, t01=0x0150}
0xc632…c63c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x017e}
0xc63c…c664 Head {h00=0x0024, h01=0x0050, text=»* UPDATE CRN IF SAME FILE CODE«, t00=0x007e, t01=0x0188}
0xc664…c66e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0020}
0xc66e…c692 Head {h00=0x0020, h01=0x0050, text=» LD A1,FDBADF,A5 FDB DATA F «, t00=0x007f, t01=0x002a}
0xc692…c6b8 Head {h00=0x0022, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER «, t00=0x007f, t01=0x004e}
0xc6b8…c6e2 Head {h00=0x0026, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB ADDR =4 «, t00=0x007f, t01=0x0074}
0xc6e2…c708 Head {h00=0x0022, h01=0x0050, text=» LC A4,ECBFC,A9 USER FILE CODE«, t00=0x007f, t01=0x009e}
0xc708…c722 Head {h00=0x0016, h01=0x0050, text=» CC A4,FDBECB+1,A5«, t00=0x007f, t01=0x00c4}
0xc722…c744 Head {h00=0x001e, h01=0x0050, text=» RF(NE) INS440 OTHRER FILE«, t00=0x007f, t01=0x00de}
0xc744…c75e Head {h00=0x0016, h01=0x0050, text=» ST A10,CRNCIF,A2 «, t00=0x007f, t01=0x0100}
0xc75e…c780 Head {h00=0x001e, h01=0x0050, text=» ST A11,CRNCIF+2,A2 REC NR«, t00=0x007f, t01=0x011a}
0xc780…c7a2 Head {h00=0x001e, h01=0x0050, text=» SC A4,CRNCIF,A2 FILE CODE«, t00=0x007f, t01=0x013c}
0xc7a2…c7b6 Head {h00=0x0010, h01=0x0050, text=»INS440 EQU *«, t00=0x007f, t01=0x015e}
0xc7b6…c7d2 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 FDB INDEX«, t00=0x007f, t01=0x0172}
0xc7d2…c7f0 Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 OK RET CODE «, t00=0x007f, t01=0x018e}
0xc7f0…c810 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A13 BUFFER ADDR «, t00=0x0080, t01=0x001c}
0xc810…c824 Head {h00=0x0010, h01=0x0050, text=» ABL DMTEX2 «, t00=0x0080, t01=0x003c}
0xc824…c832 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0080, t01=0x0050}
0xc832…c860 Head {h00=0x002a, h01=0x0050, text=»DEL000 EQU * DELETE INDEX RECORD CONT «, t00=0x0080, t01=0x005e}
0xc860…c882 Head {h00=0x001e, h01=0x0050, text=» LDR A12,A5 USER ECB ADDR «, t00=0x0080, t01=0x008c}
0xc882…c894 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0080, t01=0x00ae}
0xc894…c8a8 Head {h00=0x0010, h01=0x0050, text=»DEL010 EQU *«, t00=0x0080, t01=0x00c0}
0xc8a8…c8ce Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) DMI030 KEY NOT FOUND «, t00=0x0080, t01=0x00d4}
0xc8ce…c8d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00fa}
0xc8d8…c8fc Head {h00=0x0020, h01=0x0050, text=»* CHECK RECORD NR DATA REC«, t00=0x0080, t01=0x0104}
0xc8fc…c906 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0128}
0xc906…c91a Head {h00=0x0010, h01=0x0050, text=»DEL020 EQU *«, t00=0x0080, t01=0x0132}
0xc91a…c932 Head {h00=0x0014, h01=0x0050, text=» LD A1,FDBRRO,A6«, t00=0x0080, t01=0x0146}
0xc932…c944 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A3«, t00=0x0080, t01=0x015e}
0xc944…c95c Head {h00=0x0014, h01=0x0050, text=» AD A1,FDBRLE,A6«, t00=0x0080, t01=0x0170}
0xc95c…c984 Head {h00=0x0024, h01=0x0050, text=» ADK A1,7 BUFSTA+2-3=ADDR REC NR«, t00=0x0080, t01=0x0188}
0xc984…c996 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x0081, t01=0x0020}
0xc996…c9b8 Head {h00=0x001e, h01=0x0050, text=» CC A2,ECBCW+3,A12 REC NR «, t00=0x0081, t01=0x0032}
0xc9b8…c9dc Head {h00=0x0020, h01=0x0050, text=» RF(NE) DEL030 WRONG RECORD «, t00=0x0081, t01=0x0054}
0xc9dc…c9f0 Head {h00=0x0010, h01=0x0050, text=» LC A2,1,A1 «, t00=0x0081, t01=0x0078}
0xc9f0…ca02 Head {h00=0x000e, h01=0x0050, text=» ECR A2,A2«, t00=0x0081, t01=0x008c}
0xca02…ca1c Head {h00=0x0016, h01=0x0050, text=» LC A2,2,A1 REC NR«, t00=0x0081, t01=0x009e}
0xca1c…ca34 Head {h00=0x0014, h01=0x0050, text=» CW A2,ECBCW,A12«, t00=0x0081, t01=0x00b8}
0xca34…ca56 Head {h00=0x001e, h01=0x0050, text=» RF(E) DEL200 RECORD FOUND«, t00=0x0081, t01=0x00d0}
0xca56…ca6a Head {h00=0x0010, h01=0x0050, text=»DEL030 EQU *«, t00=0x0081, t01=0x00f2}
0xca6a…ca74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0106}
0xca74…ca96 Head {h00=0x001e, h01=0x0050, text=»* CHECK IF NEXT KEY SAME«, t00=0x0081, t01=0x0110}
0xca96…caa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0132}
0xcaa0…cac0 Head {h00=0x001c, h01=0x0050, text=» CC A11,-1,A1 KEY LENGTH«, t00=0x0081, t01=0x013c}
0xcac0…cae8 Head {h00=0x0024, h01=0x0050, text=» RB(NE) DEL010 NEXT KEY NOT SAME«, t00=0x0081, t01=0x015c}
0xcae8…cb04 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0081, t01=0x0184}
0xcb04…cb18 Head {h00=0x0010, h01=0x0050, text=»DEL040 EQU *«, t00=0x0082, t01=0x0010}
0xcb18…cb44 Head {h00=0x0028, h01=0x0050, text=» CF A14,RDNXTR GET NEXT INDEX RECORD«, t00=0x0082, t01=0x0024}
0xcb44…cb5a Head {h00=0x0012, h01=0x0050, text=» RF DEL050 OK «, t00=0x0082, t01=0x0050}
0xcb5a…cb7e Head {h00=0x0020, h01=0x0050, text=»DEL045 LDR A1,A5 ERROR CODE «, t00=0x0082, t01=0x0066}
0xcb7e…cb98 Head {h00=0x0016, h01=0x0050, text=» ABL DMI035 ERROR «, t00=0x0082, t01=0x008a}
0xcb98…cbac Head {h00=0x0010, h01=0x0050, text=»DEL050 EQU *«, t00=0x0082, t01=0x00a4}
0xcbac…cbb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00b8}
0xcbb6…cbda Head {h00=0x0020, h01=0x0050, text=»* CHECK IF RECORD IS USED «, t00=0x0082, t01=0x00c2}
0xcbda…cbe4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00e6}
0xcbe4…cc08 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x0082, t01=0x00f0}
0xcc08…cc1a Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0082, t01=0x0114}
0xcc1a…cc38 Head {h00=0x001a, h01=0x0050, text=» ADK A2,10 BUFSTA + 2 «, t00=0x0082, t01=0x0126}
0xcc38…cc60 Head {h00=0x0024, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR OF STATUS «, t00=0x0082, t01=0x0144}
0xcc60…cc74 Head {h00=0x0010, h01=0x0050, text=» LDK A5,/FF «, t00=0x0082, t01=0x016c}
0xcc74…cc86 Head {h00=0x000e, h01=0x0050, text=» CCR A5,A2«, t00=0x0082, t01=0x0180}
0xcc86…cca0 (131, 0, 400) Head {h00=0x0016, h01=0x0050, text=» RB(E) DEL020 USED«, t00=0x0083, t01=0x0004}
0xcca0…ccb8 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A1«, t00=0x0083, t01=0x001e}
0xccb8…cce4 Head {h00=0x0028, h01=0x0050, text=» ST A4,FDBRRO,A1 LAST REC IN SECTOR «, t00=0x0083, t01=0x0036}
0xcce4…cd00 Head {h00=0x0018, h01=0x0050, text=» RB DEL040 NEXT REC «, t00=0x0083, t01=0x0062}
0xcd00…cd0e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0083, t01=0x007e}
0xcd0e…cd30 Head {h00=0x001e, h01=0x0050, text=»DEL200 EQU * RECORD FOUND «, t00=0x0083, t01=0x008c}
0xcd30…cd3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x00ae}
0xcd3a…cd64 Head {h00=0x0026, h01=0x0050, text=»* SET RC BIT 6 IF NEXT KEY SAME «, t00=0x0083, t01=0x00b8}
0xcd64…cd6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x00e2}
0xcd6e…cd96 Head {h00=0x0024, h01=0x0050, text=» LC A2,ECBFC,A12 USER FILE CODE «, t00=0x0083, t01=0x00ec}
0xcd96…cda8 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0083, t01=0x0114}
0xcda8…cdcc Head {h00=0x0020, h01=0x0050, text=» LC A7,-1,A1 NR OF SAME CHAR«, t00=0x0083, t01=0x0126}
0xcdcc…ce02 Head {h00=0x0032, h01=0x0050, text=» ST A7,16,A14 SAVE IN RECORD BUFFER AFTER ECB «, t00=0x0083, t01=0x014a}
0xce02…ce1e Head {h00=0x0018, h01=0x0050, text=» CC A2,FDBECB+1,A6 «, t00=0x0083, t01=0x0180}
0xce1e…ce4c Head {h00=0x002a, h01=0x0050, text=» RF(NE) DEL220 NOT REQUESTED FILE CODE«, t00=0x0084, t01=0x000c}
0xce4c…ce6a Head {h00=0x001a, h01=0x0050, text=» CWR A11,A7 KEY LENGTH«, t00=0x0084, t01=0x003a}
0xce6a…ce92 Head {h00=0x0024, h01=0x0050, text=» RF(NE) DEL220 NEXT KEY NOT SAME«, t00=0x0084, t01=0x0058}
0xce92…cea8 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/200 «, t00=0x0084, t01=0x0080}
0xcea8…ced0 Head {h00=0x0024, h01=0x0050, text=» ORS A4,ECBRC,A12 NEXT KEY SAME «, t00=0x0084, t01=0x0096}
0xced0…cee4 Head {h00=0x0010, h01=0x0050, text=»DEL220 EQU *«, t00=0x0084, t01=0x00be}
0xcee4…ceee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00d2}
0xceee…cf16 Head {h00=0x0024, h01=0x0050, text=»* MOVE UP RECORDS OVER DELETED«, t00=0x0084, t01=0x00dc}
0xcf16…cf20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0104}
0xcf20…cf48 Head {h00=0x0024, h01=0x0050, text=» ADKL A11,7 TOTAL RECORD LENGTH «, t00=0x0084, t01=0x010e}
0xcf48…cf5c Head {h00=0x0010, h01=0x0050, text=» LDR A3,A13 «, t00=0x0084, t01=0x0136}
0xcf5c…cf78 Head {h00=0x0018, h01=0x0050, text=» ADK A3,10 BUFSTA+2 «, t00=0x0084, t01=0x014a}
0xcf78…cf98 Head {h00=0x001c, h01=0x0050, text=» AD A3,FDBRRO,A6 TO ADDR«, t00=0x0084, t01=0x0166}
0xcf98…cfaa Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0084, t01=0x0186}
0xcfaa…cfc8 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A11 FROM ADDR «, t00=0x0085, t01=0x0008}
0xcfc8…cfe0 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBMRO,A6«, t00=0x0085, t01=0x0026}
0xcfe0…d004 Head {h00=0x0020, h01=0x0050, text=» SU A2,FDBRRO,A6 NR OF CHAR «, t00=0x0085, t01=0x003e}
0xd004…d01e Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x0085, t01=0x0062}
0xd01e…d028 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x007c}
0xd028…d048 Head {h00=0x001c, h01=0x0050, text=»* SET LAST RECORD FREE«, t00=0x0085, t01=0x0086}
0xd048…d052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x00a6}
0xd052…d066 Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0085, t01=0x00b0}
0xd066…d078 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0085, t01=0x00c4}
0xd078…d08a Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0085, t01=0x00d6}
0xd08a…d0a8 Head {h00=0x001a, h01=0x0050, text=» SCR A1,A3 STATUS FREE«, t00=0x0085, t01=0x00e8}
0xd0a8…d0b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0106}
0xd0b2…d0da Head {h00=0x0024, h01=0x0050, text=»* UPDATE CRN FOR MOVED RECORDS«, t00=0x0085, t01=0x0110}
0xd0da…d0e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0138}
0xd0e4…d100 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0085, t01=0x0142}
0xd100…d122 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0085, t01=0x015e}
0xd122…d136 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A2 «, t00=0x0085, t01=0x0180}
0xd136…d15c (134, 0, 398) Head {h00=0x0022, h01=0x0050, text=» LDR A11,A3 FIRST REC NR MOVED«, t00=0x0086, t01=0x0004}
0xd15c…d180 Head {h00=0x0020, h01=0x0050, text=» LD A12,FDBRRO,A6 OLD OFFSET«, t00=0x0086, t01=0x002a}
0xd180…d198 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A6«, t00=0x0086, t01=0x004e}
0xd198…d1bc Head {h00=0x0020, h01=0x0050, text=» ST A4,FDBRRO,A6 MAX OFFSET «, t00=0x0086, t01=0x0066}
0xd1bc…d1e4 Head {h00=0x0024, h01=0x0050, text=» CF A14,GTLGRN LAST REC NR MOVED«, t00=0x0086, t01=0x008a}
0xd1e4…d1f6 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0086, t01=0x00b2}
0xd1f6…d210 Head {h00=0x0016, h01=0x0050, text=» LDR A9,A3 REC NR «, t00=0x0086, t01=0x00c4}
0xd210…d236 Head {h00=0x0022, h01=0x0050, text=» ST A12,FDBRRO,A6 RESET OFFSET«, t00=0x0086, t01=0x00de}
0xd236…d24a Head {h00=0x0010, h01=0x0050, text=» LDKL A12,-1«, t00=0x0086, t01=0x0104}
0xd24a…d274 Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNUPD UPDATE CRN BUFFERS «, t00=0x0086, t01=0x0118}
0xd274…d29c Head {h00=0x0024, h01=0x0050, text=» LDKL A12,1 MARK BUFFER CHANGED «, t00=0x0086, t01=0x0142}
0xd29c…d2b0 Head {h00=0x0010, h01=0x0050, text=»DEL240 EQU *«, t00=0x0086, t01=0x016a}
0xd2b0…d2c8 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBRRO,A5«, t00=0x0086, t01=0x017e}
0xd2c8…d2f0 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DEL290 NOT FIRST RECORD «, t00=0x0087, t01=0x0008}
0xd2f0…d306 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A5 FDB«, t00=0x0087, t01=0x0030}
0xd306…d328 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0087, t01=0x0046}
0xd328…d33a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0087, t01=0x0068}
0xd33a…d34c Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0087, t01=0x007a}
0xd34c…d35e Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x0087, t01=0x008c}
0xd35e…d370 Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0087, t01=0x009e}
0xd370…d398 Head {h00=0x0024, h01=0x0050, text=» CF A14,DSUMOD A1,A2 = A1,A2 - 1«, t00=0x0087, t01=0x00b0}
0xd398…d3b8 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DEL600 FILE START«, t00=0x0087, t01=0x00d8}
0xd3b8…d3d4 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 FDB ADDR «, t00=0x0087, t01=0x00f8}
0xd3d4…d3f8 Head {h00=0x0020, h01=0x0050, text=» CF A14,CALSNO GET SECTOR NR«, t00=0x0087, t01=0x0114}
0xd3f8…d414 Head {h00=0x0018, h01=0x0050, text=» LDR A5,A6 FDB ADDR «, t00=0x0087, t01=0x0138}
0xd414…d426 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0087, t01=0x0154}
0xd426…d448 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DEL600 FILE START «, t00=0x0087, t01=0x0166}
0xd448…d45c Head {h00=0x0010, h01=0x0050, text=» LDR A8,A14 «, t00=0x0087, t01=0x0188}
0xd45c…d478 Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 ECB ADDR «, t00=0x0088, t01=0x000c}
0xd478…d48c Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0088, t01=0x0028}
0xd48c…d4b4 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DEL245 BUFFER NOT CHANGED«, t00=0x0088, t01=0x003c}
0xd4b4…d4be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0064}
0xd4be…d4d6 Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x0088, t01=0x006e}
0xd4d6…d4e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0086}
0xd4e0…d4fe Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x0088, t01=0x0090}
0xd4fe…d50a Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0088, t01=0x00ae}
0xd50a…d51a Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0088, t01=0x00ba}
0xd51a…d530 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A5 FDB«, t00=0x0088, t01=0x00ca}
0xd530…d550 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x0088, t01=0x00e0}
0xd550…d562 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0088, t01=0x0100}
0xd562…d57a Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0088, t01=0x0112}
0xd57a…d5a6 Head {h00=0x0028, h01=0x0050, text=» SUR A12,A12 BUFFER NOT CHANGED YET «, t00=0x0088, t01=0x012a}
0xd5a6…d5ba Head {h00=0x0010, h01=0x0050, text=»DEL245 EQU *«, t00=0x0088, t01=0x0156}
0xd5ba…d5ce Head {h00=0x0010, h01=0x0050, text=» LDR A3,A13 «, t00=0x0088, t01=0x016a}
0xd5ce…d5f4 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0088, t01=0x017e}
0xd5f4…d5fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0014}
0xd5fe…d61e Head {h00=0x001c, h01=0x0050, text=»* GET PREVIOUS SECTOR «, t00=0x0089, t01=0x001e}
0xd61e…d628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x003e}
0xd628…d644 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x0089, t01=0x0048}
0xd644…d656 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0089, t01=0x0064}
0xd656…d678 Head {h00=0x001e, h01=0x0050, text=» CF A14,RDNXTR GET SECTOR «, t00=0x0089, t01=0x0076}
0xd678…d68e Head {h00=0x0012, h01=0x0050, text=» RF DEL250 OK «, t00=0x0089, t01=0x0098}
0xd68e…d6aa Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0089, t01=0x00ae}
0xd6aa…d6bc Head {h00=0x000e, h01=0x0050, text=» RB DEL045«, t00=0x0089, t01=0x00ca}
0xd6bc…d6d0 Head {h00=0x0010, h01=0x0050, text=»DEL250 EQU *«, t00=0x0089, t01=0x00dc}
0xd6d0…d6e6 Head {h00=0x0012, h01=0x0050, text=» LDR A5,A1 FDB«, t00=0x0089, t01=0x00f0}
0xd6e6…d70a Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x0089, t01=0x0106}
0xd70a…d722 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A5«, t00=0x0089, t01=0x012a}
0xd722…d734 Head {h00=0x000e, h01=0x0050, text=» RF DEL300«, t00=0x0089, t01=0x0142}
0xd734…d748 Head {h00=0x0010, h01=0x0050, text=»DEL290 EQU *«, t00=0x0089, t01=0x0154}
0xd748…d760 Head {h00=0x0014, h01=0x0050, text=» SU A4,FDBRLE,A5«, t00=0x0089, t01=0x0168}
0xd760…d772 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0089, t01=0x0180}
0xd772…d786 (138, 0, 398) Head {h00=0x0010, h01=0x0050, text=»DEL300 EQU *«, t00=0x008a, t01=0x0004}
0xd786…d7b4 Head {h00=0x002a, h01=0x0050, text=» ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET«, t00=0x008a, t01=0x0018}
0xd7b4…d7d0 Head {h00=0x0018, h01=0x0050, text=» ADK A4,10 BUFSTA+2 «, t00=0x008a, t01=0x0046}
0xd7d0…d7f0 Head {h00=0x001c, h01=0x0050, text=» ADR A4,A13 RECORD ADDR «, t00=0x008a, t01=0x0062}
0xd7f0…d81a Head {h00=0x0026, h01=0x0050, text=» AD A4,FDBRLE,A5 STATUS CHAR ADDR «, t00=0x008a, t01=0x0082}
0xd81a…d82e Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x008a, t01=0x00ac}
0xd82e…d840 Head {h00=0x000e, h01=0x0050, text=» CCR A2,A4«, t00=0x008a, t01=0x00c0}
0xd840…d85c Head {h00=0x0018, h01=0x0050, text=» RB(NE) DEL240 FREE «, t00=0x008a, t01=0x00d2}
0xd85c…d88e Head {h00=0x002e, h01=0x0050, text=» LC A2,17,A14 NR OF SAME IN DELETED RECORD«, t00=0x008a, t01=0x00ee}
0xd88e…d8a2 Head {h00=0x0010, h01=0x0050, text=» CC A2,-4,A4«, t00=0x008a, t01=0x0120}
0xd8a2…d8b8 Head {h00=0x0012, h01=0x0050, text=» RF(NL) DEL600«, t00=0x008a, t01=0x0134}
0xd8b8…d8e4 Head {h00=0x0028, h01=0x0050, text=» SC A2,-4,A4 MAKE NR OF SAME SMALLER«, t00=0x008a, t01=0x014a}
0xd8e4…d904 Head {h00=0x001c, h01=0x0050, text=» RF DEL700 WRITE SECTOR «, t00=0x008a, t01=0x0176}
0xd904…d918 Head {h00=0x0010, h01=0x0050, text=»DEL600 EQU *«, t00=0x008b, t01=0x0008}
0xd918…d92c Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x008b, t01=0x001c}
0xd92c…d954 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DEL900 BUFFER NOT CHANGED«, t00=0x008b, t01=0x0030}
0xd954…d95e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0058}
0xd95e…d976 Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x008b, t01=0x0062}
0xd976…d980 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x007a}
0xd980…d994 Head {h00=0x0010, h01=0x0050, text=»DEL700 EQU *«, t00=0x008b, t01=0x0084}
0xd994…d9a8 Head {h00=0x0010, h01=0x0050, text=» LDR A8,A14 «, t00=0x008b, t01=0x0098}
0xd9a8…d9c4 Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 ECB ADDR «, t00=0x008b, t01=0x00ac}
0xd9c4…d9e2 Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x008b, t01=0x00c8}
0xd9e2…d9ee Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x008b, t01=0x00e6}
0xd9ee…d9fe Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x008b, t01=0x00f2}
0xd9fe…da1a Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x008b, t01=0x0102}
0xda1a…da3a Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x008b, t01=0x011e}
0xda3a…da4c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x008b, t01=0x013e}
0xda4c…da64 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x008b, t01=0x0150}
0xda64…da78 Head {h00=0x0010, h01=0x0050, text=»DEL900 EQU *«, t00=0x008b, t01=0x0168}
0xda78…da8c Head {h00=0x0010, h01=0x0050, text=» ABL INS440 «, t00=0x008b, t01=0x017c}
0xda8c…da98 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x0190}
0xda98…daa4 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x008c, t01=0x000c}
0xdaa4…daa8 Head {h00=0x4004, h01=0x0000}
0xdaa8…daac 00 8c 00 18 ┆ ┆
0xdaac…dab4 (141, 1, 8) 20 04 00 00 00 8d 00 04 ┆ ┆
0xdab4…db04 (142, 0, 400) 02 04 c2 4d 50 59 4d 4f 44 46 00 05 01 90 00 2c 00 28 03 13 00 00 02 9f 88 90 00 00 00 30 07 00 e7 44 00 00 00 24 85 04 f6 a1 00 00 00 56 84 54 00 00 00 32 14 01 07 00 86 54 00 06 00 12 00 2c 00 28 03 13 00 00 02 b7 80 00 00 00 00 34 16 01 ┆ MPYMODF , ( 0 D $ V T 2 T , ( 4 ┆
0xdb04…db54 17 01 9e 10 5e 06 92 1c 53 00 57 00 a2 20 7f ff 11 01 83 08 82 04 81 14 86 14 00 06 00 42 00 10 00 0c 05 05 dc 4d 4f 56 3a 55 53 ff 02 d6 00 06 00 72 00 2c 00 28 03 13 00 00 02 d5 00 00 f0 3a 83 0c 55 00 85 3b 84 04 24 01 54 00 84 08 24 01 ┆ ^ S W B MOV:US r , ( : U ; $ T $ ┆
0xdb54…dba4 54 00 84 0c 24 01 54 00 78 8c 85 3a f0 3a 00 06 00 86 00 2c 00 28 03 13 00 00 02 f5 00 00 84 08 24 01 54 00 d4 24 e4 29 12 01 1b 01 5d 14 11 02 d4 24 e5 10 e5 29 12 01 1b 01 59 16 5f 24 00 06 00 b6 00 2c 00 28 03 13 00 00 03 15 00 00 1b 01 ┆T $ T x : : , ( $ T $ ) ] $ ) Y _$ , ( ┆
0xdba4…dbf4 55 00 84 04 85 0c 78 8c 94 14 d5 30 e5 14 e5 29 5f 38 d5 24 5f 0a d4 24 e4 29 11 01 12 01 00 06 00 e6 00 10 00 0c 05 05 dc 4d 4f 56 3a 53 55 c4 03 3a 00 06 01 16 00 2c 00 28 03 13 00 00 03 35 00 00 1b 01 59 50 5f 4a 83 0c 55 00 85 3b 84 08 ┆U x 0 )_8 $_ $ ) MOV:SU : , ( 5 YP_J U ; ┆
0xdbf4…dc44 24 01 54 00 84 04 24 01 54 00 84 0c 24 01 54 00 70 8c 00 06 01 2a 00 2c 00 28 03 13 00 00 03 55 00 00 85 3a f0 3a 84 04 24 01 54 00 d4 28 57 00 e4 24 e4 10 11 01 1b 01 55 00 e4 24 d4 29 11 01 12 02 00 06 01 5a 00 2c 00 28 03 13 00 00 03 75 ┆$ T $ T $ T p * , ( U : : $ T (W $ U $ ) Z , ( u┆
0xdc44…dc46 (143, 0, 2) 14 18 ┆ ┆
0xdc46…dc96 (144, 0, 400) 00 32 00 50 5c 49 44 45 4e 54 20 44 56 4b 42 30 32 20 5c 52 45 4c 20 39 2e 32 20 37 39 2d 31 31 2d 31 36 20 20 38 37 30 31 30 35 30 34 30 39 32 30 20 00 00 00 04 00 04 00 50 00 00 00 3a 00 22 00 50 2a 20 20 4b 45 59 42 4f 41 52 44 20 44 45 ┆ 2 P IDENT DVKB02 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DE┆
0xdc96…dce6 56 49 43 45 20 57 4f 52 4b 20 54 41 42 4c 45 20 00 00 00 42 00 06 00 50 2a 20 00 00 00 68 00 1e 00 50 5c 45 4e 54 52 59 5c 44 56 4b 42 30 32 5c 54 41 42 4c 45 20 45 4e 54 52 59 20 00 00 00 72 00 12 00 50 5c 45 58 54 52 4e 5c 43 54 41 42 30 ┆VICE WORK TABLE B P* h P ENTRY DVKB02 TABLE ENTRY r P EXTRN CTAB0┆
0xdce6…dd36 33 20 00 00 00 94 00 28 00 50 5c 45 58 54 52 4e 5c 4b 42 41 44 33 5c 50 4f 49 4e 54 45 52 20 54 4f 20 41 44 44 52 45 53 53 42 4c 4f 43 4b 00 00 00 aa 00 12 00 50 5c 45 58 54 52 4e 5c 44 56 44 59 30 32 20 00 00 00 d6 00 10 00 50 4d 4d 55 50 ┆3 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY02 PMMUP┆
0xdd36…dd86 41 47 5c 45 51 55 5c 31 00 00 00 ec 00 06 00 50 2a 20 00 00 01 00 00 1c 00 50 44 56 4b 42 30 32 5c 45 51 55 5c 2a 5c 54 41 42 4c 45 20 45 4e 54 52 59 00 00 01 0a 00 22 00 50 5c 44 41 54 41 5c 2f 31 31 30 30 5c 43 48 41 4e 4e 45 4c 20 50 41 ┆AG EQU 1 P* PDVKB02 EQU * TABLE ENTRY " P DATA /1100 CHANNEL PA┆
0xdd86…ddd6 52 41 4d 45 54 45 52 20 00 00 01 2a 00 30 00 50 5c 44 41 54 41 5c 2f 38 30 30 30 5c 53 54 41 54 55 53 2e 2f 38 30 30 30 20 4d 45 41 4e 53 20 44 45 56 49 43 45 20 52 45 41 44 59 20 00 00 01 50 00 18 00 50 5c 44 41 54 41 5c 30 5c 45 43 42 20 ┆RAMETER * 0 P DATA /8000 STATUS./8000 MEANS DEVICE READY P P DATA 0 ECB ┆
0xddd6…de26 (145, 0, 400) 41 44 44 52 45 53 53 20 00 00 01 84 00 1e 00 50 5c 44 41 54 41 5c 44 57 54 45 4e 44 2d 44 56 4b 42 30 32 5c 4f 52 44 45 52 20 00 01 00 10 00 28 00 50 5c 44 41 54 41 5c 4b 42 41 44 33 5c 50 4f 49 4e 54 45 52 20 54 4f 20 41 44 44 52 45 53 53 ┆ADDRESS P DATA DWTEND-DVKB02 ORDER ( P DATA KBAD3 POINTER TO ADDRESS┆
0xde26…de76 20 42 4c 4f 43 4b 00 01 00 32 00 1c 00 50 5c 44 41 54 41 5c 27 4b 42 27 5c 54 54 41 42 2d 41 44 44 52 45 53 53 20 00 01 00 5e 00 24 00 50 5c 44 41 54 41 5c 30 5c 57 41 49 54 2f 41 43 54 49 56 41 54 45 20 49 4e 44 49 43 41 54 4f 52 20 00 01 ┆ BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ┆
0xde76…dec6 00 7e 00 1a 00 50 5c 44 41 54 41 5c 30 5c 54 45 52 4d 49 4e 41 4c 20 51 55 45 55 45 00 01 00 a6 00 12 00 0d 5c 49 46 54 5c 4d 4d 55 50 41 47 3d 31 20 00 01 00 c4 00 26 00 22 5c 44 41 54 41 5c 30 5c 53 41 56 45 20 41 52 45 41 20 55 53 45 52 ┆ ~ P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER┆
0xdec6…df16 20 45 43 42 20 41 44 44 52 45 53 53 00 01 00 da 00 20 00 1c 5c 44 41 54 41 5c 44 45 56 45 43 42 5c 4d 4d 55 20 45 43 42 20 41 44 44 52 45 53 53 00 01 01 04 00 08 00 04 5c 58 49 46 00 01 01 28 00 2e 00 50 5c 44 41 54 41 5c 43 54 41 42 30 33 ┆ ECB ADDRESS DATA DEVECB MMU ECB ADDRESS XIF ( . P DATA CTAB03┆
0xdf16…df66 5c 43 4f 44 45 20 43 4f 4e 56 45 52 53 49 4f 4e 20 54 41 42 4c 45 20 50 4f 49 4e 54 45 52 00 01 01 34 00 1c 00 50 5c 44 41 54 41 5c 30 5c 53 41 56 45 20 41 52 45 41 20 46 4f 52 20 41 33 00 01 01 66 00 1c 00 50 5c 44 41 54 41 5c 30 5c 53 41 ┆ CODE CONVERSION TABLE POINTER 4 P DATA 0 SAVE AREA FOR A3 f P DATA 0 SA┆
0xdf66…dfb6 (146, 0, 400) 56 45 20 41 52 45 41 20 46 4f 52 20 41 34 00 01 01 86 00 1c 00 50 5c 44 41 54 41 5c 30 5c 53 41 56 45 20 41 52 45 41 20 46 4f 52 20 41 35 00 02 00 16 00 14 00 50 5c 52 45 53 5c 34 5c 44 57 54 2d 53 54 41 43 4b 00 02 00 36 00 1a 00 50 5c 44 ┆VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P D┆
0xdfb6…e006 41 54 41 5c 30 5c 54 49 4d 45 52 20 50 4f 49 4e 54 45 52 20 00 02 00 4e 00 20 00 50 5c 44 41 54 41 5c 44 56 44 59 30 32 5c 44 56 44 59 30 32 4f 20 44 45 56 49 43 45 20 00 02 00 6c 00 24 00 50 5c 44 41 54 41 5c 2f 46 46 46 46 5c 42 41 43 4b ┆ATA 0 TIMER POINTER N P DATA DVDY02 DVDY02O DEVICE l $ P DATA /FFFF BACK┆
0xe006…e056 53 50 41 43 45 20 41 4e 44 20 43 41 4e 43 45 4c 00 02 00 90 00 24 00 50 5c 44 41 54 41 5c 2f 46 46 42 41 5c 45 4f 52 20 41 4e 44 20 44 4f 55 42 4c 45 20 5a 45 52 4f 20 00 02 00 b8 00 36 00 50 5c 44 41 54 41 5c 44 57 54 53 51 2b 44 56 4b 42 ┆SPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB┆
0xe056…e0a6 30 32 5c 50 4f 49 4e 54 45 52 20 54 4f 20 46 49 52 53 54 20 50 4c 41 43 45 20 49 4e 20 51 55 45 55 45 00 02 00 e0 00 36 00 50 5c 44 41 54 41 5c 44 57 54 53 51 2b 44 56 4b 42 30 32 5c 50 4f 49 4e 54 45 52 20 54 4f 20 4c 41 53 54 20 50 4c 41 ┆02 POINTER TO FIRST PLACE IN QUEUE 6 P DATA DWTSQ+DVKB02 POINTER TO LAST PLA┆
0xe0a6…e0f6 43 45 20 49 4e 20 51 55 45 55 45 20 00 02 01 1a 00 16 00 50 44 57 54 53 51 5c 45 51 55 5c 2a 2d 44 56 4b 42 30 32 00 02 01 54 00 1a 00 50 5c 44 41 54 41 5c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 20 00 02 01 6e 00 1a 00 50 5c 44 41 54 ┆CE IN QUEUE PDWTSQ EQU *-DVKB02 T P DATA 0,0,0,0,0,0,0,0 n P DAT┆
0xe0f6…e146 (147, 2, 256) 41 5c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 20 00 02 01 8c 00 12 00 50 5c 44 41 54 41 5c 30 2c 30 2c 30 2c 30 20 00 03 00 1a 00 12 00 50 5c 49 46 54 5c 4d 4d 55 50 41 47 3d 31 20 00 03 00 30 00 10 00 50 44 45 56 45 43 42 5c 45 51 55 ┆A 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 0 PDEVECB EQU┆
0xe146…e196 5c 2a 00 03 00 46 00 16 00 50 5c 44 41 54 41 5c 30 2c 30 2c 30 2c 30 2c 30 2c 30 20 00 03 00 5a 00 1a 00 50 5c 44 41 54 41 5c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 20 00 03 00 74 00 1a 00 50 5c 44 41 54 41 5c 30 2c 30 2c 30 2c 30 2c ┆ * F P DATA 0,0,0,0,0,0 Z P DATA 0,0,0,0,0,0,0,0 t P DATA 0,0,0,0,┆
0xe196…e1e6 30 2c 30 2c 30 2c 30 20 00 03 00 92 00 12 00 50 5c 44 41 54 41 5c 30 2c 30 2c 30 2c 30 20 00 03 00 b0 00 08 00 50 5c 58 49 46 00 03 00 c6 00 10 00 50 44 57 54 45 4e 44 5c 45 51 55 5c 2a 00 03 00 d2 00 06 00 50 2a 20 00 03 00 e6 00 08 00 50 ┆0,0,0,0 P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P┆
0xe1e6…e1f6 5c 45 4e 44 00 03 00 f0 40 04 00 00 00 03 00 fc ┆ END @ ┆
0xe1f6…e1fe (148, 1, 8) 20 04 00 00 00 04 00 04 ┆ ┆