|
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: 58778 (0xe59a)
Notes: pts_type(SC)
Names: »DMTASK.SC«
└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
└─⟦this⟧ »TOSSWORK/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 X:A * INDEXED ACCEXSS FUNCTIONS CAN BE OMITTED WITH * INDXAC EQU 1 = INDEX ACCESS INCLUDED * INDXAC EQU 0 = INDEX ACCESS FUNCTIONS OMITTED INDXAC EQU X:B RECBFZ EQU X:C 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 0 * * * A PROGRAM VERSION USING TOSS DISC PAGING * IS OBTAINED BY SETTING DSKPAG EQU 1. * DSKPAG EQU 0 * * * 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…1090 Head {h00=0x0012, h01=0x0050, text=»QNOEXA EQU X:A«, t00=0x000a, t01=0x00e0}
0x1090…10ca Head {h00=0x0036, h01=0x0050, text=»* INDEXED ACCEXSS FUNCTIONS CAN BE OMITTED WITH «, t00=0x000a, t01=0x00f6}
0x10ca…10fa Head {h00=0x002c, h01=0x0050, text=»* INDXAC EQU 1 = INDEX ACCESS INCLUDED«, t00=0x000a, t01=0x0130}
0x10fa…1134 Head {h00=0x0036, h01=0x0050, text=»* INDXAC EQU 0 = INDEX ACCESS FUNCTIONS OMITTED «, t00=0x000a, t01=0x0160}
0x1134…114a Head {h00=0x0012, h01=0x0050, text=»INDXAC EQU X:B«, t00=0x000b, t01=0x000a}
0x114a…1182 Head {h00=0x0034, h01=0x0050, text=»RECBFZ EQU X:C INDEX RECORD BUFFER SIZE IN WORDS«, t00=0x000b, t01=0x0020}
0x1182…11ba Head {h00=0x0034, h01=0x0050, text=»FLXDSC EQU X:D FLEXIBLE DISC INCLUDED WHEN EQU 1«, t00=0x000b, t01=0x0058}
0x11ba…11ee Head {h00=0x0030, h01=0x0050, text=»INSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1«, t00=0x000b, t01=0x0090}
0x11ee…11f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c4}
0x11f8…1210 Head {h00=0x0014, h01=0x0050, text=» EJECT DMTASK «, t00=0x000b, t01=0x00ce}
0x1210…121a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00e6}
0x121a…1224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00f0}
0x1224…1256 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000b, t01=0x00fa}
0x1256…1284 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000b, t01=0x012c}
0x1284…128e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x015a}
0x128e…12a2 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000b, t01=0x0164}
0x12a2…12ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0178}
0x12ac…12b6 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000b, t01=0x0182}
0x12b6…12e8 Head {h00=0x002e, h01=0x002a, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x000b, t01=0x018c}
0x12e8…1316 Head {h00=0x002a, h01=0x0026, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x000c, t01=0x002e}
0x1316…1320 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000c, t01=0x005c}
0x1320…1334 Head {h00=0x0010, h01=0x000c, text=»DSKPAG EQU 0«, t00=0x000c, t01=0x0066}
0x1334…133e Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000c, t01=0x007a}
0x133e…1348 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0084}
0x1348…1382 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK «, t00=0x000c, t01=0x008e}
0x1382…13b8 Head {h00=0x0032, h01=0x0050, text=»* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. «, t00=0x000c, t01=0x00c8}
0x13b8…13c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00fe}
0x13c2…13d6 Head {h00=0x0010, h01=0x0050, text=»SWPBLK EQU 0«, t00=0x000c, t01=0x0108}
0x13d6…13e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x011c}
0x13e0…13ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0126}
0x13ee…13f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0134}
0x13f8…1418 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x013e}
0x1418…1438 Head {h00=0x001c, h01=0x0050, text=»* DATA DEFINITIONS *«, t00=0x000c, t01=0x015e}
0x1438…1458 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x017e}
0x1458…1462 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x000e}
0x1462…146c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0018}
0x146c…149c Head {h00=0x002c, h01=0x0050, text=»EABIT EQU /20 EA-BIT IN DWT STATUS BYTE «, t00=0x000d, t01=0x0022}
0x149c…14a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0052}
0x14a6…14d0 Head {h00=0x0026, h01=0x0050, text=»VTOBLK EQU 9 VTOC BLOCKING FACTOR «, t00=0x000d, t01=0x005c}
0x14d0…14da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0086}
0x14da…1518 Head {h00=0x003a, h01=0x0050, text=»* THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE«, t00=0x000d, t01=0x0090}
0x1518…1542 Head {h00=0x0026, h01=0x0050, text=»* POSITION IN TIODM-TABLE TIODMF«, t00=0x000d, t01=0x00ce}
0x1542…154c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00f8}
0x154c…155e Head {h00=0x000e, h01=0x0050, text=»QCL EQU 0 «, t00=0x000d, t01=0x0102}
0x155e…1580 Head {h00=0x001e, h01=0x0050, text=»DMTAFU DATA DMCLOSE CLOSE «, t00=0x000d, t01=0x0114}
0x1580…1592 Head {h00=0x000e, h01=0x0050, text=»QRV EQU 2 «, t00=0x000d, t01=0x0136}
0x1592…15b8 Head {h00=0x0022, h01=0x0050, text=» DATA DMREVT READ VTOC RECORD «, t00=0x000d, t01=0x0148}
0x15b8…15ca Head {h00=0x000e, h01=0x0050, text=»QIRN EQU 4«, t00=0x000d, t01=0x016e}
0x15ca…15e0 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000d, t01=0x0180}
0x15e0…1606 Head {h00=0x0022, h01=0x0050, text=» DATA DMIRN INDEXED READ NEXT «, t00=0x000e, t01=0x0008}
0x1606…1618 Head {h00=0x000e, h01=0x0050, text=»QINS EQU 6«, t00=0x000e, t01=0x002e}
0x1618…163a Head {h00=0x001e, h01=0x0050, text=» DATA DMINS INDEXED INSERT«, t00=0x000e, t01=0x0040}
0x163a…164c Head {h00=0x000e, h01=0x0050, text=»QDEL EQU 8«, t00=0x000e, t01=0x0062}
0x164c…166e Head {h00=0x001e, h01=0x0050, text=» DATA DMDEL INDEXED DELETE«, t00=0x000e, t01=0x0074}
0x166e…1682 Head {h00=0x0010, h01=0x0050, text=»QIRW EQU 10 «, t00=0x000e, t01=0x0096}
0x1682…16a6 Head {h00=0x0020, h01=0x0050, text=» DATA DMIRW INDEXED REWRITE «, t00=0x000e, t01=0x00aa}
0x16a6…16ce Head {h00=0x0024, h01=0x0050, text=» DATA DMIRR INDEXED RANDOM RESAD«, t00=0x000e, t01=0x00ce}
0x16ce…16da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00f6}
0x16da…16ee Head {h00=0x0010, h01=0x0050, text=»QIRR EQU 12 «, t00=0x000e, t01=0x0102}
0x16ee…1704 Head {h00=0x0012, h01=0x0050, text=» IFF INDXAC=1 «, t00=0x000e, t01=0x0116}
0x1704…1734 Head {h00=0x002c, h01=0x0050, text=» DATA DMTERR,DMTERR,DMTERR,DMTERR,DMTERR«, t00=0x000e, t01=0x012c}
0x1734…1740 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x015c}
0x1740…1752 Head {h00=0x000e, h01=0x0050, text=»QRD EQU 14«, t00=0x000e, t01=0x0168}
0x1752…1774 Head {h00=0x001e, h01=0x0050, text=» DATA DMRDDE RANDOM DELETE«, t00=0x000e, t01=0x017a}
0x1774…1786 Head {h00=0x000e, h01=0x0050, text=»QRW EQU 16«, t00=0x000f, t01=0x000c}
0x1786…17a8 Head {h00=0x001e, h01=0x0050, text=» DATA DMRDWR RANDOM WRITE «, t00=0x000f, t01=0x001e}
0x17a8…17ba Head {h00=0x000e, h01=0x0050, text=»QRR EQU 18«, t00=0x000f, t01=0x0040}
0x17ba…17da Head {h00=0x001c, h01=0x0050, text=» DATA DMRDRE RANDOM READ«, t00=0x000f, t01=0x0052}
0x17da…17ee Head {h00=0x0010, h01=0x0050, text=»QREA EQU 20 «, t00=0x000f, t01=0x0072}
0x17ee…181c Head {h00=0x002a, h01=0x0050, text=» DATA DMTERR RELEASE EXCLUSIVE ACCESS «, t00=0x000f, t01=0x0086}
0x181c…182e Head {h00=0x000e, h01=0x0050, text=»QSW EQU 22«, t00=0x000f, t01=0x00b4}
0x182e…1854 Head {h00=0x0022, h01=0x0050, text=» DATA DMSQWR SEQUENTIAL WRITE «, t00=0x000f, t01=0x00c6}
0x1854…1882 Head {h00=0x002a, h01=0x0050, text=»SQR EQU 2 EXTERNAL ORDER CODE SEQ READ«, t00=0x000f, t01=0x00ec}
0x1882…1894 Head {h00=0x000e, h01=0x0050, text=»QSR EQU 24«, t00=0x000f, t01=0x011a}
0x1894…18b8 Head {h00=0x0020, h01=0x0050, text=» DATA DMSQRE SEQUENTIAL READ«, t00=0x000f, t01=0x012c}
0x18b8…18cc Head {h00=0x0010, h01=0x0050, text=»QGCUR EQU 26«, t00=0x000f, t01=0x0150}
0x18cc…18ee Head {h00=0x001e, h01=0x0050, text=» DATA DMTERR GET CURRENCY «, t00=0x000f, t01=0x0164}
0x18ee…1904 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000f, t01=0x0186}
0x1904…1918 Head {h00=0x0010, h01=0x0050, text=»QINIX EQU 28«, t00=0x0010, t01=0x000c}
0x1918…193a Head {h00=0x001e, h01=0x0050, text=» DATA DMINIX INSERT INDEX «, t00=0x0010, t01=0x0020}
0x193a…194e Head {h00=0x0010, h01=0x0050, text=»QDELX EQU 30«, t00=0x0010, t01=0x0042}
0x194e…1970 Head {h00=0x001e, h01=0x0050, text=» DATA DMDELX DELETE INDEX «, t00=0x0010, t01=0x0056}
0x1970…197c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0078}
0x197c…1992 Head {h00=0x0012, h01=0x0050, text=» IFF INDXAC=1 «, t00=0x0010, t01=0x0084}
0x1992…19ae Head {h00=0x0018, h01=0x0050, text=» DATA DMTERR,DMTERR «, t00=0x0010, t01=0x009a}
0x19ae…19ba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00b6}
0x19ba…19d0 Head {h00=0x0012, h01=0x0050, text=»QGCURX EQU 32 «, t00=0x0010, t01=0x00c2}
0x19d0…19f6 Head {h00=0x0022, h01=0x0050, text=» DATA DMTERR GET CURRENT INDEX«, t00=0x0010, t01=0x00d8}
0x19f6…1a0a Head {h00=0x0010, h01=0x0050, text=»QRWD EQU 34 «, t00=0x0010, t01=0x00fe}
0x1a0a…1a34 Head {h00=0x0026, h01=0x0050, text=» DATA DMRDWD DELAYED RANDOM WRITE «, t00=0x0010, t01=0x0112}
0x1a34…1a48 Head {h00=0x0010, h01=0x0050, text=»QRDD EQU 36 «, t00=0x0010, t01=0x013c}
0x1a48…1a72 Head {h00=0x0026, h01=0x0050, text=» DATA DMRDDD DELAYED RANDOM DELETE«, t00=0x0010, t01=0x0150}
0x1a72…1a86 Head {h00=0x0010, h01=0x0050, text=»QRRRB EQU 38«, t00=0x0010, t01=0x017a}
0x1a86…1aae Head {h00=0x0024, h01=0x0050, text=» DATA DMRRRB RAND READ REL BUFF «, t00=0x0010, t01=0x018e}
0x1aae…1ab8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0026}
0x1ab8…1ae0 Head {h00=0x0024, h01=0x0050, text=»VTOCRL DATA 0 VTOC RECORD LENGTH«, t00=0x0011, t01=0x0030}
0x1ae0…1aee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0058}
0x1aee…1af8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0066}
0x1af8…1b0e Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0011, t01=0x0070}
0x1b0e…1b24 Head {h00=0x0012, h01=0x0050, text=»* DMTFRL *«, t00=0x0011, t01=0x0086}
0x1b24…1b3a Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0011, t01=0x009c}
0x1b3a…1b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b2}
0x1b44…1b74 Head {h00=0x002c, h01=0x0050, text=»* ENTRY DMTFRL FIND RECORD LENGTH «, t00=0x0011, t01=0x00bc}
0x1b74…1b7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ec}
0x1b7e…1bb6 Head {h00=0x0034, h01=0x0050, text=»* INPUT A1 = RETURN CODE IF INCORRECT LENGTH«, t00=0x0011, t01=0x00f6}
0x1bb6…1bda Head {h00=0x0020, h01=0x0050, text=»* A6 = FDB ADDRESS«, t00=0x0011, t01=0x012e}
0x1bda…1c04 Head {h00=0x0026, h01=0x0050, text=»* A9 = USER ECB ADDRESS «, t00=0x0011, t01=0x0152}
0x1c04…1c0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x017c}
0x1c0e…1c40 Head {h00=0x002e, h01=0x0050, text=»* OUTPUT A2 = RECORD LENGTH TO BE USED «, t00=0x0011, t01=0x0186}
0x1c40…1c80 Head {h00=0x003c, h01=0x0050, text=»* A1 IS ORED INTO ECBRC IF ECBRL < REC LENGTH «, t00=0x0012, t01=0x0028}
0x1c80…1caa Head {h00=0x0026, h01=0x0050, text=»* A2 IS STORED IN ECBEL «, t00=0x0012, t01=0x0068}
0x1caa…1cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0092}
0x1cb4…1cc8 Head {h00=0x0010, h01=0x0050, text=»DMTFRL EQU *«, t00=0x0012, t01=0x009c}
0x1cc8…1ce0 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A9 «, t00=0x0012, t01=0x00b0}
0x1ce0…1cf8 Head {h00=0x0014, h01=0x0050, text=» CW A2,FDBRLE,A6«, t00=0x0012, t01=0x00c8}
0x1cf8…1d20 Head {h00=0x0024, h01=0x0050, text=» RF(E) DMTF20 ECBRL = REC LENGTH«, t00=0x0012, t01=0x00e0}
0x1d20…1d48 Head {h00=0x0024, h01=0x0050, text=» RF(L) DMTF10 ECBRL < REC LENGTH«, t00=0x0012, t01=0x0108}
0x1d48…1d74 Head {h00=0x0028, h01=0x0050, text=» LD A2,FDBRLE,A6 ECBRL > REC LENGTH «, t00=0x0012, t01=0x0130}
0x1d74…1d86 Head {h00=0x000e, h01=0x0050, text=» RF DMTF20«, t00=0x0012, t01=0x015c}
0x1d86…1db4 Head {h00=0x002a, h01=0x0050, text=»DMTF10 ORS A1,ECBRC,A9 SET RETURN CODE«, t00=0x0012, t01=0x016e}
0x1db4…1de6 Head {h00=0x002e, h01=0x0050, text=»DMTF20 ST A2,ECBEL,A9 SET EFFECTIVE LENGTH«, t00=0x0013, t01=0x000c}
0x1de6…1df6 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0013, t01=0x003e}
0x1df6…1e04 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x004e}
0x1e04…1e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x005c}
0x1e0e…1e22 Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0013, t01=0x0066}
0x1e22…1e36 Head {h00=0x0010, h01=0x0050, text=»* DMTWM *«, t00=0x0013, t01=0x007a}
0x1e36…1e4a Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0013, t01=0x008e}
0x1e4a…1e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a2}
0x1e54…1e7a Head {h00=0x0022, h01=0x0050, text=»* ENTRY DMTWM WORD MOVE «, t00=0x0013, t01=0x00ac}
0x1e7a…1e84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d2}
0x1e84…1eaa Head {h00=0x0022, h01=0x0050, text=»* INPUT A1 = FROM ADDRESS «, t00=0x0013, t01=0x00dc}
0x1eaa…1eda Head {h00=0x002c, h01=0x0050, text=»* A2 = NO OF BYTES TO BE MOVED«, t00=0x0013, t01=0x0102}
0x1eda…1efe Head {h00=0x0020, h01=0x0050, text=»* A3 = TO ADDRESS «, t00=0x0013, t01=0x0132}
0x1efe…1f08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0156}
0x1f08…1f30 Head {h00=0x0024, h01=0x0050, text=»* A4 WILL BE DESTROYED«, t00=0x0013, t01=0x0160}
0x1f30…1f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0188}
0x1f3a…1f44 (20, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0004}
0x1f44…1f58 Head {h00=0x0010, h01=0x0050, text=»DMTWM EQU * «, t00=0x0014, t01=0x000e}
0x1f58…1f6a Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0014, t01=0x0022}
0x1f6a…1f90 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMTW10 LAST WORD MOVED «, t00=0x0014, t01=0x0034}
0x1f90…1fa4 Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A1 «, t00=0x0014, t01=0x005a}
0x1fa4…1fb6 Head {h00=0x000e, h01=0x0050, text=» STR A4,A3«, t00=0x0014, t01=0x006e}
0x1fb6…1fc8 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0014, t01=0x0080}
0x1fc8…1fda Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0014, t01=0x0092}
0x1fda…1fec Head {h00=0x000e, h01=0x0050, text=» RB DMTWM «, t00=0x0014, t01=0x00a4}
0x1fec…2006 Head {h00=0x0016, h01=0x0050, text=»DMTW10 ANK A2,/01 «, t00=0x0014, t01=0x00b6}
0x2006…201c Head {h00=0x0012, h01=0x0050, text=» RF(E) DMTW20 «, t00=0x0014, t01=0x00d0}
0x201c…203e Head {h00=0x001e, h01=0x0050, text=» LCR A4,A1 MOVE LAST CHAR «, t00=0x0014, t01=0x00e6}
0x203e…2050 Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0014, t01=0x0108}
0x2050…2066 Head {h00=0x0012, h01=0x0050, text=»DMTW20 RTN A14«, t00=0x0014, t01=0x011a}
0x2066…2074 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0130}
0x2074…207e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x013e}
0x207e…2094 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0014, t01=0x0148}
0x2094…20aa Head {h00=0x0012, h01=0x0050, text=»* DMTBM * «, t00=0x0014, t01=0x015e}
0x20aa…20c0 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0014, t01=0x0174}
0x20c0…20ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x018a}
0x20ca…20f0 (21, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* ENTRY DMTBM BYTE MOVE «, t00=0x0015, t01=0x0004}
0x20f0…20fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x002a}
0x20fa…2120 Head {h00=0x0022, h01=0x0050, text=»* INPUT A1 = FROM ADDRESS «, t00=0x0015, t01=0x0034}
0x2120…2150 Head {h00=0x002c, h01=0x0050, text=»* A2 = NO OF BYTES TO BE MOVED«, t00=0x0015, t01=0x005a}
0x2150…2174 Head {h00=0x0020, h01=0x0050, text=»* A3 = TO ADDRESS «, t00=0x0015, t01=0x008a}
0x2174…217e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ae}
0x217e…21a6 Head {h00=0x0024, h01=0x0050, text=»* A4 WILL BE DESTROYED«, t00=0x0015, t01=0x00b8}
0x21a6…21b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00e0}
0x21b0…21d2 Head {h00=0x001e, h01=0x0050, text=»* OUTPUT A3 = NEXT CHAR «, t00=0x0015, t01=0x00ea}
0x21d2…21dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010c}
0x21dc…21e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0116}
0x21e6…21fa Head {h00=0x0010, h01=0x0050, text=»DMTBM EQU * «, t00=0x0015, t01=0x0120}
0x21fa…220c Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0015, t01=0x0134}
0x220c…2232 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMTB10 LAST BYTE MOVED «, t00=0x0015, t01=0x0146}
0x2232…2244 Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0015, t01=0x016c}
0x2244…2256 Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0015, t01=0x017e}
0x2256…2268 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0015, t01=0x0190}
0x2268…227a Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0016, t01=0x0012}
0x227a…228c Head {h00=0x000e, h01=0x0050, text=» RB DMTBM «, t00=0x0016, t01=0x0024}
0x228c…22a2 Head {h00=0x0012, h01=0x0050, text=»DMTB10 RTN A14«, t00=0x0016, t01=0x0036}
0x22a2…22ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x004c}
0x22ac…22e2 Head {h00=0x0032, h01=0x0050, text=»* DMTBMR HAS THE SAME FUNCTION AS DMTBM BUT «, t00=0x0016, t01=0x0056}
0x22e2…2300 Head {h00=0x001a, h01=0x0050, text=»* MOVES FROM THE END«, t00=0x0016, t01=0x008c}
0x2300…230a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00aa}
0x230a…2322 Head {h00=0x0014, h01=0x0050, text=»DMTBMR ADR A1,A2«, t00=0x0016, t01=0x00b4}
0x2322…2334 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0016, t01=0x00cc}
0x2334…234c Head {h00=0x0014, h01=0x0050, text=»DMTB20 SUK A2,1 «, t00=0x0016, t01=0x00de}
0x234c…2362 Head {h00=0x0012, h01=0x0050, text=» RB(N) DMTB10 «, t00=0x0016, t01=0x00f6}
0x2362…2374 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0016, t01=0x010c}
0x2374…2386 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0016, t01=0x011e}
0x2386…2398 Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0016, t01=0x0130}
0x2398…23aa Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0016, t01=0x0142}
0x23aa…23bc Head {h00=0x000e, h01=0x0050, text=» RB DMTB20«, t00=0x0016, t01=0x0154}
0x23bc…23ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0166}
0x23ca…2406 Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x0016, t01=0x0174}
0x2406…2410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0020}
0x2410…244e Head {h00=0x003a, h01=0x0050, text=»* FNDFDB WILL SEARCH TTAB AND SCTCDT FOR A FILE CODE«, t00=0x0017, t01=0x002a}
0x244e…2458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0068}
0x2458…2494 Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x0017, t01=0x0072}
0x2494…249e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ae}
0x249e…24b8 Head {h00=0x0016, h01=0x0050, text=»* A1 = TTAB ADDR«, t00=0x0017, t01=0x00b8}
0x24b8…24e0 Head {h00=0x0024, h01=0x0050, text=»* A2 = FILE CODE TO SEARCH FOR«, t00=0x0017, t01=0x00d2}
0x24e0…2518 Head {h00=0x0034, h01=0x0050, text=»* A5 NOT= 0 WHEN ONLY TTAB SHALL BE SEARCHED «, t00=0x0017, t01=0x00fa}
0x2518…2522 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0132}
0x2522…255e Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x0017, t01=0x013c}
0x255e…2568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0178}
0x2568…2582 Head {h00=0x0016, h01=0x0050, text=»* A1 = UNCHANGED«, t00=0x0017, t01=0x0182}
0x2582…25b8 Head {h00=0x0032, h01=0x0050, text=»* A2 = FILE CODE. = 0 WHEN NO CODE IS FOUND «, t00=0x0018, t01=0x000c}
0x25b8…25f2 Head {h00=0x0036, h01=0x0050, text=»* A4 = TTAB/SCTCDT ENTRY ADDR WHEN CODE IS FOUND«, t00=0x0018, t01=0x0042}
0x25f2…2628 Head {h00=0x0032, h01=0x0050, text=»* A5 = 0 WHEN FOUND IN SCTCDT = 1 WHEN TTAB «, t00=0x0018, t01=0x007c}
0x2628…2632 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00b2}
0x2632…266e Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x0018, t01=0x00bc}
0x266e…2678 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f8}
0x2678…268a Head {h00=0x000e, h01=0x0050, text=»* A1-A5 «, t00=0x0018, t01=0x0102}
0x268a…2694 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0114}
0x2694…26d2 Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0018, t01=0x011e}
0x26d2…26dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x015c}
0x26dc…2702 Head {h00=0x0022, h01=0x0050, text=»* LOOK FOR FILE CODE IN TTAB«, t00=0x0018, t01=0x0166}
0x2702…270c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x018c}
0x270c…2720 Head {h00=0x0010, h01=0x0050, text=»FNDFDB EQU *«, t00=0x0019, t01=0x0008}
0x2720…274a Head {h00=0x0026, h01=0x0050, text=» LD A3,TTB:TD,A1 LENGTH DEV DESCR «, t00=0x0019, t01=0x001c}
0x274a…275e Head {h00=0x0010, h01=0x0050, text=»FND030 EQU *«, t00=0x0019, t01=0x0046}
0x275e…2770 Head {h00=0x000e, h01=0x0050, text=» SUK A3,4 «, t00=0x0019, t01=0x005a}
0x2770…279c Head {h00=0x0028, h01=0x0050, text=» RF(NP) FND040 FILE CODE NOT IN TTAB«, t00=0x0019, t01=0x006c}
0x279c…27ae Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0019, t01=0x0098}
0x27ae…27ca Head {h00=0x0018, h01=0x0050, text=» ADKL A4,TTB:TD =1 «, t00=0x0019, t01=0x00aa}
0x27ca…27dc Head {h00=0x000e, h01=0x0050, text=» ADR A4,A3«, t00=0x0019, t01=0x00c6}
0x27dc…27f4 Head {h00=0x0014, h01=0x0050, text=» CWR* A2,A4 =1 «, t00=0x0019, t01=0x00d8}
0x27f4…280a Head {h00=0x0012, h01=0x0050, text=» RB(NE) FND030«, t00=0x0019, t01=0x00f0}
0x280a…281a Head {h00=0x000c, h01=0x0050, text=»* =1 «, t00=0x0019, t01=0x0106}
0x281a…282c Head {h00=0x000e, h01=0x0050, text=» LDK A5,1 «, t00=0x0019, t01=0x0116}
0x282c…2852 Head {h00=0x0022, h01=0x0050, text=» RF FND080 CODE FOUND IN TTAB «, t00=0x0019, t01=0x0128}
0x2852…285c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x014e}
0x285c…2882 Head {h00=0x0022, h01=0x0050, text=»* SEARCH FILE CODE IN SCTCDT«, t00=0x0019, t01=0x0158}
0x2882…288c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x017e}
0x288c…28a0 Head {h00=0x0010, h01=0x0050, text=»FND040 EQU *«, t00=0x0019, t01=0x0188}
0x28a0…28b2 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x001a, t01=0x000c}
0x28b2…28de Head {h00=0x0028, h01=0x0050, text=» RF(NZ) FND060 ONLY TTAB IS SEACHED «, t00=0x001a, t01=0x001e}
0x28de…28f4 Head {h00=0x0012, h01=0x0050, text=» LD* A4,SCTCDT«, t00=0x001a, t01=0x004a}
0x28f4…2908 Head {h00=0x0010, h01=0x0050, text=»FND050 EQU *«, t00=0x001a, t01=0x0060}
0x2908…291a Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x001a, t01=0x0074}
0x291a…2946 Head {h00=0x0028, h01=0x0050, text=» RF(NP) FND060 CODE NOT FOUND AT ALL«, t00=0x001a, t01=0x0086}
0x2946…295c Head {h00=0x0012, h01=0x0050, text=» LD A3,SCTCDT «, t00=0x001a, t01=0x00b2}
0x295c…296e Head {h00=0x000e, h01=0x0050, text=» ADR A3,A4«, t00=0x001a, t01=0x00c8}
0x296e…2986 Head {h00=0x0014, h01=0x0050, text=» CWR* A2,A3 =1 «, t00=0x001a, t01=0x00da}
0x2986…299c Head {h00=0x0012, h01=0x0050, text=» RB(NE) FND050«, t00=0x001a, t01=0x00f2}
0x299c…29b2 Head {h00=0x0012, h01=0x0050, text=» AD A4,SCTCDT «, t00=0x001a, t01=0x0108}
0x29b2…29d0 Head {h00=0x001a, h01=0x0050, text=» RF FND080 CODE FOUND «, t00=0x001a, t01=0x011e}
0x29d0…29e4 Head {h00=0x0010, h01=0x0050, text=»FND060 EQU *«, t00=0x001a, t01=0x013c}
0x29e4…29fe Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 NO CODE «, t00=0x001a, t01=0x0150}
0x29fe…2a12 Head {h00=0x0010, h01=0x0050, text=»FND080 EQU *«, t00=0x001a, t01=0x016a}
0x2a12…2a22 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001a, t01=0x017e}
0x2a22…2a30 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x018e}
0x2a30…2a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x000c}
0x2a3a…2a50 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x001b, t01=0x0016}
0x2a50…2a66 Head {h00=0x0012, h01=0x0050, text=»* DMTREM *«, t00=0x001b, t01=0x002c}
0x2a66…2a7c Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x001b, t01=0x0042}
0x2a7c…2a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0058}
0x2a86…2ace Head {h00=0x0044, h01=0x0050, text=»* ENTRY DMTREM MOVE RECORD FROM BUFFER TO USER RECORD AREA«, t00=0x001b, t01=0x0062}
0x2ace…2ad8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00aa}
0x2ad8…2b0c Head {h00=0x0030, h01=0x0050, text=»* INPUT RELATIVE REC OFFSET IN FDBRRO,A6«, t00=0x001b, t01=0x00b4}
0x2b0c…2b34 Head {h00=0x0024, h01=0x0050, text=»* BUFFER ADDRESS IN A5«, t00=0x001b, t01=0x00e8}
0x2b34…2b62 Head {h00=0x002a, h01=0x0050, text=»* USER REC AREA IN ECBBA,A9 «, t00=0x001b, t01=0x0110}
0x2b62…2b8a Head {h00=0x0024, h01=0x0050, text=»* RECORD LENGTH IN A2 «, t00=0x001b, t01=0x013e}
0x2b8a…2b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0166}
0x2b94…2b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0170}
0x2b9e…2ba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x017a}
0x2ba8…2bc4 Head {h00=0x0018, h01=0x0050, text=»* MOVE THE RECORD «, t00=0x001b, t01=0x0184}
0x2bc4…2c06 Head {h00=0x003e, h01=0x0050, text=»* IF (FROM) AND (TO) ADDRESSES BOTH EVEN THEN WORD MOVE «, t00=0x001c, t01=0x0010}
0x2c06…2c4c Head {h00=0x0042, h01=0x0050, text=»* IF (FROM AND (TO) ADDRESSES BOTH ODD THEN MOVE FIRST BYTE «, t00=0x001c, t01=0x0052}
0x2c4c…2c8e Head {h00=0x003e, h01=0x0050, text=»* WITH BYTE INSTRUCTIONS AND THE REST WITH WORD MOVE «, t00=0x001c, t01=0x0098}
0x2c8e…2ccc Head {h00=0x003a, h01=0x0050, text=»* ELSE USE BYTE MOVE INSTRUCTIONS FOR THE WHOLE REC «, t00=0x001c, t01=0x00da}
0x2ccc…2cd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0118}
0x2cd6…2cea Head {h00=0x0010, h01=0x0050, text=»DMTREM EQU *«, t00=0x001c, t01=0x0122}
0x2cea…2d02 Head {h00=0x0014, h01=0x0050, text=» LD A1,FDBRRO,A6«, t00=0x001c, t01=0x0136}
0x2d02…2d22 Head {h00=0x001c, h01=0x0050, text=» ADR A1,A5 FROM ADDRESS «, t00=0x001c, t01=0x014e}
0x2d22…2d2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x016e}
0x2d2c…2d42 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001c, t01=0x0178}
0x2d42…2d54 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x001c, t01=0x018e}
0x2d54…2d76 Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBBA,A9 TO ADDRESS«, t00=0x001d, t01=0x0010}
0x2d76…2d88 Head {h00=0x000e, h01=0x0050, text=» XRR A4,A3«, t00=0x001d, t01=0x0032}
0x2d88…2d9c Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x001d, t01=0x0044}
0x2d9c…2dc8 Head {h00=0x0028, h01=0x0050, text=» RF(Z) DMT210 BOTH ODD OR BOTH EVEN «, t00=0x001d, t01=0x0058}
0x2dc8…2df2 Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTBM ONE ODD AND ONE EVEN«, t00=0x001d, t01=0x0084}
0x2df2…2e04 Head {h00=0x000e, h01=0x0050, text=» RF DMT225«, t00=0x001d, t01=0x00ae}
0x2e04…2e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c0}
0x2e0e…2e26 Head {h00=0x0014, h01=0x0050, text=»DMT210 LDR A4,A1«, t00=0x001d, t01=0x00ca}
0x2e26…2e3a Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x001d, t01=0x00e2}
0x2e3a…2e5a Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT220 BOTH EVEN «, t00=0x001d, t01=0x00f6}
0x2e5a…2e74 Head {h00=0x0016, h01=0x0050, text=» SUK A2,1 BOTH ODD«, t00=0x001d, t01=0x0116}
0x2e74…2e86 Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x001d, t01=0x0130}
0x2e86…2e98 Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x001d, t01=0x0142}
0x2e98…2eaa Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x001d, t01=0x0154}
0x2eaa…2ebc Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x001d, t01=0x0166}
0x2ebc…2ee2 Head {h00=0x0022, h01=0x0050, text=»DMT220 CF A14,DMTWM WORD MOVE «, t00=0x001d, t01=0x0178}
0x2ee2…2ef6 Head {h00=0x0010, h01=0x0050, text=»DMT225 EQU *«, t00=0x001e, t01=0x000e}
0x2ef6…2f02 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0022}
0x2f02…2f0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x002e}
0x2f0c…2f22 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x0038}
0x2f22…2f4c Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTDM,A6 GET TTAB ADDRESS «, t00=0x001e, t01=0x004e}
0x2f4c…2f74 Head {h00=0x0024, h01=0x0050, text=» LC A3,TTB:ID,A4 ID CALLING TASK«, t00=0x001e, t01=0x0078}
0x2f74…2f88 Head {h00=0x0010, h01=0x0050, text=» CCK A3,'##'«, t00=0x001e, t01=0x00a0}
0x2f88…2faa Head {h00=0x001e, h01=0x0050, text=» RF(NE) DMTREN NOT DMTASK «, t00=0x001e, t01=0x00b4}
0x2faa…2fbe Head {h00=0x0010, h01=0x0050, text=» LDK A3,QRR «, t00=0x001e, t01=0x00d6}
0x2fbe…2fd8 Head {h00=0x0016, h01=0x0050, text=» CC A3,DWTOR+1,A6 «, t00=0x001e, t01=0x00ea}
0x2fd8…2ffe Head {h00=0x0022, h01=0x0050, text=» RF(NE) DMTREQ NOT RANDOM READ«, t00=0x001e, t01=0x0104}
0x2ffe…3028 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTWAT,A6 PAR BLOCK ADDRESS«, t00=0x001e, t01=0x012a}
0x3028…3050 Head {h00=0x0024, h01=0x0050, text=» LD A4,4,A4 FDB ADDR INDEX FILE «, t00=0x001e, t01=0x0154}
0x3050…3072 Head {h00=0x001e, h01=0x0050, text=» LD A4,DWTTDM,A4 USER TTAB«, t00=0x001e, t01=0x017c}
0x3072…3086 Head {h00=0x0010, h01=0x0050, text=»DMTREN EQU *«, t00=0x001f, t01=0x000e}
0x3086…3092 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001f, t01=0x0022}
0x3092…30ba Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A4 LOAD MMU REGISTERS«, t00=0x001f, t01=0x002e}
0x30ba…30ce Head {h00=0x0010, h01=0x0050, text=»DMTREP EQU *«, t00=0x001f, t01=0x0056}
0x30ce…30f6 Head {h00=0x0024, h01=0x0050, text=» LD A4,PRUN GET DM TTAB ADDRESS «, t00=0x001f, t01=0x006a}
0x30f6…312a Head {h00=0x0030, h01=0x0050, text=» TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE«, t00=0x001f, t01=0x0092}
0x312a…3136 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x001f, t01=0x00c6}
0x3136…3154 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A2 GET LENGTH «, t00=0x001f, t01=0x00d2}
0x3154…3188 Head {h00=0x0030, h01=0x0050, text=» LD A2,ECBBA,A9 GET RECEIVING BUFFER ADDRESS«, t00=0x001f, t01=0x00f0}
0x3188…31c4 Head {h00=0x0038, h01=0x0050, text=» CF A14,MOV:SU MOVE RECORD FROM SYSTEM TO USER AREA «, t00=0x001f, t01=0x0124}
0x31c4…31d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0160}
0x31d0…31da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x016c}
0x31da…31ea Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001f, t01=0x0176}
0x31ea…3200 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001f, t01=0x0186}
0x3200…3212 Head {h00=0x000e, h01=0x0050, text=»DMTREQ INH«, t00=0x0020, t01=0x000c}
0x3212…3230 Head {h00=0x001a, h01=0x0050, text=» TL MONMMU SYSTEM MMU «, t00=0x0020, t01=0x001e}
0x3230…3242 Head {h00=0x000e, h01=0x0050, text=» RB DMTREP«, t00=0x0020, t01=0x003c}
0x3242…324e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x004e}
0x324e…325c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x005a}
0x325c…3266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0068}
0x3266…3282 Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0020, t01=0x0072}
0x3282…328c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x008e}
0x328c…32a0 Head {h00=0x0010, h01=0x0050, text=»GETA14 EQU *«, t00=0x0020, t01=0x0098}
0x32a0…32c8 Head {h00=0x0024, h01=0x0050, text=» LD A14,PRUN GET DM TTAB ADDRESS«, t00=0x0020, t01=0x00ac}
0x32c8…32f6 Head {h00=0x002a, h01=0x0050, text=» AD A14,TTB:TD,A14 LENGTH DEVICE DESCR«, t00=0x0020, t01=0x00d4}
0x32f6…3318 Head {h00=0x001e, h01=0x0050, text=» ADKL A14,TTB:TD+32 STACK «, t00=0x0020, t01=0x0102}
0x3318…333a Head {h00=0x001e, h01=0x0050, text=» RTN A15 RETURN AND ENABLE«, t00=0x0020, t01=0x0124}
0x333a…3344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0146}
0x3344…3352 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x0150}
0x3352…335c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x015e}
0x335c…3372 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0020, t01=0x0168}
0x3372…3388 Head {h00=0x0012, h01=0x0050, text=»* DMTASK *«, t00=0x0020, t01=0x017e}
0x3388…339e (33, 0, 398) Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0021, t01=0x0004}
0x339e…33a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x001a}
0x33a8…33b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0024}
0x33b2…33c6 Head {h00=0x0010, h01=0x0050, text=»DMTASK EQU *«, t00=0x0021, t01=0x002e}
0x33c6…33d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0042}
0x33d0…33ec Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0021, t01=0x004c}
0x33ec…33f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0068}
0x33f6…340c Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x0021, t01=0x0072}
0x340c…3428 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0021, t01=0x0088}
0x3428…343c Head {h00=0x0010, h01=0x0050, text=» LDKL A5,-1 «, t00=0x0021, t01=0x00a4}
0x343c…346a Head {h00=0x002a, h01=0x0050, text=» CW A5,FDBRRO,A6 SPECIAL PARAMETER -1 «, t00=0x0021, t01=0x00b8}
0x346a…34a0 Head {h00=0x0032, h01=0x0050, text=» RF(E) DMT090 FOR ORDERS XR,DX,IX (SEE TIODM)«, t00=0x0021, t01=0x00e6}
0x34a0…34b4 Head {h00=0x0010, h01=0x0050, text=»DMT020 EQU *«, t00=0x0021, t01=0x011c}
0x34b4…34cc Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBDBR,A1«, t00=0x0021, t01=0x0130}
0x34cc…34ec Head {h00=0x001c, h01=0x0050, text=» RF(NN) DMT025 NO DELAY «, t00=0x0021, t01=0x0148}
0x34ec…3502 Head {h00=0x0012, h01=0x0050, text=» ANKL A4,/C0FF«, t00=0x0021, t01=0x0168}
0x3502…351a Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTOR,A1 «, t00=0x0021, t01=0x017e}
0x351a…352e Head {h00=0x0010, h01=0x0050, text=» ANK A2,/3F «, t00=0x0022, t01=0x0008}
0x352e…3542 Head {h00=0x0010, h01=0x0050, text=» CWK A2,QCL «, t00=0x0022, t01=0x001c}
0x3542…355e Head {h00=0x0018, h01=0x0050, text=» RF(E) DMT024 CLOSE «, t00=0x0022, t01=0x0030}
0x355e…3572 Head {h00=0x0010, h01=0x0050, text=» CWK A2,QRV «, t00=0x0022, t01=0x004c}
0x3572…3592 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT024 READ VTOC «, t00=0x0022, t01=0x0060}
0x3592…35a8 Head {h00=0x0012, h01=0x0050, text=» SUK A2,QRRRB «, t00=0x0022, t01=0x0080}
0x35a8…35d2 Head {h00=0x0026, h01=0x0050, text=» RF(E) DMT024 RAND READ REL BUFFER«, t00=0x0022, t01=0x0096}
0x35d2…35e8 Head {h00=0x0012, h01=0x0050, text=» ORKL A4,/100 «, t00=0x0022, t01=0x00c0}
0x35e8…35fc Head {h00=0x0010, h01=0x0050, text=»DMT024 EQU *«, t00=0x0022, t01=0x00d6}
0x35fc…3614 Head {h00=0x0014, h01=0x0050, text=» ST A4,FDBDBR,A1«, t00=0x0022, t01=0x00ea}
0x3614…3628 Head {h00=0x0010, h01=0x0050, text=»DMT025 EQU *«, t00=0x0022, t01=0x0102}
0x3628…363a Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0022, t01=0x0116}
0x363a…365a Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0022, t01=0x0128}
0x365a…3682 Head {h00=0x0024, h01=0x0050, text=» CF A14,GTBKBU GET BLOCK BUFFER «, t00=0x0022, t01=0x0148}
0x3682…3694 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0022, t01=0x0170}
0x3694…36bc Head {h00=0x0024, h01=0x0050, text=» RF(NN) DMT080 BUFFER WAS BEFORE«, t00=0x0022, t01=0x0182}
0x36bc…36c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x001a}
0x36c6…36f2 Head {h00=0x0028, h01=0x0050, text=»* READ SECTOR INTO BUFFER AND EXIT«, t00=0x0023, t01=0x0024}
0x36f2…36fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0050}
0x36fc…3710 Head {h00=0x0010, h01=0x0050, text=» SUK A5,QCL «, t00=0x0023, t01=0x005a}
0x3710…372c Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMT030 CLOSE «, t00=0x0023, t01=0x006e}
0x372c…374e Head {h00=0x001e, h01=0x0050, text=» LDK A7,/11 PHYSICAL READ «, t00=0x0023, t01=0x008a}
0x374e…375a Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0023, t01=0x00ac}
0x375a…377e Head {h00=0x0020, h01=0x0050, text=» DATA -1 I/O AND ACTIVATION «, t00=0x0023, t01=0x00b8}
0x377e…37a4 Head {h00=0x0022, h01=0x0050, text=» DATA DMTAR1 DMTASK RESTART #1«, t00=0x0023, t01=0x00dc}
0x37a4…37b0 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0023, t01=0x0102}
0x37b0…37c4 Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x0023, t01=0x010e}
0x37c4…37ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0122}
0x37ce…37fa Head {h00=0x0028, h01=0x0050, text=»DMT030 EQU * I/O WITH WAIT FOR CLOSE«, t00=0x0023, t01=0x012c}
0x37fa…380e Head {h00=0x0010, h01=0x0050, text=» LDK A7,/91 «, t00=0x0023, t01=0x0158}
0x380e…381a Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0023, t01=0x016c}
0x381a…382a Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0023, t01=0x0178}
0x382a…3850 Head {h00=0x0022, h01=0x0050, text=» RF DMT050 CHECK RETURN CODES «, t00=0x0023, t01=0x0188}
0x3850…385e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x001e}
0x385e…3874 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0024, t01=0x002c}
0x3874…388a Head {h00=0x0012, h01=0x0050, text=»* DMTAR1 *«, t00=0x0024, t01=0x0042}
0x388a…38a0 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0024, t01=0x0058}
0x38a0…38c4 Head {h00=0x0020, h01=0x0050, text=»* RESTART POINT AFTER READ«, t00=0x0024, t01=0x006e}
0x38c4…38ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0092}
0x38ce…38e2 Head {h00=0x0010, h01=0x0050, text=»DMTAR1 EQU *«, t00=0x0024, t01=0x009c}
0x38e2…38ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b0}
0x38ec…3908 Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0024, t01=0x00ba}
0x3908…3912 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d6}
0x3912…3928 Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x0024, t01=0x00e0}
0x3928…393c Head {h00=0x0010, h01=0x0050, text=»DMT050 EQU *«, t00=0x0024, t01=0x00f6}
0x393c…3974 Head {h00=0x0034, h01=0x0050, text=» CF A14,DMTIOT CHECK RETURN CODES FROM DISC I/O «, t00=0x0024, t01=0x010a}
0x3974…3986 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0024, t01=0x0142}
0x3986…399e Head {h00=0x0014, h01=0x0050, text=» ABL(NE) DMTERR «, t00=0x0024, t01=0x0154}
0x399e…39b6 Head {h00=0x0014, h01=0x0050, text=» LD A5,ECBBA,A8 «, t00=0x0024, t01=0x016c}
0x39b6…39c8 Head {h00=0x000e, h01=0x0050, text=» RF DMT090«, t00=0x0024, t01=0x0184}
0x39c8…39fc Head {h00=0x0030, h01=0x0050, text=»DMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER«, t00=0x0025, t01=0x0008}
0x39fc…3a0e Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x0025, t01=0x003c}
0x3a0e…3a32 Head {h00=0x0020, h01=0x0050, text=» ADK A5,8 SKIP BUFFER HEADER«, t00=0x0025, t01=0x004e}
0x3a32…3a60 Head {h00=0x002a, h01=0x0050, text=» ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB«, t00=0x0025, t01=0x0072}
0x3a60…3a74 Head {h00=0x0010, h01=0x0050, text=»DMT090 EQU *«, t00=0x0025, t01=0x00a0}
0x3a74…3a7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00b4}
0x3a7e…3ab6 Head {h00=0x0034, h01=0x0050, text=»* HANDLE ACTUAL ORDER ORDER INDEX IN DWTOR«, t00=0x0025, t01=0x00be}
0x3ab6…3ac0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f6}
0x3ac0…3ae2 Head {h00=0x001e, h01=0x0050, text=» ADK A5,2 SKIP CYLID WORD «, t00=0x0025, t01=0x0100}
0x3ae2…3afa Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0025, t01=0x0122}
0x3afa…3b1e Head {h00=0x0020, h01=0x0050, text=»* A7 = INTERNAL ORDER CODE«, t00=0x0025, t01=0x013a}
0x3b1e…3b32 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x0025, t01=0x015e}
0x3b32…3b5e Head {h00=0x0028, h01=0x0050, text=» ABI DMTAFU,A7 DMTASK FUNCTION TABLE«, t00=0x0025, t01=0x0172}
0x3b5e…3b6c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x000e}
0x3b6c…3b94 Head {h00=0x0024, h01=0x0050, text=»DMRRRB EQU * RAND READ REL BUFF «, t00=0x0026, t01=0x001c}
0x3b94…3b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0044}
0x3b9e…3bc2 Head {h00=0x0020, h01=0x0050, text=»DMSQRE EQU * SEQUENTIAL READ«, t00=0x0026, t01=0x004e}
0x3bc2…3bcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0072}
0x3bcc…3bec Head {h00=0x001c, h01=0x0050, text=»DMRDRE EQU * RANDOM READ«, t00=0x0026, t01=0x007c}
0x3bec…3bf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x009c}
0x3bf6…3c2e Head {h00=0x0034, h01=0x0050, text=»* CHECK STATUS IF NOT USED THEN ERROR RETURN«, t00=0x0026, t01=0x00a6}
0x3c2e…3c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00de}
0x3c38…3c50 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBRRO,A6«, t00=0x0026, t01=0x00e8}
0x3c50…3c68 Head {h00=0x0014, h01=0x0050, text=» AD A2,FDBRLE,A6«, t00=0x0026, t01=0x0100}
0x3c68…3c7a Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x0026, t01=0x0118}
0x3c7a…3c8c Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0026, t01=0x012a}
0x3c8c…3cb0 Head {h00=0x0020, h01=0x0050, text=» CCR A1,A2 STATUS BYTE IN A1«, t00=0x0026, t01=0x013c}
0x3cb0…3ccc Head {h00=0x0018, h01=0x0050, text=» RF(NE) DMT200 USED «, t00=0x0026, t01=0x0160}
0x3ccc…3cea Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/800 NO DATA «, t00=0x0026, t01=0x017c}
0x3cea…3cfe Head {h00=0x0010, h01=0x0050, text=» ABL DMTERR «, t00=0x0027, t01=0x000a}
0x3cfe…3d28 Head {h00=0x0026, h01=0x0050, text=»DMT200 LDK A1,/8 INCORRECT LENGTH «, t00=0x0027, t01=0x001e}
0x3d28…3d52 Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTFRL A2 := RECORD LENGTH«, t00=0x0027, t01=0x0048}
0x3d52…3d5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0072}
0x3d5c…3d78 Head {h00=0x0018, h01=0x0050, text=»* MOVE THE RECORD «, t00=0x0027, t01=0x007c}
0x3d78…3d82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0098}
0x3d82…3d98 Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTREM«, t00=0x0027, t01=0x00a2}
0x3d98…3da2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b8}
0x3da2…3dd6 Head {h00=0x0030, h01=0x0050, text=»* UPDATE CRN AND SET EXCLUSIVE ACCESS BIT «, t00=0x0027, t01=0x00c2}
0x3dd6…3de0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00f6}
0x3de0…3df4 Head {h00=0x0010, h01=0x0050, text=»DMT230 EQU *«, t00=0x0027, t01=0x0100}
0x3df4…3e16 Head {h00=0x001e, h01=0x0050, text=» ABL DMT400 PUT CRN AND EA«, t00=0x0027, t01=0x0114}
0x3e16…3e24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0136}
0x3e24…3e4a Head {h00=0x0022, h01=0x0050, text=»DMREVT EQU * READ VTOC RECORD «, t00=0x0027, t01=0x0144}
0x3e4a…3e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x016a}
0x3e54…3e76 Head {h00=0x001e, h01=0x0050, text=»DMCLOSE EQU * CLOSE A FILE«, t00=0x0027, t01=0x0174}
0x3e76…3e80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0008}
0x3e80…3e98 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBSNR,A6«, t00=0x0028, t01=0x0012}
0x3e98…3ec4 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) DMT270 VTOC SECTOR IN BUFFER«, t00=0x0028, t01=0x002a}
0x3ec4…3ece Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0056}
0x3ece…3ef0 Head {h00=0x001e, h01=0x0050, text=»* VOLUME LABEL IN BUFFER«, t00=0x0028, t01=0x0060}
0x3ef0…3f3c Head {h00=0x0048, h01=0x0050, text=»* FIND VTOC SECTOR NUMBER AND RELATIVE RECORD OFFSET WITHIN SECTOR«, t00=0x0028, t01=0x0082}
0x3f3c…3f78 Head {h00=0x0038, h01=0x0050, text=»* FOR VTOC RECORD AND READ THIS SECTOR INTO BUFFER«, t00=0x0028, t01=0x00ce}
0x3f78…3f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x010a}
0x3f82…3fa4 Head {h00=0x001e, h01=0x0050, text=» LDR A10,A6 SAVE FDB ADDR «, t00=0x0028, t01=0x0114}
0x3fa4…3fc4 Head {h00=0x001c, h01=0x0050, text=» LDR A9,A8 SAVE ECB ADDR«, t00=0x0028, t01=0x0136}
0x3fc4…3fde Head {h00=0x0016, h01=0x0050, text=» LD A3,VLVRL-2,A5 «, t00=0x0028, t01=0x0156}
0x3fde…3ff4 Head {h00=0x0012, h01=0x0050, text=» ST A3,VTOCRL «, t00=0x0028, t01=0x0170}
0x3ff4…4020 Head {h00=0x0028, h01=0x0050, text=» LDK A6,VTOBLK VTOC BLOCKING FACTIOR«, t00=0x0028, t01=0x0186}
0x4020…404c Head {h00=0x0028, h01=0x0050, text=» LD A2,FDBVTO,A10 VTOC RECORD NUMBER«, t00=0x0029, t01=0x0022}
0x404c…405e Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0029, t01=0x004e}
0x405e…408e Head {h00=0x002c, h01=0x0050, text=» CF A14,DIVMOD A2=A1,A2/A6.A1=REMAINDRER«, t00=0x0029, t01=0x0060}
0x408e…40aa Head {h00=0x0018, h01=0x0050, text=» LDR A3,A2 QUOTIENT «, t00=0x0029, t01=0x0090}
0x40aa…40c6 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A10 FDB ADDR«, t00=0x0029, t01=0x00ac}
0x40c6…40de Head {h00=0x0014, h01=0x0050, text=» LDR A2,A1 REST «, t00=0x0029, t01=0x00c8}
0x40de…40fc Head {h00=0x001a, h01=0x0050, text=» RF(Z) DMT240 REST = 0«, t00=0x0029, t01=0x00e0}
0x40fc…4124 Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 RECORD IN NEXT SECTOR «, t00=0x0029, t01=0x00fe}
0x4124…4136 Head {h00=0x000e, h01=0x0050, text=» RF DMT250«, t00=0x0029, t01=0x0126}
0x4136…4168 Head {h00=0x002e, h01=0x0050, text=»DMT240 LDK A2,VTOBLK LAST RECORD IN SECTOR«, t00=0x0029, t01=0x0138}
0x4168…4192 Head {h00=0x0026, h01=0x0050, text=»DMT250 AD A3,VLVBA-2,A5 VTOC BASE «, t00=0x0029, t01=0x016a}
0x4192…41aa (42, 0, 400) Head {h00=0x0014, h01=0x0050, text=» ST A3,FDBSNR,A6«, t00=0x002a, t01=0x0004}
0x41aa…41bc Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002a, t01=0x001c}
0x41bc…41d4 Head {h00=0x0014, h01=0x0050, text=»DMT255 SUK A2,1 «, t00=0x002a, t01=0x002e}
0x41d4…41ea Head {h00=0x0012, h01=0x0050, text=» RF(Z) DMT260 «, t00=0x002a, t01=0x0046}
0x41ea…4204 Head {h00=0x0016, h01=0x0050, text=» AD A3,VLVRL-2,A5 «, t00=0x002a, t01=0x005c}
0x4204…4226 Head {h00=0x001e, h01=0x0050, text=» ADK A3,1 SKIP STATUS BYTE«, t00=0x002a, t01=0x0076}
0x4226…4238 Head {h00=0x000e, h01=0x0050, text=» RB DMT255«, t00=0x002a, t01=0x0098}
0x4238…4256 Head {h00=0x001a, h01=0x0050, text=»DMT260 ST A3,FDBRRO,A6«, t00=0x002a, t01=0x00aa}
0x4256…4260 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00c8}
0x4260…427a Head {h00=0x0016, h01=0x0050, text=»* RELEASE BUFFER«, t00=0x002a, t01=0x00d2}
0x427a…4284 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ec}
0x4284…429c Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A9 «, t00=0x002a, t01=0x00f6}
0x429c…42ae Head {h00=0x000e, h01=0x0050, text=» SUK A3,8 «, t00=0x002a, t01=0x010e}
0x42ae…42d4 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x002a, t01=0x0120}
0x42d4…42fe Head {h00=0x0026, h01=0x0050, text=» CF A14,CLRBUF CLEAR FREE BUFFERS «, t00=0x002a, t01=0x0146}
0x42fe…4310 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x002a, t01=0x0170}
0x4310…432c Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x002a, t01=0x0182}
0x432c…4350 Head {h00=0x0020, h01=0x0050, text=» RB DMT020 READ VTOC SECTOR «, t00=0x002b, t01=0x000e}
0x4350…435e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0032}
0x435e…4372 Head {h00=0x0010, h01=0x0050, text=»DMT270 EQU *«, t00=0x002b, t01=0x0040}
0x4372…4386 Head {h00=0x0010, h01=0x0050, text=» SUK A7,QRV «, t00=0x002b, t01=0x0054}
0x4386…43ae Head {h00=0x0024, h01=0x0050, text=» ABL(Z) DMT500 READ VTOC RECORD «, t00=0x002b, t01=0x0068}
0x43ae…43c4 Head {h00=0x0012, h01=0x0050, text=»* CLOSE FILE«, t00=0x002b, t01=0x0090}
0x43c4…43ee Head {h00=0x0026, h01=0x0050, text=»* UPDATE VTOC LAST RECORD NUMBER«, t00=0x002b, t01=0x00a6}
0x43ee…4418 Head {h00=0x0026, h01=0x0050, text=»* AND WRITE SECTOR BACK ON DISC «, t00=0x002b, t01=0x00d0}
0x4418…4430 Head {h00=0x0014, h01=0x0050, text=» AD A5,FDBRRO,A6«, t00=0x002b, t01=0x00fa}
0x4430…4442 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x002b, t01=0x0112}
0x4442…445a Head {h00=0x0014, h01=0x0050, text=» LC A2,FDBLRN,A6«, t00=0x002b, t01=0x0124}
0x445a…4472 Head {h00=0x0014, h01=0x0050, text=» SC A2,VTLRN,A5 «, t00=0x002b, t01=0x013c}
0x4472…448c Head {h00=0x0016, h01=0x0050, text=» LD A2,FDBLRN+1,A6«, t00=0x002b, t01=0x0154}
0x448c…44a6 Head {h00=0x0016, h01=0x0050, text=» ST A2,VTLRN+1,A5 «, t00=0x002b, t01=0x016e}
0x44a6…44c8 Head {h00=0x001e, h01=0x0050, text=»* CLOSE FILE. WRITE VTOC«, t00=0x002b, t01=0x0188}
0x44c8…44d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x001a}
0x44d2…44e6 Head {h00=0x0010, h01=0x0050, text=» LDK A7,/95 «, t00=0x002c, t01=0x0024}
0x44e6…44f2 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002c, t01=0x0038}
0x44f2…4502 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x002c, t01=0x0044}
0x4502…450c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0054}
0x450c…4530 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A6 FDBADDRESS IN A1 «, t00=0x002c, t01=0x005e}
0x4530…455a Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTIOT CHECK RETURN CODES «, t00=0x002c, t01=0x0082}
0x455a…456c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x002c, t01=0x00ac}
0x456c…4588 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) DMT724 ERROR«, t00=0x002c, t01=0x00be}
0x4588…459c Head {h00=0x0010, h01=0x0050, text=»DMT720 EQU *«, t00=0x002c, t01=0x00da}
0x459c…45be Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTTDM,A6 TTAB ADDR«, t00=0x002c, t01=0x00ee}
0x45be…45d4 Head {h00=0x0012, h01=0x0050, text=»* =1 START «, t00=0x002c, t01=0x0110}
0x45d4…45fe Head {h00=0x0026, h01=0x0050, text=» LD A2,FDBMIA,A6 MASTER INDEX ADDR«, t00=0x002c, t01=0x0126}
0x45fe…461e Head {h00=0x001c, h01=0x0050, text=» RF(Z) DMT721 DATA FILE «, t00=0x002c, t01=0x0150}
0x461e…4634 Head {h00=0x0012, h01=0x0050, text=» LDK A2,/FF -1«, t00=0x002c, t01=0x0170}
0x4634…4652 Head {h00=0x001a, h01=0x0050, text=»DMT721 ADK A2,1 0 OR 1«, t00=0x002c, t01=0x0186}
0x4652…466c Head {h00=0x0016, h01=0x0050, text=» ECR A2,A2 =1 END«, t00=0x002d, t01=0x0014}
0x466c…468e Head {h00=0x001e, h01=0x0050, text=» LC A2,ECBFC,A9 FILE CODE «, t00=0x002d, t01=0x002e}
0x468e…46b4 Head {h00=0x0022, h01=0x0050, text=» LDK A5,0 TRY LOCAL AND GLOBAL«, t00=0x002d, t01=0x0050}
0x46b4…46e6 Head {h00=0x002e, h01=0x0050, text=» CF A14,FNDFDB GET ENTRY IN TTAB CDTADTAB «, t00=0x002d, t01=0x0076}
0x46e6…4710 Head {h00=0x0026, h01=0x0050, text=» LDR A13,A5 LOCAL/GLOBAL INDICATOR«, t00=0x002d, t01=0x00a8}
0x4710…4722 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x002d, t01=0x00d2}
0x4722…4742 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) DMT725 FC FOUND «, t00=0x002d, t01=0x00e4}
0x4742…4760 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/8000 REQ ERR«, t00=0x002d, t01=0x0104}
0x4760…477a Head {h00=0x0016, h01=0x0050, text=»DMT724 ABL DMTERR «, t00=0x002d, t01=0x0122}
0x477a…478e Head {h00=0x0010, h01=0x0050, text=»DMT725 EQU *«, t00=0x002d, t01=0x013c}
0x478e…47ae Head {h00=0x001c, h01=0x0050, text=» LD A5,2,A4 FDB ADDRESS «, t00=0x002d, t01=0x0150}
0x47ae…47d8 Head {h00=0x0026, h01=0x0050, text=» LDR A11,A4 SAVE TABLE ENTRY ADDR «, t00=0x002d, t01=0x0170}
0x47d8…47fc Head {h00=0x0020, h01=0x0050, text=» LDR A12,A1 SAVE TTEAB ADDR «, t00=0x002e, t01=0x000a}
0x47fc…4834 Head {h00=0x0034, h01=0x0050, text=» SUR A10,A10 MARK THAT FDB NOT SHALL BE RELEASED«, t00=0x002e, t01=0x002e}
0x4834…4842 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0066}
0x4842…4876 Head {h00=0x0030, h01=0x0050, text=»* CHECK IF THIS FDB ADDR IS USED ELEWHERE «, t00=0x002e, t01=0x0074}
0x4876…4880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00a8}
0x4880…489c Head {h00=0x0018, h01=0x0050, text=»* SEARCH ALL TTABS«, t00=0x002e, t01=0x00b2}
0x489c…48a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00ce}
0x48a6…48bc Head {h00=0x0012, h01=0x0050, text=» LD* A2,SCTTCT«, t00=0x002e, t01=0x00d8}
0x48bc…48d0 Head {h00=0x0010, h01=0x0050, text=»DMT730 EQU *«, t00=0x002e, t01=0x00ee}
0x48d0…48e2 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x002e, t01=0x0102}
0x48e2…490e Head {h00=0x0028, h01=0x0050, text=» RF(NP) DMT780 NOT FOUND IN ANY TTAB«, t00=0x002e, t01=0x0114}
0x490e…4924 Head {h00=0x0012, h01=0x0050, text=» LD A3,SCTTCT «, t00=0x002e, t01=0x0140}
0x4924…4936 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x002e, t01=0x0156}
0x4936…494a Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A3 «, t00=0x002e, t01=0x0168}
0x494a…496a Head {h00=0x001c, h01=0x0050, text=» LC A3,TTB:ID,A1 TASK ID«, t00=0x002e, t01=0x017c}
0x496a…497e Head {h00=0x0010, h01=0x0050, text=» CCK A3,'##'«, t00=0x002f, t01=0x000c}
0x497e…49a8 Head {h00=0x0026, h01=0x0050, text=» RB(E) DMT730 JUMP IF MONITOR TASK«, t00=0x002f, t01=0x0020}
0x49a8…49c0 Head {h00=0x0014, h01=0x0050, text=» LD A3,TTB:TD,A1«, t00=0x002f, t01=0x004a}
0x49c0…49ec Head {h00=0x0028, h01=0x0050, text=» ADKL A1,TTB:TD+2 DEV DESCR TABLE +2«, t00=0x002f, t01=0x0062}
0x49ec…4a00 Head {h00=0x0010, h01=0x0050, text=»DMT770 EQU *«, t00=0x002f, t01=0x008e}
0x4a00…4a12 Head {h00=0x000e, h01=0x0050, text=» SUK A3,4 «, t00=0x002f, t01=0x00a2}
0x4a12…4a3a Head {h00=0x0024, h01=0x0050, text=» RB(NP) DMT730 NOT IN THIS TTAB «, t00=0x002f, t01=0x00b4}
0x4a3a…4a4c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x002f, t01=0x00dc}
0x4a4c…4a5e Head {h00=0x000e, h01=0x0050, text=» ADR A4,A3«, t00=0x002f, t01=0x00ee}
0x4a5e…4a72 Head {h00=0x0010, h01=0x0050, text=» CWR* A5,A4 «, t00=0x002f, t01=0x0100}
0x4a72…4a88 Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMT770«, t00=0x002f, t01=0x0114}
0x4a88…4aa6 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A11 TTAB ENTRY«, t00=0x002f, t01=0x012a}
0x4aa6…4ac2 Head {h00=0x0018, h01=0x0050, text=» ADK A7,2 FDB OFFSET«, t00=0x002f, t01=0x0148}
0x4ac2…4ad4 Head {h00=0x000e, h01=0x0050, text=» CWR A4,A7«, t00=0x002f, t01=0x0164}
0x4ad4…4af4 Head {h00=0x001c, h01=0x0050, text=» RB(E) DMT770 SAME ENTRY«, t00=0x002f, t01=0x0176}
0x4af4…4b1e Head {h00=0x0026, h01=0x0050, text=» RF DMT895 MORE USERS ON THIS FDB «, t00=0x0030, t01=0x0008}
0x4b1e…4b28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0032}
0x4b28…4b46 Head {h00=0x001a, h01=0x0050, text=»* NOW SEARCH SCTCDT «, t00=0x0030, t01=0x003c}
0x4b46…4b50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x005a}
0x4b50…4b64 Head {h00=0x0010, h01=0x0050, text=»DMT780 EQU *«, t00=0x0030, t01=0x0064}
0x4b64…4b7a Head {h00=0x0012, h01=0x0050, text=» LD* A4,SCTCDT«, t00=0x0030, t01=0x0078}
0x4b7a…4b8e Head {h00=0x0010, h01=0x0050, text=»DMT790 EQU *«, t00=0x0030, t01=0x008e}
0x4b8e…4ba0 Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0030, t01=0x00a2}
0x4ba0…4bd2 Head {h00=0x002e, h01=0x0050, text=» RF(NP) DMT800 THIS FDB HAS NO OTHER USER «, t00=0x0030, t01=0x00b4}
0x4bd2…4be8 Head {h00=0x0012, h01=0x0050, text=» LD A2,SCTCDT «, t00=0x0030, t01=0x00e6}
0x4be8…4bfa Head {h00=0x000e, h01=0x0050, text=» ADR A2,A4«, t00=0x0030, t01=0x00fc}
0x4bfa…4c0e Head {h00=0x0010, h01=0x0050, text=» CW A5,2,A2 «, t00=0x0030, t01=0x010e}
0x4c0e…4c24 Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMT790«, t00=0x0030, t01=0x0122}
0x4c24…4c36 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A4«, t00=0x0030, t01=0x0138}
0x4c36…4c4c Head {h00=0x0012, h01=0x0050, text=» AD A7,SCTCDT «, t00=0x0030, t01=0x014a}
0x4c4c…4c60 Head {h00=0x0010, h01=0x0050, text=» CWR A7,A11 «, t00=0x0030, t01=0x0160}
0x4c60…4c80 Head {h00=0x001c, h01=0x0050, text=» RB(E) DMT790 SAME ENTRY«, t00=0x0030, t01=0x0174}
0x4c80…4caa (49, 0, 398) Head {h00=0x0026, h01=0x0050, text=» RF DMT895 THIS FDB HAS MORE USERS«, t00=0x0031, t01=0x0004}
0x4caa…4cb8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x002e}
0x4cb8…4cc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x003c}
0x4cc2…4ce2 Head {h00=0x001c, h01=0x0050, text=»* NOW RELEASE THIS FDB«, t00=0x0031, t01=0x0046}
0x4ce2…4cec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0066}
0x4cec…4d00 Head {h00=0x0010, h01=0x0050, text=»DMT800 EQU *«, t00=0x0031, t01=0x0070}
0x4d00…4d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0084}
0x4d0a…4d28 Head {h00=0x001a, h01=0x0050, text=»* RELEASE EA-BUFFERS«, t00=0x0031, t01=0x008e}
0x4d28…4d32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ac}
0x4d32…4d64 Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/8000 ALL EA-BUFFERS ARE RELEASED«, t00=0x0031, t01=0x00b6}
0x4d64…4d80 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0031, t01=0x00e8}
0x4d80…4d96 Head {h00=0x0012, h01=0x0050, text=» CF A14,EARELB«, t00=0x0031, t01=0x0104}
0x4d96…4da0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x011a}
0x4da0…4dc0 Head {h00=0x001c, h01=0x0050, text=»* RELEASE CRN BUFFERS «, t00=0x0031, t01=0x0124}
0x4dc0…4dca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0144}
0x4dca…4de2 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,FDBCRL «, t00=0x0031, t01=0x014e}
0x4de2…4dfe Head {h00=0x0018, h01=0x0050, text=» ADR A5,A6 LINK ROOT«, t00=0x0031, t01=0x0166}
0x4dfe…4e12 Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A5 «, t00=0x0031, t01=0x0182}
0x4e12…4e2c Head {h00=0x0016, h01=0x0050, text=» CMR A5 CLEAR FDB «, t00=0x0032, t01=0x0008}
0x4e2c…4e3e Head {h00=0x000e, h01=0x0050, text=» RF DMT830«, t00=0x0032, t01=0x0022}
0x4e3e…4e52 Head {h00=0x0010, h01=0x0050, text=»DMT820 EQU *«, t00=0x0032, t01=0x0034}
0x4e52…4e74 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A5 BUFFER ADDRESS «, t00=0x0032, t01=0x0048}
0x4e74…4e88 Head {h00=0x0010, h01=0x0050, text=»DMT830 EQU *«, t00=0x0032, t01=0x006a}
0x4e88…4eb2 Head {h00=0x0026, h01=0x0050, text=» RF(Z) DMT840 ALL BUFFER S REMOVED«, t00=0x0032, t01=0x007e}
0x4eb2…4eda Head {h00=0x0024, h01=0x0050, text=» LDR* A5,A4 NEXT BUFFER ADDRESS «, t00=0x0032, t01=0x00a8}
0x4eda…4ee4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d0}
0x4ee4…4f06 Head {h00=0x001e, h01=0x0050, text=»* RETIURN BUFFER TO POOL«, t00=0x0032, t01=0x00da}
0x4f06…4f10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00fc}
0x4f10…4f1c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0032, t01=0x0106}
0x4f1c…4f32 Head {h00=0x0012, h01=0x0050, text=» LD A3,CRNQUE «, t00=0x0032, t01=0x0112}
0x4f32…4f44 Head {h00=0x000e, h01=0x0050, text=» STR A3,A4«, t00=0x0032, t01=0x0128}
0x4f44…4f5a Head {h00=0x0012, h01=0x0050, text=» ST A4,CRNQUE «, t00=0x0032, t01=0x013a}
0x4f5a…4f66 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0032, t01=0x0150}
0x4f66…4f78 Head {h00=0x000e, h01=0x0050, text=» RB DMT820«, t00=0x0032, t01=0x015c}
0x4f78…4f8c Head {h00=0x0010, h01=0x0050, text=»DMT840 EQU *«, t00=0x0032, t01=0x016e}
0x4f8c…4fa2 Head {h00=0x0012, h01=0x0050, text=» IFT FLXDSC=1 «, t00=0x0032, t01=0x0182}
0x4fa2…4fac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0008}
0x4fac…4fec Head {h00=0x003c, h01=0x0050, text=»* NOW CHECK DEVICE CODES. WHEN LAST FILE IS CLOSED ON «, t00=0x0033, t01=0x0012}
0x4fec…502e Head {h00=0x003e, h01=0x0050, text=»* A FLEXIBLE DISC UNIT, AN UNLOC IS MADE FOR THIS VOLUME«, t00=0x0033, t01=0x0052}
0x502e…5038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0094}
0x5038…5058 Head {h00=0x001c, h01=0x0050, text=» LDK A1,4 EXTENT COUNTER«, t00=0x0033, t01=0x009e}
0x5058…5074 Head {h00=0x0018, h01=0x0050, text=» LDR A5,A6 FDB ADDR «, t00=0x0033, t01=0x00be}
0x5074…50a6 Head {h00=0x002e, h01=0x0050, text=» ADKL A5,FDBEXT+1 ZADDR OF FIRST VOL CODE «, t00=0x0033, t01=0x00da}
0x50a6…50d0 Head {h00=0x0026, h01=0x0050, text=» SUKL A5,EXTELE EXT LENGTH IN FDB «, t00=0x0033, t01=0x010c}
0x50d0…50ee Head {h00=0x001a, h01=0x0050, text=» LDK A4,0 FOR VOL CODE«, t00=0x0033, t01=0x0136}
0x50ee…5102 Head {h00=0x0010, h01=0x0050, text=»DMT880 EQU *«, t00=0x0033, t01=0x0154}
0x5102…5122 Head {h00=0x001c, h01=0x0050, text=» ENB SEE LABEL 910 ENB «, t00=0x0033, t01=0x0168}
0x5122…5138 Head {h00=0x0012, h01=0x0050, text=» SUK A1,1 LOOP«, t00=0x0033, t01=0x0188}
0x5138…5162 Head {h00=0x0026, h01=0x0050, text=» ABL(NN) DMT900 CHECK THIS EXTENT «, t00=0x0034, t01=0x000e}
0x5162…516e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0038}
0x516e…5184 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0034, t01=0x0044}
0x5184…5192 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x005a}
0x5192…519c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0068}
0x519c…51bc Head {h00=0x001c, h01=0x0050, text=»* ALL EXTENTS CHECKED «, t00=0x0034, t01=0x0072}
0x51bc…51de Head {h00=0x001e, h01=0x0050, text=»* RELEASE MASRTER INDEX «, t00=0x0034, t01=0x0092}
0x51de…51e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00b4}
0x51e8…51f4 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0034, t01=0x00be}
0x51f4…521e Head {h00=0x0026, h01=0x0050, text=» LD A1,FDBMIA,A6 MASTER INDEX ADDR«, t00=0x0034, t01=0x00ca}
0x521e…5240 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT894 NO MATER IX «, t00=0x0034, t01=0x00f4}
0x5240…525a Head {h00=0x0016, h01=0x0050, text=» LD A5,MXIND LENTH«, t00=0x0034, t01=0x0116}
0x525a…526c Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0034, t01=0x0130}
0x526c…5280 Head {h00=0x0010, h01=0x0050, text=»DMT885 EQU *«, t00=0x0034, t01=0x0142}
0x5280…5292 Head {h00=0x000e, h01=0x0050, text=» SUK A5,4 «, t00=0x0034, t01=0x0156}
0x5292…52b4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT890 FIRST INDEX «, t00=0x0034, t01=0x0168}
0x52b4…52d6 Head {h00=0x001e, h01=0x0050, text=» RF(N) DMT894 NO MATER IX «, t00=0x0034, t01=0x018a}
0x52d6…52f0 Head {h00=0x0016, h01=0x0050, text=» CW A1,MXIND+2,A5 «, t00=0x0035, t01=0x001c}
0x52f0…5306 Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMT885«, t00=0x0035, t01=0x0036}
0x5306…531e Head {h00=0x0014, h01=0x0050, text=» LD A4,MXIND,A5 «, t00=0x0035, t01=0x004c}
0x531e…5348 Head {h00=0x0026, h01=0x0050, text=» RF(N) DMT890 PREVIOUS ENTRY USED «, t00=0x0035, t01=0x0064}
0x5348…536e Head {h00=0x0022, h01=0x0050, text=» LD A4,MXIND+4,A5 NO OF WORDS «, t00=0x0035, t01=0x008e}
0x536e…5392 Head {h00=0x0020, h01=0x0050, text=» ANKL A4,/7FFF REMOV USE BIT«, t00=0x0035, t01=0x00b4}
0x5392…53b6 Head {h00=0x0020, h01=0x0050, text=» ADS A4,MXIND,A5 NR OF WORDS«, t00=0x0035, t01=0x00d8}
0x53b6…53c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00fc}
0x53c0…53e2 Head {h00=0x001e, h01=0x0050, text=»* MOVE UP REST OF MXIND «, t00=0x0035, t01=0x0106}
0x53e2…53ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0128}
0x53ec…5404 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,MXIND+6«, t00=0x0035, t01=0x0132}
0x5404…5420 Head {h00=0x0018, h01=0x0050, text=» ADR A1,A5 FROM ADDR«, t00=0x0035, t01=0x014a}
0x5420…5432 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0035, t01=0x0166}
0x5432…544c Head {h00=0x0016, h01=0x0050, text=» SUK A3,4 TO ADDR «, t00=0x0035, t01=0x0178}
0x544c…5460 (54, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LD A2,MXIND«, t00=0x0036, t01=0x0004}
0x5460…5472 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A5«, t00=0x0036, t01=0x0018}
0x5472…548e Head {h00=0x0018, h01=0x0050, text=» SUK A2,2 NO OF CHAR«, t00=0x0036, t01=0x002a}
0x548e…54ac Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTWM MOVE UOP«, t00=0x0036, t01=0x0046}
0x54ac…54be Head {h00=0x000e, h01=0x0050, text=» RF DMT894«, t00=0x0036, t01=0x0064}
0x54be…54d2 Head {h00=0x0010, h01=0x0050, text=»DMT890 EQU *«, t00=0x0036, t01=0x0076}
0x54d2…54e8 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/7FFF«, t00=0x0036, t01=0x008a}
0x54e8…5512 Head {h00=0x0026, h01=0x0050, text=» ANS A4,MXIND+4,A5 REMOVE USE BIT «, t00=0x0036, t01=0x00a0}
0x5512…551e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00ca}
0x551e…552c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x00d6}
0x552c…5540 Head {h00=0x0010, h01=0x0050, text=»DMT894 EQU *«, t00=0x0036, t01=0x00e4}
0x5540…5574 Head {h00=0x0030, h01=0x0050, text=» LDKL A10,1 MARK THAT FDB SHALL BE RELEASED «, t00=0x0036, t01=0x00f8}
0x5574…5588 Head {h00=0x0010, h01=0x0050, text=»DMT895 EQU *«, t00=0x0036, t01=0x012c}
0x5588…559a Head {h00=0x000e, h01=0x0050, text=» INH INH«, t00=0x0036, t01=0x0140}
0x559a…55a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0152}
0x55a4…55c8 Head {h00=0x0020, h01=0x0050, text=»* DELETE TTAB/SCTCDT ENTRY«, t00=0x0036, t01=0x015c}
0x55c8…55d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0180}
0x55d2…55ec Head {h00=0x0016, h01=0x0050, text=» CMR A11 FILE CODE«, t00=0x0036, t01=0x018a}
0x55ec…5606 Head {h00=0x0016, h01=0x0050, text=» CM 2,A11 FDB ADDR«, t00=0x0037, t01=0x0014}
0x5606…5610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x002e}
0x5610…563e Head {h00=0x002a, h01=0x0050, text=»* RELEASE DWT-QUEUQ IN THIS FDB-DWT «, t00=0x0037, t01=0x0038}
0x563e…5648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0066}
0x5648…5662 Head {h00=0x0016, h01=0x0050, text=» LDR A1,A6 FDBADDR«, t00=0x0037, t01=0x0070}
0x5662…568a Head {h00=0x0024, h01=0x0050, text=» ADKL A1,DWTTQ ADDR QUEUE START «, t00=0x0037, t01=0x008a}
0x568a…56ac Head {h00=0x001e, h01=0x0050, text=» LDR* A5,A1 NEXT TTAB ADDR«, t00=0x0037, t01=0x00b2}
0x56ac…56c6 Head {h00=0x0016, h01=0x0050, text=» RF(Z) DMTA20 NO Q«, t00=0x0037, t01=0x00d4}
0x56c6…56e0 Head {h00=0x0016, h01=0x0050, text=» CMR A1 KILL ROOT «, t00=0x0037, t01=0x00ee}
0x56e0…5708 Head {h00=0x0024, h01=0x0050, text=»DMTA10 LDR* A1,A5 NEXT IN QUEUE «, t00=0x0037, t01=0x0108}
0x5708…5728 Head {h00=0x001c, h01=0x0050, text=» CF A15,QTJOB DISPATCH Q«, t00=0x0037, t01=0x0130}
0x5728…5740 Head {h00=0x0014, h01=0x0050, text=» LDR A5,A1 NEXT «, t00=0x0037, t01=0x0150}
0x5740…575c Head {h00=0x0018, h01=0x0050, text=» RB(NZ) DMTA10 MORE «, t00=0x0037, t01=0x0168}
0x575c…5770 Head {h00=0x0010, h01=0x0050, text=»DMTA20 EQU *«, t00=0x0037, t01=0x0184}
0x5770…577a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0008}
0x577a…57a0 Head {h00=0x0022, h01=0x0050, text=»* NEXT ENTRY IN TTAB/CDATAB «, t00=0x0038, t01=0x0012}
0x57a0…57aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0038}
0x57aa…57c8 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A12 TTAB ADDR «, t00=0x0038, t01=0x0042}
0x57c8…57da Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0038, t01=0x0060}
0x57da…5806 Head {h00=0x0028, h01=0x0050, text=» LC A2,ECBFC,A9 FILE CODE USERT ECB «, t00=0x0038, t01=0x0072}
0x5806…5830 Head {h00=0x0026, h01=0x0050, text=» LDR A5,A13 LOCAL/GLOBAL INDICATOR«, t00=0x0038, t01=0x009e}
0x5830…585a Head {h00=0x0026, h01=0x0050, text=» CF A14,FNDFDB SEARCH TTAB SCTCDT «, t00=0x0038, t01=0x00c8}
0x585a…587c Head {h00=0x001e, h01=0x0050, text=» LDK A7,0 INDICATES A2 = 0«, t00=0x0038, t01=0x00f2}
0x587c…5892 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0038, t01=0x0114}
0x5892…58a4 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0038, t01=0x012a}
0x58a4…58ba Head {h00=0x0012, h01=0x0050, text=» RF(Z) DMTA30 «, t00=0x0038, t01=0x013c}
0x58ba…58c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0152}
0x58c4…58e4 Head {h00=0x001c, h01=0x0050, text=»* MOV DWT TO NEXT FDB «, t00=0x0038, t01=0x015c}
0x58e4…5914 Head {h00=0x002c, h01=0x0050, text=»* AN INDEX FILE SHALL ALSO BE RELEASED«, t00=0x0038, t01=0x017c}
0x5914…591e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x001c}
0x591e…5948 Head {h00=0x0026, h01=0x0050, text=» LD A7,2,A4 NEXT FDB ADDR TO CLOSE«, t00=0x0039, t01=0x0026}
0x5948…595a Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0039, t01=0x0050}
0x595a…5976 Head {h00=0x0018, h01=0x0050, text=» ADR A1,A6 FROM ADDR«, t00=0x0039, t01=0x0062}
0x5976…5988 Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0039, t01=0x007e}
0x5988…59a2 Head {h00=0x0016, h01=0x0050, text=» ADR A3,A7 TO ADDR«, t00=0x0039, t01=0x0090}
0x59a2…59c0 Head {h00=0x001a, h01=0x0050, text=» LDK A2,12 NO OF BYTES«, t00=0x0039, t01=0x00aa}
0x59c0…59de Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTWM MOVE DWT«, t00=0x0039, t01=0x00c8}
0x59de…59f4 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0039, t01=0x00e6}
0x59f4…5a0c Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTUEC,A6«, t00=0x0039, t01=0x00fc}
0x5a0c…5a36 Head {h00=0x0026, h01=0x0050, text=» ST A3,DWTUEC,A7 MMU USER ECB ADDR«, t00=0x0039, t01=0x0114}
0x5a36…5a42 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x013e}
0x5a42…5a58 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0039, t01=0x014a}
0x5a58…5a70 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTDM,A6«, t00=0x0039, t01=0x0160}
0x5a70…5a8e Head {h00=0x001a, h01=0x0050, text=» ST A3,DWTTDM,A7 MOVE «, t00=0x0039, t01=0x0178}
0x5a8e…5aae Head {h00=0x001c, h01=0x0050, text=» CM FDBSNR,A7 SECTOR NR «, t00=0x003a, t01=0x0008}
0x5aae…5ac6 Head {h00=0x0014, h01=0x0050, text=» LDKL A3,FDBEXT «, t00=0x003a, t01=0x0028}
0x5ac6…5ad8 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A7«, t00=0x003a, t01=0x0040}
0x5ad8…5afc Head {h00=0x0020, h01=0x0050, text=» ST A3,FDBCEX,A7 1ST EXTENT «, t00=0x003a, t01=0x0052}
0x5afc…5b14 Head {h00=0x0014, h01=0x0050, text=» LDR A10,A10 =1«, t00=0x003a, t01=0x0076}
0x5b14…5b38 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMTA30 NO RELEASE =1«, t00=0x003a, t01=0x008e}
0x5b38…5b4e Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/8000«, t00=0x003a, t01=0x00b2}
0x5b4e…5b6e Head {h00=0x001c, h01=0x0050, text=» ST A3,DWTST,A6 NOT BUSY«, t00=0x003a, t01=0x00c8}
0x5b6e…5b82 Head {h00=0x0010, h01=0x0050, text=»DMTA30 EQU *«, t00=0x003a, t01=0x00e8}
0x5b82…5b8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x00fc}
0x5b8e…5ba0 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x003a, t01=0x0108}
0x5ba0…5baa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x011a}
0x5baa…5bc4 Head {h00=0x0016, h01=0x0050, text=»* RELEASE BUFFER«, t00=0x003a, t01=0x0124}
0x5bc4…5bce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x013e}
0x5bce…5be6 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x003a, t01=0x0148}
0x5be6…5bf8 Head {h00=0x000e, h01=0x0050, text=» SUK A3,8 «, t00=0x003a, t01=0x0160}
0x5bf8…5c0e Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTRBU«, t00=0x003a, t01=0x0172}
0x5c0e…5c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0188}
0x5c18…5c30 (59, 0, 400) Head {h00=0x0014, h01=0x0050, text=»* RELEASE FDB «, t00=0x003b, t01=0x0004}
0x5c30…5c3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x001c}
0x5c3a…5c4e Head {h00=0x0010, h01=0x0050, text=» LDR A10,A10«, t00=0x003b, t01=0x0026}
0x5c4e…5c6e Head {h00=0x001c, h01=0x0050, text=» RF(Z) DMTA40 NO RELEASE«, t00=0x003b, t01=0x003a}
0x5c6e…5c84 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x003b, t01=0x005a}
0x5c84…5c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0070}
0x5c8e…5cc2 Head {h00=0x0030, h01=0x0050, text=»* REMOVE ALL OTHER REFERAENCES TO THIS FDB«, t00=0x003b, t01=0x007a}
0x5cc2…5ccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00ae}
0x5ccc…5cf0 Head {h00=0x0020, h01=0x0050, text=» LDK A1,10 2*MAX NR OF FDBS «, t00=0x003b, t01=0x00b8}
0x5cf0…5d08 Head {h00=0x0014, h01=0x0050, text=»DMTA50 SUK A1,2 «, t00=0x003b, t01=0x00dc}
0x5d08…5d2e Head {h00=0x0022, h01=0x0050, text=» RF(N) DMTA70 ALL FDBS CHECKED«, t00=0x003b, t01=0x00f4}
0x5d2e…5d40 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x003b, t01=0x011a}
0x5d40…5d52 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A1«, t00=0x003b, t01=0x012c}
0x5d52…5d7a Head {h00=0x0024, h01=0x0050, text=» LD A3,FDBADF,A2 OTHER FDB ADDR «, t00=0x003b, t01=0x013e}
0x5d7a…5d90 Head {h00=0x0012, h01=0x0050, text=» RB(Z) DMTA50 «, t00=0x003b, t01=0x0166}
0x5d90…5db4 Head {h00=0x0020, h01=0x0050, text=» LDK A4,10 2*MAX NR OF FDBS «, t00=0x003b, t01=0x017c}
0x5db4…5dcc Head {h00=0x0014, h01=0x0050, text=»DMTA60 SUK A4,2 «, t00=0x003c, t01=0x0010}
0x5dcc…5e00 Head {h00=0x0030, h01=0x0050, text=» RB(N) DMTA50 ALL ADDR CHECKED IN OTHER FDB «, t00=0x003c, t01=0x0028}
0x5e00…5e12 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x003c, t01=0x005c}
0x5e12…5e24 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A4«, t00=0x003c, t01=0x006e}
0x5e24…5e3c Head {h00=0x0014, h01=0x0050, text=» CW A6,FDBADF,A5«, t00=0x003c, t01=0x0080}
0x5e3c…5e52 Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMTA60«, t00=0x003c, t01=0x0098}
0x5e52…5e5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00ae}
0x5e5c…5ea0 Head {h00=0x0040, h01=0x0050, text=»* DELETE THIS REFERENCE TO THE FDB THAT SHALL BE RELEASED «, t00=0x003c, t01=0x00b8}
0x5ea0…5eaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00fc}
0x5eaa…5ec0 Head {h00=0x0012, h01=0x0050, text=» CM FDBADF,A5 «, t00=0x003c, t01=0x0106}
0x5ec0…5ed2 Head {h00=0x000e, h01=0x0050, text=» RB DMTA50«, t00=0x003c, t01=0x011c}
0x5ed2…5ede Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x012e}
0x5ede…5eec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x013a}
0x5eec…5f00 Head {h00=0x0010, h01=0x0050, text=»DMTA70 EQU *«, t00=0x003c, t01=0x0148}
0x5f00…5f16 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/FFFE«, t00=0x003c, t01=0x015c}
0x5f16…5f28 Head {h00=0x000e, h01=0x0050, text=» INH INH«, t00=0x003c, t01=0x0172}
0x5f28…5f48 Head {h00=0x001c, h01=0x0050, text=» ANRS A3,A6 SET FDB FREE«, t00=0x003c, t01=0x0184}
0x5f48…5f5c Head {h00=0x0010, h01=0x0050, text=»DMTA40 EQU *«, t00=0x003d, t01=0x0014}
0x5f5c…5f8a Head {h00=0x002a, h01=0x0050, text=» CF A14,CLRBUF REMOVE ALL FREE BUFFERS«, t00=0x003d, t01=0x0028}
0x5f8a…5faa Head {h00=0x001c, h01=0x0050, text=» LDR A1,A7 NEW FDB ADDR «, t00=0x003d, t01=0x0056}
0x5faa…5fce Head {h00=0x0020, h01=0x0050, text=» ABL(Z) DMTERX NO MORE FDBS «, t00=0x003d, t01=0x0076}
0x5fce…5fe4 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x003d, t01=0x009a}
0x5fe4…5ff6 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x003d, t01=0x00b0}
0x5ff6…6000 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00c2}
0x6000…6038 Head {h00=0x0034, h01=0x0050, text=»* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT «, t00=0x003d, t01=0x00cc}
0x6038…6042 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0104}
0x6042…6054 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x003d, t01=0x010e}
0x6054…607a Head {h00=0x0022, h01=0x0050, text=» LC A7,FDBEXT,A1 TASK 1ST EXT «, t00=0x003d, t01=0x0120}
0x607a…6098 Head {h00=0x001a, h01=0x0050, text=» ADKL A7,'#D' TASK ID «, t00=0x003d, t01=0x0146}
0x6098…60a4 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x003d, t01=0x0164}
0x60a4…60b4 Head {h00=0x000c, h01=0x0050, text=» DATA -4«, t00=0x003d, t01=0x0170}
0x60b4…60c8 Head {h00=0x0010, h01=0x0050, text=» DATA DMTASK«, t00=0x003d, t01=0x0180}
0x60c8…60d4 (62, 0, 400) Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x003e, t01=0x0004}
0x60d4…60e8 Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x003e, t01=0x0010}
0x60e8…60f4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0024}
0x60f4…610a Head {h00=0x0012, h01=0x0050, text=» IFT FLXDSC=1 «, t00=0x003e, t01=0x0030}
0x610a…6118 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003e, t01=0x0046}
0x6118…612c Head {h00=0x0010, h01=0x0050, text=»DMT900 EQU *«, t00=0x003e, t01=0x0054}
0x612c…6154 Head {h00=0x0024, h01=0x0050, text=»* UNLOCK FLEXDISC IN THIS LOOP«, t00=0x003e, t01=0x0068}
0x6154…615e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0090}
0x615e…6174 Head {h00=0x0012, h01=0x0050, text=»* REGISTERS «, t00=0x003e, t01=0x009a}
0x6174…6194 Head {h00=0x001c, h01=0x0050, text=»* A1 = EXTENT COUNTER «, t00=0x003e, t01=0x00b0}
0x6194…61ce Head {h00=0x0036, h01=0x0050, text=»* A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR «, t00=0x003e, t01=0x00d0}
0x61ce…61e8 Head {h00=0x0016, h01=0x0050, text=»* A6 = FDB ADDR «, t00=0x003e, t01=0x010a}
0x61e8…621c Head {h00=0x0030, h01=0x0050, text=»* A8 = ECB ADDR A9 = DM ECB ADDR «, t00=0x003e, t01=0x0124}
0x621c…6234 Head {h00=0x0014, h01=0x0050, text=»* A10-A12 USED«, t00=0x003e, t01=0x0158}
0x6234…623e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0170}
0x623e…6268 Head {h00=0x0026, h01=0x0050, text=» ADKL A5,EXTELE EXT LENGTH IN FDB «, t00=0x003e, t01=0x017a}
0x6268…6286 Head {h00=0x001a, h01=0x0050, text=» LCR A7,A5 VOLUME CODE«, t00=0x003f, t01=0x0014}
0x6286…629a Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x003f, t01=0x0032}
0x629a…62b8 Head {h00=0x001a, h01=0x0050, text=» ABL(Z) DMT880 NO CODE«, t00=0x003f, t01=0x0046}
0x62b8…62c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0064}
0x62c2…62ec Head {h00=0x0026, h01=0x0050, text=»* FLEXDICSC IF BIT 8-13 = 111110«, t00=0x003f, t01=0x006e}
0x62ec…62f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0098}
0x62f6…630a Head {h00=0x0010, h01=0x0050, text=» ANK A7,/F8 «, t00=0x003f, t01=0x00a2}
0x630a…631e Head {h00=0x0010, h01=0x0050, text=» SUK A7,/F8 «, t00=0x003f, t01=0x00b6}
0x631e…6342 Head {h00=0x0020, h01=0x0050, text=» ABL(NE) DMT880 NO FLEXDISC «, t00=0x003f, t01=0x00ca}
0x6342…634c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00ee}
0x634c…6386 Head {h00=0x0036, h01=0x0050, text=»* IF SAME FLEXDISC AS LAST, DO NOT SCHECK AGAIN «, t00=0x003f, t01=0x00f8}
0x6386…6390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0132}
0x6390…63a2 Head {h00=0x000e, h01=0x0050, text=» CCR A4,A5«, t00=0x003f, t01=0x013c}
0x63a2…63be Head {h00=0x0018, h01=0x0050, text=» ABL(E) DMT880 SAME «, t00=0x003f, t01=0x014e}
0x63be…63c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x016a}
0x63c8…6408 Head {h00=0x003c, h01=0x0050, text=»* NOW SEARCH ALL FDBS FOR THOIS FLEXIBLE DISC VOL CODE«, t00=0x003f, t01=0x0174}
0x6408…6412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0024}
0x6412…6426 Head {h00=0x0010, h01=0x0050, text=»DMT910 EQU *«, t00=0x0040, t01=0x002e}
0x6426…6446 Head {h00=0x001c, h01=0x0050, text=» LCR A4,A5 SAVE VOL CODE«, t00=0x0040, t01=0x0042}
0x6446…646c Head {h00=0x0022, h01=0x0050, text=» LDKL A3,FDBSTA FDB LINK ROOT «, t00=0x0040, t01=0x0062}
0x646c…647e Head {h00=0x000e, h01=0x0050, text=» INH INH«, t00=0x0040, t01=0x0088}
0x647e…6490 Head {h00=0x000e, h01=0x0050, text=» RF DMT925«, t00=0x0040, t01=0x009a}
0x6490…64a4 Head {h00=0x0010, h01=0x0050, text=»DMT920 EQU *«, t00=0x0040, t01=0x00ac}
0x64a4…64c0 Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A3 FDB ADDR«, t00=0x0040, t01=0x00c0}
0x64c0…64d4 Head {h00=0x0010, h01=0x0050, text=»DMT925 EQU *«, t00=0x0040, t01=0x00dc}
0x64d4…64f6 Head {h00=0x001e, h01=0x0050, text=» ANKL A3,/FFFE FDB ADDR «, t00=0x0040, t01=0x00f0}
0x64f6…651c Head {h00=0x0022, h01=0x0050, text=» RF(Z) DMT980 ALL FDBS CHECKED«, t00=0x0040, t01=0x0112}
0x651c…6530 Head {h00=0x0010, h01=0x0050, text=» LDR* A7,A3 «, t00=0x0040, t01=0x0138}
0x6530…6542 Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x0040, t01=0x014c}
0x6542…655c Head {h00=0x0016, h01=0x0050, text=» RB(Z) DMT920 FREE«, t00=0x0040, t01=0x015e}
0x655c…656e Head {h00=0x000e, h01=0x0050, text=» CWR A6,A3«, t00=0x0040, t01=0x0178}
0x656e…6590 Head {h00=0x001e, h01=0x0050, text=» RB(E) DMT920 CURRENT FDB «, t00=0x0040, t01=0x018a}
0x6590…65b0 Head {h00=0x001c, h01=0x0050, text=» LDK A7,4 EXTENT COUNTER«, t00=0x0041, t01=0x001c}
0x65b0…65cc Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 FDB ADDR «, t00=0x0041, t01=0x003c}
0x65cc…65e6 Head {h00=0x0016, h01=0x0050, text=» ADKL A2,FDBEXT+1 «, t00=0x0041, t01=0x0058}
0x65e6…6606 Head {h00=0x001c, h01=0x0050, text=»* ADDR OF 1ST VOL CODE«, t00=0x0041, t01=0x0072}
0x6606…6630 Head {h00=0x0026, h01=0x0050, text=» SUKL A2,EXTELE EXT LENGTH IN FDB «, t00=0x0041, t01=0x0092}
0x6630…6644 Head {h00=0x0010, h01=0x0050, text=»DMT930 EQU *«, t00=0x0041, t01=0x00bc}
0x6644…6656 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0041, t01=0x00d0}
0x6656…6680 Head {h00=0x0026, h01=0x0050, text=» RB(N) DMT920 ALL EXTENTS CHECKED «, t00=0x0041, t01=0x00e2}
0x6680…6698 Head {h00=0x0014, h01=0x0050, text=» ADKL A2,EXTELE «, t00=0x0041, t01=0x010c}
0x6698…66b6 Head {h00=0x001a, h01=0x0050, text=» CCR A4,A2 VOLUME CODE«, t00=0x0041, t01=0x0124}
0x66b6…66e2 Head {h00=0x0028, h01=0x0050, text=» ABL(E) DMT880 CODE USED. NO UNLOCK «, t00=0x0041, t01=0x0142}
0x66e2…6700 Head {h00=0x001a, h01=0x0050, text=» RB DMT930 NEXT EXTENT«, t00=0x0041, t01=0x016e}
0x6700…670a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x018c}
0x670a…6734 Head {h00=0x0026, h01=0x0050, text=»* ALL FSDBS CHECKED. MAKE UNLOAD«, t00=0x0042, t01=0x0008}
0x6734…673e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0032}
0x673e…6752 Head {h00=0x0010, h01=0x0050, text=»DMT980 EQU *«, t00=0x0042, t01=0x003c}
0x6752…6764 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x0042, t01=0x0050}
0x6764…676e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0062}
0x676e…67a8 Head {h00=0x0036, h01=0x0050, text=»* NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED «, t00=0x0042, t01=0x006c}
0x67a8…67c6 Head {h00=0x001a, h01=0x0050, text=»* WITH THIS REQUEST «, t00=0x0042, t01=0x00a6}
0x67c6…67d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00c4}
0x67d0…67f0 Head {h00=0x001c, h01=0x0050, text=» SC A4,ECBFC,A8 VOL CODE«, t00=0x0042, t01=0x00ce}
0x67f0…67fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00ee}
0x67fa…6816 Head {h00=0x0018, h01=0x0050, text=» IFF DSKPAG+SWPBLK=0«, t00=0x0042, t01=0x00f8}
0x6816…6828 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0042, t01=0x0114}
0x6828…6850 Head {h00=0x0024, h01=0x0050, text=» CC A4,SCTPLD+1 CHECK FILE CODE «, t00=0x0042, t01=0x0126}
0x6850…687e Head {h00=0x002a, h01=0x0050, text=» ABL(E) DMT880 PROGRAM LOADING DEVICE?«, t00=0x0042, t01=0x014e}
0x687e…688a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x017c}
0x688a…6894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0188}
0x6894…68aa (67, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT FLXDSC=1 «, t00=0x0043, t01=0x0004}
0x68aa…68ca Head {h00=0x001c, h01=0x0050, text=» LDK A7,/B8 UNLOAD WAIT «, t00=0x0043, t01=0x001a}
0x68ca…68d6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0043, t01=0x003a}
0x68d6…68e6 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0043, t01=0x0046}
0x68e6…68fe Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBRC,A8 «, t00=0x0043, t01=0x0056}
0x68fe…6916 Head {h00=0x0014, h01=0x0050, text=» ANK A1,1 INOPER«, t00=0x0043, t01=0x006e}
0x6916…692e Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0043, t01=0x0086}
0x692e…6950 Head {h00=0x001e, h01=0x0050, text=» ABL DMT880 CHECK NEXT EXT«, t00=0x0043, t01=0x009e}
0x6950…695c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x00c0}
0x695c…696a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x00cc}
0x696a…6990 Head {h00=0x0022, h01=0x0050, text=»DMT500 EQU * READ VTOC RECORD «, t00=0x0043, t01=0x00da}
0x6990…699a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0100}
0x699a…69c0 Head {h00=0x0022, h01=0x0050, text=» LD A2,VTOCRL VTOC REC LENGTH «, t00=0x0043, t01=0x010a}
0x69c0…69d8 Head {h00=0x0014, h01=0x0050, text=» CW A2,ECBRL,A9 «, t00=0x0043, t01=0x0130}
0x69d8…6a06 Head {h00=0x002a, h01=0x0050, text=» RF(NG) DMT510 MOVE THE WHOLE VTOC REC«, t00=0x0043, t01=0x0148}
0x6a06…6a2a Head {h00=0x0020, h01=0x0050, text=» LDK A1,/8 INCORRECT LENGTH «, t00=0x0043, t01=0x0176}
0x6a2a…6a56 Head {h00=0x0028, h01=0x0050, text=» ORS A1,ECBRC,A9 SET RC BUT CONTINUE«, t00=0x0044, t01=0x000a}
0x6a56…6a86 Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU «, t00=0x0044, t01=0x0036}
0x6a86…6a9a Head {h00=0x0010, h01=0x0050, text=»DMT510 EQU *«, t00=0x0044, t01=0x0066}
0x6a9a…6ab2 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBEL,A9 «, t00=0x0044, t01=0x007a}
0x6ab2…6ad4 Head {h00=0x001e, h01=0x0050, text=» CF A14,DMTREM MOVE RECORD«, t00=0x0044, t01=0x0092}
0x6ad4…6ae8 Head {h00=0x0010, h01=0x0050, text=»DMAEX EQU * «, t00=0x0044, t01=0x00b4}
0x6ae8…6b00 Head {h00=0x0014, h01=0x0050, text=» ABL DMTAEX EXIT«, t00=0x0044, t01=0x00c8}
0x6b00…6b0e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x00e0}
0x6b0e…6b34 Head {h00=0x0022, h01=0x0050, text=»DMSQWR EQU * SEQUENTIAL WRITE «, t00=0x0044, t01=0x00ee}
0x6b34…6b3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0114}
0x6b3e…6b60 Head {h00=0x001e, h01=0x0050, text=»DMRDWR EQU * RANDOM WRITE «, t00=0x0044, t01=0x011e}
0x6b60…6b6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0140}
0x6b6a…6b8c Head {h00=0x001e, h01=0x0050, text=»DMRDDE EQU * RANDOM DELETE«, t00=0x0044, t01=0x014a}
0x6b8c…6b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x016c}
0x6b96…6bb8 Head {h00=0x001e, h01=0x0050, text=»DMINS EQU * INDEXED INSERT«, t00=0x0044, t01=0x0176}
0x6bb8…6bc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0008}
0x6bc2…6be4 Head {h00=0x001e, h01=0x0050, text=»DMDEL EQU * INDEXED DELETE«, t00=0x0045, t01=0x0012}
0x6be4…6bee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0034}
0x6bee…6c12 Head {h00=0x0020, h01=0x0050, text=»DMIRW EQU * INDEXED REWRITE «, t00=0x0045, t01=0x003e}
0x6c12…6c1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0062}
0x6c1c…6c46 Head {h00=0x0026, h01=0x0050, text=»DMRDWD EQU * DELAYED RANDOM WRITE «, t00=0x0045, t01=0x006c}
0x6c46…6c50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0096}
0x6c50…6c7a Head {h00=0x0026, h01=0x0050, text=»DMRDDD EQU * DELAYED RANDOM DELETE«, t00=0x0045, t01=0x00a0}
0x6c7a…6c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ca}
0x6c84…6c9c Head {h00=0x0014, h01=0x0050, text=»* TEST STATUS «, t00=0x0045, t01=0x00d4}
0x6c9c…6cb6 Head {h00=0x0016, h01=0x0050, text=» LD A10,FDBRRO,A6 «, t00=0x0045, t01=0x00ec}
0x6cb6…6cd0 Head {h00=0x0016, h01=0x0050, text=» AD A10,FDBRLE,A6 «, t00=0x0045, t01=0x0106}
0x6cd0…6cf8 Head {h00=0x0024, h01=0x0050, text=» ADR A10,A5 STATUS BYTE ADDRESS «, t00=0x0045, t01=0x0120}
0x6cf8…6d18 Head {h00=0x001c, h01=0x0050, text=» LDR A11,A5 BUFFER ADDR «, t00=0x0045, t01=0x0148}
0x6d18…6d34 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0045, t01=0x0168}
0x6d34…6d4e Head {h00=0x0016, h01=0x0050, text=» LD A2,ECBCW+2,A9 «, t00=0x0045, t01=0x0184}
0x6d4e…6d62 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0046, t01=0x000e}
0x6d62…6d84 Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBCW,A9 LOG REC NR«, t00=0x0046, t01=0x0022}
0x6d84…6d96 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0046, t01=0x0044}
0x6d96…6daa Head {h00=0x0010, h01=0x0050, text=» CCR A4,A10 «, t00=0x0046, t01=0x0056}
0x6daa…6dc4 Head {h00=0x0016, h01=0x0050, text=» RF(E) DMS010 FREE«, t00=0x0046, t01=0x006a}
0x6dc4…6dda Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0046, t01=0x0084}
0x6dda…6dec Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0046, t01=0x009a}
0x6dec…6e00 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QINS«, t00=0x0046, t01=0x00ac}
0x6e00…6e24 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMEAER INDEXED INSERT«, t00=0x0046, t01=0x00c0}
0x6e24…6e30 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x00e4}
0x6e30…6e42 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0046, t01=0x00f0}
0x6e42…6e56 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QSW «, t00=0x0046, t01=0x0102}
0x6e56…6e76 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMEAER SEQ WRITE «, t00=0x0046, t01=0x0116}
0x6e76…6e8c Head {h00=0x0012, h01=0x0050, text=» IFT QNOEXA=1 «, t00=0x0046, t01=0x0136}
0x6e8c…6eb2 Head {h00=0x0022, h01=0x0050, text=»* NO EA-CHECK IF EA-BIT = 1 «, t00=0x0046, t01=0x014c}
0x6eb2…6ebc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0172}
0x6ebc…6ed4 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTST,A6 «, t00=0x0046, t01=0x017c}
0x6ed4…6eea (71, 0, 400) Head {h00=0x0012, h01=0x0050, text=» ANK A4,EABIT «, t00=0x0047, t01=0x0004}
0x6eea…6f10 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DMS020 EA=1, NO CHECK «, t00=0x0047, t01=0x001a}
0x6f10…6f2a Head {h00=0x0016, h01=0x0050, text=»* EA MUST BE SET«, t00=0x0047, t01=0x0040}
0x6f2a…6f34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x005a}
0x6f34…6f4a Head {h00=0x0012, h01=0x0050, text=» CF A14,EATEST«, t00=0x0047, t01=0x0064}
0x6f4a…6f66 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 RTN CODE «, t00=0x0047, t01=0x007a}
0x6f66…6f8c Head {h00=0x0022, h01=0x0050, text=» RF(NP) DMEAER NO EA THIS TASK«, t00=0x0047, t01=0x0096}
0x6f8c…6f98 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x00bc}
0x6f98…6faa Head {h00=0x000e, h01=0x0050, text=» RF DMS100«, t00=0x0047, t01=0x00c8}
0x6faa…6fbe Head {h00=0x0010, h01=0x0050, text=»DMS010 EQU *«, t00=0x0047, t01=0x00da}
0x6fbe…6fd4 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0047, t01=0x00ee}
0x6fd4…6fe6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0047, t01=0x0104}
0x6fe6…6ffa Head {h00=0x0010, h01=0x0050, text=» SUK A4,QIRW«, t00=0x0047, t01=0x0116}
0x6ffa…7020 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DMERND INDEXED REWRITE «, t00=0x0047, t01=0x012a}
0x7020…7032 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0047, t01=0x0150}
0x7032…7046 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QDEL«, t00=0x0047, t01=0x0162}
0x7046…706a Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMERND INDEXED DELETE«, t00=0x0047, t01=0x0176}
0x706a…7076 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x000a}
0x7076…708a Head {h00=0x0010, h01=0x0050, text=»DMS020 EQU *«, t00=0x0048, t01=0x0016}
0x708a…70a0 Head {h00=0x0012, h01=0x0050, text=» CF A14,EATEST«, t00=0x0048, t01=0x002a}
0x70a0…70bc Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 RTN CODE «, t00=0x0048, t01=0x0040}
0x70bc…70e0 Head {h00=0x0020, h01=0x0050, text=» RF(N) DMEAER EA OTHER TASK «, t00=0x0048, t01=0x005c}
0x70e0…70f4 Head {h00=0x0010, h01=0x0050, text=»DMS100 EQU *«, t00=0x0048, t01=0x0080}
0x70f4…7116 Head {h00=0x001e, h01=0x0050, text=» LDK A1,0 SET STATUS FREE «, t00=0x0048, t01=0x0094}
0x7116…712c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0048, t01=0x00b6}
0x712c…713e Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0048, t01=0x00cc}
0x713e…7152 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QIRW«, t00=0x0048, t01=0x00de}
0x7152…7178 Head {h00=0x0022, h01=0x0050, text=» RF(E) CHK010 INDEXED REWRITE «, t00=0x0048, t01=0x00f2}
0x7178…718a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0048, t01=0x0118}
0x718a…719e Head {h00=0x0010, h01=0x0050, text=» SUK A2,QINS«, t00=0x0048, t01=0x012a}
0x719e…71c2 Head {h00=0x0020, h01=0x0050, text=» RF(E) CHK010 INDEXED INSERT«, t00=0x0048, t01=0x013e}
0x71c2…71d4 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0048, t01=0x0162}
0x71d4…71e8 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QDEL«, t00=0x0048, t01=0x0174}
0x71e8…720c Head {h00=0x0020, h01=0x0050, text=» RF(E) CHK010 INDEXED DELETE«, t00=0x0048, t01=0x0188}
0x720c…7218 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x001c}
0x7218…722a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0049, t01=0x0028}
0x722a…723e Head {h00=0x0010, h01=0x0050, text=» SUK A2,QRD «, t00=0x0049, t01=0x003a}
0x723e…7262 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT350 RANDOM DELETE «, t00=0x0049, t01=0x004e}
0x7262…7274 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0049, t01=0x0072}
0x7274…7288 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QRDD«, t00=0x0049, t01=0x0084}
0x7288…72b4 Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT350 DELAYED RANDOM DELETE «, t00=0x0049, t01=0x0098}
0x72b4…72d0 Head {h00=0x0018, h01=0x0050, text=» RF DMT310 RW,RWD,SW«, t00=0x0049, t01=0x00c4}
0x72d0…72e6 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0049, t01=0x00e0}
0x72e6…72f4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x00f6}
0x72f4…7308 Head {h00=0x0010, h01=0x0050, text=»CHK010 EQU *«, t00=0x0049, t01=0x0104}
0x7308…7352 Head {h00=0x0046, h01=0x0050, text=»* INDEXED REWRITE,INDEXED INSERT AND INDEXED DELETE ENTERS HERE «, t00=0x0049, t01=0x0118}
0x7352…735c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0162}
0x735c…7380 Head {h00=0x0020, h01=0x0050, text=»* COUNT NR OF INDEXES AND «, t00=0x0049, t01=0x016c}
0x7380…73b0 Head {h00=0x002c, h01=0x0050, text=»* COMPARE KEYS IN FILE AND USER BUFFER«, t00=0x0049, t01=0x0190}
0x73b0…73ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0030}
0x73ba…73d6 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x004a, t01=0x003a}
0x73d6…73f4 Head {h00=0x001a, h01=0x0050, text=» LDK A5,8 MAX 4 INDEX «, t00=0x004a, t01=0x0056}
0x73f4…7416 Head {h00=0x001e, h01=0x0050, text=» SUR A12,A12 INDEX COUNTER«, t00=0x004a, t01=0x0074}
0x7416…742a Head {h00=0x0010, h01=0x0050, text=»CHK040 EQU *«, t00=0x004a, t01=0x0096}
0x742a…743c Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x004a, t01=0x00aa}
0x743c…7464 Head {h00=0x0024, h01=0x0050, text=» RF(N) CHK100 ALL INDEX CHECKED «, t00=0x004a, t01=0x00bc}
0x7464…747e Head {h00=0x0016, h01=0x0050, text=» LDR A2,A1 FDB ADD«, t00=0x004a, t01=0x00e4}
0x747e…7490 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x004a, t01=0x00fe}
0x7490…74bc Head {h00=0x0028, h01=0x0050, text=» LD A6,FDBAI1,A2 FDB ADDR INDEX FILE«, t00=0x004a, t01=0x0110}
0x74bc…74da Head {h00=0x001a, h01=0x0050, text=» RB(Z) CHK040 NO INDEX«, t00=0x004a, t01=0x013c}
0x74da…7500 Head {h00=0x0022, h01=0x0050, text=» ADKL A12,1 COUNT INDEX FILES «, t00=0x004a, t01=0x015a}
0x7500…7520 Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A1 ORDER =3«, t00=0x004a, t01=0x0180}
0x7520…7540 Head {h00=0x001c, h01=0x0050, text=» ANK A2,/3F ORDER INDEX «, t00=0x004b, t01=0x0010}
0x7540…7554 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QIRW«, t00=0x004b, t01=0x0030}
0x7554…757e Head {h00=0x0026, h01=0x0050, text=» RB(NE) CHK040 NOT INDEXED REWRITE«, t00=0x004b, t01=0x0044}
0x757e…7588 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x006e}
0x7588…759e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004b, t01=0x0078}
0x759e…75b8 Head {h00=0x0016, h01=0x0050, text=» LDR A7,A1 SAVE A1«, t00=0x004b, t01=0x008e}
0x75b8…75e6 Head {h00=0x002a, h01=0x0050, text=» LD A1,FDBKA,A6 GET KEY START ADDRESS «, t00=0x004b, t01=0x00a8}
0x75e6…75fe Head {h00=0x0014, h01=0x0050, text=» AD A1,ECBBA,A9 «, t00=0x004b, t01=0x00d6}
0x75fe…7634 Head {h00=0x0032, h01=0x0050, text=» LDKL A2,FDBKEY GET KEY SAVE AREA DISPLACEMENT«, t00=0x004b, t01=0x00ee}
0x7634…7656 Head {h00=0x001e, h01=0x0050, text=» ADR A2,A6 ADD FDB ADDRESS«, t00=0x004b, t01=0x0124}
0x7656…7672 Head {h00=0x0018, h01=0x0050, text=» LDR A13,A2 SAVE A2 «, t00=0x004b, t01=0x0146}
0x7672…7698 Head {h00=0x0022, h01=0x0050, text=» LD A3,FDBRLE,A6 RECORD LENGTH«, t00=0x004b, t01=0x0162}
0x7698…76b4 Head {h00=0x0018, h01=0x0050, text=» SUK A3,6 KEY LENGTH«, t00=0x004b, t01=0x0188}
0x76b4…76c0 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x004c, t01=0x0014}
0x76c0…76ea Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTDM,A7 GET TTAB ADDRESS «, t00=0x004c, t01=0x0020}
0x76ea…7712 Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A4 LOAD MMU REGISTERS«, t00=0x004c, t01=0x004a}
0x7712…773a Head {h00=0x0024, h01=0x0050, text=» LD A4,PRUN GET DM TTAB ADDRESS «, t00=0x004c, t01=0x0072}
0x773a…776e Head {h00=0x0030, h01=0x0050, text=» TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE«, t00=0x004c, t01=0x009a}
0x776e…777a Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x004c, t01=0x00ce}
0x777a…77aa Head {h00=0x002c, h01=0x0050, text=» CF A14,MOV:US MOVE KEY TO FDB KEY AREA «, t00=0x004c, t01=0x00da}
0x77aa…77c8 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A7 RESTORE A1 «, t00=0x004c, t01=0x010a}
0x77c8…77e6 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A13 RESTORE A2«, t00=0x004c, t01=0x0128}
0x77e6…7814 Head {h00=0x002a, h01=0x0050, text=» LD A3,FDBKA,A6 GET KEY START ADDRESS «, t00=0x004c, t01=0x0146}
0x7814…7820 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0174}
0x7820…782a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0180}
0x782a…7840 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x004c, t01=0x018a}
0x7840…7856 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004d, t01=0x0010}
0x7856…787c Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBKA,A6 KEY START ADDR«, t00=0x004d, t01=0x0026}
0x787c…788e Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x004d, t01=0x004c}
0x788e…78b4 Head {h00=0x0022, h01=0x0050, text=» AD A2,ECBBA,A9 KEY IN BUFFER «, t00=0x004d, t01=0x005e}
0x78b4…78c0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0084}
0x78c0…78ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0090}
0x78ca…78e0 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x004d, t01=0x009a}
0x78e0…78f8 Head {h00=0x0014, h01=0x0050, text=» AD A3,FDBRRO,A1«, t00=0x004d, t01=0x00b0}
0x78f8…7918 Head {h00=0x001c, h01=0x0050, text=» ADR A3,A11 KEY IN FILE «, t00=0x004d, t01=0x00c8}
0x7918…792a Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x004d, t01=0x00e8}
0x792a…7950 Head {h00=0x0022, h01=0x0050, text=» LD A6,FDBRLE,A6 RECORD LENGTH«, t00=0x004d, t01=0x00fa}
0x7950…796c Head {h00=0x0018, h01=0x0050, text=» SUK A6,6 KEY LENGTH«, t00=0x004d, t01=0x0120}
0x796c…7990 Head {h00=0x0020, h01=0x0050, text=» CF A14,CHKKEY COMPARE KEYS «, t00=0x004d, t01=0x013c}
0x7990…79a2 Head {h00=0x000e, h01=0x0050, text=» CWR A6,A7«, t00=0x004d, t01=0x0160}
0x79a2…79d0 Head {h00=0x002a, h01=0x0050, text=» RB(E) CHK040 KEY UNCHANGED CHECK NEXT«, t00=0x004d, t01=0x0172}
0x79d0…79ec Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x004e, t01=0x0010}
0x79ec…7a10 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/4000 KEY NOT FOUND«, t00=0x004e, t01=0x002c}
0x7a10…7a22 Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x004e, t01=0x0050}
0x7a22…7a36 Head {h00=0x0010, h01=0x0050, text=»CHK100 EQU *«, t00=0x004e, t01=0x0062}
0x7a36…7a52 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x004e, t01=0x0076}
0x7a52…7a6a Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x004e, t01=0x0092}
0x7a6a…7a8a Head {h00=0x001c, h01=0x0050, text=» ANK A7,/3F ORDER INDEX «, t00=0x004e, t01=0x00aa}
0x7a8a…7a9c Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x004e, t01=0x00ca}
0x7a9c…7ab4 Head {h00=0x0014, h01=0x0050, text=» LC A2,FDBNIF,A6«, t00=0x004e, t01=0x00dc}
0x7ab4…7ac8 Head {h00=0x0010, h01=0x0050, text=» CWR A2,A12 «, t00=0x004e, t01=0x00f4}
0x7ac8…7af4 Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT310 ALL INDEX IS EXISTING «, t00=0x004e, t01=0x0108}
0x7af4…7b12 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/8000 REQ ERR«, t00=0x004e, t01=0x0134}
0x7b12…7b24 Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x004e, t01=0x0152}
0x7b24…7b48 Head {h00=0x0020, h01=0x0050, text=»DMERND LDKL A1,/800 NO DATA «, t00=0x004e, t01=0x0164}
0x7b48…7b5a Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x004e, t01=0x0188}
0x7b5a…7b66 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x000a}
0x7b66…7b8e Head {h00=0x0024, h01=0x0050, text=»DMEAER LDKL A1,/2000 EA PROTECT «, t00=0x004f, t01=0x0016}
0x7b8e…7ba6 Head {h00=0x0014, h01=0x0050, text=»DMERR ABL DMTERR«, t00=0x004f, t01=0x003e}
0x7ba6…7bb4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x0056}
0x7bb4…7bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0064}
0x7bbe…7bd6 Head {h00=0x0014, h01=0x0050, text=»* MOVE RECORD «, t00=0x004f, t01=0x006e}
0x7bd6…7be0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0086}
0x7be0…7bf4 Head {h00=0x0010, h01=0x0050, text=»DMT310 EQU *«, t00=0x004f, t01=0x0090}
0x7bf4…7c0a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x004f, t01=0x00a4}
0x7c0a…7c1c Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x004f, t01=0x00ba}
0x7c1c…7c30 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QDEL«, t00=0x004f, t01=0x00cc}
0x7c30…7c56 Head {h00=0x0022, h01=0x0050, text=» ABL(E) DMXDEL INDEXED DELETE «, t00=0x004f, t01=0x00e0}
0x7c56…7c62 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x0106}
0x7c62…7c88 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRLE,A6 RECORD LENGTH«, t00=0x004f, t01=0x0112}
0x7c88…7ca0 Head {h00=0x0014, h01=0x0050, text=» LD A3,FDBRRO,A6«, t00=0x004f, t01=0x0138}
0x7ca0…7cbe Head {h00=0x001a, h01=0x0050, text=» ADR A3,A11 TO ADDRESS«, t00=0x004f, t01=0x0150}
0x7cbe…7cd0 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x004f, t01=0x016e}
0x7cd0…7cf4 Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBBA,A9 FROM ADDRESS«, t00=0x004f, t01=0x0180}
0x7cf4…7cfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0014}
0x7cfe…7d14 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0050, t01=0x001e}
0x7d14…7d26 Head {h00=0x000e, h01=0x0050, text=» XRR A4,A1«, t00=0x0050, t01=0x0034}
0x7d26…7d3a Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x0050, t01=0x0046}
0x7d3a…7d66 Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT320 BOTH ODD OR BOTH EVEN «, t00=0x0050, t01=0x005a}
0x7d66…7d90 Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTBM ONE ODD AND ONE EVEN«, t00=0x0050, t01=0x0086}
0x7d90…7da2 Head {h00=0x000e, h01=0x0050, text=» RF DMT340«, t00=0x0050, t01=0x00b0}
0x7da2…7dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00c2}
0x7dac…7dc4 Head {h00=0x0014, h01=0x0050, text=»DMT320 LDR A4,A3«, t00=0x0050, t01=0x00cc}
0x7dc4…7dd8 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x0050, t01=0x00e4}
0x7dd8…7df8 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT330 BOTH EVEN «, t00=0x0050, t01=0x00f8}
0x7df8…7e12 Head {h00=0x0016, h01=0x0050, text=» SUK A2,1 BOTH ODD«, t00=0x0050, t01=0x0118}
0x7e12…7e24 Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0050, t01=0x0132}
0x7e24…7e36 Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0050, t01=0x0144}
0x7e36…7e48 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0050, t01=0x0156}
0x7e48…7e5a Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0050, t01=0x0168}
0x7e5a…7e80 Head {h00=0x0022, h01=0x0050, text=»DMT330 CF A14,DMTWM WORD MOVE «, t00=0x0050, t01=0x017a}
0x7e80…7e8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0010}
0x7e8a…7e96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x001a}
0x7e96…7ea0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0026}
0x7ea0…7eb6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0051, t01=0x0030}
0x7eb6…7ed4 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A2 GET LENGTH «, t00=0x0051, t01=0x0046}
0x7ed4…7f04 Head {h00=0x002c, h01=0x0050, text=» LDR A2,A4 GET RECEIVING BUFFER ADDRESS «, t00=0x0051, t01=0x0064}
0x7f04…7f10 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0051, t01=0x0094}
0x7f10…7f3a Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTDM,A6 GET TTAB ADDRESS «, t00=0x0051, t01=0x00a0}
0x7f3a…7f62 Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A4 LOAD MMU REGISTERS«, t00=0x0051, t01=0x00ca}
0x7f62…7f8a Head {h00=0x0024, h01=0x0050, text=» LD A4,PRUN GET DM TTAB ADDRESS «, t00=0x0051, t01=0x00f2}
0x7f8a…7fbe Head {h00=0x0030, h01=0x0050, text=» TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE«, t00=0x0051, t01=0x011a}
0x7fbe…7fca Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0051, t01=0x014e}
0x7fca…8006 Head {h00=0x0038, h01=0x0050, text=» CF A14,MOV:US MOVE RECORD FROM USER TO SYSTEM AREA «, t00=0x0051, t01=0x015a}
0x8006…8012 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0008}
0x8012…801c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0014}
0x801c…8030 Head {h00=0x0010, h01=0x0050, text=»DMT340 EQU *«, t00=0x0052, t01=0x001e}
0x8030…803a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0032}
0x803a…8056 Head {h00=0x0018, h01=0x0050, text=»* SET STATUS USED «, t00=0x0052, t01=0x003c}
0x8056…8060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0058}
0x8060…8074 Head {h00=0x0010, h01=0x0050, text=» LDK A1,/FF «, t00=0x0052, t01=0x0062}
0x8074…808e Head {h00=0x0016, h01=0x0050, text=»DMT350 SCR A1,A10 «, t00=0x0052, t01=0x0076}
0x808e…80a6 Head {h00=0x0014, h01=0x0050, text=» LD A3,FDBDBR,A6«, t00=0x0052, t01=0x0090}
0x80a6…80c6 Head {h00=0x001c, h01=0x0050, text=» RF(NN) DMT394 NO DELAY «, t00=0x0052, t01=0x00a8}
0x80c6…80d8 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0052, t01=0x00c8}
0x80d8…80ec Head {h00=0x0010, h01=0x0050, text=» SUK A2,QSW «, t00=0x0052, t01=0x00da}
0x80ec…8112 Head {h00=0x0022, h01=0x0050, text=» RF(E) DMT360 SEQUENTIAL WRITE«, t00=0x0052, t01=0x00ee}
0x8112…8124 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0052, t01=0x0114}
0x8124…8138 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QRWD«, t00=0x0052, t01=0x0126}
0x8138…8162 Head {h00=0x0026, h01=0x0050, text=» RF(E) DMT400 DELAYED RANDOM WRITE«, t00=0x0052, t01=0x013a}
0x8162…8176 Head {h00=0x0010, h01=0x0050, text=» SUK A7,QRDD«, t00=0x0052, t01=0x0164}
0x8176…81a2 Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT400 DELAYED RANDOM DELETE «, t00=0x0052, t01=0x0178}
0x81a2…81b4 Head {h00=0x000e, h01=0x0050, text=» RF DMT390«, t00=0x0053, t01=0x0014}
0x81b4…81dc Head {h00=0x0024, h01=0x0050, text=»* WRITE IF LAST REC IN SECTOR «, t00=0x0053, t01=0x0026}
0x81dc…81e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x004e}
0x81e6…8204 Head {h00=0x001a, h01=0x0050, text=»DMT360 LD A4,FDBRRO,A6«, t00=0x0053, t01=0x0058}
0x8204…821c Head {h00=0x0014, h01=0x0050, text=» CW A4,FDBMRO,A6«, t00=0x0053, t01=0x0076}
0x821c…8242 Head {h00=0x0022, h01=0x0050, text=» RF(NE) DMT400 NOT LAST RECORD«, t00=0x0053, t01=0x008e}
0x8242…8268 Head {h00=0x0022, h01=0x0050, text=»DMT390 LDK A7,/05 BASIC WRITE «, t00=0x0053, t01=0x00b4}
0x8268…827a Head {h00=0x000e, h01=0x0050, text=» SLL A3,1 «, t00=0x0053, t01=0x00da}
0x827a…829c Head {h00=0x001e, h01=0x0050, text=» RF(N) DMT395 BASIC WANTED«, t00=0x0053, t01=0x00ec}
0x829c…82c4 Head {h00=0x0024, h01=0x0050, text=»DMT394 LDK A7,/15 PHYSICAL WRITE«, t00=0x0053, t01=0x010e}
0x82c4…82d8 Head {h00=0x0010, h01=0x0050, text=»DMT395 EQU *«, t00=0x0053, t01=0x0136}
0x82d8…82e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x014a}
0x82e2…830e Head {h00=0x0028, h01=0x0050, text=»* WRITE SECTOR ONTO DISC AND EXIT«, t00=0x0053, t01=0x0154}
0x830e…8318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0180}
0x8318…8344 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 FDB ADDRESS AS PARAMETER «, t00=0x0053, t01=0x018a}
0x8344…8350 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0054, t01=0x0026}
0x8350…8374 Head {h00=0x0020, h01=0x0050, text=» DATA -1 I/O AND ACTIVATION «, t00=0x0054, t01=0x0032}
0x8374…839a Head {h00=0x0022, h01=0x0050, text=» DATA DMTAR2 DMTASK RESTART #2«, t00=0x0054, t01=0x0056}
0x839a…83a6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0054, t01=0x007c}
0x83a6…83ba Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x0054, t01=0x0088}
0x83ba…83c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x009c}
0x83c8…83d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00aa}
0x83d2…83e8 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0054, t01=0x00b4}
0x83e8…83fe Head {h00=0x0012, h01=0x0050, text=»* DMTAR2 *«, t00=0x0054, t01=0x00ca}
0x83fe…8414 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0054, t01=0x00e0}
0x8414…841e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00f6}
0x841e…8428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0100}
0x8428…8458 Head {h00=0x002c, h01=0x0050, text=»DMTAR2 EQU * DMTASK RESTART AFTER WRITE «, t00=0x0054, t01=0x010a}
0x8458…8462 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x013a}
0x8462…847e Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0054, t01=0x0144}
0x847e…8488 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0160}
0x8488…849e Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x0054, t01=0x016a}
0x849e…84a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0180}
0x84a8…84ce Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTIOT CHECK DISC I/O «, t00=0x0054, t01=0x018a}
0x84ce…84e0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0055, t01=0x0020}
0x84e0…84f6 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DMTERR«, t00=0x0055, t01=0x0032}
0x84f6…850c Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C0FF«, t00=0x0055, t01=0x0048}
0x850c…8534 Head {h00=0x0024, h01=0x0050, text=» ANS A1,FDBDBR,A6 RELEASE BUFFER«, t00=0x0055, t01=0x005e}
0x8534…8548 Head {h00=0x0010, h01=0x0050, text=»DMT400 EQU *«, t00=0x0055, t01=0x0086}
0x8548…856e Head {h00=0x0022, h01=0x0050, text=» LDR A1,A6 FDB ADDR DATA FILE «, t00=0x0055, t01=0x009a}
0x856e…8588 Head {h00=0x0016, h01=0x0050, text=» LD A2,ECBCW+2,A9 «, t00=0x0055, t01=0x00c0}
0x8588…859c Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0055, t01=0x00da}
0x859c…85be Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBCW,A9 LOG REC NR«, t00=0x0055, t01=0x00ee}
0x85be…85e0 Head {h00=0x001e, h01=0x0050, text=» LC A11,ECBFC,A9 FILE CODE«, t00=0x0055, t01=0x0110}
0x85e0…85f8 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A1 «, t00=0x0055, t01=0x0132}
0x85f8…8618 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/3F ORDER INDEX «, t00=0x0055, t01=0x014a}
0x8618…862c Head {h00=0x0010, h01=0x0050, text=» LDK A4,QSW «, t00=0x0055, t01=0x016a}
0x862c…863e Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0055, t01=0x017e}
0x863e…865e Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT460 SEQ WRITE «, t00=0x0055, t01=0x0190}
0x865e…8672 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QRD «, t00=0x0056, t01=0x0020}
0x8672…8684 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0056, t01=0x0034}
0x8684…86a2 Head {h00=0x001a, h01=0x0050, text=» RF(E) DMT420 RAND DEL«, t00=0x0056, t01=0x0046}
0x86a2…86b6 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QRDD«, t00=0x0056, t01=0x0064}
0x86b6…86c8 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0056, t01=0x0078}
0x86c8…86f4 Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT420 DELAYED RANDEOM DELETE«, t00=0x0056, t01=0x008a}
0x86f4…870a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0056, t01=0x00b6}
0x870a…871e Head {h00=0x0010, h01=0x0050, text=» LDK A4,QDEL«, t00=0x0056, t01=0x00cc}
0x871e…8730 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0056, t01=0x00e0}
0x8730…8754 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT420 INDEXED DELETE«, t00=0x0056, t01=0x00f2}
0x8754…8760 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0116}
0x8760…8786 Head {h00=0x0022, h01=0x0050, text=» LDR A5,A2 SAVE REC NO PART 1 «, t00=0x0056, t01=0x0122}
0x8786…8798 Head {h00=0x000e, h01=0x0050, text=» LDR A9,A3«, t00=0x0056, t01=0x0148}
0x8798…87a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x015a}
0x87a2…87b8 Head {h00=0x0012, h01=0x0050, text=»* UPDATE CRN«, t00=0x0056, t01=0x0164}
0x87b8…87c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x017a}
0x87c2…87e8 Head {h00=0x0022, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER «, t00=0x0056, t01=0x0184}
0x87e8…8808 Head {h00=0x001c, h01=0x0050, text=» LDR A10,A2 BUFFER ADDR «, t00=0x0057, t01=0x001a}
0x8808…8828 Head {h00=0x001c, h01=0x0050, text=» IFT INDXAC=1 =2 START «, t00=0x0057, t01=0x003a}
0x8828…883c Head {h00=0x0010, h01=0x0050, text=» LDK A3,QIRW«, t00=0x0057, t01=0x005a}
0x883c…884e Head {h00=0x000e, h01=0x0050, text=» CWR A7,A3«, t00=0x0057, t01=0x006e}
0x884e…8874 Head {h00=0x0022, h01=0x0050, text=» RF(E) DMT410 INDEXED REWRITE «, t00=0x0057, t01=0x0080}
0x8874…888a Head {h00=0x0012, h01=0x0050, text=» XIF =2 END «, t00=0x0057, t01=0x00a6}
0x888a…88a0 Head {h00=0x0012, h01=0x0050, text=» CM CRNCIF,A2 «, t00=0x0057, t01=0x00bc}
0x88a0…88bc Head {h00=0x0018, h01=0x0050, text=»* CLEAR INDEX CRN «, t00=0x0057, t01=0x00d2}
0x88bc…88d4 Head {h00=0x0014, h01=0x0050, text=» CM CRNCIF+2,A2 «, t00=0x0057, t01=0x00ee}
0x88d4…88ec Head {h00=0x0014, h01=0x0050, text=»DMT410 EQU * =2«, t00=0x0057, t01=0x0106}
0x88ec…88fe Head {h00=0x000e, h01=0x0050, text=» LDR A2,A5«, t00=0x0057, t01=0x011e}
0x88fe…8910 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A9«, t00=0x0057, t01=0x0130}
0x8910…892a Head {h00=0x0016, h01=0x0050, text=» ST A2,CRNCDF,A10 «, t00=0x0057, t01=0x0142}
0x892a…8954 Head {h00=0x0026, h01=0x0050, text=» ST A3,CRNCDF+2,A10 CRN DATA FILE «, t00=0x0057, t01=0x015c}
0x8954…897e Head {h00=0x0026, h01=0x0050, text=» SC A11,CRNCDF,A10 CRN FIL E CODE «, t00=0x0057, t01=0x0186}
0x897e…8994 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0058, t01=0x0020}
0x8994…89a8 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QINS«, t00=0x0058, t01=0x0036}
0x89a8…89ba Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0058, t01=0x004a}
0x89ba…89de Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT460 INDEXED INSERT«, t00=0x0058, t01=0x005c}
0x89de…89ea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0080}
0x89ea…89fe Head {h00=0x0010, h01=0x0050, text=»DMT420 EQU *«, t00=0x0058, t01=0x008c}
0x89fe…8a12 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QSR «, t00=0x0058, t01=0x00a0}
0x8a12…8a24 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0058, t01=0x00b4}
0x8a24…8a42 Head {h00=0x001a, h01=0x0050, text=» RF(E) DMT450 SEQ READ«, t00=0x0058, t01=0x00c6}
0x8a42…8a56 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QRR «, t00=0x0058, t01=0x00e4}
0x8a56…8a68 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0058, t01=0x00f8}
0x8a68…8a8a Head {h00=0x001e, h01=0x0050, text=» RF(E) DMT450 RANDOM READ «, t00=0x0058, t01=0x010a}
0x8a8a…8aa0 Head {h00=0x0012, h01=0x0050, text=» LDK A4,QRRRB «, t00=0x0058, t01=0x012c}
0x8aa0…8ab2 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x0058, t01=0x0142}
0x8ab2…8adc Head {h00=0x0026, h01=0x0050, text=» RF(E) DMT450 RAND READ REL BUFFER«, t00=0x0058, t01=0x0154}
0x8adc…8af0 Head {h00=0x0010, h01=0x0050, text=»DMT440 EQU *«, t00=0x0058, t01=0x017e}
0x8af0…8afa (89, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0004}
0x8afa…8b10 Head {h00=0x0012, h01=0x0050, text=»* RELEASE EA«, t00=0x0059, t01=0x000e}
0x8b10…8b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0024}
0x8b1a…8b38 Head {h00=0x001a, h01=0x0050, text=» CF A14,EARELB REL EA «, t00=0x0059, t01=0x002e}
0x8b38…8b4a Head {h00=0x000e, h01=0x0050, text=» RF DMTAEX«, t00=0x0059, t01=0x004c}
0x8b4a…8b5e Head {h00=0x0010, h01=0x0050, text=»DMT450 EQU *«, t00=0x0059, t01=0x005e}
0x8b5e…8b80 Head {h00=0x001e, h01=0x0050, text=» LC A4,DWTST,A1 DWTSTATUS «, t00=0x0059, t01=0x0072}
0x8b80…8b9c Head {h00=0x0018, h01=0x0050, text=» ANK A4,EABIT EA-BIT«, t00=0x0059, t01=0x0094}
0x8b9c…8bc6 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) DMTAEX EA=1. NO EA WANTED «, t00=0x0059, t01=0x00b0}
0x8bc6…8bd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00da}
0x8bd0…8bf6 Head {h00=0x0022, h01=0x0050, text=»* CHECK IF EA IS SET ALREADY«, t00=0x0059, t01=0x00e4}
0x8bf6…8c00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x010a}
0x8c00…8c20 Head {h00=0x001c, h01=0x0050, text=» CF A14,EATEST CHECK EA «, t00=0x0059, t01=0x0114}
0x8c20…8c32 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0059, t01=0x0134}
0x8c32…8c58 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DMTAEX EA ALREADY SET «, t00=0x0059, t01=0x0146}
0x8c58…8c62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x016c}
0x8c62…8c74 Head {h00=0x000e, h01=0x0050, text=»* SET EA«, t00=0x0059, t01=0x0176}
0x8c74…8c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0188}
0x8c7e…8c94 (90, 0, 400) Head {h00=0x0012, h01=0x0050, text=» CF A14,EASETB«, t00=0x005a, t01=0x0004}
0x8c94…8ca6 Head {h00=0x000e, h01=0x0050, text=» RF DMTAEX«, t00=0x005a, t01=0x001a}
0x8ca6…8cba Head {h00=0x0010, h01=0x0050, text=»DMT460 EQU *«, t00=0x005a, t01=0x002c}
0x8cba…8cc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0040}
0x8cc4…8cda Head {h00=0x0012, h01=0x0050, text=»* UPDATE LRN«, t00=0x005a, t01=0x004a}
0x8cda…8ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0060}
0x8ce4…8cfc Head {h00=0x0014, h01=0x0050, text=» SC A2,FDBLRN,A1«, t00=0x005a, t01=0x006a}
0x8cfc…8d16 Head {h00=0x0016, h01=0x0050, text=» ST A3,FDBLRN+1,A1«, t00=0x005a, t01=0x0082}
0x8d16…8d2c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x005a, t01=0x009c}
0x8d2c…8d40 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QINS«, t00=0x005a, t01=0x00b2}
0x8d40…8d52 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x005a, t01=0x00c6}
0x8d52…8d78 Head {h00=0x0022, h01=0x0050, text=» ABL(E) DMINS2 INDEXED INSERT «, t00=0x005a, t01=0x00d8}
0x8d78…8d84 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x00fe}
0x8d84…8d92 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x010a}
0x8d92…8db8 Head {h00=0x0022, h01=0x0050, text=»DMTAEX LDK A1,0 CORRECT RETURN«, t00=0x005a, t01=0x0118}
0x8db8…8dc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x013e}
0x8dc2…8de0 Head {h00=0x001a, h01=0x0050, text=»DMTERR LD A3,FDBDBR,A6«, t00=0x005a, t01=0x0148}
0x8de0…8e00 Head {h00=0x001c, h01=0x0050, text=» RF(NN) DMTEX1 NOT DELAY«, t00=0x005a, t01=0x0166}
0x8e00…8e16 Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/3F00«, t00=0x005a, t01=0x0186}
0x8e16…8e42 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) DMTERX NO RELEASE OF BUFFER «, t00=0x005b, t01=0x000c}
0x8e42…8e60 Head {h00=0x001a, h01=0x0050, text=»DMTEX1 LD A3,ECBBA,A8 «, t00=0x005b, t01=0x0038}
0x8e60…8e72 Head {h00=0x000e, h01=0x0050, text=» SUK A3,8 «, t00=0x005b, t01=0x0056}
0x8e72…8e86 Head {h00=0x0010, h01=0x0050, text=»DMTEX2 EQU *«, t00=0x005b, t01=0x0068}
0x8e86…8eb2 Head {h00=0x0028, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER AT A3 «, t00=0x005b, t01=0x007c}
0x8eb2…8ec6 Head {h00=0x0010, h01=0x0050, text=»DMTERX EQU *«, t00=0x005b, t01=0x00a8}
0x8ec6…8ed2 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x005b, t01=0x00bc}
0x8ed2…8eec Head {h00=0x0016, h01=0x0050, text=»* A1 = RET CODE «, t00=0x005b, t01=0x00c8}
0x8eec…8f06 Head {h00=0x0016, h01=0x0050, text=»* A6 = DWT ADDR «, t00=0x005b, t01=0x00e2}
0x8f06…8f1c Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x005b, t01=0x00fc}
0x8f1c…8f28 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x005b, t01=0x0112}
0x8f28…8f3a Head {h00=0x000e, h01=0x0050, text=»EXIT EQU *«, t00=0x005b, t01=0x011e}
0x8f3a…8f46 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x005b, t01=0x0130}
0x8f46…8f56 Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x005b, t01=0x013c}
0x8f56…8f6c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x005b, t01=0x014c}
0x8f6c…8f7a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x0162}
0x8f7a…8f8e Head {h00=0x0010, h01=0x0050, text=»DMIRR EQU * «, t00=0x005b, t01=0x0170}
0x8f8e…8fae Head {h00=0x001c, h01=0x0050, text=»* INDEXED RANDOM READ «, t00=0x005b, t01=0x0184}
0x8fae…8fe4 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x005c, t01=0x0014}
0x8fe4…900a Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB ADDR«, t00=0x005c, t01=0x004a}
0x900a…9020 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x005c, t01=0x0070}
0x9020…9044 Head {h00=0x0020, h01=0x0050, text=» LD A8,ECBCW,A9 ADDR OF KEY «, t00=0x005c, t01=0x0086}
0x9044…9050 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x00aa}
0x9050…9066 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x005c, t01=0x00b6}
0x9066…907c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005c, t01=0x00cc}
0x907c…9098 Head {h00=0x0018, h01=0x0050, text=» LDR A8,A1 FDB ADDR «, t00=0x005c, t01=0x00e2}
0x9098…90be Head {h00=0x0022, h01=0x0050, text=» ADKL A8,FDBKEY KEY AREA ADDR «, t00=0x005c, t01=0x00fe}
0x90be…90ca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x0124}
0x90ca…90e0 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x005c, t01=0x0130}
0x90e0…90f4 Head {h00=0x0010, h01=0x0050, text=» SUR A11,A11«, t00=0x005c, t01=0x0146}
0x90f4…911a Head {h00=0x0022, h01=0x0050, text=» LC A11,ECBCW+3,A9 NO OF CHAR «, t00=0x005c, t01=0x015a}
0x911a…912a Head {h00=0x000c, h01=0x0050, text=»* =5 «, t00=0x005c, t01=0x0180}
0x912a…913e Head {h00=0x0010, h01=0x0050, text=» LDR A13,A1 «, t00=0x005c, t01=0x0190}
0x913e…9160 Head {h00=0x001e, h01=0x0050, text=» ADKL A13,FDBECB ECB ADDR «, t00=0x005d, t01=0x0014}
0x9160…9188 Head {h00=0x0024, h01=0x0050, text=» CF A14,FNDKEY GET INDEX RECORD «, t00=0x005d, t01=0x0036}
0x9188…91b4 Head {h00=0x0028, h01=0x0050, text=»DMR006 EQU * FROM INDEXED READ NEXT «, t00=0x005d, t01=0x005e}
0x91b4…91cc Head {h00=0x0014, h01=0x0050, text=» LD A9,DWTECB,A1«, t00=0x005d, t01=0x008a}
0x91cc…91e6 Head {h00=0x0016, h01=0x0050, text=» LDR A6,A1 FDB ADR«, t00=0x005d, t01=0x00a2}
0x91e6…91fe Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x005d, t01=0x00bc}
0x91fe…921c Head {h00=0x001a, h01=0x0050, text=» ADR A8,A6 ECB ADDRESS«, t00=0x005d, t01=0x00d4}
0x921c…923a Head {h00=0x001a, h01=0x0050, text=» LDR A2,A2 RETURN CODE«, t00=0x005d, t01=0x00f2}
0x923a…925e Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DMI030 KEY NOT FOUND«, t00=0x005d, t01=0x0110}
0x925e…9268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0134}
0x9268…9284 Head {h00=0x0018, h01=0x0050, text=»* KEY RECORD FOUN «, t00=0x005d, t01=0x013e}
0x9284…92b6 Head {h00=0x002e, h01=0x0050, text=»* CHECK IF NEXT RECORD HAS THE SAME KEY «, t00=0x005d, t01=0x015a}
0x92b6…92c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x018c}
0x92c0…92e6 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD OFFSET«, t00=0x005e, t01=0x0008}
0x92e6…9306 Head {h00=0x001c, h01=0x0050, text=» ADK A2,10 BUFFER HEADER«, t00=0x005e, t01=0x002e}
0x9306…9322 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 REC ADDR «, t00=0x005e, t01=0x004e}
0x9322…9346 Head {h00=0x0020, h01=0x0050, text=» LD A4,FDBRLE,A1 REC LENGTH «, t00=0x005e, t01=0x006a}
0x9346…9362 Head {h00=0x0018, h01=0x0050, text=» SUK A4,6 KEY LENGTH«, t00=0x005e, t01=0x008e}
0x9362…9374 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A4«, t00=0x005e, t01=0x00aa}
0x9374…939a Head {h00=0x0022, h01=0x0050, text=» CC A4,2,A2 DUPLICATE KEY CHAR«, t00=0x005e, t01=0x00bc}
0x939a…93c2 Head {h00=0x0024, h01=0x0050, text=» RF(NE) DMR020 NEXT KEY NOT SAME«, t00=0x005e, t01=0x00e2}
0x93c2…93de Head {h00=0x0018, h01=0x0050, text=» LDKL A5,/200 BIT 6 «, t00=0x005e, t01=0x010a}
0x93de…9404 Head {h00=0x0022, h01=0x0050, text=» ORS A5,ECBRC,A9 NEXT KEY SAME«, t00=0x005e, t01=0x0126}
0x9404…9418 Head {h00=0x0010, h01=0x0050, text=»DMR020 EQU *«, t00=0x005e, t01=0x014c}
0x9418…9422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0160}
0x9422…9444 Head {h00=0x001e, h01=0x0050, text=»* MOVE LOG REC NO TO ECB«, t00=0x005e, t01=0x016a}
0x9444…944e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x018c}
0x944e…9460 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x005f, t01=0x0008}
0x9460…9474 Head {h00=0x0010, h01=0x0050, text=» LC A5,3,A2 «, t00=0x005f, t01=0x001a}
0x9474…948e Head {h00=0x0016, h01=0x0050, text=» SC A5,ECBCW+3,A8 «, t00=0x005f, t01=0x002e}
0x948e…94a2 Head {h00=0x0010, h01=0x0050, text=» LC A5,4,A2 «, t00=0x005f, t01=0x0048}
0x94a2…94b4 Head {h00=0x000e, h01=0x0050, text=» ECR A5,A5«, t00=0x005f, t01=0x005c}
0x94b4…94c8 Head {h00=0x0010, h01=0x0050, text=» LC A5,5,A2 «, t00=0x005f, t01=0x006e}
0x94c8…94e0 Head {h00=0x0014, h01=0x0050, text=» ST A5,ECBCW,A8 «, t00=0x005f, t01=0x0082}
0x94e0…94ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x009a}
0x94ea…950a Head {h00=0x001c, h01=0x0050, text=»* RELEASE BLOCK BUFFER«, t00=0x005f, t01=0x00a4}
0x950a…9514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00c4}
0x9514…952a Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTRBU«, t00=0x005f, t01=0x00ce}
0x952a…9538 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x00e4}
0x9538…9542 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00f2}
0x9542…9576 Head {h00=0x0030, h01=0x0050, text=»* PERFORM RANDOM READ ON THOIS DATA RECORD«, t00=0x005f, t01=0x00fc}
0x9576…9580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0130}
0x9580…959c Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x005f, t01=0x013a}
0x959c…95c2 Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTST,A6 USER REQUESRT «, t00=0x005f, t01=0x0156}
0x95c2…95e2 Head {h00=0x001c, h01=0x0050, text=» ANK A2,EABIT GET EA BIT«, t00=0x005f, t01=0x017c}
0x95e2…95f4 Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0060, t01=0x000c}
0x95f4…961a Head {h00=0x0022, h01=0x0050, text=» LDK A7,/A RANDOM READ NO WAIT«, t00=0x0060, t01=0x001e}
0x961a…9634 Head {h00=0x0016, h01=0x0050, text=» ORR A7,A2 EA BIT «, t00=0x0060, t01=0x0044}
0x9634…963e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x005e}
0x963e…9658 Head {h00=0x0016, h01=0x0050, text=»* MOVE USER ECB «, t00=0x0060, t01=0x0068}
0x9658…9662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0082}
0x9662…9682 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A9 FROM ECB ADDR«, t00=0x0060, t01=0x008c}
0x9682…96a0 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A8 TO ECB ADDR«, t00=0x0060, t01=0x00ac}
0x96a0…96bc Head {h00=0x0018, h01=0x0050, text=» LDK A2,6 NO OF CHAR«, t00=0x0060, t01=0x00ca}
0x96bc…96da Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTWM MOVE ECB«, t00=0x0060, t01=0x00e6}
0x96da…96f6 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0060, t01=0x0104}
0x96f6…9702 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0060, t01=0x0120}
0x9702…9712 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0060, t01=0x012c}
0x9712…9726 Head {h00=0x0010, h01=0x0050, text=» DATA DMTAR4«, t00=0x0060, t01=0x013c}
0x9726…973e Head {h00=0x0014, h01=0x0050, text=» LD A7,ECBRC,A8 «, t00=0x0060, t01=0x0150}
0x973e…975c Head {h00=0x001a, h01=0x0050, text=» RF(N) DMTAR4 REQ ERR «, t00=0x0060, t01=0x0168}
0x975c…9768 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0060, t01=0x0186}
0x9768…977c (97, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x0061, t01=0x0004}
0x977c…9790 Head {h00=0x0010, h01=0x0050, text=»DMTAR4 EQU *«, t00=0x0061, t01=0x0018}
0x9790…979a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x002c}
0x979a…97b6 Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x0061, t01=0x0036}
0x97b6…97c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0052}
0x97c0…97d6 Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x0061, t01=0x005c}
0x97d6…97e8 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A1«, t00=0x0061, t01=0x0072}
0x97e8…9800 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x0061, t01=0x0084}
0x9800…981a Head {h00=0x0016, h01=0x0050, text=» ADR A8,A6 RR ECB «, t00=0x0061, t01=0x009c}
0x981a…983c Head {h00=0x001e, h01=0x0050, text=» LD A9,DWTECB,A6 USER ECB «, t00=0x0061, t01=0x00b6}
0x983c…9854 Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBRC,A8 «, t00=0x0061, t01=0x00d8}
0x9854…987e Head {h00=0x0026, h01=0x0050, text=» ORS A1,ECBRC,A9 RET CODE TO USER «, t00=0x0061, t01=0x00f0}
0x987e…98b4 Head {h00=0x0032, h01=0x0050, text=» ANKL A1,/EEF7 BIT 3,7 AND 12 NOT GRAVE ERROR «, t00=0x0061, t01=0x011a}
0x98b4…98d2 Head {h00=0x001a, h01=0x0050, text=» RB(NZ) DMTERX NOT OK «, t00=0x0061, t01=0x0150}
0x98d2…98dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x016e}
0x98dc…98fe Head {h00=0x001e, h01=0x0050, text=»* SET CRN FOR INDEX FILE«, t00=0x0061, t01=0x0178}
0x98fe…9908 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x000a}
0x9908…9934 Head {h00=0x0028, h01=0x0050, text=» LD A1,FDBADF,A6 FDB ADDR DATA FILEP«, t00=0x0062, t01=0x0014}
0x9934…995e Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER ADDR«, t00=0x0062, t01=0x0040}
0x995e…9982 Head {h00=0x0020, h01=0x0050, text=» LDR A10,A2 CRN BUFFER ADDR «, t00=0x0062, t01=0x006a}
0x9982…99a8 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A6 FDB ADDR INDEX FILE«, t00=0x0062, t01=0x008e}
0x99a8…99d4 Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLGRN GET INDE X LOG REC NO«, t00=0x0062, t01=0x00b4}
0x99d4…99f0 Head {h00=0x0018, h01=0x0050, text=» SC A2,CRNCIF+1,A10 «, t00=0x0062, t01=0x00e0}
0x99f0…9a1a Head {h00=0x0026, h01=0x0050, text=» ST A3,CRNCIF+2,A10 CRN INDEX FILE«, t00=0x0062, t01=0x00fc}
0x9a1a…9a32 Head {h00=0x0014, h01=0x0050, text=» LC A2,ECBFC,A9 «, t00=0x0062, t01=0x0126}
0x9a32…9a4c Head {h00=0x0016, h01=0x0050, text=» SC A2,CRNCIF,A10 «, t00=0x0062, t01=0x013e}
0x9a4c…9a6e Head {h00=0x001e, h01=0x0050, text=»* THAT WAS FILE CODE CRN«, t00=0x0062, t01=0x0158}
0x9a6e…9a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x017a}
0x9a78…9a96 Head {h00=0x001a, h01=0x0050, text=»* SET RERTURN CODEXS«, t00=0x0062, t01=0x0184}
0x9a96…9aa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0012}
0x9aa0…9ac8 Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x0063, t01=0x001c}
0x9ac8…9ae0 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBEL,A9 «, t00=0x0063, t01=0x0044}
0x9ae0…9afe Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 RETURN CODE «, t00=0x0063, t01=0x005c}
0x9afe…9b18 Head {h00=0x0016, h01=0x0050, text=» ABL DMTERX TENDIO«, t00=0x0063, t01=0x007a}
0x9b18…9b26 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x0094}
0x9b26…9b4c Head {h00=0x0022, h01=0x0050, text=»DMIRN EQU * INDEXED READ NEXT «, t00=0x0063, t01=0x00a2}
0x9b4c…9b82 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0063, t01=0x00c8}
0x9b82…9b9e Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0063, t01=0x00fe}
0x9b9e…9bc4 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD OFFSET«, t00=0x0063, t01=0x011a}
0x9bc4…9bd6 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0063, t01=0x0140}
0x9bd6…9bf4 Head {h00=0x001a, h01=0x0050, text=» SUK A3,10 BUFFER ADDR«, t00=0x0063, t01=0x0152}
0x9bf4…9c08 Head {h00=0x0010, h01=0x0050, text=»DMI100 EQU *«, t00=0x0063, t01=0x0170}
0x9c08…9c22 Head {h00=0x0016, h01=0x0050, text=» ADR A2,A3 BUFFADR«, t00=0x0063, t01=0x0184}
0x9c22…9c40 Head {h00=0x001a, h01=0x0050, text=» ADK A2,10 RECORD ADDR«, t00=0x0064, t01=0x000e}
0x9c40…9c6c Head {h00=0x0028, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR OF STATUS CHAR«, t00=0x0064, t01=0x002c}
0x9c6c…9c8a Head {h00=0x001a, h01=0x0050, text=» LDK A5,/FF USED MARK «, t00=0x0064, t01=0x0058}
0x9c8a…9ca4 Head {h00=0x0016, h01=0x0050, text=» CCR A5,A2 STATUS «, t00=0x0064, t01=0x0076}
0x9ca4…9cbe Head {h00=0x0016, h01=0x0050, text=» RF(E) DMI120 USED«, t00=0x0064, t01=0x0090}
0x9cbe…9cd6 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A1«, t00=0x0064, t01=0x00aa}
0x9cd6…9d00 Head {h00=0x0026, h01=0x0050, text=» ST A4,FDBRRO,A1 LAST REC IN SECT «, t00=0x0064, t01=0x00c2}
0x9d00…9d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00ec}
0x9d0a…9d2a Head {h00=0x001c, h01=0x0050, text=»* CHECK IF END OF FILE«, t00=0x0064, t01=0x00f6}
0x9d2a…9d34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0116}
0x9d34…9d4c Head {h00=0x0014, h01=0x0050, text=» LDR A9,A3 SAVE «, t00=0x0064, t01=0x0120}
0x9d4c…9d6e Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0064, t01=0x0138}
0x9d6e…9d86 Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x0064, t01=0x015a}
0x9d86…9da4 Head {h00=0x001a, h01=0x0050, text=» RF(L) DMI106 NOT EOF «, t00=0x0064, t01=0x0172}
0x9da4…9dbe Head {h00=0x0016, h01=0x0050, text=» RF(G) DMI105 EOF «, t00=0x0064, t01=0x0190}
0x9dbe…9dd8 Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x0065, t01=0x001a}
0x9dd8…9df6 Head {h00=0x001a, h01=0x0050, text=» RF(L) DMI106 NOT EOF «, t00=0x0065, t01=0x0034}
0x9df6…9e0e Head {h00=0x0014, h01=0x0050, text=»DMI105 LDR A3,A9«, t00=0x0065, t01=0x0052}
0x9e0e…9e24 Head {h00=0x0012, h01=0x0050, text=» RF DMI030 EOF«, t00=0x0065, t01=0x006a}
0x9e24…9e44 Head {h00=0x001c, h01=0x0050, text=»DMI106 LDR A3,A9 RESTORE«, t00=0x0065, t01=0x0080}
0x9e44…9e60 Head {h00=0x0018, h01=0x0050, text=» RF DMI010 NEXT REC «, t00=0x0065, t01=0x00a0}
0x9e60…9e76 Head {h00=0x0012, h01=0x0050, text=»DMI120 EQU * «, t00=0x0065, t01=0x00bc}
0x9e76…9e98 Head {h00=0x001e, h01=0x0050, text=»* INDEX RECORD IS FOUND «, t00=0x0065, t01=0x00d2}
0x9e98…9ea2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00f4}
0x9ea2…9ebe Head {h00=0x0018, h01=0x0050, text=» LDK A2,0 MARK FOUND«, t00=0x0065, t01=0x00fe}
0x9ebe…9ef0 Head {h00=0x002e, h01=0x0050, text=» ABL DMR006 CONT AS FOR INDEXED RAND READ «, t00=0x0065, t01=0x011a}
0x9ef0…9f04 Head {h00=0x0010, h01=0x0050, text=»DMI010 EQU *«, t00=0x0065, t01=0x014c}
0x9f04…9f30 Head {h00=0x0028, h01=0x0050, text=» CF A14,RDNXTR GET NEXT INDEX RECORD«, t00=0x0065, t01=0x0160}
0x9f30…9f50 Head {h00=0x001c, h01=0x0050, text=» RB DMI100 RECORD FOUND «, t00=0x0065, t01=0x018c}
0x9f50…9f6c Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0066, t01=0x001c}
0x9f6c…9f96 Head {h00=0x0026, h01=0x0050, text=»DMI030 LDKL A1,/4000 KEY NOT FOUND«, t00=0x0066, t01=0x0038}
0x9f96…9faa Head {h00=0x0010, h01=0x0050, text=»DMI035 EQU *«, t00=0x0066, t01=0x0062}
0x9faa…9fc8 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A3 BUFFER ADDR«, t00=0x0066, t01=0x0076}
0x9fc8…9fe8 Head {h00=0x001c, h01=0x0050, text=» ABL(Z) DMTERX NO BUFFER«, t00=0x0066, t01=0x0094}
0x9fe8…a00c Head {h00=0x0020, h01=0x0050, text=» ABL DMTERR ERROR AND BUFFER«, t00=0x0066, t01=0x00b4}
0xa00c…a01a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0066, t01=0x00d8}
0xa01a…a024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00e6}
0xa024…a04e Head {h00=0x0026, h01=0x0050, text=»DMINS2 EQU * INDEXED INSERT PART 2«, t00=0x0066, t01=0x00f0}
0xa04e…a058 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x011a}
0xa058…a08e Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0066, t01=0x0124}
0xa08e…a0a0 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x0066, t01=0x015a}
0xa0a0…a0b8 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x0066, t01=0x016c}
0xa0b8…a0d0 Head {h00=0x0014, h01=0x0050, text=» SUK A3,8 BUFSTA«, t00=0x0066, t01=0x0184}
0xa0d0…a0f6 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0067, t01=0x000c}
0xa0f6…a11a Head {h00=0x0020, h01=0x0050, text=»DMXDEL EQU * INDEXED DELETE «, t00=0x0067, t01=0x0032}
0xa11a…a154 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0067, t01=0x0056}
0xa154…a172 Head {h00=0x001a, h01=0x0050, text=» LDR A11,A7 ORDER CODE«, t00=0x0067, t01=0x0090}
0xa172…a194 Head {h00=0x001e, h01=0x0050, text=» LDR A12,A8 PHYS ECB ADDR «, t00=0x0067, t01=0x00ae}
0xa194…a1a6 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0067, t01=0x00d0}
0xa1a6…a1d8 Head {h00=0x002e, h01=0x0050, text=» SC A5,FDBDBR,A1 ZEROE INDEX FILE COUNTER «, t00=0x0067, t01=0x00e2}
0xa1d8…a1fa Head {h00=0x001e, h01=0x0050, text=» LDK A5,8 NR OF INDEX * 2 «, t00=0x0067, t01=0x0114}
0xa1fa…a216 Head {h00=0x0018, h01=0x0050, text=» LDR A10,A1 FDB DATA«, t00=0x0067, t01=0x0136}
0xa216…a22e Head {h00=0x0014, h01=0x0050, text=»DXI020 SUK A5,2 «, t00=0x0067, t01=0x0152}
0xa22e…a250 Head {h00=0x001e, h01=0x0050, text=» RF(N) DXI100 ALL INDEXES «, t00=0x0067, t01=0x016a}
0xa250…a264 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A10 «, t00=0x0067, t01=0x018c}
0xa264…a276 Head {h00=0x000e, h01=0x0050, text=» ADR A6,A5«, t00=0x0068, t01=0x0010}
0xa276…a2a2 Head {h00=0x0028, h01=0x0050, text=» LD A1,FDBAI1,A6 FDB ADDR INDEX FILE«, t00=0x0068, t01=0x0022}
0xa2a2…a2c0 Head {h00=0x001a, h01=0x0050, text=» RB(Z) DXI020 NO INDEX«, t00=0x0068, t01=0x004e}
0xa2c0…a2ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x006c}
0xa2ca…a2f6 Head {h00=0x0028, h01=0x0050, text=»* GET FILE CODE FOR THIS FDB ADDR «, t00=0x0068, t01=0x0076}
0xa2f6…a300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00a2}
0xa300…a316 Head {h00=0x0012, h01=0x0050, text=» LD* A6,SCTCDT«, t00=0x0068, t01=0x00ac}
0xa316…a32e Head {h00=0x0014, h01=0x0050, text=»DXI030 SUK A6,4 «, t00=0x0068, t01=0x00c2}
0xa32e…a344 Head {h00=0x0012, h01=0x0050, text=» LD A7,SCTCDT «, t00=0x0068, t01=0x00da}
0xa344…a356 Head {h00=0x000e, h01=0x0050, text=» ADR A7,A6«, t00=0x0068, t01=0x00f0}
0xa356…a36a Head {h00=0x0010, h01=0x0050, text=» CW A1,2,A7 «, t00=0x0068, t01=0x0102}
0xa36a…a38c Head {h00=0x001e, h01=0x0050, text=» RB(NE) DXI030 SEARCH NEXT«, t00=0x0068, t01=0x0116}
0xa38c…a3a8 Head {h00=0x0018, h01=0x0050, text=» LDR A8,A1 FDB INDEX«, t00=0x0068, t01=0x0138}
0xa3a8…a3c8 Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0068, t01=0x0154}
0xa3c8…a3dc Head {h00=0x0010, h01=0x0050, text=» LC A6,1,A7 «, t00=0x0068, t01=0x0174}
0xa3dc…a3fe Head {h00=0x001e, h01=0x0050, text=» SC A6,ECBFC,A8 INDEX FILE«, t00=0x0068, t01=0x0188}
0xa3fe…a412 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x0069, t01=0x001a}
0xa412…a426 Head {h00=0x0010, h01=0x0050, text=» SUK A6,QINS«, t00=0x0069, t01=0x002e}
0xa426…a44a Head {h00=0x0020, h01=0x0050, text=» RF(E) DXI080 INDEXED DELETE«, t00=0x0069, t01=0x0042}
0xa44a…a454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0066}
0xa454…a47c Head {h00=0x0024, h01=0x0050, text=»* GET ADDRESSS OF DATA RECORD «, t00=0x0069, t01=0x0070}
0xa47c…a486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0098}
0xa486…a4aa Head {h00=0x0020, h01=0x0050, text=» LD A6,ECBBA,A12 SECTOR ADDR«, t00=0x0069, t01=0x00a2}
0xa4aa…a4c2 Head {h00=0x0014, h01=0x0050, text=» ADK A6,2 CYLID «, t00=0x0069, t01=0x00c6}
0xa4c2…a4ea Head {h00=0x0024, h01=0x0050, text=» AD A6,FDBRRO,A10 ADDR DATA REC «, t00=0x0069, t01=0x00de}
0xa4ea…a50c Head {h00=0x001e, h01=0x0050, text=» AD A6,FDBKA,A1 KEY OFFSET«, t00=0x0069, t01=0x0106}
0xa50c…a534 Head {h00=0x0024, h01=0x0050, text=» LDK A7,/20 DELETE INDEX NOWAIT «, t00=0x0069, t01=0x0128}
0xa534…a546 Head {h00=0x000e, h01=0x0050, text=» RF DXI090«, t00=0x0069, t01=0x0150}
0xa546…a55a Head {h00=0x0010, h01=0x0050, text=»DXI080 EQU *«, t00=0x0069, t01=0x0162}
0xa55a…a582 Head {h00=0x0024, h01=0x0050, text=» LD A9,DWTECB,A10 USER ECB ADDR «, t00=0x0069, t01=0x0176}
0xa582…a5aa Head {h00=0x0024, h01=0x0050, text=» LD A6,ECBBA,A9 USER BUFFER ADDR«, t00=0x006a, t01=0x000e}
0xa5aa…a5cc Head {h00=0x001e, h01=0x0050, text=» AD A6,FDBKA,A1 KEY OFFSET«, t00=0x006a, t01=0x0036}
0xa5cc…a5e2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x006a, t01=0x0058}
0xa5e2…a5f4 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A1«, t00=0x006a, t01=0x006e}
0xa5f4…a61a Head {h00=0x0022, h01=0x0050, text=» ADKL A6,FDBKEY ADDR KEY AREA «, t00=0x006a, t01=0x0080}
0xa61a…a626 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x00a6}
0xa626…a63c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x006a, t01=0x00b2}
0xa63c…a664 Head {h00=0x0024, h01=0x0050, text=» LDK A7,/1F INSERT INDEX NOWAIT «, t00=0x006a, t01=0x00c8}
0xa664…a678 Head {h00=0x0010, h01=0x0050, text=»DXI090 EQU *«, t00=0x006a, t01=0x00f0}
0xa678…a682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0104}
0xa682…a69e Head {h00=0x0018, h01=0x0050, text=»* A6 = KEY ADDRESS«, t00=0x006a, t01=0x010e}
0xa69e…a6a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x012a}
0xa6a8…a6c0 Head {h00=0x0014, h01=0x0050, text=» ST A6,ECBBA,A8 «, t00=0x006a, t01=0x0134}
0xa6c0…a6e6 Head {h00=0x0022, h01=0x0050, text=»* A1 = FDB ADDR IN DE XFILE «, t00=0x006a, t01=0x014c}
0xa6e6…a6f4 Head {h00=0x000a, h01=0x0050, text=» LKM «, t00=0x006a, t01=0x0172}
0xa6f4…a704 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x006a, t01=0x0180}
0xa704…a718 Head {h00=0x0010, h01=0x0050, text=» DATA DMTAR5«, t00=0x006a, t01=0x0190}
0xa718…a730 Head {h00=0x0014, h01=0x0050, text=» LD A7,ECBRC,A8 «, t00=0x006b, t01=0x0014}
0xa730…a74e Head {h00=0x001a, h01=0x0050, text=» RF(N) DMTAR5 REQ ERR «, t00=0x006b, t01=0x002c}
0xa74e…a772 Head {h00=0x0020, h01=0x0050, text=» RB DXI020 NEXT INDEX DIRECT«, t00=0x006b, t01=0x004a}
0xa772…a784 Head {h00=0x000e, h01=0x0050, text=»DXI100 LKM«, t00=0x006b, t01=0x006e}
0xa784…a798 Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x006b, t01=0x0080}
0xa798…a7ac Head {h00=0x0010, h01=0x0050, text=»DMTAR5 EQU *«, t00=0x006b, t01=0x0094}
0xa7ac…a7d2 Head {h00=0x0022, h01=0x0050, text=» LD A6,FDBADF,A1 FDB DATA FILE«, t00=0x006b, t01=0x00a8}
0xa7d2…a7f4 Head {h00=0x001e, h01=0x0050, text=» LD A9,DWTECB,A6 USER ECB «, t00=0x006b, t01=0x00ce}
0xa7f4…a80c Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x006b, t01=0x00f0}
0xa80c…a830 Head {h00=0x0020, h01=0x0050, text=» ADR A1,A8 ECB INSERT INDEX «, t00=0x006b, t01=0x0108}
0xa830…a84e Head {h00=0x001a, h01=0x0050, text=» ADR A8,A6 ECB DISC IO«, t00=0x006b, t01=0x012c}
0xa84e…a886 Head {h00=0x0034, h01=0x0050, text=» LD A1,ECBRC,A1 RET CODE BIT 10 AND 14 POSSIBLE «, t00=0x006b, t01=0x014a}
0xa886…a8aa Head {h00=0x0020, h01=0x0050, text=» ORS A1,ECBRC,A9 RC TO USER «, t00=0x006b, t01=0x0182}
0xa8aa…a8c8 Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 RETURN CODE «, t00=0x006c, t01=0x0016}
0xa8c8…a8f2 Head {h00=0x0026, h01=0x0050, text=» LC A2,FDBDBR,A6 NR OF READY INDEX«, t00=0x006c, t01=0x0034}
0xa8f2…a912 Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 COUNT INDEXES «, t00=0x006c, t01=0x005e}
0xa912…a93a Head {h00=0x0024, h01=0x0050, text=» CC A2,FDBNIF,A6 TOT NR OF INDEX«, t00=0x006c, t01=0x007e}
0xa93a…a950 Head {h00=0x0012, h01=0x0050, text=» RF(NE) DXI200«, t00=0x006c, t01=0x00a6}
0xa950…a968 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x006c, t01=0x00bc}
0xa968…a986 Head {h00=0x001a, h01=0x0050, text=» ANK A7,/3F ORDER CODE«, t00=0x006c, t01=0x00d4}
0xa986…a9aa Head {h00=0x0020, h01=0x0050, text=» SUK A7,QINS INDEXED INSERT «, t00=0x006c, t01=0x00f2}
0xa9aa…a9c6 Head {h00=0x0018, h01=0x0050, text=» ABL(E) DMTERX READY«, t00=0x006c, t01=0x0116}
0xa9c6…a9f6 Head {h00=0x002c, h01=0x0050, text=»* RESTORE REGISTERS FOR INDEXED DELETE«, t00=0x006c, t01=0x0132}
0xa9f6…aa00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0162}
0xaa00…aa28 Head {h00=0x0024, h01=0x0050, text=» LD A10,FDBECB+2,A6 SECTOR ADDR «, t00=0x006c, t01=0x016c}
0xaa28…aa42 (109, 0, 400) Head {h00=0x0016, h01=0x0050, text=» ADKL A10,2 CYLID «, t00=0x006d, t01=0x0004}
0xaa42…aa5c Head {h00=0x0016, h01=0x0050, text=» AD A10,FDBRRO,A6 «, t00=0x006d, t01=0x001e}
0xaa5c…aa86 Head {h00=0x0026, h01=0x0050, text=» AD A10,FDBRLE,A6 ADDR STATUS CHAR«, t00=0x006d, t01=0x0038}
0xaa86…aaa4 Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 STATUS FREE «, t00=0x006d, t01=0x0062}
0xaaa4…aad6 Head {h00=0x002e, h01=0x0050, text=» ABL DMT350 CONTINUE AS FOR RANDOM DELETE «, t00=0x006d, t01=0x0080}
0xaad6…aaea Head {h00=0x0010, h01=0x0050, text=»DXI200 EQU *«, t00=0x006d, t01=0x00b2}
0xaaea…ab02 Head {h00=0x0014, h01=0x0050, text=» SC A2,FDBDBR,A6«, t00=0x006d, t01=0x00c6}
0xab02…ab0e Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x006d, t01=0x00de}
0xab0e…ab34 Head {h00=0x0022, h01=0x0050, text=» DATA 3 EXIT. MORE INDEX LEFT «, t00=0x006d, t01=0x00ea}
0xab34…ab42 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x0110}
0xab42…ab64 Head {h00=0x001e, h01=0x0050, text=»DMINIX EQU * INSERT INDEX «, t00=0x006d, t01=0x011e}
0xab64…ab6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0140}
0xab6e…ab96 Head {h00=0x0024, h01=0x0050, text=»DMDELX EQU * DELETE INDEX RECORD«, t00=0x006d, t01=0x014a}
0xab96…abcc Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x006d, t01=0x0172}
0xabcc…abf2 Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB ADDR«, t00=0x006e, t01=0x0018}
0xabf2…ac1a Head {h00=0x0024, h01=0x0050, text=» LD A8,ECBBA,A9 BUFFER ADDR USER«, t00=0x006e, t01=0x003e}
0xac1a…ac2e Head {h00=0x0010, h01=0x0050, text=» LDR A12,A8 «, t00=0x006e, t01=0x0066}
0xac2e…ac56 Head {h00=0x0024, h01=0x0050, text=» LD A11,FDBRLE,A1 RECORD LENGTH «, t00=0x006e, t01=0x007a}
0xac56…ac74 Head {h00=0x001a, h01=0x0050, text=» SUKL A11,6 KEY LENGTH«, t00=0x006e, t01=0x00a2}
0xac74…ac88 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A14«, t00=0x006e, t01=0x00c0}
0xac88…acbc Head {h00=0x0030, h01=0x0050, text=» ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS«, t00=0x006e, t01=0x00d4}
0xacbc…ace4 Head {h00=0x0024, h01=0x0050, text=» CF A14,FNDKEY GET INDEX RECORD «, t00=0x006e, t01=0x0108}
0xace4…ad00 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x006e, t01=0x0130}
0xad00…ad1c Head {h00=0x0018, h01=0x0050, text=» LDR A1,A2 RET CODE «, t00=0x006e, t01=0x014c}
0xad1c…ad2e Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x006e, t01=0x0168}
0xad2e…ad54 Head {h00=0x0022, h01=0x0050, text=» ABL(Z) DMI035 NO SECTOR FOUND«, t00=0x006e, t01=0x017a}
0xad54…ad74 Head {h00=0x001c, h01=0x0050, text=» LDR A13,A3 BUFFER ADDR «, t00=0x006f, t01=0x0010}
0xad74…ad9a Head {h00=0x0022, h01=0x0050, text=» LD A4,FDBADF,A6 FDB DATA FILE«, t00=0x006f, t01=0x0030}
0xad9a…adbc Head {h00=0x001e, h01=0x0050, text=» LD A5,DWTECB,A4 USER ECB «, t00=0x006f, t01=0x0056}
0xadbc…add4 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTOR,A6 «, t00=0x006f, t01=0x0078}
0xadd4…ade8 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/3F «, t00=0x006f, t01=0x0090}
0xade8…adfe Head {h00=0x0012, h01=0x0050, text=» SUK A1,QDELX «, t00=0x006f, t01=0x00a4}
0xadfe…ae28 Head {h00=0x0026, h01=0x0050, text=» ABL(E) DEL000 DELETE INDEX RECORD«, t00=0x006f, t01=0x00ba}
0xae28…ae32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00e4}
0xae32…ae5e Head {h00=0x0028, h01=0x0050, text=»* SET RC BIT 6 TO USER IF NEXT KEY«, t00=0x006f, t01=0x00ee}
0xae5e…ae84 Head {h00=0x0022, h01=0x0050, text=»* IS SAME IN REQUESTED INDEX«, t00=0x006f, t01=0x011a}
0xae84…ae8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0140}
0xae8e…aea0 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x006f, t01=0x014a}
0xaea0…aec8 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) INS050 NEXT KEY NOT SAME«, t00=0x006f, t01=0x015c}
0xaec8…aef4 Head {h00=0x0028, h01=0x0050, text=»* (SHORT KEY NOT ALLOWED IN FILE) «, t00=0x006f, t01=0x0184}
0xaef4…aefe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0020}
0xaefe…af20 Head {h00=0x001e, h01=0x0050, text=» LC A4,ECBFC,A5 FILE CODE «, t00=0x0070, t01=0x002a}
0xaf20…af3a Head {h00=0x0016, h01=0x0050, text=» CC A4,FDBECB+1,A6«, t00=0x0070, t01=0x004c}
0xaf3a…af68 Head {h00=0x002a, h01=0x0050, text=» RF(NE) INS049 NOT REQUESTED FILE CODE«, t00=0x0070, t01=0x0066}
0xaf68…af84 Head {h00=0x0018, h01=0x0050, text=» LDKL A4,/200 BIT 6 «, t00=0x0070, t01=0x0094}
0xaf84…afaa Head {h00=0x0022, h01=0x0050, text=» ORS A4,ECBRC,A5 NEXT KEY SAME«, t00=0x0070, t01=0x00b0}
0xafaa…afbe Head {h00=0x0010, h01=0x0050, text=»INS049 EQU *«, t00=0x0070, t01=0x00d6}
0xafbe…afd4 Head {h00=0x0012, h01=0x0050, text=» IFT INSLAS=1 «, t00=0x0070, t01=0x00ea}
0xafd4…afde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0100}
0xafde…affe Head {h00=0x001c, h01=0x0050, text=»* INSERT SAME KEY LAST«, t00=0x0070, t01=0x010a}
0xaffe…b008 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x012a}
0xb008…b01e Head {h00=0x0012, h01=0x0050, text=» LDR A1,A6 FDB«, t00=0x0070, t01=0x0134}
0xb01e…b040 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBRRO,A1 REC OFFS «, t00=0x0070, t01=0x014a}
0xb040…b052 Head {h00=0x000e, h01=0x0050, text=» RF INS100«, t00=0x0070, t01=0x016c}
0xb052…b066 Head {h00=0x0010, h01=0x0050, text=»INS080 EQU *«, t00=0x0070, t01=0x017e}
0xb066…b08a (113, 0, 398) Head {h00=0x0020, h01=0x0050, text=» CF A14,RDNXTR GET NEXT REC «, t00=0x0071, t01=0x0004}
0xb08a…b0a0 Head {h00=0x0012, h01=0x0050, text=» RF INS100 OK «, t00=0x0071, t01=0x0028}
0xb0a0…b0ba Head {h00=0x0016, h01=0x0050, text=» ABL DEL045 ERROR «, t00=0x0071, t01=0x003e}
0xb0ba…b0ce Head {h00=0x0010, h01=0x0050, text=»INS100 EQU *«, t00=0x0071, t01=0x0058}
0xb0ce…b0e0 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0071, t01=0x006c}
0xb0e0…b0fc Head {h00=0x0018, h01=0x0050, text=» ADK A2,10 REC ADDR «, t00=0x0071, t01=0x007e}
0xb0fc…b120 Head {h00=0x0020, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR STATUS«, t00=0x0071, t01=0x009a}
0xb120…b134 Head {h00=0x0010, h01=0x0050, text=» LDK A5,/FF «, t00=0x0071, t01=0x00be}
0xb134…b146 Head {h00=0x000e, h01=0x0050, text=» CCR A5,A2«, t00=0x0071, t01=0x00d2}
0xb146…b160 Head {h00=0x0016, h01=0x0050, text=» RF(E) INS150 USED«, t00=0x0071, t01=0x00e4}
0xb160…b178 Head {h00=0x0014, h01=0x0050, text=» LD A5,FDBMRO,A1«, t00=0x0071, t01=0x00fe}
0xb178…b190 Head {h00=0x0014, h01=0x0050, text=» ST A5,FDBRRO,A1«, t00=0x0071, t01=0x0116}
0xb190…b1be Head {h00=0x002a, h01=0x0050, text=» RB INS080 GET FIRST RE C IN NXT SECT «, t00=0x0071, t01=0x012e}
0xb1be…b1d2 Head {h00=0x0010, h01=0x0050, text=»INS150 EQU *«, t00=0x0071, t01=0x015c}
0xb1d2…b1f4 Head {h00=0x001e, h01=0x0050, text=» LC A5,-4,A2 DUPL KEY CHAR«, t00=0x0071, t01=0x0170}
0xb1f4…b212 (114, 0, 400) Head {h00=0x001a, h01=0x0050, text=» CWR A5,A11 KEY LENGTH«, t00=0x0072, t01=0x0004}
0xb212…b23a Head {h00=0x0024, h01=0x0050, text=» RB(E) INS080 NEXT SAME GET NEXT«, t00=0x0072, t01=0x0022}
0xb23a…b244 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x004a}
0xb244…b268 Head {h00=0x0020, h01=0x0050, text=»* UPDATE LAST SAME RECORD «, t00=0x0072, t01=0x0054}
0xb268…b272 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0078}
0xb272…b292 Head {h00=0x001c, h01=0x0050, text=» SC A11,-4,A2 NEXT SAME «, t00=0x0072, t01=0x0082}
0xb292…b2aa Head {h00=0x0014, h01=0x0050, text=» LD A7,FDBRRO,A1«, t00=0x0072, t01=0x00a2}
0xb2aa…b2c2 Head {h00=0x0014, h01=0x0050, text=» CW A7,FDBMRO,A1«, t00=0x0072, t01=0x00ba}
0xb2c2…b2ec Head {h00=0x0026, h01=0x0050, text=» RF(NE) INS160 SECT WRITTEN LATER «, t00=0x0072, t01=0x00d2}
0xb2ec…b2f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00fc}
0xb2f6…b30e Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x0072, t01=0x0106}
0xb30e…b318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x011e}
0xb318…b336 Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE,WAIT«, t00=0x0072, t01=0x0128}
0xb336…b342 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0072, t01=0x0146}
0xb342…b352 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0072, t01=0x0152}
0xb352…b372 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x0072, t01=0x0162}
0xb372…b384 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0072, t01=0x0182}
0xb384…b39c (115, 0, 398) Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0073, t01=0x0004}
0xb39c…b3a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x001c}
0xb3a6…b3c2 Head {h00=0x0018, h01=0x0050, text=»* GET NEXT RECORD «, t00=0x0073, t01=0x0026}
0xb3c2…b3cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0042}
0xb3cc…b3e0 Head {h00=0x0010, h01=0x0050, text=»INS160 EQU *«, t00=0x0073, t01=0x004c}
0xb3e0…b406 Head {h00=0x0022, h01=0x0050, text=» LDR A7,A5 NR OF SAME IN NEXT «, t00=0x0073, t01=0x0060}
0xb406…b41c Head {h00=0x0012, h01=0x0050, text=» LDR A1,A6 FDB«, t00=0x0073, t01=0x0086}
0xb41c…b43e Head {h00=0x001e, h01=0x0050, text=» CF A14,RDNXTR GET NEXT RC«, t00=0x0073, t01=0x009c}
0xb43e…b454 Head {h00=0x0012, h01=0x0050, text=» RF INS170 OK «, t00=0x0073, t01=0x00be}
0xb454…b46e Head {h00=0x0016, h01=0x0050, text=» ABL DEL045 ERROR «, t00=0x0073, t01=0x00d4}
0xb46e…b482 Head {h00=0x0010, h01=0x0050, text=»INS170 EQU *«, t00=0x0073, t01=0x00ee}
0xb482…b4a2 Head {h00=0x001c, h01=0x0050, text=» LDR A13,A3 BUFFER ADDR «, t00=0x0073, t01=0x0102}
0xb4a2…b4ba Head {h00=0x0014, h01=0x0050, text=» LD A5,FDBADF,A6«, t00=0x0073, t01=0x0122}
0xb4ba…b4e0 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTECB,A5 USER ECB ADDR«, t00=0x0073, t01=0x013a}
0xb4e0…b4ec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x0160}
0xb4ec…b502 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0073, t01=0x016c}
0xb502…b516 Head {h00=0x0010, h01=0x0050, text=»INS050 EQU *«, t00=0x0073, t01=0x0182}
0xb516…b520 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0008}
0xb520…b54c Head {h00=0x0028, h01=0x0050, text=»* CREATE AN INDE XRECORD IN AREA 1«, t00=0x0074, t01=0x0012}
0xb54c…b556 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x003e}
0xb556…b574 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A12 FROM ADDR «, t00=0x0074, t01=0x0048}
0xb574…b57e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0066}
0xb57e…b592 Head {h00=0x0010, h01=0x0050, text=» LDR A3,A14 «, t00=0x0074, t01=0x0070}
0xb592…b5ac Head {h00=0x0016, h01=0x0050, text=» ADK A3,2 TO ADDR «, t00=0x0074, t01=0x0084}
0xb5ac…b5ca Head {h00=0x001a, h01=0x0050, text=» LDR A2,A11 KEY LENGTH«, t00=0x0074, t01=0x009e}
0xb5ca…b5e8 Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTBM MOVE KEY«, t00=0x0074, t01=0x00bc}
0xb5e8…b5fa Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0074, t01=0x00da}
0xb5fa…b612 Head {h00=0x0014, h01=0x0050, text=» SCR A2,A3 DUMMY«, t00=0x0074, t01=0x00ec}
0xb612…b624 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0074, t01=0x0104}
0xb624…b63c Head {h00=0x0014, h01=0x0050, text=» SCR A2,A3 DUMMY«, t00=0x0074, t01=0x0116}
0xb63c…b64e Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0074, t01=0x012e}
0xb64e…b670 Head {h00=0x001e, h01=0x0050, text=» SCR A7,A3 NR OF SAME CHAR«, t00=0x0074, t01=0x0140}
0xb670…b682 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0074, t01=0x0162}
0xb682…b6a8 Head {h00=0x0022, h01=0x0050, text=» LDR A7,A3 ADDR OF LOG REC NR «, t00=0x0074, t01=0x0174}
0xb6a8…b6c2 Head {h00=0x0016, h01=0x0050, text=» LD A2,ECBCW+2,A5 «, t00=0x0075, t01=0x000a}
0xb6c2…b6ee Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBCW,A5 REC NR DATA FILE REC«, t00=0x0075, t01=0x0024}
0xb6ee…b700 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A7«, t00=0x0075, t01=0x0050}
0xb700…b712 Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0075, t01=0x0062}
0xb712…b724 Head {h00=0x000e, h01=0x0050, text=» SCR A3,A7«, t00=0x0075, t01=0x0074}
0xb724…b736 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0075, t01=0x0086}
0xb736…b748 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0075, t01=0x0098}
0xb748…b766 Head {h00=0x001a, h01=0x0050, text=» SCR A3,A7 LOG REC NR «, t00=0x0075, t01=0x00aa}
0xb766…b778 Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0075, t01=0x00c8}
0xb778…b790 Head {h00=0x0014, h01=0x0050, text=» LDK A1,/FF USED«, t00=0x0075, t01=0x00da}
0xb790…b7ae Head {h00=0x001a, h01=0x0050, text=» SCR A1,A7 STATUS CHAR«, t00=0x0075, t01=0x00f2}
0xb7ae…b7ca Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0075, t01=0x0110}
0xb7ca…b7f2 Head {h00=0x0024, h01=0x0050, text=» CF A14,GTLGRN GET REC NR INDEX «, t00=0x0075, t01=0x012c}
0xb7f2…b7fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0154}
0xb7fc…b82c Head {h00=0x002c, h01=0x0050, text=»* SAVE RECORD NR FOR FIRST MOVED INDEX«, t00=0x0075, t01=0x015e}
0xb82c…b836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x018e}
0xb836…b84c Head {h00=0x0012, h01=0x0050, text=» ST A2,-28,A14«, t00=0x0076, t01=0x0008}
0xb84c…b862 Head {h00=0x0012, h01=0x0050, text=» ST A3,-26,A14«, t00=0x0076, t01=0x001e}
0xb862…b870 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0076, t01=0x0034}
0xb870…b87a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0042}
0xb87a…b8b8 Head {h00=0x003a, h01=0x0050, text=»* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING«, t00=0x0076, t01=0x004c}
0xb8b8…b8e0 Head {h00=0x0024, h01=0x0050, text=»* USED RECORDS ROLLED FORWARD «, t00=0x0076, t01=0x008a}
0xb8e0…b908 Head {h00=0x0024, h01=0x0050, text=»* A6,A11,A13 IS USED AT ENTRY «, t00=0x0076, t01=0x00b2}
0xb908…b930 Head {h00=0x0024, h01=0x0050, text=» ADKL A11,7 RECORD LENGTH TOTAL «, t00=0x0076, t01=0x00da}
0xb930…b93a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0102}
0xb93a…b956 Head {h00=0x0018, h01=0x0050, text=»* USE D REGISTERS «, t00=0x0076, t01=0x010c}
0xb956…b978 Head {h00=0x001e, h01=0x0050, text=»* A6 = FDB ADDR INDEX «, t00=0x0076, t01=0x0128}
0xb978…b994 Head {h00=0x0018, h01=0x0050, text=»* A10 = AREA ADDR«, t00=0x0076, t01=0x014a}
0xb994…b9ba Head {h00=0x0022, h01=0x0050, text=»* A11 = RECORD LENGTH INDEX«, t00=0x0076, t01=0x0166}
0xb9ba…b9ea Head {h00=0x002c, h01=0x0050, text=»* A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 «, t00=0x0076, t01=0x018c}
0xb9ea…ba12 Head {h00=0x0024, h01=0x0050, text=»* A13 = BUFFER ADDRESS SECTOR«, t00=0x0077, t01=0x002c}
0xba12…ba1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0054}
0xba1c…ba30 Head {h00=0x0010, h01=0x0050, text=»INS190 EQU *«, t00=0x0077, t01=0x005e}
0xba30…ba4c Head {h00=0x0018, h01=0x0050, text=» LDKL A12,1 BUFADR2 «, t00=0x0077, t01=0x0072}
0xba4c…ba60 Head {h00=0x0010, h01=0x0050, text=»INS200 EQU *«, t00=0x0077, t01=0x008e}
0xba60…ba72 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0077, t01=0x00a2}
0xba72…ba86 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0077, t01=0x00b4}
0xba86…baa2 Head {h00=0x0018, h01=0x0050, text=» RF(Z) INS210 BUFAR1«, t00=0x0077, t01=0x00c8}
0xbaa2…bace Head {h00=0x0028, h01=0x0050, text=» LDKL A1,RECBFZ RECORD BUUFFER SIZE «, t00=0x0077, t01=0x00e4}
0xbace…bae4 Head {h00=0x0012, h01=0x0050, text=» SLL A1,1 BYTE«, t00=0x0077, t01=0x0110}
0xbae4…bafe Head {h00=0x0016, h01=0x0050, text=»INS210 LDR A10,A14«, t00=0x0077, t01=0x0126}
0xbafe…bb10 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0077, t01=0x0140}
0xbb10…bb3c Head {h00=0x0028, h01=0x0050, text=» ADR A10,A1 RECORD BUFFER AREA ADDR «, t00=0x0077, t01=0x0152}
0xbb3c…bb46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x017e}
0xbb46…bb62 Head {h00=0x0018, h01=0x0050, text=»* SAVE LAST RECORD«, t00=0x0077, t01=0x0188}
0xbb62…bb6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0014}
0xbb6c…bb80 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x0078, t01=0x001e}
0xbb80…bb9c Head {h00=0x0018, h01=0x0050, text=» ADK A1,10 BUFSTA+2 «, t00=0x0078, t01=0x0032}
0xbb9c…bbce Head {h00=0x002e, h01=0x0050, text=» AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT «, t00=0x0078, t01=0x004e}
0xbbce…bbe2 Head {h00=0x0010, h01=0x0050, text=» LDR A2,A11 «, t00=0x0078, t01=0x0080}
0xbbe2…bbf6 Head {h00=0x0010, h01=0x0050, text=» LDR A3,A10 «, t00=0x0078, t01=0x0094}
0xbbf6…bc1c Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTBM SAVE LAST RECORD«, t00=0x0078, t01=0x00a8}
0xbc1c…bc3c Head {h00=0x001c, h01=0x0050, text=»* MOVE REST OF SECTOR «, t00=0x0078, t01=0x00ce}
0xbc3c…bc46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00ee}
0xbc46…bc5a Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x0078, t01=0x00f8}
0xbc5a…bc76 Head {h00=0x0018, h01=0x0050, text=» ADK A1,10 BUFSTA+2 «, t00=0x0078, t01=0x010c}
0xbc76…bc98 Head {h00=0x001e, h01=0x0050, text=» AD A1,FDBRRO,A6 FROM ADDR«, t00=0x0078, t01=0x0128}
0xbc98…bcaa Head {h00=0x000e, h01=0x0050, text=» LDR A5,A1«, t00=0x0078, t01=0x014a}
0xbcaa…bcc2 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBMRO,A6«, t00=0x0078, t01=0x015c}
0xbcc2…bce6 Head {h00=0x0020, h01=0x0050, text=» SU A2,FDBRRO,A6 NR OF CHAR «, t00=0x0078, t01=0x0174}
0xbce6…bcf8 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0079, t01=0x0008}
0xbcf8…bd14 Head {h00=0x0018, h01=0x0050, text=» ADR A3,A11 TO ADDR «, t00=0x0079, t01=0x001a}
0xbd14…bd30 Head {h00=0x0018, h01=0x0050, text=» CF A14,DMTBMR MOVE «, t00=0x0079, t01=0x0036}
0xbd30…bd4e Head {h00=0x001a, h01=0x0050, text=»* INSERT NEW RECORD «, t00=0x0079, t01=0x0052}
0xbd4e…bd58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0070}
0xbd58…bd7c Head {h00=0x0020, h01=0x0050, text=» LDKL A1,RECBFZ BUFFER SIZE «, t00=0x0079, t01=0x007a}
0xbd7c…bd96 Head {h00=0x0016, h01=0x0050, text=» SLL A1,1 BYTE NO «, t00=0x0079, t01=0x009e}
0xbd96…bdaa Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0079, t01=0x00b8}
0xbdaa…bdc6 Head {h00=0x0018, h01=0x0050, text=» RF(Z) INS250 BUFAR1«, t00=0x0079, t01=0x00cc}
0xbdc6…bdec Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 SELECT OTHER BUFFER «, t00=0x0079, t01=0x00e8}
0xbdec…be00 Head {h00=0x0010, h01=0x0050, text=»INS250 EQU *«, t00=0x0079, t01=0x010e}
0xbe00…be1e Head {h00=0x001a, h01=0x0050, text=» ADR A1,A14 FROM ADDR «, t00=0x0079, t01=0x0122}
0xbe1e…be3a Head {h00=0x0018, h01=0x0050, text=» ADK A1,2 FROM ADDR «, t00=0x0079, t01=0x0140}
0xbe3a…be58 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A11 NR OF CHAR«, t00=0x0079, t01=0x015c}
0xbe58…be72 Head {h00=0x0016, h01=0x0050, text=» LDR A3,A5 TO ADDR«, t00=0x0079, t01=0x017a}
0xbe72…be8c (122, 0, 400) Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x007a, t01=0x0004}
0xbe8c…bea4 Head {h00=0x0014, h01=0x0050, text=»* WRITE BUFFER«, t00=0x007a, t01=0x001e}
0xbea4…beae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0036}
0xbeae…bed2 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A14 USE STACK AS ECB«, t00=0x007a, t01=0x0040}
0xbed2…bee6 Head {h00=0x0010, h01=0x0050, text=» SUKL A8,24 «, t00=0x007a, t01=0x0064}
0xbee6…bf0e Head {h00=0x0024, h01=0x0050, text=» LC A2,FDBEXT+1,A6 VOL DEV CODE «, t00=0x007a, t01=0x0078}
0xbf0e…bf22 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007a, t01=0x00a0}
0xbf22…bf36 Head {h00=0x0010, h01=0x0050, text=» STR A2,A8 «, t00=0x007a, t01=0x00b4}
0xbf36…bf4a Head {h00=0x0010, h01=0x0050, text=» LDR A2,A13 «, t00=0x007a, t01=0x00c8}
0xbf4a…bf62 Head {h00=0x0014, h01=0x0050, text=» ADK A2,8 BUFSTA«, t00=0x007a, t01=0x00dc}
0xbf62…bf86 Head {h00=0x0020, h01=0x0050, text=» ST A2,ECBBA,A8 SECTOR ADDR «, t00=0x007a, t01=0x00f4}
0xbf86…bfaa Head {h00=0x0020, h01=0x0050, text=» LDKL A2,SECTLE SECTOR LGTH «, t00=0x007a, t01=0x0118}
0xbfaa…bfc2 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBRL,A8 «, t00=0x007a, t01=0x013c}
0xbfc2…bfe4 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBSNR,A6 SECTOR NR«, t00=0x007a, t01=0x0154}
0xbfe4…c006 Head {h00=0x001e, h01=0x0050, text=» ST A2,ECBCW,A8 SECTOR NR «, t00=0x007a, t01=0x0176}
0xc006…c026 Head {h00=0x001c, h01=0x0050, text=» LDK A7,/95 WRITE , WAIT«, t00=0x007b, t01=0x0008}
0xc026…c032 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x007b, t01=0x0028}
0xc032…c042 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x007b, t01=0x0034}
0xc042…c05e Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x007b, t01=0x0044}
0xc05e…c07e Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x007b, t01=0x0060}
0xc07e…c090 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x007b, t01=0x0080}
0xc090…c0a8 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x007b, t01=0x0092}
0xc0a8…c0b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00aa}
0xc0b2…c0ec Head {h00=0x0036, h01=0x0050, text=»* IF SPILLED RECORD IS FREE, OPERATION IS READY «, t00=0x007b, t01=0x00b4}
0xc0ec…c0f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00ee}
0xc0f6…c11a Head {h00=0x0020, h01=0x0050, text=» LDR A2,A10 RECORD AREA ADDR«, t00=0x007b, t01=0x00f8}
0xc11a…c136 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A11 REC LGTH«, t00=0x007b, t01=0x011c}
0xc136…c15c Head {h00=0x0022, h01=0x0050, text=» SUK A2,1 ADDR OF STATUS CHAR «, t00=0x007b, t01=0x0138}
0xc15c…c174 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A6«, t00=0x007b, t01=0x015e}
0xc174…c1a0 Head {h00=0x0028, h01=0x0050, text=» ST A4,FDBRRO,A6 MAX OFFSET IN SECT «, t00=0x007b, t01=0x0176}
0xc1a0…c1b2 Head {h00=0x000e, h01=0x0050, text=» CCR A1,A2«, t00=0x007c, t01=0x0012}
0xc1b2…c1d4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) INS400 FREE RECORD «, t00=0x007c, t01=0x0024}
0xc1d4…c1de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0046}
0xc1de…c1fa Head {h00=0x0018, h01=0x0050, text=»* GET NEXT SECTOR «, t00=0x007c, t01=0x0050}
0xc1fa…c204 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x006c}
0xc204…c220 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x007c, t01=0x0076}
0xc220…c240 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A13 BUFFER ADDR «, t00=0x007c, t01=0x0092}
0xc240…c276 Head {h00=0x0032, h01=0x0050, text=» CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR«, t00=0x007c, t01=0x00b2}
0xc276…c28c Head {h00=0x0012, h01=0x0050, text=» RF INS260 OK «, t00=0x007c, t01=0x00e8}
0xc28c…c29e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A5«, t00=0x007c, t01=0x00fe}
0xc29e…c2b8 Head {h00=0x0016, h01=0x0050, text=» ABL DMI035 ERROR «, t00=0x007c, t01=0x0110}
0xc2b8…c2cc Head {h00=0x0010, h01=0x0050, text=»INS260 EQU *«, t00=0x007c, t01=0x012a}
0xc2cc…c2f0 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x007c, t01=0x013e}
0xc2f0…c304 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x007c, t01=0x0162}
0xc304…c330 Head {h00=0x0028, h01=0x0050, text=» RB(Z) INS190 SWITCH RECORD BUFFERS «, t00=0x007c, t01=0x0176}
0xc330…c344 Head {h00=0x0010, h01=0x0050, text=» SUR A12,A12«, t00=0x007d, t01=0x0012}
0xc344…c356 Head {h00=0x000e, h01=0x0050, text=» RB INS200«, t00=0x007d, t01=0x0026}
0xc356…c364 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x0038}
0xc364…c378 Head {h00=0x0010, h01=0x0050, text=»INS400 EQU *«, t00=0x007d, t01=0x0046}
0xc378…c382 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x005a}
0xc382…c3ae Head {h00=0x0028, h01=0x0050, text=»* UPDATE LRN IF EOF IS ENCOUNTERED«, t00=0x007d, t01=0x0064}
0xc3ae…c3b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0090}
0xc3b8…c3d4 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x007d, t01=0x009a}
0xc3d4…c3ec Head {h00=0x0014, h01=0x0050, text=» CF A14,GTLGRN «, t00=0x007d, t01=0x00b6}
0xc3ec…c404 Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x007d, t01=0x00ce}
0xc404…c420 Head {h00=0x0018, h01=0x0050, text=» RF(L) INS430 NO EOF«, t00=0x007d, t01=0x00e6}
0xc420…c43a Head {h00=0x0016, h01=0x0050, text=» RF(G) INS410 EOF «, t00=0x007d, t01=0x0102}
0xc43a…c454 Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x007d, t01=0x011c}
0xc454…c472 Head {h00=0x001a, h01=0x0050, text=» RF(NG) INS430 NO EOF «, t00=0x007d, t01=0x0136}
0xc472…c486 Head {h00=0x0010, h01=0x0050, text=»INS410 EQU *«, t00=0x007d, t01=0x0154}
0xc486…c4ac Head {h00=0x0022, h01=0x0050, text=» SC A2,FDBLRN,A6 LLAST REC NR «, t00=0x007d, t01=0x0168}
0xc4ac…c4c8 Head {h00=0x0018, h01=0x0050, text=» ST A3,FDBLRN+1,A6 «, t00=0x007d, t01=0x018e}
0xc4c8…c4e2 Head {h00=0x0016, h01=0x0050, text=» LDKL A1,/1000 EOF«, t00=0x007e, t01=0x001a}
0xc4e2…c506 Head {h00=0x0020, h01=0x0050, text=» ORS A1,ECBRC,A9 EOF TO USER«, t00=0x007e, t01=0x0034}
0xc506…c51a Head {h00=0x0010, h01=0x0050, text=»INS430 EQU *«, t00=0x007e, t01=0x0058}
0xc51a…c524 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x006c}
0xc524…c558 Head {h00=0x0030, h01=0x0050, text=»* UPDATE CRN-LINK FOR MOVED INDEX RECORDS «, t00=0x007e, t01=0x0076}
0xc558…c562 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00aa}
0xc562…c586 Head {h00=0x0020, h01=0x0050, text=» LDKL A12,1 ADD ON E TO CRN «, t00=0x007e, t01=0x00b4}
0xc586…c598 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x007e, t01=0x00d8}
0xc598…c5bc Head {h00=0x0020, h01=0x0050, text=» LDR A9,A3 LAST REC NR MOVED«, t00=0x007e, t01=0x00ea}
0xc5bc…c5d4 Head {h00=0x0014, h01=0x0050, text=» LD A10,-28,A14 «, t00=0x007e, t01=0x010e}
0xc5d4…c5fe Head {h00=0x0026, h01=0x0050, text=» LD A11,-26,A14 FIRST REC NR MOVED«, t00=0x007e, t01=0x0126}
0xc5fe…c62c Head {h00=0x002a, h01=0x0050, text=» CF A14,CRNUPD ADD 1 TO RECORD NUMBERS«, t00=0x007e, t01=0x0150}
0xc62c…c636 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x017e}
0xc636…c65e Head {h00=0x0024, h01=0x0050, text=»* UPDATE CRN IF SAME FILE CODE«, t00=0x007e, t01=0x0188}
0xc65e…c668 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0020}
0xc668…c68c Head {h00=0x0020, h01=0x0050, text=» LD A1,FDBADF,A5 FDB DATA F «, t00=0x007f, t01=0x002a}
0xc68c…c6b2 Head {h00=0x0022, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER «, t00=0x007f, t01=0x004e}
0xc6b2…c6dc Head {h00=0x0026, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB ADDR =4 «, t00=0x007f, t01=0x0074}
0xc6dc…c702 Head {h00=0x0022, h01=0x0050, text=» LC A4,ECBFC,A9 USER FILE CODE«, t00=0x007f, t01=0x009e}
0xc702…c71c Head {h00=0x0016, h01=0x0050, text=» CC A4,FDBECB+1,A5«, t00=0x007f, t01=0x00c4}
0xc71c…c73e Head {h00=0x001e, h01=0x0050, text=» RF(NE) INS440 OTHRER FILE«, t00=0x007f, t01=0x00de}
0xc73e…c758 Head {h00=0x0016, h01=0x0050, text=» ST A10,CRNCIF,A2 «, t00=0x007f, t01=0x0100}
0xc758…c77a Head {h00=0x001e, h01=0x0050, text=» ST A11,CRNCIF+2,A2 REC NR«, t00=0x007f, t01=0x011a}
0xc77a…c79c Head {h00=0x001e, h01=0x0050, text=» SC A4,CRNCIF,A2 FILE CODE«, t00=0x007f, t01=0x013c}
0xc79c…c7b0 Head {h00=0x0010, h01=0x0050, text=»INS440 EQU *«, t00=0x007f, t01=0x015e}
0xc7b0…c7cc Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 FDB INDEX«, t00=0x007f, t01=0x0172}
0xc7cc…c7ea Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 OK RET CODE «, t00=0x007f, t01=0x018e}
0xc7ea…c80a Head {h00=0x001c, h01=0x0050, text=» LDR A3,A13 BUFFER ADDR «, t00=0x0080, t01=0x001c}
0xc80a…c81e Head {h00=0x0010, h01=0x0050, text=» ABL DMTEX2 «, t00=0x0080, t01=0x003c}
0xc81e…c82c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0080, t01=0x0050}
0xc82c…c85a Head {h00=0x002a, h01=0x0050, text=»DEL000 EQU * DELETE INDEX RECORD CONT «, t00=0x0080, t01=0x005e}
0xc85a…c87c Head {h00=0x001e, h01=0x0050, text=» LDR A12,A5 USER ECB ADDR «, t00=0x0080, t01=0x008c}
0xc87c…c88e Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0080, t01=0x00ae}
0xc88e…c8a2 Head {h00=0x0010, h01=0x0050, text=»DEL010 EQU *«, t00=0x0080, t01=0x00c0}
0xc8a2…c8c8 Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) DMI030 KEY NOT FOUND «, t00=0x0080, t01=0x00d4}
0xc8c8…c8d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00fa}
0xc8d2…c8f6 Head {h00=0x0020, h01=0x0050, text=»* CHECK RECORD NR DATA REC«, t00=0x0080, t01=0x0104}
0xc8f6…c900 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0128}
0xc900…c914 Head {h00=0x0010, h01=0x0050, text=»DEL020 EQU *«, t00=0x0080, t01=0x0132}
0xc914…c92c Head {h00=0x0014, h01=0x0050, text=» LD A1,FDBRRO,A6«, t00=0x0080, t01=0x0146}
0xc92c…c93e Head {h00=0x000e, h01=0x0050, text=» ADR A1,A3«, t00=0x0080, t01=0x015e}
0xc93e…c956 Head {h00=0x0014, h01=0x0050, text=» AD A1,FDBRLE,A6«, t00=0x0080, t01=0x0170}
0xc956…c97e Head {h00=0x0024, h01=0x0050, text=» ADK A1,7 BUFSTA+2-3=ADDR REC NR«, t00=0x0080, t01=0x0188}
0xc97e…c990 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x0081, t01=0x0020}
0xc990…c9b2 Head {h00=0x001e, h01=0x0050, text=» CC A2,ECBCW+3,A12 REC NR «, t00=0x0081, t01=0x0032}
0xc9b2…c9d6 Head {h00=0x0020, h01=0x0050, text=» RF(NE) DEL030 WRONG RECORD «, t00=0x0081, t01=0x0054}
0xc9d6…c9ea Head {h00=0x0010, h01=0x0050, text=» LC A2,1,A1 «, t00=0x0081, t01=0x0078}
0xc9ea…c9fc Head {h00=0x000e, h01=0x0050, text=» ECR A2,A2«, t00=0x0081, t01=0x008c}
0xc9fc…ca16 Head {h00=0x0016, h01=0x0050, text=» LC A2,2,A1 REC NR«, t00=0x0081, t01=0x009e}
0xca16…ca2e Head {h00=0x0014, h01=0x0050, text=» CW A2,ECBCW,A12«, t00=0x0081, t01=0x00b8}
0xca2e…ca50 Head {h00=0x001e, h01=0x0050, text=» RF(E) DEL200 RECORD FOUND«, t00=0x0081, t01=0x00d0}
0xca50…ca64 Head {h00=0x0010, h01=0x0050, text=»DEL030 EQU *«, t00=0x0081, t01=0x00f2}
0xca64…ca6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0106}
0xca6e…ca90 Head {h00=0x001e, h01=0x0050, text=»* CHECK IF NEXT KEY SAME«, t00=0x0081, t01=0x0110}
0xca90…ca9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0132}
0xca9a…caba Head {h00=0x001c, h01=0x0050, text=» CC A11,-1,A1 KEY LENGTH«, t00=0x0081, t01=0x013c}
0xcaba…cae2 Head {h00=0x0024, h01=0x0050, text=» RB(NE) DEL010 NEXT KEY NOT SAME«, t00=0x0081, t01=0x015c}
0xcae2…cafe Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0081, t01=0x0184}
0xcafe…cb12 Head {h00=0x0010, h01=0x0050, text=»DEL040 EQU *«, t00=0x0082, t01=0x0010}
0xcb12…cb3e Head {h00=0x0028, h01=0x0050, text=» CF A14,RDNXTR GET NEXT INDEX RECORD«, t00=0x0082, t01=0x0024}
0xcb3e…cb54 Head {h00=0x0012, h01=0x0050, text=» RF DEL050 OK «, t00=0x0082, t01=0x0050}
0xcb54…cb78 Head {h00=0x0020, h01=0x0050, text=»DEL045 LDR A1,A5 ERROR CODE «, t00=0x0082, t01=0x0066}
0xcb78…cb92 Head {h00=0x0016, h01=0x0050, text=» ABL DMI035 ERROR «, t00=0x0082, t01=0x008a}
0xcb92…cba6 Head {h00=0x0010, h01=0x0050, text=»DEL050 EQU *«, t00=0x0082, t01=0x00a4}
0xcba6…cbb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00b8}
0xcbb0…cbd4 Head {h00=0x0020, h01=0x0050, text=»* CHECK IF RECORD IS USED «, t00=0x0082, t01=0x00c2}
0xcbd4…cbde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00e6}
0xcbde…cc02 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x0082, t01=0x00f0}
0xcc02…cc14 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0082, t01=0x0114}
0xcc14…cc32 Head {h00=0x001a, h01=0x0050, text=» ADK A2,10 BUFSTA + 2 «, t00=0x0082, t01=0x0126}
0xcc32…cc5a Head {h00=0x0024, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR OF STATUS «, t00=0x0082, t01=0x0144}
0xcc5a…cc6e Head {h00=0x0010, h01=0x0050, text=» LDK A5,/FF «, t00=0x0082, t01=0x016c}
0xcc6e…cc80 Head {h00=0x000e, h01=0x0050, text=» CCR A5,A2«, t00=0x0082, t01=0x0180}
0xcc80…cc9a (131, 0, 400) Head {h00=0x0016, h01=0x0050, text=» RB(E) DEL020 USED«, t00=0x0083, t01=0x0004}
0xcc9a…ccb2 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A1«, t00=0x0083, t01=0x001e}
0xccb2…ccde Head {h00=0x0028, h01=0x0050, text=» ST A4,FDBRRO,A1 LAST REC IN SECTOR «, t00=0x0083, t01=0x0036}
0xccde…ccfa Head {h00=0x0018, h01=0x0050, text=» RB DEL040 NEXT REC «, t00=0x0083, t01=0x0062}
0xccfa…cd08 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0083, t01=0x007e}
0xcd08…cd2a Head {h00=0x001e, h01=0x0050, text=»DEL200 EQU * RECORD FOUND «, t00=0x0083, t01=0x008c}
0xcd2a…cd34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x00ae}
0xcd34…cd5e Head {h00=0x0026, h01=0x0050, text=»* SET RC BIT 6 IF NEXT KEY SAME «, t00=0x0083, t01=0x00b8}
0xcd5e…cd68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x00e2}
0xcd68…cd90 Head {h00=0x0024, h01=0x0050, text=» LC A2,ECBFC,A12 USER FILE CODE «, t00=0x0083, t01=0x00ec}
0xcd90…cda2 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0083, t01=0x0114}
0xcda2…cdc6 Head {h00=0x0020, h01=0x0050, text=» LC A7,-1,A1 NR OF SAME CHAR«, t00=0x0083, t01=0x0126}
0xcdc6…cdfc Head {h00=0x0032, h01=0x0050, text=» ST A7,16,A14 SAVE IN RECORD BUFFER AFTER ECB «, t00=0x0083, t01=0x014a}
0xcdfc…ce18 Head {h00=0x0018, h01=0x0050, text=» CC A2,FDBECB+1,A6 «, t00=0x0083, t01=0x0180}
0xce18…ce46 Head {h00=0x002a, h01=0x0050, text=» RF(NE) DEL220 NOT REQUESTED FILE CODE«, t00=0x0084, t01=0x000c}
0xce46…ce64 Head {h00=0x001a, h01=0x0050, text=» CWR A11,A7 KEY LENGTH«, t00=0x0084, t01=0x003a}
0xce64…ce8c Head {h00=0x0024, h01=0x0050, text=» RF(NE) DEL220 NEXT KEY NOT SAME«, t00=0x0084, t01=0x0058}
0xce8c…cea2 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/200 «, t00=0x0084, t01=0x0080}
0xcea2…ceca Head {h00=0x0024, h01=0x0050, text=» ORS A4,ECBRC,A12 NEXT KEY SAME «, t00=0x0084, t01=0x0096}
0xceca…cede Head {h00=0x0010, h01=0x0050, text=»DEL220 EQU *«, t00=0x0084, t01=0x00be}
0xcede…cee8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00d2}
0xcee8…cf10 Head {h00=0x0024, h01=0x0050, text=»* MOVE UP RECORDS OVER DELETED«, t00=0x0084, t01=0x00dc}
0xcf10…cf1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0104}
0xcf1a…cf42 Head {h00=0x0024, h01=0x0050, text=» ADKL A11,7 TOTAL RECORD LENGTH «, t00=0x0084, t01=0x010e}
0xcf42…cf56 Head {h00=0x0010, h01=0x0050, text=» LDR A3,A13 «, t00=0x0084, t01=0x0136}
0xcf56…cf72 Head {h00=0x0018, h01=0x0050, text=» ADK A3,10 BUFSTA+2 «, t00=0x0084, t01=0x014a}
0xcf72…cf92 Head {h00=0x001c, h01=0x0050, text=» AD A3,FDBRRO,A6 TO ADDR«, t00=0x0084, t01=0x0166}
0xcf92…cfa4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0084, t01=0x0186}
0xcfa4…cfc2 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A11 FROM ADDR «, t00=0x0085, t01=0x0008}
0xcfc2…cfda Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBMRO,A6«, t00=0x0085, t01=0x0026}
0xcfda…cffe Head {h00=0x0020, h01=0x0050, text=» SU A2,FDBRRO,A6 NR OF CHAR «, t00=0x0085, t01=0x003e}
0xcffe…d018 Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x0085, t01=0x0062}
0xd018…d022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x007c}
0xd022…d042 Head {h00=0x001c, h01=0x0050, text=»* SET LAST RECORD FREE«, t00=0x0085, t01=0x0086}
0xd042…d04c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x00a6}
0xd04c…d060 Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0085, t01=0x00b0}
0xd060…d072 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0085, t01=0x00c4}
0xd072…d084 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0085, t01=0x00d6}
0xd084…d0a2 Head {h00=0x001a, h01=0x0050, text=» SCR A1,A3 STATUS FREE«, t00=0x0085, t01=0x00e8}
0xd0a2…d0ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0106}
0xd0ac…d0d4 Head {h00=0x0024, h01=0x0050, text=»* UPDATE CRN FOR MOVED RECORDS«, t00=0x0085, t01=0x0110}
0xd0d4…d0de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0138}
0xd0de…d0fa Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0085, t01=0x0142}
0xd0fa…d11c Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0085, t01=0x015e}
0xd11c…d130 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A2 «, t00=0x0085, t01=0x0180}
0xd130…d156 (134, 0, 398) Head {h00=0x0022, h01=0x0050, text=» LDR A11,A3 FIRST REC NR MOVED«, t00=0x0086, t01=0x0004}
0xd156…d17a Head {h00=0x0020, h01=0x0050, text=» LD A12,FDBRRO,A6 OLD OFFSET«, t00=0x0086, t01=0x002a}
0xd17a…d192 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A6«, t00=0x0086, t01=0x004e}
0xd192…d1b6 Head {h00=0x0020, h01=0x0050, text=» ST A4,FDBRRO,A6 MAX OFFSET «, t00=0x0086, t01=0x0066}
0xd1b6…d1de Head {h00=0x0024, h01=0x0050, text=» CF A14,GTLGRN LAST REC NR MOVED«, t00=0x0086, t01=0x008a}
0xd1de…d1f0 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0086, t01=0x00b2}
0xd1f0…d20a Head {h00=0x0016, h01=0x0050, text=» LDR A9,A3 REC NR «, t00=0x0086, t01=0x00c4}
0xd20a…d230 Head {h00=0x0022, h01=0x0050, text=» ST A12,FDBRRO,A6 RESET OFFSET«, t00=0x0086, t01=0x00de}
0xd230…d244 Head {h00=0x0010, h01=0x0050, text=» LDKL A12,-1«, t00=0x0086, t01=0x0104}
0xd244…d26e Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNUPD UPDATE CRN BUFFERS «, t00=0x0086, t01=0x0118}
0xd26e…d296 Head {h00=0x0024, h01=0x0050, text=» LDKL A12,1 MARK BUFFER CHANGED «, t00=0x0086, t01=0x0142}
0xd296…d2aa Head {h00=0x0010, h01=0x0050, text=»DEL240 EQU *«, t00=0x0086, t01=0x016a}
0xd2aa…d2c2 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBRRO,A5«, t00=0x0086, t01=0x017e}
0xd2c2…d2ea Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DEL290 NOT FIRST RECORD «, t00=0x0087, t01=0x0008}
0xd2ea…d300 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A5 FDB«, t00=0x0087, t01=0x0030}
0xd300…d322 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0087, t01=0x0046}
0xd322…d334 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0087, t01=0x0068}
0xd334…d346 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0087, t01=0x007a}
0xd346…d358 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x0087, t01=0x008c}
0xd358…d36a Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0087, t01=0x009e}
0xd36a…d392 Head {h00=0x0024, h01=0x0050, text=» CF A14,DSUMOD A1,A2 = A1,A2 - 1«, t00=0x0087, t01=0x00b0}
0xd392…d3b2 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DEL600 FILE START«, t00=0x0087, t01=0x00d8}
0xd3b2…d3ce Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 FDB ADDR «, t00=0x0087, t01=0x00f8}
0xd3ce…d3f2 Head {h00=0x0020, h01=0x0050, text=» CF A14,CALSNO GET SECTOR NR«, t00=0x0087, t01=0x0114}
0xd3f2…d40e Head {h00=0x0018, h01=0x0050, text=» LDR A5,A6 FDB ADDR «, t00=0x0087, t01=0x0138}
0xd40e…d420 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0087, t01=0x0154}
0xd420…d442 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DEL600 FILE START «, t00=0x0087, t01=0x0166}
0xd442…d456 Head {h00=0x0010, h01=0x0050, text=» LDR A8,A14 «, t00=0x0087, t01=0x0188}
0xd456…d472 Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 ECB ADDR «, t00=0x0088, t01=0x000c}
0xd472…d486 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0088, t01=0x0028}
0xd486…d4ae Head {h00=0x0024, h01=0x0050, text=» RF(Z) DEL245 BUFFER NOT CHANGED«, t00=0x0088, t01=0x003c}
0xd4ae…d4b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0064}
0xd4b8…d4d0 Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x0088, t01=0x006e}
0xd4d0…d4da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0086}
0xd4da…d4f8 Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x0088, t01=0x0090}
0xd4f8…d504 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0088, t01=0x00ae}
0xd504…d514 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0088, t01=0x00ba}
0xd514…d52a Head {h00=0x0012, h01=0x0050, text=» LDR A1,A5 FDB«, t00=0x0088, t01=0x00ca}
0xd52a…d54a Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x0088, t01=0x00e0}
0xd54a…d55c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0088, t01=0x0100}
0xd55c…d574 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0088, t01=0x0112}
0xd574…d5a0 Head {h00=0x0028, h01=0x0050, text=» SUR A12,A12 BUFFER NOT CHANGED YET «, t00=0x0088, t01=0x012a}
0xd5a0…d5b4 Head {h00=0x0010, h01=0x0050, text=»DEL245 EQU *«, t00=0x0088, t01=0x0156}
0xd5b4…d5c8 Head {h00=0x0010, h01=0x0050, text=» LDR A3,A13 «, t00=0x0088, t01=0x016a}
0xd5c8…d5ee Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0088, t01=0x017e}
0xd5ee…d5f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0014}
0xd5f8…d618 Head {h00=0x001c, h01=0x0050, text=»* GET PREVIOUS SECTOR «, t00=0x0089, t01=0x001e}
0xd618…d622 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x003e}
0xd622…d63e Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x0089, t01=0x0048}
0xd63e…d650 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0089, t01=0x0064}
0xd650…d672 Head {h00=0x001e, h01=0x0050, text=» CF A14,RDNXTR GET SECTOR «, t00=0x0089, t01=0x0076}
0xd672…d688 Head {h00=0x0012, h01=0x0050, text=» RF DEL250 OK «, t00=0x0089, t01=0x0098}
0xd688…d6a4 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0089, t01=0x00ae}
0xd6a4…d6b6 Head {h00=0x000e, h01=0x0050, text=» RB DEL045«, t00=0x0089, t01=0x00ca}
0xd6b6…d6ca Head {h00=0x0010, h01=0x0050, text=»DEL250 EQU *«, t00=0x0089, t01=0x00dc}
0xd6ca…d6e0 Head {h00=0x0012, h01=0x0050, text=» LDR A5,A1 FDB«, t00=0x0089, t01=0x00f0}
0xd6e0…d704 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x0089, t01=0x0106}
0xd704…d71c Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A5«, t00=0x0089, t01=0x012a}
0xd71c…d72e Head {h00=0x000e, h01=0x0050, text=» RF DEL300«, t00=0x0089, t01=0x0142}
0xd72e…d742 Head {h00=0x0010, h01=0x0050, text=»DEL290 EQU *«, t00=0x0089, t01=0x0154}
0xd742…d75a Head {h00=0x0014, h01=0x0050, text=» SU A4,FDBRLE,A5«, t00=0x0089, t01=0x0168}
0xd75a…d76c Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0089, t01=0x0180}
0xd76c…d780 (138, 0, 398) Head {h00=0x0010, h01=0x0050, text=»DEL300 EQU *«, t00=0x008a, t01=0x0004}
0xd780…d7ae Head {h00=0x002a, h01=0x0050, text=» ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET«, t00=0x008a, t01=0x0018}
0xd7ae…d7ca Head {h00=0x0018, h01=0x0050, text=» ADK A4,10 BUFSTA+2 «, t00=0x008a, t01=0x0046}
0xd7ca…d7ea Head {h00=0x001c, h01=0x0050, text=» ADR A4,A13 RECORD ADDR «, t00=0x008a, t01=0x0062}
0xd7ea…d814 Head {h00=0x0026, h01=0x0050, text=» AD A4,FDBRLE,A5 STATUS CHAR ADDR «, t00=0x008a, t01=0x0082}
0xd814…d828 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x008a, t01=0x00ac}
0xd828…d83a Head {h00=0x000e, h01=0x0050, text=» CCR A2,A4«, t00=0x008a, t01=0x00c0}
0xd83a…d856 Head {h00=0x0018, h01=0x0050, text=» RB(NE) DEL240 FREE «, t00=0x008a, t01=0x00d2}
0xd856…d888 Head {h00=0x002e, h01=0x0050, text=» LC A2,17,A14 NR OF SAME IN DELETED RECORD«, t00=0x008a, t01=0x00ee}
0xd888…d89c Head {h00=0x0010, h01=0x0050, text=» CC A2,-4,A4«, t00=0x008a, t01=0x0120}
0xd89c…d8b2 Head {h00=0x0012, h01=0x0050, text=» RF(NL) DEL600«, t00=0x008a, t01=0x0134}
0xd8b2…d8de Head {h00=0x0028, h01=0x0050, text=» SC A2,-4,A4 MAKE NR OF SAME SMALLER«, t00=0x008a, t01=0x014a}
0xd8de…d8fe Head {h00=0x001c, h01=0x0050, text=» RF DEL700 WRITE SECTOR «, t00=0x008a, t01=0x0176}
0xd8fe…d912 Head {h00=0x0010, h01=0x0050, text=»DEL600 EQU *«, t00=0x008b, t01=0x0008}
0xd912…d926 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x008b, t01=0x001c}
0xd926…d94e Head {h00=0x0024, h01=0x0050, text=» RF(Z) DEL900 BUFFER NOT CHANGED«, t00=0x008b, t01=0x0030}
0xd94e…d958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0058}
0xd958…d970 Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x008b, t01=0x0062}
0xd970…d97a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x007a}
0xd97a…d98e Head {h00=0x0010, h01=0x0050, text=»DEL700 EQU *«, t00=0x008b, t01=0x0084}
0xd98e…d9a2 Head {h00=0x0010, h01=0x0050, text=» LDR A8,A14 «, t00=0x008b, t01=0x0098}
0xd9a2…d9be Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 ECB ADDR «, t00=0x008b, t01=0x00ac}
0xd9be…d9dc Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x008b, t01=0x00c8}
0xd9dc…d9e8 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x008b, t01=0x00e6}
0xd9e8…d9f8 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x008b, t01=0x00f2}
0xd9f8…da14 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x008b, t01=0x0102}
0xda14…da34 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x008b, t01=0x011e}
0xda34…da46 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x008b, t01=0x013e}
0xda46…da5e Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x008b, t01=0x0150}
0xda5e…da72 Head {h00=0x0010, h01=0x0050, text=»DEL900 EQU *«, t00=0x008b, t01=0x0168}
0xda72…da86 Head {h00=0x0010, h01=0x0050, text=» ABL INS440 «, t00=0x008b, t01=0x017c}
0xda86…da92 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x0190}
0xda92…da9e Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x008c, t01=0x000c}
0xda9e…daa2 Head {h00=0x4004, h01=0x0000}
0xdaa2…daa6 00 8c 00 18 ┆ ┆
0xdaa6…daae (141, 1, 8) 20 04 00 00 00 8d 00 04 ┆ ┆
0xdaae…dafe (142, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 0d 01 7c 00 3a 00 50 2a 20 20 45 58 49 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * | : P* EXIT: ┆
0xdafe…db4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 0e 00 2a 00 3a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 0e ┆ * * : P* * ┆
0xdb4e…db9e 00 68 00 3a 00 50 2a 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 20 20 43 41 53 53 49 4e 2c 53 4f 50 49 4e 2c 43 48 43 52 49 4f 2c 4c 4f 44 43 4f 4d 20 20 20 20 20 20 20 20 20 20 2a 00 0e 00 a6 00 3a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 ┆ h : P* SUBROUTINES: CASSIN,SOPIN,CHCRIO,LODCOM * : P* ┆
0xdb9e…dbee 20 20 20 20 20 4c 4f 44 53 45 47 2c 52 45 42 55 46 2c 4d 4f 56 42 55 46 2c 52 44 42 4c 4b 2c 20 20 20 20 20 20 20 20 20 20 2a 00 0e 00 e4 00 3a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4f 4e 4c 4f 44 2c 43 4f 4e 45 58 2c ┆ LODSEG,REBUF,MOVBUF,RDBLK, * : P* CONLOD,CONEX,┆
0xdbee…dc3e 4d 4f 56 52 45 56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 0e 01 22 00 3a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MOVREV * " : P* ┆
0xdc3e…dc8e (143, 0, 400) 20 20 20 20 20 2a 00 0e 01 60 00 3a 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 0f 00 0e 00 10 00 50 53 59 53 4c ┆ * ` : P****************************************************** PSYSL┆
0xdc8e…dcde 4f 44 5c 45 51 55 5c 2a 00 0f 00 4c 00 06 00 50 2a 20 00 0f 00 60 00 16 00 50 2a 20 20 53 41 56 45 20 52 45 47 49 53 54 45 52 53 20 00 0f 00 6a 00 06 00 50 2a 20 00 0f 00 84 00 30 00 50 5c 53 54 5c 41 31 2c 53 43 54 41 44 41 5c 53 41 56 45 ┆OD EQU * L P* ` P* SAVE REGISTERS j P* 0 P ST A1,SCTADA SAVE┆
0xdcde…dd2e 20 41 50 50 4c 49 43 41 54 49 4f 4e 20 44 49 53 43 20 41 44 44 52 45 53 53 20 00 0f 00 8e 00 2a 00 50 5c 53 54 5c 41 32 2c 53 43 54 50 4c 44 5c 53 41 56 45 20 50 52 4f 47 52 41 4d 20 4c 4f 41 44 20 44 45 56 49 43 45 00 0f 00 c2 00 24 00 50 ┆ APPLICATION DISC ADDRESS * P ST A2,SCTPLD SAVE PROGRAM LOAD DEVICE $ P┆
0xdd2e…dd7e 5c 53 54 5c 41 33 2c 53 43 54 41 4e 4f 5c 41 50 50 4c 49 43 41 54 49 4f 4e 20 4e 55 4d 42 45 52 00 0f 00 f0 00 2a 00 50 5c 53 54 5c 41 39 2c 53 43 54 53 46 41 5c 53 41 56 45 20 53 41 56 45 30 39 20 4f 46 20 46 52 45 45 20 41 52 45 41 00 0f ┆ ST A3,SCTANO APPLICATION NUMBER * P ST A9,SCTSFA SAVE SAVE09 OF FREE AREA ┆
0xdd7e…ddce 01 18 00 14 00 50 5c 4c 44 4b 4c 5c 41 31 34 2c 53 59 53 42 41 53 00 0f 01 46 00 0e 00 50 5c 4c 44 52 5c 41 31 33 2c 50 00 0f 01 5e 00 10 00 50 5c 41 44 4b 4c 5c 41 31 33 2c 31 30 00 0f 01 70 00 12 00 50 5c 4c 44 5c 41 31 2c 53 43 54 42 55 ┆ P LDKL A14,SYSBAS F P LDR A13,P ^ P ADKL A13,10 p P LD A1,SCTBU┆
0xddce…de1e (144, 0, 398) 47 20 00 0f 01 84 00 10 00 50 5c 41 42 52 28 4e 5a 29 5c 41 31 20 00 10 00 0a 00 0a 00 50 5c 45 4a 45 43 54 00 10 00 1e 00 06 00 50 2a 20 00 10 00 2c 00 1c 00 50 2a 20 20 49 4e 44 49 43 41 54 45 20 53 59 53 4c 4f 44 20 52 55 4e 53 20 00 10 ┆G P ABR(NZ) A1 P EJECT P* , P* INDICATE SYSLOD RUNS ┆
0xde1e…de6e 00 36 00 06 00 50 2a 20 00 10 00 56 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4c 4d 50 31 20 00 10 00 60 00 12 00 50 5c 4f 54 52 5c 41 31 2c 30 2c 53 4f 50 20 00 10 00 76 00 06 00 50 2a 20 00 10 00 8c 00 42 00 50 2a 20 20 49 4e 49 54 20 50 4f ┆ 6 P* V P LDKL A1,LMP1 ` P OTR A1,0,SOP v P* B P* INIT PO┆
0xde6e…debe 49 4e 54 45 52 20 54 4f 20 53 55 42 52 4f 55 54 49 4e 45 20 48 41 4e 44 4c 45 52 20 28 41 31 33 29 2c 20 53 54 41 43 4b 20 42 41 53 45 20 28 41 31 34 29 20 00 10 00 96 00 24 00 50 2a 20 20 41 4e 44 20 41 44 44 52 45 53 53 20 54 4f 20 47 45 ┆INTER TO SUBROUTINE HANDLER (A13), STACK BASE (A14) $ P* AND ADDRESS TO GE┆
0xdebe…df0e 54 50 53 57 2d 52 4f 55 54 49 4e 45 00 10 00 dc 00 06 00 50 2a 20 00 10 01 04 00 1c 00 50 5c 4c 44 52 5c 41 38 2c 50 5c 52 45 54 55 52 4e 20 41 44 44 52 45 53 53 00 10 01 0e 00 26 00 50 5c 4c 44 4b 4c 5c 41 33 2c 52 45 4c 2b 32 5c 52 45 4c ┆TPSW-ROUTINE P* P LDR A8,P RETURN ADDRESS & P LDKL A3,REL+2 REL┆
0xdf0e…df5c 4f 43 41 54 49 4f 4e 20 52 4f 55 54 49 4e 45 20 00 10 01 2e 00 0e 00 50 5c 43 46 52 5c 41 38 2c 41 33 00 10 01 58 00 24 00 50 5c 4c 44 4b 4c 5c 41 35 2c 2f 35 35 35 35 5c 4c 4f 41 44 20 54 45 53 54 20 50 41 54 54 45 52 4e 00 10 01 6a ┆OCATION ROUTINE . P CFR A8,A3 X $ P LDKL A5,/5555 LOAD TEST PATTERN j┆
0xdf5c…dfac (145, 0, 400) 00 20 00 50 5c 4c 44 4b 5c 41 36 2c 36 34 5c 49 4e 49 54 20 50 41 47 45 20 43 4f 55 4e 54 45 52 00 11 00 04 00 22 00 50 5c 4c 44 5c 41 31 2c 53 43 54 4f 50 54 5c 47 45 54 20 4f 50 54 49 4f 4e 20 57 4f 52 44 20 00 11 00 28 00 1c 00 50 5c 41 ┆ P LDK A6,64 INIT PAGE COUNTER " P LD A1,SCTOPT GET OPTION WORD ( P A┆
0xdfac…dffc 4e 4b 5c 41 31 2c 31 5c 4d 4d 55 20 49 4e 20 53 59 53 54 45 4d 3f 00 11 00 4e 00 16 00 50 5c 52 46 28 5a 29 5c 41 50 3a 31 30 30 5c 4e 4f 21 20 00 11 00 6e 00 0a 00 50 5c 45 4a 45 43 54 00 11 00 88 00 06 00 50 2a 20 00 11 00 96 00 3e 00 50 ┆NK A1,1 MMU IN SYSTEM? N P RF(Z) AP:100 NO! n P EJECT P* > P┆
0xdffc…e04c 2a 20 20 45 58 45 43 55 54 49 4f 4e 20 50 41 54 48 20 46 4f 52 20 53 59 53 54 45 4d 53 20 57 49 54 48 20 4d 4d 55 20 4f 50 54 49 4f 4e 20 45 58 43 4c 55 53 49 56 45 4c 59 20 00 11 00 a0 00 06 00 50 2a 20 00 11 00 e2 00 22 00 50 5c 53 4c 4c ┆* EXECUTION PATH FOR SYSTEMS WITH MMU OPTION EXCLUSIVELY P* " P SLL┆
0xe04c…e09c 5c 41 36 2c 32 5c 55 50 50 45 52 20 53 41 56 45 32 30 3d 32 35 36 20 4b 42 20 00 11 00 ec 00 20 00 50 5c 4c 44 4b 5c 41 31 2c 30 5c 4d 4d 55 20 45 4e 54 52 59 20 50 4f 49 4e 54 45 52 20 00 11 01 12 00 10 00 50 41 50 3a 30 31 30 5c 45 51 55 ┆ A6,2 UPPER SAVE20=256 KB P LDK A1,0 MMU ENTRY POINTER PAP:010 EQU┆
0xe09c…e0ec 5c 2a 00 11 01 36 00 22 00 50 5c 4c 44 5c 41 32 2c 54 41 42 42 45 5c 47 45 54 20 50 41 47 45 20 41 44 44 52 45 53 53 20 00 11 01 4a 00 32 00 50 5c 53 55 4b 4c 5c 41 32 2c 2f 34 30 30 5c 44 45 43 52 45 4d 45 4e 54 20 50 48 59 53 49 43 41 4c ┆ * 6 " P LD A2,TABBE GET PAGE ADDRESS J 2 P SUKL A2,/400 DECREMENT PHYSICAL┆
0xe0ec…e13c (146, 0, 400) 20 50 41 47 45 20 41 44 44 52 45 53 53 20 00 11 01 70 00 1e 00 50 5c 53 54 5c 41 32 2c 54 41 42 42 45 5c 53 54 4f 52 45 20 49 54 20 42 41 43 4b 00 12 00 16 00 20 00 50 5c 54 4c 5c 54 41 42 42 45 5c 4c 4f 41 44 20 4d 4d 55 20 52 45 47 49 53 ┆ PAGE ADDRESS p P ST A2,TABBE STORE IT BACK P TL TABBE LOAD MMU REGIS┆
0xe13c…e18c 54 45 52 53 00 12 00 38 00 2a 00 50 5c 45 53 5c 41 35 2c 50 41 47 53 49 5a 2d 32 2c 41 31 5c 53 54 4f 52 45 20 54 45 53 54 20 50 41 54 54 45 52 4e 20 00 12 00 5c 00 2a 00 50 5c 45 4c 5c 41 32 2c 50 41 47 53 49 5a 2d 32 2c 41 31 5c 47 45 54 ┆TERS 8 * P ES A5,PAGSIZ-2,A1 STORE TEST PATTERN * P EL A2,PAGSIZ-2,A1 GET┆
0xe18c…e1dc 20 4d 45 4d 4f 52 59 20 43 4f 4e 54 45 4e 54 20 00 12 00 8a 00 28 00 50 5c 43 57 52 5c 41 32 2c 41 35 5c 43 4f 4d 50 41 52 45 20 57 49 54 48 20 54 45 53 54 20 50 41 54 54 45 52 4e 00 12 00 b8 00 12 00 50 5c 52 46 28 45 29 5c 41 50 3a 32 30 ┆ MEMORY CONTENT ( P CWR A2,A5 COMPARE WITH TEST PATTERN P RF(E) AP:20┆
0xe1dc…e22c 30 20 00 12 00 e4 00 28 00 50 5c 53 55 4b 5c 41 36 2c 34 5c 44 45 43 52 45 4d 45 4e 54 20 4e 55 4d 42 45 52 20 4f 46 20 50 41 47 45 53 20 00 12 00 fa 00 0e 00 50 5c 52 42 5c 41 50 3a 30 31 30 00 12 01 26 00 06 00 50 2a 20 00 12 01 38 00 44 ┆0 ( P SUK A6,4 DECREMENT NUMBER OF PAGES P RB AP:010 & P* 8 D┆
0xe22c…e27c 00 50 2a 20 20 45 4e 44 20 4f 46 20 45 58 45 43 55 54 49 4f 4e 20 50 41 54 48 20 46 4f 52 20 53 59 53 54 45 4d 53 20 57 49 54 48 20 4d 4d 55 20 4f 50 54 49 4f 4e 20 45 58 43 4c 55 53 49 56 45 4c 59 00 12 01 42 00 06 00 50 2a 20 00 12 01 8a ┆ P* END OF EXECUTION PATH FOR SYSTEMS WITH MMU OPTION EXCLUSIVELY B P* ┆
0xe27c…e2cc (147, 0, 400) 00 0a 00 50 5c 45 4a 45 43 54 00 13 00 04 00 10 00 50 41 50 3a 31 30 30 5c 45 51 55 5c 2a 00 13 00 12 00 06 00 50 2a 20 00 13 00 26 00 40 00 50 2a 20 20 45 58 45 43 55 54 49 4f 4e 20 50 41 54 48 20 46 4f 52 20 53 59 53 54 45 4d 53 20 57 49 ┆ P EJECT PAP:100 EQU * P* & @ P* EXECUTION PATH FOR SYSTEMS WI┆
0xe2cc…e31c 54 48 4f 55 54 20 4d 4d 55 20 4f 50 54 49 4f 4e 20 45 58 43 4c 55 53 49 56 45 4c 59 00 13 00 30 00 06 00 50 2a 20 00 13 00 74 00 26 00 50 5c 4c 44 4b 4c 5c 41 31 2c 50 41 47 53 49 5a 2d 32 5c 53 41 56 45 30 39 20 41 54 20 2f 46 46 46 45 20 ┆THOUT MMU OPTION EXCLUSIVELY 0 P* t & P LDKL A1,PAGSIZ-2 SAVE09 AT /FFFE ┆
0xe31c…e36c 00 13 00 7e 00 10 00 50 41 50 3a 31 31 30 5c 45 51 55 5c 2a 00 13 00 a8 00 26 00 50 5c 53 55 4b 4c 5c 41 31 2c 50 41 47 53 49 5a 5c 4e 45 58 54 20 50 48 59 53 49 43 41 4c 20 50 41 47 45 00 13 00 bc 00 28 00 50 5c 4c 44 52 2a 5c 41 32 2c 41 ┆ ~ PAP:110 EQU * & P SUKL A1,PAGSIZ NEXT PHYSICAL PAGE ( P LDR* A2,A┆
0xe36c…e3bc 31 5c 53 41 56 45 20 4f 4c 44 20 4d 45 4d 4f 52 59 20 43 4f 4e 54 45 4e 54 20 00 13 00 e6 00 22 00 50 5c 53 54 52 5c 41 35 2c 41 31 5c 53 54 4f 52 45 20 54 45 53 54 20 50 41 54 54 45 52 4e 20 00 13 01 12 00 20 00 50 5c 43 57 52 2a 5c 41 35 ┆1 SAVE OLD MEMORY CONTENT " P STR A5,A1 STORE TEST PATTERN P CWR* A5┆
0xe3bc…e40c 2c 41 31 5c 43 48 45 43 4b 20 49 46 20 4d 45 4d 4f 52 59 20 00 13 01 38 00 22 00 50 5c 52 46 28 45 29 5c 41 50 3a 31 32 30 5c 4d 45 4d 4f 52 59 20 45 4e 44 20 46 4f 55 4e 44 00 13 01 5c 00 30 00 50 5c 53 55 4b 5c 41 36 2c 34 5c 44 45 43 52 ┆,A1 CHECK IF MEMORY 8 " P RF(E) AP:120 MEMORY END FOUND 0 P SUK A6,4 DECR┆
0xe40c…e45c (148, 0, 398) 45 4d 45 4e 54 20 4e 55 4d 42 45 52 20 4f 46 20 50 48 59 53 49 43 41 4c 20 50 41 47 45 53 00 13 01 82 00 0e 00 50 5c 52 42 5c 41 50 3a 31 31 30 00 14 00 26 00 10 00 50 41 50 3a 31 32 30 5c 45 51 55 5c 2a 00 14 00 38 00 2a 00 50 5c 53 54 52 ┆EMENT NUMBER OF PHYSICAL PAGES P RB AP:110 & PAP:120 EQU * 8 * P STR┆
0xe45c…e4ac 5c 41 32 2c 41 31 5c 52 45 53 54 4f 52 45 20 4f 4c 44 20 4d 45 4d 4f 52 59 20 43 4f 4e 54 45 4e 54 20 00 14 00 4c 00 06 00 50 2a 20 00 14 00 7a 00 48 00 50 2a 20 20 45 4e 44 20 4f 46 20 45 58 45 43 55 54 49 4f 4e 20 50 41 54 48 20 46 4f 52 ┆ A2,A1 RESTORE OLD MEMORY CONTENT L P* z H P* END OF EXECUTION PATH FOR┆
0xe4ac…e4fc 20 53 59 53 54 45 4d 53 20 57 49 54 48 4f 55 54 20 4d 4d 55 20 4f 50 54 49 4f 4e 20 45 58 43 4c 55 53 49 56 45 4c 59 20 00 14 00 84 00 06 00 50 2a 20 00 14 00 d0 00 0a 00 50 5c 45 4a 45 43 54 00 14 00 da 00 06 00 50 2a 20 00 14 00 e8 00 1c ┆ SYSTEMS WITHOUT MMU OPTION EXCLUSIVELY P* P EJECT P* ┆
0xe4fc…e54c 00 50 2a 20 20 43 4f 4d 4d 4f 4e 20 45 58 45 43 55 54 49 4f 4e 20 50 41 54 48 00 14 00 f2 00 06 00 50 2a 20 00 14 01 12 00 10 00 50 41 50 3a 32 30 30 5c 45 51 55 5c 2a 00 14 01 1c 00 30 00 50 5c 53 54 5c 41 36 2c 53 43 54 4d 53 5a 5c 53 41 ┆ P* COMMON EXECUTION PATH P* PAP:200 EQU * 0 P ST A6,SCTMSZ SA┆
0xe54c…e59a 56 45 20 4e 55 4d 42 45 52 20 4f 46 20 50 48 59 53 49 43 41 4c 20 50 41 47 45 53 20 00 14 01 30 00 06 00 50 2a 20 00 14 01 64 00 24 00 50 2a 20 20 47 45 54 20 41 50 50 4c 49 43 41 54 49 4f 4e 20 44 49 53 43 20 41 44 44 52 45 53 53 20 ┆VE NUMBER OF PHYSICAL PAGES 0 P* d $ P* GET APPLICATION DISC ADDRESS ┆