|
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: 36614 (0x8f06)
Notes: pts_type(SC)
Names: »DMTASK.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »M:TU10/DMTASK.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »M:TU10/DMTASK.SC«
IDENT DMTASK REL 10.0 80-05-28 870105041000 =4 , PR 6249 80-03-14 =3 ,DUPL KEY ONLY SEQ 79-11-28 =2 , START NOT USED OK 79-11-22 =1 , INDEXED START NOT LESS 79-11-02 **************************************************** * * 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 BLOCK TO BE ACCESSED IS DEFINED IN FDB (FDBDMI, , -SNR). * ALL BUFFERS ARE CHECKED TO FIND OUT IF THIS BLOCK * 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 BLOCK MUST FIRST BE READ INTO A FREE BUFFER. * EJECT * *************** * ENTRIES * *************** * * ENTRY DMTASK * * FOLLOWING ENTRIES ARE USED BY MODULE DMOPCL ENTRY DMTERX,QOPEN,QRFP,QCL ENTRY RECBFZ 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 FDBLRN EXTRN FDBMIA EXTRN FDBEAL EXTRN FDBADF EXTRN FDBAI1 EXTRN FDBMEC,FWTVOL,FWTPAR EXTRN FWTFNR EXTRN FDBCRL EXTRN FDBDBR,FDBMRO,FDBDMI,FDBBLZ EXTRN ECBFC EXTRN ECBBA EXTRN ECBRL EXTRN ECBEL EXTRN ECBRC EXTRN ECBCW EXTRN BUFLNK EXTRN BUFDMI EXTRN BUFFC EXTRN BUFSNR EXTRN BUFOR EXTRN BUFSTA EXTRN DWTECB EXTRN DWTOR EXTRN DWTTAB,DWTOPT EXTRN DMTRBU RELEASE A DISC BUFFER EXTRN DMTIOT,CHKKEY EXTRN CALSNO EXTRN DSUMOD EXTRN EATEST,EASETB,CRNGET,EARELB,GTBKBU EXTRN FNDKEY EXTRN CRNCIF,CRNCDF,CRNQUE EXTRN MXIND EXTRN FDBKA,FDBNIF,RDNXTR EXTRN FDBKEY SAVE AREA FOR KEY IN INDEXED ACCESS EXTRN GTLGRN,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 SCTPLD PROGRAM LOADING DEVICE EXTRN DMOPEN,DMCLOS,DMRFP EXTRN RELPRO EXTRN EOFRC,REQERR,NODERR,PROERR EXTRN PROT,KEYERR,NXTKYS EXTRN EOFERR EXTRN EOMERR EXTRN NOKEY EXTRN DMTWM,DMTBM,DMTBMR,FNDFDB EXTRN GETA14,DMTFRL,DMTREM EJECT * * * ************************ * CONDITIONAL ASSEMBLY * ************************ * * * X:B EQU 0 X:C EQU 0 X:E EQU 1 * * INDEXED ACCEXSS FUNCTIONS CAN BE OMITTED WITH * INDXAC EQU 1 = INDEX ACCESS INCLUDED * INDXAC EQU 0 = INDEX ACCESS FUNCTIONS OMITTED INDXAC EQU 00000 RECBFZ EQU 00004 INDEX RECORD BUFFER SIZE IN WORDS INSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1 * * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * EJECT * ************************ * DATA DEFINITIONS * ************************ * * THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE * POSITION IN TIODM-TABLE TIODMF * ORDERS EQU * QRR EQU *-ORDERS DATA DMRDRE RANDOM READ QSR EQU *-ORDERS DATA DMSQRE SEQUENTIAL READ IFT INDXAC=1 QIRR EQU *-ORDERS DATA DMIRR INDEXED READ QIRN EQU *-ORDERS DATA DMIRN INDEXED READ NEXT XIF IFT INDXAC=0 DATA DMTERR,DMTERR XIF QRW EQU *-ORDERS DATA DMRDWR RANDOM WRITE QSW EQU *-ORDERS DATA DMSQWR SEQUENTIAL WRITE IFT INDXAC=1 QINS EQU *-ORDERS DATA DMINS INDEXED INSERT XIF IFT INDXAC=0 DATA DMTERR XIF DATA DMTERR RESERVED QREWR EQU *-ORDERS DATA DMREWR RANDOM REWRITE IFT INDXAC=1 QIRW EQU *-ORDERS DATA DMIRW INDEXED REWRITE XIF IFT INDXAC=0 DATA DMTERR XIF QRD EQU *-ORDERS DATA DMRDDE RANDOM DELETE IFT INDXAC=1 QDEL EQU *-ORDERS DATA DMDEL INDEXED DELETE XIF IFT INDXAC=0 DATA DMTERR XIF QSTDIR EQU *-ORDERS DATA DMSTDI START DIRECT IFT INDXAC=1 QSTIND EQU *-ORDERS DATA DMSTIN START INDEXED XIF IFT INDXAC=0 DATA DMTERR XIF * * FOLLOWING LABELS ARE FOUND IN MODULE DMOPCL * QOPEN EQU *-ORDERS DATA DMOPEN OPEN QCL EQU *-ORDERS DATA DMCLOS CLOSE DATA DMTERR READ STATUS DONE IN TIODM QRFP EQU *-ORDERS DATA DMRFP READ FILE PARAMETERS EJECT ************** * DMTASK * ************** * DMTASK EQU * * * SET UP A14 STACK * INH CF A15,GETA14 ENB LDR A6,A1 FDB ADDR LD A5,FDBRRO,A6 RF(N) DMT090 FOR ORDERS XR (SEE TIODM) * AND RFP,OPEN,STARTINDEXED LD A4,FDBADF,A6 DATA FILE CM FDBKA,A4 MARK 1ST PASS INDEXED DEL DMT020 EQU * * * LOOP ENTRY FOR INDEXED READ,INDEXED NEXT,INDEXED DEL * START, AND SEQ READ * LD A7,DWTOR,A1 ORDER ANK A7,/3F SUK A7,QSR RF(NZ) SQR430 NOT SEQUENTIAL READ LD A9,DWTECB,A1 USER ECB ADDR * LD A2,ECBCW,A9 LD A3,ECBCW+2,A9 REC NR CC A2,FDBLRN,A1 RF(L) SQR430 NO EOF RF(G) SQR410 EOF CW A3,FDBLRN+1,A1 RF(NG) SQR430 NO EOF SQR410 EQU * LDKL A1,EOFERR EOF ABL DMTERX ERR SQR430 EQU * LDKL A2,/CFFF ANS A2,FDBDBR,A6 RELEASE BUFFER LDR A8,A1 ADKL A8,FDBECB ECB ADDR CF A14,GTBKBU GET BLOCK BUFFER LDR A2,A2 RF(N) DMT030 NO DATA IN BUFFER EJECT * * DELAYED BUFFER IS WRITTEN * IF IT IS NOT THE WANTED BLOCK * LC A7,BUFOR,A3 DELAY FLAG ANK A7,/3 RF(Z) DMT080 NO DELAY CM BUFOR,A3 RESET ANK A7,1 RF(NZ) DMT070 RIGHT SECTOR LD A7,BUFSNR,A3 SECT NR ST A7,ECBCW,A8 LD A7,BUFSNR+2,A3 ST A7,ECBCW+2,A8 LDK A7,/95 WRITE WAIT LKM DATA 15 CF A14,DMTIOT RET CODE CHECK AND RESET SECT NR LDR A1,A1 ABL(NZ) DMTERR ERR CF A14,DMTRBU RELEASE BUFFER LDR A1,A6 FDB ADDR RB DMT020 GET NEW BUFFER EJECT DMT030 EQU * * READ BLOCK INTO BUFFER * LDK A7,/91 PHYSICAL READ LKM DATA 15 FM READ BLOCK CF A14,DMTIOT CHECK RETURN CODES FROM DISC I/O LDR A1,A1 ABL(NZ) DMTERR LD A5,ECBBA,A8 RF DMT090 DMT070 EQU * RIGHT DELAYED BUFFER IS FOUND LDKL A5,/1000 ORS A5,FDBDBR,A6 KEEP BUFFER DMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER LDR A5,A3 ADKL A5,BUFSTA SKIP BUFFER HEADER ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB DMT090 EQU * LDR A1,A6 LD A7,DWTOR,A6 * A7 = INTERNAL ORDER CODE ANK A7,/3F ABI ORDERS,A7 DMTASK FUNCTION TABLE * A1 = A6 * (A3= BLOCK BUFFER ADDRESS ) * (A5 = BLOCK ADDRESS ) * A6 = FDB ADDRESS ALL ORDERS * A7 = ORDER CODE ALL ORDERS * (A8 = FDBECB ADDRESS ) * (A9 = USER ECB ADDRESS ) EJECT DMSQRE EQU * SEQUENTIAL READ * DMRDRE EQU * RANDOM READ * DMSTDI EQU * START DIRECT * * CHECK STATUS * 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 CWK A7,QRR RF(E) DMT190 RANDOM READ CWK A7,QSTDIR RF(NE) DMT250 NOT START LC A1,DWTOPT,A6 ANK A1,7 OPTION RF(NZ) DMT250 NOT EQUAL RF DMT230 EQUAL =2 DMT190 EQU * LDKL A1,NODERR NO DATA ABL DMTERR EJECT DMT200 EQU * SUK A7,QSTDIR RF(Z) DMT230 START LD A2,ECBRL,A9 REQ LGTH CW A2,FDBRLE,A6 RECORD LGTH RF(NG) DMT220 LD A2,FDBRLE,A6 MAX LGTH DMT220 ST A2,ECBEL,A9 SET EFF LGTH * * MOVE THE RECORD * CF A14,DMTREM * * UPDATE CRN AND SET EXCLUSIVE ACCESS BIT DMT230 EQU * ABL DMT400 PUT CRN AND EA EJECT DMT250 EQU * NO DATA AT SEQ READ * * GET NEXT RECORD * LD A2,ECBCW+2,A9 REC NR ADK A2,1 RF(O) DMT260 OVERFLOW RF DMT270 DMT260 ANKL A2,/7FFF IM ECBCW,A9 CARRY DMT270 ST A2,ECBCW+2,A9 DMT280 EQU * * * CHECK EA * LDR A1,A6 FDB ADDR LD A2,ECBCW,A9 LD A3,ECBCW+2,A9 REC NR CF A14,EATEST LDR A4,A4 ABL(N) DMEAER PROTECT ERROR IFT INDXAC=1 LD A4,DWTOR,A6 ORDER ANK A4,/3F CWK A4,QSTIND ABL(E) DMT400 START INDEXED XIF LDR A1,A2 LDR A2,A3 REC NR EJECT LDR A10,A8 CF A14,CALSNO PREP IO LDR A8,A10 LDR A1,A1 ABL(NZ) DMTERR OUT OF MEDIUM LDR A1,A6 FDB ADDRESS LC A3,FDBDBR,A6 DELAY ANK A3,/10 RF(NZ) DMT295 KEEP BUFFER LD A3,ECBBA,A8 SUKL A3,BUFSTA BUFFER ADDR * * RELEASE BLOCK BUFFER * CF A14,DMTRBU DMT295 EQU * ABL DMT020 NEXT RECORD EJECT DMSQWR EQU * SEQUENTIAL WRITE * DMRDWR EQU * RANDOM WRITE * DMREWR EQU * RANDOM REWRITE * DMRDDE EQU * RANDOM DELETE * DMINS EQU * INDEXED INSERT * DMDEL EQU * INDEXED DELETE * DMIRW EQU * INDEXED REWRITE * * TEST STATUS LD A10,FDBRRO,A6 AD A10,FDBRLE,A6 ADR A10,A5 STATUS BYTE ADDRESS LDR A11,A5 BUFFER ADDR LD A2,ECBCW,A9 LD A3,ECBCW+2,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) DMS008 INDEXED INSERT XIF LDR A4,A7 SUK A4,QRW RF(E) DMS008 DIRECT WRITE LDR A4,A7 SUK A4,QSW RF(NE) DMS020 NOT SEQ WRITE DMS008 EQU * LDKL A1,PROT PROTECTED RF DMERR 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 LDR A4,A7 SUK A4,QREWR RF(Z) DMERND RANDOM REWRITE LDR A4,A7 SUK A4,QRD RF(Z) DMERND RANDOM DELETE DMS020 EQU * CF A14,EATEST LDR A4,A4 RTN CODE RF(N) DMEAER EA OTHER TASK DMS100 EQU * LDK A3,0 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 LD A2,FDBKA,A6 ABL(NZ) DMT350 SECOND PASS INDEXED DEL LDR A2,A7 SUK A2,QDEL RF(E) CHK010 INDEXED DELETE XIF LDR A2,A7 SUK A2,QRD ABL(E) DMT350 RANDOM DELETE RF DMT310 IFT INDXAC=1 EJECT CHK010 EQU * * INDEXED REWRITE,INDEXED INSERT AND INDEXED DELETE ENTERS HERE * * COMPARE KEYS IN FILE AND USER BUFFER * LDK A5,8 MAX 4 INDEX 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 LD A2,DWTOR,A1 ANK A2,/3F ORDER INDEX CWK A2,QINS RB(E) CHK040 NO CHECK ON INSERT SUK A2,QIRW RF(Z) CHK050 CHECK REWRITE LC A2,DWTOPT,A1 OPTION ANK A2,/4 RB(NZ) CHK040 NO CHECK ON DEL CURRENT CHK050 EQU * * 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 LD A4,DWTTAB,A7 GET TTAB ADDRESS 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,PROT KEY NOT FOUND RF DMERR CHK100 EQU * LDR A6,A1 FDB ADDR LD A7,DWTOR,A6 ANK A7,/3F ORDER INDEX RF DMT310 XIF EJECT DMERND LDKL A1,NODERR NO DATA RF DMERR DMEAER EQU * RELEASE EA FOR ALL FILES SUR A9,A9 LC A9,FDBTNR,A6 USER TASK ID CF A14,RELPRO RELEASE PROTECT LDKL A1,PROERR PROTECT ERR DMERR ABL DMTERR EJECT * * MOVE RECORD * DMT310 EQU * IFT INDXAC=1 CWK A7,QDEL RF(NE) DMT313 NOT INDEX DEL * * MOVE KEYS TO FDB KEY AREAS * LDK A5,8 IXINS3 EQU * LDR A2,A6 FDB DATA ADR A2,A5 LD A3,FDBADF,A2 FDB INDEX RF(Z) IXINS4 NO INDEX LD A1,FDBKA,A3 KEY ADDR AD A1,FDBRRO,A6 REC OFFS ADR A1,A11 BUFFERADDR GIVES KEY ADDR LD A2,FDBRLE,A3 REC LGTH SUK A2,6 KEY LGTH ADKL A3,FDBKEY TO ADDR CF A14,DMTBM KEY TO FDB AREA IXINS4 EQU * SUK A5,2 RB(NZ) IXINS3 MORE INDEXS ABL DMXDEL INDEXED DEL DMT313 EQU * 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 LD A4,DWTTAB,A6 GET TTAB ADDRESS CF A14,MOV:US MOVE RECORD FROM USER TO SYSTEM AREA XIF EJECT * DMT340 EQU * * * SET STATUS USED * LDK A3,/FF DMT350 SCR A3,A10 LD A3,FDBDBR,A6 RF(N) DMT390 DELAY NO WRITE LDK A7,/95 PHYSICAL WRITE * * WRITE BLOCK TO DISC * LDR A1,A6 FDB ADDRESS AS PARAMETER LKM DATA 15 FM WRITE CF A14,DMTIOT CHECK DISC I/O LDR A1,A1 RF(NZ) DMTERR RF DMT400 EJECT DMT390 EQU * LDKL A2,/1000 ORS A2,FDBDBR,A6 KEEP BUFFER DMT400 EQU * LDR A1,A6 FDB ADDR DATA FILE CF A14,CRNGET GET CURRENCY BUFFER LDR A10,A2 BUFFER ADDR LD A2,ECBCW,A9 LD A3,ECBCW+2,A9 LOG REC NR LD A7,DWTOR,A1 ANK A7,/3F ORDER INDEX LDK A4,QRW CWR A7,A4 RF(E) DMT420 RANDOM WRITE LDK A4,QREWR CWR A7,A4 RF(E) DMT420 REWRITE LDK A4,QSW CWR A7,A4 RF(E) DMT460 SEQ WRITE IFT INDXAC=1 LDK A4,QIRW CWR A7,A4 RF(E) DMT420 IND REWR LDK A4,QINS CWR A7,A4 RF(E) DMT460 INDEXED INSERT CWK A7,QSTIND RF(E) DMT406 START INDEXED XIF LDK A4,QSTDIR CWR A7,A4 RF(NE) DMT409 NOT START DMT406 EQU * LDR A4,A2 LDR A5,A3 SUK A5,1 RF(NN) DMT408 ANKL A5,/7FFF SUK A4,1 DMT408 EQU * ST A4,CRNCDF,A10 NEW CURRENCY ST A5,CRNCDF+2,A10 RF DMT420 DMT409 EQU * ST A2,CRNCDF,A10 ST A3,CRNCDF+2,A10 CRN DATA FILE DMT420 EQU * * * CHECK PROTECT * LC A4,FDBDBR,A1 ANK A4,/1 RF(Z) DMT470 NOT PROTECT * * CHECK IF EA IS SET ALREADY * CF A14,EATEST CHECK EA LDR A4,A4 RF(NZ) DMT470 EA ALREADY SET * * SET EA * CF A14,EASETB RF DMT470 DMT460 EQU * * * UPDATE LRN * SC A2,FDBLRN,A1 ST A3,FDBLRN+1,A1 RB DMT420 DMT470 EQU * IFT INDXAC=1 LDK A4,QINS CWR A7,A4 ABL(E) DMINS2 INDEXED INSERT XIF EJECT DMTAEX LDK A1,0 CORRECT RETURN * DMTERR LC A3,FDBDBR,A6 ANK A3,/10 RF(NZ) DMTERX KEEP BUFFER LD A3,ECBBA,A8 SUKL A3,BUFSTA CF A14,DMTRBU RELEASE BUFFER AT A3 DMTERX EQU * LD A6,FDBADF,A6 GET FDB DATA FILE INH * A1 = RET CODE * A6 = DWT ADDR CF A15,TENDIO ENB LKM DATA 3 IFT INDXAC=1 EJECT DMIRR EQU * INDEXED RANDOM READ * DMSTIN EQU * START INDEXED ********************************************* LDR A8,A1 FDB ADDR ADKL A8,FDBKEY KEY AREA ADDR LD A11,FDBRLE,A1 REC LGTH INDEX SUKL A11,6 KEY LENGTH 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 LD A4,DWTOR,A6 ANK A4,/3F ORDER SUK A4,QSTIND RF(NZ) DMR007 NOT START LC A4,DWTOPT,A6 ANK A4,7 OPTION RF(Z) DMR007 EQUAL ANKL A2,/FBFF IGNORE NOKEY =1 DMR007 EQU * LDR A2,A2 RET CODE RF(NZ) DMI037 KEY NOT FOUND =4 LD A2,FDBRRO,A1 RECORD ADDR =3 ADKL A2,BUFSTA =3 ADR A2,A3 REC ADDR =3 LD A4,FDBRLE,A1 RECORD LENGTH =3 SUK A4,6 =3 ADR A2,A4 =3 * * MOVE LOG REC NO TO ECB * LDK A5,0 LC A5,3,A2 ST A5,ECBCW,A9 LC A5,4,A2 ECR A5,A5 LC A5,5,A2 ST A5,ECBCW+2,A9 * SET CRN * LD A11,FDBADF,A6 FDB DATA FILE LDR A1,A11 DATA FILE FDB 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 LDK A5,QRR RANDOM READ LD A7,DWTOR,A11 ANK A7,/3F ORDER SUK A7,QSTIND RF(NE) DMR025 INDEXED READ LDK A5,QSTIND START INDEXED SUK A3,1 RF(NN) DMR025 NOT UNDERFLOW ANKL A3,/7FFF SUK A2,1 DMR025 EQU * SC A2,CRNCIF+1,A10 ST A3,CRNCIF+2,A10 CRN INDEX FILE LD A2,ECBCW,A9 REC NR DATA ST A2,CRNCDF,A10 LD A2,ECBCW+2,A9 ST A2,CRNCDF+2,A10 LC A2,FWTFNR,A6 FILE NR SC A2,CRNCIF,A10 LDR A6,A11 FDB DATA SC A5,DWTOR+1,A6 NEW ORDER LDKL A2,/CFFF ANS A2,FDBDBR,A6 RELEASE INDEX BUFFERS ABL DMT280 EJECT DMIRN EQU * INDEXED READ NEXT ********************************************* LD A2,FDBRRO,A1 RECORD OFFSET LDR A3,A5 SUKL A3,BUFSTA DMI100 EQU * ADR A2,A3 BUFFADR ADKL A2,BUFSTA 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 LDKL A1,EOFERR RF DMI035 EOF DMI106 LDR A3,A9 RESTORE RF DMI010 NEXT REC EJECT DMI120 EQU * * INDEX RECORD IS FOUND * LD A9,DWTECB,A1 USER ECB * * KEY RECORD FOUN * CHECK IF NEXT RECORD HAS THE SAME KEY * LD A2,FDBRRO,A1 RECORD OFFSET ADKL A2,BUFSTA 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,NXTKYS BIT 6 ORS A5,ECBRC,A9 NEXT KEY SAME DMR020 EQU * LDK A2,0 MARK FOUND ABL DMR006 CONT AS FOR INDEXED RAND READ DMI037 LDKL A1,KEYERR KEY NOT FOUND =4 RF DMI035 =4 DMI010 EQU * CF A14,RDNXTR GET NEXT INDEX RECORD RB DMI100 RECORD FOUND LDR A6,A1 FDB ADDR DMI031 EQU * LDKL A1,NODERR NO IDENT DMI035 EQU * LDR A3,A3 BUFFER ADDR ABL(Z) DMTERX NO BUFFER ABL DMTERR ERROR AND BUFFER DMI036 EQU * ANK A1,/27 RB(NZ) DMI035 BIT 10,13,14,15 LDKL A1,EOMERR GRAVE ERR ALSO RB DMI035 EJECT DMINS2 EQU * INDEXED INSERT PART 2 DMXDEL EQU * INDEXED DELETE * ********************************************* LC A3,FDBDBR,A6 ANK A3,/10 RF(NZ) DXI010 KEEP BUFFER LD A3,ECBBA,A8 SUKL A3,BUFSTA CF A14,DMTRBU RELEASE BUFFER DXI010 EQU * LDK A5,10 LOOPER DXI020 EQU * NEXT INDEX LD A7,DWTOR,A6 ORDER ANK A7,/3F SUK A5,2 RF(Z) DXI100 ALL INDEXES LDR A4,A6 FDB DATA ADR A4,A5 LD A1,FDBADF,A4 FDB INDEX RB(Z) DXI020 NO INDEX LD A2,DWTOR,A6 ORDER ST A2,DWTOR,A1 LD A2,DWTECB,A6 USER ECB ADDR ST A2,DWTECB,A1 ST A5,FDBKA,A6 SAVE COUNTER SUK A7,QINS RF(E) DMINIX INSERT INDEX RF DMDELX DELETE INDEX EJECT * RETURN FROM UPDATING OF ONE INDEX * DMTAR5 EQU * LD A6,FDBADF,A1 FDB DATA FILE LD A5,FDBKA,A6 GET COUNTER OF INDEXES RB DXI020 TAKE NEXT INDEX DXI100 EQU * INDEXES READY LDK A1,0 RET CODE SUK A7,QINS INDEXED INSERT ABL(E) DMTERX READY LDR A1,A6 ABL DMT020 RESTART DMTASK EJECT DMINIX EQU * INSERT INDEX IFT MMUPAG=0 * * GET KEY IN USER BUFFER * LD A4,FDBADF,A1 DATA FDB LD A4,DWTECB,A4 USER ECB LD A8,ECBBA,A4 USER BUFFER AD A8,FDBKA,A1 KEY ADDR RF INS010 XIF IFT INDXAC=1 * DMDELX EQU * DELETE INDEX RECORD ********************************************* LDR A8,A1 ADKL A8,FDBKEY KEY ADDR INS010 EQU * 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) DMI036 NO SECTOR FOUND LDR A13,A3 BUFFER ADDR LD A5,DWTECB,A6 USER ECB LD A1,DWTOR,A6 ANK A1,/3F SUK A1,QDEL 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 LDKL A4,NXTKYS NEXT KEY SAME ORS A4,ECBRC,A5 NEXT KEY SAME 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 ADKL A2,BUFSTA 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 BLOCK * LDK A7,/95 WRITE,WAIT LKM DATA 15 FM 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,DWTECB,A6 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,A5 LD A3,ECBCW+2,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 BLOCK * 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 ADKL A1,BUFSTA 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 ADKL A1,BUFSTA 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,FWTFNR,A6 VOL DEV CODE ANK A2,/FF STR A2,A8 LDR A2,A13 ADKL A2,BUFSTA ST A2,ECBBA,A8 SECTOR ADDR LC A2,FDBBLZ,A6 BLOCK SIZE SLL A2,8 IN BYTE ST A2,ECBRL,A8 LD A2,FDBSNR,A6 SECTOR NR ST A2,ECBCW,A8 SECTOR NR LD A3,FDBSNR+2,A6 ST A3,ECBCW+2,A8 SECT NR LDK A7,/95 WRITE , WAIT LKM DATA 15 FM 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 BLOCK * LDR A1,A6 FDB ADDR LDR A3,A13 BUFFER ADDR CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR RF INS260 OK RF DEL045 ERR 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,EOFRC END OF FILE ORS A1,ECBRC,A9 TO USER EJECT 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 INS440 EQU * LDR A1,A5 FDB INDEX LDR A3,A13 BUFFER ADDR CF A14,DMTRBU REL BUFFER ABL DMTAR5 ONE INDEX READY TAKE NEXT EJECT DEL000 EQU * DELETE INDEX RECORD CONT LDR A12,A5 USER ECB ADDR LDR A2,A2 DEL010 EQU * ABL(NZ) DMI036 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-3=ADDR REC NR LCR A2,A1 CC A2,ECBCW+1,A12 REC NR RF(NE) DEL030 WRONG RECORD LC A2,1,A1 ECR A2,A2 LC A2,2,A1 REC NR CW A2,ECBCW+2,A12 RF(E) DEL200 RECORD FOUND DEL030 EQU * EJECT * * 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 DMI036 ERROR DEL050 EQU * * * CHECK IF RECORD IS USED * LDR A13,A3 NEW BUFFER ADDR ADR A2,A3 ADKL A2,BUFSTA 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 * LDK A7,0 LC A7,-1,A1 NR OF SAME CHAR ST A7,16,A14 SAVE IN RECORD BUFFER AFTER ECB CWR A11,A7 KEY LENGTH RF(NE) DEL220 NEXT KEY NOT SAME LDKL A4,NXTKYS ORS A4,ECBRC,A12 NEXT KEY SAME DEL220 EQU * * * MOVE UP RECORDS OVER DELETED * ADKL A11,7 TOTAL RECORD LENGTH LDR A3,A13 ADKL A3,BUFSTA 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 15 FM 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 ADKL A4,BUFSTA ADR A4,A13 RECORD ADDR AD A4,FDBRLE,A5 STATUS CHAR ADDR LDK A2,/FF CCR A2,A4 RB(NE) DEL240 FREE * * SET CURRENCY * LDR A9,A4 STATUS ADDR LD A1,FDBADF,A5 FDB DATA F CF A14,CRNGET GET CRN BUFFER LC A1,FWTFNR,A5 INDEX FILE NR CC A1,CRNCIF,A2 LAST REF INDEX RF(NE) DEL350 NOT THIS IND * * UPDATE CURRENCY * LDR A8,A2 CRN ADDR LDR A1,A5 INDEX CF A14,GTLGRN GET REC NR SC A2,CRNCIF+1,A8 ST A3,CRNCIF+2,A8 REC NR DEL350 EQU * LC A2,17,A14 NR OF SAME IN DELETED RECORD * WAS SAVED AT LABEL DEL200 CC A2,-4,A9 RF(NL) DEL600 SC A2,-4,A9 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 15 FM 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 10.0 80-05-28 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0056 Head {h00=0x0014, h01=0x0050, text=» =4 , PR 6249 «, t00=0x0000, t01=0x0042}
0x0056…006a Head {h00=0x0010, h01=0x0050, text=» 80-03-14 «, t00=0x0000, t01=0x005a}
0x006a…008a Head {h00=0x001c, h01=0x0050, text=» =3 ,DUPL KEY ONLY SEQ«, t00=0x0000, t01=0x006e}
0x008a…009e Head {h00=0x0010, h01=0x0050, text=» 79-11-28 «, t00=0x0000, t01=0x008e}
0x009e…00c0 Head {h00=0x001e, h01=0x0050, text=» =2 , START NOT USED OK «, t00=0x0000, t01=0x00a2}
0x00c0…00d4 Head {h00=0x0010, h01=0x0050, text=» 79-11-22 «, t00=0x0000, t01=0x00c4}
0x00d4…00fa Head {h00=0x0022, h01=0x0050, text=» =1 , INDEXED START NOT LESS«, t00=0x0000, t01=0x00d8}
0x00fa…010e Head {h00=0x0010, h01=0x0050, text=» 79-11-02 «, t00=0x0000, t01=0x00fe}
0x010e…014a Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x0112}
0x014a…0154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014e}
0x0154…017c Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0000, t01=0x0158}
0x017c…0186 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0180}
0x0186…01ba Head {h00=0x0030, h01=0x0050, text=»* DMTASK = HANDLES DATAMANAGEMENT DISC I/O«, t00=0x0000, t01=0x018a}
0x01ba…01c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002e}
0x01c4…01ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0038}
0x01ce…01d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0042}
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…0228 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0001, t01=0x0060}
0x0228…0232 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x009c}
0x0232…0262 Head {h00=0x002c, h01=0x0050, text=»* THIS MODULE IS ACTIVATED FROM TIODM.«, t00=0x0001, t01=0x00a6}
0x0262…026c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d6}
0x026c…028a Head {h00=0x001a, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0001, t01=0x00e0}
0x028a…02a6 Head {h00=0x0018, h01=0x0050, text=»* A1 = FDB ADDRESS«, t00=0x0001, t01=0x00fe}
0x02a6…02e6 Head {h00=0x003c, h01=0x0050, text=»* A2 = TID TASK IDENT OF DMTASK AT PRESENT NOT USED«, t00=0x0001, t01=0x011a}
0x02e6…02f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x015a}
0x02f0…0338 Head {h00=0x0044, h01=0x0050, text=»* THE BLOCK TO BE ACCESSED IS DEFINED IN FDB (FDBDMI, , -SNR).«, t00=0x0001, t01=0x0164}
0x0338…0376 Head {h00=0x003a, h01=0x0050, text=»* ALL BUFFERS ARE CHECKED TO FIND OUT IF THIS BLOCK «, t00=0x0002, t01=0x001c}
0x0376…03c0 Head {h00=0x0046, h01=0x0050, text=»* IS ALREADY PRESENT IN A BUFFER. IF SO THE BUFFER STATUS IS SET«, t00=0x0002, t01=0x005a}
0x03c0…0408 Head {h00=0x0044, h01=0x0050, text=»* TO USED AND ACTIONS ACCORDING TO THE ORDER ARE TAKEN. IF NOT«, t00=0x0002, t01=0x00a4}
0x0408…0444 Head {h00=0x0038, h01=0x0050, text=»* THE BLOCK MUST FIRST BE READ INTO A FREE BUFFER.«, t00=0x0002, t01=0x00ec}
0x0444…044e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0128}
0x044e…045c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0132}
0x045c…0466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x0466…047e Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0002, t01=0x014a}
0x047e…0496 Head {h00=0x0014, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x0162}
0x0496…04ae Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0002, t01=0x017a}
0x04ae…04b8 (3, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0004}
0x04b8…04c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000e}
0x04c2…04d8 Head {h00=0x0012, h01=0x0050, text=» ENTRY DMTASK «, t00=0x0003, t01=0x0018}
0x04d8…04e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002e}
0x04e2…051a Head {h00=0x0034, h01=0x0050, text=»* FOLLOWING ENTRIES ARE USED BY MODULE DMOPCL «, t00=0x0003, t01=0x0038}
0x051a…053e Head {h00=0x0020, h01=0x0050, text=» ENTRY DMTERX,QOPEN,QRFP,QCL«, t00=0x0003, t01=0x0070}
0x053e…0554 Head {h00=0x0012, h01=0x0050, text=» ENTRY RECBFZ «, t00=0x0003, t01=0x0094}
0x0554…0562 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00aa}
0x0562…056c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b8}
0x056c…0586 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0003, t01=0x00c2}
0x0586…05a0 Head {h00=0x0016, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x00dc}
0x05a0…05ba Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0003, t01=0x00f6}
0x05ba…05c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0110}
0x05c4…05ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011a}
0x05ce…05ea Head {h00=0x0018, h01=0x0050, text=» EXTRN SCTTCT,SCTCDT«, t00=0x0003, t01=0x0124}
0x05ea…0614 Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:ID TASK IDENTIFICATION «, t00=0x0003, t01=0x0140}
0x0614…0630 Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:TD,FDBSTA«, t00=0x0003, t01=0x016a}
0x0630…0646 Head {h00=0x0012, h01=0x0050, text=» EXTRN FNDTID «, t00=0x0003, t01=0x0186}
0x0646…065c Head {h00=0x0012, h01=0x0050, text=» EXTRN TENDIO «, t00=0x0004, t01=0x000c}
0x065c…0672 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBECB «, t00=0x0004, t01=0x0022}
0x0672…0688 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBSNR «, t00=0x0004, t01=0x0038}
0x0688…069e Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBRRO «, t00=0x0004, t01=0x004e}
0x069e…06b4 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBRLE «, t00=0x0004, t01=0x0064}
0x06b4…06ca Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBBLF «, t00=0x0004, t01=0x007a}
0x06ca…06e0 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBTNR «, t00=0x0004, t01=0x0090}
0x06e0…06f6 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBLRN «, t00=0x0004, t01=0x00a6}
0x06f6…070c Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBMIA «, t00=0x0004, t01=0x00bc}
0x070c…0722 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBEAL «, t00=0x0004, t01=0x00d2}
0x0722…0738 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBADF «, t00=0x0004, t01=0x00e8}
0x0738…074e Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBAI1 «, t00=0x0004, t01=0x00fe}
0x074e…0772 Head {h00=0x0020, h01=0x0050, text=» EXTRN FDBMEC,FWTVOL,FWTPAR «, t00=0x0004, t01=0x0114}
0x0772…0788 Head {h00=0x0012, h01=0x0050, text=» EXTRN FWTFNR «, t00=0x0004, t01=0x0138}
0x0788…079e Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBCRL «, t00=0x0004, t01=0x014e}
0x079e…07c8 Head {h00=0x0026, h01=0x0050, text=» EXTRN FDBDBR,FDBMRO,FDBDMI,FDBBLZ«, t00=0x0004, t01=0x0164}
0x07c8…07dc Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBFC«, t00=0x0004, t01=0x018e}
0x07dc…07f0 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBBA«, t00=0x0005, t01=0x0012}
0x07f0…0804 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRL«, t00=0x0005, t01=0x0026}
0x0804…0818 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBEL«, t00=0x0005, t01=0x003a}
0x0818…082c Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRC«, t00=0x0005, t01=0x004e}
0x082c…0840 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBCW«, t00=0x0005, t01=0x0062}
0x0840…0856 Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFLNK «, t00=0x0005, t01=0x0076}
0x0856…086c Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFDMI «, t00=0x0005, t01=0x008c}
0x086c…0880 Head {h00=0x0010, h01=0x0050, text=» EXTRN BUFFC«, t00=0x0005, t01=0x00a2}
0x0880…0896 Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFSNR «, t00=0x0005, t01=0x00b6}
0x0896…08aa Head {h00=0x0010, h01=0x0050, text=» EXTRN BUFOR«, t00=0x0005, t01=0x00cc}
0x08aa…08c0 Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFSTA «, t00=0x0005, t01=0x00e0}
0x08c0…08d6 Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTECB «, t00=0x0005, t01=0x00f6}
0x08d6…08ea Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTOR«, t00=0x0005, t01=0x010c}
0x08ea…0906 Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTTAB,DWTOPT«, t00=0x0005, t01=0x0120}
0x0906…0932 Head {h00=0x0028, h01=0x0050, text=» EXTRN DMTRBU RELEASE A DISC BUFFER «, t00=0x0005, t01=0x013c}
0x0932…094e Head {h00=0x0018, h01=0x0050, text=» EXTRN DMTIOT,CHKKEY«, t00=0x0005, t01=0x0168}
0x094e…0964 Head {h00=0x0012, h01=0x0050, text=» EXTRN CALSNO «, t00=0x0005, t01=0x0184}
0x0964…097a Head {h00=0x0012, h01=0x0050, text=» EXTRN DSUMOD «, t00=0x0006, t01=0x000a}
0x097a…09ac Head {h00=0x002e, h01=0x0050, text=» EXTRN EATEST,EASETB,CRNGET,EARELB,GTBKBU «, t00=0x0006, t01=0x0020}
0x09ac…09c2 Head {h00=0x0012, h01=0x0050, text=» EXTRN FNDKEY «, t00=0x0006, t01=0x0052}
0x09c2…09e6 Head {h00=0x0020, h01=0x0050, text=» EXTRN CRNCIF,CRNCDF,CRNQUE «, t00=0x0006, t01=0x0068}
0x09e6…09fa Head {h00=0x0010, h01=0x0050, text=» EXTRN MXIND«, t00=0x0006, t01=0x008c}
0x09fa…0a1c Head {h00=0x001e, h01=0x0050, text=» EXTRN FDBKA,FDBNIF,RDNXTR«, t00=0x0006, t01=0x00a0}
0x0a1c…0a56 Head {h00=0x0036, h01=0x0050, text=» EXTRN FDBKEY SAVE AREA FOR KEY IN INDEXED ACCESS «, t00=0x0006, t01=0x00c2}
0x0a56…0a7a Head {h00=0x0020, h01=0x0050, text=» EXTRN GTLGRN,DMTIOZ,CRNUPD «, t00=0x0006, t01=0x00fc}
0x0a7a…0aae Head {h00=0x0030, h01=0x0050, text=» EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA «, t00=0x0006, t01=0x0120}
0x0aae…0ae2 Head {h00=0x0030, h01=0x0050, text=» EXTRN MOV:SU MOVE FROM SYSTEM TO USER AREA «, t00=0x0006, t01=0x0154}
0x0ae2…0af8 Head {h00=0x0012, h01=0x0050, text=» EXTRN MONMMU «, t00=0x0006, t01=0x0188}
0x0af8…0b28 Head {h00=0x002c, h01=0x0050, text=» EXTRN PRUN TTAB ADDRESS OF RUNNING TASK«, t00=0x0007, t01=0x000e}
0x0b28…0b54 Head {h00=0x0028, h01=0x0050, text=» EXTRN SCTPLD PROGRAM LOADING DEVICE«, t00=0x0007, t01=0x003e}
0x0b54…0b76 Head {h00=0x001e, h01=0x0050, text=» EXTRN DMOPEN,DMCLOS,DMRFP«, t00=0x0007, t01=0x006a}
0x0b76…0b8c Head {h00=0x0012, h01=0x0050, text=» EXTRN RELPRO «, t00=0x0007, t01=0x008c}
0x0b8c…0bb6 Head {h00=0x0026, h01=0x0050, text=» EXTRN EOFRC,REQERR,NODERR,PROERR «, t00=0x0007, t01=0x00a2}
0x0bb6…0bd8 Head {h00=0x001e, h01=0x0050, text=» EXTRN PROT,KEYERR,NXTKYS «, t00=0x0007, t01=0x00cc}
0x0bd8…0bee Head {h00=0x0012, h01=0x0050, text=» EXTRN EOFERR «, t00=0x0007, t01=0x00ee}
0x0bee…0c04 Head {h00=0x0012, h01=0x0050, text=» EXTRN EOMERR «, t00=0x0007, t01=0x0104}
0x0c04…0c18 Head {h00=0x0010, h01=0x0050, text=» EXTRN NOKEY«, t00=0x0007, t01=0x011a}
0x0c18…0c40 Head {h00=0x0024, h01=0x0050, text=» EXTRN DMTWM,DMTBM,DMTBMR,FNDFDB«, t00=0x0007, t01=0x012e}
0x0c40…0c64 Head {h00=0x0020, h01=0x0050, text=» EXTRN GETA14,DMTFRL,DMTREM «, t00=0x0007, t01=0x0156}
0x0c64…0c72 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x017a}
0x0c72…0c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0188}
0x0c7c…0c86 (8, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0004}
0x0c86…0c90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x000e}
0x0c90…0cb0 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0018}
0x0cb0…0cd0 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x0008, t01=0x0038}
0x0cd0…0cf0 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0058}
0x0cf0…0cfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0078}
0x0cfa…0d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0082}
0x0d04…0d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x008c}
0x0d0e…0d20 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0008, t01=0x0096}
0x0d20…0d32 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x0008, t01=0x00a8}
0x0d32…0d44 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 1 «, t00=0x0008, t01=0x00ba}
0x0d44…0d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00cc}
0x0d4e…0d88 Head {h00=0x0036, h01=0x0050, text=»* INDEXED ACCEXSS FUNCTIONS CAN BE OMITTED WITH «, t00=0x0008, t01=0x00d6}
0x0d88…0db8 Head {h00=0x002c, h01=0x0050, text=»* INDXAC EQU 1 = INDEX ACCESS INCLUDED«, t00=0x0008, t01=0x0110}
0x0db8…0df2 Head {h00=0x0036, h01=0x0050, text=»* INDXAC EQU 0 = INDEX ACCESS FUNCTIONS OMITTED «, t00=0x0008, t01=0x0140}
0x0df2…0e0a Head {h00=0x0014, h01=0x0050, text=»INDXAC EQU 00000«, t00=0x0008, t01=0x017a}
0x0e0a…0e44 (9, 0, 400) Head {h00=0x0036, h01=0x0050, text=»RECBFZ EQU 00004 INDEX RECORD BUFFER SIZE IN WORDS«, t00=0x0009, t01=0x0004}
0x0e44…0e78 Head {h00=0x0030, h01=0x0050, text=»INSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1«, t00=0x0009, t01=0x003e}
0x0e78…0e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0072}
0x0e82…0e8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007c}
0x0e8c…0e96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0086}
0x0e96…0ec8 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0009, t01=0x0090}
0x0ec8…0ef6 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0009, t01=0x00c2}
0x0ef6…0f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00f0}
0x0f00…0f14 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0009, t01=0x00fa}
0x0f14…0f1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x010e}
0x0f1e…0f2c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0118}
0x0f2c…0f36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0126}
0x0f36…0f56 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x0130}
0x0f56…0f76 Head {h00=0x001c, h01=0x0050, text=»* DATA DEFINITIONS *«, t00=0x0009, t01=0x0150}
0x0f76…0f96 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x0170}
0x0f96…0fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0190}
0x0fa0…0fde Head {h00=0x003a, h01=0x0050, text=»* THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE«, t00=0x000a, t01=0x000a}
0x0fde…1008 Head {h00=0x0026, h01=0x0050, text=»* POSITION IN TIODM-TABLE TIODMF«, t00=0x000a, t01=0x0048}
0x1008…1012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0072}
0x1012…1026 Head {h00=0x0010, h01=0x0050, text=»ORDERS EQU *«, t00=0x000a, t01=0x007c}
0x1026…103e Head {h00=0x0014, h01=0x0050, text=»QRR EQU *-ORDERS«, t00=0x000a, t01=0x0090}
0x103e…105e Head {h00=0x001c, h01=0x0050, text=» DATA DMRDRE RANDOM READ«, t00=0x000a, t01=0x00a8}
0x105e…1076 Head {h00=0x0014, h01=0x0050, text=»QSR EQU *-ORDERS«, t00=0x000a, t01=0x00c8}
0x1076…109a Head {h00=0x0020, h01=0x0050, text=» DATA DMSQRE SEQUENTIAL READ«, t00=0x000a, t01=0x00e0}
0x109a…10b0 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000a, t01=0x0104}
0x10b0…10ca Head {h00=0x0016, h01=0x0050, text=»QIRR EQU *-ORDERS «, t00=0x000a, t01=0x011a}
0x10ca…10ea Head {h00=0x001c, h01=0x0050, text=» DATA DMIRR INDEXED READ«, t00=0x000a, t01=0x0134}
0x10ea…1104 Head {h00=0x0016, h01=0x0050, text=»QIRN EQU *-ORDERS «, t00=0x000a, t01=0x0154}
0x1104…112a Head {h00=0x0022, h01=0x0050, text=» DATA DMIRN INDEXED READ NEXT «, t00=0x000a, t01=0x016e}
0x112a…1136 (11, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0004}
0x1136…114c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000b, t01=0x0010}
0x114c…1168 Head {h00=0x0018, h01=0x0050, text=» DATA DMTERR,DMTERR «, t00=0x000b, t01=0x0026}
0x1168…1174 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0042}
0x1174…118c Head {h00=0x0014, h01=0x0050, text=»QRW EQU *-ORDERS«, t00=0x000b, t01=0x004e}
0x118c…11ae Head {h00=0x001e, h01=0x0050, text=» DATA DMRDWR RANDOM WRITE «, t00=0x000b, t01=0x0066}
0x11ae…11c6 Head {h00=0x0014, h01=0x0050, text=»QSW EQU *-ORDERS«, t00=0x000b, t01=0x0088}
0x11c6…11ec Head {h00=0x0022, h01=0x0050, text=» DATA DMSQWR SEQUENTIAL WRITE «, t00=0x000b, t01=0x00a0}
0x11ec…1202 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000b, t01=0x00c6}
0x1202…121c Head {h00=0x0016, h01=0x0050, text=»QINS EQU *-ORDERS «, t00=0x000b, t01=0x00dc}
0x121c…123e Head {h00=0x001e, h01=0x0050, text=» DATA DMINS INDEXED INSERT«, t00=0x000b, t01=0x00f6}
0x123e…124a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0118}
0x124a…1260 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000b, t01=0x0124}
0x1260…1274 Head {h00=0x0010, h01=0x0050, text=» DATA DMTERR«, t00=0x000b, t01=0x013a}
0x1274…1280 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x014e}
0x1280…129e Head {h00=0x001a, h01=0x0050, text=» DATA DMTERR RESERVED «, t00=0x000b, t01=0x015a}
0x129e…12b8 Head {h00=0x0016, h01=0x0050, text=»QREWR EQU *-ORDERS«, t00=0x000b, t01=0x0178}
0x12b8…12dc (12, 0, 400) Head {h00=0x0020, h01=0x0050, text=» DATA DMREWR RANDOM REWRITE «, t00=0x000c, t01=0x0004}
0x12dc…12f2 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000c, t01=0x0028}
0x12f2…130c Head {h00=0x0016, h01=0x0050, text=»QIRW EQU *-ORDERS «, t00=0x000c, t01=0x003e}
0x130c…1330 Head {h00=0x0020, h01=0x0050, text=» DATA DMIRW INDEXED REWRITE «, t00=0x000c, t01=0x0058}
0x1330…133c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x007c}
0x133c…1352 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000c, t01=0x0088}
0x1352…1366 Head {h00=0x0010, h01=0x0050, text=» DATA DMTERR«, t00=0x000c, t01=0x009e}
0x1366…1372 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00b2}
0x1372…138a Head {h00=0x0014, h01=0x0050, text=»QRD EQU *-ORDERS«, t00=0x000c, t01=0x00be}
0x138a…13ac Head {h00=0x001e, h01=0x0050, text=» DATA DMRDDE RANDOM DELETE«, t00=0x000c, t01=0x00d6}
0x13ac…13c2 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000c, t01=0x00f8}
0x13c2…13dc Head {h00=0x0016, h01=0x0050, text=»QDEL EQU *-ORDERS «, t00=0x000c, t01=0x010e}
0x13dc…13fe Head {h00=0x001e, h01=0x0050, text=» DATA DMDEL INDEXED DELETE«, t00=0x000c, t01=0x0128}
0x13fe…140a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x014a}
0x140a…1420 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000c, t01=0x0156}
0x1420…1434 Head {h00=0x0010, h01=0x0050, text=» DATA DMTERR«, t00=0x000c, t01=0x016c}
0x1434…1440 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0180}
0x1440…145c Head {h00=0x0018, h01=0x0050, text=»QSTDIR EQU *-ORDERS «, t00=0x000c, t01=0x018c}
0x145c…147e Head {h00=0x001e, h01=0x0050, text=» DATA DMSTDI START DIRECT «, t00=0x000d, t01=0x0018}
0x147e…1494 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000d, t01=0x003a}
0x1494…14b0 Head {h00=0x0018, h01=0x0050, text=»QSTIND EQU *-ORDERS «, t00=0x000d, t01=0x0050}
0x14b0…14d2 Head {h00=0x001e, h01=0x0050, text=» DATA DMSTIN START INDEXED«, t00=0x000d, t01=0x006c}
0x14d2…14de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x008e}
0x14de…14f4 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000d, t01=0x009a}
0x14f4…1508 Head {h00=0x0010, h01=0x0050, text=» DATA DMTERR«, t00=0x000d, t01=0x00b0}
0x1508…1514 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x00c4}
0x1514…151e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00d0}
0x151e…1556 Head {h00=0x0034, h01=0x0050, text=»* FOLLOWING LABELS ARE FOUND IN MODULE DMOPCL «, t00=0x000d, t01=0x00da}
0x1556…1560 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0112}
0x1560…157a Head {h00=0x0016, h01=0x0050, text=»QOPEN EQU *-ORDERS«, t00=0x000d, t01=0x011c}
0x157a…1594 Head {h00=0x0016, h01=0x0050, text=» DATA DMOPEN OPEN «, t00=0x000d, t01=0x0136}
0x1594…15ac Head {h00=0x0014, h01=0x0050, text=»QCL EQU *-ORDERS«, t00=0x000d, t01=0x0150}
0x15ac…15c6 Head {h00=0x0016, h01=0x0050, text=» DATA DMCLOS CLOSE«, t00=0x000d, t01=0x0168}
0x15c6…15f4 Head {h00=0x002a, h01=0x0050, text=» DATA DMTERR READ STATUS DONE IN TIODM«, t00=0x000d, t01=0x0182}
0x15f4…160e Head {h00=0x0016, h01=0x0050, text=»QRFP EQU *-ORDERS «, t00=0x000e, t01=0x0020}
0x160e…1636 Head {h00=0x0024, h01=0x0050, text=» DATA DMRFP READ FILE PARAMETERS«, t00=0x000e, t01=0x003a}
0x1636…1644 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0062}
0x1644…165a Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000e, t01=0x0070}
0x165a…1670 Head {h00=0x0012, h01=0x0050, text=»* DMTASK *«, t00=0x000e, t01=0x0086}
0x1670…1686 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000e, t01=0x009c}
0x1686…1690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00b2}
0x1690…16a4 Head {h00=0x0010, h01=0x0050, text=»DMTASK EQU *«, t00=0x000e, t01=0x00bc}
0x16a4…16ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d0}
0x16ae…16ca Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x000e, t01=0x00da}
0x16ca…16d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f6}
0x16d4…16e0 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x000e, t01=0x0100}
0x16e0…16f6 Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x000e, t01=0x010c}
0x16f6…1702 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x000e, t01=0x0122}
0x1702…171e Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x000e, t01=0x012e}
0x171e…1736 Head {h00=0x0014, h01=0x0050, text=» LD A5,FDBRRO,A6«, t00=0x000e, t01=0x014a}
0x1736…1766 Head {h00=0x002c, h01=0x0050, text=» RF(N) DMT090 FOR ORDERS XR (SEE TIODM)«, t00=0x000e, t01=0x0162}
0x1766…178c (15, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* AND RFP,OPEN,STARTINDEXED «, t00=0x000f, t01=0x0004}
0x178c…17ae Head {h00=0x001e, h01=0x0050, text=» LD A4,FDBADF,A6 DATA FILE«, t00=0x000f, t01=0x002a}
0x17ae…17dc Head {h00=0x002a, h01=0x0050, text=» CM FDBKA,A4 MARK 1ST PASS INDEXED DEL«, t00=0x000f, t01=0x004c}
0x17dc…17f0 Head {h00=0x0010, h01=0x0050, text=»DMT020 EQU *«, t00=0x000f, t01=0x007a}
0x17f0…17fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x008e}
0x17fa…183a Head {h00=0x003c, h01=0x0050, text=»* LOOP ENTRY FOR INDEXED READ,INDEXED NEXT,INDEXED DEL«, t00=0x000f, t01=0x0098}
0x183a…185a Head {h00=0x001c, h01=0x0050, text=»* START, AND SEQ READ «, t00=0x000f, t01=0x00d8}
0x185a…1864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f8}
0x1864…1882 Head {h00=0x001a, h01=0x0050, text=» LD A7,DWTOR,A1 ORDER «, t00=0x000f, t01=0x0102}
0x1882…1896 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x000f, t01=0x0120}
0x1896…18aa Head {h00=0x0010, h01=0x0050, text=» SUK A7,QSR «, t00=0x000f, t01=0x0134}
0x18aa…18d4 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SQR430 NOT SEQUENTIAL READ«, t00=0x000f, t01=0x0148}
0x18d4…18fa Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB ADDR«, t00=0x000f, t01=0x0172}
0x18fa…1904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0008}
0x1904…191c Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A9 «, t00=0x0010, t01=0x0012}
0x191c…193c Head {h00=0x001c, h01=0x0050, text=» LD A3,ECBCW+2,A9 REC NR«, t00=0x0010, t01=0x002a}
0x193c…1954 Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x0010, t01=0x004a}
0x1954…1970 Head {h00=0x0018, h01=0x0050, text=» RF(L) SQR430 NO EOF«, t00=0x0010, t01=0x0062}
0x1970…198a Head {h00=0x0016, h01=0x0050, text=» RF(G) SQR410 EOF «, t00=0x0010, t01=0x007e}
0x198a…19a4 Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x0010, t01=0x0098}
0x19a4…19c2 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SQR430 NO EOF «, t00=0x0010, t01=0x00b2}
0x19c2…19d6 Head {h00=0x0010, h01=0x0050, text=»SQR410 EQU *«, t00=0x0010, t01=0x00d0}
0x19d6…19f2 Head {h00=0x0018, h01=0x0050, text=» LDKL A1,EOFERR EOF «, t00=0x0010, t01=0x00e4}
0x19f2…1a0a Head {h00=0x0014, h01=0x0050, text=» ABL DMTERX ERR «, t00=0x0010, t01=0x0100}
0x1a0a…1a1e Head {h00=0x0010, h01=0x0050, text=»SQR430 EQU *«, t00=0x0010, t01=0x0118}
0x1a1e…1a34 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/CFFF«, t00=0x0010, t01=0x012c}
0x1a34…1a5c Head {h00=0x0024, h01=0x0050, text=» ANS A2,FDBDBR,A6 RELEASE BUFFER«, t00=0x0010, t01=0x0142}
0x1a5c…1a6e Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0010, t01=0x016a}
0x1a6e…1a8e Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0010, t01=0x017c}
0x1a8e…1ab6 Head {h00=0x0024, h01=0x0050, text=» CF A14,GTBKBU GET BLOCK BUFFER «, t00=0x0011, t01=0x000c}
0x1ab6…1ac8 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0011, t01=0x0034}
0x1ac8…1af0 Head {h00=0x0024, h01=0x0050, text=» RF(N) DMT030 NO DATA IN BUFFER «, t00=0x0011, t01=0x0046}
0x1af0…1afe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x006e}
0x1afe…1b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007c}
0x1b08…1b2e Head {h00=0x0022, h01=0x0050, text=»* DELAYED BUFFER IS WRITTEN «, t00=0x0011, t01=0x0086}
0x1b2e…1b58 Head {h00=0x0026, h01=0x0050, text=»* IF IT IS NOT THE WANTED BLOCK «, t00=0x0011, t01=0x00ac}
0x1b58…1b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00d6}
0x1b62…1b84 Head {h00=0x001e, h01=0x0050, text=» LC A7,BUFOR,A3 DELAY FLAG«, t00=0x0011, t01=0x00e0}
0x1b84…1b96 Head {h00=0x000e, h01=0x0050, text=» ANK A7,/3«, t00=0x0011, t01=0x0102}
0x1b96…1bb4 Head {h00=0x001a, h01=0x0050, text=» RF(Z) DMT080 NO DELAY«, t00=0x0011, t01=0x0114}
0x1bb4…1bce Head {h00=0x0016, h01=0x0050, text=» CM BUFOR,A3 RESET«, t00=0x0011, t01=0x0132}
0x1bce…1be0 Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x0011, t01=0x014c}
0x1be0…1c04 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DMT070 RIGHT SECTOR «, t00=0x0011, t01=0x015e}
0x1c04…1c24 Head {h00=0x001c, h01=0x0050, text=» LD A7,BUFSNR,A3 SECT NR«, t00=0x0011, t01=0x0182}
0x1c24…1c3c Head {h00=0x0014, h01=0x0050, text=» ST A7,ECBCW,A8 «, t00=0x0012, t01=0x0012}
0x1c3c…1c56 Head {h00=0x0016, h01=0x0050, text=» LD A7,BUFSNR+2,A3«, t00=0x0012, t01=0x002a}
0x1c56…1c70 Head {h00=0x0016, h01=0x0050, text=» ST A7,ECBCW+2,A8 «, t00=0x0012, t01=0x0044}
0x1c70…1c8e Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x0012, t01=0x005e}
0x1c8e…1c9a Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0012, t01=0x007c}
0x1c9a…1caa Head {h00=0x000c, h01=0x0050, text=» DATA 15«, t00=0x0012, t01=0x0088}
0x1caa…1ce2 Head {h00=0x0034, h01=0x0050, text=» CF A14,DMTIOT RET CODE CHECK AND RESET SECT NR «, t00=0x0012, t01=0x0098}
0x1ce2…1cf4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0012, t01=0x00d0}
0x1cf4…1d10 Head {h00=0x0018, h01=0x0050, text=» ABL(NZ) DMTERR ERR «, t00=0x0012, t01=0x00e2}
0x1d10…1d36 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0012, t01=0x00fe}
0x1d36…1d52 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0012, t01=0x0124}
0x1d52…1d74 Head {h00=0x001e, h01=0x0050, text=» RB DMT020 GET NEW BUFFER «, t00=0x0012, t01=0x0140}
0x1d74…1d82 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0162}
0x1d82…1d96 Head {h00=0x0010, h01=0x0050, text=»DMT030 EQU *«, t00=0x0012, t01=0x0170}
0x1d96…1db8 Head {h00=0x001e, h01=0x0050, text=»* READ BLOCK INTO BUFFER«, t00=0x0012, t01=0x0184}
0x1db8…1dc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0016}
0x1dc2…1de4 Head {h00=0x001e, h01=0x0050, text=» LDK A7,/91 PHYSICAL READ «, t00=0x0013, t01=0x0020}
0x1de4…1df0 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0013, t01=0x0042}
0x1df0…1e0e Head {h00=0x001a, h01=0x0050, text=» DATA 15 FM READ BLOCK«, t00=0x0013, t01=0x004e}
0x1e0e…1e46 Head {h00=0x0034, h01=0x0050, text=» CF A14,DMTIOT CHECK RETURN CODES FROM DISC I/O «, t00=0x0013, t01=0x006c}
0x1e46…1e58 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0013, t01=0x00a4}
0x1e58…1e70 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0013, t01=0x00b6}
0x1e70…1e88 Head {h00=0x0014, h01=0x0050, text=» LD A5,ECBBA,A8 «, t00=0x0013, t01=0x00ce}
0x1e88…1e9a Head {h00=0x000e, h01=0x0050, text=» RF DMT090«, t00=0x0013, t01=0x00e6}
0x1e9a…1ecc Head {h00=0x002e, h01=0x0050, text=»DMT070 EQU * RIGHT DELAYED BUFFER IS FOUND«, t00=0x0013, t01=0x00f8}
0x1ecc…1ee2 Head {h00=0x0012, h01=0x0050, text=» LDKL A5,/1000«, t00=0x0013, t01=0x012a}
0x1ee2…1f08 Head {h00=0x0022, h01=0x0050, text=» ORS A5,FDBDBR,A6 KEEP BUFFER «, t00=0x0013, t01=0x0140}
0x1f08…1f3c Head {h00=0x0030, h01=0x0050, text=»DMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER«, t00=0x0013, t01=0x0166}
0x1f3c…1f4e Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x0014, t01=0x000a}
0x1f4e…1f78 Head {h00=0x0026, h01=0x0050, text=» ADKL A5,BUFSTA SKIP BUFFER HEADER«, t00=0x0014, t01=0x001c}
0x1f78…1fa6 Head {h00=0x002a, h01=0x0050, text=» ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB«, t00=0x0014, t01=0x0046}
0x1fa6…1fba Head {h00=0x0010, h01=0x0050, text=»DMT090 EQU *«, t00=0x0014, t01=0x0074}
0x1fba…1fcc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0014, t01=0x0088}
0x1fcc…1fe4 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0014, t01=0x009a}
0x1fe4…2008 Head {h00=0x0020, h01=0x0050, text=»* A7 = INTERNAL ORDER CODE«, t00=0x0014, t01=0x00b2}
0x2008…201c Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x0014, t01=0x00d6}
0x201c…2048 Head {h00=0x0028, h01=0x0050, text=» ABI ORDERS,A7 DMTASK FUNCTION TABLE«, t00=0x0014, t01=0x00ea}
0x2048…205c Head {h00=0x0010, h01=0x0050, text=»* A1 = A6 «, t00=0x0014, t01=0x0116}
0x205c…2082 Head {h00=0x0022, h01=0x0050, text=»* (A3= BLOCK BUFFER ADDRESS )«, t00=0x0014, t01=0x012a}
0x2082…20a2 Head {h00=0x001c, h01=0x0050, text=»* (A5 = BLOCK ADDRESS )«, t00=0x0014, t01=0x0150}
0x20a2…20ca Head {h00=0x0024, h01=0x0050, text=»* A6 = FDB ADDRESS ALL ORDERS «, t00=0x0014, t01=0x0170}
0x20ca…20f0 Head {h00=0x0022, h01=0x0050, text=»* A7 = ORDER CODE ALL ORDERS«, t00=0x0015, t01=0x0008}
0x20f0…2112 Head {h00=0x001e, h01=0x0050, text=»* (A8 = FDBECB ADDRESS ) «, t00=0x0015, t01=0x002e}
0x2112…2136 Head {h00=0x0020, h01=0x0050, text=»* (A9 = USER ECB ADDRESS ) «, t00=0x0015, t01=0x0050}
0x2136…2144 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0074}
0x2144…2168 Head {h00=0x0020, h01=0x0050, text=»DMSQRE EQU * SEQUENTIAL READ«, t00=0x0015, t01=0x0082}
0x2168…2172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a6}
0x2172…2192 Head {h00=0x001c, h01=0x0050, text=»DMRDRE EQU * RANDOM READ«, t00=0x0015, t01=0x00b0}
0x2192…219c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d0}
0x219c…21be Head {h00=0x001e, h01=0x0050, text=»DMSTDI EQU * START DIRECT «, t00=0x0015, t01=0x00da}
0x21be…21c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00fc}
0x21c8…21e0 Head {h00=0x0014, h01=0x0050, text=»* CHECK STATUS«, t00=0x0015, t01=0x0106}
0x21e0…21ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011e}
0x21ea…2202 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBRRO,A6«, t00=0x0015, t01=0x0128}
0x2202…221a Head {h00=0x0014, h01=0x0050, text=» AD A2,FDBRLE,A6«, t00=0x0015, t01=0x0140}
0x221a…222c Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x0015, t01=0x0158}
0x222c…223e Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0015, t01=0x016a}
0x223e…2262 Head {h00=0x0020, h01=0x0050, text=» CCR A1,A2 STATUS BYTE IN A1«, t00=0x0015, t01=0x017c}
0x2262…227e Head {h00=0x0018, h01=0x0050, text=» RF(NE) DMT200 USED «, t00=0x0016, t01=0x0010}
0x227e…2292 Head {h00=0x0010, h01=0x0050, text=» CWK A7,QRR «, t00=0x0016, t01=0x002c}
0x2292…22b4 Head {h00=0x001e, h01=0x0050, text=» RF(E) DMT190 RANDOM READ «, t00=0x0016, t01=0x0040}
0x22b4…22ca Head {h00=0x0012, h01=0x0050, text=» CWK A7,QSTDIR«, t00=0x0016, t01=0x0062}
0x22ca…22ea Head {h00=0x001c, h01=0x0050, text=» RF(NE) DMT250 NOT START«, t00=0x0016, t01=0x0078}
0x22ea…2304 Head {h00=0x0016, h01=0x0050, text=» LC A1,DWTOPT,A6 «, t00=0x0016, t01=0x0098}
0x2304…231c Head {h00=0x0014, h01=0x0050, text=» ANK A1,7 OPTION«, t00=0x0016, t01=0x00b2}
0x231c…233c Head {h00=0x001c, h01=0x0050, text=» RF(NZ) DMT250 NOT EQUAL«, t00=0x0016, t01=0x00ca}
0x233c…2358 Head {h00=0x0018, h01=0x0050, text=» RF DMT230 EQUAL =2 «, t00=0x0016, t01=0x00ea}
0x2358…236c Head {h00=0x0010, h01=0x0050, text=»DMT190 EQU *«, t00=0x0016, t01=0x0106}
0x236c…238c Head {h00=0x001c, h01=0x0050, text=» LDKL A1,NODERR NO DATA «, t00=0x0016, t01=0x011a}
0x238c…23a0 Head {h00=0x0010, h01=0x0050, text=» ABL DMTERR «, t00=0x0016, t01=0x013a}
0x23a0…23ae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x014e}
0x23ae…23c2 Head {h00=0x0010, h01=0x0050, text=»DMT200 EQU *«, t00=0x0016, t01=0x015c}
0x23c2…23d8 Head {h00=0x0012, h01=0x0050, text=» SUK A7,QSTDIR«, t00=0x0016, t01=0x0170}
0x23d8…23f4 Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMT230 START «, t00=0x0016, t01=0x0186}
0x23f4…2414 Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBRL,A9 REQ LGTH«, t00=0x0017, t01=0x0012}
0x2414…2438 Head {h00=0x0020, h01=0x0050, text=» CW A2,FDBRLE,A6 RECORD LGTH«, t00=0x0017, t01=0x0032}
0x2438…244e Head {h00=0x0012, h01=0x0050, text=» RF(NG) DMT220«, t00=0x0017, t01=0x0056}
0x244e…2470 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBRLE,A6 MAX LGTH «, t00=0x0017, t01=0x006c}
0x2470…249a Head {h00=0x0026, h01=0x0050, text=»DMT220 ST A2,ECBEL,A9 SET EFF LGTH«, t00=0x0017, t01=0x008e}
0x249a…24a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b8}
0x24a4…24c0 Head {h00=0x0018, h01=0x0050, text=»* MOVE THE RECORD «, t00=0x0017, t01=0x00c2}
0x24c0…24ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00de}
0x24ca…24e0 Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTREM«, t00=0x0017, t01=0x00e8}
0x24e0…24ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00fe}
0x24ea…251e Head {h00=0x0030, h01=0x0050, text=»* UPDATE CRN AND SET EXCLUSIVE ACCESS BIT «, t00=0x0017, t01=0x0108}
0x251e…2532 Head {h00=0x0010, h01=0x0050, text=»DMT230 EQU *«, t00=0x0017, t01=0x013c}
0x2532…2554 Head {h00=0x001e, h01=0x0050, text=» ABL DMT400 PUT CRN AND EA«, t00=0x0017, t01=0x0150}
0x2554…2562 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0172}
0x2562…258a Head {h00=0x0024, h01=0x0050, text=»DMT250 EQU * NO DATA AT SEQ READ«, t00=0x0017, t01=0x0180}
0x258a…2594 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0018}
0x2594…25b0 Head {h00=0x0018, h01=0x0050, text=»* GET NEXT RECORD «, t00=0x0018, t01=0x0022}
0x25b0…25ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x003e}
0x25ba…25da Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBCW+2,A9 REC NR«, t00=0x0018, t01=0x0048}
0x25da…25ec Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0018, t01=0x0068}
0x25ec…260a Head {h00=0x001a, h01=0x0050, text=» RF(O) DMT260 OVERFLOW«, t00=0x0018, t01=0x007a}
0x260a…261c Head {h00=0x000e, h01=0x0050, text=» RF DMT270«, t00=0x0018, t01=0x0098}
0x261c…2638 Head {h00=0x0018, h01=0x0050, text=»DMT260 ANKL A2,/7FFF«, t00=0x0018, t01=0x00aa}
0x2638…2652 Head {h00=0x0016, h01=0x0050, text=» IM ECBCW,A9 CARRY«, t00=0x0018, t01=0x00c6}
0x2652…2672 Head {h00=0x001c, h01=0x0050, text=»DMT270 ST A2,ECBCW+2,A9 «, t00=0x0018, t01=0x00e0}
0x2672…2686 Head {h00=0x0010, h01=0x0050, text=»DMT280 EQU *«, t00=0x0018, t01=0x0100}
0x2686…2690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0114}
0x2690…26a4 Head {h00=0x0010, h01=0x0050, text=»* CHECK EA«, t00=0x0018, t01=0x011e}
0x26a4…26ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0132}
0x26ae…26ca Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0018, t01=0x013c}
0x26ca…26e2 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A9 «, t00=0x0018, t01=0x0158}
0x26e2…2702 Head {h00=0x001c, h01=0x0050, text=» LD A3,ECBCW+2,A9 REC NR«, t00=0x0018, t01=0x0170}
0x2702…2718 Head {h00=0x0012, h01=0x0050, text=» CF A14,EATEST«, t00=0x0018, t01=0x0190}
0x2718…272c Head {h00=0x0010, h01=0x0050, text=» LDR A4,A4 «, t00=0x0019, t01=0x0016}
0x272c…2750 Head {h00=0x0020, h01=0x0050, text=» ABL(N) DMEAER PROTECT ERROR«, t00=0x0019, t01=0x002a}
0x2750…2766 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0019, t01=0x004e}
0x2766…2784 Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTOR,A6 ORDER «, t00=0x0019, t01=0x0064}
0x2784…2798 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/3F «, t00=0x0019, t01=0x0082}
0x2798…27ae Head {h00=0x0012, h01=0x0050, text=» CWK A4,QSTIND«, t00=0x0019, t01=0x0096}
0x27ae…27d2 Head {h00=0x0020, h01=0x0050, text=» ABL(E) DMT400 START INDEXED«, t00=0x0019, t01=0x00ac}
0x27d2…27de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00d0}
0x27de…27f0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0019, t01=0x00dc}
0x27f0…280a Head {h00=0x0016, h01=0x0050, text=» LDR A2,A3 REC NR «, t00=0x0019, t01=0x00ee}
0x280a…2818 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0108}
0x2818…282c Head {h00=0x0010, h01=0x0050, text=» LDR A10,A8 «, t00=0x0019, t01=0x0116}
0x282c…284a Head {h00=0x001a, h01=0x0050, text=» CF A14,CALSNO PREP IO«, t00=0x0019, t01=0x012a}
0x284a…285e Head {h00=0x0010, h01=0x0050, text=» LDR A8,A10 «, t00=0x0019, t01=0x0148}
0x285e…2870 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0019, t01=0x015c}
0x2870…2896 Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) DMTERR OUT OF MEDIUM «, t00=0x0019, t01=0x016e}
0x2896…28b4 (26, 0, 400) Head {h00=0x001a, h01=0x0050, text=» LDR A1,A6 FDB ADDRESS«, t00=0x001a, t01=0x0004}
0x28b4…28d2 Head {h00=0x001a, h01=0x0050, text=» LC A3,FDBDBR,A6 DELAY«, t00=0x001a, t01=0x0022}
0x28d2…28e6 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x001a, t01=0x0040}
0x28e6…2908 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DMT295 KEEP BUFFER«, t00=0x001a, t01=0x0054}
0x2908…2920 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x001a, t01=0x0076}
0x2920…2944 Head {h00=0x0020, h01=0x0050, text=» SUKL A3,BUFSTA BUFFER ADDR «, t00=0x001a, t01=0x008e}
0x2944…294e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00b2}
0x294e…296e Head {h00=0x001c, h01=0x0050, text=»* RELEASE BLOCK BUFFER«, t00=0x001a, t01=0x00bc}
0x296e…2978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00dc}
0x2978…298e Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTRBU«, t00=0x001a, t01=0x00e6}
0x298e…29a2 Head {h00=0x0010, h01=0x0050, text=»DMT295 EQU *«, t00=0x001a, t01=0x00fc}
0x29a2…29c2 Head {h00=0x001c, h01=0x0050, text=» ABL DMT020 NEXT RECORD «, t00=0x001a, t01=0x0110}
0x29c2…29d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0130}
0x29d0…29f6 Head {h00=0x0022, h01=0x0050, text=»DMSQWR EQU * SEQUENTIAL WRITE «, t00=0x001a, t01=0x013e}
0x29f6…2a00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0164}
0x2a00…2a22 Head {h00=0x001e, h01=0x0050, text=»DMRDWR EQU * RANDOM WRITE «, t00=0x001a, t01=0x016e}
0x2a22…2a2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0190}
0x2a2c…2a50 Head {h00=0x0020, h01=0x0050, text=»DMREWR EQU * RANDOM REWRITE «, t00=0x001b, t01=0x000a}
0x2a50…2a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x002e}
0x2a5a…2a7c Head {h00=0x001e, h01=0x0050, text=»DMRDDE EQU * RANDOM DELETE«, t00=0x001b, t01=0x0038}
0x2a7c…2a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x005a}
0x2a86…2aa8 Head {h00=0x001e, h01=0x0050, text=»DMINS EQU * INDEXED INSERT«, t00=0x001b, t01=0x0064}
0x2aa8…2ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0086}
0x2ab2…2ad4 Head {h00=0x001e, h01=0x0050, text=»DMDEL EQU * INDEXED DELETE«, t00=0x001b, t01=0x0090}
0x2ad4…2ade Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00b2}
0x2ade…2b02 Head {h00=0x0020, h01=0x0050, text=»DMIRW EQU * INDEXED REWRITE «, t00=0x001b, t01=0x00bc}
0x2b02…2b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00e0}
0x2b0c…2b24 Head {h00=0x0014, h01=0x0050, text=»* TEST STATUS «, t00=0x001b, t01=0x00ea}
0x2b24…2b3e Head {h00=0x0016, h01=0x0050, text=» LD A10,FDBRRO,A6 «, t00=0x001b, t01=0x0102}
0x2b3e…2b58 Head {h00=0x0016, h01=0x0050, text=» AD A10,FDBRLE,A6 «, t00=0x001b, t01=0x011c}
0x2b58…2b80 Head {h00=0x0024, h01=0x0050, text=» ADR A10,A5 STATUS BYTE ADDRESS «, t00=0x001b, t01=0x0136}
0x2b80…2ba0 Head {h00=0x001c, h01=0x0050, text=» LDR A11,A5 BUFFER ADDR «, t00=0x001b, t01=0x015e}
0x2ba0…2bb8 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A9 «, t00=0x001b, t01=0x017e}
0x2bb8…2bdc Head {h00=0x0020, h01=0x0050, text=» LD A3,ECBCW+2,A9 LOG REC NR«, t00=0x001c, t01=0x0008}
0x2bdc…2bee Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x001c, t01=0x002c}
0x2bee…2c02 Head {h00=0x0010, h01=0x0050, text=» CCR A4,A10 «, t00=0x001c, t01=0x003e}
0x2c02…2c1c Head {h00=0x0016, h01=0x0050, text=» RF(E) DMS010 FREE«, t00=0x001c, t01=0x0052}
0x2c1c…2c32 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001c, t01=0x006c}
0x2c32…2c44 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001c, t01=0x0082}
0x2c44…2c58 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QINS«, t00=0x001c, t01=0x0094}
0x2c58…2c7c Head {h00=0x0020, h01=0x0050, text=» RF(E) DMS008 INDEXED INSERT«, t00=0x001c, t01=0x00a8}
0x2c7c…2c88 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00cc}
0x2c88…2c9a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001c, t01=0x00d8}
0x2c9a…2cae Head {h00=0x0010, h01=0x0050, text=» SUK A4,QRW «, t00=0x001c, t01=0x00ea}
0x2cae…2cd0 Head {h00=0x001e, h01=0x0050, text=» RF(E) DMS008 DIRECT WRITE«, t00=0x001c, t01=0x00fe}
0x2cd0…2ce2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001c, t01=0x0120}
0x2ce2…2cf6 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QSW «, t00=0x001c, t01=0x0132}
0x2cf6…2d1a Head {h00=0x0020, h01=0x0050, text=» RF(NE) DMS020 NOT SEQ WRITE«, t00=0x001c, t01=0x0146}
0x2d1a…2d2e Head {h00=0x0010, h01=0x0050, text=»DMS008 EQU *«, t00=0x001c, t01=0x016a}
0x2d2e…2d4e Head {h00=0x001c, h01=0x0050, text=» LDKL A1,PROT PROTECTED «, t00=0x001c, t01=0x017e}
0x2d4e…2d60 Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x001d, t01=0x000e}
0x2d60…2d74 Head {h00=0x0010, h01=0x0050, text=»DMS010 EQU *«, t00=0x001d, t01=0x0020}
0x2d74…2d8a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001d, t01=0x0034}
0x2d8a…2d9c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x004a}
0x2d9c…2db0 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QIRW«, t00=0x001d, t01=0x005c}
0x2db0…2dd6 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DMERND INDEXED REWRITE «, t00=0x001d, t01=0x0070}
0x2dd6…2de8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x0096}
0x2de8…2dfc Head {h00=0x0010, h01=0x0050, text=» SUK A4,QDEL«, t00=0x001d, t01=0x00a8}
0x2dfc…2e20 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMERND INDEXED DELETE«, t00=0x001d, t01=0x00bc}
0x2e20…2e2c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00e0}
0x2e2c…2e3e Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x00ec}
0x2e3e…2e54 Head {h00=0x0012, h01=0x0050, text=» SUK A4,QREWR «, t00=0x001d, t01=0x00fe}
0x2e54…2e78 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMERND RANDOM REWRITE«, t00=0x001d, t01=0x0114}
0x2e78…2e8a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x0138}
0x2e8a…2e9e Head {h00=0x0010, h01=0x0050, text=» SUK A4,QRD «, t00=0x001d, t01=0x014a}
0x2e9e…2ec2 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMERND RANDOM DELETE «, t00=0x001d, t01=0x015e}
0x2ec2…2ed6 Head {h00=0x0010, h01=0x0050, text=»DMS020 EQU *«, t00=0x001d, t01=0x0182}
0x2ed6…2eec Head {h00=0x0012, h01=0x0050, text=» CF A14,EATEST«, t00=0x001e, t01=0x0008}
0x2eec…2f08 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 RTN CODE «, t00=0x001e, t01=0x001e}
0x2f08…2f2c Head {h00=0x0020, h01=0x0050, text=» RF(N) DMEAER EA OTHER TASK «, t00=0x001e, t01=0x003a}
0x2f2c…2f40 Head {h00=0x0010, h01=0x0050, text=»DMS100 EQU *«, t00=0x001e, t01=0x005e}
0x2f40…2f5e Head {h00=0x001a, h01=0x0050, text=» LDK A3,0 STATUS FREE «, t00=0x001e, t01=0x0072}
0x2f5e…2f74 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001e, t01=0x0090}
0x2f74…2f86 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x001e, t01=0x00a6}
0x2f86…2f9a Head {h00=0x0010, h01=0x0050, text=» SUK A2,QIRW«, t00=0x001e, t01=0x00b8}
0x2f9a…2fc0 Head {h00=0x0022, h01=0x0050, text=» RF(E) CHK010 INDEXED REWRITE «, t00=0x001e, t01=0x00cc}
0x2fc0…2fd2 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x001e, t01=0x00f2}
0x2fd2…2fe6 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QINS«, t00=0x001e, t01=0x0104}
0x2fe6…300a Head {h00=0x0020, h01=0x0050, text=» RF(E) CHK010 INDEXED INSERT«, t00=0x001e, t01=0x0118}
0x300a…3022 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBKA,A6 «, t00=0x001e, t01=0x013c}
0x3022…3052 Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) DMT350 SECOND PASS INDEXED DEL «, t00=0x001e, t01=0x0154}
0x3052…3064 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x001e, t01=0x0184}
0x3064…3078 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QDEL«, t00=0x001f, t01=0x0008}
0x3078…309c Head {h00=0x0020, h01=0x0050, text=» RF(E) CHK010 INDEXED DELETE«, t00=0x001f, t01=0x001c}
0x309c…30a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0040}
0x30a8…30ba Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x001f, t01=0x004c}
0x30ba…30ce Head {h00=0x0010, h01=0x0050, text=» SUK A2,QRD «, t00=0x001f, t01=0x005e}
0x30ce…30f2 Head {h00=0x0020, h01=0x0050, text=» ABL(E) DMT350 RANDOM DELETE«, t00=0x001f, t01=0x0072}
0x30f2…3104 Head {h00=0x000e, h01=0x0050, text=» RF DMT310«, t00=0x001f, t01=0x0096}
0x3104…311a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001f, t01=0x00a8}
0x311a…3128 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x00be}
0x3128…313c Head {h00=0x0010, h01=0x0050, text=»CHK010 EQU *«, t00=0x001f, t01=0x00cc}
0x313c…3186 Head {h00=0x0046, h01=0x0050, text=»* INDEXED REWRITE,INDEXED INSERT AND INDEXED DELETE ENTERS HERE «, t00=0x001f, t01=0x00e0}
0x3186…3190 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x012a}
0x3190…31c0 Head {h00=0x002c, h01=0x0050, text=»* COMPARE KEYS IN FILE AND USER BUFFER«, t00=0x001f, t01=0x0134}
0x31c0…31ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0164}
0x31ca…31e8 Head {h00=0x001a, h01=0x0050, text=» LDK A5,8 MAX 4 INDEX «, t00=0x001f, t01=0x016e}
0x31e8…31fc Head {h00=0x0010, h01=0x0050, text=»CHK040 EQU *«, t00=0x001f, t01=0x018c}
0x31fc…320e Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0020, t01=0x0010}
0x320e…3236 Head {h00=0x0024, h01=0x0050, text=» RF(N) CHK100 ALL INDEX CHECKED «, t00=0x0020, t01=0x0022}
0x3236…3250 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A1 FDB ADD«, t00=0x0020, t01=0x004a}
0x3250…3262 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x0020, t01=0x0064}
0x3262…328e Head {h00=0x0028, h01=0x0050, text=» LD A6,FDBAI1,A2 FDB ADDR INDEX FILE«, t00=0x0020, t01=0x0076}
0x328e…32ac Head {h00=0x001a, h01=0x0050, text=» RB(Z) CHK040 NO INDEX«, t00=0x0020, t01=0x00a2}
0x32ac…32c4 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTOR,A1 «, t00=0x0020, t01=0x00c0}
0x32c4…32e4 Head {h00=0x001c, h01=0x0050, text=» ANK A2,/3F ORDER INDEX «, t00=0x0020, t01=0x00d8}
0x32e4…32f8 Head {h00=0x0010, h01=0x0050, text=» CWK A2,QINS«, t00=0x0020, t01=0x00f8}
0x32f8…3320 Head {h00=0x0024, h01=0x0050, text=» RB(E) CHK040 NO CHECK ON INSERT«, t00=0x0020, t01=0x010c}
0x3320…3334 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QIRW«, t00=0x0020, t01=0x0134}
0x3334…3358 Head {h00=0x0020, h01=0x0050, text=» RF(Z) CHK050 CHECK REWRITE «, t00=0x0020, t01=0x0148}
0x3358…3378 Head {h00=0x001c, h01=0x0050, text=» LC A2,DWTOPT,A1 OPTION «, t00=0x0020, t01=0x016c}
0x3378…338a Head {h00=0x000e, h01=0x0050, text=» ANK A2,/4«, t00=0x0020, t01=0x018c}
0x338a…33b8 Head {h00=0x002a, h01=0x0050, text=» RB(NZ) CHK040 NO CHECK ON DEL CURRENT«, t00=0x0021, t01=0x000e}
0x33b8…33cc Head {h00=0x0010, h01=0x0050, text=»CHK050 EQU *«, t00=0x0021, t01=0x003c}
0x33cc…33d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0050}
0x33d6…33ec Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0021, t01=0x005a}
0x33ec…3406 Head {h00=0x0016, h01=0x0050, text=» LDR A7,A1 SAVE A1«, t00=0x0021, t01=0x0070}
0x3406…3434 Head {h00=0x002a, h01=0x0050, text=» LD A1,FDBKA,A6 GET KEY START ADDRESS «, t00=0x0021, t01=0x008a}
0x3434…344c Head {h00=0x0014, h01=0x0050, text=» AD A1,ECBBA,A9 «, t00=0x0021, t01=0x00b8}
0x344c…3482 Head {h00=0x0032, h01=0x0050, text=» LDKL A2,FDBKEY GET KEY SAVE AREA DISPLACEMENT«, t00=0x0021, t01=0x00d0}
0x3482…34a4 Head {h00=0x001e, h01=0x0050, text=» ADR A2,A6 ADD FDB ADDRESS«, t00=0x0021, t01=0x0106}
0x34a4…34c0 Head {h00=0x0018, h01=0x0050, text=» LDR A13,A2 SAVE A2 «, t00=0x0021, t01=0x0128}
0x34c0…34e6 Head {h00=0x0022, h01=0x0050, text=» LD A3,FDBRLE,A6 RECORD LENGTH«, t00=0x0021, t01=0x0144}
0x34e6…3502 Head {h00=0x0018, h01=0x0050, text=» SUK A3,6 KEY LENGTH«, t00=0x0021, t01=0x016a}
0x3502…352c Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTAB,A7 GET TTAB ADDRESS «, t00=0x0021, t01=0x0186}
0x352c…355c Head {h00=0x002c, h01=0x0050, text=» CF A14,MOV:US MOVE KEY TO FDB KEY AREA «, t00=0x0022, t01=0x0020}
0x355c…357a Head {h00=0x001a, h01=0x0050, text=» LDR A1,A7 RESTORE A1 «, t00=0x0022, t01=0x0050}
0x357a…3598 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A13 RESTORE A2«, t00=0x0022, t01=0x006e}
0x3598…35c6 Head {h00=0x002a, h01=0x0050, text=» LD A3,FDBKA,A6 GET KEY START ADDRESS «, t00=0x0022, t01=0x008c}
0x35c6…35d2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00ba}
0x35d2…35dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00c6}
0x35dc…35f2 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0022, t01=0x00d0}
0x35f2…3608 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0022, t01=0x00e6}
0x3608…362e Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBKA,A6 KEY START ADDR«, t00=0x0022, t01=0x00fc}
0x362e…3640 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0022, t01=0x0122}
0x3640…3666 Head {h00=0x0022, h01=0x0050, text=» AD A2,ECBBA,A9 KEY IN BUFFER «, t00=0x0022, t01=0x0134}
0x3666…3672 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x015a}
0x3672…367c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0166}
0x367c…3692 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0022, t01=0x0170}
0x3692…36aa Head {h00=0x0014, h01=0x0050, text=» AD A3,FDBRRO,A1«, t00=0x0022, t01=0x0186}
0x36aa…36ca Head {h00=0x001c, h01=0x0050, text=» ADR A3,A11 KEY IN FILE «, t00=0x0023, t01=0x000e}
0x36ca…36dc Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0023, t01=0x002e}
0x36dc…3702 Head {h00=0x0022, h01=0x0050, text=» LD A6,FDBRLE,A6 RECORD LENGTH«, t00=0x0023, t01=0x0040}
0x3702…371e Head {h00=0x0018, h01=0x0050, text=» SUK A6,6 KEY LENGTH«, t00=0x0023, t01=0x0066}
0x371e…3742 Head {h00=0x0020, h01=0x0050, text=» CF A14,CHKKEY COMPARE KEYS «, t00=0x0023, t01=0x0082}
0x3742…3754 Head {h00=0x000e, h01=0x0050, text=» CWR A6,A7«, t00=0x0023, t01=0x00a6}
0x3754…3782 Head {h00=0x002a, h01=0x0050, text=» RB(E) CHK040 KEY UNCHANGED CHECK NEXT«, t00=0x0023, t01=0x00b8}
0x3782…379e Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0023, t01=0x00e6}
0x379e…37c2 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,PROT KEY NOT FOUND «, t00=0x0023, t01=0x0102}
0x37c2…37d4 Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x0023, t01=0x0126}
0x37d4…37e8 Head {h00=0x0010, h01=0x0050, text=»CHK100 EQU *«, t00=0x0023, t01=0x0138}
0x37e8…3804 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0023, t01=0x014c}
0x3804…381c Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0023, t01=0x0168}
0x381c…383c Head {h00=0x001c, h01=0x0050, text=» ANK A7,/3F ORDER INDEX «, t00=0x0023, t01=0x0180}
0x383c…384e Head {h00=0x000e, h01=0x0050, text=» RF DMT310«, t00=0x0024, t01=0x0010}
0x384e…385a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0022}
0x385a…3868 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x002e}
0x3868…388e Head {h00=0x0022, h01=0x0050, text=»DMERND LDKL A1,NODERR NO DATA «, t00=0x0024, t01=0x003c}
0x388e…38a0 Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x0024, t01=0x0062}
0x38a0…38ce Head {h00=0x002a, h01=0x0050, text=»DMEAER EQU * RELEASE EA FOR ALL FILES «, t00=0x0024, t01=0x0074}
0x38ce…38e0 Head {h00=0x000e, h01=0x0050, text=» SUR A9,A9«, t00=0x0024, t01=0x00a2}
0x38e0…3906 Head {h00=0x0022, h01=0x0050, text=» LC A9,FDBTNR,A6 USER TASK ID «, t00=0x0024, t01=0x00b4}
0x3906…392c Head {h00=0x0022, h01=0x0050, text=» CF A14,RELPRO RELEASE PROTECT«, t00=0x0024, t01=0x00da}
0x392c…3950 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,PROERR PROTECT ERR «, t00=0x0024, t01=0x0100}
0x3950…3968 Head {h00=0x0014, h01=0x0050, text=»DMERR ABL DMTERR«, t00=0x0024, t01=0x0124}
0x3968…3976 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x013c}
0x3976…3980 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x014a}
0x3980…3998 Head {h00=0x0014, h01=0x0050, text=»* MOVE RECORD «, t00=0x0024, t01=0x0154}
0x3998…39a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x016c}
0x39a2…39b6 Head {h00=0x0010, h01=0x0050, text=»DMT310 EQU *«, t00=0x0024, t01=0x0176}
0x39b6…39cc Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0024, t01=0x018a}
0x39cc…39e0 Head {h00=0x0010, h01=0x0050, text=» CWK A7,QDEL«, t00=0x0025, t01=0x0010}
0x39e0…3a04 Head {h00=0x0020, h01=0x0050, text=» RF(NE) DMT313 NOT INDEX DEL«, t00=0x0025, t01=0x0024}
0x3a04…3a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0048}
0x3a0e…3a34 Head {h00=0x0022, h01=0x0050, text=»* MOVE KEYS TO FDB KEY AREAS«, t00=0x0025, t01=0x0052}
0x3a34…3a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0078}
0x3a3e…3a50 Head {h00=0x000e, h01=0x0050, text=» LDK A5,8 «, t00=0x0025, t01=0x0082}
0x3a50…3a64 Head {h00=0x0010, h01=0x0050, text=»IXINS3 EQU *«, t00=0x0025, t01=0x0094}
0x3a64…3a80 Head {h00=0x0018, h01=0x0050, text=» LDR A2,A6 FDB DATA «, t00=0x0025, t01=0x00a8}
0x3a80…3a92 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x0025, t01=0x00c4}
0x3a92…3ab4 Head {h00=0x001e, h01=0x0050, text=» LD A3,FDBADF,A2 FDB INDEX«, t00=0x0025, t01=0x00d6}
0x3ab4…3ad2 Head {h00=0x001a, h01=0x0050, text=» RF(Z) IXINS4 NO INDEX«, t00=0x0025, t01=0x00f8}
0x3ad2…3af2 Head {h00=0x001c, h01=0x0050, text=» LD A1,FDBKA,A3 KEY ADDR«, t00=0x0025, t01=0x0116}
0x3af2…3b14 Head {h00=0x001e, h01=0x0050, text=» AD A1,FDBRRO,A6 REC OFFS «, t00=0x0025, t01=0x0136}
0x3b14…3b42 Head {h00=0x002a, h01=0x0050, text=» ADR A1,A11 BUFFERADDR GIVES KEY ADDR «, t00=0x0025, t01=0x0158}
0x3b42…3b64 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBRLE,A3 REC LGTH «, t00=0x0025, t01=0x0186}
0x3b64…3b7e Head {h00=0x0016, h01=0x0050, text=» SUK A2,6 KEY LGTH«, t00=0x0026, t01=0x0018}
0x3b7e…3b9e Head {h00=0x001c, h01=0x0050, text=» ADKL A3,FDBKEY TO ADDR «, t00=0x0026, t01=0x0032}
0x3b9e…3bc4 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTBM KEY TO FDB AREA «, t00=0x0026, t01=0x0052}
0x3bc4…3bd8 Head {h00=0x0010, h01=0x0050, text=»IXINS4 EQU *«, t00=0x0026, t01=0x0078}
0x3bd8…3bea Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0026, t01=0x008c}
0x3bea…3c0c Head {h00=0x001e, h01=0x0050, text=» RB(NZ) IXINS3 MORE INDEXS«, t00=0x0026, t01=0x009e}
0x3c0c…3c2c Head {h00=0x001c, h01=0x0050, text=» ABL DMXDEL INDEXED DEL «, t00=0x0026, t01=0x00c0}
0x3c2c…3c40 Head {h00=0x0010, h01=0x0050, text=»DMT313 EQU *«, t00=0x0026, t01=0x00e0}
0x3c40…3c4c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x00f4}
0x3c4c…3c72 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRLE,A6 RECORD LENGTH«, t00=0x0026, t01=0x0100}
0x3c72…3c8a Head {h00=0x0014, h01=0x0050, text=» LD A3,FDBRRO,A6«, t00=0x0026, t01=0x0126}
0x3c8a…3ca8 Head {h00=0x001a, h01=0x0050, text=» ADR A3,A11 TO ADDRESS«, t00=0x0026, t01=0x013e}
0x3ca8…3cba Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0026, t01=0x015c}
0x3cba…3cde Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBBA,A9 FROM ADDRESS«, t00=0x0026, t01=0x016e}
0x3cde…3ce8 (39, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0004}
0x3ce8…3cfe Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0027, t01=0x000e}
0x3cfe…3d10 Head {h00=0x000e, h01=0x0050, text=» XRR A4,A1«, t00=0x0027, t01=0x0024}
0x3d10…3d24 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x0027, t01=0x0036}
0x3d24…3d50 Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT320 BOTH ODD OR BOTH EVEN «, t00=0x0027, t01=0x004a}
0x3d50…3d7a Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTBM ONE ODD AND ONE EVEN«, t00=0x0027, t01=0x0076}
0x3d7a…3d8c Head {h00=0x000e, h01=0x0050, text=» RF DMT340«, t00=0x0027, t01=0x00a0}
0x3d8c…3d96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b2}
0x3d96…3dae Head {h00=0x0014, h01=0x0050, text=»DMT320 LDR A4,A3«, t00=0x0027, t01=0x00bc}
0x3dae…3dc2 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x0027, t01=0x00d4}
0x3dc2…3de2 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT330 BOTH EVEN «, t00=0x0027, t01=0x00e8}
0x3de2…3dfc Head {h00=0x0016, h01=0x0050, text=» SUK A2,1 BOTH ODD«, t00=0x0027, t01=0x0108}
0x3dfc…3e0e Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0027, t01=0x0122}
0x3e0e…3e20 Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0027, t01=0x0134}
0x3e20…3e32 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0027, t01=0x0146}
0x3e32…3e44 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0027, t01=0x0158}
0x3e44…3e6a Head {h00=0x0022, h01=0x0050, text=»DMT330 CF A14,DMTWM WORD MOVE «, t00=0x0027, t01=0x016a}
0x3e6a…3e74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0190}
0x3e74…3e80 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x000a}
0x3e80…3e8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0016}
0x3e8a…3ea0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0028, t01=0x0020}
0x3ea0…3ebe Head {h00=0x001a, h01=0x0050, text=» LDR A3,A2 GET LENGTH «, t00=0x0028, t01=0x0036}
0x3ebe…3eee Head {h00=0x002c, h01=0x0050, text=» LDR A2,A4 GET RECEIVING BUFFER ADDRESS «, t00=0x0028, t01=0x0054}
0x3eee…3f18 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTAB,A6 GET TTAB ADDRESS «, t00=0x0028, t01=0x0084}
0x3f18…3f54 Head {h00=0x0038, h01=0x0050, text=» CF A14,MOV:US MOVE RECORD FROM USER TO SYSTEM AREA «, t00=0x0028, t01=0x00ae}
0x3f54…3f60 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00ea}
0x3f60…3f6e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x00f6}
0x3f6e…3f78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0104}
0x3f78…3f8c Head {h00=0x0010, h01=0x0050, text=»DMT340 EQU *«, t00=0x0028, t01=0x010e}
0x3f8c…3f96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0122}
0x3f96…3fb2 Head {h00=0x0018, h01=0x0050, text=»* SET STATUS USED «, t00=0x0028, t01=0x012c}
0x3fb2…3fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0148}
0x3fbc…3fd0 Head {h00=0x0010, h01=0x0050, text=» LDK A3,/FF «, t00=0x0028, t01=0x0152}
0x3fd0…3fea Head {h00=0x0016, h01=0x0050, text=»DMT350 SCR A3,A10 «, t00=0x0028, t01=0x0166}
0x3fea…4002 Head {h00=0x0014, h01=0x0050, text=» LD A3,FDBDBR,A6«, t00=0x0028, t01=0x0180}
0x4002…4026 Head {h00=0x0020, h01=0x0050, text=» RF(N) DMT390 DELAY NO WRITE«, t00=0x0029, t01=0x0008}
0x4026…4048 Head {h00=0x001e, h01=0x0050, text=» LDK A7,/95 PHYSICAL WRITE«, t00=0x0029, t01=0x002c}
0x4048…4052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x004e}
0x4052…4072 Head {h00=0x001c, h01=0x0050, text=»* WRITE BLOCK TO DISC «, t00=0x0029, t01=0x0058}
0x4072…407c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0078}
0x407c…40a8 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 FDB ADDRESS AS PARAMETER «, t00=0x0029, t01=0x0082}
0x40a8…40b4 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0029, t01=0x00ae}
0x40b4…40ce Head {h00=0x0016, h01=0x0050, text=» DATA 15 FM WRITE «, t00=0x0029, t01=0x00ba}
0x40ce…40f4 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTIOT CHECK DISC I/O «, t00=0x0029, t01=0x00d4}
0x40f4…4106 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0029, t01=0x00fa}
0x4106…411c Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DMTERR«, t00=0x0029, t01=0x010c}
0x411c…412e Head {h00=0x000e, h01=0x0050, text=» RF DMT400«, t00=0x0029, t01=0x0122}
0x412e…413c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0134}
0x413c…4150 Head {h00=0x0010, h01=0x0050, text=»DMT390 EQU *«, t00=0x0029, t01=0x0142}
0x4150…4166 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/1000«, t00=0x0029, t01=0x0156}
0x4166…418c Head {h00=0x0022, h01=0x0050, text=» ORS A2,FDBDBR,A6 KEEP BUFFER «, t00=0x0029, t01=0x016c}
0x418c…41a0 (42, 0, 400) Head {h00=0x0010, h01=0x0050, text=»DMT400 EQU *«, t00=0x002a, t01=0x0004}
0x41a0…41c6 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A6 FDB ADDR DATA FILE «, t00=0x002a, t01=0x0018}
0x41c6…41f0 Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNGET GET CURRENCY BUFFER«, t00=0x002a, t01=0x003e}
0x41f0…4210 Head {h00=0x001c, h01=0x0050, text=» LDR A10,A2 BUFFER ADDR «, t00=0x002a, t01=0x0068}
0x4210…4228 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A9 «, t00=0x002a, t01=0x0088}
0x4228…424c Head {h00=0x0020, h01=0x0050, text=» LD A3,ECBCW+2,A9 LOG REC NR«, t00=0x002a, t01=0x00a0}
0x424c…4264 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A1 «, t00=0x002a, t01=0x00c4}
0x4264…4284 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/3F ORDER INDEX «, t00=0x002a, t01=0x00dc}
0x4284…4298 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QRW «, t00=0x002a, t01=0x00fc}
0x4298…42aa Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002a, t01=0x0110}
0x42aa…42cc Head {h00=0x001e, h01=0x0050, text=» RF(E) DMT420 RANDOM WRITE«, t00=0x002a, t01=0x0122}
0x42cc…42e2 Head {h00=0x0012, h01=0x0050, text=» LDK A4,QREWR «, t00=0x002a, t01=0x0144}
0x42e2…42f4 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002a, t01=0x015a}
0x42f4…4312 Head {h00=0x001a, h01=0x0050, text=» RF(E) DMT420 REWRITE «, t00=0x002a, t01=0x016c}
0x4312…4326 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QSW «, t00=0x002a, t01=0x018a}
0x4326…4338 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002b, t01=0x000e}
0x4338…4358 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT460 SEQ WRITE «, t00=0x002b, t01=0x0020}
0x4358…436e Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x002b, t01=0x0040}
0x436e…4382 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QIRW«, t00=0x002b, t01=0x0056}
0x4382…4394 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002b, t01=0x006a}
0x4394…43b2 Head {h00=0x001a, h01=0x0050, text=» RF(E) DMT420 IND REWR«, t00=0x002b, t01=0x007c}
0x43b2…43c6 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QINS«, t00=0x002b, t01=0x009a}
0x43c6…43d8 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002b, t01=0x00ae}
0x43d8…43fc Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT460 INDEXED INSERT«, t00=0x002b, t01=0x00c0}
0x43fc…4414 Head {h00=0x0014, h01=0x0050, text=» CWK A7,QSTIND «, t00=0x002b, t01=0x00e4}
0x4414…4438 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT406 START INDEXED «, t00=0x002b, t01=0x00fc}
0x4438…4444 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0120}
0x4444…445a Head {h00=0x0012, h01=0x0050, text=» LDK A4,QSTDIR«, t00=0x002b, t01=0x012c}
0x445a…446c Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002b, t01=0x0142}
0x446c…448c Head {h00=0x001c, h01=0x0050, text=» RF(NE) DMT409 NOT START«, t00=0x002b, t01=0x0154}
0x448c…44a0 Head {h00=0x0010, h01=0x0050, text=»DMT406 EQU *«, t00=0x002b, t01=0x0174}
0x44a0…44b2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x002b, t01=0x0188}
0x44b2…44c4 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x002c, t01=0x000a}
0x44c4…44d6 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x002c, t01=0x001c}
0x44d6…44ec Head {h00=0x0012, h01=0x0050, text=» RF(NN) DMT408«, t00=0x002c, t01=0x002e}
0x44ec…4502 Head {h00=0x0012, h01=0x0050, text=» ANKL A5,/7FFF«, t00=0x002c, t01=0x0044}
0x4502…4514 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x002c, t01=0x005a}
0x4514…4528 Head {h00=0x0010, h01=0x0050, text=»DMT408 EQU *«, t00=0x002c, t01=0x006c}
0x4528…454e Head {h00=0x0022, h01=0x0050, text=» ST A4,CRNCDF,A10 NEW CURRENCY«, t00=0x002c, t01=0x0080}
0x454e…456a Head {h00=0x0018, h01=0x0050, text=» ST A5,CRNCDF+2,A10 «, t00=0x002c, t01=0x00a6}
0x456a…457c Head {h00=0x000e, h01=0x0050, text=» RF DMT420«, t00=0x002c, t01=0x00c2}
0x457c…4590 Head {h00=0x0010, h01=0x0050, text=»DMT409 EQU *«, t00=0x002c, t01=0x00d4}
0x4590…45aa Head {h00=0x0016, h01=0x0050, text=» ST A2,CRNCDF,A10 «, t00=0x002c, t01=0x00e8}
0x45aa…45d4 Head {h00=0x0026, h01=0x0050, text=» ST A3,CRNCDF+2,A10 CRN DATA FILE «, t00=0x002c, t01=0x0102}
0x45d4…45e8 Head {h00=0x0010, h01=0x0050, text=»DMT420 EQU *«, t00=0x002c, t01=0x012c}
0x45e8…45f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0140}
0x45f2…460c Head {h00=0x0016, h01=0x0050, text=»* CHECK PROTECT «, t00=0x002c, t01=0x014a}
0x460c…4616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0164}
0x4616…462e Head {h00=0x0014, h01=0x0050, text=» LC A4,FDBDBR,A1«, t00=0x002c, t01=0x016e}
0x462e…4640 Head {h00=0x000e, h01=0x0050, text=» ANK A4,/1«, t00=0x002c, t01=0x0186}
0x4640…4662 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT470 NOT PROTECT «, t00=0x002d, t01=0x0008}
0x4662…466c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x002a}
0x466c…4692 Head {h00=0x0022, h01=0x0050, text=»* CHECK IF EA IS SET ALREADY«, t00=0x002d, t01=0x0034}
0x4692…469c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x005a}
0x469c…46bc Head {h00=0x001c, h01=0x0050, text=» CF A14,EATEST CHECK EA «, t00=0x002d, t01=0x0064}
0x46bc…46ce Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x002d, t01=0x0084}
0x46ce…46f4 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DMT470 EA ALREADY SET «, t00=0x002d, t01=0x0096}
0x46f4…46fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00bc}
0x46fe…4710 Head {h00=0x000e, h01=0x0050, text=»* SET EA«, t00=0x002d, t01=0x00c6}
0x4710…471a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00d8}
0x471a…4730 Head {h00=0x0012, h01=0x0050, text=» CF A14,EASETB«, t00=0x002d, t01=0x00e2}
0x4730…4742 Head {h00=0x000e, h01=0x0050, text=» RF DMT470«, t00=0x002d, t01=0x00f8}
0x4742…4756 Head {h00=0x0010, h01=0x0050, text=»DMT460 EQU *«, t00=0x002d, t01=0x010a}
0x4756…4760 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x011e}
0x4760…4776 Head {h00=0x0012, h01=0x0050, text=»* UPDATE LRN«, t00=0x002d, t01=0x0128}
0x4776…4780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x013e}
0x4780…4798 Head {h00=0x0014, h01=0x0050, text=» SC A2,FDBLRN,A1«, t00=0x002d, t01=0x0148}
0x4798…47b2 Head {h00=0x0016, h01=0x0050, text=» ST A3,FDBLRN+1,A1«, t00=0x002d, t01=0x0160}
0x47b2…47c4 Head {h00=0x000e, h01=0x0050, text=» RB DMT420«, t00=0x002d, t01=0x017a}
0x47c4…47d8 Head {h00=0x0010, h01=0x0050, text=»DMT470 EQU *«, t00=0x002d, t01=0x018c}
0x47d8…47ee Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x002e, t01=0x0010}
0x47ee…4802 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QINS«, t00=0x002e, t01=0x0026}
0x4802…4814 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002e, t01=0x003a}
0x4814…483a Head {h00=0x0022, h01=0x0050, text=» ABL(E) DMINS2 INDEXED INSERT «, t00=0x002e, t01=0x004c}
0x483a…4846 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0072}
0x4846…4854 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x007e}
0x4854…487a Head {h00=0x0022, h01=0x0050, text=»DMTAEX LDK A1,0 CORRECT RETURN«, t00=0x002e, t01=0x008c}
0x487a…4884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00b2}
0x4884…48a2 Head {h00=0x001a, h01=0x0050, text=»DMTERR LC A3,FDBDBR,A6«, t00=0x002e, t01=0x00bc}
0x48a2…48b6 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x002e, t01=0x00da}
0x48b6…48d8 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DMTERX KEEP BUFFER«, t00=0x002e, t01=0x00ee}
0x48d8…48f0 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x002e, t01=0x0110}
0x48f0…4908 Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x002e, t01=0x0128}
0x4908…4934 Head {h00=0x0028, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER AT A3 «, t00=0x002e, t01=0x0140}
0x4934…4948 Head {h00=0x0010, h01=0x0050, text=»DMTERX EQU *«, t00=0x002e, t01=0x016c}
0x4948…4972 Head {h00=0x0026, h01=0x0050, text=» LD A6,FDBADF,A6 GET FDB DATA FILE«, t00=0x002e, t01=0x0180}
0x4972…497e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002f, t01=0x001a}
0x497e…4998 Head {h00=0x0016, h01=0x0050, text=»* A1 = RET CODE «, t00=0x002f, t01=0x0026}
0x4998…49b2 Head {h00=0x0016, h01=0x0050, text=»* A6 = DWT ADDR «, t00=0x002f, t01=0x0040}
0x49b2…49c8 Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x002f, t01=0x005a}
0x49c8…49d4 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x002f, t01=0x0070}
0x49d4…49e0 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002f, t01=0x007c}
0x49e0…49f0 Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x002f, t01=0x0088}
0x49f0…4a06 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x002f, t01=0x0098}
0x4a06…4a14 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x00ae}
0x4a14…4a3c Head {h00=0x0024, h01=0x0050, text=»DMIRR EQU * INDEXED RANDOM READ «, t00=0x002f, t01=0x00bc}
0x4a3c…4a46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00e4}
0x4a46…4a68 Head {h00=0x001e, h01=0x0050, text=»DMSTIN EQU * START INDEXED«, t00=0x002f, t01=0x00ee}
0x4a68…4a9e Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x002f, t01=0x0110}
0x4a9e…4aba Head {h00=0x0018, h01=0x0050, text=» LDR A8,A1 FDB ADDR «, t00=0x002f, t01=0x0146}
0x4aba…4ae0 Head {h00=0x0022, h01=0x0050, text=» ADKL A8,FDBKEY KEY AREA ADDR «, t00=0x002f, t01=0x0162}
0x4ae0…4b08 Head {h00=0x0024, h01=0x0050, text=» LD A11,FDBRLE,A1 REC LGTH INDEX«, t00=0x002f, t01=0x0188}
0x4b08…4b26 Head {h00=0x001a, h01=0x0050, text=» SUKL A11,6 KEY LENGTH«, t00=0x0030, t01=0x0020}
0x4b26…4b3a Head {h00=0x0010, h01=0x0050, text=» LDR A13,A1 «, t00=0x0030, t01=0x003e}
0x4b3a…4b5c Head {h00=0x001e, h01=0x0050, text=» ADKL A13,FDBECB ECB ADDR «, t00=0x0030, t01=0x0052}
0x4b5c…4b84 Head {h00=0x0024, h01=0x0050, text=» CF A14,FNDKEY GET INDEX RECORD «, t00=0x0030, t01=0x0074}
0x4b84…4bb0 Head {h00=0x0028, h01=0x0050, text=»DMR006 EQU * FROM INDEXED READ NEXT «, t00=0x0030, t01=0x009c}
0x4bb0…4bc8 Head {h00=0x0014, h01=0x0050, text=» LD A9,DWTECB,A1«, t00=0x0030, t01=0x00c8}
0x4bc8…4be2 Head {h00=0x0016, h01=0x0050, text=» LDR A6,A1 FDB ADR«, t00=0x0030, t01=0x00e0}
0x4be2…4bfa Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x0030, t01=0x00fa}
0x4bfa…4c18 Head {h00=0x001a, h01=0x0050, text=» ADR A8,A6 ECB ADDRESS«, t00=0x0030, t01=0x0112}
0x4c18…4c30 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTOR,A6 «, t00=0x0030, t01=0x0130}
0x4c30…4c4a Head {h00=0x0016, h01=0x0050, text=» ANK A4,/3F ORDER «, t00=0x0030, t01=0x0148}
0x4c4a…4c60 Head {h00=0x0012, h01=0x0050, text=» SUK A4,QSTIND«, t00=0x0030, t01=0x0162}
0x4c60…4c80 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) DMR007 NOT START«, t00=0x0030, t01=0x0178}
0x4c80…4c98 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTOPT,A6«, t00=0x0031, t01=0x0008}
0x4c98…4cb0 Head {h00=0x0014, h01=0x0050, text=» ANK A4,7 OPTION«, t00=0x0031, t01=0x0020}
0x4cb0…4ccc Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMR007 EQUAL «, t00=0x0031, t01=0x0038}
0x4ccc…4cf2 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/FBFF IGNORE NOKEY =1«, t00=0x0031, t01=0x0054}
0x4cf2…4d06 Head {h00=0x0010, h01=0x0050, text=»DMR007 EQU *«, t00=0x0031, t01=0x007a}
0x4d06…4d22 Head {h00=0x0018, h01=0x0050, text=» LDR A2,A2 RET CODE «, t00=0x0031, t01=0x008e}
0x4d22…4d4a Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DMI037 KEY NOT FOUND =4 «, t00=0x0031, t01=0x00aa}
0x4d4a…4d72 Head {h00=0x0024, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD ADDR =3 «, t00=0x0031, t01=0x00d2}
0x4d72…4d8e Head {h00=0x0018, h01=0x0050, text=» ADKL A2,BUFSTA =3 «, t00=0x0031, t01=0x00fa}
0x4d8e…4dac Head {h00=0x001a, h01=0x0050, text=» ADR A2,A3 REC ADDR =3«, t00=0x0031, t01=0x0116}
0x4dac…4dd6 Head {h00=0x0026, h01=0x0050, text=» LD A4,FDBRLE,A1 RECORD LENGTH =3 «, t00=0x0031, t01=0x0134}
0x4dd6…4dec Head {h00=0x0012, h01=0x0050, text=» SUK A4,6 =3 «, t00=0x0031, t01=0x015e}
0x4dec…4e02 Head {h00=0x0012, h01=0x0050, text=» ADR A2,A4 =3«, t00=0x0031, t01=0x0174}
0x4e02…4e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x018a}
0x4e0c…4e2e (50, 0, 400) Head {h00=0x001e, h01=0x0050, text=»* MOVE LOG REC NO TO ECB«, t00=0x0032, t01=0x0004}
0x4e2e…4e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0026}
0x4e38…4e4a Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0032, t01=0x0030}
0x4e4a…4e5e Head {h00=0x0010, h01=0x0050, text=» LC A5,3,A2 «, t00=0x0032, t01=0x0042}
0x4e5e…4e76 Head {h00=0x0014, h01=0x0050, text=» ST A5,ECBCW,A9 «, t00=0x0032, t01=0x0056}
0x4e76…4e8a Head {h00=0x0010, h01=0x0050, text=» LC A5,4,A2 «, t00=0x0032, t01=0x006e}
0x4e8a…4e9c Head {h00=0x000e, h01=0x0050, text=» ECR A5,A5«, t00=0x0032, t01=0x0082}
0x4e9c…4eb0 Head {h00=0x0010, h01=0x0050, text=» LC A5,5,A2 «, t00=0x0032, t01=0x0094}
0x4eb0…4eca Head {h00=0x0016, h01=0x0050, text=» ST A5,ECBCW+2,A9 «, t00=0x0032, t01=0x00a8}
0x4eca…4ede Head {h00=0x0010, h01=0x0050, text=»* SET CRN «, t00=0x0032, t01=0x00c2}
0x4ede…4ee8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d6}
0x4ee8…4f10 Head {h00=0x0024, h01=0x0050, text=» LD A11,FDBADF,A6 FDB DATA FILE «, t00=0x0032, t01=0x00e0}
0x4f10…4f32 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A11 DATA FILE FDB «, t00=0x0032, t01=0x0108}
0x4f32…4f5c Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER ADDR«, t00=0x0032, t01=0x012a}
0x4f5c…4f80 Head {h00=0x0020, h01=0x0050, text=» LDR A10,A2 CRN BUFFER ADDR «, t00=0x0032, t01=0x0154}
0x4f80…4fa6 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A6 FDB ADDR INDEX FILE«, t00=0x0032, t01=0x0178}
0x4fa6…4fd2 Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLGRN GET INDE X LOG REC NO«, t00=0x0033, t01=0x000e}
0x4fd2…4ff2 Head {h00=0x001c, h01=0x0050, text=» LDK A5,QRR RANDOM READ «, t00=0x0033, t01=0x003a}
0x4ff2…500a Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A11«, t00=0x0033, t01=0x005a}
0x500a…5024 Head {h00=0x0016, h01=0x0050, text=» ANK A7,/3F ORDER «, t00=0x0033, t01=0x0072}
0x5024…503a Head {h00=0x0012, h01=0x0050, text=» SUK A7,QSTIND«, t00=0x0033, t01=0x008c}
0x503a…505e Head {h00=0x0020, h01=0x0050, text=» RF(NE) DMR025 INDEXED READ «, t00=0x0033, t01=0x00a2}
0x505e…5082 Head {h00=0x0020, h01=0x0050, text=» LDK A5,QSTIND START INDEXED«, t00=0x0033, t01=0x00c6}
0x5082…5094 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0033, t01=0x00ea}
0x5094…50b8 Head {h00=0x0020, h01=0x0050, text=» RF(NN) DMR025 NOT UNDERFLOW«, t00=0x0033, t01=0x00fc}
0x50b8…50ce Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/7FFF«, t00=0x0033, t01=0x0120}
0x50ce…50e0 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0033, t01=0x0136}
0x50e0…50f4 Head {h00=0x0010, h01=0x0050, text=»DMR025 EQU *«, t00=0x0033, t01=0x0148}
0x50f4…5110 Head {h00=0x0018, h01=0x0050, text=» SC A2,CRNCIF+1,A10 «, t00=0x0033, t01=0x015c}
0x5110…513a Head {h00=0x0026, h01=0x0050, text=» ST A3,CRNCIF+2,A10 CRN INDEX FILE«, t00=0x0033, t01=0x0178}
0x513a…515e Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBCW,A9 REC NR DATA «, t00=0x0034, t01=0x0012}
0x515e…5178 Head {h00=0x0016, h01=0x0050, text=» ST A2,CRNCDF,A10 «, t00=0x0034, t01=0x0036}
0x5178…5192 Head {h00=0x0016, h01=0x0050, text=» LD A2,ECBCW+2,A9 «, t00=0x0034, t01=0x0050}
0x5192…51ae Head {h00=0x0018, h01=0x0050, text=» ST A2,CRNCDF+2,A10 «, t00=0x0034, t01=0x006a}
0x51ae…51ce Head {h00=0x001c, h01=0x0050, text=» LC A2,FWTFNR,A6 FILE NR«, t00=0x0034, t01=0x0086}
0x51ce…51e8 Head {h00=0x0016, h01=0x0050, text=» SC A2,CRNCIF,A10 «, t00=0x0034, t01=0x00a6}
0x51e8…5204 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A11 FDB DATA«, t00=0x0034, t01=0x00c0}
0x5204…5228 Head {h00=0x0020, h01=0x0050, text=» SC A5,DWTOR+1,A6 NEW ORDER «, t00=0x0034, t01=0x00dc}
0x5228…523e Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/CFFF«, t00=0x0034, t01=0x0100}
0x523e…526e Head {h00=0x002c, h01=0x0050, text=» ANS A2,FDBDBR,A6 RELEASE INDEX BUFFERS «, t00=0x0034, t01=0x0116}
0x526e…5282 Head {h00=0x0010, h01=0x0050, text=» ABL DMT280 «, t00=0x0034, t01=0x0146}
0x5282…5290 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x015a}
0x5290…52b6 Head {h00=0x0022, h01=0x0050, text=»DMIRN EQU * INDEXED READ NEXT «, t00=0x0034, t01=0x0168}
0x52b6…52ec Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0034, t01=0x018e}
0x52ec…5312 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD OFFSET«, t00=0x0035, t01=0x0034}
0x5312…5324 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0035, t01=0x005a}
0x5324…533c Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x0035, t01=0x006c}
0x533c…5350 Head {h00=0x0010, h01=0x0050, text=»DMI100 EQU *«, t00=0x0035, t01=0x0084}
0x5350…536a Head {h00=0x0016, h01=0x0050, text=» ADR A2,A3 BUFFADR«, t00=0x0035, t01=0x0098}
0x536a…5382 Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0035, t01=0x00b2}
0x5382…53ae Head {h00=0x0028, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR OF STATUS CHAR«, t00=0x0035, t01=0x00ca}
0x53ae…53cc Head {h00=0x001a, h01=0x0050, text=» LDK A5,/FF USED MARK «, t00=0x0035, t01=0x00f6}
0x53cc…53e6 Head {h00=0x0016, h01=0x0050, text=» CCR A5,A2 STATUS «, t00=0x0035, t01=0x0114}
0x53e6…5400 Head {h00=0x0016, h01=0x0050, text=» RF(E) DMI120 USED«, t00=0x0035, t01=0x012e}
0x5400…5418 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A1«, t00=0x0035, t01=0x0148}
0x5418…5442 Head {h00=0x0026, h01=0x0050, text=» ST A4,FDBRRO,A1 LAST REC IN SECT «, t00=0x0035, t01=0x0160}
0x5442…544c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x018a}
0x544c…546c (54, 0, 398) Head {h00=0x001c, h01=0x0050, text=»* CHECK IF END OF FILE«, t00=0x0036, t01=0x0004}
0x546c…5476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0024}
0x5476…548e Head {h00=0x0014, h01=0x0050, text=» LDR A9,A3 SAVE «, t00=0x0036, t01=0x002e}
0x548e…54b0 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0036, t01=0x0046}
0x54b0…54c8 Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x0036, t01=0x0068}
0x54c8…54e6 Head {h00=0x001a, h01=0x0050, text=» RF(L) DMI106 NOT EOF «, t00=0x0036, t01=0x0080}
0x54e6…5500 Head {h00=0x0016, h01=0x0050, text=» RF(G) DMI105 EOF «, t00=0x0036, t01=0x009e}
0x5500…551a Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x0036, t01=0x00b8}
0x551a…5538 Head {h00=0x001a, h01=0x0050, text=» RF(L) DMI106 NOT EOF «, t00=0x0036, t01=0x00d2}
0x5538…5550 Head {h00=0x0014, h01=0x0050, text=»DMI105 LDR A3,A9«, t00=0x0036, t01=0x00f0}
0x5550…5568 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,EOFERR «, t00=0x0036, t01=0x0108}
0x5568…557e Head {h00=0x0012, h01=0x0050, text=» RF DMI035 EOF«, t00=0x0036, t01=0x0120}
0x557e…559e Head {h00=0x001c, h01=0x0050, text=»DMI106 LDR A3,A9 RESTORE«, t00=0x0036, t01=0x0136}
0x559e…55ba Head {h00=0x0018, h01=0x0050, text=» RF DMI010 NEXT REC «, t00=0x0036, t01=0x0156}
0x55ba…55c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0172}
0x55c8…55de Head {h00=0x0012, h01=0x0050, text=»DMI120 EQU * «, t00=0x0036, t01=0x0180}
0x55de…5600 Head {h00=0x001e, h01=0x0050, text=»* INDEX RECORD IS FOUND «, t00=0x0037, t01=0x0008}
0x5600…560a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x002a}
0x560a…562c Head {h00=0x001e, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB «, t00=0x0037, t01=0x0034}
0x562c…5636 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0056}
0x5636…5652 Head {h00=0x0018, h01=0x0050, text=»* KEY RECORD FOUN «, t00=0x0037, t01=0x0060}
0x5652…5684 Head {h00=0x002e, h01=0x0050, text=»* CHECK IF NEXT RECORD HAS THE SAME KEY «, t00=0x0037, t01=0x007c}
0x5684…568e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ae}
0x568e…56b4 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD OFFSET«, t00=0x0037, t01=0x00b8}
0x56b4…56cc Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0037, t01=0x00de}
0x56cc…56e8 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 REC ADDR «, t00=0x0037, t01=0x00f6}
0x56e8…570c Head {h00=0x0020, h01=0x0050, text=» LD A4,FDBRLE,A1 REC LENGTH «, t00=0x0037, t01=0x0112}
0x570c…5728 Head {h00=0x0018, h01=0x0050, text=» SUK A4,6 KEY LENGTH«, t00=0x0037, t01=0x0136}
0x5728…573a Head {h00=0x000e, h01=0x0050, text=» ADR A2,A4«, t00=0x0037, t01=0x0152}
0x573a…5760 Head {h00=0x0022, h01=0x0050, text=» CC A4,2,A2 DUPLICATE KEY CHAR«, t00=0x0037, t01=0x0164}
0x5760…5788 Head {h00=0x0024, h01=0x0050, text=» RF(NE) DMR020 NEXT KEY NOT SAME«, t00=0x0037, t01=0x018a}
0x5788…57a6 Head {h00=0x001a, h01=0x0050, text=» LDKL A5,NXTKYS BIT 6 «, t00=0x0038, t01=0x0022}
0x57a6…57cc Head {h00=0x0022, h01=0x0050, text=» ORS A5,ECBRC,A9 NEXT KEY SAME«, t00=0x0038, t01=0x0040}
0x57cc…57e0 Head {h00=0x0010, h01=0x0050, text=»DMR020 EQU *«, t00=0x0038, t01=0x0066}
0x57e0…57fc Head {h00=0x0018, h01=0x0050, text=» LDK A2,0 MARK FOUND«, t00=0x0038, t01=0x007a}
0x57fc…582e Head {h00=0x002e, h01=0x0050, text=» ABL DMR006 CONT AS FOR INDEXED RAND READ «, t00=0x0038, t01=0x0096}
0x582e…585c Head {h00=0x002a, h01=0x0050, text=»DMI037 LDKL A1,KEYERR KEY NOT FOUND =4«, t00=0x0038, t01=0x00c8}
0x585c…5872 Head {h00=0x0012, h01=0x0050, text=» RF DMI035 =4«, t00=0x0038, t01=0x00f6}
0x5872…5886 Head {h00=0x0010, h01=0x0050, text=»DMI010 EQU *«, t00=0x0038, t01=0x010c}
0x5886…58b2 Head {h00=0x0028, h01=0x0050, text=» CF A14,RDNXTR GET NEXT INDEX RECORD«, t00=0x0038, t01=0x0120}
0x58b2…58d2 Head {h00=0x001c, h01=0x0050, text=» RB DMI100 RECORD FOUND «, t00=0x0038, t01=0x014c}
0x58d2…58ee Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0038, t01=0x016c}
0x58ee…5902 Head {h00=0x0010, h01=0x0050, text=»DMI031 EQU *«, t00=0x0038, t01=0x0188}
0x5902…5922 Head {h00=0x001c, h01=0x0050, text=» LDKL A1,NODERR NO IDENT«, t00=0x0039, t01=0x000c}
0x5922…5936 Head {h00=0x0010, h01=0x0050, text=»DMI035 EQU *«, t00=0x0039, t01=0x002c}
0x5936…5954 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A3 BUFFER ADDR«, t00=0x0039, t01=0x0040}
0x5954…5974 Head {h00=0x001c, h01=0x0050, text=» ABL(Z) DMTERX NO BUFFER«, t00=0x0039, t01=0x005e}
0x5974…5998 Head {h00=0x0020, h01=0x0050, text=» ABL DMTERR ERROR AND BUFFER«, t00=0x0039, t01=0x007e}
0x5998…59ac Head {h00=0x0010, h01=0x0050, text=»DMI036 EQU *«, t00=0x0039, t01=0x00a2}
0x59ac…59c0 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/27 «, t00=0x0039, t01=0x00b6}
0x59c0…59e6 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) DMI035 BIT 10,13,14,15«, t00=0x0039, t01=0x00ca}
0x59e6…5a0c Head {h00=0x0022, h01=0x0050, text=» LDKL A1,EOMERR GRAVE ERR ALSO«, t00=0x0039, t01=0x00f0}
0x5a0c…5a1e Head {h00=0x000e, h01=0x0050, text=» RB DMI035«, t00=0x0039, t01=0x0116}
0x5a1e…5a2c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x0128}
0x5a2c…5a56 Head {h00=0x0026, h01=0x0050, text=»DMINS2 EQU * INDEXED INSERT PART 2«, t00=0x0039, t01=0x0136}
0x5a56…5a7a Head {h00=0x0020, h01=0x0050, text=»DMXDEL EQU * INDEXED DELETE «, t00=0x0039, t01=0x0160}
0x5a7a…5a84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0184}
0x5a84…5aba Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0039, t01=0x018e}
0x5aba…5ad2 Head {h00=0x0014, h01=0x0050, text=» LC A3,FDBDBR,A6«, t00=0x003a, t01=0x0034}
0x5ad2…5ae6 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x003a, t01=0x004c}
0x5ae6…5b08 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DXI010 KEEP BUFFER«, t00=0x003a, t01=0x0060}
0x5b08…5b20 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x003a, t01=0x0082}
0x5b20…5b38 Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x003a, t01=0x009a}
0x5b38…5b5e Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x003a, t01=0x00b2}
0x5b5e…5b72 Head {h00=0x0010, h01=0x0050, text=»DXI010 EQU *«, t00=0x003a, t01=0x00d8}
0x5b72…5b8c Head {h00=0x0016, h01=0x0050, text=» LDK A5,10 LOOPER «, t00=0x003a, t01=0x00ec}
0x5b8c…5bac Head {h00=0x001c, h01=0x0050, text=»DXI020 EQU * NEXT INDEX «, t00=0x003a, t01=0x0106}
0x5bac…5bca Head {h00=0x001a, h01=0x0050, text=» LD A7,DWTOR,A6 ORDER «, t00=0x003a, t01=0x0126}
0x5bca…5bde Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x003a, t01=0x0144}
0x5bde…5bf0 Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x003a, t01=0x0158}
0x5bf0…5c12 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DXI100 ALL INDEXES «, t00=0x003a, t01=0x016a}
0x5c12…5c2e Head {h00=0x0018, h01=0x0050, text=» LDR A4,A6 FDB DATA «, t00=0x003a, t01=0x018c}
0x5c2e…5c40 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x003b, t01=0x0018}
0x5c40…5c62 Head {h00=0x001e, h01=0x0050, text=» LD A1,FDBADF,A4 FDB INDEX«, t00=0x003b, t01=0x002a}
0x5c62…5c80 Head {h00=0x001a, h01=0x0050, text=» RB(Z) DXI020 NO INDEX«, t00=0x003b, t01=0x004c}
0x5c80…5c9e Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER «, t00=0x003b, t01=0x006a}
0x5c9e…5cb6 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTOR,A1 «, t00=0x003b, t01=0x0088}
0x5cb6…5cdc Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTECB,A6 USER ECB ADDR«, t00=0x003b, t01=0x00a0}
0x5cdc…5cf4 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTECB,A1«, t00=0x003b, t01=0x00c6}
0x5cf4…5d18 Head {h00=0x0020, h01=0x0050, text=» ST A5,FDBKA,A6 SAVE COUNTER«, t00=0x003b, t01=0x00de}
0x5d18…5d2c Head {h00=0x0010, h01=0x0050, text=» SUK A7,QINS«, t00=0x003b, t01=0x0102}
0x5d2c…5d4e Head {h00=0x001e, h01=0x0050, text=» RF(E) DMINIX INSERT INDEX«, t00=0x003b, t01=0x0116}
0x5d4e…5d6e Head {h00=0x001c, h01=0x0050, text=» RF DMDELX DELETE INDEX «, t00=0x003b, t01=0x0138}
0x5d6e…5d7c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003b, t01=0x0158}
0x5d7c…5daa Head {h00=0x002a, h01=0x0050, text=»* RETURN FROM UPDATING OF ONE INDEX «, t00=0x003b, t01=0x0166}
0x5daa…5db4 (60, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0004}
0x5db4…5dc8 Head {h00=0x0010, h01=0x0050, text=»DMTAR5 EQU *«, t00=0x003c, t01=0x000e}
0x5dc8…5dee Head {h00=0x0022, h01=0x0050, text=» LD A6,FDBADF,A1 FDB DATA FILE«, t00=0x003c, t01=0x0022}
0x5dee…5e1c Head {h00=0x002a, h01=0x0050, text=» LD A5,FDBKA,A6 GET COUNTER OF INDEXES«, t00=0x003c, t01=0x0048}
0x5e1c…5e3e Head {h00=0x001e, h01=0x0050, text=» RB DXI020 TAKE NEXT INDEX«, t00=0x003c, t01=0x0076}
0x5e3e…5e60 Head {h00=0x001e, h01=0x0050, text=»DXI100 EQU * INDEXES READY«, t00=0x003c, t01=0x0098}
0x5e60…5e7a Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RET CODE«, t00=0x003c, t01=0x00ba}
0x5e7a…5e9e Head {h00=0x0020, h01=0x0050, text=» SUK A7,QINS INDEXED INSERT «, t00=0x003c, t01=0x00d4}
0x5e9e…5eba Head {h00=0x0018, h01=0x0050, text=» ABL(E) DMTERX READY«, t00=0x003c, t01=0x00f8}
0x5eba…5ecc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x003c, t01=0x0114}
0x5ecc…5eee Head {h00=0x001e, h01=0x0050, text=» ABL DMT020 RESTART DMTASK«, t00=0x003c, t01=0x0126}
0x5eee…5efc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0148}
0x5efc…5f1e Head {h00=0x001e, h01=0x0050, text=»DMINIX EQU * INSERT INDEX «, t00=0x003c, t01=0x0156}
0x5f1e…5f34 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003c, t01=0x0178}
0x5f34…5f3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x018e}
0x5f3e…5f60 Head {h00=0x001e, h01=0x0050, text=»* GET KEY IN USER BUFFER«, t00=0x003d, t01=0x0008}
0x5f60…5f6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x002a}
0x5f6a…5f8c Head {h00=0x001e, h01=0x0050, text=» LD A4,FDBADF,A1 DATA FDB «, t00=0x003d, t01=0x0034}
0x5f8c…5fae Head {h00=0x001e, h01=0x0050, text=» LD A4,DWTECB,A4 USER ECB «, t00=0x003d, t01=0x0056}
0x5fae…5fd2 Head {h00=0x0020, h01=0x0050, text=» LD A8,ECBBA,A4 USER BUFFER «, t00=0x003d, t01=0x0078}
0x5fd2…5ff2 Head {h00=0x001c, h01=0x0050, text=» AD A8,FDBKA,A1 KEY ADDR«, t00=0x003d, t01=0x009c}
0x5ff2…6004 Head {h00=0x000e, h01=0x0050, text=» RF INS010«, t00=0x003d, t01=0x00bc}
0x6004…6010 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x00ce}
0x6010…6026 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x003d, t01=0x00da}
0x6026…6030 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00f0}
0x6030…6058 Head {h00=0x0024, h01=0x0050, text=»DMDELX EQU * DELETE INDEX RECORD«, t00=0x003d, t01=0x00fa}
0x6058…608e Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x003d, t01=0x0122}
0x608e…60a0 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x003d, t01=0x0158}
0x60a0…60c0 Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBKEY KEY ADDR«, t00=0x003d, t01=0x016a}
0x60c0…60d4 Head {h00=0x0010, h01=0x0050, text=»INS010 EQU *«, t00=0x003d, t01=0x018a}
0x60d4…60e8 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A8 «, t00=0x003e, t01=0x000e}
0x60e8…6110 Head {h00=0x0024, h01=0x0050, text=» LD A11,FDBRLE,A1 RECORD LENGTH «, t00=0x003e, t01=0x0022}
0x6110…612e Head {h00=0x001a, h01=0x0050, text=» SUKL A11,6 KEY LENGTH«, t00=0x003e, t01=0x004a}
0x612e…6142 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A14«, t00=0x003e, t01=0x0068}
0x6142…6176 Head {h00=0x0030, h01=0x0050, text=» ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS«, t00=0x003e, t01=0x007c}
0x6176…619e Head {h00=0x0024, h01=0x0050, text=» CF A14,FNDKEY GET INDEX RECORD «, t00=0x003e, t01=0x00b0}
0x619e…61ba Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x003e, t01=0x00d8}
0x61ba…61d6 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A2 RET CODE «, t00=0x003e, t01=0x00f4}
0x61d6…61e8 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x003e, t01=0x0110}
0x61e8…620e Head {h00=0x0022, h01=0x0050, text=» ABL(Z) DMI036 NO SECTOR FOUND«, t00=0x003e, t01=0x0122}
0x620e…622e Head {h00=0x001c, h01=0x0050, text=» LDR A13,A3 BUFFER ADDR «, t00=0x003e, t01=0x0148}
0x622e…6250 Head {h00=0x001e, h01=0x0050, text=» LD A5,DWTECB,A6 USER ECB «, t00=0x003e, t01=0x0168}
0x6250…6268 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTOR,A6 «, t00=0x003e, t01=0x018a}
0x6268…627c Head {h00=0x0010, h01=0x0050, text=» ANK A1,/3F «, t00=0x003f, t01=0x0012}
0x627c…6290 Head {h00=0x0010, h01=0x0050, text=» SUK A1,QDEL«, t00=0x003f, t01=0x0026}
0x6290…62ba Head {h00=0x0026, h01=0x0050, text=» ABL(E) DEL000 DELETE INDEX RECORD«, t00=0x003f, t01=0x003a}
0x62ba…62c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0064}
0x62c4…62f0 Head {h00=0x0028, h01=0x0050, text=»* SET RC BIT 6 TO USER IF NEXT KEY«, t00=0x003f, t01=0x006e}
0x62f0…6316 Head {h00=0x0022, h01=0x0050, text=»* IS SAME IN REQUESTED INDEX«, t00=0x003f, t01=0x009a}
0x6316…6320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00c0}
0x6320…6332 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x003f, t01=0x00ca}
0x6332…635a Head {h00=0x0024, h01=0x0050, text=» RF(NZ) INS050 NEXT KEY NOT SAME«, t00=0x003f, t01=0x00dc}
0x635a…6380 Head {h00=0x0022, h01=0x0050, text=» LDKL A4,NXTKYS NEXT KEY SAME «, t00=0x003f, t01=0x0104}
0x6380…63a6 Head {h00=0x0022, h01=0x0050, text=» ORS A4,ECBRC,A5 NEXT KEY SAME«, t00=0x003f, t01=0x012a}
0x63a6…63bc Head {h00=0x0012, h01=0x0050, text=» IFT INSLAS=1 «, t00=0x003f, t01=0x0150}
0x63bc…63c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0166}
0x63c6…63e6 Head {h00=0x001c, h01=0x0050, text=»* INSERT SAME KEY LAST«, t00=0x003f, t01=0x0170}
0x63e6…63f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0190}
0x63f0…6406 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A6 FDB«, t00=0x0040, t01=0x000a}
0x6406…6428 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBRRO,A1 REC OFFS «, t00=0x0040, t01=0x0020}
0x6428…643a Head {h00=0x000e, h01=0x0050, text=» RF INS100«, t00=0x0040, t01=0x0042}
0x643a…644e Head {h00=0x0010, h01=0x0050, text=»INS080 EQU *«, t00=0x0040, t01=0x0054}
0x644e…6472 Head {h00=0x0020, h01=0x0050, text=» CF A14,RDNXTR GET NEXT REC «, t00=0x0040, t01=0x0068}
0x6472…6488 Head {h00=0x0012, h01=0x0050, text=» RF INS100 OK «, t00=0x0040, t01=0x008c}
0x6488…64a2 Head {h00=0x0016, h01=0x0050, text=» ABL DEL045 ERROR «, t00=0x0040, t01=0x00a2}
0x64a2…64b6 Head {h00=0x0010, h01=0x0050, text=»INS100 EQU *«, t00=0x0040, t01=0x00bc}
0x64b6…64c8 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0040, t01=0x00d0}
0x64c8…64e0 Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0040, t01=0x00e2}
0x64e0…6504 Head {h00=0x0020, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR STATUS«, t00=0x0040, t01=0x00fa}
0x6504…6518 Head {h00=0x0010, h01=0x0050, text=» LDK A5,/FF «, t00=0x0040, t01=0x011e}
0x6518…652a Head {h00=0x000e, h01=0x0050, text=» CCR A5,A2«, t00=0x0040, t01=0x0132}
0x652a…6544 Head {h00=0x0016, h01=0x0050, text=» RF(E) INS150 USED«, t00=0x0040, t01=0x0144}
0x6544…655c Head {h00=0x0014, h01=0x0050, text=» LD A5,FDBMRO,A1«, t00=0x0040, t01=0x015e}
0x655c…6574 Head {h00=0x0014, h01=0x0050, text=» ST A5,FDBRRO,A1«, t00=0x0040, t01=0x0176}
0x6574…65a2 Head {h00=0x002a, h01=0x0050, text=» RB INS080 GET FIRST RE C IN NXT SECT «, t00=0x0040, t01=0x018e}
0x65a2…65b6 Head {h00=0x0010, h01=0x0050, text=»INS150 EQU *«, t00=0x0041, t01=0x002c}
0x65b6…65d8 Head {h00=0x001e, h01=0x0050, text=» LC A5,-4,A2 DUPL KEY CHAR«, t00=0x0041, t01=0x0040}
0x65d8…65f6 Head {h00=0x001a, h01=0x0050, text=» CWR A5,A11 KEY LENGTH«, t00=0x0041, t01=0x0062}
0x65f6…661e Head {h00=0x0024, h01=0x0050, text=» RB(E) INS080 NEXT SAME GET NEXT«, t00=0x0041, t01=0x0080}
0x661e…6628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00a8}
0x6628…664c Head {h00=0x0020, h01=0x0050, text=»* UPDATE LAST SAME RECORD «, t00=0x0041, t01=0x00b2}
0x664c…6656 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00d6}
0x6656…6676 Head {h00=0x001c, h01=0x0050, text=» SC A11,-4,A2 NEXT SAME «, t00=0x0041, t01=0x00e0}
0x6676…668e Head {h00=0x0014, h01=0x0050, text=» LD A7,FDBRRO,A1«, t00=0x0041, t01=0x0100}
0x668e…66a6 Head {h00=0x0014, h01=0x0050, text=» CW A7,FDBMRO,A1«, t00=0x0041, t01=0x0118}
0x66a6…66d0 Head {h00=0x0026, h01=0x0050, text=» RF(NE) INS160 SECT WRITTEN LATER «, t00=0x0041, t01=0x0130}
0x66d0…66da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x015a}
0x66da…66f2 Head {h00=0x0014, h01=0x0050, text=»* WRITE BLOCK «, t00=0x0041, t01=0x0164}
0x66f2…66fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x017c}
0x66fc…671a Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE,WAIT«, t00=0x0041, t01=0x0186}
0x671a…6726 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0042, t01=0x0014}
0x6726…673a Head {h00=0x0010, h01=0x0050, text=» DATA 15 FM «, t00=0x0042, t01=0x0020}
0x673a…675a Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x0042, t01=0x0034}
0x675a…676c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0042, t01=0x0054}
0x676c…6784 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0042, t01=0x0066}
0x6784…678e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x007e}
0x678e…67aa Head {h00=0x0018, h01=0x0050, text=»* GET NEXT RECORD «, t00=0x0042, t01=0x0088}
0x67aa…67b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00a4}
0x67b4…67c8 Head {h00=0x0010, h01=0x0050, text=»INS160 EQU *«, t00=0x0042, t01=0x00ae}
0x67c8…67ee Head {h00=0x0022, h01=0x0050, text=» LDR A7,A5 NR OF SAME IN NEXT «, t00=0x0042, t01=0x00c2}
0x67ee…6804 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A6 FDB«, t00=0x0042, t01=0x00e8}
0x6804…6826 Head {h00=0x001e, h01=0x0050, text=» CF A14,RDNXTR GET NEXT RC«, t00=0x0042, t01=0x00fe}
0x6826…683c Head {h00=0x0012, h01=0x0050, text=» RF INS170 OK «, t00=0x0042, t01=0x0120}
0x683c…6856 Head {h00=0x0016, h01=0x0050, text=» ABL DEL045 ERROR «, t00=0x0042, t01=0x0136}
0x6856…686a Head {h00=0x0010, h01=0x0050, text=»INS170 EQU *«, t00=0x0042, t01=0x0150}
0x686a…688a Head {h00=0x001c, h01=0x0050, text=» LDR A13,A3 BUFFER ADDR «, t00=0x0042, t01=0x0164}
0x688a…68b0 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTECB,A6 USER ECB ADDR«, t00=0x0042, t01=0x0184}
0x68b0…68bc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x001a}
0x68bc…68d2 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0043, t01=0x0026}
0x68d2…68e6 Head {h00=0x0010, h01=0x0050, text=»INS050 EQU *«, t00=0x0043, t01=0x003c}
0x68e6…68f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0050}
0x68f0…691c Head {h00=0x0028, h01=0x0050, text=»* CREATE AN INDE XRECORD IN AREA 1«, t00=0x0043, t01=0x005a}
0x691c…6926 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0086}
0x6926…6944 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A12 FROM ADDR «, t00=0x0043, t01=0x0090}
0x6944…694e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00ae}
0x694e…6962 Head {h00=0x0010, h01=0x0050, text=» LDR A3,A14 «, t00=0x0043, t01=0x00b8}
0x6962…697c Head {h00=0x0016, h01=0x0050, text=» ADK A3,2 TO ADDR «, t00=0x0043, t01=0x00cc}
0x697c…699a Head {h00=0x001a, h01=0x0050, text=» LDR A2,A11 KEY LENGTH«, t00=0x0043, t01=0x00e6}
0x699a…69b8 Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTBM MOVE KEY«, t00=0x0043, t01=0x0104}
0x69b8…69ca Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0043, t01=0x0122}
0x69ca…69e2 Head {h00=0x0014, h01=0x0050, text=» SCR A2,A3 DUMMY«, t00=0x0043, t01=0x0134}
0x69e2…69f4 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0043, t01=0x014c}
0x69f4…6a0c Head {h00=0x0014, h01=0x0050, text=» SCR A2,A3 DUMMY«, t00=0x0043, t01=0x015e}
0x6a0c…6a1e Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0043, t01=0x0176}
0x6a1e…6a40 Head {h00=0x001e, h01=0x0050, text=» SCR A7,A3 NR OF SAME CHAR«, t00=0x0043, t01=0x0188}
0x6a40…6a52 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0044, t01=0x001a}
0x6a52…6a78 Head {h00=0x0022, h01=0x0050, text=» LDR A7,A3 ADDR OF LOG REC NR «, t00=0x0044, t01=0x002c}
0x6a78…6a90 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A5 «, t00=0x0044, t01=0x0052}
0x6a90…6abe Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBCW+2,A5 REC NR DATA FILE REC«, t00=0x0044, t01=0x006a}
0x6abe…6ad0 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A7«, t00=0x0044, t01=0x0098}
0x6ad0…6ae2 Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0044, t01=0x00aa}
0x6ae2…6af4 Head {h00=0x000e, h01=0x0050, text=» SCR A3,A7«, t00=0x0044, t01=0x00bc}
0x6af4…6b06 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0044, t01=0x00ce}
0x6b06…6b18 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0044, t01=0x00e0}
0x6b18…6b36 Head {h00=0x001a, h01=0x0050, text=» SCR A3,A7 LOG REC NR «, t00=0x0044, t01=0x00f2}
0x6b36…6b48 Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0044, t01=0x0110}
0x6b48…6b60 Head {h00=0x0014, h01=0x0050, text=» LDK A1,/FF USED«, t00=0x0044, t01=0x0122}
0x6b60…6b7e Head {h00=0x001a, h01=0x0050, text=» SCR A1,A7 STATUS CHAR«, t00=0x0044, t01=0x013a}
0x6b7e…6b9a Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0044, t01=0x0158}
0x6b9a…6bc2 Head {h00=0x0024, h01=0x0050, text=» CF A14,GTLGRN GET REC NR INDEX «, t00=0x0044, t01=0x0174}
0x6bc2…6bcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x000c}
0x6bcc…6bfc Head {h00=0x002c, h01=0x0050, text=»* SAVE RECORD NR FOR FIRST MOVED INDEX«, t00=0x0045, t01=0x0016}
0x6bfc…6c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0046}
0x6c06…6c1c Head {h00=0x0012, h01=0x0050, text=» ST A2,-28,A14«, t00=0x0045, t01=0x0050}
0x6c1c…6c32 Head {h00=0x0012, h01=0x0050, text=» ST A3,-26,A14«, t00=0x0045, t01=0x0066}
0x6c32…6c40 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x007c}
0x6c40…6c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x008a}
0x6c4a…6c88 Head {h00=0x003a, h01=0x0050, text=»* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING«, t00=0x0045, t01=0x0094}
0x6c88…6cb0 Head {h00=0x0024, h01=0x0050, text=»* USED RECORDS ROLLED FORWARD «, t00=0x0045, t01=0x00d2}
0x6cb0…6cd8 Head {h00=0x0024, h01=0x0050, text=»* A6,A11,A13 IS USED AT ENTRY «, t00=0x0045, t01=0x00fa}
0x6cd8…6d00 Head {h00=0x0024, h01=0x0050, text=» ADKL A11,7 RECORD LENGTH TOTAL «, t00=0x0045, t01=0x0122}
0x6d00…6d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x014a}
0x6d0a…6d26 Head {h00=0x0018, h01=0x0050, text=»* USE D REGISTERS «, t00=0x0045, t01=0x0154}
0x6d26…6d48 Head {h00=0x001e, h01=0x0050, text=»* A6 = FDB ADDR INDEX «, t00=0x0045, t01=0x0170}
0x6d48…6d64 (70, 0, 400) Head {h00=0x0018, h01=0x0050, text=»* A10 = AREA ADDR«, t00=0x0046, t01=0x0004}
0x6d64…6d8a Head {h00=0x0022, h01=0x0050, text=»* A11 = RECORD LENGTH INDEX«, t00=0x0046, t01=0x0020}
0x6d8a…6dba Head {h00=0x002c, h01=0x0050, text=»* A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 «, t00=0x0046, t01=0x0046}
0x6dba…6de2 Head {h00=0x0024, h01=0x0050, text=»* A13 = BUFFER ADDRESS BLOCK «, t00=0x0046, t01=0x0076}
0x6de2…6dec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x009e}
0x6dec…6e00 Head {h00=0x0010, h01=0x0050, text=»INS190 EQU *«, t00=0x0046, t01=0x00a8}
0x6e00…6e1c Head {h00=0x0018, h01=0x0050, text=» LDKL A12,1 BUFADR2 «, t00=0x0046, t01=0x00bc}
0x6e1c…6e30 Head {h00=0x0010, h01=0x0050, text=»INS200 EQU *«, t00=0x0046, t01=0x00d8}
0x6e30…6e42 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0046, t01=0x00ec}
0x6e42…6e56 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0046, t01=0x00fe}
0x6e56…6e72 Head {h00=0x0018, h01=0x0050, text=» RF(Z) INS210 BUFAR1«, t00=0x0046, t01=0x0112}
0x6e72…6e9e Head {h00=0x0028, h01=0x0050, text=» LDKL A1,RECBFZ RECORD BUUFFER SIZE «, t00=0x0046, t01=0x012e}
0x6e9e…6eb4 Head {h00=0x0012, h01=0x0050, text=» SLL A1,1 BYTE«, t00=0x0046, t01=0x015a}
0x6eb4…6ece Head {h00=0x0016, h01=0x0050, text=»INS210 LDR A10,A14«, t00=0x0046, t01=0x0170}
0x6ece…6ee0 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0046, t01=0x018a}
0x6ee0…6f0c Head {h00=0x0028, h01=0x0050, text=» ADR A10,A1 RECORD BUFFER AREA ADDR «, t00=0x0047, t01=0x000c}
0x6f0c…6f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0038}
0x6f16…6f32 Head {h00=0x0018, h01=0x0050, text=»* SAVE LAST RECORD«, t00=0x0047, t01=0x0042}
0x6f32…6f3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x005e}
0x6f3c…6f50 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x0047, t01=0x0068}
0x6f50…6f68 Head {h00=0x0014, h01=0x0050, text=» ADKL A1,BUFSTA «, t00=0x0047, t01=0x007c}
0x6f68…6f9a Head {h00=0x002e, h01=0x0050, text=» AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT «, t00=0x0047, t01=0x0094}
0x6f9a…6fae Head {h00=0x0010, h01=0x0050, text=» LDR A2,A11 «, t00=0x0047, t01=0x00c6}
0x6fae…6fc2 Head {h00=0x0010, h01=0x0050, text=» LDR A3,A10 «, t00=0x0047, t01=0x00da}
0x6fc2…6fe8 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTBM SAVE LAST RECORD«, t00=0x0047, t01=0x00ee}
0x6fe8…7008 Head {h00=0x001c, h01=0x0050, text=»* MOVE REST OF SECTOR «, t00=0x0047, t01=0x0114}
0x7008…7012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0134}
0x7012…7026 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x0047, t01=0x013e}
0x7026…703e Head {h00=0x0014, h01=0x0050, text=» ADKL A1,BUFSTA «, t00=0x0047, t01=0x0152}
0x703e…7060 Head {h00=0x001e, h01=0x0050, text=» AD A1,FDBRRO,A6 FROM ADDR«, t00=0x0047, t01=0x016a}
0x7060…7072 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A1«, t00=0x0047, t01=0x018c}
0x7072…708a Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBMRO,A6«, t00=0x0048, t01=0x000e}
0x708a…70ae Head {h00=0x0020, h01=0x0050, text=» SU A2,FDBRRO,A6 NR OF CHAR «, t00=0x0048, t01=0x0026}
0x70ae…70c0 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0048, t01=0x004a}
0x70c0…70dc Head {h00=0x0018, h01=0x0050, text=» ADR A3,A11 TO ADDR «, t00=0x0048, t01=0x005c}
0x70dc…70f8 Head {h00=0x0018, h01=0x0050, text=» CF A14,DMTBMR MOVE «, t00=0x0048, t01=0x0078}
0x70f8…7116 Head {h00=0x001a, h01=0x0050, text=»* INSERT NEW RECORD «, t00=0x0048, t01=0x0094}
0x7116…7120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00b2}
0x7120…7144 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,RECBFZ BUFFER SIZE «, t00=0x0048, t01=0x00bc}
0x7144…715e Head {h00=0x0016, h01=0x0050, text=» SLL A1,1 BYTE NO «, t00=0x0048, t01=0x00e0}
0x715e…7172 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0048, t01=0x00fa}
0x7172…718e Head {h00=0x0018, h01=0x0050, text=» RF(Z) INS250 BUFAR1«, t00=0x0048, t01=0x010e}
0x718e…71b4 Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 SELECT OTHER BUFFER «, t00=0x0048, t01=0x012a}
0x71b4…71c8 Head {h00=0x0010, h01=0x0050, text=»INS250 EQU *«, t00=0x0048, t01=0x0150}
0x71c8…71e6 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A14 FROM ADDR «, t00=0x0048, t01=0x0164}
0x71e6…7202 Head {h00=0x0018, h01=0x0050, text=» ADK A1,2 FROM ADDR «, t00=0x0048, t01=0x0182}
0x7202…7220 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A11 NR OF CHAR«, t00=0x0049, t01=0x000e}
0x7220…723a Head {h00=0x0016, h01=0x0050, text=» LDR A3,A5 TO ADDR«, t00=0x0049, t01=0x002c}
0x723a…7254 Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x0049, t01=0x0046}
0x7254…726c Head {h00=0x0014, h01=0x0050, text=»* WRITE BUFFER«, t00=0x0049, t01=0x0060}
0x726c…7276 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0078}
0x7276…729a Head {h00=0x0020, h01=0x0050, text=» LDR A8,A14 USE STACK AS ECB«, t00=0x0049, t01=0x0082}
0x729a…72ae Head {h00=0x0010, h01=0x0050, text=» SUKL A8,24 «, t00=0x0049, t01=0x00a6}
0x72ae…72d4 Head {h00=0x0022, h01=0x0050, text=» LC A2,FWTFNR,A6 VOL DEV CODE «, t00=0x0049, t01=0x00ba}
0x72d4…72e8 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0049, t01=0x00e0}
0x72e8…72fc Head {h00=0x0010, h01=0x0050, text=» STR A2,A8 «, t00=0x0049, t01=0x00f4}
0x72fc…7310 Head {h00=0x0010, h01=0x0050, text=» LDR A2,A13 «, t00=0x0049, t01=0x0108}
0x7310…7328 Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0049, t01=0x011c}
0x7328…734c Head {h00=0x0020, h01=0x0050, text=» ST A2,ECBBA,A8 SECTOR ADDR «, t00=0x0049, t01=0x0134}
0x734c…7370 Head {h00=0x0020, h01=0x0050, text=» LC A2,FDBBLZ,A6 BLOCK SIZE «, t00=0x0049, t01=0x0158}
0x7370…738a Head {h00=0x0016, h01=0x0050, text=» SLL A2,8 IN BYTE «, t00=0x0049, t01=0x017c}
0x738a…73a2 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBRL,A8 «, t00=0x004a, t01=0x0008}
0x73a2…73c4 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBSNR,A6 SECTOR NR«, t00=0x004a, t01=0x0020}
0x73c4…73e6 Head {h00=0x001e, h01=0x0050, text=» ST A2,ECBCW,A8 SECTOR NR «, t00=0x004a, t01=0x0042}
0x73e6…7400 Head {h00=0x0016, h01=0x0050, text=» LD A3,FDBSNR+2,A6«, t00=0x004a, t01=0x0064}
0x7400…7422 Head {h00=0x001e, h01=0x0050, text=» ST A3,ECBCW+2,A8 SECT NR «, t00=0x004a, t01=0x007e}
0x7422…7442 Head {h00=0x001c, h01=0x0050, text=» LDK A7,/95 WRITE , WAIT«, t00=0x004a, t01=0x00a0}
0x7442…744e Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x004a, t01=0x00c0}
0x744e…7462 Head {h00=0x0010, h01=0x0050, text=» DATA 15 FM «, t00=0x004a, t01=0x00cc}
0x7462…747e Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x004a, t01=0x00e0}
0x747e…749e Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x004a, t01=0x00fc}
0x749e…74b0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x004a, t01=0x011c}
0x74b0…74c8 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x004a, t01=0x012e}
0x74c8…74d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0146}
0x74d2…750c Head {h00=0x0036, h01=0x0050, text=»* IF SPILLED RECORD IS FREE, OPERATION IS READY «, t00=0x004a, t01=0x0150}
0x750c…7516 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x018a}
0x7516…753a (75, 0, 400) Head {h00=0x0020, h01=0x0050, text=» LDR A2,A10 RECORD AREA ADDR«, t00=0x004b, t01=0x0004}
0x753a…7556 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A11 REC LGTH«, t00=0x004b, t01=0x0028}
0x7556…757c Head {h00=0x0022, h01=0x0050, text=» SUK A2,1 ADDR OF STATUS CHAR «, t00=0x004b, t01=0x0044}
0x757c…7594 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A6«, t00=0x004b, t01=0x006a}
0x7594…75c0 Head {h00=0x0028, h01=0x0050, text=» ST A4,FDBRRO,A6 MAX OFFSET IN SECT «, t00=0x004b, t01=0x0082}
0x75c0…75d2 Head {h00=0x000e, h01=0x0050, text=» CCR A1,A2«, t00=0x004b, t01=0x00ae}
0x75d2…75f4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) INS400 FREE RECORD «, t00=0x004b, t01=0x00c0}
0x75f4…75fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00e2}
0x75fe…7618 Head {h00=0x0016, h01=0x0050, text=»* GET NEXT BLOCK«, t00=0x004b, t01=0x00ec}
0x7618…7622 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0106}
0x7622…763e Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x004b, t01=0x0110}
0x763e…765e Head {h00=0x001c, h01=0x0050, text=» LDR A3,A13 BUFFER ADDR «, t00=0x004b, t01=0x012c}
0x765e…7694 Head {h00=0x0032, h01=0x0050, text=» CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR«, t00=0x004b, t01=0x014c}
0x7694…76aa Head {h00=0x0012, h01=0x0050, text=» RF INS260 OK «, t00=0x004b, t01=0x0182}
0x76aa…76c0 Head {h00=0x0012, h01=0x0050, text=» RF DEL045 ERR«, t00=0x004c, t01=0x0008}
0x76c0…76d4 Head {h00=0x0010, h01=0x0050, text=»INS260 EQU *«, t00=0x004c, t01=0x001e}
0x76d4…76f8 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x004c, t01=0x0032}
0x76f8…770c Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x004c, t01=0x0056}
0x770c…7738 Head {h00=0x0028, h01=0x0050, text=» RB(Z) INS190 SWITCH RECORD BUFFERS «, t00=0x004c, t01=0x006a}
0x7738…774c Head {h00=0x0010, h01=0x0050, text=» SUR A12,A12«, t00=0x004c, t01=0x0096}
0x774c…775e Head {h00=0x000e, h01=0x0050, text=» RB INS200«, t00=0x004c, t01=0x00aa}
0x775e…776c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x00bc}
0x776c…7780 Head {h00=0x0010, h01=0x0050, text=»INS400 EQU *«, t00=0x004c, t01=0x00ca}
0x7780…778a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00de}
0x778a…77b6 Head {h00=0x0028, h01=0x0050, text=»* UPDATE LRN IF EOF IS ENCOUNTERED«, t00=0x004c, t01=0x00e8}
0x77b6…77c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0114}
0x77c0…77dc Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x004c, t01=0x011e}
0x77dc…77f4 Head {h00=0x0014, h01=0x0050, text=» CF A14,GTLGRN «, t00=0x004c, t01=0x013a}
0x77f4…780c Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x004c, t01=0x0152}
0x780c…7828 Head {h00=0x0018, h01=0x0050, text=» RF(L) INS430 NO EOF«, t00=0x004c, t01=0x016a}
0x7828…7842 Head {h00=0x0016, h01=0x0050, text=» RF(G) INS410 EOF «, t00=0x004c, t01=0x0186}
0x7842…785c Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x004d, t01=0x0010}
0x785c…787a Head {h00=0x001a, h01=0x0050, text=» RF(NG) INS430 NO EOF «, t00=0x004d, t01=0x002a}
0x787a…788e Head {h00=0x0010, h01=0x0050, text=»INS410 EQU *«, t00=0x004d, t01=0x0048}
0x788e…78b4 Head {h00=0x0022, h01=0x0050, text=» SC A2,FDBLRN,A6 LLAST REC NR «, t00=0x004d, t01=0x005c}
0x78b4…78d0 Head {h00=0x0018, h01=0x0050, text=» ST A3,FDBLRN+1,A6 «, t00=0x004d, t01=0x0082}
0x78d0…78f2 Head {h00=0x001e, h01=0x0050, text=» LDKL A1,EOFRC END OF FILE«, t00=0x004d, t01=0x009e}
0x78f2…7912 Head {h00=0x001c, h01=0x0050, text=» ORS A1,ECBRC,A9 TO USER«, t00=0x004d, t01=0x00c0}
0x7912…7920 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x00e0}
0x7920…7934 Head {h00=0x0010, h01=0x0050, text=»INS430 EQU *«, t00=0x004d, t01=0x00ee}
0x7934…793e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0102}
0x793e…7972 Head {h00=0x0030, h01=0x0050, text=»* UPDATE CRN-LINK FOR MOVED INDEX RECORDS «, t00=0x004d, t01=0x010c}
0x7972…797c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0140}
0x797c…79a0 Head {h00=0x0020, h01=0x0050, text=» LDKL A12,1 ADD ON E TO CRN «, t00=0x004d, t01=0x014a}
0x79a0…79b2 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x004d, t01=0x016e}
0x79b2…79d6 Head {h00=0x0020, h01=0x0050, text=» LDR A9,A3 LAST REC NR MOVED«, t00=0x004d, t01=0x0180}
0x79d6…79ee Head {h00=0x0014, h01=0x0050, text=» LD A10,-28,A14 «, t00=0x004e, t01=0x0014}
0x79ee…7a18 Head {h00=0x0026, h01=0x0050, text=» LD A11,-26,A14 FIRST REC NR MOVED«, t00=0x004e, t01=0x002c}
0x7a18…7a46 Head {h00=0x002a, h01=0x0050, text=» CF A14,CRNUPD ADD 1 TO RECORD NUMBERS«, t00=0x004e, t01=0x0056}
0x7a46…7a5a Head {h00=0x0010, h01=0x0050, text=»INS440 EQU *«, t00=0x004e, t01=0x0084}
0x7a5a…7a76 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB INDEX«, t00=0x004e, t01=0x0098}
0x7a76…7a96 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A13 BUFFER ADDR «, t00=0x004e, t01=0x00b4}
0x7a96…7ab8 Head {h00=0x001e, h01=0x0050, text=» CF A14,DMTRBU REL BUFFER «, t00=0x004e, t01=0x00d4}
0x7ab8…7ae6 Head {h00=0x002a, h01=0x0050, text=» ABL DMTAR5 ONE INDEX READY TAKE NEXT «, t00=0x004e, t01=0x00f6}
0x7ae6…7af4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004e, t01=0x0124}
0x7af4…7b22 Head {h00=0x002a, h01=0x0050, text=»DEL000 EQU * DELETE INDEX RECORD CONT «, t00=0x004e, t01=0x0132}
0x7b22…7b44 Head {h00=0x001e, h01=0x0050, text=» LDR A12,A5 USER ECB ADDR «, t00=0x004e, t01=0x0160}
0x7b44…7b56 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x004e, t01=0x0182}
0x7b56…7b6a (79, 0, 400) Head {h00=0x0010, h01=0x0050, text=»DEL010 EQU *«, t00=0x004f, t01=0x0004}
0x7b6a…7b90 Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) DMI036 KEY NOT FOUND «, t00=0x004f, t01=0x0018}
0x7b90…7b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x003e}
0x7b9a…7bbe Head {h00=0x0020, h01=0x0050, text=»* CHECK RECORD NR DATA REC«, t00=0x004f, t01=0x0048}
0x7bbe…7bc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x006c}
0x7bc8…7bdc Head {h00=0x0010, h01=0x0050, text=»DEL020 EQU *«, t00=0x004f, t01=0x0076}
0x7bdc…7bf4 Head {h00=0x0014, h01=0x0050, text=» LD A1,FDBRRO,A6«, t00=0x004f, t01=0x008a}
0x7bf4…7c06 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A3«, t00=0x004f, t01=0x00a2}
0x7c06…7c1e Head {h00=0x0014, h01=0x0050, text=» AD A1,FDBRLE,A6«, t00=0x004f, t01=0x00b4}
0x7c1e…7c44 Head {h00=0x0022, h01=0x0050, text=» ADK A1,7 BUFSTA-3=ADDR REC NR«, t00=0x004f, t01=0x00cc}
0x7c44…7c56 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x004f, t01=0x00f2}
0x7c56…7c78 Head {h00=0x001e, h01=0x0050, text=» CC A2,ECBCW+1,A12 REC NR «, t00=0x004f, t01=0x0104}
0x7c78…7c9c Head {h00=0x0020, h01=0x0050, text=» RF(NE) DEL030 WRONG RECORD «, t00=0x004f, t01=0x0126}
0x7c9c…7cb0 Head {h00=0x0010, h01=0x0050, text=» LC A2,1,A1 «, t00=0x004f, t01=0x014a}
0x7cb0…7cc2 Head {h00=0x000e, h01=0x0050, text=» ECR A2,A2«, t00=0x004f, t01=0x015e}
0x7cc2…7cdc Head {h00=0x0016, h01=0x0050, text=» LC A2,2,A1 REC NR«, t00=0x004f, t01=0x0170}
0x7cdc…7cf6 Head {h00=0x0016, h01=0x0050, text=» CW A2,ECBCW+2,A12«, t00=0x004f, t01=0x018a}
0x7cf6…7d18 Head {h00=0x001e, h01=0x0050, text=» RF(E) DEL200 RECORD FOUND«, t00=0x0050, t01=0x0014}
0x7d18…7d2c Head {h00=0x0010, h01=0x0050, text=»DEL030 EQU *«, t00=0x0050, t01=0x0036}
0x7d2c…7d3a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x004a}
0x7d3a…7d44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0058}
0x7d44…7d66 Head {h00=0x001e, h01=0x0050, text=»* CHECK IF NEXT KEY SAME«, t00=0x0050, t01=0x0062}
0x7d66…7d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0084}
0x7d70…7d90 Head {h00=0x001c, h01=0x0050, text=» CC A11,-1,A1 KEY LENGTH«, t00=0x0050, t01=0x008e}
0x7d90…7db8 Head {h00=0x0024, h01=0x0050, text=» RB(NE) DEL010 NEXT KEY NOT SAME«, t00=0x0050, t01=0x00ae}
0x7db8…7dd4 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0050, t01=0x00d6}
0x7dd4…7de8 Head {h00=0x0010, h01=0x0050, text=»DEL040 EQU *«, t00=0x0050, t01=0x00f2}
0x7de8…7e14 Head {h00=0x0028, h01=0x0050, text=» CF A14,RDNXTR GET NEXT INDEX RECORD«, t00=0x0050, t01=0x0106}
0x7e14…7e2a Head {h00=0x0012, h01=0x0050, text=» RF DEL050 OK «, t00=0x0050, t01=0x0132}
0x7e2a…7e4e Head {h00=0x0020, h01=0x0050, text=»DEL045 LDR A1,A5 ERROR CODE «, t00=0x0050, t01=0x0148}
0x7e4e…7e68 Head {h00=0x0016, h01=0x0050, text=» ABL DMI036 ERROR «, t00=0x0050, t01=0x016c}
0x7e68…7e7c Head {h00=0x0010, h01=0x0050, text=»DEL050 EQU *«, t00=0x0050, t01=0x0186}
0x7e7c…7e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x000a}
0x7e86…7eaa Head {h00=0x0020, h01=0x0050, text=»* CHECK IF RECORD IS USED «, t00=0x0051, t01=0x0014}
0x7eaa…7eb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0038}
0x7eb4…7ed8 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x0051, t01=0x0042}
0x7ed8…7eea Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0051, t01=0x0066}
0x7eea…7f02 Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0051, t01=0x0078}
0x7f02…7f2a Head {h00=0x0024, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR OF STATUS «, t00=0x0051, t01=0x0090}
0x7f2a…7f3e Head {h00=0x0010, h01=0x0050, text=» LDK A5,/FF «, t00=0x0051, t01=0x00b8}
0x7f3e…7f50 Head {h00=0x000e, h01=0x0050, text=» CCR A5,A2«, t00=0x0051, t01=0x00cc}
0x7f50…7f6a Head {h00=0x0016, h01=0x0050, text=» RB(E) DEL020 USED«, t00=0x0051, t01=0x00de}
0x7f6a…7f82 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A1«, t00=0x0051, t01=0x00f8}
0x7f82…7fae Head {h00=0x0028, h01=0x0050, text=» ST A4,FDBRRO,A1 LAST REC IN SECTOR «, t00=0x0051, t01=0x0110}
0x7fae…7fca Head {h00=0x0018, h01=0x0050, text=» RB DEL040 NEXT REC «, t00=0x0051, t01=0x013c}
0x7fca…7fd8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x0158}
0x7fd8…7ffa Head {h00=0x001e, h01=0x0050, text=»DEL200 EQU * RECORD FOUND «, t00=0x0051, t01=0x0166}
0x7ffa…8024 Head {h00=0x0026, h01=0x0050, text=»* SET RC BIT 6 IF NEXT KEY SAME «, t00=0x0051, t01=0x0188}
0x8024…802e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0022}
0x802e…8040 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0052, t01=0x002c}
0x8040…8064 Head {h00=0x0020, h01=0x0050, text=» LC A7,-1,A1 NR OF SAME CHAR«, t00=0x0052, t01=0x003e}
0x8064…809a Head {h00=0x0032, h01=0x0050, text=» ST A7,16,A14 SAVE IN RECORD BUFFER AFTER ECB «, t00=0x0052, t01=0x0062}
0x809a…80b8 Head {h00=0x001a, h01=0x0050, text=» CWR A11,A7 KEY LENGTH«, t00=0x0052, t01=0x0098}
0x80b8…80e0 Head {h00=0x0024, h01=0x0050, text=» RF(NE) DEL220 NEXT KEY NOT SAME«, t00=0x0052, t01=0x00b6}
0x80e0…80f8 Head {h00=0x0014, h01=0x0050, text=» LDKL A4,NXTKYS «, t00=0x0052, t01=0x00de}
0x80f8…8120 Head {h00=0x0024, h01=0x0050, text=» ORS A4,ECBRC,A12 NEXT KEY SAME «, t00=0x0052, t01=0x00f6}
0x8120…8134 Head {h00=0x0010, h01=0x0050, text=»DEL220 EQU *«, t00=0x0052, t01=0x011e}
0x8134…813e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0132}
0x813e…8166 Head {h00=0x0024, h01=0x0050, text=»* MOVE UP RECORDS OVER DELETED«, t00=0x0052, t01=0x013c}
0x8166…8170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0164}
0x8170…8198 Head {h00=0x0024, h01=0x0050, text=» ADKL A11,7 TOTAL RECORD LENGTH «, t00=0x0052, t01=0x016e}
0x8198…81ac Head {h00=0x0010, h01=0x0050, text=» LDR A3,A13 «, t00=0x0053, t01=0x0008}
0x81ac…81c4 Head {h00=0x0014, h01=0x0050, text=» ADKL A3,BUFSTA «, t00=0x0053, t01=0x001c}
0x81c4…81e4 Head {h00=0x001c, h01=0x0050, text=» AD A3,FDBRRO,A6 TO ADDR«, t00=0x0053, t01=0x0034}
0x81e4…81f6 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0053, t01=0x0054}
0x81f6…8214 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A11 FROM ADDR «, t00=0x0053, t01=0x0066}
0x8214…822c Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBMRO,A6«, t00=0x0053, t01=0x0084}
0x822c…8250 Head {h00=0x0020, h01=0x0050, text=» SU A2,FDBRRO,A6 NR OF CHAR «, t00=0x0053, t01=0x009c}
0x8250…826a Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x0053, t01=0x00c0}
0x826a…8274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00da}
0x8274…8294 Head {h00=0x001c, h01=0x0050, text=»* SET LAST RECORD FREE«, t00=0x0053, t01=0x00e4}
0x8294…829e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0104}
0x829e…82b2 Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0053, t01=0x010e}
0x82b2…82c4 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0053, t01=0x0122}
0x82c4…82d6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0053, t01=0x0134}
0x82d6…82f4 Head {h00=0x001a, h01=0x0050, text=» SCR A1,A3 STATUS FREE«, t00=0x0053, t01=0x0146}
0x82f4…82fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0164}
0x82fe…8326 Head {h00=0x0024, h01=0x0050, text=»* UPDATE CRN FOR MOVED RECORDS«, t00=0x0053, t01=0x016e}
0x8326…8330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0008}
0x8330…834c Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0054, t01=0x0012}
0x834c…836e Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0054, t01=0x002e}
0x836e…8382 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A2 «, t00=0x0054, t01=0x0050}
0x8382…83a8 Head {h00=0x0022, h01=0x0050, text=» LDR A11,A3 FIRST REC NR MOVED«, t00=0x0054, t01=0x0064}
0x83a8…83cc Head {h00=0x0020, h01=0x0050, text=» LD A12,FDBRRO,A6 OLD OFFSET«, t00=0x0054, t01=0x008a}
0x83cc…83e4 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A6«, t00=0x0054, t01=0x00ae}
0x83e4…8408 Head {h00=0x0020, h01=0x0050, text=» ST A4,FDBRRO,A6 MAX OFFSET «, t00=0x0054, t01=0x00c6}
0x8408…8430 Head {h00=0x0024, h01=0x0050, text=» CF A14,GTLGRN LAST REC NR MOVED«, t00=0x0054, t01=0x00ea}
0x8430…8442 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0054, t01=0x0112}
0x8442…845c Head {h00=0x0016, h01=0x0050, text=» LDR A9,A3 REC NR «, t00=0x0054, t01=0x0124}
0x845c…8482 Head {h00=0x0022, h01=0x0050, text=» ST A12,FDBRRO,A6 RESET OFFSET«, t00=0x0054, t01=0x013e}
0x8482…8496 Head {h00=0x0010, h01=0x0050, text=» LDKL A12,-1«, t00=0x0054, t01=0x0164}
0x8496…84c0 Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNUPD UPDATE CRN BUFFERS «, t00=0x0054, t01=0x0178}
0x84c0…84e8 Head {h00=0x0024, h01=0x0050, text=» LDKL A12,1 MARK BUFFER CHANGED «, t00=0x0055, t01=0x0012}
0x84e8…84fc Head {h00=0x0010, h01=0x0050, text=»DEL240 EQU *«, t00=0x0055, t01=0x003a}
0x84fc…8514 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBRRO,A5«, t00=0x0055, t01=0x004e}
0x8514…853c Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DEL290 NOT FIRST RECORD «, t00=0x0055, t01=0x0066}
0x853c…8552 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A5 FDB«, t00=0x0055, t01=0x008e}
0x8552…8574 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0055, t01=0x00a4}
0x8574…8586 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0055, t01=0x00c6}
0x8586…8598 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0055, t01=0x00d8}
0x8598…85aa Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x0055, t01=0x00ea}
0x85aa…85bc Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0055, t01=0x00fc}
0x85bc…85e4 Head {h00=0x0024, h01=0x0050, text=» CF A14,DSUMOD A1,A2 = A1,A2 - 1«, t00=0x0055, t01=0x010e}
0x85e4…8604 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DEL600 FILE START«, t00=0x0055, t01=0x0136}
0x8604…8620 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 FDB ADDR «, t00=0x0055, t01=0x0156}
0x8620…8644 Head {h00=0x0020, h01=0x0050, text=» CF A14,CALSNO GET SECTOR NR«, t00=0x0055, t01=0x0172}
0x8644…8660 Head {h00=0x0018, h01=0x0050, text=» LDR A5,A6 FDB ADDR «, t00=0x0056, t01=0x0008}
0x8660…8672 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0056, t01=0x0024}
0x8672…8694 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DEL600 FILE START «, t00=0x0056, t01=0x0036}
0x8694…86a8 Head {h00=0x0010, h01=0x0050, text=» LDR A8,A14 «, t00=0x0056, t01=0x0058}
0x86a8…86c4 Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 ECB ADDR «, t00=0x0056, t01=0x006c}
0x86c4…86d8 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0056, t01=0x0088}
0x86d8…8700 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DEL245 BUFFER NOT CHANGED«, t00=0x0056, t01=0x009c}
0x8700…870a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00c4}
0x870a…8722 Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x0056, t01=0x00ce}
0x8722…872c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00e6}
0x872c…874a Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x0056, t01=0x00f0}
0x874a…8756 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0056, t01=0x010e}
0x8756…876a Head {h00=0x0010, h01=0x0050, text=» DATA 15 FM «, t00=0x0056, t01=0x011a}
0x876a…8780 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A5 FDB«, t00=0x0056, t01=0x012e}
0x8780…87a0 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x0056, t01=0x0144}
0x87a0…87b2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0056, t01=0x0164}
0x87b2…87ca Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0056, t01=0x0176}
0x87ca…87f6 Head {h00=0x0028, h01=0x0050, text=» SUR A12,A12 BUFFER NOT CHANGED YET «, t00=0x0056, t01=0x018e}
0x87f6…880a Head {h00=0x0010, h01=0x0050, text=»DEL245 EQU *«, t00=0x0057, t01=0x002a}
0x880a…881e Head {h00=0x0010, h01=0x0050, text=» LDR A3,A13 «, t00=0x0057, t01=0x003e}
0x881e…8844 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0057, t01=0x0052}
0x8844…884e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0078}
0x884e…886e Head {h00=0x001c, h01=0x0050, text=»* GET PREVIOUS SECTOR «, t00=0x0057, t01=0x0082}
0x886e…8878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00a2}
0x8878…8894 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x0057, t01=0x00ac}
0x8894…88a6 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0057, t01=0x00c8}
0x88a6…88c8 Head {h00=0x001e, h01=0x0050, text=» CF A14,RDNXTR GET SECTOR «, t00=0x0057, t01=0x00da}
0x88c8…88de Head {h00=0x0012, h01=0x0050, text=» RF DEL250 OK «, t00=0x0057, t01=0x00fc}
0x88de…88fa Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0057, t01=0x0112}
0x88fa…890c Head {h00=0x000e, h01=0x0050, text=» RB DEL045«, t00=0x0057, t01=0x012e}
0x890c…8920 Head {h00=0x0010, h01=0x0050, text=»DEL250 EQU *«, t00=0x0057, t01=0x0140}
0x8920…8936 Head {h00=0x0012, h01=0x0050, text=» LDR A5,A1 FDB«, t00=0x0057, t01=0x0154}
0x8936…895a Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x0057, t01=0x016a}
0x895a…8972 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A5«, t00=0x0057, t01=0x018e}
0x8972…8984 Head {h00=0x000e, h01=0x0050, text=» RF DEL300«, t00=0x0058, t01=0x0016}
0x8984…8998 Head {h00=0x0010, h01=0x0050, text=»DEL290 EQU *«, t00=0x0058, t01=0x0028}
0x8998…89b0 Head {h00=0x0014, h01=0x0050, text=» SU A4,FDBRLE,A5«, t00=0x0058, t01=0x003c}
0x89b0…89c2 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0058, t01=0x0054}
0x89c2…89d6 Head {h00=0x0010, h01=0x0050, text=»DEL300 EQU *«, t00=0x0058, t01=0x0066}
0x89d6…8a04 Head {h00=0x002a, h01=0x0050, text=» ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET«, t00=0x0058, t01=0x007a}
0x8a04…8a1c Head {h00=0x0014, h01=0x0050, text=» ADKL A4,BUFSTA «, t00=0x0058, t01=0x00a8}
0x8a1c…8a3c Head {h00=0x001c, h01=0x0050, text=» ADR A4,A13 RECORD ADDR «, t00=0x0058, t01=0x00c0}
0x8a3c…8a66 Head {h00=0x0026, h01=0x0050, text=» AD A4,FDBRLE,A5 STATUS CHAR ADDR «, t00=0x0058, t01=0x00e0}
0x8a66…8a7a Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0058, t01=0x010a}
0x8a7a…8a8c Head {h00=0x000e, h01=0x0050, text=» CCR A2,A4«, t00=0x0058, t01=0x011e}
0x8a8c…8aa8 Head {h00=0x0018, h01=0x0050, text=» RB(NE) DEL240 FREE «, t00=0x0058, t01=0x0130}
0x8aa8…8ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x014c}
0x8ab2…8aca Head {h00=0x0014, h01=0x0050, text=»* SET CURRENCY«, t00=0x0058, t01=0x0156}
0x8aca…8ad4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x016e}
0x8ad4…8af2 Head {h00=0x001a, h01=0x0050, text=» LDR A9,A4 STATUS ADDR«, t00=0x0058, t01=0x0178}
0x8af2…8b16 Head {h00=0x0020, h01=0x0050, text=» LD A1,FDBADF,A5 FDB DATA F «, t00=0x0059, t01=0x0008}
0x8b16…8b3c Head {h00=0x0022, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER «, t00=0x0059, t01=0x002c}
0x8b3c…8b62 Head {h00=0x0022, h01=0x0050, text=» LC A1,FWTFNR,A5 INDEX FILE NR«, t00=0x0059, t01=0x0052}
0x8b62…8b8a Head {h00=0x0024, h01=0x0050, text=» CC A1,CRNCIF,A2 LAST REF INDEX «, t00=0x0059, t01=0x0078}
0x8b8a…8bae Head {h00=0x0020, h01=0x0050, text=» RF(NE) DEL350 NOT THIS IND «, t00=0x0059, t01=0x00a0}
0x8bae…8bb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00c4}
0x8bb8…8bd4 Head {h00=0x0018, h01=0x0050, text=»* UPDATE CURRENCY «, t00=0x0059, t01=0x00ce}
0x8bd4…8bde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00ea}
0x8bde…8bfa Head {h00=0x0018, h01=0x0050, text=» LDR A8,A2 CRN ADDR «, t00=0x0059, t01=0x00f4}
0x8bfa…8c12 Head {h00=0x0014, h01=0x0050, text=» LDR A1,A5 INDEX«, t00=0x0059, t01=0x0110}
0x8c12…8c34 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0059, t01=0x0128}
0x8c34…8c4e Head {h00=0x0016, h01=0x0050, text=» SC A2,CRNCIF+1,A8«, t00=0x0059, t01=0x014a}
0x8c4e…8c70 Head {h00=0x001e, h01=0x0050, text=» ST A3,CRNCIF+2,A8 REC NR «, t00=0x0059, t01=0x0164}
0x8c70…8c84 Head {h00=0x0010, h01=0x0050, text=»DEL350 EQU *«, t00=0x0059, t01=0x0186}
0x8c84…8cb6 Head {h00=0x002e, h01=0x0050, text=» LC A2,17,A14 NR OF SAME IN DELETED RECORD«, t00=0x005a, t01=0x000a}
0x8cb6…8cdc Head {h00=0x0022, h01=0x0050, text=»* WAS SAVED AT LABEL DEL200 «, t00=0x005a, t01=0x003c}
0x8cdc…8cf0 Head {h00=0x0010, h01=0x0050, text=» CC A2,-4,A9«, t00=0x005a, t01=0x0062}
0x8cf0…8d06 Head {h00=0x0012, h01=0x0050, text=» RF(NL) DEL600«, t00=0x005a, t01=0x0076}
0x8d06…8d32 Head {h00=0x0028, h01=0x0050, text=» SC A2,-4,A9 MAKE NR OF SAME SMALLER«, t00=0x005a, t01=0x008c}
0x8d32…8d52 Head {h00=0x001c, h01=0x0050, text=» RF DEL700 WRITE SECTOR «, t00=0x005a, t01=0x00b8}
0x8d52…8d66 Head {h00=0x0010, h01=0x0050, text=»DEL600 EQU *«, t00=0x005a, t01=0x00d8}
0x8d66…8d7a Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x005a, t01=0x00ec}
0x8d7a…8da2 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DEL900 BUFFER NOT CHANGED«, t00=0x005a, t01=0x0100}
0x8da2…8dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0128}
0x8dac…8dc4 Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x005a, t01=0x0132}
0x8dc4…8dce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x014a}
0x8dce…8de2 Head {h00=0x0010, h01=0x0050, text=»DEL700 EQU *«, t00=0x005a, t01=0x0154}
0x8de2…8df6 Head {h00=0x0010, h01=0x0050, text=» LDR A8,A14 «, t00=0x005a, t01=0x0168}
0x8df6…8e12 Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 ECB ADDR «, t00=0x005a, t01=0x017c}
0x8e12…8e30 Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x005b, t01=0x0008}
0x8e30…8e3c Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x005b, t01=0x0026}
0x8e3c…8e50 Head {h00=0x0010, h01=0x0050, text=» DATA 15 FM «, t00=0x005b, t01=0x0032}
0x8e50…8e6c Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x005b, t01=0x0046}
0x8e6c…8e8c Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x005b, t01=0x0062}
0x8e8c…8e9e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x005b, t01=0x0082}
0x8e9e…8eb6 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x005b, t01=0x0094}
0x8eb6…8eca Head {h00=0x0010, h01=0x0050, text=»DEL900 EQU *«, t00=0x005b, t01=0x00ac}
0x8eca…8ede Head {h00=0x0010, h01=0x0050, text=» ABL INS440 «, t00=0x005b, t01=0x00c0}
0x8ede…8eea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x00d4}
0x8eea…8ef6 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x005b, t01=0x00e0}
0x8ef6…8efa Head {h00=0x4004, h01=0x0000}
0x8efa…8efe 00 5b 00 ec ┆ [ ┆
0x8efe…8f06 (92, 1, 8) 20 04 00 00 00 5c 00 04 ┆ ┆