|
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: 36610 (0x8f02)
Notes: pts_type(SC)
Names: »DMTASK.SC«
└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
└─⟦this⟧ »TOSSWORK/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 X:B RECBFZ EQU X:C 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, 400) 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…0e08 Head {h00=0x0012, h01=0x0050, text=»INDXAC EQU X:B«, t00=0x0008, t01=0x017a}
0x0e08…0e40 Head {h00=0x0034, h01=0x0050, text=»RECBFZ EQU X:C INDEX RECORD BUFFER SIZE IN WORDS«, t00=0x0008, t01=0x0190}
0x0e40…0e74 Head {h00=0x0030, h01=0x0050, text=»INSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1«, t00=0x0009, t01=0x0038}
0x0e74…0e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x006c}
0x0e7e…0e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0076}
0x0e88…0e92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0080}
0x0e92…0ec4 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0009, t01=0x008a}
0x0ec4…0ef2 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0009, t01=0x00bc}
0x0ef2…0efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ea}
0x0efc…0f10 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0009, t01=0x00f4}
0x0f10…0f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0108}
0x0f1a…0f28 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0112}
0x0f28…0f32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0120}
0x0f32…0f52 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x012a}
0x0f52…0f72 Head {h00=0x001c, h01=0x0050, text=»* DATA DEFINITIONS *«, t00=0x0009, t01=0x014a}
0x0f72…0f92 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x016a}
0x0f92…0f9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x018a}
0x0f9c…0fda (10, 0, 400) Head {h00=0x003a, h01=0x0050, text=»* THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE«, t00=0x000a, t01=0x0004}
0x0fda…1004 Head {h00=0x0026, h01=0x0050, text=»* POSITION IN TIODM-TABLE TIODMF«, t00=0x000a, t01=0x0042}
0x1004…100e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006c}
0x100e…1022 Head {h00=0x0010, h01=0x0050, text=»ORDERS EQU *«, t00=0x000a, t01=0x0076}
0x1022…103a Head {h00=0x0014, h01=0x0050, text=»QRR EQU *-ORDERS«, t00=0x000a, t01=0x008a}
0x103a…105a Head {h00=0x001c, h01=0x0050, text=» DATA DMRDRE RANDOM READ«, t00=0x000a, t01=0x00a2}
0x105a…1072 Head {h00=0x0014, h01=0x0050, text=»QSR EQU *-ORDERS«, t00=0x000a, t01=0x00c2}
0x1072…1096 Head {h00=0x0020, h01=0x0050, text=» DATA DMSQRE SEQUENTIAL READ«, t00=0x000a, t01=0x00da}
0x1096…10ac Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000a, t01=0x00fe}
0x10ac…10c6 Head {h00=0x0016, h01=0x0050, text=»QIRR EQU *-ORDERS «, t00=0x000a, t01=0x0114}
0x10c6…10e6 Head {h00=0x001c, h01=0x0050, text=» DATA DMIRR INDEXED READ«, t00=0x000a, t01=0x012e}
0x10e6…1100 Head {h00=0x0016, h01=0x0050, text=»QIRN EQU *-ORDERS «, t00=0x000a, t01=0x014e}
0x1100…1126 Head {h00=0x0022, h01=0x0050, text=» DATA DMIRN INDEXED READ NEXT «, t00=0x000a, t01=0x0168}
0x1126…1132 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000a, t01=0x018e}
0x1132…1148 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000b, t01=0x000a}
0x1148…1164 Head {h00=0x0018, h01=0x0050, text=» DATA DMTERR,DMTERR «, t00=0x000b, t01=0x0020}
0x1164…1170 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x003c}
0x1170…1188 Head {h00=0x0014, h01=0x0050, text=»QRW EQU *-ORDERS«, t00=0x000b, t01=0x0048}
0x1188…11aa Head {h00=0x001e, h01=0x0050, text=» DATA DMRDWR RANDOM WRITE «, t00=0x000b, t01=0x0060}
0x11aa…11c2 Head {h00=0x0014, h01=0x0050, text=»QSW EQU *-ORDERS«, t00=0x000b, t01=0x0082}
0x11c2…11e8 Head {h00=0x0022, h01=0x0050, text=» DATA DMSQWR SEQUENTIAL WRITE «, t00=0x000b, t01=0x009a}
0x11e8…11fe Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000b, t01=0x00c0}
0x11fe…1218 Head {h00=0x0016, h01=0x0050, text=»QINS EQU *-ORDERS «, t00=0x000b, t01=0x00d6}
0x1218…123a Head {h00=0x001e, h01=0x0050, text=» DATA DMINS INDEXED INSERT«, t00=0x000b, t01=0x00f0}
0x123a…1246 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0112}
0x1246…125c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000b, t01=0x011e}
0x125c…1270 Head {h00=0x0010, h01=0x0050, text=» DATA DMTERR«, t00=0x000b, t01=0x0134}
0x1270…127c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0148}
0x127c…129a Head {h00=0x001a, h01=0x0050, text=» DATA DMTERR RESERVED «, t00=0x000b, t01=0x0154}
0x129a…12b4 Head {h00=0x0016, h01=0x0050, text=»QREWR EQU *-ORDERS«, t00=0x000b, t01=0x0172}
0x12b4…12d8 Head {h00=0x0020, h01=0x0050, text=» DATA DMREWR RANDOM REWRITE «, t00=0x000b, t01=0x018c}
0x12d8…12ee Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000c, t01=0x0020}
0x12ee…1308 Head {h00=0x0016, h01=0x0050, text=»QIRW EQU *-ORDERS «, t00=0x000c, t01=0x0036}
0x1308…132c Head {h00=0x0020, h01=0x0050, text=» DATA DMIRW INDEXED REWRITE «, t00=0x000c, t01=0x0050}
0x132c…1338 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0074}
0x1338…134e Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000c, t01=0x0080}
0x134e…1362 Head {h00=0x0010, h01=0x0050, text=» DATA DMTERR«, t00=0x000c, t01=0x0096}
0x1362…136e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00aa}
0x136e…1386 Head {h00=0x0014, h01=0x0050, text=»QRD EQU *-ORDERS«, t00=0x000c, t01=0x00b6}
0x1386…13a8 Head {h00=0x001e, h01=0x0050, text=» DATA DMRDDE RANDOM DELETE«, t00=0x000c, t01=0x00ce}
0x13a8…13be Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000c, t01=0x00f0}
0x13be…13d8 Head {h00=0x0016, h01=0x0050, text=»QDEL EQU *-ORDERS «, t00=0x000c, t01=0x0106}
0x13d8…13fa Head {h00=0x001e, h01=0x0050, text=» DATA DMDEL INDEXED DELETE«, t00=0x000c, t01=0x0120}
0x13fa…1406 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0142}
0x1406…141c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000c, t01=0x014e}
0x141c…1430 Head {h00=0x0010, h01=0x0050, text=» DATA DMTERR«, t00=0x000c, t01=0x0164}
0x1430…143c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0178}
0x143c…1458 Head {h00=0x0018, h01=0x0050, text=»QSTDIR EQU *-ORDERS «, t00=0x000c, t01=0x0184}
0x1458…147a Head {h00=0x001e, h01=0x0050, text=» DATA DMSTDI START DIRECT «, t00=0x000d, t01=0x0010}
0x147a…1490 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x000d, t01=0x0032}
0x1490…14ac Head {h00=0x0018, h01=0x0050, text=»QSTIND EQU *-ORDERS «, t00=0x000d, t01=0x0048}
0x14ac…14ce Head {h00=0x001e, h01=0x0050, text=» DATA DMSTIN START INDEXED«, t00=0x000d, t01=0x0064}
0x14ce…14da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0086}
0x14da…14f0 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x000d, t01=0x0092}
0x14f0…1504 Head {h00=0x0010, h01=0x0050, text=» DATA DMTERR«, t00=0x000d, t01=0x00a8}
0x1504…1510 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x00bc}
0x1510…151a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c8}
0x151a…1552 Head {h00=0x0034, h01=0x0050, text=»* FOLLOWING LABELS ARE FOUND IN MODULE DMOPCL «, t00=0x000d, t01=0x00d2}
0x1552…155c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x010a}
0x155c…1576 Head {h00=0x0016, h01=0x0050, text=»QOPEN EQU *-ORDERS«, t00=0x000d, t01=0x0114}
0x1576…1590 Head {h00=0x0016, h01=0x0050, text=» DATA DMOPEN OPEN «, t00=0x000d, t01=0x012e}
0x1590…15a8 Head {h00=0x0014, h01=0x0050, text=»QCL EQU *-ORDERS«, t00=0x000d, t01=0x0148}
0x15a8…15c2 Head {h00=0x0016, h01=0x0050, text=» DATA DMCLOS CLOSE«, t00=0x000d, t01=0x0160}
0x15c2…15f0 Head {h00=0x002a, h01=0x0050, text=» DATA DMTERR READ STATUS DONE IN TIODM«, t00=0x000d, t01=0x017a}
0x15f0…160a Head {h00=0x0016, h01=0x0050, text=»QRFP EQU *-ORDERS «, t00=0x000e, t01=0x0018}
0x160a…1632 Head {h00=0x0024, h01=0x0050, text=» DATA DMRFP READ FILE PARAMETERS«, t00=0x000e, t01=0x0032}
0x1632…1640 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x005a}
0x1640…1656 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000e, t01=0x0068}
0x1656…166c Head {h00=0x0012, h01=0x0050, text=»* DMTASK *«, t00=0x000e, t01=0x007e}
0x166c…1682 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000e, t01=0x0094}
0x1682…168c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00aa}
0x168c…16a0 Head {h00=0x0010, h01=0x0050, text=»DMTASK EQU *«, t00=0x000e, t01=0x00b4}
0x16a0…16aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c8}
0x16aa…16c6 Head {h00=0x0018, h01=0x0050, text=»* SET UP A14 STACK«, t00=0x000e, t01=0x00d2}
0x16c6…16d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ee}
0x16d0…16dc Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x000e, t01=0x00f8}
0x16dc…16f2 Head {h00=0x0012, h01=0x0050, text=» CF A15,GETA14«, t00=0x000e, t01=0x0104}
0x16f2…16fe Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x000e, t01=0x011a}
0x16fe…171a Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x000e, t01=0x0126}
0x171a…1732 Head {h00=0x0014, h01=0x0050, text=» LD A5,FDBRRO,A6«, t00=0x000e, t01=0x0142}
0x1732…1762 Head {h00=0x002c, h01=0x0050, text=» RF(N) DMT090 FOR ORDERS XR (SEE TIODM)«, t00=0x000e, t01=0x015a}
0x1762…1788 Head {h00=0x0022, h01=0x0050, text=»* AND RFP,OPEN,STARTINDEXED «, t00=0x000e, t01=0x018a}
0x1788…17aa Head {h00=0x001e, h01=0x0050, text=» LD A4,FDBADF,A6 DATA FILE«, t00=0x000f, t01=0x0020}
0x17aa…17d8 Head {h00=0x002a, h01=0x0050, text=» CM FDBKA,A4 MARK 1ST PASS INDEXED DEL«, t00=0x000f, t01=0x0042}
0x17d8…17ec Head {h00=0x0010, h01=0x0050, text=»DMT020 EQU *«, t00=0x000f, t01=0x0070}
0x17ec…17f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0084}
0x17f6…1836 Head {h00=0x003c, h01=0x0050, text=»* LOOP ENTRY FOR INDEXED READ,INDEXED NEXT,INDEXED DEL«, t00=0x000f, t01=0x008e}
0x1836…1856 Head {h00=0x001c, h01=0x0050, text=»* START, AND SEQ READ «, t00=0x000f, t01=0x00ce}
0x1856…1860 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ee}
0x1860…187e Head {h00=0x001a, h01=0x0050, text=» LD A7,DWTOR,A1 ORDER «, t00=0x000f, t01=0x00f8}
0x187e…1892 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x000f, t01=0x0116}
0x1892…18a6 Head {h00=0x0010, h01=0x0050, text=» SUK A7,QSR «, t00=0x000f, t01=0x012a}
0x18a6…18d0 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SQR430 NOT SEQUENTIAL READ«, t00=0x000f, t01=0x013e}
0x18d0…18f6 Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB ADDR«, t00=0x000f, t01=0x0168}
0x18f6…1900 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x018e}
0x1900…1918 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A9 «, t00=0x0010, t01=0x0008}
0x1918…1938 Head {h00=0x001c, h01=0x0050, text=» LD A3,ECBCW+2,A9 REC NR«, t00=0x0010, t01=0x0020}
0x1938…1950 Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x0010, t01=0x0040}
0x1950…196c Head {h00=0x0018, h01=0x0050, text=» RF(L) SQR430 NO EOF«, t00=0x0010, t01=0x0058}
0x196c…1986 Head {h00=0x0016, h01=0x0050, text=» RF(G) SQR410 EOF «, t00=0x0010, t01=0x0074}
0x1986…19a0 Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x0010, t01=0x008e}
0x19a0…19be Head {h00=0x001a, h01=0x0050, text=» RF(NG) SQR430 NO EOF «, t00=0x0010, t01=0x00a8}
0x19be…19d2 Head {h00=0x0010, h01=0x0050, text=»SQR410 EQU *«, t00=0x0010, t01=0x00c6}
0x19d2…19ee Head {h00=0x0018, h01=0x0050, text=» LDKL A1,EOFERR EOF «, t00=0x0010, t01=0x00da}
0x19ee…1a06 Head {h00=0x0014, h01=0x0050, text=» ABL DMTERX ERR «, t00=0x0010, t01=0x00f6}
0x1a06…1a1a Head {h00=0x0010, h01=0x0050, text=»SQR430 EQU *«, t00=0x0010, t01=0x010e}
0x1a1a…1a30 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/CFFF«, t00=0x0010, t01=0x0122}
0x1a30…1a58 Head {h00=0x0024, h01=0x0050, text=» ANS A2,FDBDBR,A6 RELEASE BUFFER«, t00=0x0010, t01=0x0138}
0x1a58…1a6a Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0010, t01=0x0160}
0x1a6a…1a8a Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0010, t01=0x0172}
0x1a8a…1ab2 (17, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CF A14,GTBKBU GET BLOCK BUFFER «, t00=0x0011, t01=0x0004}
0x1ab2…1ac4 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0011, t01=0x002c}
0x1ac4…1aec Head {h00=0x0024, h01=0x0050, text=» RF(N) DMT030 NO DATA IN BUFFER «, t00=0x0011, t01=0x003e}
0x1aec…1afa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0066}
0x1afa…1b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0074}
0x1b04…1b2a Head {h00=0x0022, h01=0x0050, text=»* DELAYED BUFFER IS WRITTEN «, t00=0x0011, t01=0x007e}
0x1b2a…1b54 Head {h00=0x0026, h01=0x0050, text=»* IF IT IS NOT THE WANTED BLOCK «, t00=0x0011, t01=0x00a4}
0x1b54…1b5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ce}
0x1b5e…1b80 Head {h00=0x001e, h01=0x0050, text=» LC A7,BUFOR,A3 DELAY FLAG«, t00=0x0011, t01=0x00d8}
0x1b80…1b92 Head {h00=0x000e, h01=0x0050, text=» ANK A7,/3«, t00=0x0011, t01=0x00fa}
0x1b92…1bb0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) DMT080 NO DELAY«, t00=0x0011, t01=0x010c}
0x1bb0…1bca Head {h00=0x0016, h01=0x0050, text=» CM BUFOR,A3 RESET«, t00=0x0011, t01=0x012a}
0x1bca…1bdc Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x0011, t01=0x0144}
0x1bdc…1c00 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DMT070 RIGHT SECTOR «, t00=0x0011, t01=0x0156}
0x1c00…1c20 Head {h00=0x001c, h01=0x0050, text=» LD A7,BUFSNR,A3 SECT NR«, t00=0x0011, t01=0x017a}
0x1c20…1c38 Head {h00=0x0014, h01=0x0050, text=» ST A7,ECBCW,A8 «, t00=0x0012, t01=0x000a}
0x1c38…1c52 Head {h00=0x0016, h01=0x0050, text=» LD A7,BUFSNR+2,A3«, t00=0x0012, t01=0x0022}
0x1c52…1c6c Head {h00=0x0016, h01=0x0050, text=» ST A7,ECBCW+2,A8 «, t00=0x0012, t01=0x003c}
0x1c6c…1c8a Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x0012, t01=0x0056}
0x1c8a…1c96 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0012, t01=0x0074}
0x1c96…1ca6 Head {h00=0x000c, h01=0x0050, text=» DATA 15«, t00=0x0012, t01=0x0080}
0x1ca6…1cde Head {h00=0x0034, h01=0x0050, text=» CF A14,DMTIOT RET CODE CHECK AND RESET SECT NR «, t00=0x0012, t01=0x0090}
0x1cde…1cf0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0012, t01=0x00c8}
0x1cf0…1d0c Head {h00=0x0018, h01=0x0050, text=» ABL(NZ) DMTERR ERR «, t00=0x0012, t01=0x00da}
0x1d0c…1d32 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0012, t01=0x00f6}
0x1d32…1d4e Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0012, t01=0x011c}
0x1d4e…1d70 Head {h00=0x001e, h01=0x0050, text=» RB DMT020 GET NEW BUFFER «, t00=0x0012, t01=0x0138}
0x1d70…1d7e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x015a}
0x1d7e…1d92 Head {h00=0x0010, h01=0x0050, text=»DMT030 EQU *«, t00=0x0012, t01=0x0168}
0x1d92…1db4 Head {h00=0x001e, h01=0x0050, text=»* READ BLOCK INTO BUFFER«, t00=0x0012, t01=0x017c}
0x1db4…1dbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x000e}
0x1dbe…1de0 Head {h00=0x001e, h01=0x0050, text=» LDK A7,/91 PHYSICAL READ «, t00=0x0013, t01=0x0018}
0x1de0…1dec Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0013, t01=0x003a}
0x1dec…1e0a Head {h00=0x001a, h01=0x0050, text=» DATA 15 FM READ BLOCK«, t00=0x0013, t01=0x0046}
0x1e0a…1e42 Head {h00=0x0034, h01=0x0050, text=» CF A14,DMTIOT CHECK RETURN CODES FROM DISC I/O «, t00=0x0013, t01=0x0064}
0x1e42…1e54 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0013, t01=0x009c}
0x1e54…1e6c Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0013, t01=0x00ae}
0x1e6c…1e84 Head {h00=0x0014, h01=0x0050, text=» LD A5,ECBBA,A8 «, t00=0x0013, t01=0x00c6}
0x1e84…1e96 Head {h00=0x000e, h01=0x0050, text=» RF DMT090«, t00=0x0013, t01=0x00de}
0x1e96…1ec8 Head {h00=0x002e, h01=0x0050, text=»DMT070 EQU * RIGHT DELAYED BUFFER IS FOUND«, t00=0x0013, t01=0x00f0}
0x1ec8…1ede Head {h00=0x0012, h01=0x0050, text=» LDKL A5,/1000«, t00=0x0013, t01=0x0122}
0x1ede…1f04 Head {h00=0x0022, h01=0x0050, text=» ORS A5,FDBDBR,A6 KEEP BUFFER «, t00=0x0013, t01=0x0138}
0x1f04…1f38 Head {h00=0x0030, h01=0x0050, text=»DMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER«, t00=0x0013, t01=0x015e}
0x1f38…1f4a (20, 0, 398) Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x0014, t01=0x0004}
0x1f4a…1f74 Head {h00=0x0026, h01=0x0050, text=» ADKL A5,BUFSTA SKIP BUFFER HEADER«, t00=0x0014, t01=0x0016}
0x1f74…1fa2 Head {h00=0x002a, h01=0x0050, text=» ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB«, t00=0x0014, t01=0x0040}
0x1fa2…1fb6 Head {h00=0x0010, h01=0x0050, text=»DMT090 EQU *«, t00=0x0014, t01=0x006e}
0x1fb6…1fc8 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0014, t01=0x0082}
0x1fc8…1fe0 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0014, t01=0x0094}
0x1fe0…2004 Head {h00=0x0020, h01=0x0050, text=»* A7 = INTERNAL ORDER CODE«, t00=0x0014, t01=0x00ac}
0x2004…2018 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x0014, t01=0x00d0}
0x2018…2044 Head {h00=0x0028, h01=0x0050, text=» ABI ORDERS,A7 DMTASK FUNCTION TABLE«, t00=0x0014, t01=0x00e4}
0x2044…2058 Head {h00=0x0010, h01=0x0050, text=»* A1 = A6 «, t00=0x0014, t01=0x0110}
0x2058…207e Head {h00=0x0022, h01=0x0050, text=»* (A3= BLOCK BUFFER ADDRESS )«, t00=0x0014, t01=0x0124}
0x207e…209e Head {h00=0x001c, h01=0x0050, text=»* (A5 = BLOCK ADDRESS )«, t00=0x0014, t01=0x014a}
0x209e…20c6 Head {h00=0x0024, h01=0x0050, text=»* A6 = FDB ADDRESS ALL ORDERS «, t00=0x0014, t01=0x016a}
0x20c6…20ec (21, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* A7 = ORDER CODE ALL ORDERS«, t00=0x0015, t01=0x0004}
0x20ec…210e Head {h00=0x001e, h01=0x0050, text=»* (A8 = FDBECB ADDRESS ) «, t00=0x0015, t01=0x002a}
0x210e…2132 Head {h00=0x0020, h01=0x0050, text=»* (A9 = USER ECB ADDRESS ) «, t00=0x0015, t01=0x004c}
0x2132…2140 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0070}
0x2140…2164 Head {h00=0x0020, h01=0x0050, text=»DMSQRE EQU * SEQUENTIAL READ«, t00=0x0015, t01=0x007e}
0x2164…216e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a2}
0x216e…218e Head {h00=0x001c, h01=0x0050, text=»DMRDRE EQU * RANDOM READ«, t00=0x0015, t01=0x00ac}
0x218e…2198 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00cc}
0x2198…21ba Head {h00=0x001e, h01=0x0050, text=»DMSTDI EQU * START DIRECT «, t00=0x0015, t01=0x00d6}
0x21ba…21c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f8}
0x21c4…21dc Head {h00=0x0014, h01=0x0050, text=»* CHECK STATUS«, t00=0x0015, t01=0x0102}
0x21dc…21e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011a}
0x21e6…21fe Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBRRO,A6«, t00=0x0015, t01=0x0124}
0x21fe…2216 Head {h00=0x0014, h01=0x0050, text=» AD A2,FDBRLE,A6«, t00=0x0015, t01=0x013c}
0x2216…2228 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x0015, t01=0x0154}
0x2228…223a Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0015, t01=0x0166}
0x223a…225e Head {h00=0x0020, h01=0x0050, text=» CCR A1,A2 STATUS BYTE IN A1«, t00=0x0015, t01=0x0178}
0x225e…227a Head {h00=0x0018, h01=0x0050, text=» RF(NE) DMT200 USED «, t00=0x0016, t01=0x000c}
0x227a…228e Head {h00=0x0010, h01=0x0050, text=» CWK A7,QRR «, t00=0x0016, t01=0x0028}
0x228e…22b0 Head {h00=0x001e, h01=0x0050, text=» RF(E) DMT190 RANDOM READ «, t00=0x0016, t01=0x003c}
0x22b0…22c6 Head {h00=0x0012, h01=0x0050, text=» CWK A7,QSTDIR«, t00=0x0016, t01=0x005e}
0x22c6…22e6 Head {h00=0x001c, h01=0x0050, text=» RF(NE) DMT250 NOT START«, t00=0x0016, t01=0x0074}
0x22e6…2300 Head {h00=0x0016, h01=0x0050, text=» LC A1,DWTOPT,A6 «, t00=0x0016, t01=0x0094}
0x2300…2318 Head {h00=0x0014, h01=0x0050, text=» ANK A1,7 OPTION«, t00=0x0016, t01=0x00ae}
0x2318…2338 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) DMT250 NOT EQUAL«, t00=0x0016, t01=0x00c6}
0x2338…2354 Head {h00=0x0018, h01=0x0050, text=» RF DMT230 EQUAL =2 «, t00=0x0016, t01=0x00e6}
0x2354…2368 Head {h00=0x0010, h01=0x0050, text=»DMT190 EQU *«, t00=0x0016, t01=0x0102}
0x2368…2388 Head {h00=0x001c, h01=0x0050, text=» LDKL A1,NODERR NO DATA «, t00=0x0016, t01=0x0116}
0x2388…239c Head {h00=0x0010, h01=0x0050, text=» ABL DMTERR «, t00=0x0016, t01=0x0136}
0x239c…23aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x014a}
0x23aa…23be Head {h00=0x0010, h01=0x0050, text=»DMT200 EQU *«, t00=0x0016, t01=0x0158}
0x23be…23d4 Head {h00=0x0012, h01=0x0050, text=» SUK A7,QSTDIR«, t00=0x0016, t01=0x016c}
0x23d4…23f0 Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMT230 START «, t00=0x0016, t01=0x0182}
0x23f0…2410 Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBRL,A9 REQ LGTH«, t00=0x0017, t01=0x000e}
0x2410…2434 Head {h00=0x0020, h01=0x0050, text=» CW A2,FDBRLE,A6 RECORD LGTH«, t00=0x0017, t01=0x002e}
0x2434…244a Head {h00=0x0012, h01=0x0050, text=» RF(NG) DMT220«, t00=0x0017, t01=0x0052}
0x244a…246c Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBRLE,A6 MAX LGTH «, t00=0x0017, t01=0x0068}
0x246c…2496 Head {h00=0x0026, h01=0x0050, text=»DMT220 ST A2,ECBEL,A9 SET EFF LGTH«, t00=0x0017, t01=0x008a}
0x2496…24a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b4}
0x24a0…24bc Head {h00=0x0018, h01=0x0050, text=»* MOVE THE RECORD «, t00=0x0017, t01=0x00be}
0x24bc…24c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00da}
0x24c6…24dc Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTREM«, t00=0x0017, t01=0x00e4}
0x24dc…24e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00fa}
0x24e6…251a Head {h00=0x0030, h01=0x0050, text=»* UPDATE CRN AND SET EXCLUSIVE ACCESS BIT «, t00=0x0017, t01=0x0104}
0x251a…252e Head {h00=0x0010, h01=0x0050, text=»DMT230 EQU *«, t00=0x0017, t01=0x0138}
0x252e…2550 Head {h00=0x001e, h01=0x0050, text=» ABL DMT400 PUT CRN AND EA«, t00=0x0017, t01=0x014c}
0x2550…255e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x016e}
0x255e…2586 Head {h00=0x0024, h01=0x0050, text=»DMT250 EQU * NO DATA AT SEQ READ«, t00=0x0017, t01=0x017c}
0x2586…2590 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0014}
0x2590…25ac Head {h00=0x0018, h01=0x0050, text=»* GET NEXT RECORD «, t00=0x0018, t01=0x001e}
0x25ac…25b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x003a}
0x25b6…25d6 Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBCW+2,A9 REC NR«, t00=0x0018, t01=0x0044}
0x25d6…25e8 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0018, t01=0x0064}
0x25e8…2606 Head {h00=0x001a, h01=0x0050, text=» RF(O) DMT260 OVERFLOW«, t00=0x0018, t01=0x0076}
0x2606…2618 Head {h00=0x000e, h01=0x0050, text=» RF DMT270«, t00=0x0018, t01=0x0094}
0x2618…2634 Head {h00=0x0018, h01=0x0050, text=»DMT260 ANKL A2,/7FFF«, t00=0x0018, t01=0x00a6}
0x2634…264e Head {h00=0x0016, h01=0x0050, text=» IM ECBCW,A9 CARRY«, t00=0x0018, t01=0x00c2}
0x264e…266e Head {h00=0x001c, h01=0x0050, text=»DMT270 ST A2,ECBCW+2,A9 «, t00=0x0018, t01=0x00dc}
0x266e…2682 Head {h00=0x0010, h01=0x0050, text=»DMT280 EQU *«, t00=0x0018, t01=0x00fc}
0x2682…268c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0110}
0x268c…26a0 Head {h00=0x0010, h01=0x0050, text=»* CHECK EA«, t00=0x0018, t01=0x011a}
0x26a0…26aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x012e}
0x26aa…26c6 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0018, t01=0x0138}
0x26c6…26de Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A9 «, t00=0x0018, t01=0x0154}
0x26de…26fe Head {h00=0x001c, h01=0x0050, text=» LD A3,ECBCW+2,A9 REC NR«, t00=0x0018, t01=0x016c}
0x26fe…2714 Head {h00=0x0012, h01=0x0050, text=» CF A14,EATEST«, t00=0x0018, t01=0x018c}
0x2714…2728 Head {h00=0x0010, h01=0x0050, text=» LDR A4,A4 «, t00=0x0019, t01=0x0012}
0x2728…274c Head {h00=0x0020, h01=0x0050, text=» ABL(N) DMEAER PROTECT ERROR«, t00=0x0019, t01=0x0026}
0x274c…2762 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0019, t01=0x004a}
0x2762…2780 Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTOR,A6 ORDER «, t00=0x0019, t01=0x0060}
0x2780…2794 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/3F «, t00=0x0019, t01=0x007e}
0x2794…27aa Head {h00=0x0012, h01=0x0050, text=» CWK A4,QSTIND«, t00=0x0019, t01=0x0092}
0x27aa…27ce Head {h00=0x0020, h01=0x0050, text=» ABL(E) DMT400 START INDEXED«, t00=0x0019, t01=0x00a8}
0x27ce…27da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00cc}
0x27da…27ec Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0019, t01=0x00d8}
0x27ec…2806 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A3 REC NR «, t00=0x0019, t01=0x00ea}
0x2806…2814 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0104}
0x2814…2828 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A8 «, t00=0x0019, t01=0x0112}
0x2828…2846 Head {h00=0x001a, h01=0x0050, text=» CF A14,CALSNO PREP IO«, t00=0x0019, t01=0x0126}
0x2846…285a Head {h00=0x0010, h01=0x0050, text=» LDR A8,A10 «, t00=0x0019, t01=0x0144}
0x285a…286c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0019, t01=0x0158}
0x286c…2892 Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) DMTERR OUT OF MEDIUM «, t00=0x0019, t01=0x016a}
0x2892…28b0 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A6 FDB ADDRESS«, t00=0x0019, t01=0x0190}
0x28b0…28ce Head {h00=0x001a, h01=0x0050, text=» LC A3,FDBDBR,A6 DELAY«, t00=0x001a, t01=0x001e}
0x28ce…28e2 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x001a, t01=0x003c}
0x28e2…2904 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DMT295 KEEP BUFFER«, t00=0x001a, t01=0x0050}
0x2904…291c Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x001a, t01=0x0072}
0x291c…2940 Head {h00=0x0020, h01=0x0050, text=» SUKL A3,BUFSTA BUFFER ADDR «, t00=0x001a, t01=0x008a}
0x2940…294a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00ae}
0x294a…296a Head {h00=0x001c, h01=0x0050, text=»* RELEASE BLOCK BUFFER«, t00=0x001a, t01=0x00b8}
0x296a…2974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d8}
0x2974…298a Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTRBU«, t00=0x001a, t01=0x00e2}
0x298a…299e Head {h00=0x0010, h01=0x0050, text=»DMT295 EQU *«, t00=0x001a, t01=0x00f8}
0x299e…29be Head {h00=0x001c, h01=0x0050, text=» ABL DMT020 NEXT RECORD «, t00=0x001a, t01=0x010c}
0x29be…29cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x012c}
0x29cc…29f2 Head {h00=0x0022, h01=0x0050, text=»DMSQWR EQU * SEQUENTIAL WRITE «, t00=0x001a, t01=0x013a}
0x29f2…29fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0160}
0x29fc…2a1e Head {h00=0x001e, h01=0x0050, text=»DMRDWR EQU * RANDOM WRITE «, t00=0x001a, t01=0x016a}
0x2a1e…2a28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x018c}
0x2a28…2a4c Head {h00=0x0020, h01=0x0050, text=»DMREWR EQU * RANDOM REWRITE «, t00=0x001b, t01=0x0008}
0x2a4c…2a56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x002c}
0x2a56…2a78 Head {h00=0x001e, h01=0x0050, text=»DMRDDE EQU * RANDOM DELETE«, t00=0x001b, t01=0x0036}
0x2a78…2a82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0058}
0x2a82…2aa4 Head {h00=0x001e, h01=0x0050, text=»DMINS EQU * INDEXED INSERT«, t00=0x001b, t01=0x0062}
0x2aa4…2aae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0084}
0x2aae…2ad0 Head {h00=0x001e, h01=0x0050, text=»DMDEL EQU * INDEXED DELETE«, t00=0x001b, t01=0x008e}
0x2ad0…2ada Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00b0}
0x2ada…2afe Head {h00=0x0020, h01=0x0050, text=»DMIRW EQU * INDEXED REWRITE «, t00=0x001b, t01=0x00ba}
0x2afe…2b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00de}
0x2b08…2b20 Head {h00=0x0014, h01=0x0050, text=»* TEST STATUS «, t00=0x001b, t01=0x00e8}
0x2b20…2b3a Head {h00=0x0016, h01=0x0050, text=» LD A10,FDBRRO,A6 «, t00=0x001b, t01=0x0100}
0x2b3a…2b54 Head {h00=0x0016, h01=0x0050, text=» AD A10,FDBRLE,A6 «, t00=0x001b, t01=0x011a}
0x2b54…2b7c Head {h00=0x0024, h01=0x0050, text=» ADR A10,A5 STATUS BYTE ADDRESS «, t00=0x001b, t01=0x0134}
0x2b7c…2b9c Head {h00=0x001c, h01=0x0050, text=» LDR A11,A5 BUFFER ADDR «, t00=0x001b, t01=0x015c}
0x2b9c…2bb4 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A9 «, t00=0x001b, t01=0x017c}
0x2bb4…2bd8 (28, 0, 400) Head {h00=0x0020, h01=0x0050, text=» LD A3,ECBCW+2,A9 LOG REC NR«, t00=0x001c, t01=0x0004}
0x2bd8…2bea Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x001c, t01=0x0028}
0x2bea…2bfe Head {h00=0x0010, h01=0x0050, text=» CCR A4,A10 «, t00=0x001c, t01=0x003a}
0x2bfe…2c18 Head {h00=0x0016, h01=0x0050, text=» RF(E) DMS010 FREE«, t00=0x001c, t01=0x004e}
0x2c18…2c2e Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001c, t01=0x0068}
0x2c2e…2c40 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001c, t01=0x007e}
0x2c40…2c54 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QINS«, t00=0x001c, t01=0x0090}
0x2c54…2c78 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMS008 INDEXED INSERT«, t00=0x001c, t01=0x00a4}
0x2c78…2c84 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00c8}
0x2c84…2c96 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001c, t01=0x00d4}
0x2c96…2caa Head {h00=0x0010, h01=0x0050, text=» SUK A4,QRW «, t00=0x001c, t01=0x00e6}
0x2caa…2ccc Head {h00=0x001e, h01=0x0050, text=» RF(E) DMS008 DIRECT WRITE«, t00=0x001c, t01=0x00fa}
0x2ccc…2cde Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001c, t01=0x011c}
0x2cde…2cf2 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QSW «, t00=0x001c, t01=0x012e}
0x2cf2…2d16 Head {h00=0x0020, h01=0x0050, text=» RF(NE) DMS020 NOT SEQ WRITE«, t00=0x001c, t01=0x0142}
0x2d16…2d2a Head {h00=0x0010, h01=0x0050, text=»DMS008 EQU *«, t00=0x001c, t01=0x0166}
0x2d2a…2d4a Head {h00=0x001c, h01=0x0050, text=» LDKL A1,PROT PROTECTED «, t00=0x001c, t01=0x017a}
0x2d4a…2d5c Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x001d, t01=0x000a}
0x2d5c…2d70 Head {h00=0x0010, h01=0x0050, text=»DMS010 EQU *«, t00=0x001d, t01=0x001c}
0x2d70…2d86 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001d, t01=0x0030}
0x2d86…2d98 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x0046}
0x2d98…2dac Head {h00=0x0010, h01=0x0050, text=» SUK A4,QIRW«, t00=0x001d, t01=0x0058}
0x2dac…2dd2 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DMERND INDEXED REWRITE «, t00=0x001d, t01=0x006c}
0x2dd2…2de4 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x0092}
0x2de4…2df8 Head {h00=0x0010, h01=0x0050, text=» SUK A4,QDEL«, t00=0x001d, t01=0x00a4}
0x2df8…2e1c Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMERND INDEXED DELETE«, t00=0x001d, t01=0x00b8}
0x2e1c…2e28 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00dc}
0x2e28…2e3a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x00e8}
0x2e3a…2e50 Head {h00=0x0012, h01=0x0050, text=» SUK A4,QREWR «, t00=0x001d, t01=0x00fa}
0x2e50…2e74 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMERND RANDOM REWRITE«, t00=0x001d, t01=0x0110}
0x2e74…2e86 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001d, t01=0x0134}
0x2e86…2e9a Head {h00=0x0010, h01=0x0050, text=» SUK A4,QRD «, t00=0x001d, t01=0x0146}
0x2e9a…2ebe Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMERND RANDOM DELETE «, t00=0x001d, t01=0x015a}
0x2ebe…2ed2 Head {h00=0x0010, h01=0x0050, text=»DMS020 EQU *«, t00=0x001d, t01=0x017e}
0x2ed2…2ee8 (30, 0, 398) Head {h00=0x0012, h01=0x0050, text=» CF A14,EATEST«, t00=0x001e, t01=0x0004}
0x2ee8…2f04 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A4 RTN CODE «, t00=0x001e, t01=0x001a}
0x2f04…2f28 Head {h00=0x0020, h01=0x0050, text=» RF(N) DMEAER EA OTHER TASK «, t00=0x001e, t01=0x0036}
0x2f28…2f3c Head {h00=0x0010, h01=0x0050, text=»DMS100 EQU *«, t00=0x001e, t01=0x005a}
0x2f3c…2f5a Head {h00=0x001a, h01=0x0050, text=» LDK A3,0 STATUS FREE «, t00=0x001e, t01=0x006e}
0x2f5a…2f70 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001e, t01=0x008c}
0x2f70…2f82 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x001e, t01=0x00a2}
0x2f82…2f96 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QIRW«, t00=0x001e, t01=0x00b4}
0x2f96…2fbc Head {h00=0x0022, h01=0x0050, text=» RF(E) CHK010 INDEXED REWRITE «, t00=0x001e, t01=0x00c8}
0x2fbc…2fce Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x001e, t01=0x00ee}
0x2fce…2fe2 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QINS«, t00=0x001e, t01=0x0100}
0x2fe2…3006 Head {h00=0x0020, h01=0x0050, text=» RF(E) CHK010 INDEXED INSERT«, t00=0x001e, t01=0x0114}
0x3006…301e Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBKA,A6 «, t00=0x001e, t01=0x0138}
0x301e…304e Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) DMT350 SECOND PASS INDEXED DEL «, t00=0x001e, t01=0x0150}
0x304e…3060 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x001e, t01=0x0180}
0x3060…3074 (31, 0, 400) Head {h00=0x0010, h01=0x0050, text=» SUK A2,QDEL«, t00=0x001f, t01=0x0004}
0x3074…3098 Head {h00=0x0020, h01=0x0050, text=» RF(E) CHK010 INDEXED DELETE«, t00=0x001f, t01=0x0018}
0x3098…30a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x003c}
0x30a4…30b6 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x001f, t01=0x0048}
0x30b6…30ca Head {h00=0x0010, h01=0x0050, text=» SUK A2,QRD «, t00=0x001f, t01=0x005a}
0x30ca…30ee Head {h00=0x0020, h01=0x0050, text=» ABL(E) DMT350 RANDOM DELETE«, t00=0x001f, t01=0x006e}
0x30ee…3100 Head {h00=0x000e, h01=0x0050, text=» RF DMT310«, t00=0x001f, t01=0x0092}
0x3100…3116 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001f, t01=0x00a4}
0x3116…3124 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x00ba}
0x3124…3138 Head {h00=0x0010, h01=0x0050, text=»CHK010 EQU *«, t00=0x001f, t01=0x00c8}
0x3138…3182 Head {h00=0x0046, h01=0x0050, text=»* INDEXED REWRITE,INDEXED INSERT AND INDEXED DELETE ENTERS HERE «, t00=0x001f, t01=0x00dc}
0x3182…318c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0126}
0x318c…31bc Head {h00=0x002c, h01=0x0050, text=»* COMPARE KEYS IN FILE AND USER BUFFER«, t00=0x001f, t01=0x0130}
0x31bc…31c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0160}
0x31c6…31e4 Head {h00=0x001a, h01=0x0050, text=» LDK A5,8 MAX 4 INDEX «, t00=0x001f, t01=0x016a}
0x31e4…31f8 Head {h00=0x0010, h01=0x0050, text=»CHK040 EQU *«, t00=0x001f, t01=0x0188}
0x31f8…320a Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0020, t01=0x000c}
0x320a…3232 Head {h00=0x0024, h01=0x0050, text=» RF(N) CHK100 ALL INDEX CHECKED «, t00=0x0020, t01=0x001e}
0x3232…324c Head {h00=0x0016, h01=0x0050, text=» LDR A2,A1 FDB ADD«, t00=0x0020, t01=0x0046}
0x324c…325e Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x0020, t01=0x0060}
0x325e…328a Head {h00=0x0028, h01=0x0050, text=» LD A6,FDBAI1,A2 FDB ADDR INDEX FILE«, t00=0x0020, t01=0x0072}
0x328a…32a8 Head {h00=0x001a, h01=0x0050, text=» RB(Z) CHK040 NO INDEX«, t00=0x0020, t01=0x009e}
0x32a8…32c0 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTOR,A1 «, t00=0x0020, t01=0x00bc}
0x32c0…32e0 Head {h00=0x001c, h01=0x0050, text=» ANK A2,/3F ORDER INDEX «, t00=0x0020, t01=0x00d4}
0x32e0…32f4 Head {h00=0x0010, h01=0x0050, text=» CWK A2,QINS«, t00=0x0020, t01=0x00f4}
0x32f4…331c Head {h00=0x0024, h01=0x0050, text=» RB(E) CHK040 NO CHECK ON INSERT«, t00=0x0020, t01=0x0108}
0x331c…3330 Head {h00=0x0010, h01=0x0050, text=» SUK A2,QIRW«, t00=0x0020, t01=0x0130}
0x3330…3354 Head {h00=0x0020, h01=0x0050, text=» RF(Z) CHK050 CHECK REWRITE «, t00=0x0020, t01=0x0144}
0x3354…3374 Head {h00=0x001c, h01=0x0050, text=» LC A2,DWTOPT,A1 OPTION «, t00=0x0020, t01=0x0168}
0x3374…3386 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/4«, t00=0x0020, t01=0x0188}
0x3386…33b4 Head {h00=0x002a, h01=0x0050, text=» RB(NZ) CHK040 NO CHECK ON DEL CURRENT«, t00=0x0021, t01=0x000a}
0x33b4…33c8 Head {h00=0x0010, h01=0x0050, text=»CHK050 EQU *«, t00=0x0021, t01=0x0038}
0x33c8…33d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x004c}
0x33d2…33e8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0021, t01=0x0056}
0x33e8…3402 Head {h00=0x0016, h01=0x0050, text=» LDR A7,A1 SAVE A1«, t00=0x0021, t01=0x006c}
0x3402…3430 Head {h00=0x002a, h01=0x0050, text=» LD A1,FDBKA,A6 GET KEY START ADDRESS «, t00=0x0021, t01=0x0086}
0x3430…3448 Head {h00=0x0014, h01=0x0050, text=» AD A1,ECBBA,A9 «, t00=0x0021, t01=0x00b4}
0x3448…347e Head {h00=0x0032, h01=0x0050, text=» LDKL A2,FDBKEY GET KEY SAVE AREA DISPLACEMENT«, t00=0x0021, t01=0x00cc}
0x347e…34a0 Head {h00=0x001e, h01=0x0050, text=» ADR A2,A6 ADD FDB ADDRESS«, t00=0x0021, t01=0x0102}
0x34a0…34bc Head {h00=0x0018, h01=0x0050, text=» LDR A13,A2 SAVE A2 «, t00=0x0021, t01=0x0124}
0x34bc…34e2 Head {h00=0x0022, h01=0x0050, text=» LD A3,FDBRLE,A6 RECORD LENGTH«, t00=0x0021, t01=0x0140}
0x34e2…34fe Head {h00=0x0018, h01=0x0050, text=» SUK A3,6 KEY LENGTH«, t00=0x0021, t01=0x0166}
0x34fe…3528 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTAB,A7 GET TTAB ADDRESS «, t00=0x0021, t01=0x0182}
0x3528…3558 Head {h00=0x002c, h01=0x0050, text=» CF A14,MOV:US MOVE KEY TO FDB KEY AREA «, t00=0x0022, t01=0x001c}
0x3558…3576 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A7 RESTORE A1 «, t00=0x0022, t01=0x004c}
0x3576…3594 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A13 RESTORE A2«, t00=0x0022, t01=0x006a}
0x3594…35c2 Head {h00=0x002a, h01=0x0050, text=» LD A3,FDBKA,A6 GET KEY START ADDRESS «, t00=0x0022, t01=0x0088}
0x35c2…35ce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00b6}
0x35ce…35d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00c2}
0x35d8…35ee Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0022, t01=0x00cc}
0x35ee…3604 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0022, t01=0x00e2}
0x3604…362a Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBKA,A6 KEY START ADDR«, t00=0x0022, t01=0x00f8}
0x362a…363c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0022, t01=0x011e}
0x363c…3662 Head {h00=0x0022, h01=0x0050, text=» AD A2,ECBBA,A9 KEY IN BUFFER «, t00=0x0022, t01=0x0130}
0x3662…366e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0156}
0x366e…3678 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0162}
0x3678…368e Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0022, t01=0x016c}
0x368e…36a6 Head {h00=0x0014, h01=0x0050, text=» AD A3,FDBRRO,A1«, t00=0x0022, t01=0x0182}
0x36a6…36c6 Head {h00=0x001c, h01=0x0050, text=» ADR A3,A11 KEY IN FILE «, t00=0x0023, t01=0x000a}
0x36c6…36d8 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0023, t01=0x002a}
0x36d8…36fe Head {h00=0x0022, h01=0x0050, text=» LD A6,FDBRLE,A6 RECORD LENGTH«, t00=0x0023, t01=0x003c}
0x36fe…371a Head {h00=0x0018, h01=0x0050, text=» SUK A6,6 KEY LENGTH«, t00=0x0023, t01=0x0062}
0x371a…373e Head {h00=0x0020, h01=0x0050, text=» CF A14,CHKKEY COMPARE KEYS «, t00=0x0023, t01=0x007e}
0x373e…3750 Head {h00=0x000e, h01=0x0050, text=» CWR A6,A7«, t00=0x0023, t01=0x00a2}
0x3750…377e Head {h00=0x002a, h01=0x0050, text=» RB(E) CHK040 KEY UNCHANGED CHECK NEXT«, t00=0x0023, t01=0x00b4}
0x377e…379a Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0023, t01=0x00e2}
0x379a…37be Head {h00=0x0020, h01=0x0050, text=» LDKL A1,PROT KEY NOT FOUND «, t00=0x0023, t01=0x00fe}
0x37be…37d0 Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x0023, t01=0x0122}
0x37d0…37e4 Head {h00=0x0010, h01=0x0050, text=»CHK100 EQU *«, t00=0x0023, t01=0x0134}
0x37e4…3800 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0023, t01=0x0148}
0x3800…3818 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0023, t01=0x0164}
0x3818…3838 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/3F ORDER INDEX «, t00=0x0023, t01=0x017c}
0x3838…384a Head {h00=0x000e, h01=0x0050, text=» RF DMT310«, t00=0x0024, t01=0x000c}
0x384a…3856 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x001e}
0x3856…3864 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x002a}
0x3864…388a Head {h00=0x0022, h01=0x0050, text=»DMERND LDKL A1,NODERR NO DATA «, t00=0x0024, t01=0x0038}
0x388a…389c Head {h00=0x000e, h01=0x0050, text=» RF DMERR «, t00=0x0024, t01=0x005e}
0x389c…38ca Head {h00=0x002a, h01=0x0050, text=»DMEAER EQU * RELEASE EA FOR ALL FILES «, t00=0x0024, t01=0x0070}
0x38ca…38dc Head {h00=0x000e, h01=0x0050, text=» SUR A9,A9«, t00=0x0024, t01=0x009e}
0x38dc…3902 Head {h00=0x0022, h01=0x0050, text=» LC A9,FDBTNR,A6 USER TASK ID «, t00=0x0024, t01=0x00b0}
0x3902…3928 Head {h00=0x0022, h01=0x0050, text=» CF A14,RELPRO RELEASE PROTECT«, t00=0x0024, t01=0x00d6}
0x3928…394c Head {h00=0x0020, h01=0x0050, text=» LDKL A1,PROERR PROTECT ERR «, t00=0x0024, t01=0x00fc}
0x394c…3964 Head {h00=0x0014, h01=0x0050, text=»DMERR ABL DMTERR«, t00=0x0024, t01=0x0120}
0x3964…3972 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0138}
0x3972…397c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0146}
0x397c…3994 Head {h00=0x0014, h01=0x0050, text=»* MOVE RECORD «, t00=0x0024, t01=0x0150}
0x3994…399e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0168}
0x399e…39b2 Head {h00=0x0010, h01=0x0050, text=»DMT310 EQU *«, t00=0x0024, t01=0x0172}
0x39b2…39c8 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0024, t01=0x0186}
0x39c8…39dc Head {h00=0x0010, h01=0x0050, text=» CWK A7,QDEL«, t00=0x0025, t01=0x000c}
0x39dc…3a00 Head {h00=0x0020, h01=0x0050, text=» RF(NE) DMT313 NOT INDEX DEL«, t00=0x0025, t01=0x0020}
0x3a00…3a0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0044}
0x3a0a…3a30 Head {h00=0x0022, h01=0x0050, text=»* MOVE KEYS TO FDB KEY AREAS«, t00=0x0025, t01=0x004e}
0x3a30…3a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0074}
0x3a3a…3a4c Head {h00=0x000e, h01=0x0050, text=» LDK A5,8 «, t00=0x0025, t01=0x007e}
0x3a4c…3a60 Head {h00=0x0010, h01=0x0050, text=»IXINS3 EQU *«, t00=0x0025, t01=0x0090}
0x3a60…3a7c Head {h00=0x0018, h01=0x0050, text=» LDR A2,A6 FDB DATA «, t00=0x0025, t01=0x00a4}
0x3a7c…3a8e Head {h00=0x000e, h01=0x0050, text=» ADR A2,A5«, t00=0x0025, t01=0x00c0}
0x3a8e…3ab0 Head {h00=0x001e, h01=0x0050, text=» LD A3,FDBADF,A2 FDB INDEX«, t00=0x0025, t01=0x00d2}
0x3ab0…3ace Head {h00=0x001a, h01=0x0050, text=» RF(Z) IXINS4 NO INDEX«, t00=0x0025, t01=0x00f4}
0x3ace…3aee Head {h00=0x001c, h01=0x0050, text=» LD A1,FDBKA,A3 KEY ADDR«, t00=0x0025, t01=0x0112}
0x3aee…3b10 Head {h00=0x001e, h01=0x0050, text=» AD A1,FDBRRO,A6 REC OFFS «, t00=0x0025, t01=0x0132}
0x3b10…3b3e Head {h00=0x002a, h01=0x0050, text=» ADR A1,A11 BUFFERADDR GIVES KEY ADDR «, t00=0x0025, t01=0x0154}
0x3b3e…3b60 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBRLE,A3 REC LGTH «, t00=0x0025, t01=0x0182}
0x3b60…3b7a Head {h00=0x0016, h01=0x0050, text=» SUK A2,6 KEY LGTH«, t00=0x0026, t01=0x0014}
0x3b7a…3b9a Head {h00=0x001c, h01=0x0050, text=» ADKL A3,FDBKEY TO ADDR «, t00=0x0026, t01=0x002e}
0x3b9a…3bc0 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTBM KEY TO FDB AREA «, t00=0x0026, t01=0x004e}
0x3bc0…3bd4 Head {h00=0x0010, h01=0x0050, text=»IXINS4 EQU *«, t00=0x0026, t01=0x0074}
0x3bd4…3be6 Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0026, t01=0x0088}
0x3be6…3c08 Head {h00=0x001e, h01=0x0050, text=» RB(NZ) IXINS3 MORE INDEXS«, t00=0x0026, t01=0x009a}
0x3c08…3c28 Head {h00=0x001c, h01=0x0050, text=» ABL DMXDEL INDEXED DEL «, t00=0x0026, t01=0x00bc}
0x3c28…3c3c Head {h00=0x0010, h01=0x0050, text=»DMT313 EQU *«, t00=0x0026, t01=0x00dc}
0x3c3c…3c48 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x00f0}
0x3c48…3c6e Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRLE,A6 RECORD LENGTH«, t00=0x0026, t01=0x00fc}
0x3c6e…3c86 Head {h00=0x0014, h01=0x0050, text=» LD A3,FDBRRO,A6«, t00=0x0026, t01=0x0122}
0x3c86…3ca4 Head {h00=0x001a, h01=0x0050, text=» ADR A3,A11 TO ADDRESS«, t00=0x0026, t01=0x013a}
0x3ca4…3cb6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0026, t01=0x0158}
0x3cb6…3cda Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBBA,A9 FROM ADDRESS«, t00=0x0026, t01=0x016a}
0x3cda…3ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x018e}
0x3ce4…3cfa Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0027, t01=0x0008}
0x3cfa…3d0c Head {h00=0x000e, h01=0x0050, text=» XRR A4,A1«, t00=0x0027, t01=0x001e}
0x3d0c…3d20 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x0027, t01=0x0030}
0x3d20…3d4c Head {h00=0x0028, h01=0x0050, text=» RF(E) DMT320 BOTH ODD OR BOTH EVEN «, t00=0x0027, t01=0x0044}
0x3d4c…3d76 Head {h00=0x0026, h01=0x0050, text=» CF A14,DMTBM ONE ODD AND ONE EVEN«, t00=0x0027, t01=0x0070}
0x3d76…3d88 Head {h00=0x000e, h01=0x0050, text=» RF DMT340«, t00=0x0027, t01=0x009a}
0x3d88…3d92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ac}
0x3d92…3daa Head {h00=0x0014, h01=0x0050, text=»DMT320 LDR A4,A3«, t00=0x0027, t01=0x00b6}
0x3daa…3dbe Head {h00=0x0010, h01=0x0050, text=» ANK A4,/01 «, t00=0x0027, t01=0x00ce}
0x3dbe…3dde Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT330 BOTH EVEN «, t00=0x0027, t01=0x00e2}
0x3dde…3df8 Head {h00=0x0016, h01=0x0050, text=» SUK A2,1 BOTH ODD«, t00=0x0027, t01=0x0102}
0x3df8…3e0a Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0027, t01=0x011c}
0x3e0a…3e1c Head {h00=0x000e, h01=0x0050, text=» SCR A4,A3«, t00=0x0027, t01=0x012e}
0x3e1c…3e2e Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0027, t01=0x0140}
0x3e2e…3e40 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0027, t01=0x0152}
0x3e40…3e66 Head {h00=0x0022, h01=0x0050, text=»DMT330 CF A14,DMTWM WORD MOVE «, t00=0x0027, t01=0x0164}
0x3e66…3e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x018a}
0x3e70…3e7c (40, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0004}
0x3e7c…3e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0010}
0x3e86…3e9c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0028, t01=0x001a}
0x3e9c…3eba Head {h00=0x001a, h01=0x0050, text=» LDR A3,A2 GET LENGTH «, t00=0x0028, t01=0x0030}
0x3eba…3eea Head {h00=0x002c, h01=0x0050, text=» LDR A2,A4 GET RECEIVING BUFFER ADDRESS «, t00=0x0028, t01=0x004e}
0x3eea…3f14 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTAB,A6 GET TTAB ADDRESS «, t00=0x0028, t01=0x007e}
0x3f14…3f50 Head {h00=0x0038, h01=0x0050, text=» CF A14,MOV:US MOVE RECORD FROM USER TO SYSTEM AREA «, t00=0x0028, t01=0x00a8}
0x3f50…3f5c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00e4}
0x3f5c…3f6a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x00f0}
0x3f6a…3f74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00fe}
0x3f74…3f88 Head {h00=0x0010, h01=0x0050, text=»DMT340 EQU *«, t00=0x0028, t01=0x0108}
0x3f88…3f92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x011c}
0x3f92…3fae Head {h00=0x0018, h01=0x0050, text=»* SET STATUS USED «, t00=0x0028, t01=0x0126}
0x3fae…3fb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0142}
0x3fb8…3fcc Head {h00=0x0010, h01=0x0050, text=» LDK A3,/FF «, t00=0x0028, t01=0x014c}
0x3fcc…3fe6 Head {h00=0x0016, h01=0x0050, text=»DMT350 SCR A3,A10 «, t00=0x0028, t01=0x0160}
0x3fe6…3ffe Head {h00=0x0014, h01=0x0050, text=» LD A3,FDBDBR,A6«, t00=0x0028, t01=0x017a}
0x3ffe…4022 (41, 0, 400) Head {h00=0x0020, h01=0x0050, text=» RF(N) DMT390 DELAY NO WRITE«, t00=0x0029, t01=0x0004}
0x4022…4044 Head {h00=0x001e, h01=0x0050, text=» LDK A7,/95 PHYSICAL WRITE«, t00=0x0029, t01=0x0028}
0x4044…404e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x004a}
0x404e…406e Head {h00=0x001c, h01=0x0050, text=»* WRITE BLOCK TO DISC «, t00=0x0029, t01=0x0054}
0x406e…4078 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0074}
0x4078…40a4 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 FDB ADDRESS AS PARAMETER «, t00=0x0029, t01=0x007e}
0x40a4…40b0 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0029, t01=0x00aa}
0x40b0…40ca Head {h00=0x0016, h01=0x0050, text=» DATA 15 FM WRITE «, t00=0x0029, t01=0x00b6}
0x40ca…40f0 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTIOT CHECK DISC I/O «, t00=0x0029, t01=0x00d0}
0x40f0…4102 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0029, t01=0x00f6}
0x4102…4118 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DMTERR«, t00=0x0029, t01=0x0108}
0x4118…412a Head {h00=0x000e, h01=0x0050, text=» RF DMT400«, t00=0x0029, t01=0x011e}
0x412a…4138 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0130}
0x4138…414c Head {h00=0x0010, h01=0x0050, text=»DMT390 EQU *«, t00=0x0029, t01=0x013e}
0x414c…4162 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/1000«, t00=0x0029, t01=0x0152}
0x4162…4188 Head {h00=0x0022, h01=0x0050, text=» ORS A2,FDBDBR,A6 KEEP BUFFER «, t00=0x0029, t01=0x0168}
0x4188…419c Head {h00=0x0010, h01=0x0050, text=»DMT400 EQU *«, t00=0x0029, t01=0x018e}
0x419c…41c2 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A6 FDB ADDR DATA FILE «, t00=0x002a, t01=0x0012}
0x41c2…41ec Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNGET GET CURRENCY BUFFER«, t00=0x002a, t01=0x0038}
0x41ec…420c Head {h00=0x001c, h01=0x0050, text=» LDR A10,A2 BUFFER ADDR «, t00=0x002a, t01=0x0062}
0x420c…4224 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A9 «, t00=0x002a, t01=0x0082}
0x4224…4248 Head {h00=0x0020, h01=0x0050, text=» LD A3,ECBCW+2,A9 LOG REC NR«, t00=0x002a, t01=0x009a}
0x4248…4260 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A1 «, t00=0x002a, t01=0x00be}
0x4260…4280 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/3F ORDER INDEX «, t00=0x002a, t01=0x00d6}
0x4280…4294 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QRW «, t00=0x002a, t01=0x00f6}
0x4294…42a6 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002a, t01=0x010a}
0x42a6…42c8 Head {h00=0x001e, h01=0x0050, text=» RF(E) DMT420 RANDOM WRITE«, t00=0x002a, t01=0x011c}
0x42c8…42de Head {h00=0x0012, h01=0x0050, text=» LDK A4,QREWR «, t00=0x002a, t01=0x013e}
0x42de…42f0 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002a, t01=0x0154}
0x42f0…430e Head {h00=0x001a, h01=0x0050, text=» RF(E) DMT420 REWRITE «, t00=0x002a, t01=0x0166}
0x430e…4322 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QSW «, t00=0x002a, t01=0x0184}
0x4322…4334 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002b, t01=0x0008}
0x4334…4354 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT460 SEQ WRITE «, t00=0x002b, t01=0x001a}
0x4354…436a Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x002b, t01=0x003a}
0x436a…437e Head {h00=0x0010, h01=0x0050, text=» LDK A4,QIRW«, t00=0x002b, t01=0x0050}
0x437e…4390 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002b, t01=0x0064}
0x4390…43ae Head {h00=0x001a, h01=0x0050, text=» RF(E) DMT420 IND REWR«, t00=0x002b, t01=0x0076}
0x43ae…43c2 Head {h00=0x0010, h01=0x0050, text=» LDK A4,QINS«, t00=0x002b, t01=0x0094}
0x43c2…43d4 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002b, t01=0x00a8}
0x43d4…43f8 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT460 INDEXED INSERT«, t00=0x002b, t01=0x00ba}
0x43f8…4410 Head {h00=0x0014, h01=0x0050, text=» CWK A7,QSTIND «, t00=0x002b, t01=0x00de}
0x4410…4434 Head {h00=0x0020, h01=0x0050, text=» RF(E) DMT406 START INDEXED «, t00=0x002b, t01=0x00f6}
0x4434…4440 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x011a}
0x4440…4456 Head {h00=0x0012, h01=0x0050, text=» LDK A4,QSTDIR«, t00=0x002b, t01=0x0126}
0x4456…4468 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002b, t01=0x013c}
0x4468…4488 Head {h00=0x001c, h01=0x0050, text=» RF(NE) DMT409 NOT START«, t00=0x002b, t01=0x014e}
0x4488…449c Head {h00=0x0010, h01=0x0050, text=»DMT406 EQU *«, t00=0x002b, t01=0x016e}
0x449c…44ae Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x002b, t01=0x0182}
0x44ae…44c0 (44, 0, 398) Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x002c, t01=0x0004}
0x44c0…44d2 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x002c, t01=0x0016}
0x44d2…44e8 Head {h00=0x0012, h01=0x0050, text=» RF(NN) DMT408«, t00=0x002c, t01=0x0028}
0x44e8…44fe Head {h00=0x0012, h01=0x0050, text=» ANKL A5,/7FFF«, t00=0x002c, t01=0x003e}
0x44fe…4510 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x002c, t01=0x0054}
0x4510…4524 Head {h00=0x0010, h01=0x0050, text=»DMT408 EQU *«, t00=0x002c, t01=0x0066}
0x4524…454a Head {h00=0x0022, h01=0x0050, text=» ST A4,CRNCDF,A10 NEW CURRENCY«, t00=0x002c, t01=0x007a}
0x454a…4566 Head {h00=0x0018, h01=0x0050, text=» ST A5,CRNCDF+2,A10 «, t00=0x002c, t01=0x00a0}
0x4566…4578 Head {h00=0x000e, h01=0x0050, text=» RF DMT420«, t00=0x002c, t01=0x00bc}
0x4578…458c Head {h00=0x0010, h01=0x0050, text=»DMT409 EQU *«, t00=0x002c, t01=0x00ce}
0x458c…45a6 Head {h00=0x0016, h01=0x0050, text=» ST A2,CRNCDF,A10 «, t00=0x002c, t01=0x00e2}
0x45a6…45d0 Head {h00=0x0026, h01=0x0050, text=» ST A3,CRNCDF+2,A10 CRN DATA FILE «, t00=0x002c, t01=0x00fc}
0x45d0…45e4 Head {h00=0x0010, h01=0x0050, text=»DMT420 EQU *«, t00=0x002c, t01=0x0126}
0x45e4…45ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x013a}
0x45ee…4608 Head {h00=0x0016, h01=0x0050, text=»* CHECK PROTECT «, t00=0x002c, t01=0x0144}
0x4608…4612 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x015e}
0x4612…462a Head {h00=0x0014, h01=0x0050, text=» LC A4,FDBDBR,A1«, t00=0x002c, t01=0x0168}
0x462a…463c Head {h00=0x000e, h01=0x0050, text=» ANK A4,/1«, t00=0x002c, t01=0x0180}
0x463c…465e (45, 0, 400) Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT470 NOT PROTECT «, t00=0x002d, t01=0x0004}
0x465e…4668 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0026}
0x4668…468e Head {h00=0x0022, h01=0x0050, text=»* CHECK IF EA IS SET ALREADY«, t00=0x002d, t01=0x0030}
0x468e…4698 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0056}
0x4698…46b8 Head {h00=0x001c, h01=0x0050, text=» CF A14,EATEST CHECK EA «, t00=0x002d, t01=0x0060}
0x46b8…46ca Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x002d, t01=0x0080}
0x46ca…46f0 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DMT470 EA ALREADY SET «, t00=0x002d, t01=0x0092}
0x46f0…46fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00b8}
0x46fa…470c Head {h00=0x000e, h01=0x0050, text=»* SET EA«, t00=0x002d, t01=0x00c2}
0x470c…4716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00d4}
0x4716…472c Head {h00=0x0012, h01=0x0050, text=» CF A14,EASETB«, t00=0x002d, t01=0x00de}
0x472c…473e Head {h00=0x000e, h01=0x0050, text=» RF DMT470«, t00=0x002d, t01=0x00f4}
0x473e…4752 Head {h00=0x0010, h01=0x0050, text=»DMT460 EQU *«, t00=0x002d, t01=0x0106}
0x4752…475c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x011a}
0x475c…4772 Head {h00=0x0012, h01=0x0050, text=»* UPDATE LRN«, t00=0x002d, t01=0x0124}
0x4772…477c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x013a}
0x477c…4794 Head {h00=0x0014, h01=0x0050, text=» SC A2,FDBLRN,A1«, t00=0x002d, t01=0x0144}
0x4794…47ae Head {h00=0x0016, h01=0x0050, text=» ST A3,FDBLRN+1,A1«, t00=0x002d, t01=0x015c}
0x47ae…47c0 Head {h00=0x000e, h01=0x0050, text=» RB DMT420«, t00=0x002d, t01=0x0176}
0x47c0…47d4 Head {h00=0x0010, h01=0x0050, text=»DMT470 EQU *«, t00=0x002d, t01=0x0188}
0x47d4…47ea Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x002e, t01=0x000c}
0x47ea…47fe Head {h00=0x0010, h01=0x0050, text=» LDK A4,QINS«, t00=0x002e, t01=0x0022}
0x47fe…4810 Head {h00=0x000e, h01=0x0050, text=» CWR A7,A4«, t00=0x002e, t01=0x0036}
0x4810…4836 Head {h00=0x0022, h01=0x0050, text=» ABL(E) DMINS2 INDEXED INSERT «, t00=0x002e, t01=0x0048}
0x4836…4842 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x006e}
0x4842…4850 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x007a}
0x4850…4876 Head {h00=0x0022, h01=0x0050, text=»DMTAEX LDK A1,0 CORRECT RETURN«, t00=0x002e, t01=0x0088}
0x4876…4880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00ae}
0x4880…489e Head {h00=0x001a, h01=0x0050, text=»DMTERR LC A3,FDBDBR,A6«, t00=0x002e, t01=0x00b8}
0x489e…48b2 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x002e, t01=0x00d6}
0x48b2…48d4 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DMTERX KEEP BUFFER«, t00=0x002e, t01=0x00ea}
0x48d4…48ec Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x002e, t01=0x010c}
0x48ec…4904 Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x002e, t01=0x0124}
0x4904…4930 Head {h00=0x0028, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER AT A3 «, t00=0x002e, t01=0x013c}
0x4930…4944 Head {h00=0x0010, h01=0x0050, text=»DMTERX EQU *«, t00=0x002e, t01=0x0168}
0x4944…496e Head {h00=0x0026, h01=0x0050, text=» LD A6,FDBADF,A6 GET FDB DATA FILE«, t00=0x002e, t01=0x017c}
0x496e…497a Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002f, t01=0x0016}
0x497a…4994 Head {h00=0x0016, h01=0x0050, text=»* A1 = RET CODE «, t00=0x002f, t01=0x0022}
0x4994…49ae Head {h00=0x0016, h01=0x0050, text=»* A6 = DWT ADDR «, t00=0x002f, t01=0x003c}
0x49ae…49c4 Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x002f, t01=0x0056}
0x49c4…49d0 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x002f, t01=0x006c}
0x49d0…49dc Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002f, t01=0x0078}
0x49dc…49ec Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x002f, t01=0x0084}
0x49ec…4a02 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x002f, t01=0x0094}
0x4a02…4a10 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x00aa}
0x4a10…4a38 Head {h00=0x0024, h01=0x0050, text=»DMIRR EQU * INDEXED RANDOM READ «, t00=0x002f, t01=0x00b8}
0x4a38…4a42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00e0}
0x4a42…4a64 Head {h00=0x001e, h01=0x0050, text=»DMSTIN EQU * START INDEXED«, t00=0x002f, t01=0x00ea}
0x4a64…4a9a Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x002f, t01=0x010c}
0x4a9a…4ab6 Head {h00=0x0018, h01=0x0050, text=» LDR A8,A1 FDB ADDR «, t00=0x002f, t01=0x0142}
0x4ab6…4adc Head {h00=0x0022, h01=0x0050, text=» ADKL A8,FDBKEY KEY AREA ADDR «, t00=0x002f, t01=0x015e}
0x4adc…4b04 Head {h00=0x0024, h01=0x0050, text=» LD A11,FDBRLE,A1 REC LGTH INDEX«, t00=0x002f, t01=0x0184}
0x4b04…4b22 Head {h00=0x001a, h01=0x0050, text=» SUKL A11,6 KEY LENGTH«, t00=0x0030, t01=0x001c}
0x4b22…4b36 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A1 «, t00=0x0030, t01=0x003a}
0x4b36…4b58 Head {h00=0x001e, h01=0x0050, text=» ADKL A13,FDBECB ECB ADDR «, t00=0x0030, t01=0x004e}
0x4b58…4b80 Head {h00=0x0024, h01=0x0050, text=» CF A14,FNDKEY GET INDEX RECORD «, t00=0x0030, t01=0x0070}
0x4b80…4bac Head {h00=0x0028, h01=0x0050, text=»DMR006 EQU * FROM INDEXED READ NEXT «, t00=0x0030, t01=0x0098}
0x4bac…4bc4 Head {h00=0x0014, h01=0x0050, text=» LD A9,DWTECB,A1«, t00=0x0030, t01=0x00c4}
0x4bc4…4bde Head {h00=0x0016, h01=0x0050, text=» LDR A6,A1 FDB ADR«, t00=0x0030, t01=0x00dc}
0x4bde…4bf6 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x0030, t01=0x00f6}
0x4bf6…4c14 Head {h00=0x001a, h01=0x0050, text=» ADR A8,A6 ECB ADDRESS«, t00=0x0030, t01=0x010e}
0x4c14…4c2c Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTOR,A6 «, t00=0x0030, t01=0x012c}
0x4c2c…4c46 Head {h00=0x0016, h01=0x0050, text=» ANK A4,/3F ORDER «, t00=0x0030, t01=0x0144}
0x4c46…4c5c Head {h00=0x0012, h01=0x0050, text=» SUK A4,QSTIND«, t00=0x0030, t01=0x015e}
0x4c5c…4c7c Head {h00=0x001c, h01=0x0050, text=» RF(NZ) DMR007 NOT START«, t00=0x0030, t01=0x0174}
0x4c7c…4c94 (49, 0, 400) Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTOPT,A6«, t00=0x0031, t01=0x0004}
0x4c94…4cac Head {h00=0x0014, h01=0x0050, text=» ANK A4,7 OPTION«, t00=0x0031, t01=0x001c}
0x4cac…4cc8 Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMR007 EQUAL «, t00=0x0031, t01=0x0034}
0x4cc8…4cee Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/FBFF IGNORE NOKEY =1«, t00=0x0031, t01=0x0050}
0x4cee…4d02 Head {h00=0x0010, h01=0x0050, text=»DMR007 EQU *«, t00=0x0031, t01=0x0076}
0x4d02…4d1e Head {h00=0x0018, h01=0x0050, text=» LDR A2,A2 RET CODE «, t00=0x0031, t01=0x008a}
0x4d1e…4d46 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DMI037 KEY NOT FOUND =4 «, t00=0x0031, t01=0x00a6}
0x4d46…4d6e Head {h00=0x0024, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD ADDR =3 «, t00=0x0031, t01=0x00ce}
0x4d6e…4d8a Head {h00=0x0018, h01=0x0050, text=» ADKL A2,BUFSTA =3 «, t00=0x0031, t01=0x00f6}
0x4d8a…4da8 Head {h00=0x001a, h01=0x0050, text=» ADR A2,A3 REC ADDR =3«, t00=0x0031, t01=0x0112}
0x4da8…4dd2 Head {h00=0x0026, h01=0x0050, text=» LD A4,FDBRLE,A1 RECORD LENGTH =3 «, t00=0x0031, t01=0x0130}
0x4dd2…4de8 Head {h00=0x0012, h01=0x0050, text=» SUK A4,6 =3 «, t00=0x0031, t01=0x015a}
0x4de8…4dfe Head {h00=0x0012, h01=0x0050, text=» ADR A2,A4 =3«, t00=0x0031, t01=0x0170}
0x4dfe…4e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0186}
0x4e08…4e2a Head {h00=0x001e, h01=0x0050, text=»* MOVE LOG REC NO TO ECB«, t00=0x0031, t01=0x0190}
0x4e2a…4e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0022}
0x4e34…4e46 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0032, t01=0x002c}
0x4e46…4e5a Head {h00=0x0010, h01=0x0050, text=» LC A5,3,A2 «, t00=0x0032, t01=0x003e}
0x4e5a…4e72 Head {h00=0x0014, h01=0x0050, text=» ST A5,ECBCW,A9 «, t00=0x0032, t01=0x0052}
0x4e72…4e86 Head {h00=0x0010, h01=0x0050, text=» LC A5,4,A2 «, t00=0x0032, t01=0x006a}
0x4e86…4e98 Head {h00=0x000e, h01=0x0050, text=» ECR A5,A5«, t00=0x0032, t01=0x007e}
0x4e98…4eac Head {h00=0x0010, h01=0x0050, text=» LC A5,5,A2 «, t00=0x0032, t01=0x0090}
0x4eac…4ec6 Head {h00=0x0016, h01=0x0050, text=» ST A5,ECBCW+2,A9 «, t00=0x0032, t01=0x00a4}
0x4ec6…4eda Head {h00=0x0010, h01=0x0050, text=»* SET CRN «, t00=0x0032, t01=0x00be}
0x4eda…4ee4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d2}
0x4ee4…4f0c Head {h00=0x0024, h01=0x0050, text=» LD A11,FDBADF,A6 FDB DATA FILE «, t00=0x0032, t01=0x00dc}
0x4f0c…4f2e Head {h00=0x001e, h01=0x0050, text=» LDR A1,A11 DATA FILE FDB «, t00=0x0032, t01=0x0104}
0x4f2e…4f58 Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER ADDR«, t00=0x0032, t01=0x0126}
0x4f58…4f7c Head {h00=0x0020, h01=0x0050, text=» LDR A10,A2 CRN BUFFER ADDR «, t00=0x0032, t01=0x0150}
0x4f7c…4fa2 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A6 FDB ADDR INDEX FILE«, t00=0x0032, t01=0x0174}
0x4fa2…4fce Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLGRN GET INDE X LOG REC NO«, t00=0x0033, t01=0x000a}
0x4fce…4fee Head {h00=0x001c, h01=0x0050, text=» LDK A5,QRR RANDOM READ «, t00=0x0033, t01=0x0036}
0x4fee…5006 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A11«, t00=0x0033, t01=0x0056}
0x5006…5020 Head {h00=0x0016, h01=0x0050, text=» ANK A7,/3F ORDER «, t00=0x0033, t01=0x006e}
0x5020…5036 Head {h00=0x0012, h01=0x0050, text=» SUK A7,QSTIND«, t00=0x0033, t01=0x0088}
0x5036…505a Head {h00=0x0020, h01=0x0050, text=» RF(NE) DMR025 INDEXED READ «, t00=0x0033, t01=0x009e}
0x505a…507e Head {h00=0x0020, h01=0x0050, text=» LDK A5,QSTIND START INDEXED«, t00=0x0033, t01=0x00c2}
0x507e…5090 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0033, t01=0x00e6}
0x5090…50b4 Head {h00=0x0020, h01=0x0050, text=» RF(NN) DMR025 NOT UNDERFLOW«, t00=0x0033, t01=0x00f8}
0x50b4…50ca Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/7FFF«, t00=0x0033, t01=0x011c}
0x50ca…50dc Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0033, t01=0x0132}
0x50dc…50f0 Head {h00=0x0010, h01=0x0050, text=»DMR025 EQU *«, t00=0x0033, t01=0x0144}
0x50f0…510c Head {h00=0x0018, h01=0x0050, text=» SC A2,CRNCIF+1,A10 «, t00=0x0033, t01=0x0158}
0x510c…5136 Head {h00=0x0026, h01=0x0050, text=» ST A3,CRNCIF+2,A10 CRN INDEX FILE«, t00=0x0033, t01=0x0174}
0x5136…515a Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBCW,A9 REC NR DATA «, t00=0x0034, t01=0x000e}
0x515a…5174 Head {h00=0x0016, h01=0x0050, text=» ST A2,CRNCDF,A10 «, t00=0x0034, t01=0x0032}
0x5174…518e Head {h00=0x0016, h01=0x0050, text=» LD A2,ECBCW+2,A9 «, t00=0x0034, t01=0x004c}
0x518e…51aa Head {h00=0x0018, h01=0x0050, text=» ST A2,CRNCDF+2,A10 «, t00=0x0034, t01=0x0066}
0x51aa…51ca Head {h00=0x001c, h01=0x0050, text=» LC A2,FWTFNR,A6 FILE NR«, t00=0x0034, t01=0x0082}
0x51ca…51e4 Head {h00=0x0016, h01=0x0050, text=» SC A2,CRNCIF,A10 «, t00=0x0034, t01=0x00a2}
0x51e4…5200 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A11 FDB DATA«, t00=0x0034, t01=0x00bc}
0x5200…5224 Head {h00=0x0020, h01=0x0050, text=» SC A5,DWTOR+1,A6 NEW ORDER «, t00=0x0034, t01=0x00d8}
0x5224…523a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/CFFF«, t00=0x0034, t01=0x00fc}
0x523a…526a Head {h00=0x002c, h01=0x0050, text=» ANS A2,FDBDBR,A6 RELEASE INDEX BUFFERS «, t00=0x0034, t01=0x0112}
0x526a…527e Head {h00=0x0010, h01=0x0050, text=» ABL DMT280 «, t00=0x0034, t01=0x0142}
0x527e…528c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x0156}
0x528c…52b2 Head {h00=0x0022, h01=0x0050, text=»DMIRN EQU * INDEXED READ NEXT «, t00=0x0034, t01=0x0164}
0x52b2…52e8 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0034, t01=0x018a}
0x52e8…530e Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD OFFSET«, t00=0x0035, t01=0x0030}
0x530e…5320 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0035, t01=0x0056}
0x5320…5338 Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x0035, t01=0x0068}
0x5338…534c Head {h00=0x0010, h01=0x0050, text=»DMI100 EQU *«, t00=0x0035, t01=0x0080}
0x534c…5366 Head {h00=0x0016, h01=0x0050, text=» ADR A2,A3 BUFFADR«, t00=0x0035, t01=0x0094}
0x5366…537e Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0035, t01=0x00ae}
0x537e…53aa Head {h00=0x0028, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR OF STATUS CHAR«, t00=0x0035, t01=0x00c6}
0x53aa…53c8 Head {h00=0x001a, h01=0x0050, text=» LDK A5,/FF USED MARK «, t00=0x0035, t01=0x00f2}
0x53c8…53e2 Head {h00=0x0016, h01=0x0050, text=» CCR A5,A2 STATUS «, t00=0x0035, t01=0x0110}
0x53e2…53fc Head {h00=0x0016, h01=0x0050, text=» RF(E) DMI120 USED«, t00=0x0035, t01=0x012a}
0x53fc…5414 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A1«, t00=0x0035, t01=0x0144}
0x5414…543e Head {h00=0x0026, h01=0x0050, text=» ST A4,FDBRRO,A1 LAST REC IN SECT «, t00=0x0035, t01=0x015c}
0x543e…5448 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0186}
0x5448…5468 Head {h00=0x001c, h01=0x0050, text=»* CHECK IF END OF FILE«, t00=0x0035, t01=0x0190}
0x5468…5472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0020}
0x5472…548a Head {h00=0x0014, h01=0x0050, text=» LDR A9,A3 SAVE «, t00=0x0036, t01=0x002a}
0x548a…54ac Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0036, t01=0x0042}
0x54ac…54c4 Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x0036, t01=0x0064}
0x54c4…54e2 Head {h00=0x001a, h01=0x0050, text=» RF(L) DMI106 NOT EOF «, t00=0x0036, t01=0x007c}
0x54e2…54fc Head {h00=0x0016, h01=0x0050, text=» RF(G) DMI105 EOF «, t00=0x0036, t01=0x009a}
0x54fc…5516 Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x0036, t01=0x00b4}
0x5516…5534 Head {h00=0x001a, h01=0x0050, text=» RF(L) DMI106 NOT EOF «, t00=0x0036, t01=0x00ce}
0x5534…554c Head {h00=0x0014, h01=0x0050, text=»DMI105 LDR A3,A9«, t00=0x0036, t01=0x00ec}
0x554c…5564 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,EOFERR «, t00=0x0036, t01=0x0104}
0x5564…557a Head {h00=0x0012, h01=0x0050, text=» RF DMI035 EOF«, t00=0x0036, t01=0x011c}
0x557a…559a Head {h00=0x001c, h01=0x0050, text=»DMI106 LDR A3,A9 RESTORE«, t00=0x0036, t01=0x0132}
0x559a…55b6 Head {h00=0x0018, h01=0x0050, text=» RF DMI010 NEXT REC «, t00=0x0036, t01=0x0152}
0x55b6…55c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x016e}
0x55c4…55da Head {h00=0x0012, h01=0x0050, text=»DMI120 EQU * «, t00=0x0036, t01=0x017c}
0x55da…55fc (55, 0, 400) Head {h00=0x001e, h01=0x0050, text=»* INDEX RECORD IS FOUND «, t00=0x0037, t01=0x0004}
0x55fc…5606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0026}
0x5606…5628 Head {h00=0x001e, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB «, t00=0x0037, t01=0x0030}
0x5628…5632 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0052}
0x5632…564e Head {h00=0x0018, h01=0x0050, text=»* KEY RECORD FOUN «, t00=0x0037, t01=0x005c}
0x564e…5680 Head {h00=0x002e, h01=0x0050, text=»* CHECK IF NEXT RECORD HAS THE SAME KEY «, t00=0x0037, t01=0x0078}
0x5680…568a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00aa}
0x568a…56b0 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBRRO,A1 RECORD OFFSET«, t00=0x0037, t01=0x00b4}
0x56b0…56c8 Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0037, t01=0x00da}
0x56c8…56e4 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 REC ADDR «, t00=0x0037, t01=0x00f2}
0x56e4…5708 Head {h00=0x0020, h01=0x0050, text=» LD A4,FDBRLE,A1 REC LENGTH «, t00=0x0037, t01=0x010e}
0x5708…5724 Head {h00=0x0018, h01=0x0050, text=» SUK A4,6 KEY LENGTH«, t00=0x0037, t01=0x0132}
0x5724…5736 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A4«, t00=0x0037, t01=0x014e}
0x5736…575c Head {h00=0x0022, h01=0x0050, text=» CC A4,2,A2 DUPLICATE KEY CHAR«, t00=0x0037, t01=0x0160}
0x575c…5784 Head {h00=0x0024, h01=0x0050, text=» RF(NE) DMR020 NEXT KEY NOT SAME«, t00=0x0037, t01=0x0186}
0x5784…57a2 Head {h00=0x001a, h01=0x0050, text=» LDKL A5,NXTKYS BIT 6 «, t00=0x0038, t01=0x001e}
0x57a2…57c8 Head {h00=0x0022, h01=0x0050, text=» ORS A5,ECBRC,A9 NEXT KEY SAME«, t00=0x0038, t01=0x003c}
0x57c8…57dc Head {h00=0x0010, h01=0x0050, text=»DMR020 EQU *«, t00=0x0038, t01=0x0062}
0x57dc…57f8 Head {h00=0x0018, h01=0x0050, text=» LDK A2,0 MARK FOUND«, t00=0x0038, t01=0x0076}
0x57f8…582a Head {h00=0x002e, h01=0x0050, text=» ABL DMR006 CONT AS FOR INDEXED RAND READ «, t00=0x0038, t01=0x0092}
0x582a…5858 Head {h00=0x002a, h01=0x0050, text=»DMI037 LDKL A1,KEYERR KEY NOT FOUND =4«, t00=0x0038, t01=0x00c4}
0x5858…586e Head {h00=0x0012, h01=0x0050, text=» RF DMI035 =4«, t00=0x0038, t01=0x00f2}
0x586e…5882 Head {h00=0x0010, h01=0x0050, text=»DMI010 EQU *«, t00=0x0038, t01=0x0108}
0x5882…58ae Head {h00=0x0028, h01=0x0050, text=» CF A14,RDNXTR GET NEXT INDEX RECORD«, t00=0x0038, t01=0x011c}
0x58ae…58ce Head {h00=0x001c, h01=0x0050, text=» RB DMI100 RECORD FOUND «, t00=0x0038, t01=0x0148}
0x58ce…58ea Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0038, t01=0x0168}
0x58ea…58fe Head {h00=0x0010, h01=0x0050, text=»DMI031 EQU *«, t00=0x0038, t01=0x0184}
0x58fe…591e Head {h00=0x001c, h01=0x0050, text=» LDKL A1,NODERR NO IDENT«, t00=0x0039, t01=0x0008}
0x591e…5932 Head {h00=0x0010, h01=0x0050, text=»DMI035 EQU *«, t00=0x0039, t01=0x0028}
0x5932…5950 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A3 BUFFER ADDR«, t00=0x0039, t01=0x003c}
0x5950…5970 Head {h00=0x001c, h01=0x0050, text=» ABL(Z) DMTERX NO BUFFER«, t00=0x0039, t01=0x005a}
0x5970…5994 Head {h00=0x0020, h01=0x0050, text=» ABL DMTERR ERROR AND BUFFER«, t00=0x0039, t01=0x007a}
0x5994…59a8 Head {h00=0x0010, h01=0x0050, text=»DMI036 EQU *«, t00=0x0039, t01=0x009e}
0x59a8…59bc Head {h00=0x0010, h01=0x0050, text=» ANK A1,/27 «, t00=0x0039, t01=0x00b2}
0x59bc…59e2 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) DMI035 BIT 10,13,14,15«, t00=0x0039, t01=0x00c6}
0x59e2…5a08 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,EOMERR GRAVE ERR ALSO«, t00=0x0039, t01=0x00ec}
0x5a08…5a1a Head {h00=0x000e, h01=0x0050, text=» RB DMI035«, t00=0x0039, t01=0x0112}
0x5a1a…5a28 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x0124}
0x5a28…5a52 Head {h00=0x0026, h01=0x0050, text=»DMINS2 EQU * INDEXED INSERT PART 2«, t00=0x0039, t01=0x0132}
0x5a52…5a76 Head {h00=0x0020, h01=0x0050, text=»DMXDEL EQU * INDEXED DELETE «, t00=0x0039, t01=0x015c}
0x5a76…5a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0180}
0x5a80…5ab6 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0039, t01=0x018a}
0x5ab6…5ace Head {h00=0x0014, h01=0x0050, text=» LC A3,FDBDBR,A6«, t00=0x003a, t01=0x0030}
0x5ace…5ae2 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x003a, t01=0x0048}
0x5ae2…5b04 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DXI010 KEEP BUFFER«, t00=0x003a, t01=0x005c}
0x5b04…5b1c Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x003a, t01=0x007e}
0x5b1c…5b34 Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x003a, t01=0x0096}
0x5b34…5b5a Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x003a, t01=0x00ae}
0x5b5a…5b6e Head {h00=0x0010, h01=0x0050, text=»DXI010 EQU *«, t00=0x003a, t01=0x00d4}
0x5b6e…5b88 Head {h00=0x0016, h01=0x0050, text=» LDK A5,10 LOOPER «, t00=0x003a, t01=0x00e8}
0x5b88…5ba8 Head {h00=0x001c, h01=0x0050, text=»DXI020 EQU * NEXT INDEX «, t00=0x003a, t01=0x0102}
0x5ba8…5bc6 Head {h00=0x001a, h01=0x0050, text=» LD A7,DWTOR,A6 ORDER «, t00=0x003a, t01=0x0122}
0x5bc6…5bda Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x003a, t01=0x0140}
0x5bda…5bec Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x003a, t01=0x0154}
0x5bec…5c0e Head {h00=0x001e, h01=0x0050, text=» RF(Z) DXI100 ALL INDEXES «, t00=0x003a, t01=0x0166}
0x5c0e…5c2a Head {h00=0x0018, h01=0x0050, text=» LDR A4,A6 FDB DATA «, t00=0x003a, t01=0x0188}
0x5c2a…5c3c Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x003b, t01=0x0014}
0x5c3c…5c5e Head {h00=0x001e, h01=0x0050, text=» LD A1,FDBADF,A4 FDB INDEX«, t00=0x003b, t01=0x0026}
0x5c5e…5c7c Head {h00=0x001a, h01=0x0050, text=» RB(Z) DXI020 NO INDEX«, t00=0x003b, t01=0x0048}
0x5c7c…5c9a Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER «, t00=0x003b, t01=0x0066}
0x5c9a…5cb2 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTOR,A1 «, t00=0x003b, t01=0x0084}
0x5cb2…5cd8 Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTECB,A6 USER ECB ADDR«, t00=0x003b, t01=0x009c}
0x5cd8…5cf0 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTECB,A1«, t00=0x003b, t01=0x00c2}
0x5cf0…5d14 Head {h00=0x0020, h01=0x0050, text=» ST A5,FDBKA,A6 SAVE COUNTER«, t00=0x003b, t01=0x00da}
0x5d14…5d28 Head {h00=0x0010, h01=0x0050, text=» SUK A7,QINS«, t00=0x003b, t01=0x00fe}
0x5d28…5d4a Head {h00=0x001e, h01=0x0050, text=» RF(E) DMINIX INSERT INDEX«, t00=0x003b, t01=0x0112}
0x5d4a…5d6a Head {h00=0x001c, h01=0x0050, text=» RF DMDELX DELETE INDEX «, t00=0x003b, t01=0x0134}
0x5d6a…5d78 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003b, t01=0x0154}
0x5d78…5da6 Head {h00=0x002a, h01=0x0050, text=»* RETURN FROM UPDATING OF ONE INDEX «, t00=0x003b, t01=0x0162}
0x5da6…5db0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0190}
0x5db0…5dc4 Head {h00=0x0010, h01=0x0050, text=»DMTAR5 EQU *«, t00=0x003c, t01=0x000a}
0x5dc4…5dea Head {h00=0x0022, h01=0x0050, text=» LD A6,FDBADF,A1 FDB DATA FILE«, t00=0x003c, t01=0x001e}
0x5dea…5e18 Head {h00=0x002a, h01=0x0050, text=» LD A5,FDBKA,A6 GET COUNTER OF INDEXES«, t00=0x003c, t01=0x0044}
0x5e18…5e3a Head {h00=0x001e, h01=0x0050, text=» RB DXI020 TAKE NEXT INDEX«, t00=0x003c, t01=0x0072}
0x5e3a…5e5c Head {h00=0x001e, h01=0x0050, text=»DXI100 EQU * INDEXES READY«, t00=0x003c, t01=0x0094}
0x5e5c…5e76 Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RET CODE«, t00=0x003c, t01=0x00b6}
0x5e76…5e9a Head {h00=0x0020, h01=0x0050, text=» SUK A7,QINS INDEXED INSERT «, t00=0x003c, t01=0x00d0}
0x5e9a…5eb6 Head {h00=0x0018, h01=0x0050, text=» ABL(E) DMTERX READY«, t00=0x003c, t01=0x00f4}
0x5eb6…5ec8 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x003c, t01=0x0110}
0x5ec8…5eea Head {h00=0x001e, h01=0x0050, text=» ABL DMT020 RESTART DMTASK«, t00=0x003c, t01=0x0122}
0x5eea…5ef8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0144}
0x5ef8…5f1a Head {h00=0x001e, h01=0x0050, text=»DMINIX EQU * INSERT INDEX «, t00=0x003c, t01=0x0152}
0x5f1a…5f30 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003c, t01=0x0174}
0x5f30…5f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x018a}
0x5f3a…5f5c (61, 0, 400) Head {h00=0x001e, h01=0x0050, text=»* GET KEY IN USER BUFFER«, t00=0x003d, t01=0x0004}
0x5f5c…5f66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0026}
0x5f66…5f88 Head {h00=0x001e, h01=0x0050, text=» LD A4,FDBADF,A1 DATA FDB «, t00=0x003d, t01=0x0030}
0x5f88…5faa Head {h00=0x001e, h01=0x0050, text=» LD A4,DWTECB,A4 USER ECB «, t00=0x003d, t01=0x0052}
0x5faa…5fce Head {h00=0x0020, h01=0x0050, text=» LD A8,ECBBA,A4 USER BUFFER «, t00=0x003d, t01=0x0074}
0x5fce…5fee Head {h00=0x001c, h01=0x0050, text=» AD A8,FDBKA,A1 KEY ADDR«, t00=0x003d, t01=0x0098}
0x5fee…6000 Head {h00=0x000e, h01=0x0050, text=» RF INS010«, t00=0x003d, t01=0x00b8}
0x6000…600c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x00ca}
0x600c…6022 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x003d, t01=0x00d6}
0x6022…602c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00ec}
0x602c…6054 Head {h00=0x0024, h01=0x0050, text=»DMDELX EQU * DELETE INDEX RECORD«, t00=0x003d, t01=0x00f6}
0x6054…608a Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x003d, t01=0x011e}
0x608a…609c Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x003d, t01=0x0154}
0x609c…60bc Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBKEY KEY ADDR«, t00=0x003d, t01=0x0166}
0x60bc…60d0 Head {h00=0x0010, h01=0x0050, text=»INS010 EQU *«, t00=0x003d, t01=0x0186}
0x60d0…60e4 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A8 «, t00=0x003e, t01=0x000a}
0x60e4…610c Head {h00=0x0024, h01=0x0050, text=» LD A11,FDBRLE,A1 RECORD LENGTH «, t00=0x003e, t01=0x001e}
0x610c…612a Head {h00=0x001a, h01=0x0050, text=» SUKL A11,6 KEY LENGTH«, t00=0x003e, t01=0x0046}
0x612a…613e Head {h00=0x0010, h01=0x0050, text=» LDR A13,A14«, t00=0x003e, t01=0x0064}
0x613e…6172 Head {h00=0x0030, h01=0x0050, text=» ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS«, t00=0x003e, t01=0x0078}
0x6172…619a Head {h00=0x0024, h01=0x0050, text=» CF A14,FNDKEY GET INDEX RECORD «, t00=0x003e, t01=0x00ac}
0x619a…61b6 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x003e, t01=0x00d4}
0x61b6…61d2 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A2 RET CODE «, t00=0x003e, t01=0x00f0}
0x61d2…61e4 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x003e, t01=0x010c}
0x61e4…620a Head {h00=0x0022, h01=0x0050, text=» ABL(Z) DMI036 NO SECTOR FOUND«, t00=0x003e, t01=0x011e}
0x620a…622a Head {h00=0x001c, h01=0x0050, text=» LDR A13,A3 BUFFER ADDR «, t00=0x003e, t01=0x0144}
0x622a…624c Head {h00=0x001e, h01=0x0050, text=» LD A5,DWTECB,A6 USER ECB «, t00=0x003e, t01=0x0164}
0x624c…6264 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTOR,A6 «, t00=0x003e, t01=0x0186}
0x6264…6278 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/3F «, t00=0x003f, t01=0x000e}
0x6278…628c Head {h00=0x0010, h01=0x0050, text=» SUK A1,QDEL«, t00=0x003f, t01=0x0022}
0x628c…62b6 Head {h00=0x0026, h01=0x0050, text=» ABL(E) DEL000 DELETE INDEX RECORD«, t00=0x003f, t01=0x0036}
0x62b6…62c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0060}
0x62c0…62ec Head {h00=0x0028, h01=0x0050, text=»* SET RC BIT 6 TO USER IF NEXT KEY«, t00=0x003f, t01=0x006a}
0x62ec…6312 Head {h00=0x0022, h01=0x0050, text=»* IS SAME IN REQUESTED INDEX«, t00=0x003f, t01=0x0096}
0x6312…631c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00bc}
0x631c…632e Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x003f, t01=0x00c6}
0x632e…6356 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) INS050 NEXT KEY NOT SAME«, t00=0x003f, t01=0x00d8}
0x6356…637c Head {h00=0x0022, h01=0x0050, text=» LDKL A4,NXTKYS NEXT KEY SAME «, t00=0x003f, t01=0x0100}
0x637c…63a2 Head {h00=0x0022, h01=0x0050, text=» ORS A4,ECBRC,A5 NEXT KEY SAME«, t00=0x003f, t01=0x0126}
0x63a2…63b8 Head {h00=0x0012, h01=0x0050, text=» IFT INSLAS=1 «, t00=0x003f, t01=0x014c}
0x63b8…63c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0162}
0x63c2…63e2 Head {h00=0x001c, h01=0x0050, text=»* INSERT SAME KEY LAST«, t00=0x003f, t01=0x016c}
0x63e2…63ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x018c}
0x63ec…6402 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A6 FDB«, t00=0x0040, t01=0x0008}
0x6402…6424 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBRRO,A1 REC OFFS «, t00=0x0040, t01=0x001e}
0x6424…6436 Head {h00=0x000e, h01=0x0050, text=» RF INS100«, t00=0x0040, t01=0x0040}
0x6436…644a Head {h00=0x0010, h01=0x0050, text=»INS080 EQU *«, t00=0x0040, t01=0x0052}
0x644a…646e Head {h00=0x0020, h01=0x0050, text=» CF A14,RDNXTR GET NEXT REC «, t00=0x0040, t01=0x0066}
0x646e…6484 Head {h00=0x0012, h01=0x0050, text=» RF INS100 OK «, t00=0x0040, t01=0x008a}
0x6484…649e Head {h00=0x0016, h01=0x0050, text=» ABL DEL045 ERROR «, t00=0x0040, t01=0x00a0}
0x649e…64b2 Head {h00=0x0010, h01=0x0050, text=»INS100 EQU *«, t00=0x0040, t01=0x00ba}
0x64b2…64c4 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0040, t01=0x00ce}
0x64c4…64dc Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0040, t01=0x00e0}
0x64dc…6500 Head {h00=0x0020, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR STATUS«, t00=0x0040, t01=0x00f8}
0x6500…6514 Head {h00=0x0010, h01=0x0050, text=» LDK A5,/FF «, t00=0x0040, t01=0x011c}
0x6514…6526 Head {h00=0x000e, h01=0x0050, text=» CCR A5,A2«, t00=0x0040, t01=0x0130}
0x6526…6540 Head {h00=0x0016, h01=0x0050, text=» RF(E) INS150 USED«, t00=0x0040, t01=0x0142}
0x6540…6558 Head {h00=0x0014, h01=0x0050, text=» LD A5,FDBMRO,A1«, t00=0x0040, t01=0x015c}
0x6558…6570 Head {h00=0x0014, h01=0x0050, text=» ST A5,FDBRRO,A1«, t00=0x0040, t01=0x0174}
0x6570…659e Head {h00=0x002a, h01=0x0050, text=» RB INS080 GET FIRST RE C IN NXT SECT «, t00=0x0040, t01=0x018c}
0x659e…65b2 Head {h00=0x0010, h01=0x0050, text=»INS150 EQU *«, t00=0x0041, t01=0x002a}
0x65b2…65d4 Head {h00=0x001e, h01=0x0050, text=» LC A5,-4,A2 DUPL KEY CHAR«, t00=0x0041, t01=0x003e}
0x65d4…65f2 Head {h00=0x001a, h01=0x0050, text=» CWR A5,A11 KEY LENGTH«, t00=0x0041, t01=0x0060}
0x65f2…661a Head {h00=0x0024, h01=0x0050, text=» RB(E) INS080 NEXT SAME GET NEXT«, t00=0x0041, t01=0x007e}
0x661a…6624 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00a6}
0x6624…6648 Head {h00=0x0020, h01=0x0050, text=»* UPDATE LAST SAME RECORD «, t00=0x0041, t01=0x00b0}
0x6648…6652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00d4}
0x6652…6672 Head {h00=0x001c, h01=0x0050, text=» SC A11,-4,A2 NEXT SAME «, t00=0x0041, t01=0x00de}
0x6672…668a Head {h00=0x0014, h01=0x0050, text=» LD A7,FDBRRO,A1«, t00=0x0041, t01=0x00fe}
0x668a…66a2 Head {h00=0x0014, h01=0x0050, text=» CW A7,FDBMRO,A1«, t00=0x0041, t01=0x0116}
0x66a2…66cc Head {h00=0x0026, h01=0x0050, text=» RF(NE) INS160 SECT WRITTEN LATER «, t00=0x0041, t01=0x012e}
0x66cc…66d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0158}
0x66d6…66ee Head {h00=0x0014, h01=0x0050, text=»* WRITE BLOCK «, t00=0x0041, t01=0x0162}
0x66ee…66f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x017a}
0x66f8…6716 Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE,WAIT«, t00=0x0041, t01=0x0184}
0x6716…6722 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0042, t01=0x0012}
0x6722…6736 Head {h00=0x0010, h01=0x0050, text=» DATA 15 FM «, t00=0x0042, t01=0x001e}
0x6736…6756 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x0042, t01=0x0032}
0x6756…6768 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0042, t01=0x0052}
0x6768…6780 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0042, t01=0x0064}
0x6780…678a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x007c}
0x678a…67a6 Head {h00=0x0018, h01=0x0050, text=»* GET NEXT RECORD «, t00=0x0042, t01=0x0086}
0x67a6…67b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00a2}
0x67b0…67c4 Head {h00=0x0010, h01=0x0050, text=»INS160 EQU *«, t00=0x0042, t01=0x00ac}
0x67c4…67ea Head {h00=0x0022, h01=0x0050, text=» LDR A7,A5 NR OF SAME IN NEXT «, t00=0x0042, t01=0x00c0}
0x67ea…6800 Head {h00=0x0012, h01=0x0050, text=» LDR A1,A6 FDB«, t00=0x0042, t01=0x00e6}
0x6800…6822 Head {h00=0x001e, h01=0x0050, text=» CF A14,RDNXTR GET NEXT RC«, t00=0x0042, t01=0x00fc}
0x6822…6838 Head {h00=0x0012, h01=0x0050, text=» RF INS170 OK «, t00=0x0042, t01=0x011e}
0x6838…6852 Head {h00=0x0016, h01=0x0050, text=» ABL DEL045 ERROR «, t00=0x0042, t01=0x0134}
0x6852…6866 Head {h00=0x0010, h01=0x0050, text=»INS170 EQU *«, t00=0x0042, t01=0x014e}
0x6866…6886 Head {h00=0x001c, h01=0x0050, text=» LDR A13,A3 BUFFER ADDR «, t00=0x0042, t01=0x0162}
0x6886…68ac Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTECB,A6 USER ECB ADDR«, t00=0x0042, t01=0x0182}
0x68ac…68b8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x0018}
0x68b8…68ce Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0043, t01=0x0024}
0x68ce…68e2 Head {h00=0x0010, h01=0x0050, text=»INS050 EQU *«, t00=0x0043, t01=0x003a}
0x68e2…68ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x004e}
0x68ec…6918 Head {h00=0x0028, h01=0x0050, text=»* CREATE AN INDE XRECORD IN AREA 1«, t00=0x0043, t01=0x0058}
0x6918…6922 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0084}
0x6922…6940 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A12 FROM ADDR «, t00=0x0043, t01=0x008e}
0x6940…694a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00ac}
0x694a…695e Head {h00=0x0010, h01=0x0050, text=» LDR A3,A14 «, t00=0x0043, t01=0x00b6}
0x695e…6978 Head {h00=0x0016, h01=0x0050, text=» ADK A3,2 TO ADDR «, t00=0x0043, t01=0x00ca}
0x6978…6996 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A11 KEY LENGTH«, t00=0x0043, t01=0x00e4}
0x6996…69b4 Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTBM MOVE KEY«, t00=0x0043, t01=0x0102}
0x69b4…69c6 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0043, t01=0x0120}
0x69c6…69de Head {h00=0x0014, h01=0x0050, text=» SCR A2,A3 DUMMY«, t00=0x0043, t01=0x0132}
0x69de…69f0 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0043, t01=0x014a}
0x69f0…6a08 Head {h00=0x0014, h01=0x0050, text=» SCR A2,A3 DUMMY«, t00=0x0043, t01=0x015c}
0x6a08…6a1a Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0043, t01=0x0174}
0x6a1a…6a3c Head {h00=0x001e, h01=0x0050, text=» SCR A7,A3 NR OF SAME CHAR«, t00=0x0043, t01=0x0186}
0x6a3c…6a4e Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0044, t01=0x0018}
0x6a4e…6a74 Head {h00=0x0022, h01=0x0050, text=» LDR A7,A3 ADDR OF LOG REC NR «, t00=0x0044, t01=0x002a}
0x6a74…6a8c Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A5 «, t00=0x0044, t01=0x0050}
0x6a8c…6aba Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBCW+2,A5 REC NR DATA FILE REC«, t00=0x0044, t01=0x0068}
0x6aba…6acc Head {h00=0x000e, h01=0x0050, text=» SCR A2,A7«, t00=0x0044, t01=0x0096}
0x6acc…6ade Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0044, t01=0x00a8}
0x6ade…6af0 Head {h00=0x000e, h01=0x0050, text=» SCR A3,A7«, t00=0x0044, t01=0x00ba}
0x6af0…6b02 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0044, t01=0x00cc}
0x6b02…6b14 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0044, t01=0x00de}
0x6b14…6b32 Head {h00=0x001a, h01=0x0050, text=» SCR A3,A7 LOG REC NR «, t00=0x0044, t01=0x00f0}
0x6b32…6b44 Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0044, t01=0x010e}
0x6b44…6b5c Head {h00=0x0014, h01=0x0050, text=» LDK A1,/FF USED«, t00=0x0044, t01=0x0120}
0x6b5c…6b7a Head {h00=0x001a, h01=0x0050, text=» SCR A1,A7 STATUS CHAR«, t00=0x0044, t01=0x0138}
0x6b7a…6b96 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0044, t01=0x0156}
0x6b96…6bbe Head {h00=0x0024, h01=0x0050, text=» CF A14,GTLGRN GET REC NR INDEX «, t00=0x0044, t01=0x0172}
0x6bbe…6bc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x000a}
0x6bc8…6bf8 Head {h00=0x002c, h01=0x0050, text=»* SAVE RECORD NR FOR FIRST MOVED INDEX«, t00=0x0045, t01=0x0014}
0x6bf8…6c02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0044}
0x6c02…6c18 Head {h00=0x0012, h01=0x0050, text=» ST A2,-28,A14«, t00=0x0045, t01=0x004e}
0x6c18…6c2e Head {h00=0x0012, h01=0x0050, text=» ST A3,-26,A14«, t00=0x0045, t01=0x0064}
0x6c2e…6c3c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x007a}
0x6c3c…6c46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0088}
0x6c46…6c84 Head {h00=0x003a, h01=0x0050, text=»* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING«, t00=0x0045, t01=0x0092}
0x6c84…6cac Head {h00=0x0024, h01=0x0050, text=»* USED RECORDS ROLLED FORWARD «, t00=0x0045, t01=0x00d0}
0x6cac…6cd4 Head {h00=0x0024, h01=0x0050, text=»* A6,A11,A13 IS USED AT ENTRY «, t00=0x0045, t01=0x00f8}
0x6cd4…6cfc Head {h00=0x0024, h01=0x0050, text=» ADKL A11,7 RECORD LENGTH TOTAL «, t00=0x0045, t01=0x0120}
0x6cfc…6d06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0148}
0x6d06…6d22 Head {h00=0x0018, h01=0x0050, text=»* USE D REGISTERS «, t00=0x0045, t01=0x0152}
0x6d22…6d44 Head {h00=0x001e, h01=0x0050, text=»* A6 = FDB ADDR INDEX «, t00=0x0045, t01=0x016e}
0x6d44…6d60 Head {h00=0x0018, h01=0x0050, text=»* A10 = AREA ADDR«, t00=0x0045, t01=0x0190}
0x6d60…6d86 Head {h00=0x0022, h01=0x0050, text=»* A11 = RECORD LENGTH INDEX«, t00=0x0046, t01=0x001c}
0x6d86…6db6 Head {h00=0x002c, h01=0x0050, text=»* A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 «, t00=0x0046, t01=0x0042}
0x6db6…6dde Head {h00=0x0024, h01=0x0050, text=»* A13 = BUFFER ADDRESS BLOCK «, t00=0x0046, t01=0x0072}
0x6dde…6de8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x009a}
0x6de8…6dfc Head {h00=0x0010, h01=0x0050, text=»INS190 EQU *«, t00=0x0046, t01=0x00a4}
0x6dfc…6e18 Head {h00=0x0018, h01=0x0050, text=» LDKL A12,1 BUFADR2 «, t00=0x0046, t01=0x00b8}
0x6e18…6e2c Head {h00=0x0010, h01=0x0050, text=»INS200 EQU *«, t00=0x0046, t01=0x00d4}
0x6e2c…6e3e Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0046, t01=0x00e8}
0x6e3e…6e52 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0046, t01=0x00fa}
0x6e52…6e6e Head {h00=0x0018, h01=0x0050, text=» RF(Z) INS210 BUFAR1«, t00=0x0046, t01=0x010e}
0x6e6e…6e9a Head {h00=0x0028, h01=0x0050, text=» LDKL A1,RECBFZ RECORD BUUFFER SIZE «, t00=0x0046, t01=0x012a}
0x6e9a…6eb0 Head {h00=0x0012, h01=0x0050, text=» SLL A1,1 BYTE«, t00=0x0046, t01=0x0156}
0x6eb0…6eca Head {h00=0x0016, h01=0x0050, text=»INS210 LDR A10,A14«, t00=0x0046, t01=0x016c}
0x6eca…6edc Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0046, t01=0x0186}
0x6edc…6f08 Head {h00=0x0028, h01=0x0050, text=» ADR A10,A1 RECORD BUFFER AREA ADDR «, t00=0x0047, t01=0x0008}
0x6f08…6f12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0034}
0x6f12…6f2e Head {h00=0x0018, h01=0x0050, text=»* SAVE LAST RECORD«, t00=0x0047, t01=0x003e}
0x6f2e…6f38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x005a}
0x6f38…6f4c Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x0047, t01=0x0064}
0x6f4c…6f64 Head {h00=0x0014, h01=0x0050, text=» ADKL A1,BUFSTA «, t00=0x0047, t01=0x0078}
0x6f64…6f96 Head {h00=0x002e, h01=0x0050, text=» AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT «, t00=0x0047, t01=0x0090}
0x6f96…6faa Head {h00=0x0010, h01=0x0050, text=» LDR A2,A11 «, t00=0x0047, t01=0x00c2}
0x6faa…6fbe Head {h00=0x0010, h01=0x0050, text=» LDR A3,A10 «, t00=0x0047, t01=0x00d6}
0x6fbe…6fe4 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTBM SAVE LAST RECORD«, t00=0x0047, t01=0x00ea}
0x6fe4…7004 Head {h00=0x001c, h01=0x0050, text=»* MOVE REST OF SECTOR «, t00=0x0047, t01=0x0110}
0x7004…700e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0130}
0x700e…7022 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x0047, t01=0x013a}
0x7022…703a Head {h00=0x0014, h01=0x0050, text=» ADKL A1,BUFSTA «, t00=0x0047, t01=0x014e}
0x703a…705c Head {h00=0x001e, h01=0x0050, text=» AD A1,FDBRRO,A6 FROM ADDR«, t00=0x0047, t01=0x0166}
0x705c…706e Head {h00=0x000e, h01=0x0050, text=» LDR A5,A1«, t00=0x0047, t01=0x0188}
0x706e…7086 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBMRO,A6«, t00=0x0048, t01=0x000a}
0x7086…70aa Head {h00=0x0020, h01=0x0050, text=» SU A2,FDBRRO,A6 NR OF CHAR «, t00=0x0048, t01=0x0022}
0x70aa…70bc Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0048, t01=0x0046}
0x70bc…70d8 Head {h00=0x0018, h01=0x0050, text=» ADR A3,A11 TO ADDR «, t00=0x0048, t01=0x0058}
0x70d8…70f4 Head {h00=0x0018, h01=0x0050, text=» CF A14,DMTBMR MOVE «, t00=0x0048, t01=0x0074}
0x70f4…7112 Head {h00=0x001a, h01=0x0050, text=»* INSERT NEW RECORD «, t00=0x0048, t01=0x0090}
0x7112…711c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00ae}
0x711c…7140 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,RECBFZ BUFFER SIZE «, t00=0x0048, t01=0x00b8}
0x7140…715a Head {h00=0x0016, h01=0x0050, text=» SLL A1,1 BYTE NO «, t00=0x0048, t01=0x00dc}
0x715a…716e Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0048, t01=0x00f6}
0x716e…718a Head {h00=0x0018, h01=0x0050, text=» RF(Z) INS250 BUFAR1«, t00=0x0048, t01=0x010a}
0x718a…71b0 Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 SELECT OTHER BUFFER «, t00=0x0048, t01=0x0126}
0x71b0…71c4 Head {h00=0x0010, h01=0x0050, text=»INS250 EQU *«, t00=0x0048, t01=0x014c}
0x71c4…71e2 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A14 FROM ADDR «, t00=0x0048, t01=0x0160}
0x71e2…71fe Head {h00=0x0018, h01=0x0050, text=» ADK A1,2 FROM ADDR «, t00=0x0048, t01=0x017e}
0x71fe…721c Head {h00=0x001a, h01=0x0050, text=» LDR A2,A11 NR OF CHAR«, t00=0x0049, t01=0x000a}
0x721c…7236 Head {h00=0x0016, h01=0x0050, text=» LDR A3,A5 TO ADDR«, t00=0x0049, t01=0x0028}
0x7236…7250 Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x0049, t01=0x0042}
0x7250…7268 Head {h00=0x0014, h01=0x0050, text=»* WRITE BUFFER«, t00=0x0049, t01=0x005c}
0x7268…7272 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0074}
0x7272…7296 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A14 USE STACK AS ECB«, t00=0x0049, t01=0x007e}
0x7296…72aa Head {h00=0x0010, h01=0x0050, text=» SUKL A8,24 «, t00=0x0049, t01=0x00a2}
0x72aa…72d0 Head {h00=0x0022, h01=0x0050, text=» LC A2,FWTFNR,A6 VOL DEV CODE «, t00=0x0049, t01=0x00b6}
0x72d0…72e4 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0049, t01=0x00dc}
0x72e4…72f8 Head {h00=0x0010, h01=0x0050, text=» STR A2,A8 «, t00=0x0049, t01=0x00f0}
0x72f8…730c Head {h00=0x0010, h01=0x0050, text=» LDR A2,A13 «, t00=0x0049, t01=0x0104}
0x730c…7324 Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0049, t01=0x0118}
0x7324…7348 Head {h00=0x0020, h01=0x0050, text=» ST A2,ECBBA,A8 SECTOR ADDR «, t00=0x0049, t01=0x0130}
0x7348…736c Head {h00=0x0020, h01=0x0050, text=» LC A2,FDBBLZ,A6 BLOCK SIZE «, t00=0x0049, t01=0x0154}
0x736c…7386 Head {h00=0x0016, h01=0x0050, text=» SLL A2,8 IN BYTE «, t00=0x0049, t01=0x0178}
0x7386…739e (74, 0, 400) Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBRL,A8 «, t00=0x004a, t01=0x0004}
0x739e…73c0 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBSNR,A6 SECTOR NR«, t00=0x004a, t01=0x001c}
0x73c0…73e2 Head {h00=0x001e, h01=0x0050, text=» ST A2,ECBCW,A8 SECTOR NR «, t00=0x004a, t01=0x003e}
0x73e2…73fc Head {h00=0x0016, h01=0x0050, text=» LD A3,FDBSNR+2,A6«, t00=0x004a, t01=0x0060}
0x73fc…741e Head {h00=0x001e, h01=0x0050, text=» ST A3,ECBCW+2,A8 SECT NR «, t00=0x004a, t01=0x007a}
0x741e…743e Head {h00=0x001c, h01=0x0050, text=» LDK A7,/95 WRITE , WAIT«, t00=0x004a, t01=0x009c}
0x743e…744a Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x004a, t01=0x00bc}
0x744a…745e Head {h00=0x0010, h01=0x0050, text=» DATA 15 FM «, t00=0x004a, t01=0x00c8}
0x745e…747a Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x004a, t01=0x00dc}
0x747a…749a Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x004a, t01=0x00f8}
0x749a…74ac Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x004a, t01=0x0118}
0x74ac…74c4 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x004a, t01=0x012a}
0x74c4…74ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0142}
0x74ce…7508 Head {h00=0x0036, h01=0x0050, text=»* IF SPILLED RECORD IS FREE, OPERATION IS READY «, t00=0x004a, t01=0x014c}
0x7508…7512 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0186}
0x7512…7536 Head {h00=0x0020, h01=0x0050, text=» LDR A2,A10 RECORD AREA ADDR«, t00=0x004a, t01=0x0190}
0x7536…7552 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A11 REC LGTH«, t00=0x004b, t01=0x0024}
0x7552…7578 Head {h00=0x0022, h01=0x0050, text=» SUK A2,1 ADDR OF STATUS CHAR «, t00=0x004b, t01=0x0040}
0x7578…7590 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A6«, t00=0x004b, t01=0x0066}
0x7590…75bc Head {h00=0x0028, h01=0x0050, text=» ST A4,FDBRRO,A6 MAX OFFSET IN SECT «, t00=0x004b, t01=0x007e}
0x75bc…75ce Head {h00=0x000e, h01=0x0050, text=» CCR A1,A2«, t00=0x004b, t01=0x00aa}
0x75ce…75f0 Head {h00=0x001e, h01=0x0050, text=» RF(Z) INS400 FREE RECORD «, t00=0x004b, t01=0x00bc}
0x75f0…75fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00de}
0x75fa…7614 Head {h00=0x0016, h01=0x0050, text=»* GET NEXT BLOCK«, t00=0x004b, t01=0x00e8}
0x7614…761e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0102}
0x761e…763a Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x004b, t01=0x010c}
0x763a…765a Head {h00=0x001c, h01=0x0050, text=» LDR A3,A13 BUFFER ADDR «, t00=0x004b, t01=0x0128}
0x765a…7690 Head {h00=0x0032, h01=0x0050, text=» CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR«, t00=0x004b, t01=0x0148}
0x7690…76a6 Head {h00=0x0012, h01=0x0050, text=» RF INS260 OK «, t00=0x004b, t01=0x017e}
0x76a6…76bc (76, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RF DEL045 ERR«, t00=0x004c, t01=0x0004}
0x76bc…76d0 Head {h00=0x0010, h01=0x0050, text=»INS260 EQU *«, t00=0x004c, t01=0x001a}
0x76d0…76f4 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x004c, t01=0x002e}
0x76f4…7708 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x004c, t01=0x0052}
0x7708…7734 Head {h00=0x0028, h01=0x0050, text=» RB(Z) INS190 SWITCH RECORD BUFFERS «, t00=0x004c, t01=0x0066}
0x7734…7748 Head {h00=0x0010, h01=0x0050, text=» SUR A12,A12«, t00=0x004c, t01=0x0092}
0x7748…775a Head {h00=0x000e, h01=0x0050, text=» RB INS200«, t00=0x004c, t01=0x00a6}
0x775a…7768 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x00b8}
0x7768…777c Head {h00=0x0010, h01=0x0050, text=»INS400 EQU *«, t00=0x004c, t01=0x00c6}
0x777c…7786 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00da}
0x7786…77b2 Head {h00=0x0028, h01=0x0050, text=»* UPDATE LRN IF EOF IS ENCOUNTERED«, t00=0x004c, t01=0x00e4}
0x77b2…77bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0110}
0x77bc…77d8 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x004c, t01=0x011a}
0x77d8…77f0 Head {h00=0x0014, h01=0x0050, text=» CF A14,GTLGRN «, t00=0x004c, t01=0x0136}
0x77f0…7808 Head {h00=0x0014, h01=0x0050, text=» CC A2,FDBLRN,A1«, t00=0x004c, t01=0x014e}
0x7808…7824 Head {h00=0x0018, h01=0x0050, text=» RF(L) INS430 NO EOF«, t00=0x004c, t01=0x0166}
0x7824…783e Head {h00=0x0016, h01=0x0050, text=» RF(G) INS410 EOF «, t00=0x004c, t01=0x0182}
0x783e…7858 Head {h00=0x0016, h01=0x0050, text=» CW A3,FDBLRN+1,A1«, t00=0x004d, t01=0x000c}
0x7858…7876 Head {h00=0x001a, h01=0x0050, text=» RF(NG) INS430 NO EOF «, t00=0x004d, t01=0x0026}
0x7876…788a Head {h00=0x0010, h01=0x0050, text=»INS410 EQU *«, t00=0x004d, t01=0x0044}
0x788a…78b0 Head {h00=0x0022, h01=0x0050, text=» SC A2,FDBLRN,A6 LLAST REC NR «, t00=0x004d, t01=0x0058}
0x78b0…78cc Head {h00=0x0018, h01=0x0050, text=» ST A3,FDBLRN+1,A6 «, t00=0x004d, t01=0x007e}
0x78cc…78ee Head {h00=0x001e, h01=0x0050, text=» LDKL A1,EOFRC END OF FILE«, t00=0x004d, t01=0x009a}
0x78ee…790e Head {h00=0x001c, h01=0x0050, text=» ORS A1,ECBRC,A9 TO USER«, t00=0x004d, t01=0x00bc}
0x790e…791c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x00dc}
0x791c…7930 Head {h00=0x0010, h01=0x0050, text=»INS430 EQU *«, t00=0x004d, t01=0x00ea}
0x7930…793a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00fe}
0x793a…796e Head {h00=0x0030, h01=0x0050, text=»* UPDATE CRN-LINK FOR MOVED INDEX RECORDS «, t00=0x004d, t01=0x0108}
0x796e…7978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x013c}
0x7978…799c Head {h00=0x0020, h01=0x0050, text=» LDKL A12,1 ADD ON E TO CRN «, t00=0x004d, t01=0x0146}
0x799c…79ae Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x004d, t01=0x016a}
0x79ae…79d2 Head {h00=0x0020, h01=0x0050, text=» LDR A9,A3 LAST REC NR MOVED«, t00=0x004d, t01=0x017c}
0x79d2…79ea Head {h00=0x0014, h01=0x0050, text=» LD A10,-28,A14 «, t00=0x004e, t01=0x0010}
0x79ea…7a14 Head {h00=0x0026, h01=0x0050, text=» LD A11,-26,A14 FIRST REC NR MOVED«, t00=0x004e, t01=0x0028}
0x7a14…7a42 Head {h00=0x002a, h01=0x0050, text=» CF A14,CRNUPD ADD 1 TO RECORD NUMBERS«, t00=0x004e, t01=0x0052}
0x7a42…7a56 Head {h00=0x0010, h01=0x0050, text=»INS440 EQU *«, t00=0x004e, t01=0x0080}
0x7a56…7a72 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB INDEX«, t00=0x004e, t01=0x0094}
0x7a72…7a92 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A13 BUFFER ADDR «, t00=0x004e, t01=0x00b0}
0x7a92…7ab4 Head {h00=0x001e, h01=0x0050, text=» CF A14,DMTRBU REL BUFFER «, t00=0x004e, t01=0x00d0}
0x7ab4…7ae2 Head {h00=0x002a, h01=0x0050, text=» ABL DMTAR5 ONE INDEX READY TAKE NEXT «, t00=0x004e, t01=0x00f2}
0x7ae2…7af0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004e, t01=0x0120}
0x7af0…7b1e Head {h00=0x002a, h01=0x0050, text=»DEL000 EQU * DELETE INDEX RECORD CONT «, t00=0x004e, t01=0x012e}
0x7b1e…7b40 Head {h00=0x001e, h01=0x0050, text=» LDR A12,A5 USER ECB ADDR «, t00=0x004e, t01=0x015c}
0x7b40…7b52 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x004e, t01=0x017e}
0x7b52…7b66 Head {h00=0x0010, h01=0x0050, text=»DEL010 EQU *«, t00=0x004e, t01=0x0190}
0x7b66…7b8c Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) DMI036 KEY NOT FOUND «, t00=0x004f, t01=0x0014}
0x7b8c…7b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x003a}
0x7b96…7bba Head {h00=0x0020, h01=0x0050, text=»* CHECK RECORD NR DATA REC«, t00=0x004f, t01=0x0044}
0x7bba…7bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0068}
0x7bc4…7bd8 Head {h00=0x0010, h01=0x0050, text=»DEL020 EQU *«, t00=0x004f, t01=0x0072}
0x7bd8…7bf0 Head {h00=0x0014, h01=0x0050, text=» LD A1,FDBRRO,A6«, t00=0x004f, t01=0x0086}
0x7bf0…7c02 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A3«, t00=0x004f, t01=0x009e}
0x7c02…7c1a Head {h00=0x0014, h01=0x0050, text=» AD A1,FDBRLE,A6«, t00=0x004f, t01=0x00b0}
0x7c1a…7c40 Head {h00=0x0022, h01=0x0050, text=» ADK A1,7 BUFSTA-3=ADDR REC NR«, t00=0x004f, t01=0x00c8}
0x7c40…7c52 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x004f, t01=0x00ee}
0x7c52…7c74 Head {h00=0x001e, h01=0x0050, text=» CC A2,ECBCW+1,A12 REC NR «, t00=0x004f, t01=0x0100}
0x7c74…7c98 Head {h00=0x0020, h01=0x0050, text=» RF(NE) DEL030 WRONG RECORD «, t00=0x004f, t01=0x0122}
0x7c98…7cac Head {h00=0x0010, h01=0x0050, text=» LC A2,1,A1 «, t00=0x004f, t01=0x0146}
0x7cac…7cbe Head {h00=0x000e, h01=0x0050, text=» ECR A2,A2«, t00=0x004f, t01=0x015a}
0x7cbe…7cd8 Head {h00=0x0016, h01=0x0050, text=» LC A2,2,A1 REC NR«, t00=0x004f, t01=0x016c}
0x7cd8…7cf2 Head {h00=0x0016, h01=0x0050, text=» CW A2,ECBCW+2,A12«, t00=0x004f, t01=0x0186}
0x7cf2…7d14 Head {h00=0x001e, h01=0x0050, text=» RF(E) DEL200 RECORD FOUND«, t00=0x0050, t01=0x0010}
0x7d14…7d28 Head {h00=0x0010, h01=0x0050, text=»DEL030 EQU *«, t00=0x0050, t01=0x0032}
0x7d28…7d36 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x0046}
0x7d36…7d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0054}
0x7d40…7d62 Head {h00=0x001e, h01=0x0050, text=»* CHECK IF NEXT KEY SAME«, t00=0x0050, t01=0x005e}
0x7d62…7d6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0080}
0x7d6c…7d8c Head {h00=0x001c, h01=0x0050, text=» CC A11,-1,A1 KEY LENGTH«, t00=0x0050, t01=0x008a}
0x7d8c…7db4 Head {h00=0x0024, h01=0x0050, text=» RB(NE) DEL010 NEXT KEY NOT SAME«, t00=0x0050, t01=0x00aa}
0x7db4…7dd0 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB INDEX«, t00=0x0050, t01=0x00d2}
0x7dd0…7de4 Head {h00=0x0010, h01=0x0050, text=»DEL040 EQU *«, t00=0x0050, t01=0x00ee}
0x7de4…7e10 Head {h00=0x0028, h01=0x0050, text=» CF A14,RDNXTR GET NEXT INDEX RECORD«, t00=0x0050, t01=0x0102}
0x7e10…7e26 Head {h00=0x0012, h01=0x0050, text=» RF DEL050 OK «, t00=0x0050, t01=0x012e}
0x7e26…7e4a Head {h00=0x0020, h01=0x0050, text=»DEL045 LDR A1,A5 ERROR CODE «, t00=0x0050, t01=0x0144}
0x7e4a…7e64 Head {h00=0x0016, h01=0x0050, text=» ABL DMI036 ERROR «, t00=0x0050, t01=0x0168}
0x7e64…7e78 Head {h00=0x0010, h01=0x0050, text=»DEL050 EQU *«, t00=0x0050, t01=0x0182}
0x7e78…7e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0008}
0x7e82…7ea6 Head {h00=0x0020, h01=0x0050, text=»* CHECK IF RECORD IS USED «, t00=0x0051, t01=0x0012}
0x7ea6…7eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0036}
0x7eb0…7ed4 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x0051, t01=0x0040}
0x7ed4…7ee6 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0051, t01=0x0064}
0x7ee6…7efe Head {h00=0x0014, h01=0x0050, text=» ADKL A2,BUFSTA «, t00=0x0051, t01=0x0076}
0x7efe…7f26 Head {h00=0x0024, h01=0x0050, text=» AD A2,FDBRLE,A1 ADDR OF STATUS «, t00=0x0051, t01=0x008e}
0x7f26…7f3a Head {h00=0x0010, h01=0x0050, text=» LDK A5,/FF «, t00=0x0051, t01=0x00b6}
0x7f3a…7f4c Head {h00=0x000e, h01=0x0050, text=» CCR A5,A2«, t00=0x0051, t01=0x00ca}
0x7f4c…7f66 Head {h00=0x0016, h01=0x0050, text=» RB(E) DEL020 USED«, t00=0x0051, t01=0x00dc}
0x7f66…7f7e Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A1«, t00=0x0051, t01=0x00f6}
0x7f7e…7faa Head {h00=0x0028, h01=0x0050, text=» ST A4,FDBRRO,A1 LAST REC IN SECTOR «, t00=0x0051, t01=0x010e}
0x7faa…7fc6 Head {h00=0x0018, h01=0x0050, text=» RB DEL040 NEXT REC «, t00=0x0051, t01=0x013a}
0x7fc6…7fd4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x0156}
0x7fd4…7ff6 Head {h00=0x001e, h01=0x0050, text=»DEL200 EQU * RECORD FOUND «, t00=0x0051, t01=0x0164}
0x7ff6…8020 Head {h00=0x0026, h01=0x0050, text=»* SET RC BIT 6 IF NEXT KEY SAME «, t00=0x0051, t01=0x0186}
0x8020…802a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0020}
0x802a…803c Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0052, t01=0x002a}
0x803c…8060 Head {h00=0x0020, h01=0x0050, text=» LC A7,-1,A1 NR OF SAME CHAR«, t00=0x0052, t01=0x003c}
0x8060…8096 Head {h00=0x0032, h01=0x0050, text=» ST A7,16,A14 SAVE IN RECORD BUFFER AFTER ECB «, t00=0x0052, t01=0x0060}
0x8096…80b4 Head {h00=0x001a, h01=0x0050, text=» CWR A11,A7 KEY LENGTH«, t00=0x0052, t01=0x0096}
0x80b4…80dc Head {h00=0x0024, h01=0x0050, text=» RF(NE) DEL220 NEXT KEY NOT SAME«, t00=0x0052, t01=0x00b4}
0x80dc…80f4 Head {h00=0x0014, h01=0x0050, text=» LDKL A4,NXTKYS «, t00=0x0052, t01=0x00dc}
0x80f4…811c Head {h00=0x0024, h01=0x0050, text=» ORS A4,ECBRC,A12 NEXT KEY SAME «, t00=0x0052, t01=0x00f4}
0x811c…8130 Head {h00=0x0010, h01=0x0050, text=»DEL220 EQU *«, t00=0x0052, t01=0x011c}
0x8130…813a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0130}
0x813a…8162 Head {h00=0x0024, h01=0x0050, text=»* MOVE UP RECORDS OVER DELETED«, t00=0x0052, t01=0x013a}
0x8162…816c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0162}
0x816c…8194 Head {h00=0x0024, h01=0x0050, text=» ADKL A11,7 TOTAL RECORD LENGTH «, t00=0x0052, t01=0x016c}
0x8194…81a8 (83, 0, 398) Head {h00=0x0010, h01=0x0050, text=» LDR A3,A13 «, t00=0x0053, t01=0x0004}
0x81a8…81c0 Head {h00=0x0014, h01=0x0050, text=» ADKL A3,BUFSTA «, t00=0x0053, t01=0x0018}
0x81c0…81e0 Head {h00=0x001c, h01=0x0050, text=» AD A3,FDBRRO,A6 TO ADDR«, t00=0x0053, t01=0x0030}
0x81e0…81f2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0053, t01=0x0050}
0x81f2…8210 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A11 FROM ADDR «, t00=0x0053, t01=0x0062}
0x8210…8228 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBMRO,A6«, t00=0x0053, t01=0x0080}
0x8228…824c Head {h00=0x0020, h01=0x0050, text=» SU A2,FDBRRO,A6 NR OF CHAR «, t00=0x0053, t01=0x0098}
0x824c…8266 Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x0053, t01=0x00bc}
0x8266…8270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00d6}
0x8270…8290 Head {h00=0x001c, h01=0x0050, text=»* SET LAST RECORD FREE«, t00=0x0053, t01=0x00e0}
0x8290…829a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0100}
0x829a…82ae Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0053, t01=0x010a}
0x82ae…82c0 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0053, t01=0x011e}
0x82c0…82d2 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0053, t01=0x0130}
0x82d2…82f0 Head {h00=0x001a, h01=0x0050, text=» SCR A1,A3 STATUS FREE«, t00=0x0053, t01=0x0142}
0x82f0…82fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0160}
0x82fa…8322 Head {h00=0x0024, h01=0x0050, text=»* UPDATE CRN FOR MOVED RECORDS«, t00=0x0053, t01=0x016a}
0x8322…832c (84, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0004}
0x832c…8348 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 FDB ADDR «, t00=0x0054, t01=0x000e}
0x8348…836a Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0054, t01=0x002a}
0x836a…837e Head {h00=0x0010, h01=0x0050, text=» LDR A10,A2 «, t00=0x0054, t01=0x004c}
0x837e…83a4 Head {h00=0x0022, h01=0x0050, text=» LDR A11,A3 FIRST REC NR MOVED«, t00=0x0054, t01=0x0060}
0x83a4…83c8 Head {h00=0x0020, h01=0x0050, text=» LD A12,FDBRRO,A6 OLD OFFSET«, t00=0x0054, t01=0x0086}
0x83c8…83e0 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A6«, t00=0x0054, t01=0x00aa}
0x83e0…8404 Head {h00=0x0020, h01=0x0050, text=» ST A4,FDBRRO,A6 MAX OFFSET «, t00=0x0054, t01=0x00c2}
0x8404…842c Head {h00=0x0024, h01=0x0050, text=» CF A14,GTLGRN LAST REC NR MOVED«, t00=0x0054, t01=0x00e6}
0x842c…843e Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0054, t01=0x010e}
0x843e…8458 Head {h00=0x0016, h01=0x0050, text=» LDR A9,A3 REC NR «, t00=0x0054, t01=0x0120}
0x8458…847e Head {h00=0x0022, h01=0x0050, text=» ST A12,FDBRRO,A6 RESET OFFSET«, t00=0x0054, t01=0x013a}
0x847e…8492 Head {h00=0x0010, h01=0x0050, text=» LDKL A12,-1«, t00=0x0054, t01=0x0160}
0x8492…84bc Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNUPD UPDATE CRN BUFFERS «, t00=0x0054, t01=0x0174}
0x84bc…84e4 Head {h00=0x0024, h01=0x0050, text=» LDKL A12,1 MARK BUFFER CHANGED «, t00=0x0055, t01=0x000e}
0x84e4…84f8 Head {h00=0x0010, h01=0x0050, text=»DEL240 EQU *«, t00=0x0055, t01=0x0036}
0x84f8…8510 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBRRO,A5«, t00=0x0055, t01=0x004a}
0x8510…8538 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DEL290 NOT FIRST RECORD «, t00=0x0055, t01=0x0062}
0x8538…854e Head {h00=0x0012, h01=0x0050, text=» LDR A1,A5 FDB«, t00=0x0055, t01=0x008a}
0x854e…8570 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0055, t01=0x00a0}
0x8570…8582 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0055, t01=0x00c2}
0x8582…8594 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0055, t01=0x00d4}
0x8594…85a6 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x0055, t01=0x00e6}
0x85a6…85b8 Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0055, t01=0x00f8}
0x85b8…85e0 Head {h00=0x0024, h01=0x0050, text=» CF A14,DSUMOD A1,A2 = A1,A2 - 1«, t00=0x0055, t01=0x010a}
0x85e0…8600 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DEL600 FILE START«, t00=0x0055, t01=0x0132}
0x8600…861c Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 FDB ADDR «, t00=0x0055, t01=0x0152}
0x861c…8640 Head {h00=0x0020, h01=0x0050, text=» CF A14,CALSNO GET SECTOR NR«, t00=0x0055, t01=0x016e}
0x8640…865c (86, 0, 400) Head {h00=0x0018, h01=0x0050, text=» LDR A5,A6 FDB ADDR «, t00=0x0056, t01=0x0004}
0x865c…866e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0056, t01=0x0020}
0x866e…8690 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DEL600 FILE START «, t00=0x0056, t01=0x0032}
0x8690…86a4 Head {h00=0x0010, h01=0x0050, text=» LDR A8,A14 «, t00=0x0056, t01=0x0054}
0x86a4…86c0 Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 ECB ADDR «, t00=0x0056, t01=0x0068}
0x86c0…86d4 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x0056, t01=0x0084}
0x86d4…86fc Head {h00=0x0024, h01=0x0050, text=» RF(Z) DEL245 BUFFER NOT CHANGED«, t00=0x0056, t01=0x0098}
0x86fc…8706 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00c0}
0x8706…871e Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x0056, t01=0x00ca}
0x871e…8728 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00e2}
0x8728…8746 Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x0056, t01=0x00ec}
0x8746…8752 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0056, t01=0x010a}
0x8752…8766 Head {h00=0x0010, h01=0x0050, text=» DATA 15 FM «, t00=0x0056, t01=0x0116}
0x8766…877c Head {h00=0x0012, h01=0x0050, text=» LDR A1,A5 FDB«, t00=0x0056, t01=0x012a}
0x877c…879c Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x0056, t01=0x0140}
0x879c…87ae Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0056, t01=0x0160}
0x87ae…87c6 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x0056, t01=0x0172}
0x87c6…87f2 Head {h00=0x0028, h01=0x0050, text=» SUR A12,A12 BUFFER NOT CHANGED YET «, t00=0x0056, t01=0x018a}
0x87f2…8806 Head {h00=0x0010, h01=0x0050, text=»DEL245 EQU *«, t00=0x0057, t01=0x0026}
0x8806…881a Head {h00=0x0010, h01=0x0050, text=» LDR A3,A13 «, t00=0x0057, t01=0x003a}
0x881a…8840 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0057, t01=0x004e}
0x8840…884a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0074}
0x884a…886a Head {h00=0x001c, h01=0x0050, text=»* GET PREVIOUS SECTOR «, t00=0x0057, t01=0x007e}
0x886a…8874 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x009e}
0x8874…8890 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x0057, t01=0x00a8}
0x8890…88a2 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0057, t01=0x00c4}
0x88a2…88c4 Head {h00=0x001e, h01=0x0050, text=» CF A14,RDNXTR GET SECTOR «, t00=0x0057, t01=0x00d6}
0x88c4…88da Head {h00=0x0012, h01=0x0050, text=» RF DEL250 OK «, t00=0x0057, t01=0x00f8}
0x88da…88f6 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FDB ADDR «, t00=0x0057, t01=0x010e}
0x88f6…8908 Head {h00=0x000e, h01=0x0050, text=» RB DEL045«, t00=0x0057, t01=0x012a}
0x8908…891c Head {h00=0x0010, h01=0x0050, text=»DEL250 EQU *«, t00=0x0057, t01=0x013c}
0x891c…8932 Head {h00=0x0012, h01=0x0050, text=» LDR A5,A1 FDB«, t00=0x0057, t01=0x0150}
0x8932…8956 Head {h00=0x0020, h01=0x0050, text=» LDR A13,A3 NEW BUFFER ADDR «, t00=0x0057, t01=0x0166}
0x8956…896e Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBMRO,A5«, t00=0x0057, t01=0x018a}
0x896e…8980 Head {h00=0x000e, h01=0x0050, text=» RF DEL300«, t00=0x0058, t01=0x0012}
0x8980…8994 Head {h00=0x0010, h01=0x0050, text=»DEL290 EQU *«, t00=0x0058, t01=0x0024}
0x8994…89ac Head {h00=0x0014, h01=0x0050, text=» SU A4,FDBRLE,A5«, t00=0x0058, t01=0x0038}
0x89ac…89be Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0058, t01=0x0050}
0x89be…89d2 Head {h00=0x0010, h01=0x0050, text=»DEL300 EQU *«, t00=0x0058, t01=0x0062}
0x89d2…8a00 Head {h00=0x002a, h01=0x0050, text=» ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET«, t00=0x0058, t01=0x0076}
0x8a00…8a18 Head {h00=0x0014, h01=0x0050, text=» ADKL A4,BUFSTA «, t00=0x0058, t01=0x00a4}
0x8a18…8a38 Head {h00=0x001c, h01=0x0050, text=» ADR A4,A13 RECORD ADDR «, t00=0x0058, t01=0x00bc}
0x8a38…8a62 Head {h00=0x0026, h01=0x0050, text=» AD A4,FDBRLE,A5 STATUS CHAR ADDR «, t00=0x0058, t01=0x00dc}
0x8a62…8a76 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0058, t01=0x0106}
0x8a76…8a88 Head {h00=0x000e, h01=0x0050, text=» CCR A2,A4«, t00=0x0058, t01=0x011a}
0x8a88…8aa4 Head {h00=0x0018, h01=0x0050, text=» RB(NE) DEL240 FREE «, t00=0x0058, t01=0x012c}
0x8aa4…8aae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0148}
0x8aae…8ac6 Head {h00=0x0014, h01=0x0050, text=»* SET CURRENCY«, t00=0x0058, t01=0x0152}
0x8ac6…8ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x016a}
0x8ad0…8aee Head {h00=0x001a, h01=0x0050, text=» LDR A9,A4 STATUS ADDR«, t00=0x0058, t01=0x0174}
0x8aee…8b12 (89, 0, 398) Head {h00=0x0020, h01=0x0050, text=» LD A1,FDBADF,A5 FDB DATA F «, t00=0x0059, t01=0x0004}
0x8b12…8b38 Head {h00=0x0022, h01=0x0050, text=» CF A14,CRNGET GET CRN BUFFER «, t00=0x0059, t01=0x0028}
0x8b38…8b5e Head {h00=0x0022, h01=0x0050, text=» LC A1,FWTFNR,A5 INDEX FILE NR«, t00=0x0059, t01=0x004e}
0x8b5e…8b86 Head {h00=0x0024, h01=0x0050, text=» CC A1,CRNCIF,A2 LAST REF INDEX «, t00=0x0059, t01=0x0074}
0x8b86…8baa Head {h00=0x0020, h01=0x0050, text=» RF(NE) DEL350 NOT THIS IND «, t00=0x0059, t01=0x009c}
0x8baa…8bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00c0}
0x8bb4…8bd0 Head {h00=0x0018, h01=0x0050, text=»* UPDATE CURRENCY «, t00=0x0059, t01=0x00ca}
0x8bd0…8bda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00e6}
0x8bda…8bf6 Head {h00=0x0018, h01=0x0050, text=» LDR A8,A2 CRN ADDR «, t00=0x0059, t01=0x00f0}
0x8bf6…8c0e Head {h00=0x0014, h01=0x0050, text=» LDR A1,A5 INDEX«, t00=0x0059, t01=0x010c}
0x8c0e…8c30 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTLGRN GET REC NR «, t00=0x0059, t01=0x0124}
0x8c30…8c4a Head {h00=0x0016, h01=0x0050, text=» SC A2,CRNCIF+1,A8«, t00=0x0059, t01=0x0146}
0x8c4a…8c6c Head {h00=0x001e, h01=0x0050, text=» ST A3,CRNCIF+2,A8 REC NR «, t00=0x0059, t01=0x0160}
0x8c6c…8c80 Head {h00=0x0010, h01=0x0050, text=»DEL350 EQU *«, t00=0x0059, t01=0x0182}
0x8c80…8cb2 Head {h00=0x002e, h01=0x0050, text=» LC A2,17,A14 NR OF SAME IN DELETED RECORD«, t00=0x005a, t01=0x0008}
0x8cb2…8cd8 Head {h00=0x0022, h01=0x0050, text=»* WAS SAVED AT LABEL DEL200 «, t00=0x005a, t01=0x003a}
0x8cd8…8cec Head {h00=0x0010, h01=0x0050, text=» CC A2,-4,A9«, t00=0x005a, t01=0x0060}
0x8cec…8d02 Head {h00=0x0012, h01=0x0050, text=» RF(NL) DEL600«, t00=0x005a, t01=0x0074}
0x8d02…8d2e Head {h00=0x0028, h01=0x0050, text=» SC A2,-4,A9 MAKE NR OF SAME SMALLER«, t00=0x005a, t01=0x008a}
0x8d2e…8d4e Head {h00=0x001c, h01=0x0050, text=» RF DEL700 WRITE SECTOR «, t00=0x005a, t01=0x00b6}
0x8d4e…8d62 Head {h00=0x0010, h01=0x0050, text=»DEL600 EQU *«, t00=0x005a, t01=0x00d6}
0x8d62…8d76 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x005a, t01=0x00ea}
0x8d76…8d9e Head {h00=0x0024, h01=0x0050, text=» RF(Z) DEL900 BUFFER NOT CHANGED«, t00=0x005a, t01=0x00fe}
0x8d9e…8da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0126}
0x8da8…8dc0 Head {h00=0x0014, h01=0x0050, text=»* WRITE SECTOR«, t00=0x005a, t01=0x0130}
0x8dc0…8dca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0148}
0x8dca…8dde Head {h00=0x0010, h01=0x0050, text=»DEL700 EQU *«, t00=0x005a, t01=0x0152}
0x8dde…8df2 Head {h00=0x0010, h01=0x0050, text=» LDR A8,A14 «, t00=0x005a, t01=0x0166}
0x8df2…8e0e Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 ECB ADDR «, t00=0x005a, t01=0x017a}
0x8e0e…8e2c Head {h00=0x001a, h01=0x0050, text=» LDK A7,/95 WRITE WAIT«, t00=0x005b, t01=0x0008}
0x8e2c…8e38 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x005b, t01=0x0026}
0x8e38…8e4c Head {h00=0x0010, h01=0x0050, text=» DATA 15 FM «, t00=0x005b, t01=0x0032}
0x8e4c…8e68 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x005b, t01=0x0046}
0x8e68…8e88 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOZ IO CHECK «, t00=0x005b, t01=0x0062}
0x8e88…8e9a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x005b, t01=0x0082}
0x8e9a…8eb2 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTERR «, t00=0x005b, t01=0x0094}
0x8eb2…8ec6 Head {h00=0x0010, h01=0x0050, text=»DEL900 EQU *«, t00=0x005b, t01=0x00ac}
0x8ec6…8eda Head {h00=0x0010, h01=0x0050, text=» ABL INS440 «, t00=0x005b, t01=0x00c0}
0x8eda…8ee6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x00d4}
0x8ee6…8ef2 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x005b, t01=0x00e0}
0x8ef2…8ef6 Head {h00=0x4004, h01=0x0000}
0x8ef6…8efa 00 5b 00 ec ┆ [ ┆
0x8efa…8f02 (92, 1, 8) 20 04 00 00 00 5c 00 04 ┆ ┆