DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦4193df022⟧

    Length: 36614 (0x8f06)
    Notes: pts_type(SC)
    Names: »DMTASK.SC«

Derivation

└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
    └─⟦this⟧ »M:DEMO/DMTASK.SC« 

PTS(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	00001
RECBFZ	EQU	00007	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	1
* 
	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

HexDump

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

Reduced view