|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 20480 (0x5000)
Notes: pts_type(SC)
Names: »DMSUBR.SC«
└─⟦c47f25c27⟧ Bits:30009688 Philips computer tape "600318"
└─⟦this⟧ »M:KMDV/DMSUBR.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/DMSUBR.SC«
└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
└─⟦this⟧ »M:167D/DMSUBR.SC«
IDENT DMSUBR REL 8.2 78-09-15 870105040820 BUF HANDL + RC L. 496,543,551 REL 8.1 78-04-21 * **************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DMSUBR = COMMON DM-ROUTINES * * * * * * **************************************************** ****THIS MODULE IS ACTIVATED FROM :***************** * * DMTASK,TIODM,DMTASS * *************** * ENTRIES * *************** * * ENTRY EATEST,EASETB,EARELB,CRNGET ENTRY CALSNO ENTRY GTBKBU,GTLGRN ENTRY DMTIOT ENTRY CHKIND,REQEND ENTRY DMTIOZ * ***************** * EXTERNALS * ***************** * * EXTRN FDBEAL,FDBTNR,FDBCRL,FDBRLE,FDBSNR,FDBRRO EXTRN FDBCEX,FDBBLF,FDBEXT EXTRN FDBECB,DWTECB,DWTOR,EXTDMI,BUFSTA,BUFDMI,BUFOR EXTRN ECBRC,ECBFC,ECBCW,ECBBA EXTRN DWTTDM,DWTTQ EXTRN QTJOB EXTRN ECBRL,SECTLE EXTRN DIVMOD,MPYMOD EXTRN EXTELE EXTRN CRNTID EXTRN DMTGBU EXTRN EXTLEN,EXTBAS EXTRN CRNQUE,GETBLK,FREQUE EXTRN HALT EXTRN CRBUFL EXTRN IHRET2,IHRTN,FDBADF,DWTST EXTRN FDBDBR EXTRN QIRN,QIRR EJECT * * CHKIND IS USED FROM FNDDWT TO SELECT DM-DWT * INDEX FILE (INDEX 0) SHALL BE SELECTED FOR * DX,IX,XR,XN, DATA FILE OTHERWISE * CHKIND EQU * STR A1,A15 STR A2,A15 LDK A2,1 INDEX FOR DATA FILE LDR A1,A7 ORDER ANK A1,/3F CWK A1,/20 RF(E) FND320 DELETE INDEX CWK A1,/1A RF(E) FND320 INDEXED READ ANK A1,/3E REMOVE BIT 15 SUK A1,/1E RF(E) FND320 INSERT INDEX OR INDEXED READ NEXT RF FND340 FND320 LDK A2,0 INDEX FOR INDEX FILE FND340 EQU * CCR A2,A6 INDEX RF(E) FND390 ENTRY FOUND LDK A1,2 ADS A1,8,A15 RETURN+2 WHEN NOT FOUND FND390 ABL IHRET2 EJECT * * REQEND IS USED IN TENDIO TO RESET REQUEST BUSY BIT * FOR ALL FILES * AND TO RESOLVE ALL QUEUES * REQEND EQU * LDKL A2,/8000 AN A2,2,A5 TASK STATUS BIT 0 RF(NZ) TEN115 DMTASK CALLING * * RESET REQUEST BUSY BIT FOR ALL FILES * LDKL A2,10 MAX NO OF FILES * 2 TEN112 EQU * SUK A2,2 RF(N) TEN115 NO MORE FILES LDR A3,A6 ADR A3,A2 LD A3,FDBADF,A3 FDB ADDR RB(Z) TEN112 CWR A3,A6 DWT ADDR RF(E) TEN114 MASTER DWT LD A5,DWTTQ,A3 RF(Z) TEN113 NO QUEUE LDR* A4,A5 ST A4,DWTTQ,A3 NEW ANCHOR CF A15,QTJOB REPEAT REQUEST TEN113 LD A5,DWTTDM,A6 RESTORE TEN114 EQU * LDKL A4,/BFFF REQUEST BUSY BIT ANS A4,DWTST,A3 RESET LDKL A4,/8000 ORS A4,DWTST,A3 DEVICE NOT BUSY RB TEN112 TEN115 EQU * ABL IHRTN EJECT ****DESCRIPTION************************************* * * EATEST WILL SEARCH THE EA-LINK FOR A LOG RECORD NO. * ****ENTRY PARAMETERS******************************** * * A1 = FDB ADRESS * A2,A3 = LOG RECORD NO * * CF A14,EATEST * ****EXIT PARAMETERS********************************* * * A1-A3 = UNCHANGED * A4 = 0 NO EA AT ALL * = +1 EA FOUND FOR ACTUAL TASK * = -1 EA FOUND FO R OTHER TASK * ****USED REGISTERS********************************** * * A1 - A4 EJECT EATEST EQU * LD A4,FDBEAL,A1 BUFFER QUEUE RF EAT030 EAT020 EQU * LDR* A4,A4 NEXT BUFFER ADR EAT030 EQU * RF(Z) EAT100 EMPTY QUEUE,NO EA * * SEARCH LOG REC NO * CC A2,3,A4 FIRST CHAR RB(NE) EAT020 CW A3,4,A4 2 AND 3 CHAR RB(NE) EAT020 * * RECORD NO FOUND * LC A4,2,A4 CC A4,FDBTNR,A1 TASK ID RF(E) EAT060 LDKL A4,-1 EA OTHER TASK RF EAT100 EAT060 EQU * LDK A4,1 EA SAME ATASK EAT100 EQU * RTN A14 EJECT ****DESCRIPTION************************************* * * EASETB WILL UNCONDITIONALLY PUT A NEW EA BUFFER IN EA-LINK * IF NO BUFFERS ARE AVAILABLE THE SYSTEM WILL HALT AND LITE SOP-LAMPS * ****ENTRY PARAMETERS******************************** * * A6 = FDB ADDR * A2,A3 = LOGICAL RECORD NO * * CF A14,EASETB * ****EXIT PARAMETERS********************************* * * A6 = FDB ADDR * ****USED REGISTERS********************************** * * A1-A4,A6 * ******************************************************* EJECT EASETB EQU * ECR A2,A2 LC A2,FDBTNR,A6 TASK ID ECR A2,A2 LDR A1,A3 LOG REC NO INH CF A15,GETBLK GET BUFF AND STORE A1,A2 * * LINK BUFFER TO FDB * LD A2,FDBEAL,A6 LINK ROOT STR A2,A4 THREAD ST A4,FDBEAL,A6 NEW ROOT RTN A14 EJECT ****DESCRIPTION************************************* * * EARELB WILL RELEASE EA BUFFERS AND CONNRECT THEM * TIO THE FREE LINK. * ****ENTRY PARAMETERS******************************** * * A1 = FDB-ADDRESS * A2,A3 = LOGICAL RECORD NO * A2: BIT 0=1,BIT 1=1 ALL BUFFERS WITH TASK ID SAME AS FDB * IS REMOVED. * BIT 0=1,BIT 1=0 ALL BUFFERS ON FDB IS REMOVED. * BIT 0=0 THE FIRST BUFFER WITH TASK ID AND LOG REC NO * AS SPEC IS REMOVED. * ****EXIT PARAMETERS********************************* * * A1 = UNCHANGED * ****USED REGISTERS********************************** * * A1 - A5 EJECT EARELB EQU * LDR A5,A1 ADKL A5,FDBEAL ROOT ADR LDR* A4,A5 EA ROOT RF EAR030 EAR020 EQU * LDR A5,A4 SAVE OLD ROOT LDR* A4,A4 NEXT BUFFER ADR EAR030 EQU * RF(Z) EAR100 EA LINK END LDR A2,A2 REC NO RF(N) EAR050 RELEASE MANY BUFFERS * * SEARCH LOG REC NO * CC A2,3,A4 RB(NE) EAR020 CW A3,4,A4 RB(NE) EAR020 RF EAR060 EAR050 EQU * CWK A2,/A000 CHECK BIT 1 RF(L) EAR080 BIT 1 ZERO,ALL BUFFERS REMOVED EAR060 EQU * * * SEARCH TASK IDENT * LC A3,FDBTNR,A1 TAK ID CC A3,2,A4 RB(NE) EAR020 * * EA BUFFER FOUND * EAR080 EQU * LDR* A3,A4 NEXT BUFADR STR A3,A5 REMOVE BUFFER FROM LINK * * RETURN BUFFER TO POOL * INH LD A3,FREQUE STR A3,A4 NEXT FREE ST A4,FREQUE NEW ROOT LDR A4,A5 BUFFER ROOT LDR A2,A2 RB(N) EAR020 RELEASE MORE EAR100 EQU * RTN A14 EJECT ****DESCRIPTION************************************* * * CRNGET WILL SEARCH THE CRN-LINK FOR TASK ID. IF NO BUFFER IS * FOUND A NEW IS FETCHED FROM THE FREE LINK AND B FILLED WITH * ZEROES AND PUT ON THE CRN LINK. IF NO FREE BUFFERS ARE AVAILABLE * THE SYSTEM WILL HALT AND LITE SOP-LAMPS. * TASK ID IS PLACED IN THE BUFFER * ****ENTRY PARAMETERS******************************** * * A1 = FDB ADDRESS DATA FILE * ****EXIT PARAMETERS********************************* * * A1 = UNCHANGED * A2 = ADDRESS OF FOUND CRN-BUFFER * ****USED REGISTERS********************************** * * A1 - A4 EJECT CRNGET EQU * LD A2,FDBCRL,A1 CRN ROOT RF CRN030 CRN020 EQU * LDR* A2,A2 NEXT BUFFER CRN030 EQU * RF(Z) CRN100 LINK END * * CHECK ATASK IDENT * LC A3,FDBTNR,A1 TASK ID CC A3,CRNTID,A2 RB(NE) CRN020 OTHER TASK RF CRN200 BUFFER FOUND * * GET NEW BUFFER * CRN100 EQU * INH LD A2,CRNQUE FREE LINK ROOT RF(NZ) CRN120 LDK A1,3 LAMP 10 AND 11 CF A15,HALT NO MORE BUFFERS CRN120 EQU * LDR* A3,A2 NEXT FREE ST A3,CRNQUE UPD ROOT * * FILL BUFFER WITH ZEROES * LDKL A3,CRBUFL BUFFER LENGTH IN BYTES CRN140 EQU * SUK A3,2 ZEROE WORDS 2 - N RF(NP) CRN160 BUFFER ZEROED LDR A4,A2 BUFFER ADR ADR A4,A3 OFFSET IN BUFFER CMR A4 RB CRN140 MORE WORDS * * CONNECT NEW BUFFER TO LINK * CRN160 EQU * LC A3,FDBTNR,A1 SC A3,CRNTID,A2 TASK ID LD A3,FDBCRL,A1 LINK ROOT STR A3,A2 THREAD ST A2,FDBCRL,A1 NEW ROOT CRN200 EQU * RTN A14 EJECT ****DESCRIPTION************************************* * * CALSNO WILL CONVERT A LOGICAL RECORD NO TO * SECTOR AND OFFSET * ****ENTRY PARAMETERS******************************** * * A1,A2 = LOGICAL RECORD NO * A6 = FDB ADDR * * CF A14,CALSNO * ****EXIT PARAMETERS********************************* * * A1 = 0 OK * NE 0 , ERROR =/20=END OF MEDIUM * A4 = EXTENT ADDRESS * A6 = UNCHANGED * IN FDB : FDBSNR = SECTOR NR * FDBRRO = OFFSET IN SECTOR * FDBCEX = CURRENT EXTENT * ****USED REGISTERS********************************** * * A1 - A9 EJECT CALSNO EQU * * * FIND SECTOR NO WITHIN FILE * LDR A5,A6 SAVE FDB ADDR LDK A6,0 LC A6,FDBBLF,A5 BLOCKING FACTOR CF A14,DIVMOD A2=A1,A2//A6,A1=REMAINDER RF(O) TIOD99 OVERFLOW LDR A3,A2 QUOTIENT LDR A6,A5 FDB ADDR LDR A2,A1 REMAINDER RF(Z) TIOD30 REST = 0 ADK A3,1 RECORD IN NEXT SECTOR RF TIOD40 TIOD30 LC A2,FDBBLF,A6 LAST REC IN SECTOR * * FIND FILE EXTENT * TIOD40 EQU * LDR A4,A6 ADKL A4,FDBEXT FIRST FILE EXTENT LD A9,EXTLEN,A4 LENGTH OF FIRST EXTENT LDK A5,4 NUMBER OF EXTENTS TIOD45 CWR A3,A9 RF(NG) TIOD55 SECTOR IN THIS EXTENT SUK A5,1 NO RF(NP) TIODMO EOF ERROR RETURN ADK A4,6 NEXT EXTENT BLOCK AD A9,EXTLEN,A4 ADD LENGTH OF NEXT EXTENT RB TIOD45 * * SAVE CURRENT EXTENT BLOCK POINTER * TIOD55 ST A4,FDBCEX,A6 * * FIND LOGICAL SECTOR NUMBER ON DISC * SU A9,EXTLEN,A4 NO OF SECTORS IN PREVIOUS EXTENTS SUR A3,A9 SECTOR NO WITHIN EXT SUK A3,1 START FROM ZERO RF(N) TIODMO BEFORE MEDIUM AD A3,EXTBAS,A4 SECTOR NO ON DISC ST A3,FDBSNR,A6 SAVE LOGICAL SECTOR NUMBER * FIND RELATIVE RECORD OFFSET WITHIN SECTOR * LDK A3,0 TIOD60 SUK A2,1 A2=RELATIVE REC NO RF(Z) TIOD65 REL REC OFFS IN A3 NOW AD A3,FDBRLE,A6 NO ADD RECORD LENGTH ADK A3,1 SKIP STATUS BYTE RB TIOD60 TIOD99 LDR A6,A5 FDB TIODMO LDK A1,/20 END OF MEDIUM RF TIODMF * * STORE RELATIVE REC OFFSET IN FBDRRO * TIOD65 EQU * LDK A1,0 OK ST A3,FDBRRO,A6 TIODMF EQU * RTN A14 EJECT * ************** * DMTIOT ************** * * ENTRY DMTIOT CHECK RETURN CODES FROM PHYS DISC I/O * * INPUT A1 = FDB ADDRESS * * OUTPUT A6 = FDB ADDRESS * A1 = 0 WHEN OK * = ERROR CODE ELSE * A9 = DM ECB ADDRESS * A8 = PHYS I/O ECB ADDRESS * A2 WILL BE DESTROYED * * USED REGISTERS : A1,A2,A6,A8,A9 * * DMTIOT EQU * LDR A6,A1 FDB ADDRESS LDKL A8,FDBECB ADR A8,A6 LD A9,DWTECB,A6 DM ECB ADDRESS DMTIT0 EQU * LD A1,ECBRC,A8 RF(Z) DMTIOX DISC I/O OK ANKL A1,/FEFF RF(NZ) DMTIT1 NOT ONLY RETRIES LDKL A2,/100 ORS A2,ECBRC,A9 USER RC RF DMTIOX DMTIT1 EQU * LD A2,FDBDBR,A6 ANKL A2,/C0FF ST A2,FDBDBR,A6 RELEASE BUFFER LD A2,ECBBA,A8 * GET BUFFER ADDR SUK A2,8 BUFSTA CM BUFDMI,A2 CLEAR VOL IDENT IN BUFFER LDK A1,/02 DISC IO ERROR LDKL A2,/FF7E NOT BIT 8 OR 15 AN A2,ECBRC,A8 ABL(NZ) DMTIOX LD A1,ECBRC,A8 BIT 8 OR 15 DMTIOX RTN A14 EJECT * * DMTIOZ HAS ALMOST THE SAME FUNCTION AS DMTIOT BUT * ECB ADDR IS INPUT PARAM * * IN: A1 = FDB ADDR * A8 = ECB ADDR * OUT: * A1 = RET CODE * A2 = DESTROYED * A6 = FDB ADDR * A8 = ECB ADDR * A9 == USER ECB * DMTIOZ LDR A6,A1 LD A2,DWTOR,A6 ORDER ANK A2,/3F CWK A2,QIRN RF(E) DMTIZ1 INDEXED READ NEXT CWK A2,QIRR RF(E) DMTIZ1 INDEXED RANDOM READ LD A1,FDBADF,A6 FDB DATA FILE DMTIZ1 EQU * LD A9,DWTECB,A1 USER ECB RB DMTIT0 EJECT ****DESCRIPTION************************************* * * GTBKBU WILL GET A BLOCK BUFFER FOR DISC I/O AND * PREPARE IT. ECB IS PREPARED FOR PHYS I/O. * ****ENTRY PARAMETERS******************************** * * A1 = FDB ADDRESS * FDB-CEX,ECB,SNR,RRO * ECB-FC,CW,BA,DWT-OR,ECB,EXTDMI * A8 = ECB ADDR * ****EXIT PARAMETERS********************************* * * A1 = A6 = FDB ADDR * A2 = FDBRRO WHEN SECTOR IS FOUND IN CORE * = -1 WHEN NO DATA IS FOUND IN * THE FOUND CORE BUFFER * A3 = BUFFER ADDRESS * A5 = ORDE R CODE * A8 = ECB ADDR * A9 = DM ECB ADDR * ****USED REGISTERS********************************** * * A1 - A9 * ****************************************************** GTBKBU EQU * LDR A6,A1 A6 = FDB ADDRESS LD A4,FDBCEX,A6 CURRENT EXTENT BLOCK POINTER LD A1,EXTDMI,A4 DMIDENT, FC LD A2,FDBSNR,A6 SECTOR NUMBER LD A9,DWTECB,A6 DM ECB SC A1,ECBFC,A8 FILE CODE OF DISC VOLUME LDR A4,A2 SAVE LDKL A5,SECTLE ST A5,ECBRL,A8 SECTOR LENGTH CF A14,DMTGBU A3 := BUFFER ADDRESS RF GTB100 RETURN IF SECTOR FOUND IN BUFFER * RETURN IF SECTOR MUST BE READ FROM DISC LDKL A2,-1 RET CODE GTB040 EQU * ST A4,ECBCW,A8 SECTOR NR LDR A5,A3 ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS ST A5,ECBBA,A8 LD A5,DWTOR,A6 ANK A5,/3F LDR A1,A6 FDB ADDRESS AS PARAMETER RTN A14 GTB100 EQU * LD A2,FDBRRO,A6 REC OFFS IN BUFFER RB GTB040 STORE ORDER CODE EJECT ****DESCRIPTION************************************* * * GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO * ****ENTRY PARAMETERS******************************** * * A1 = FDB ADDRESS * FDBSNR,FDBRRO,FDBCEX * ****EXIT PARAMETERS********************************* * * A1=A5=A6= FDB ADDRESS * A2,A3 = LOG RECORD NO * ****USED REGISTERS********************************** * * A1 - A7 * ****************************************************** EJECT GTLGRN EQU * LDK A6,0 LDKL A3,FDBEXT ADKL A3,EXTLEN ADR A3,A1 ADDR FIRST EXT LENGTH LD A7,FDBCEX,A1 EXT ADDR ADKL A7,EXTLEN ADDR TO LAST LENGTH GTL050 EQU * CWR A3,A7 RF(E) GTL100 ALL PREVIOUS EXTENTS COUNTED * NOTE THAT ONLY (E) CAN BE TESTED ADR* A6,A3 NO OF SECT IN EXTENT ADKL A3,EXTELE EXT ENTRY LENGTH RB GTL050 NEXT EXTENT GTL100 EQU * LD A7,FDBCEX,A1 EXT ADDR SU A6,EXTBAS,A7 TOTAL NO OF SECTORS AD A6,FDBSNR,A1 TOTAL NR OF SECTORS * * CONVERT FDBRRO TO NO OF RECORDS * LDK A7,0 LC A7,FDBBLF,A1 BLOCK FACTOR LDR A5,A1 SAVE FDB ADDR CF A14,MPYMOD A1,A2=A6*A7 LD A4,FDBRLE,A5 ADK A4,1 RECORD LENGTH LDK A7,0 RECORD COUNTER LD A6,FDBRRO,A5 OFFSET IN SECTOR ADK A6,1 GTL150 EQU * ADK A7,1 RECORD COUNTER SUR A6,A4 RB(NN) GTL150 COUNT RECORDS IN SECTOR * * ADD SECT*BLOCFACT AND RECINCURRSECT * ADR A2,A7 RF(O) GTL160 OVERFLOW RF GTL170 GTL160 EQU * ANKL A2,/7FFF DELETE OVERFLOWBIT ADK A1,1 ADD CARRY GTL170 EQU * LDR A3,A2 LDR A2,A1 LDR A1,A5 FDB ADDR LDR A6,A5 RTN A14 END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DMSUBR REL 8.2 78-09-15 870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0066 Head {h00=0x0024, h01=0x0050, text=» BUF HANDL + RC L. 496,543,551«, t00=0x0000, t01=0x0042}
0x0066…0082 Head {h00=0x0018, h01=0x0050, text=» REL 8.1 78-04-21 «, t00=0x0000, t01=0x006a}
0x0082…008c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0086}
0x008c…00c8 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x0090}
0x00c8…00d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00cc}
0x00d2…00fa Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0000, t01=0x00d6}
0x00fa…0104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fe}
0x0104…012c Head {h00=0x0024, h01=0x0050, text=»* DMSUBR = COMMON DM-ROUTINES «, t00=0x0000, t01=0x0108}
0x012c…0136 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0130}
0x0136…0140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013a}
0x0140…014a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0144}
0x014a…0154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014e}
0x0154…015e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0158}
0x015e…0168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0162}
0x0168…01a4 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x016c}
0x01a4…01e0 Head {h00=0x0038, h01=0x0050, text=»****THIS MODULE IS ACTIVATED FROM :*****************«, t00=0x0001, t01=0x0018}
0x01e0…01ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0054}
0x01ea…020a Head {h00=0x001c, h01=0x0050, text=»* DMTASK,TIODM,DMTASS «, t00=0x0001, t01=0x005e}
0x020a…0214 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007e}
0x0214…022c Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0001, t01=0x0088}
0x022c…0244 Head {h00=0x0014, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x00a0}
0x0244…025c Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0001, t01=0x00b8}
0x025c…0266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d0}
0x0266…0270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x0270…029a Head {h00=0x0026, h01=0x0050, text=» ENTRY EATEST,EASETB,EARELB,CRNGET«, t00=0x0001, t01=0x00e4}
0x029a…02b0 Head {h00=0x0012, h01=0x0050, text=» ENTRY CALSNO «, t00=0x0001, t01=0x010e}
0x02b0…02cc Head {h00=0x0018, h01=0x0050, text=» ENTRY GTBKBU,GTLGRN«, t00=0x0001, t01=0x0124}
0x02cc…02e2 Head {h00=0x0012, h01=0x0050, text=» ENTRY DMTIOT «, t00=0x0001, t01=0x0140}
0x02e2…02fe Head {h00=0x0018, h01=0x0050, text=» ENTRY CHKIND,REQEND«, t00=0x0001, t01=0x0156}
0x02fe…0314 Head {h00=0x0012, h01=0x0050, text=» ENTRY DMTIOZ «, t00=0x0001, t01=0x0172}
0x0314…031e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0188}
0x031e…0338 (2, 0, 400) Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0002, t01=0x0004}
0x0338…0352 Head {h00=0x0016, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x001e}
0x0352…036c Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0002, t01=0x0038}
0x036c…0376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0052}
0x0376…0380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005c}
0x0380…03b8 Head {h00=0x0034, h01=0x0050, text=» EXTRN FDBEAL,FDBTNR,FDBCRL,FDBRLE,FDBSNR,FDBRRO«, t00=0x0002, t01=0x0066}
0x03b8…03dc Head {h00=0x0020, h01=0x0050, text=» EXTRN FDBCEX,FDBBLF,FDBEXT «, t00=0x0002, t01=0x009e}
0x03dc…041a Head {h00=0x003a, h01=0x0050, text=» EXTRN FDBECB,DWTECB,DWTOR,EXTDMI,BUFSTA,BUFDMI,BUFOR «, t00=0x0002, t01=0x00c2}
0x041a…0440 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRC,ECBFC,ECBCW,ECBBA«, t00=0x0002, t01=0x0100}
0x0440…045c Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTTDM,DWTTQ «, t00=0x0002, t01=0x0126}
0x045c…0470 Head {h00=0x0010, h01=0x0050, text=» EXTRN QTJOB«, t00=0x0002, t01=0x0142}
0x0470…048c Head {h00=0x0018, h01=0x0050, text=» EXTRN ECBRL,SECTLE «, t00=0x0002, t01=0x0156}
0x048c…04a8 Head {h00=0x0018, h01=0x0050, text=» EXTRN DIVMOD,MPYMOD«, t00=0x0002, t01=0x0172}
0x04a8…04be Head {h00=0x0012, h01=0x0050, text=» EXTRN EXTELE «, t00=0x0002, t01=0x018e}
0x04be…04d4 Head {h00=0x0012, h01=0x0050, text=» EXTRN CRNTID «, t00=0x0003, t01=0x0014}
0x04d4…04ea Head {h00=0x0012, h01=0x0050, text=» EXTRN DMTGBU «, t00=0x0003, t01=0x002a}
0x04ea…0506 Head {h00=0x0018, h01=0x0050, text=» EXTRN EXTLEN,EXTBAS«, t00=0x0003, t01=0x0040}
0x0506…052a Head {h00=0x0020, h01=0x0050, text=» EXTRN CRNQUE,GETBLK,FREQUE «, t00=0x0003, t01=0x005c}
0x052a…053e Head {h00=0x0010, h01=0x0050, text=» EXTRN HALT «, t00=0x0003, t01=0x0080}
0x053e…0554 Head {h00=0x0012, h01=0x0050, text=» EXTRN CRBUFL «, t00=0x0003, t01=0x0094}
0x0554…057c Head {h00=0x0024, h01=0x0050, text=» EXTRN IHRET2,IHRTN,FDBADF,DWTST«, t00=0x0003, t01=0x00aa}
0x057c…0592 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBDBR «, t00=0x0003, t01=0x00d2}
0x0592…05aa Head {h00=0x0014, h01=0x0050, text=» EXTRN QIRN,QIRR«, t00=0x0003, t01=0x00e8}
0x05aa…05b8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0100}
0x05b8…05c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x010e}
0x05c2…05fa Head {h00=0x0034, h01=0x0050, text=»* CHKIND IS USED FROM FNDDWT TO SELECT DM-DWT «, t00=0x0003, t01=0x0118}
0x05fa…0630 Head {h00=0x0032, h01=0x0050, text=»* INDEX FILE (INDEX 0) SHALL BE SELECTED FOR«, t00=0x0003, t01=0x0150}
0x0630…065c Head {h00=0x0028, h01=0x0050, text=»* DX,IX,XR,XN, DATA FILE OTHERWISE«, t00=0x0003, t01=0x0186}
0x065c…0666 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0022}
0x0666…067a Head {h00=0x0010, h01=0x0050, text=»CHKIND EQU *«, t00=0x0004, t01=0x002c}
0x067a…068e Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x0004, t01=0x0040}
0x068e…06a2 Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x0004, t01=0x0054}
0x06a2…06c8 Head {h00=0x0022, h01=0x0050, text=» LDK A2,1 INDEX FOR DATA FILE «, t00=0x0004, t01=0x0068}
0x06c8…06e0 Head {h00=0x0014, h01=0x0050, text=» LDR A1,A7 ORDER«, t00=0x0004, t01=0x008e}
0x06e0…06f4 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/3F «, t00=0x0004, t01=0x00a6}
0x06f4…0708 Head {h00=0x0010, h01=0x0050, text=» CWK A1,/20 «, t00=0x0004, t01=0x00ba}
0x0708…072a Head {h00=0x001e, h01=0x0050, text=» RF(E) FND320 DELETE INDEX«, t00=0x0004, t01=0x00ce}
0x072a…073e Head {h00=0x0010, h01=0x0050, text=» CWK A1,/1A «, t00=0x0004, t01=0x00f0}
0x073e…0760 Head {h00=0x001e, h01=0x0050, text=» RF(E) FND320 INDEXED READ«, t00=0x0004, t01=0x0104}
0x0760…0782 Head {h00=0x001e, h01=0x0050, text=» ANK A1,/3E REMOVE BIT 15 «, t00=0x0004, t01=0x0126}
0x0782…0796 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/1E «, t00=0x0004, t01=0x0148}
0x0796…07ce Head {h00=0x0034, h01=0x0050, text=» RF(E) FND320 INSERT INDEX OR INDEXED READ NEXT «, t00=0x0004, t01=0x015c}
0x07ce…07e0 (5, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RF FND340«, t00=0x0005, t01=0x0004}
0x07e0…080c Head {h00=0x0028, h01=0x0050, text=»FND320 LDK A2,0 INDEX FOR INDEX FILE«, t00=0x0005, t01=0x0016}
0x080c…0820 Head {h00=0x0010, h01=0x0050, text=»FND340 EQU *«, t00=0x0005, t01=0x0042}
0x0820…0838 Head {h00=0x0014, h01=0x0050, text=» CCR A2,A6 INDEX«, t00=0x0005, t01=0x0056}
0x0838…085a Head {h00=0x001e, h01=0x0050, text=» RF(E) FND390 ENTRY FOUND «, t00=0x0005, t01=0x006e}
0x085a…086c Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0005, t01=0x0090}
0x086c…089a Head {h00=0x002a, h01=0x0050, text=» ADS A1,8,A15 RETURN+2 WHEN NOT FOUND «, t00=0x0005, t01=0x00a2}
0x089a…08b4 Head {h00=0x0016, h01=0x0050, text=»FND390 ABL IHRET2 «, t00=0x0005, t01=0x00d0}
0x08b4…08c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x00ea}
0x08c2…08cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f8}
0x08cc…090a Head {h00=0x003a, h01=0x0050, text=»* REQEND IS USED IN TENDIO TO RESET REQUEST BUSY BIT«, t00=0x0005, t01=0x0102}
0x090a…0924 Head {h00=0x0016, h01=0x0050, text=»* FOR ALL FILES «, t00=0x0005, t01=0x0140}
0x0924…094a Head {h00=0x0022, h01=0x0050, text=»* AND TO RESOLVE ALL QUEUES «, t00=0x0005, t01=0x015a}
0x094a…0954 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0180}
0x0954…0968 Head {h00=0x0010, h01=0x0050, text=»REQEND EQU *«, t00=0x0005, t01=0x018a}
0x0968…097e Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/8000«, t00=0x0006, t01=0x000e}
0x097e…09a4 Head {h00=0x0022, h01=0x0050, text=» AN A2,2,A5 TASK STATUS BIT 0 «, t00=0x0006, t01=0x0024}
0x09a4…09ca Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TEN115 DMTASK CALLING «, t00=0x0006, t01=0x004a}
0x09ca…09d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0070}
0x09d4…0a04 Head {h00=0x002c, h01=0x0050, text=»* RESET REQUEST BUSY BIT FOR ALL FILES«, t00=0x0006, t01=0x007a}
0x0a04…0a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00aa}
0x0a0e…0a36 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,10 MAX NO OF FILES * 2 «, t00=0x0006, t01=0x00b4}
0x0a36…0a4a Head {h00=0x0010, h01=0x0050, text=»TEN112 EQU *«, t00=0x0006, t01=0x00dc}
0x0a4a…0a5c Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0006, t01=0x00f0}
0x0a5c…0a80 Head {h00=0x0020, h01=0x0050, text=» RF(N) TEN115 NO MORE FILES «, t00=0x0006, t01=0x0102}
0x0a80…0a92 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A6«, t00=0x0006, t01=0x0126}
0x0a92…0aa4 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0006, t01=0x0138}
0x0aa4…0ac6 Head {h00=0x001e, h01=0x0050, text=» LD A3,FDBADF,A3 FDB ADDR «, t00=0x0006, t01=0x014a}
0x0ac6…0adc Head {h00=0x0012, h01=0x0050, text=» RB(Z) TEN112 «, t00=0x0006, t01=0x016c}
0x0adc…0af8 Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 DWT ADDR «, t00=0x0006, t01=0x0182}
0x0af8…0b18 Head {h00=0x001c, h01=0x0050, text=» RF(E) TEN114 MASTER DWT«, t00=0x0007, t01=0x000e}
0x0b18…0b30 Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTQ,A3 «, t00=0x0007, t01=0x002e}
0x0b30…0b4e Head {h00=0x001a, h01=0x0050, text=» RF(Z) TEN113 NO QUEUE«, t00=0x0007, t01=0x0046}
0x0b4e…0b62 Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A5 «, t00=0x0007, t01=0x0064}
0x0b62…0b84 Head {h00=0x001e, h01=0x0050, text=» ST A4,DWTTQ,A3 NEW ANCHOR«, t00=0x0007, t01=0x0078}
0x0b84…0ba8 Head {h00=0x0020, h01=0x0050, text=» CF A15,QTJOB REPEAT REQUEST«, t00=0x0007, t01=0x009a}
0x0ba8…0bce Head {h00=0x0022, h01=0x0050, text=»TEN113 LD A5,DWTTDM,A6 RESTORE«, t00=0x0007, t01=0x00be}
0x0bce…0be2 Head {h00=0x0010, h01=0x0050, text=»TEN114 EQU *«, t00=0x0007, t01=0x00e4}
0x0be2…0c0a Head {h00=0x0024, h01=0x0050, text=» LDKL A4,/BFFF REQUEST BUSY BIT «, t00=0x0007, t01=0x00f8}
0x0c0a…0c28 Head {h00=0x001a, h01=0x0050, text=» ANS A4,DWTST,A3 RESET«, t00=0x0007, t01=0x0120}
0x0c28…0c40 Head {h00=0x0014, h01=0x0050, text=» LDKL A4,/8000 «, t00=0x0007, t01=0x013e}
0x0c40…0c68 Head {h00=0x0024, h01=0x0050, text=» ORS A4,DWTST,A3 DEVICE NOT BUSY«, t00=0x0007, t01=0x0156}
0x0c68…0c7a Head {h00=0x000e, h01=0x0050, text=» RB TEN112«, t00=0x0007, t01=0x017e}
0x0c7a…0c8e Head {h00=0x0010, h01=0x0050, text=»TEN115 EQU *«, t00=0x0007, t01=0x0190}
0x0c8e…0ca0 Head {h00=0x000e, h01=0x0050, text=» ABL IHRTN«, t00=0x0008, t01=0x0014}
0x0ca0…0cae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x0026}
0x0cae…0cea Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x0008, t01=0x0034}
0x0cea…0cf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0070}
0x0cf4…0d34 Head {h00=0x003c, h01=0x0050, text=»* EATEST WILL SEARCH THE EA-LINK FOR A LOG RECORD NO. «, t00=0x0008, t01=0x007a}
0x0d34…0d3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ba}
0x0d3e…0d7a Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x0008, t01=0x00c4}
0x0d7a…0d84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0100}
0x0d84…0da0 Head {h00=0x0018, h01=0x0050, text=»* A1 = FDB ADRESS «, t00=0x0008, t01=0x010a}
0x0da0…0dc2 Head {h00=0x001e, h01=0x0050, text=»* A2,A3 = LOG RECORD NO «, t00=0x0008, t01=0x0126}
0x0dc2…0dcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0148}
0x0dcc…0de8 Head {h00=0x0018, h01=0x0050, text=»* CF A14,EATEST «, t00=0x0008, t01=0x0152}
0x0de8…0df2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x016e}
0x0df2…0e2e Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x0008, t01=0x0178}
0x0e2e…0e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0024}
0x0e38…0e56 Head {h00=0x001a, h01=0x0050, text=»* A1-A3 = UNCHANGED «, t00=0x0009, t01=0x002e}
0x0e56…0e78 Head {h00=0x001e, h01=0x0050, text=»* A4 = 0 NO EA AT ALL «, t00=0x0009, t01=0x004c}
0x0e78…0ea6 Head {h00=0x002a, h01=0x0050, text=»* = +1 EA FOUND FOR ACTUAL TASK «, t00=0x0009, t01=0x006e}
0x0ea6…0ed4 Head {h00=0x002a, h01=0x0050, text=»* = -1 EA FOUND FO R OTHER TASK «, t00=0x0009, t01=0x009c}
0x0ed4…0ede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ca}
0x0ede…0f1a Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x0009, t01=0x00d4}
0x0f1a…0f24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0110}
0x0f24…0f38 Head {h00=0x0010, h01=0x0050, text=»* A1 - A4 «, t00=0x0009, t01=0x011a}
0x0f38…0f46 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x012e}
0x0f46…0f5a Head {h00=0x0010, h01=0x0050, text=»EATEST EQU *«, t00=0x0009, t01=0x013c}
0x0f5a…0f80 Head {h00=0x0022, h01=0x0050, text=» LD A4,FDBEAL,A1 BUFFER QUEUE «, t00=0x0009, t01=0x0150}
0x0f80…0f92 Head {h00=0x000e, h01=0x0050, text=» RF EAT030«, t00=0x0009, t01=0x0176}
0x0f92…0fa6 Head {h00=0x0010, h01=0x0050, text=»EAT020 EQU *«, t00=0x0009, t01=0x0188}
0x0fa6…0fca Head {h00=0x0020, h01=0x0050, text=» LDR* A4,A4 NEXT BUFFER ADR «, t00=0x000a, t01=0x000c}
0x0fca…0fde Head {h00=0x0010, h01=0x0050, text=»EAT030 EQU *«, t00=0x000a, t01=0x0030}
0x0fde…1006 Head {h00=0x0024, h01=0x0050, text=» RF(Z) EAT100 EMPTY QUEUE,NO EA «, t00=0x000a, t01=0x0044}
0x1006…1010 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006c}
0x1010…102e Head {h00=0x001a, h01=0x0050, text=»* SEARCH LOG REC NO «, t00=0x000a, t01=0x0076}
0x102e…1038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0094}
0x1038…1056 Head {h00=0x001a, h01=0x0050, text=» CC A2,3,A4 FIRST CHAR«, t00=0x000a, t01=0x009e}
0x1056…106c Head {h00=0x0012, h01=0x0050, text=» RB(NE) EAT020«, t00=0x000a, t01=0x00bc}
0x106c…108c Head {h00=0x001c, h01=0x0050, text=» CW A3,4,A4 2 AND 3 CHAR«, t00=0x000a, t01=0x00d2}
0x108c…10a2 Head {h00=0x0012, h01=0x0050, text=» RB(NE) EAT020«, t00=0x000a, t01=0x00f2}
0x10a2…10ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0108}
0x10ac…10c8 Head {h00=0x0018, h01=0x0050, text=»* RECORD NO FOUND «, t00=0x000a, t01=0x0112}
0x10c8…10d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x012e}
0x10d2…10e6 Head {h00=0x0010, h01=0x0050, text=» LC A4,2,A4 «, t00=0x000a, t01=0x0138}
0x10e6…1106 Head {h00=0x001c, h01=0x0050, text=» CC A4,FDBTNR,A1 TASK ID«, t00=0x000a, t01=0x014c}
0x1106…111c Head {h00=0x0012, h01=0x0050, text=» RF(E) EAT060 «, t00=0x000a, t01=0x016c}
0x111c…113e Head {h00=0x001e, h01=0x0050, text=» LDKL A4,-1 EA OTHER TASK «, t00=0x000a, t01=0x0182}
0x113e…1150 Head {h00=0x000e, h01=0x0050, text=» RF EAT100«, t00=0x000b, t01=0x0014}
0x1150…1164 Head {h00=0x0010, h01=0x0050, text=»EAT060 EQU *«, t00=0x000b, t01=0x0026}
0x1164…1184 Head {h00=0x001c, h01=0x0050, text=» LDK A4,1 EA SAME ATASK «, t00=0x000b, t01=0x003a}
0x1184…1198 Head {h00=0x0010, h01=0x0050, text=»EAT100 EQU *«, t00=0x000b, t01=0x005a}
0x1198…11a8 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x000b, t01=0x006e}
0x11a8…11b6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x007e}
0x11b6…11f2 Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x000b, t01=0x008c}
0x11f2…11fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c8}
0x11fc…1242 Head {h00=0x0042, h01=0x0050, text=»* EASETB WILL UNCONDITIONALLY PUT A NEW EA BUFFER IN EA-LINK«, t00=0x000b, t01=0x00d2}
0x1242…1292 Head {h00=0x004c, h01=0x0050, text=»* IF NO BUFFERS ARE AVAILABLE THE SYSTEM WILL HALT AND LITE SOP-LAMPS «, t00=0x000b, t01=0x0118}
0x1292…129c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0168}
0x129c…12d8 Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x000b, t01=0x0172}
0x12d8…12e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001e}
0x12e2…12fc Head {h00=0x0016, h01=0x0050, text=»* A6 = FDB ADDR «, t00=0x000c, t01=0x0028}
0x12fc…1322 Head {h00=0x0022, h01=0x0050, text=»* A2,A3 = LOGICAL RECORD NO «, t00=0x000c, t01=0x0042}
0x1322…132c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0068}
0x132c…1348 Head {h00=0x0018, h01=0x0050, text=»* CF A14,EASETB «, t00=0x000c, t01=0x0072}
0x1348…1352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008e}
0x1352…138e Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x000c, t01=0x0098}
0x138e…1398 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d4}
0x1398…13b2 Head {h00=0x0016, h01=0x0050, text=»* A6 = FDB ADDR «, t00=0x000c, t01=0x00de}
0x13b2…13bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f8}
0x13bc…13f8 Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x000c, t01=0x0102}
0x13f8…1402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013e}
0x1402…1416 Head {h00=0x0010, h01=0x0050, text=»* A1-A4,A6«, t00=0x000c, t01=0x0148}
0x1416…1420 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x015c}
0x1420…1460 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000c, t01=0x0166}
0x1460…146e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0016}
0x146e…1482 Head {h00=0x0010, h01=0x0050, text=»EASETB EQU *«, t00=0x000d, t01=0x0024}
0x1482…1494 Head {h00=0x000e, h01=0x0050, text=» ECR A2,A2«, t00=0x000d, t01=0x0038}
0x1494…14b4 Head {h00=0x001c, h01=0x0050, text=» LC A2,FDBTNR,A6 TASK ID«, t00=0x000d, t01=0x004a}
0x14b4…14c6 Head {h00=0x000e, h01=0x0050, text=» ECR A2,A2«, t00=0x000d, t01=0x006a}
0x14c6…14e4 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A3 LOG REC NO «, t00=0x000d, t01=0x007c}
0x14e4…14f0 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x000d, t01=0x009a}
0x14f0…1520 Head {h00=0x002c, h01=0x0050, text=» CF A15,GETBLK GET BUFF AND STORE A1,A2 «, t00=0x000d, t01=0x00a6}
0x1520…152a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00d6}
0x152a…1548 Head {h00=0x001a, h01=0x0050, text=»* LINK BUFFER TO FDB«, t00=0x000d, t01=0x00e0}
0x1548…1552 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fe}
0x1552…1574 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBEAL,A6 LINK ROOT«, t00=0x000d, t01=0x0108}
0x1574…158e Head {h00=0x0016, h01=0x0050, text=» STR A2,A4 THREAD «, t00=0x000d, t01=0x012a}
0x158e…15b0 Head {h00=0x001e, h01=0x0050, text=» ST A4,FDBEAL,A6 NEW ROOT «, t00=0x000d, t01=0x0144}
0x15b0…15c0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x000d, t01=0x0166}
0x15c0…15ce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0176}
0x15ce…160a Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x000d, t01=0x0184}
0x160a…1614 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0030}
0x1614…1650 Head {h00=0x0038, h01=0x0050, text=»* EARELB WILL RELEASE EA BUFFERS AND CONNRECT THEM«, t00=0x000e, t01=0x003a}
0x1650…166e Head {h00=0x001a, h01=0x0050, text=»* TIO THE FREE LINK.«, t00=0x000e, t01=0x0076}
0x166e…1678 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0094}
0x1678…16b4 Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x000e, t01=0x009e}
0x16b4…16be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00da}
0x16be…16da Head {h00=0x0018, h01=0x0050, text=»* A1 = FDB-ADDRESS«, t00=0x000e, t01=0x00e4}
0x16da…1700 Head {h00=0x0022, h01=0x0050, text=»* A2,A3 = LOGICAL RECORD NO «, t00=0x000e, t01=0x0100}
0x1700…1746 Head {h00=0x0042, h01=0x0050, text=»* A2: BIT 0=1,BIT 1=1 ALL BUFFERS WITH TASK ID SAME AS FDB «, t00=0x000e, t01=0x0126}
0x1746…1772 Head {h00=0x0028, h01=0x0050, text=»* IS REMOVED.«, t00=0x000e, t01=0x016c}
0x1772…17b2 Head {h00=0x003c, h01=0x0050, text=»* BIT 0=1,BIT 1=0 ALL BUFFERS ON FDB IS REMOVED. «, t00=0x000f, t01=0x0008}
0x17b2…1800 Head {h00=0x004a, h01=0x0050, text=»* BIT 0=0 THE FIRST BUFFER WITH TASK ID AND LOG REC NO «, t00=0x000f, t01=0x0048}
0x1800…1834 Head {h00=0x0030, h01=0x0050, text=»* AS SPEC IS REMOVED.«, t00=0x000f, t01=0x0096}
0x1834…183e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ca}
0x183e…187a Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x000f, t01=0x00d4}
0x187a…1884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0110}
0x1884…189e Head {h00=0x0016, h01=0x0050, text=»* A1 = UNCHANGED«, t00=0x000f, t01=0x011a}
0x189e…18a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0134}
0x18a8…18e4 Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x000f, t01=0x013e}
0x18e4…18ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x017a}
0x18ee…1902 Head {h00=0x0010, h01=0x0050, text=»* A1 - A5 «, t00=0x000f, t01=0x0184}
0x1902…1910 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0008}
0x1910…1924 Head {h00=0x0010, h01=0x0050, text=»EARELB EQU *«, t00=0x0010, t01=0x0016}
0x1924…1936 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A1«, t00=0x0010, t01=0x002a}
0x1936…1956 Head {h00=0x001c, h01=0x0050, text=» ADKL A5,FDBEAL ROOT ADR«, t00=0x0010, t01=0x003c}
0x1956…1972 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A5 EA ROOT «, t00=0x0010, t01=0x005c}
0x1972…1984 Head {h00=0x000e, h01=0x0050, text=» RF EAR030«, t00=0x0010, t01=0x0078}
0x1984…1998 Head {h00=0x0010, h01=0x0050, text=»EAR020 EQU *«, t00=0x0010, t01=0x008a}
0x1998…19b8 Head {h00=0x001c, h01=0x0050, text=» LDR A5,A4 SAVE OLD ROOT«, t00=0x0010, t01=0x009e}
0x19b8…19dc Head {h00=0x0020, h01=0x0050, text=» LDR* A4,A4 NEXT BUFFER ADR «, t00=0x0010, t01=0x00be}
0x19dc…19f0 Head {h00=0x0010, h01=0x0050, text=»EAR030 EQU *«, t00=0x0010, t01=0x00e2}
0x19f0…1a12 Head {h00=0x001e, h01=0x0050, text=» RF(Z) EAR100 EA LINK END «, t00=0x0010, t01=0x00f6}
0x1a12…1a2c Head {h00=0x0016, h01=0x0050, text=» LDR A2,A2 REC NO «, t00=0x0010, t01=0x0118}
0x1a2c…1a56 Head {h00=0x0026, h01=0x0050, text=» RF(N) EAR050 RELEASE MANY BUFFERS«, t00=0x0010, t01=0x0132}
0x1a56…1a60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x015c}
0x1a60…1a7e Head {h00=0x001a, h01=0x0050, text=»* SEARCH LOG REC NO «, t00=0x0010, t01=0x0166}
0x1a7e…1a88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0184}
0x1a88…1a9c Head {h00=0x0010, h01=0x0050, text=» CC A2,3,A4 «, t00=0x0010, t01=0x018e}
0x1a9c…1ab2 Head {h00=0x0012, h01=0x0050, text=» RB(NE) EAR020«, t00=0x0011, t01=0x0012}
0x1ab2…1ac6 Head {h00=0x0010, h01=0x0050, text=» CW A3,4,A4 «, t00=0x0011, t01=0x0028}
0x1ac6…1adc Head {h00=0x0012, h01=0x0050, text=» RB(NE) EAR020«, t00=0x0011, t01=0x003c}
0x1adc…1aee Head {h00=0x000e, h01=0x0050, text=» RF EAR060«, t00=0x0011, t01=0x0052}
0x1aee…1b02 Head {h00=0x0010, h01=0x0050, text=»EAR050 EQU *«, t00=0x0011, t01=0x0064}
0x1b02…1b24 Head {h00=0x001e, h01=0x0050, text=» CWK A2,/A000 CHECK BIT 1 «, t00=0x0011, t01=0x0078}
0x1b24…1b58 Head {h00=0x0030, h01=0x0050, text=» RF(L) EAR080 BIT 1 ZERO,ALL BUFFERS REMOVED«, t00=0x0011, t01=0x009a}
0x1b58…1b6c Head {h00=0x0010, h01=0x0050, text=»EAR060 EQU *«, t00=0x0011, t01=0x00ce}
0x1b6c…1b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00e2}
0x1b76…1b94 Head {h00=0x001a, h01=0x0050, text=»* SEARCH TASK IDENT «, t00=0x0011, t01=0x00ec}
0x1b94…1b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x010a}
0x1b9e…1bbe Head {h00=0x001c, h01=0x0050, text=» LC A3,FDBTNR,A1 TAK ID «, t00=0x0011, t01=0x0114}
0x1bbe…1bd2 Head {h00=0x0010, h01=0x0050, text=» CC A3,2,A4 «, t00=0x0011, t01=0x0134}
0x1bd2…1be8 Head {h00=0x0012, h01=0x0050, text=» RB(NE) EAR020«, t00=0x0011, t01=0x0148}
0x1be8…1bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x015e}
0x1bf2…1c0e Head {h00=0x0018, h01=0x0050, text=»* EA BUFFER FOUND «, t00=0x0011, t01=0x0168}
0x1c0e…1c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0184}
0x1c18…1c2c Head {h00=0x0010, h01=0x0050, text=»EAR080 EQU *«, t00=0x0011, t01=0x018e}
0x1c2c…1c4c Head {h00=0x001c, h01=0x0050, text=» LDR* A3,A4 NEXT BUFADR «, t00=0x0012, t01=0x0012}
0x1c4c…1c76 Head {h00=0x0026, h01=0x0050, text=» STR A3,A5 REMOVE BUFFER FROM LINK«, t00=0x0012, t01=0x0032}
0x1c76…1c80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x005c}
0x1c80…1ca2 Head {h00=0x001e, h01=0x0050, text=»* RETURN BUFFER TO POOL «, t00=0x0012, t01=0x0066}
0x1ca2…1cac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0088}
0x1cac…1cb8 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0012, t01=0x0092}
0x1cb8…1cce Head {h00=0x0012, h01=0x0050, text=» LD A3,FREQUE «, t00=0x0012, t01=0x009e}
0x1cce…1cea Head {h00=0x0018, h01=0x0050, text=» STR A3,A4 NEXT FREE«, t00=0x0012, t01=0x00b4}
0x1cea…1d08 Head {h00=0x001a, h01=0x0050, text=» ST A4,FREQUE NEW ROOT«, t00=0x0012, t01=0x00d0}
0x1d08…1d26 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 BUFFER ROOT«, t00=0x0012, t01=0x00ee}
0x1d26…1d38 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0012, t01=0x010c}
0x1d38…1d5a Head {h00=0x001e, h01=0x0050, text=» RB(N) EAR020 RELEASE MORE«, t00=0x0012, t01=0x011e}
0x1d5a…1d6e Head {h00=0x0010, h01=0x0050, text=»EAR100 EQU *«, t00=0x0012, t01=0x0140}
0x1d6e…1d7e Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0012, t01=0x0154}
0x1d7e…1d8c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0164}
0x1d8c…1dc8 Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x0012, t01=0x0172}
0x1dc8…1dd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x001e}
0x1dd2…1e1a Head {h00=0x0044, h01=0x0050, text=»* CRNGET WILL SEARCH THE CRN-LINK FOR TASK ID. IF NO BUFFER IS«, t00=0x0013, t01=0x0028}
0x1e1a…1e62 Head {h00=0x0044, h01=0x0050, text=»* FOUND A NEW IS FETCHED FROM THE FREE LINK AND B FILLED WITH «, t00=0x0013, t01=0x0070}
0x1e62…1eae Head {h00=0x0048, h01=0x0050, text=»* ZEROES AND PUT ON THE CRN LINK. IF NO FREE BUFFERS ARE AVAILABLE«, t00=0x0013, t01=0x00b8}
0x1eae…1ee2 Head {h00=0x0030, h01=0x0050, text=»* THE SYSTEM WILL HALT AND LITE SOP-LAMPS.«, t00=0x0013, t01=0x0104}
0x1ee2…1f0e Head {h00=0x0028, h01=0x0050, text=»* TASK ID IS PLACED IN THE BUFFER «, t00=0x0013, t01=0x0138}
0x1f0e…1f18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0164}
0x1f18…1f54 Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x0013, t01=0x016e}
0x1f54…1f5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x001a}
0x1f5e…1f84 Head {h00=0x0022, h01=0x0050, text=»* A1 = FDB ADDRESS DATA FILE«, t00=0x0014, t01=0x0024}
0x1f84…1f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x004a}
0x1f8e…1fca Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x0014, t01=0x0054}
0x1fca…1fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0090}
0x1fd4…1fee Head {h00=0x0016, h01=0x0050, text=»* A1 = UNCHANGED«, t00=0x0014, t01=0x009a}
0x1fee…201a Head {h00=0x0028, h01=0x0050, text=»* A2 = ADDRESS OF FOUND CRN-BUFFER«, t00=0x0014, t01=0x00b4}
0x201a…2024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e0}
0x2024…2060 Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x0014, t01=0x00ea}
0x2060…206a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0126}
0x206a…207e Head {h00=0x0010, h01=0x0050, text=»* A1 - A4 «, t00=0x0014, t01=0x0130}
0x207e…208c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0144}
0x208c…20a0 Head {h00=0x0010, h01=0x0050, text=»CRNGET EQU *«, t00=0x0014, t01=0x0152}
0x20a0…20c2 Head {h00=0x001e, h01=0x0050, text=» LD A2,FDBCRL,A1 CRN ROOT «, t00=0x0014, t01=0x0166}
0x20c2…20d4 Head {h00=0x000e, h01=0x0050, text=» RF CRN030«, t00=0x0014, t01=0x0188}
0x20d4…20e8 Head {h00=0x0010, h01=0x0050, text=»CRN020 EQU *«, t00=0x0015, t01=0x000a}
0x20e8…2108 Head {h00=0x001c, h01=0x0050, text=» LDR* A2,A2 NEXT BUFFER «, t00=0x0015, t01=0x001e}
0x2108…211c Head {h00=0x0010, h01=0x0050, text=»CRN030 EQU *«, t00=0x0015, t01=0x003e}
0x211c…213a Head {h00=0x001a, h01=0x0050, text=» RF(Z) CRN100 LINK END«, t00=0x0015, t01=0x0052}
0x213a…2144 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0070}
0x2144…2162 Head {h00=0x001a, h01=0x0050, text=»* CHECK ATASK IDENT «, t00=0x0015, t01=0x007a}
0x2162…216c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0098}
0x216c…218c Head {h00=0x001c, h01=0x0050, text=» LC A3,FDBTNR,A1 TASK ID«, t00=0x0015, t01=0x00a2}
0x218c…21a4 Head {h00=0x0014, h01=0x0050, text=» CC A3,CRNTID,A2«, t00=0x0015, t01=0x00c2}
0x21a4…21c6 Head {h00=0x001e, h01=0x0050, text=» RB(NE) CRN020 OTHER TASK «, t00=0x0015, t01=0x00da}
0x21c6…21e6 Head {h00=0x001c, h01=0x0050, text=» RF CRN200 BUFFER FOUND «, t00=0x0015, t01=0x00fc}
0x21e6…21f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011c}
0x21f0…220a Head {h00=0x0016, h01=0x0050, text=»* GET NEW BUFFER«, t00=0x0015, t01=0x0126}
0x220a…2214 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0140}
0x2214…2228 Head {h00=0x0010, h01=0x0050, text=»CRN100 EQU *«, t00=0x0015, t01=0x014a}
0x2228…2234 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0015, t01=0x015e}
0x2234…2258 Head {h00=0x0020, h01=0x0050, text=» LD A2,CRNQUE FREE LINK ROOT«, t00=0x0015, t01=0x016a}
0x2258…226e Head {h00=0x0012, h01=0x0050, text=» RF(NZ) CRN120«, t00=0x0015, t01=0x018e}
0x226e…228e Head {h00=0x001c, h01=0x0050, text=» LDK A1,3 LAMP 10 AND 11«, t00=0x0016, t01=0x0014}
0x228e…22b2 Head {h00=0x0020, h01=0x0050, text=» CF A15,HALT NO MORE BUFFERS«, t00=0x0016, t01=0x0034}
0x22b2…22c6 Head {h00=0x0010, h01=0x0050, text=»CRN120 EQU *«, t00=0x0016, t01=0x0058}
0x22c6…22e4 Head {h00=0x001a, h01=0x0050, text=» LDR* A3,A2 NEXT FREE «, t00=0x0016, t01=0x006c}
0x22e4…2302 Head {h00=0x001a, h01=0x0050, text=» ST A3,CRNQUE UPD ROOT«, t00=0x0016, t01=0x008a}
0x2302…230c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00a8}
0x230c…2330 Head {h00=0x0020, h01=0x0050, text=»* FILL BUFFER WITH ZEROES «, t00=0x0016, t01=0x00b2}
0x2330…233a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00d6}
0x233a…2368 Head {h00=0x002a, h01=0x0050, text=» LDKL A3,CRBUFL BUFFER LENGTH IN BYTES«, t00=0x0016, t01=0x00e0}
0x2368…237c Head {h00=0x0010, h01=0x0050, text=»CRN140 EQU *«, t00=0x0016, t01=0x010e}
0x237c…23a0 Head {h00=0x0020, h01=0x0050, text=» SUK A3,2 ZEROE WORDS 2 - N «, t00=0x0016, t01=0x0122}
0x23a0…23c4 Head {h00=0x0020, h01=0x0050, text=» RF(NP) CRN160 BUFFER ZEROED«, t00=0x0016, t01=0x0146}
0x23c4…23e2 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A2 BUFFER ADR «, t00=0x0016, t01=0x016a}
0x23e2…2406 Head {h00=0x0020, h01=0x0050, text=» ADR A4,A3 OFFSET IN BUFFER «, t00=0x0016, t01=0x0188}
0x2406…2416 Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0017, t01=0x001c}
0x2416…2434 Head {h00=0x001a, h01=0x0050, text=» RB CRN140 MORE WORDS «, t00=0x0017, t01=0x002c}
0x2434…243e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x004a}
0x243e…2464 Head {h00=0x0022, h01=0x0050, text=»* CONNECT NEW BUFFER TO LINK«, t00=0x0017, t01=0x0054}
0x2464…246e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x007a}
0x246e…2482 Head {h00=0x0010, h01=0x0050, text=»CRN160 EQU *«, t00=0x0017, t01=0x0084}
0x2482…249a Head {h00=0x0014, h01=0x0050, text=» LC A3,FDBTNR,A1«, t00=0x0017, t01=0x0098}
0x249a…24ba Head {h00=0x001c, h01=0x0050, text=» SC A3,CRNTID,A2 TASK ID«, t00=0x0017, t01=0x00b0}
0x24ba…24dc Head {h00=0x001e, h01=0x0050, text=» LD A3,FDBCRL,A1 LINK ROOT«, t00=0x0017, t01=0x00d0}
0x24dc…24f6 Head {h00=0x0016, h01=0x0050, text=» STR A3,A2 THREAD «, t00=0x0017, t01=0x00f2}
0x24f6…2518 Head {h00=0x001e, h01=0x0050, text=» ST A2,FDBCRL,A1 NEW ROOT «, t00=0x0017, t01=0x010c}
0x2518…252c Head {h00=0x0010, h01=0x0050, text=»CRN200 EQU *«, t00=0x0017, t01=0x012e}
0x252c…253c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0017, t01=0x0142}
0x253c…254a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0152}
0x254a…2586 Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x0017, t01=0x0160}
0x2586…2590 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x000c}
0x2590…25c6 Head {h00=0x0032, h01=0x0050, text=»* CALSNO WILL CONVERT A LOGICAL RECORD NO TO«, t00=0x0018, t01=0x0016}
0x25c6…25e4 Head {h00=0x001a, h01=0x0050, text=»* SECTOR AND OFFSET «, t00=0x0018, t01=0x004c}
0x25e4…25ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x006a}
0x25ee…262a Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x0018, t01=0x0074}
0x262a…2634 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00b0}
0x2634…265a Head {h00=0x0022, h01=0x0050, text=»* A1,A2 = LOGICAL RECORD NO «, t00=0x0018, t01=0x00ba}
0x265a…2674 Head {h00=0x0016, h01=0x0050, text=»* A6 = FDB ADDR «, t00=0x0018, t01=0x00e0}
0x2674…267e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00fa}
0x267e…269a Head {h00=0x0018, h01=0x0050, text=»* CF A14,CALSNO «, t00=0x0018, t01=0x0104}
0x269a…26a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0120}
0x26a4…26e0 Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x0018, t01=0x012a}
0x26e0…26ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0166}
0x26ea…2700 Head {h00=0x0012, h01=0x0050, text=»* A1 = 0 OK«, t00=0x0018, t01=0x0170}
0x2700…272e Head {h00=0x002a, h01=0x0050, text=»* NE 0 , ERROR =/20=END OF MEDIUM «, t00=0x0018, t01=0x0186}
0x272e…274e Head {h00=0x001c, h01=0x0050, text=»* A4 = EXTENT ADDRESS «, t00=0x0019, t01=0x0024}
0x274e…2768 Head {h00=0x0016, h01=0x0050, text=»* A6 = UNCHANGED«, t00=0x0019, t01=0x0044}
0x2768…2790 Head {h00=0x0024, h01=0x0050, text=»* IN FDB : FDBSNR = SECTOR NR «, t00=0x0019, t01=0x005e}
0x2790…27c0 Head {h00=0x002c, h01=0x0050, text=»* FDBRRO = OFFSET IN SECTOR «, t00=0x0019, t01=0x0086}
0x27c0…27ee Head {h00=0x002a, h01=0x0050, text=»* FDBCEX = CURRENT EXTENT «, t00=0x0019, t01=0x00b6}
0x27ee…27f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e4}
0x27f8…2834 Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x0019, t01=0x00ee}
0x2834…283e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x012a}
0x283e…2852 Head {h00=0x0010, h01=0x0050, text=»* A1 - A9 «, t00=0x0019, t01=0x0134}
0x2852…2860 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0148}
0x2860…2874 Head {h00=0x0010, h01=0x0050, text=»CALSNO EQU *«, t00=0x0019, t01=0x0156}
0x2874…287e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x016a}
0x287e…28a4 Head {h00=0x0022, h01=0x0050, text=»* FIND SECTOR NO WITHIN FILE«, t00=0x0019, t01=0x0174}
0x28a4…28ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x000a}
0x28ae…28ce Head {h00=0x001c, h01=0x0050, text=» LDR A5,A6 SAVE FDB ADDR«, t00=0x001a, t01=0x0014}
0x28ce…28e0 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x001a, t01=0x0034}
0x28e0…2908 Head {h00=0x0024, h01=0x0050, text=» LC A6,FDBBLF,A5 BLOCKING FACTOR«, t00=0x001a, t01=0x0046}
0x2908…2938 Head {h00=0x002c, h01=0x0050, text=» CF A14,DIVMOD A2=A1,A2//A6,A1=REMAINDER«, t00=0x001a, t01=0x006e}
0x2938…2956 Head {h00=0x001a, h01=0x0050, text=» RF(O) TIOD99 OVERFLOW«, t00=0x001a, t01=0x009e}
0x2956…2972 Head {h00=0x0018, h01=0x0050, text=» LDR A3,A2 QUOTIENT «, t00=0x001a, t01=0x00bc}
0x2972…298e Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 FDB ADDR «, t00=0x001a, t01=0x00d8}
0x298e…29aa Head {h00=0x0018, h01=0x0050, text=» LDR A2,A1 REMAINDER«, t00=0x001a, t01=0x00f4}
0x29aa…29c8 Head {h00=0x001a, h01=0x0050, text=» RF(Z) TIOD30 REST = 0«, t00=0x001a, t01=0x0110}
0x29c8…29f0 Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 RECORD IN NEXT SECTOR «, t00=0x001a, t01=0x012e}
0x29f0…2a02 Head {h00=0x000e, h01=0x0050, text=» RF TIOD40«, t00=0x001a, t01=0x0156}
0x2a02…2a34 Head {h00=0x002e, h01=0x0050, text=»TIOD30 LC A2,FDBBLF,A6 LAST REC IN SECTOR «, t00=0x001a, t01=0x0168}
0x2a34…2a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x000a}
0x2a3e…2a5a Head {h00=0x0018, h01=0x0050, text=»* FIND FILE EXTENT«, t00=0x001b, t01=0x0014}
0x2a5a…2a64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0030}
0x2a64…2a78 Head {h00=0x0010, h01=0x0050, text=»TIOD40 EQU *«, t00=0x001b, t01=0x003a}
0x2a78…2a8a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A6«, t00=0x001b, t01=0x004e}
0x2a8a…2ab4 Head {h00=0x0026, h01=0x0050, text=» ADKL A4,FDBEXT FIRST FILE EXTENT «, t00=0x001b, t01=0x0060}
0x2ab4…2ae4 Head {h00=0x002c, h01=0x0050, text=» LD A9,EXTLEN,A4 LENGTH OF FIRST EXTENT «, t00=0x001b, t01=0x008a}
0x2ae4…2b08 Head {h00=0x0020, h01=0x0050, text=» LDK A5,4 NUMBER OF EXTENTS «, t00=0x001b, t01=0x00ba}
0x2b08…2b20 Head {h00=0x0014, h01=0x0050, text=»TIOD45 CWR A3,A9«, t00=0x001b, t01=0x00de}
0x2b20…2b4c Head {h00=0x0028, h01=0x0050, text=» RF(NG) TIOD55 SECTOR IN THIS EXTENT«, t00=0x001b, t01=0x00f6}
0x2b4c…2b60 Head {h00=0x0010, h01=0x0050, text=» SUK A5,1 NO«, t00=0x001b, t01=0x0122}
0x2b60…2b8a Head {h00=0x0026, h01=0x0050, text=» RF(NP) TIODMO EOF ERROR RETURN «, t00=0x001b, t01=0x0136}
0x2b8a…2bae Head {h00=0x0020, h01=0x0050, text=» ADK A4,6 NEXT EXTENT BLOCK «, t00=0x001b, t01=0x0160}
0x2bae…2be0 Head {h00=0x002e, h01=0x0050, text=» AD A9,EXTLEN,A4 ADD LENGTH OF NEXT EXTENT«, t00=0x001b, t01=0x0184}
0x2be0…2bf2 Head {h00=0x000e, h01=0x0050, text=» RB TIOD45«, t00=0x001c, t01=0x0026}
0x2bf2…2bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0038}
0x2bfc…2c2a Head {h00=0x002a, h01=0x0050, text=»* SAVE CURRENT EXTENT BLOCK POINTER «, t00=0x001c, t01=0x0042}
0x2c2a…2c34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0070}
0x2c34…2c52 Head {h00=0x001a, h01=0x0050, text=»TIOD55 ST A4,FDBCEX,A6«, t00=0x001c, t01=0x007a}
0x2c52…2c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0098}
0x2c5c…2c8a Head {h00=0x002a, h01=0x0050, text=»* FIND LOGICAL SECTOR NUMBER ON DISC«, t00=0x001c, t01=0x00a2}
0x2c8a…2c94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00d0}
0x2c94…2cce Head {h00=0x0036, h01=0x0050, text=» SU A9,EXTLEN,A4 NO OF SECTORS IN PREVIOUS EXTENTS«, t00=0x001c, t01=0x00da}
0x2cce…2cf6 Head {h00=0x0024, h01=0x0050, text=» SUR A3,A9 SECTOR NO WITHIN EXT «, t00=0x001c, t01=0x0114}
0x2cf6…2d18 Head {h00=0x001e, h01=0x0050, text=» SUK A3,1 START FROM ZERO «, t00=0x001c, t01=0x013c}
0x2d18…2d3c Head {h00=0x0020, h01=0x0050, text=» RF(N) TIODMO BEFORE MEDIUM «, t00=0x001c, t01=0x015e}
0x2d3c…2d66 Head {h00=0x0026, h01=0x0050, text=» AD A3,EXTBAS,A4 SECTOR NO ON DISC«, t00=0x001c, t01=0x0182}
0x2d66…2d9a Head {h00=0x0030, h01=0x0050, text=» ST A3,FDBSNR,A6 SAVE LOGICAL SECTOR NUMBER «, t00=0x001d, t01=0x001c}
0x2d9a…2dd0 Head {h00=0x0032, h01=0x0050, text=»* FIND RELATIVE RECORD OFFSET WITHIN SECTOR «, t00=0x001d, t01=0x0050}
0x2dd0…2dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0086}
0x2dda…2dec Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x001d, t01=0x0090}
0x2dec…2e16 Head {h00=0x0026, h01=0x0050, text=»TIOD60 SUK A2,1 A2=RELATIVE REC NO«, t00=0x001d, t01=0x00a2}
0x2e16…2e42 Head {h00=0x0028, h01=0x0050, text=» RF(Z) TIOD65 REL REC OFFS IN A3 NOW«, t00=0x001d, t01=0x00cc}
0x2e42…2e70 Head {h00=0x002a, h01=0x0050, text=» AD A3,FDBRLE,A6 NO ADD RECORD LENGTH«, t00=0x001d, t01=0x00f8}
0x2e70…2e92 Head {h00=0x001e, h01=0x0050, text=» ADK A3,1 SKIP STATUS BYTE«, t00=0x001d, t01=0x0126}
0x2e92…2ea4 Head {h00=0x000e, h01=0x0050, text=» RB TIOD60«, t00=0x001d, t01=0x0148}
0x2ea4…2ec0 Head {h00=0x0018, h01=0x0050, text=»TIOD99 LDR A6,A5 FDB«, t00=0x001d, t01=0x015a}
0x2ec0…2ee8 Head {h00=0x0024, h01=0x0050, text=»TIODMO LDK A1,/20 END OF MEDIUM «, t00=0x001d, t01=0x0176}
0x2ee8…2efa Head {h00=0x000e, h01=0x0050, text=» RF TIODMF«, t00=0x001e, t01=0x000e}
0x2efa…2f04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0020}
0x2f04…2f34 Head {h00=0x002c, h01=0x0050, text=»* STORE RELATIVE REC OFFSET IN FBDRRO «, t00=0x001e, t01=0x002a}
0x2f34…2f3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x005a}
0x2f3e…2f52 Head {h00=0x0010, h01=0x0050, text=»TIOD65 EQU *«, t00=0x001e, t01=0x0064}
0x2f52…2f66 Head {h00=0x0010, h01=0x0050, text=» LDK A1,0 OK«, t00=0x001e, t01=0x0078}
0x2f66…2f7e Head {h00=0x0014, h01=0x0050, text=» ST A3,FDBRRO,A6«, t00=0x001e, t01=0x008c}
0x2f7e…2f92 Head {h00=0x0010, h01=0x0050, text=»TIODMF EQU *«, t00=0x001e, t01=0x00a4}
0x2f92…2fa2 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001e, t01=0x00b8}
0x2fa2…2fb0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x00c8}
0x2fb0…2fba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00d6}
0x2fba…2fd0 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x001e, t01=0x00e0}
0x2fd0…2fe2 Head {h00=0x000e, h01=0x0050, text=»* DMTIOT«, t00=0x001e, t01=0x00f6}
0x2fe2…2ff8 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x001e, t01=0x0108}
0x2ff8…3002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x011e}
0x3002…3044 Head {h00=0x003e, h01=0x0050, text=»* ENTRY DMTIOT CHECK RETURN CODES FROM PHYS DISC I/O«, t00=0x001e, t01=0x0128}
0x3044…304e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x016a}
0x304e…3072 Head {h00=0x0020, h01=0x0050, text=»* INPUT A1 = FDB ADDRESS«, t00=0x001e, t01=0x0174}
0x3072…307c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0008}
0x307c…30a0 Head {h00=0x0020, h01=0x0050, text=»* OUTPUT A6 = FDB ADDRESS«, t00=0x001f, t01=0x0012}
0x30a0…30c2 Head {h00=0x001e, h01=0x0050, text=»* A1 = 0 WHEN OK«, t00=0x001f, t01=0x0036}
0x30c2…30ea Head {h00=0x0024, h01=0x0050, text=»* = ERROR CODE ELSE«, t00=0x001f, t01=0x0058}
0x30ea…3112 Head {h00=0x0024, h01=0x0050, text=»* A9 = DM ECB ADDRESS «, t00=0x001f, t01=0x0080}
0x3112…3140 Head {h00=0x002a, h01=0x0050, text=»* A8 = PHYS I/O ECB ADDRESS «, t00=0x001f, t01=0x00a8}
0x3140…3168 Head {h00=0x0024, h01=0x0050, text=»* A2 WILL BE DESTROYED«, t00=0x001f, t01=0x00d6}
0x3168…3172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00fe}
0x3172…319e Head {h00=0x0028, h01=0x0050, text=»* USED REGISTERS : A1,A2,A6,A8,A9 «, t00=0x001f, t01=0x0108}
0x319e…31a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0134}
0x31a8…31b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x013e}
0x31b2…31c6 Head {h00=0x0010, h01=0x0050, text=»DMTIOT EQU *«, t00=0x001f, t01=0x0148}
0x31c6…31e4 Head {h00=0x001a, h01=0x0050, text=» LDR A6,A1 FDB ADDRESS«, t00=0x001f, t01=0x015c}
0x31e4…31fc Head {h00=0x0014, h01=0x0050, text=» LDKL A8,FDBECB «, t00=0x001f, t01=0x017a}
0x31fc…320e (32, 0, 400) Head {h00=0x000e, h01=0x0050, text=» ADR A8,A6«, t00=0x0020, t01=0x0004}
0x320e…3236 Head {h00=0x0024, h01=0x0050, text=» LD A9,DWTECB,A6 DM ECB ADDRESS «, t00=0x0020, t01=0x0016}
0x3236…324a Head {h00=0x0010, h01=0x0050, text=»DMTIT0 EQU *«, t00=0x0020, t01=0x003e}
0x324a…3262 Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBRC,A8 «, t00=0x0020, t01=0x0052}
0x3262…3284 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMTIOX DISC I/O OK «, t00=0x0020, t01=0x006a}
0x3284…329a Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/FEFF«, t00=0x0020, t01=0x008c}
0x329a…32c2 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DMTIT1 NOT ONLY RETRIES «, t00=0x0020, t01=0x00a2}
0x32c2…32d8 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/100 «, t00=0x0020, t01=0x00ca}
0x32d8…32f8 Head {h00=0x001c, h01=0x0050, text=» ORS A2,ECBRC,A9 USER RC«, t00=0x0020, t01=0x00e0}
0x32f8…330a Head {h00=0x000e, h01=0x0050, text=» RF DMTIOX«, t00=0x0020, t01=0x0100}
0x330a…331e Head {h00=0x0010, h01=0x0050, text=»DMTIT1 EQU *«, t00=0x0020, t01=0x0112}
0x331e…3336 Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBDBR,A6«, t00=0x0020, t01=0x0126}
0x3336…334c Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/C0FF«, t00=0x0020, t01=0x013e}
0x334c…3374 Head {h00=0x0024, h01=0x0050, text=» ST A2,FDBDBR,A6 RELEASE BUFFER «, t00=0x0020, t01=0x0154}
0x3374…338c Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBBA,A8 «, t00=0x0020, t01=0x017c}
0x338c…33b0 (33, 0, 400) Head {h00=0x0020, h01=0x0050, text=»* GET BUFFER ADDR«, t00=0x0021, t01=0x0004}
0x33b0…33c8 Head {h00=0x0014, h01=0x0050, text=» SUK A2,8 BUFSTA«, t00=0x0021, t01=0x0028}
0x33c8…33f8 Head {h00=0x002c, h01=0x0050, text=» CM BUFDMI,A2 CLEAR VOL IDENT IN BUFFER «, t00=0x0021, t01=0x0040}
0x33f8…341a Head {h00=0x001e, h01=0x0050, text=» LDK A1,/02 DISC IO ERROR «, t00=0x0021, t01=0x0070}
0x341a…3440 Head {h00=0x0022, h01=0x0050, text=» LDKL A2,/FF7E NOT BIT 8 OR 15«, t00=0x0021, t01=0x0092}
0x3440…3458 Head {h00=0x0014, h01=0x0050, text=» AN A2,ECBRC,A8 «, t00=0x0021, t01=0x00b8}
0x3458…3470 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) DMTIOX «, t00=0x0021, t01=0x00d0}
0x3470…3494 Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBRC,A8 BIT 8 OR 15 «, t00=0x0021, t01=0x00e8}
0x3494…34aa Head {h00=0x0012, h01=0x0050, text=»DMTIOX RTN A14«, t00=0x0021, t01=0x010c}
0x34aa…34b8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0122}
0x34b8…34c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0130}
0x34c2…3500 Head {h00=0x003a, h01=0x0050, text=»* DMTIOZ HAS ALMOST THE SAME FUNCTION AS DMTIOT BUT «, t00=0x0021, t01=0x013a}
0x3500…3524 Head {h00=0x0020, h01=0x0050, text=»* ECB ADDR IS INPUT PARAM «, t00=0x0021, t01=0x0178}
0x3524…352e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x000c}
0x352e…354a Head {h00=0x0018, h01=0x0050, text=»* IN: A1 = FDB ADDR«, t00=0x0022, t01=0x0016}
0x354a…3564 Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDR «, t00=0x0022, t01=0x0032}
0x3564…3574 Head {h00=0x000c, h01=0x0050, text=»* OUT:«, t00=0x0022, t01=0x004c}
0x3574…358e Head {h00=0x0016, h01=0x0050, text=»* A1 = RET CODE «, t00=0x0022, t01=0x005c}
0x358e…35a8 Head {h00=0x0016, h01=0x0050, text=»* A2 = DESTROYED«, t00=0x0022, t01=0x0076}
0x35a8…35c2 Head {h00=0x0016, h01=0x0050, text=»* A6 = FDB ADDR «, t00=0x0022, t01=0x0090}
0x35c2…35dc Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDR «, t00=0x0022, t01=0x00aa}
0x35dc…35f6 Head {h00=0x0016, h01=0x0050, text=»* A9 == USER ECB«, t00=0x0022, t01=0x00c4}
0x35f6…3600 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00de}
0x3600…3618 Head {h00=0x0014, h01=0x0050, text=»DMTIOZ LDR A6,A1«, t00=0x0022, t01=0x00e8}
0x3618…3636 Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER «, t00=0x0022, t01=0x0100}
0x3636…364a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/3F «, t00=0x0022, t01=0x011e}
0x364a…365e Head {h00=0x0010, h01=0x0050, text=» CWK A2,QIRN«, t00=0x0022, t01=0x0132}
0x365e…3686 Head {h00=0x0024, h01=0x0050, text=» RF(E) DMTIZ1 INDEXED READ NEXT «, t00=0x0022, t01=0x0146}
0x3686…369a Head {h00=0x0010, h01=0x0050, text=» CWK A2,QIRR«, t00=0x0022, t01=0x016e}
0x369a…36c4 Head {h00=0x0026, h01=0x0050, text=» RF(E) DMTIZ1 INDEXED RANDOM READ «, t00=0x0022, t01=0x0182}
0x36c4…36ea Head {h00=0x0022, h01=0x0050, text=» LD A1,FDBADF,A6 FDB DATA FILE«, t00=0x0023, t01=0x001c}
0x36ea…36fe Head {h00=0x0010, h01=0x0050, text=»DMTIZ1 EQU *«, t00=0x0023, t01=0x0042}
0x36fe…3720 Head {h00=0x001e, h01=0x0050, text=» LD A9,DWTECB,A1 USER ECB «, t00=0x0023, t01=0x0056}
0x3720…3732 Head {h00=0x000e, h01=0x0050, text=» RB DMTIT0«, t00=0x0023, t01=0x0078}
0x3732…3740 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x008a}
0x3740…377c Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x0023, t01=0x0098}
0x377c…3786 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00d4}
0x3786…37c2 Head {h00=0x0038, h01=0x0050, text=»* GTBKBU WILL GET A BLOCK BUFFER FOR DISC I/O AND «, t00=0x0023, t01=0x00de}
0x37c2…37f8 Head {h00=0x0032, h01=0x0050, text=»* PREPARE IT. ECB IS PREPARED FOR PHYS I/O. «, t00=0x0023, t01=0x011a}
0x37f8…3802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0150}
0x3802…383e Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x0023, t01=0x015a}
0x383e…3848 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0008}
0x3848…3864 Head {h00=0x0018, h01=0x0050, text=»* A1 = FDB ADDRESS«, t00=0x0024, t01=0x0012}
0x3864…3894 Head {h00=0x002c, h01=0x0050, text=»* FDB-CEX,ECB,SNR,RRO«, t00=0x0024, t01=0x002e}
0x3894…38d0 Head {h00=0x0038, h01=0x0050, text=»* ECB-FC,CW,BA,DWT-OR,ECB,EXTDMI «, t00=0x0024, t01=0x005e}
0x38d0…38ea Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDR «, t00=0x0024, t01=0x009a}
0x38ea…38f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b4}
0x38f4…3930 Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x0024, t01=0x00be}
0x3930…393a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00fa}
0x393a…3958 Head {h00=0x001a, h01=0x0050, text=»* A1 = A6 = FDB ADDR«, t00=0x0024, t01=0x0104}
0x3958…398c Head {h00=0x0030, h01=0x0050, text=»* A2 = FDBRRO WHEN SECTOR IS FOUND IN CORE«, t00=0x0024, t01=0x0122}
0x398c…39d2 Head {h00=0x0042, h01=0x0050, text=»* = -1 WHEN NO DATA IS FOUND IN «, t00=0x0024, t01=0x0156}
0x39d2…3a12 Head {h00=0x003c, h01=0x0050, text=»* THE FOUND CORE BUFFER «, t00=0x0025, t01=0x000c}
0x3a12…3a32 Head {h00=0x001c, h01=0x0050, text=»* A3 = BUFFER ADDRESS «, t00=0x0025, t01=0x004c}
0x3a32…3a4e Head {h00=0x0018, h01=0x0050, text=»* A5 = ORDE R CODE«, t00=0x0025, t01=0x006c}
0x3a4e…3a68 Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDR «, t00=0x0025, t01=0x0088}
0x3a68…3a84 Head {h00=0x0018, h01=0x0050, text=»* A9 = DM ECB ADDR«, t00=0x0025, t01=0x00a2}
0x3a84…3a8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00be}
0x3a8e…3aca Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x0025, t01=0x00c8}
0x3aca…3ad4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0104}
0x3ad4…3ae8 Head {h00=0x0010, h01=0x0050, text=»* A1 - A9 «, t00=0x0025, t01=0x010e}
0x3ae8…3af2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0122}
0x3af2…3b30 Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0025, t01=0x012c}
0x3b30…3b44 Head {h00=0x0010, h01=0x0050, text=»GTBKBU EQU *«, t00=0x0025, t01=0x016a}
0x3b44…3b68 Head {h00=0x0020, h01=0x0050, text=» LDR A6,A1 A6 = FDB ADDRESS «, t00=0x0025, t01=0x017e}
0x3b68…3b9e Head {h00=0x0032, h01=0x0050, text=» LD A4,FDBCEX,A6 CURRENT EXTENT BLOCK POINTER «, t00=0x0026, t01=0x0012}
0x3b9e…3bc2 Head {h00=0x0020, h01=0x0050, text=» LD A1,EXTDMI,A4 DMIDENT, FC«, t00=0x0026, t01=0x0048}
0x3bc2…3be8 Head {h00=0x0022, h01=0x0050, text=» LD A2,FDBSNR,A6 SECTOR NUMBER«, t00=0x0026, t01=0x006c}
0x3be8…3c08 Head {h00=0x001c, h01=0x0050, text=» LD A9,DWTECB,A6 DM ECB «, t00=0x0026, t01=0x0092}
0x3c08…3c38 Head {h00=0x002c, h01=0x0050, text=» SC A1,ECBFC,A8 FILE CODE OF DISC VOLUME«, t00=0x0026, t01=0x00b2}
0x3c38…3c50 Head {h00=0x0014, h01=0x0050, text=» LDR A4,A2 SAVE «, t00=0x0026, t01=0x00e2}
0x3c50…3c68 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,SECTLE «, t00=0x0026, t01=0x00fa}
0x3c68…3c8e Head {h00=0x0022, h01=0x0050, text=» ST A5,ECBRL,A8 SECTOR LENGTH «, t00=0x0026, t01=0x0112}
0x3c8e…3cba Head {h00=0x0028, h01=0x0050, text=» CF A14,DMTGBU A3 := BUFFER ADDRESS «, t00=0x0026, t01=0x0138}
0x3cba…3cee Head {h00=0x0030, h01=0x0050, text=» RF GTB100 RETURN IF SECTOR FOUND IN BUFFER «, t00=0x0026, t01=0x0164}
0x3cee…3d22 Head {h00=0x0030, h01=0x0050, text=»* RETURN IF SECTOR MUST BE READ FROM DISC «, t00=0x0027, t01=0x0008}
0x3d22…3d3e Head {h00=0x0018, h01=0x0050, text=» LDKL A2,-1 RET CODE«, t00=0x0027, t01=0x003c}
0x3d3e…3d52 Head {h00=0x0010, h01=0x0050, text=»GTB040 EQU *«, t00=0x0027, t01=0x0058}
0x3d52…3d74 Head {h00=0x001e, h01=0x0050, text=» ST A4,ECBCW,A8 SECTOR NR «, t00=0x0027, t01=0x006c}
0x3d74…3d86 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x0027, t01=0x008e}
0x3d86…3dbc Head {h00=0x0032, h01=0x0050, text=» ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS«, t00=0x0027, t01=0x00a0}
0x3dbc…3dd4 Head {h00=0x0014, h01=0x0050, text=» ST A5,ECBBA,A8 «, t00=0x0027, t01=0x00d6}
0x3dd4…3dec Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTOR,A6 «, t00=0x0027, t01=0x00ee}
0x3dec…3e00 Head {h00=0x0010, h01=0x0050, text=» ANK A5,/3F «, t00=0x0027, t01=0x0106}
0x3e00…3e2c Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 FDB ADDRESS AS PARAMETER «, t00=0x0027, t01=0x011a}
0x3e2c…3e3c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0027, t01=0x0146}
0x3e3c…3e50 Head {h00=0x0010, h01=0x0050, text=»GTB100 EQU *«, t00=0x0027, t01=0x0156}
0x3e50…3e7c Head {h00=0x0028, h01=0x0050, text=» LD A2,FDBRRO,A6 REC OFFS IN BUFFER «, t00=0x0027, t01=0x016a}
0x3e7c…3ea0 Head {h00=0x0020, h01=0x0050, text=» RB GTB040 STORE ORDER CODE «, t00=0x0028, t01=0x0008}
0x3ea0…3eae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x002c}
0x3eae…3eea Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x0028, t01=0x003a}
0x3eea…3ef4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0076}
0x3ef4…3f3c Head {h00=0x0044, h01=0x0050, text=»* GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO«, t00=0x0028, t01=0x0080}
0x3f3c…3f46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00c8}
0x3f46…3f82 Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x0028, t01=0x00d2}
0x3f82…3f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x010e}
0x3f8c…3fa8 Head {h00=0x0018, h01=0x0050, text=»* A1 = FDB ADDRESS«, t00=0x0028, t01=0x0118}
0x3fa8…3fd2 Head {h00=0x0026, h01=0x0050, text=»* FDBSNR,FDBRRO,FDBCEX «, t00=0x0028, t01=0x0134}
0x3fd2…3fdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x015e}
0x3fdc…4018 Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x0028, t01=0x0168}
0x4018…4022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0014}
0x4022…4044 Head {h00=0x001e, h01=0x0050, text=»* A1=A5=A6= FDB ADDRESS «, t00=0x0029, t01=0x001e}
0x4044…4066 Head {h00=0x001e, h01=0x0050, text=»* A2,A3 = LOG RECORD NO «, t00=0x0029, t01=0x0040}
0x4066…4070 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0062}
0x4070…40ac Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x0029, t01=0x006c}
0x40ac…40b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00a8}
0x40b6…40ca Head {h00=0x0010, h01=0x0050, text=»* A1 - A7 «, t00=0x0029, t01=0x00b2}
0x40ca…40d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c6}
0x40d4…4112 Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0029, t01=0x00d0}
0x4112…4120 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x010e}
0x4120…4134 Head {h00=0x0010, h01=0x0050, text=»GTLGRN EQU *«, t00=0x0029, t01=0x011c}
0x4134…4146 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x0029, t01=0x0130}
0x4146…415e Head {h00=0x0014, h01=0x0050, text=» LDKL A3,FDBEXT «, t00=0x0029, t01=0x0142}
0x415e…4176 Head {h00=0x0014, h01=0x0050, text=» ADKL A3,EXTLEN«, t00=0x0029, t01=0x015a}
0x4176…419e Head {h00=0x0024, h01=0x0050, text=» ADR A3,A1 ADDR FIRST EXT LENGTH«, t00=0x0029, t01=0x0172}
0x419e…41c0 Head {h00=0x001e, h01=0x0050, text=» LD A7,FDBCEX,A1 EXT ADDR «, t00=0x002a, t01=0x000a}
0x41c0…41ec Head {h00=0x0028, h01=0x0050, text=» ADKL A7,EXTLEN ADDR TO LAST LENGTH «, t00=0x002a, t01=0x002c}
0x41ec…4200 Head {h00=0x0010, h01=0x0050, text=»GTL050 EQU *«, t00=0x002a, t01=0x0058}
0x4200…4212 Head {h00=0x000e, h01=0x0050, text=» CWR A3,A7«, t00=0x002a, t01=0x006c}
0x4212…4244 Head {h00=0x002e, h01=0x0050, text=» RF(E) GTL100 ALL PREVIOUS EXTENTS COUNTED«, t00=0x002a, t01=0x007e}
0x4244…4270 Head {h00=0x0028, h01=0x0050, text=»* NOTE THAT ONLY (E) CAN BE TESTED«, t00=0x002a, t01=0x00b0}
0x4270…4298 Head {h00=0x0024, h01=0x0050, text=» ADR* A6,A3 NO OF SECT IN EXTENT«, t00=0x002a, t01=0x00dc}
0x4298…42c0 Head {h00=0x0024, h01=0x0050, text=» ADKL A3,EXTELE EXT ENTRY LENGTH«, t00=0x002a, t01=0x0104}
0x42c0…42de Head {h00=0x001a, h01=0x0050, text=» RB GTL050 NEXT EXTENT«, t00=0x002a, t01=0x012c}
0x42de…42f2 Head {h00=0x0010, h01=0x0050, text=»GTL100 EQU *«, t00=0x002a, t01=0x014a}
0x42f2…4314 Head {h00=0x001e, h01=0x0050, text=» LD A7,FDBCEX,A1 EXT ADDR «, t00=0x002a, t01=0x015e}
0x4314…4340 Head {h00=0x0028, h01=0x0050, text=» SU A6,EXTBAS,A7 TOTAL NO OF SECTORS«, t00=0x002a, t01=0x0180}
0x4340…436c Head {h00=0x0028, h01=0x0050, text=» AD A6,FDBSNR,A1 TOTAL NR OF SECTORS«, t00=0x002b, t01=0x001c}
0x436c…4376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0048}
0x4376…43a2 Head {h00=0x0028, h01=0x0050, text=»* CONVERT FDBRRO TO NO OF RECORDS «, t00=0x002b, t01=0x0052}
0x43a2…43ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x007e}
0x43ac…43be Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x002b, t01=0x0088}
0x43be…43e4 Head {h00=0x0022, h01=0x0050, text=» LC A7,FDBBLF,A1 BLOCK FACTOR «, t00=0x002b, t01=0x009a}
0x43e4…4404 Head {h00=0x001c, h01=0x0050, text=» LDR A5,A1 SAVE FDB ADDR«, t00=0x002b, t01=0x00c0}
0x4404…4426 Head {h00=0x001e, h01=0x0050, text=» CF A14,MPYMOD A1,A2=A6*A7«, t00=0x002b, t01=0x00e0}
0x4426…443e Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBRLE,A5«, t00=0x002b, t01=0x0102}
0x443e…445e Head {h00=0x001c, h01=0x0050, text=» ADK A4,1 RECORD LENGTH «, t00=0x002b, t01=0x011a}
0x445e…447e Head {h00=0x001c, h01=0x0050, text=» LDK A7,0 RECORD COUNTER«, t00=0x002b, t01=0x013a}
0x447e…44a8 Head {h00=0x0026, h01=0x0050, text=» LD A6,FDBRRO,A5 OFFSET IN SECTOR «, t00=0x002b, t01=0x015a}
0x44a8…44ba Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x002b, t01=0x0184}
0x44ba…44ce Head {h00=0x0010, h01=0x0050, text=»GTL150 EQU *«, t00=0x002c, t01=0x0008}
0x44ce…44ee Head {h00=0x001c, h01=0x0050, text=» ADK A7,1 RECORD COUNTER«, t00=0x002c, t01=0x001c}
0x44ee…4500 Head {h00=0x000e, h01=0x0050, text=» SUR A6,A4«, t00=0x002c, t01=0x003c}
0x4500…452e Head {h00=0x002a, h01=0x0050, text=» RB(NN) GTL150 COUNT RECORDS IN SECTOR«, t00=0x002c, t01=0x004e}
0x452e…4538 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x007c}
0x4538…4568 Head {h00=0x002c, h01=0x0050, text=»* ADD SECT*BLOCFACT AND RECINCURRSECT «, t00=0x002c, t01=0x0086}
0x4568…4572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00b6}
0x4572…4584 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A7«, t00=0x002c, t01=0x00c0}
0x4584…45a2 Head {h00=0x001a, h01=0x0050, text=» RF(O) GTL160 OVERFLOW«, t00=0x002c, t01=0x00d2}
0x45a2…45b4 Head {h00=0x000e, h01=0x0050, text=» RF GTL170«, t00=0x002c, t01=0x00f0}
0x45b4…45c8 Head {h00=0x0010, h01=0x0050, text=»GTL160 EQU *«, t00=0x002c, t01=0x0102}
0x45c8…45f2 Head {h00=0x0026, h01=0x0050, text=» ANKL A2,/7FFF DELETE OVERFLOWBIT «, t00=0x002c, t01=0x0116}
0x45f2…460e Head {h00=0x0018, h01=0x0050, text=» ADK A1,1 ADD CARRY «, t00=0x002c, t01=0x0140}
0x460e…4622 Head {h00=0x0010, h01=0x0050, text=»GTL170 EQU *«, t00=0x002c, t01=0x015c}
0x4622…4634 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x002c, t01=0x0170}
0x4634…4646 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x002c, t01=0x0182}
0x4646…4662 (45, 2, 82) Head {h00=0x0018, h01=0x0050, text=» LDR A1,A5 FDB ADDR «, t00=0x002d, t01=0x0004}
0x4662…4674 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A5«, t00=0x002d, t01=0x0020}
0x4674…4684 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x002d, t01=0x0032}
0x4684…4690 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002d, t01=0x0042}
0x4690…4694 Head {h00=0x4004, h01=0x0000}
0x4694…4698 00 2d 00 4e ┆ - N┆
0x4698…46a0 (46, 1, 8) 20 04 00 00 00 2e 00 04 ┆ . ┆
0x46a0…46f0 (47, 0, 400) 53 54 02 03 a2 4c 44 52 45 47 02 03 a2 53 41 56 45 38 05 05 dc 45 43 48 4f 44 59 80 02 42 02 04 c2 45 43 48 52 54 4e 20 07 04 00 00 00 00 03 02 00 00 00 8e 44 52 54 43 30 31 00 74 00 06 00 06 20 20 20 20 20 20 00 00 00 00 02 04 c2 44 49 53 ┆ST LDREG SAVE8 ECHODY B ECHRTN DRTC01 t DIS┆
0x46f0…4740 49 4f 45 bc 05 05 dc 54 43 44 52 4f 4e c1 00 a0 02 03 a2 53 41 56 45 38 02 04 c2 44 57 54 45 43 42 00 02 03 a2 44 57 54 53 54 02 04 c2 54 45 4e 44 49 4f ba 02 03 a2 54 44 49 53 50 05 04 9c 49 48 54 43 59 01 f6 02 04 c2 49 4e 54 53 41 56 00 ┆IOE TCDRON SAVE8 DWTECB DWTST TENDIO TDISP IHTCY INTSAV ┆
0x4740…4790 05 05 dc 44 57 54 43 30 32 83 03 2e 05 05 dc 44 57 54 43 30 31 80 03 2e 07 04 00 00 00 00 03 42 00 00 01 e8 44 52 52 54 30 31 00 7a 00 0c 00 0c 20 20 20 20 20 20 00 00 00 00 05 05 d4 4c 4f 43 48 41 4e 30 00 01 05 05 d4 52 45 43 48 41 4e 12 ┆ DWTC02 . DWTC01 . B DRRT01 z LOCHAN0 RECHAN ┆
0x4790…47e0 00 02 05 04 b4 52 45 4d 46 43 00 15 05 05 dc 43 57 54 4c 54 31 38 00 00 02 04 c2 49 4e 54 4c 54 31 00 05 05 dc 43 57 54 4c 54 32 00 00 1a 05 05 dc 43 57 54 52 54 31 32 00 1a 02 04 c2 49 4e 54 52 54 31 55 05 05 dc 43 57 54 52 54 32 e4 00 44 ┆ REMFC CWTLT18 INTLT1 CWTLT2 CWTRT12 INTRT1U CWTRT2 D┆
0x47e0…4830 05 05 dc 43 57 54 52 54 33 20 00 6e 02 04 c2 49 4e 54 52 54 32 00 05 05 dc 43 57 54 52 54 34 01 00 98 05 04 bc 43 48 54 41 42 00 c2 05 05 dc 44 57 52 45 4d 55 20 00 d0 02 04 c2 44 49 53 49 4f 45 00 02 03 a2 54 44 49 53 50 02 04 c2 44 49 53 ┆ CWTRT3 n INTRT2 CWTRT4 CHTAB DWREMU DISIOE TDISP DIS┆
0x4830…4880 (48, 0, 400) 45 4e 44 00 05 04 bc 43 48 4c 54 31 01 28 02 04 c2 49 4e 54 53 41 56 00 02 03 a2 53 41 56 45 38 05 04 bc 43 48 4c 54 32 01 34 05 04 bc 43 48 52 54 31 01 38 05 04 bc 43 48 52 54 32 01 44 02 03 a2 44 57 54 53 54 02 04 c2 44 57 54 41 44 52 00 ┆END CHLT1 ( INTSAV SAVE8 CHLT2 4 CHRT1 8 CHRT2 D DWTST DWTADR ┆
0x4880…48d0 02 04 c2 53 45 54 49 4d 50 57 02 03 a2 44 57 54 4f 52 02 04 c2 44 57 54 45 43 42 c0 02 04 c2 52 54 4e 41 31 35 00 05 05 dc 4f 55 54 50 55 54 20 04 e0 05 04 bc 53 54 52 45 47 04 f6 05 04 bc 4c 44 52 45 47 05 0e 05 05 dc 4c 44 52 45 47 46 00 ┆ SETIMPW DWTOR DWTECB RTNA15 OUTPUT STREG LDREG LDREGF ┆
0x48d0…4920 05 1c 05 05 dc 4c 44 52 45 47 45 44 05 20 05 05 dc 47 45 54 43 48 52 c5 05 34 05 05 dc 4f 55 54 4c 49 4e 20 05 52 02 04 c2 49 48 52 45 54 38 48 05 05 dc 43 48 4c 54 4f 4e 4b 06 28 05 05 dc 45 43 48 45 4e 44 50 0a 98 05 04 9c 45 43 48 4f 59 ┆ LDREGED GETCHR 4 OUTLIN R IHRET8H CHLTONK ( ECHENDP ECHOY┆
0x4920…4970 0a 9c 02 04 c2 44 57 54 57 41 54 0e 05 05 dc 45 43 48 52 54 4e 41 0a c8 02 04 c2 54 45 4e 44 49 4f 2c 07 04 00 00 00 00 0a d8 00 00 00 2c 49 4e 54 4c 54 31 00 86 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 49 4e 54 4c 54 31 cc 00 00 ┆ DWTWAT ECHRTNA TENDIO, ,INTLT1 INTLT1 ┆
0x4970…49c0 07 04 00 00 00 00 00 00 00 00 00 2c 49 4e 54 4c 54 32 00 87 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 49 4e 54 4c 54 32 cc 00 00 07 04 00 00 00 00 00 00 00 00 00 2c 49 4e 54 52 54 31 00 88 00 01 00 01 20 20 20 20 20 20 00 00 00 00 ┆ ,INTLT2 INTLT2 ,INTRT1 ┆
0x49c0…4a10 (49, 0, 400) 05 05 dc 49 4e 54 52 54 31 cc 00 00 07 04 00 00 00 00 00 00 00 00 00 2c 49 4e 54 52 54 32 00 89 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 49 4e 54 52 54 32 cc 00 00 07 04 00 00 00 00 00 00 00 00 00 38 42 4c 4f 4b 3a 53 00 8a 00 01 ┆ INTRT1 ,INTRT2 INTRT2 8BLOK:S ┆
0x4a10…4a60 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 42 4c 4f 4b 3a 53 cc 00 00 05 05 d4 42 4c 4f 43 4b 45 ff 00 78 07 04 00 00 00 00 00 78 00 00 00 2a 43 54 41 42 58 20 00 8b 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 04 bc 43 54 41 42 58 00 00 ┆ BLOK:S BLOCKE x x *CTABX CTABX ┆
0x4a60…4ab0 07 04 00 00 00 00 00 10 00 00 00 2c 44 43 54 42 55 46 00 8c 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 44 43 54 42 55 46 cc 00 00 07 04 00 00 00 00 01 16 00 00 00 2c 44 43 52 42 55 46 00 8d 00 01 00 01 20 20 20 20 20 20 00 00 00 00 ┆ ,DCTBUF DCTBUF ,DCRBUF ┆
0x4ab0…4b00 05 05 dc 44 43 52 42 55 46 cc 00 00 07 04 00 00 00 00 02 1e 00 00 00 2c 54 43 4c 41 53 53 00 8e 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 54 43 4c 41 53 53 cc 00 00 07 04 00 00 00 00 00 02 00 00 00 2c 45 43 4c 41 53 53 00 8f 00 01 ┆ DCRBUF ,TCLASS TCLASS ,ECLASS ┆
0x4b00…4b50 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 45 43 4c 41 53 53 cc 00 00 07 04 00 00 00 00 00 02 00 00 00 2c 53 43 4c 41 53 53 00 90 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 53 43 4c 41 53 53 cc 00 00 07 04 00 00 00 00 00 02 00 00 ┆ ECLASS ,SCLASS SCLASS ┆
0x4b50…4ba0 (50, 0, 400) 01 80 49 4e 49 4d 4f 4d 00 91 00 04 00 04 20 20 20 20 20 20 00 00 00 00 05 05 dc 49 4e 49 4d 4f 4e cc 00 00 02 03 a2 54 43 54 41 42 02 04 c2 54 54 42 3a 53 54 00 02 04 c2 54 54 42 3a 50 50 d3 02 04 c2 54 54 42 3a 53 41 00 02 04 c2 54 54 42 ┆ INIMOM INIMON TCTAB TTB:ST TTB:PP TTB:SA TTB┆
0x4ba0…4bf0 3a 53 50 c1 02 04 c2 54 54 42 3a 53 53 83 02 04 c2 54 54 42 3a 54 44 44 02 03 a2 43 44 54 41 42 02 03 a2 49 54 41 44 49 02 04 c2 44 57 54 41 44 52 00 02 03 a2 49 54 41 44 4f 02 03 a2 44 57 54 53 54 02 04 c2 44 57 54 45 43 42 c5 02 03 a2 44 ┆:SP TTB:SS TTB:TDD CDTAB ITADI DWTADR ITADO DWTST DWTECB D┆
0x4bf0…4c40 57 54 54 51 02 04 c2 54 49 4d 51 55 45 20 02 04 c2 42 4c 4f 43 4b 4c 30 02 04 c2 42 4c 4f 43 4b 53 46 02 04 c2 46 52 45 51 55 45 1e 02 03 a2 47 42 51 55 45 02 04 c2 41 54 54 3a 43 48 32 02 04 c2 4c 44 50 45 4e 44 4e 02 04 c2 4c 52 55 51 55 ┆WTTQ TIMQUE BLOCKL0 BLOCKSF FREQUE GBQUE ATT:CH2 LDPENDN LRUQU┆
0x4c40…4c90 45 24 02 04 c2 43 56 54 4c 53 42 30 02 04 c2 4e 55 4d 50 41 52 00 02 04 c2 43 56 54 53 42 41 06 02 04 c2 46 52 45 50 41 52 d5 02 04 c2 50 41 52 4c 45 4e 4e 02 04 c2 43 56 54 53 54 42 01 02 03 82 4c 4f 4f 50 4e 02 04 c2 54 54 42 3a 49 44 c1 ┆E$ CVTLSB0 NUMPAR CVTSBA FREPAR PARLENN CVTSTB LOOPN TTB:ID ┆
0x4c90…4ce0 02 03 82 50 52 55 4e 4e 02 03 82 53 52 55 4e 4e 02 04 c2 44 49 53 51 55 45 57 02 04 c2 49 4e 49 46 4c 47 53 02 04 c2 50 46 49 4e 49 54 00 02 04 c2 43 56 54 41 50 53 ec 07 04 00 00 00 00 01 56 00 00 00 9e 49 4e 50 52 45 4f 00 95 00 03 00 03 ┆ PRUNN SRUNN DISQUEW INIFLGS PFINIT CVTAPS V INPREO ┆
0x4ce0…4d30 (51, 0, 400) 20 20 20 20 20 20 00 00 00 00 05 05 dc 49 48 49 4e 50 54 cc 00 00 02 03 82 50 52 55 4e 20 02 03 82 53 52 55 4e 4e 02 04 c2 43 56 54 49 4e 50 ff 02 04 c2 43 56 54 4c 53 42 4b 02 04 c2 54 54 42 3a 53 41 00 02 04 c2 54 54 42 3a 53 50 20 02 04 ┆ IHINPT PRUN SRUNN CVTINP CVTLSBK TTB:SA TTB:SP ┆
0x4d30…4d80 c2 54 54 42 3a 53 53 00 02 04 c2 55 50 44 4c 52 49 c1 02 04 c2 52 45 54 55 52 38 d3 02 04 c2 43 56 54 41 50 41 d3 02 04 c2 4c 4b 4d 44 49 53 90 02 03 a2 4c 44 31 35 30 07 04 00 00 00 00 01 4c 00 00 00 94 4c 4f 41 44 45 52 00 98 00 02 00 02 ┆ TTB:SS UPDLRI RETUR8 CVTAPA LKMDIS LD150 L LOADER ┆
0x4d80…4dd0 20 20 20 20 20 20 00 00 00 00 05 05 dc 4c 4f 41 44 45 52 cc 00 00 02 04 c2 54 54 42 3a 53 50 11 02 04 c2 54 54 42 3a 53 53 20 02 04 c2 54 54 42 3a 53 41 00 02 03 a2 51 54 4a 4f 42 05 04 bc 4c 44 31 35 30 00 50 02 04 c2 47 45 54 42 4c 4b 83 ┆ LOADER TTB:SP TTB:SS TTB:SA QTJOB LD150 P GETBLK ┆
0x4dd0…4e20 02 04 c2 4c 44 54 41 53 4b c1 02 04 c2 54 54 41 42 4c 44 11 02 03 a2 41 43 54 4f 54 02 03 a2 54 44 49 53 50 02 04 c2 4c 4b 4d 52 51 45 4b 07 04 00 00 00 00 00 6c 00 00 00 98 4c 44 54 41 53 4b 00 9a 00 04 00 04 20 20 20 20 20 20 00 00 00 00 ┆ LDTASK TTABLD ACTOT TDISP LKMRQEK l LDTASK ┆
0x4e20…4e70 05 05 dc 45 43 42 52 45 44 ff 00 00 05 05 dc 4c 44 54 41 53 4b cc 00 0e 02 03 a2 43 56 54 44 4b 02 04 c2 46 52 45 42 4c 4b c1 02 04 c2 46 52 45 50 41 52 c1 02 04 c2 4c 52 55 51 55 45 d9 02 04 c2 4c 44 50 45 4e 44 56 02 04 c2 54 54 42 3a 53 ┆ ECBRED LDTASK CVTDK FREBLK FREPAR LRUQUE LDPENDV TTB:S┆
0x4e70…4ec0 (52, 0, 400) 41 44 02 04 c2 54 54 42 3a 53 53 00 02 04 c2 54 54 42 3a 53 50 00 02 03 a2 51 54 4a 4f 42 02 04 c2 43 56 54 49 4e 50 20 07 04 00 00 00 00 01 d6 00 00 00 34 49 4e 49 4d 4f 44 00 9e 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 d4 49 4e 49 ┆AD TTB:SS TTB:SP QTJOB CVTINP 4INIMOD INI┆
0x4ec0…4f10 4d 4f 4e cc 00 00 05 03 74 42 55 47 00 00 07 04 00 00 00 00 00 00 00 00 00 80 54 54 4d 4a 4f 42 00 9f 00 02 00 02 20 20 20 20 20 20 00 00 00 00 05 05 dc 54 54 4d 4a 4f 42 cc 00 00 05 05 d4 54 54 42 3a 53 54 ff 00 02 05 05 d4 54 54 42 3a 49 ┆MON tBUG TTMJOB TTMJOB TTB:ST TTB:I┆
0x4f10…4f60 44 c1 00 04 05 05 d4 54 54 42 3a 50 50 4b 00 06 05 05 d4 54 54 42 3a 53 53 4b 00 08 05 05 d4 54 54 42 3a 53 50 d3 00 0a 05 05 d4 54 54 42 3a 53 41 c1 00 0c 05 05 d4 54 54 42 3a 54 44 4b 00 2a 07 04 00 00 00 00 00 2c 00 00 00 56 43 44 3a 54 ┆D TTB:PPK TTB:SSK TTB:SP TTB:SA TTB:TDK * , VCD:T┆
0x4f60…4fb0 41 42 00 a1 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 43 44 3a 54 41 42 cc 00 00 02 04 c2 44 57 44 55 30 31 c1 02 04 c2 44 57 44 55 30 32 4b 02 04 c2 44 57 46 44 30 31 d3 05 05 dc 43 44 54 41 42 46 ff 00 22 07 04 00 00 00 00 00 22 ┆AB CD:TAB DWDU01 DWDU02K DWFD01 CDTABF " "┆
0x4fb0…5000 00 00 00 2a 54 54 41 42 58 20 00 a2 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 04 bc 54 54 41 42 58 00 00 07 04 00 00 00 00 00 2c 00 00 00 a8 4c 4b 4d 41 4c 20 00 a3 00 02 00 02 20 20 20 20 20 20 00 00 00 00 05 04 bc 4c 4b 4d 41 4c 00 00 ┆ *TTABX TTABX , LKMAL LKMAL ┆