|
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: 30318 (0x766e)
Notes: pts_type(SC)
Names: »DMOPCL.SC«
└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
└─⟦this⟧ »TOSSWORK/DMOPCL.SC«
IDENT DMOPCL REL 10.0 80-03-14 870105041000 =3 ,RECORD LGTH 256 79-11-28 =2, COMMIT CHECK 79-11-22 =1 ,CONCURRENT OPEN 79-11-02 **************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DMOPCL HANDLES OPEN CLOSE AND READ FILE PARAMETERS * IT IS ACTIVATED FROM DMTASK * * * * * **************************************************** * EJECT * *************** * ENTRIES * *************** * * ENTRY DMOPEN,DMCLOS,DMRFP EJECT * ***************** * EXTERNALS * ***************** * EXTRN CLRBUF,CRNCDF,CRNCIF,CRNGET,CRNQUE EXTRN ECBRC EXTRN FDBADF,FDBBLF,FDBCRL,FDBECB,FDBKA,FDBLRN EXTRN FDBMEC,FDBMIA,FDBNIF,FDBRLE,FDBSTA EXTRN FDBTNR EXTRN FNDFDB,DMTWM EXTRN FWTFNR,FWTPAR,FWTVOL EXTRN MOV:SU,MOV:US EXTRN MPYMOD,MXIND,TENDIO,TTB:MT EXTRN DIVMOD EXTRN FDBDBR,FDBMRO,FDBDMI,FDBBLZ EXTRN ECBFC EXTRN ECBBA EXTRN ECBEL EXTRN ECBRL EXTRN DWTECB EXTRN DWTOR EXTRN DWTTAB,DWTOPT,BLKMXL EXTRN FPB:RL,FPB:BF,FPB:FO,FPB:BO,FPB:FN,FPB:EL EXTRN FPB:V1,FPB:S1,FPB:V2,FPB:S2,FPB:V3,FPB:S3,FPB:V4,FPB:S4 EXTRN FPB:FR,FPB:US,FPB:SH,FPB:MN,FPB:SN,FPB:IF,FPB:KA EXTRN QOPEN,QRFP EXTRN PRUN EXTRN CRNSTA,DFTAB,DMTIDP EXTRN MONMMU,DMTERX,QCL EXTRN DMTRBU,DMTBM EXTRN DMTIOT EXTRN EARELB EXTRN TASHLT EXTRN FDBEAL EXTRN RECBFZ,REQERR EXTRN DMTBMR EJECT DMTASK * CONDITIONAL ASSEMBLY ************************** * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * * * * A PROGRAM VERSION FOR INDEXED ACCESS HANDLING * IS OBTAINED BY SETTING INDXAC = 1 X:B EQU 0 INDXAC EQU X:B * * EJECT FPBSTA EQU 0 START ADDR FPB FPB:IV EQU FPBSTA+58 VOL NAME INDEX FPB:IS EQU FPBSTA+64 INDEX SIZE FPB:NI EQU FPBSTA+68 NR OF INDEX FPB:I1 EQU FPBSTA+70 INDEX ID 1 FPB:K1 EQU FPBSTA+77 NR OF KEY ITEMS FPB:A1 EQU FPBSTA+78 KEY ADDR 1 FPB:L1 EQU FPBSTA+80 KEY LENGTH 1 FPB:I2 EQU FPBSTA+82 FPB:L4 EQU FPBSTA+116 * FPB:FM EQU FPBSTA+6 TOSS FILE NR * FPBSIZ EQU 60 SIZE OF FPB AREA IN WORDS * FPBRES EQU 8 RESERVED FIELD LENGTH IN FILE PAR BLOCK * NOCORE EQU 1 NO CORE ERROR CODE * ERPAR EQU 4 WRONG PAR ERR CODE * OFLW EQU 3 OVERFLOW ERR CODE * ERKEYL EQU 8 LONG KEY ERR CODE EJECT ************************ * DATA DEFINITIONS * ************************ * HERE FOLLOWS NON-REENTRANT AREAS USED BY ORDERS : * OPEN,CLOSE,READ FILE PARAMETERS. * OPESPA DATA ' ' 2 SPACES OPEFN EQU * FILE NAME PREFIXES DATA ' ' DATA 'I1M1' DATA 'I2M2' DATA 'I3M3' DATA 'I4M4' OPEFNR EQU * OPENED FILE NRS DATA 0,0,0 OPEFCD EQU * OPENED FILE CODES DATA 0,0,0 OPEFWT EQU * FWT ADDRESSES DATA 0,0,0,0,0 OPEMXI EQU * MASTER INDEX ADDRESSES DATA 0,0,0,0,0 OPELRN DATA 0,0,0,0,0,0,0,0,0,0 LAST REC NRS OPEKAD DATA 0,0,0,0,0 KEY ADDRESSES OPEKYL DATA 0,0,0,0,0 KEY LENGTH DELAY DATA 0 NROFIX DATA 0 NR OF INDEX FILES INDVOL RES 3 VOLUME NAME INDEX FILES OPEFPB RES FPBSIZ FILE ADM PARAM. BLOCK OPEEND EQU *-OPEFNR NR OF BYTES EJECT DMRFP EQU * READ FILE PARAMETERS * * A1 = A6 * A6 = FDB ADDRESS ALL ORDERS * A7 = ORDER CODE ALL ORDERS * LDR A10,A6 FBD ADDR LC A6,FDBNIF,A10 NR OF INDEX ANK A6,/FF ST A6,NROFIX * STORE FILE NRS IN OPEFNR * LDK A5,10 2 * INDEXES RFP100 EQU * SUK A5,2 RF(N) OPE099 ALL FILES LDR A4,A10 ADR A4,A5 LD A3,FDBADF,A4 FDB ADDR RF(Z) RFP130 NO FILE LC A6,FWTFNR,A3 FILE NR RFP130 EQU * LDR A4,A5 SRL A4,1 SC A6,OPEFNR,A4 SAVE FILE NR RB RFP100 NEXT FILE EJECT * A1 = A6 * A6 = FDB ADDRESS ALL ORDERS * A7 = ORDER CODE ALL ORDERS * DMOPEN EQU * OPEN * * A8 = ECB ADDR * A9 = FPB ADDR * A10= SYSTEM FWT ADDR * A11= CURRENT FWT ADDR * A12= LOOP COUNTER (FILE INDEX) * LDKL A9,OPEFPB AS ABOVE * CHECK OPTIONS * LDR A10,A6 SYSTEM FWT ADDR LDR A11,A10 LC A2,DWTOPT,A10 OPTION LDR A3,A2 ANK A2,/FC SUK A2,/8 RF(NZ) OPE020 NOT INPUT ANK A3,/3 RF(NZ) OPEERR ONLY UNPROT RF OPE030 OPE020 EQU * SUK A2,/30 RF(NZ) OPEERR NOT INP/OUTP ANK A3,/3 RF(Z) OPEERR UNPROT NOT ALLOWED SUK A3,3 RF(Z) OPEERR NOT BOTH OPE030 EQU * EJECT * A12 = LOOP COUNTER FILES * * 1 = DATA FILE * 2 = INDEX 1 * 3 = MASTER INDEX 1 * 4 = INDEX 2 * ETC * * CLEAR WORK AREA * LDK A2,OPEEND NR OF BYTE TO CLEAR OPE050 EQU * SUK A2,2 RF(N) OPE060 NO MORE WORDS CM OPEFNR,A2 RB OPE050 NEXT WORD OPE060 EQU * * * MOVE IN PARAMETER BLOCK * LD A3,DWTECB,A10 USER ECB ADDR LD A1,ECBBA,A3 FD ADDR USER ADK A1,FPBRES RESERVED FIELDS LDR A2,A9 FPB ADDR LDK A3,FPB:L4+1 MAX SIGN LENGTH IFT MMUPAG=1 LD A4,DWTTAB,A10 USER TTAB ADDR CF A14,MOV:US XIF IFT MMUPAG=0 LDR A2,A3 LDR A3,A9 TO ADDR CF A14,DMTBM XIF IFT INDXAC=1 * * SAVE VOLUME NAME INDEX FILES * LDR A1,A9 FPB ADDR ADKL A1,FPB:IV FROM ADDR LDKL A3,INDVOL TO ADDR LDK A2,6 CF A14,DMTBM XIF LC A5,FPB:BO,A9 TOSS OPTIONS ANK A5,2 SLL A5,14 ST A5,DELAY IFT INDXAC=1 LC A5,FPB:FO,A9 ANK A5,/FF RF(Z) OPE099 STANDARD FILE LD A5,DWTECB,A10 USER ECB ADDR LD A5,ECBRL,A5 REQ LGTH CWK A5,FPB:NI+FPBRES RF(NG) OPEERR NO INDEX LC A5,FPB:NI,A9 NR OF INDEXES SC A5,NROFIX+1 EJECT * * SAVE BASE ADDRESSES FOR INDEXES * LDK A2,FPB:A1 ADR A2,A9 ADDR FIRST KEY ADDR ANK A5,/F LDK A3,2 OFFSET INDEX 1 OPE070 EQU * SUK A5,1 RF(N) OPE099 ALL INDEXES LDK A1,0 LC A1,-1,A2 NR OF KEY ITEMS SUK A1,1 RF(NZ) OPEER4 ERR LC A1,2,A2 KEY LENGTH ST A1,OPEKYL,A3 LDR* A1,A2 KEY OFFSET ST A1,OPEKAD,A3 ADK A2,FPB:I2-FPB:I1 ADK A3,2 RB OPE070 XIF EJECT OPE099 LDKL A12,1 DATA FILE INDEX OPE100 EQU * FILE LOOP * * OPEN FM FILE * LDKL A9,OPEFPB FPB ADDR LDR A8,A10 ADKL A8,FDBECB ECB ADDR ST A9,ECBBA,A8 FPB ADDR LC A5,FPB:BO,A9 ANK A5,1 SC A5,FPB:BO,A9 ONLY BASIC ALLOWED LDK A5,0 SC A5,FPB:SH,A9 NOT EXCLUSIVE CWK A10,FDBSTA RF(NE) OPE110 READ FILE PAR ORDER LDK A7,/A1 OPEN LKM DATA 15 LDR A1,A10 MAIN FDB CF A14,DMTIOT ERR CHECK LDR A1,A1 RF(NZ) OPEER0 ERR EJECT * * STORE FILE NR * LDR A1,A12 LOOP INDEX SRL A1,1 LDR* A6,A8 SC A6,OPEFNR,A1 OPENED FILE NRS OPE110 EQU * * * GET FWT ADDR IN A11 * ANK A6,/FF LDKL A11,FDBSTA SYST FDB ADDR LDR A3,A6 FILE NR OPE150 EQU * RF(Z) OPE190 END COUNT LDR* A11,A11 NEXT FDB ANKL A11,/FFFE USE BIT SUK A3,1 RB OPE150 EJECT OPEERR LDKL A1,REQERR GENERAL ERR CODE RF OPEER2 OPEER0 EQU * LDR A5,A1 RET CODE ECR A6,A5 ANK A6,/F BIT 4-7 IN RC RF(Z) OPEERA NO SPECIAL CODE ANK A6,/A GET BIT 4 AND 6 FROM RC ADK A6,1 B4=9,B5=1,B6=3 OPEERS EQU * LDR A1,A10 SYST FDB CF A14,CRNGET GET CURRENCY BUFFER SC A6,CRNSTA,A2 STAT CODE ANKL A5,/F1EF NOT BIT 4,5,6,11 ORK A5,/80 INF AVAIL OPEERA LDR A1,A5 RET CODE OPEER2 EQU * LD A9,DWTECB,A10 USER ECB ADDR ORS A1,ECBRC,A9 SEND CODE ABL OPEER1 OPEER3 LDK A6,OFLW OVERFLOW RF OPEERQ OPEER4 LDK A6,ERPAR WRONG PARAMETER OPEERQ LDKL A5,REQERR BIT 0 RB OPEERS OPEER8 LDK A6,ERKEYL LONG KEY RB OPEERQ EJECT OPE190 EQU * FWT ADDR IN A11 * * READ FILE PARAMETERS * STR A6,A8 FILE NR LDK A7,/83 RFP LKM DATA 15 LDR A1,A10 MAIN FDB CF A14,DMTIOT ERR CHECK ORS A1,ECBRC,A9 RET CODE LDKL A9,OPEFPB FPB ADDR CWK A12,1 RF(NE) OPE192 INDEX FILE LD A7,NROFIX NR OF INDEXES CWK A7,4 RB(G) OPEERR TOO MANY INDEXES SLL A7,1 ADK A7,2 LDR A12,A7 NEW LOOPER SUR A13,A13 REL ADDR IN TABLES OF OPEN RF OPE191 OPE192 EQU * LDR A7,A12 ANK A7,/FE REL ADDR LDR A13,A7 OPE191 EQU * CWK A10,FDBSTA ABL(NE) OPE300 READ FILE PAR ORDER LDR A1,A1 RB(NZ) OPEER2 EJECT * * CHECK OPENED FILE * LDK A3,/53 'S' CC A3,FPB:FO,A9 RB(NE) OPEERR NOT STD FILE LC A3,FPB:US,A9 NR OF USERS SUK A3,1 RF(Z) OPE195 FIRST OPEN LC A3,DWTOPT,A10 OPTION LDR A2,A3 ANK A3,/02 EXCL RB(NZ) OPEERR EXCLUSIVE WANTED IN VAIN ANK A2,/3 WANTED MODE LC A3,FDBDBR,A11 ANK A3,/3 OLD MODE CWR A2,A3 RB(NE) OPEERR ALL OPEN SAME ! LC A3,FDBNIF,A11 NR OF INDEX BEFORE FOR THIS FILE CW A3,NROFIX NR OF INDEXES RB(NE) OPEER4 ALW SAME INDEXES LD A2,DELAY RF(N) OPE193 2ND DELAY WANTED IN VAIN LDKL A2,/7FFF ANS A2,FDBDBR,A11 NO DELAY OPE193 EQU * ABL OPE300 EJECT OPE195 EQU * * * CLEAR FDB * LDKL A2,FDBMEC SUKL A2,FDBECB LENGTH OPE196 EQU * SUK A2,2 RF(N) OPE200 OK LDR A7,A11 ADR A7,A2 CM FDBECB,A7 RB OPE196 OPE200 EQU * LD A2,DELAY ST A2,FDBDBR,A11 SET DELAY FOR NEW FILE EJECT * * BUILD FWT FDB PART * OPE250 EQU * LD A3,FPB:RL,A9 ST A3,FDBRLE,A11 RECORD LENGTH LC A3,FPB:BF,A9 SC A3,FDBBLF,A11 BLOCK FACTOR LD A3,NROFIX NR OF INDEXES SC A3,FDBNIF,A11 NR OF INDEX FILES LC A3,FPB:FR+1,A9 SC A3,FDBLRN,A11 LD A3,FPB:FR+2,A9 ST A3,FDBLRN+1,A11 LAST REC NR LD A3,OPEMXI,A13 ST A3,FDBMIA,A11 MASTER INDEX ADDR RF(Z) OPE255 NO MASTER INDEX LD A3,FPB:KA,A9 CW A3,OPEKAD,A13 RB(NE) OPEER4 WRONG KEY ST A3,FDBKA,A11 KEY ADDR OPE255 EQU * LC A3,FPB:BO,A9 SLL A3,6 TOSS OPTIONS DELAY AND BASIC LC A4,DWTOPT,A10 ANK A4,/3 OPTIONS ORR A3,A4 ANK A4,1 =2 RF(Z) OPE257 NOT PROTECT =2 IM FDBBLZ,A11 COMMIT FLAG =2 OPE257 EQU * =2 SLL A3,8 ORS A3,FDBDBR,A11 BASIC + OPTION * CALCULATE DMTASK ID * LC A3,FWTVOL,A11 FIRST EXTENT VOLUME FC LDK A6,0 OPE260 CC A3,DFTAB,A6 RF(E) OPE270 THIS DISC ADK A6,1 RB OPE260 SEARCH NEXT DISC CODE OPE270 LC A3,DMTIDP,A6 REL DMTASK ID SC A3,FDBDMI,A11 MAIN DMTASK ID * * CALCULATE MAX FDBRRO * LD A6,FDBRLE,A11 REC LENGTH ADK A6,1 LDK A7,0 LC A7,FDBBLF,A11 BLOCK FACT SUK A7,1 CF A14,MPYMOD A1,A2=A6*A7 ST A2,FDBMRO,A11 MAX FDBRRO * CALCULATE BLOCK SIZE * AD A2,FDBRLE,A11 BLOCK LGTH ADK A2,1 STATUS =3 LDR A1,A2 RESULT SRL A2,8 SECTOR NR ANK A1,/FF RF(Z) OPE290 NO SPILL ADK A2,1 OPE290 EQU * SC A2,FDBBLZ,A11 BLOCK SIZE SLL A2,7 WORDS CWK A2,BLKMXL ABL(G) OPEER4 TOO LARGE BLOCK SIZE ST A11,FDBADF,A11 OPE300 EQU * ST A11,OPEFWT,A13 SAVE FWT ADDR LDR A13,A13 ABL(Z) OPE800 DATA FILE IFT INDXAC=1 LDR A3,A12 ANK A3,/1 ABL(Z) OPE600 INDEX FILE EJECT OPE400 EQU * MASTER INDEX BRANCH CWK A10,FDBSTA ABL(NE) OPE700 ORDER READ FILE PAR LDR A8,A10 ADKL A8,FDBECB ECB ADDR LD* A3,DWTECB,A10 FILE CODE ANK A3,/FF ST A3,-36,A14 FC ENTRY IN TTAB DMTASK ST A11,-34,A14 STR A3,A8 LDK A2,0 SC A2,FDBDBR,A11 NO SPECIAL FUNCTIONS ALLOWED SC A2,FDBBLZ+1,A11 NO COMMIT CHECK =2 LDK A2,1 SC A2,FDBDMI,A11 LET DMTASK 1 READ MASTER INDEX * * CALC NO OF WORDS NEEDED IN MASTRE INDEX * LD A6,FPB:RL,A9 REC LGTH LDR A1,A6 SUK A1,3 KEY LENGTH CW A1,OPEKYL,A13 REQUESTED ABL(NE) OPEER4 ERR LD A7,FPB:FR+2,A9 NO OF RECS CF A14,MPYMOD A1,A2=NO OF BYTES NEEDED SRC A1,1 ORR A2,A1 GET MOST SIGN BIT ADK A2,5 SRL A2,1 NO OF WORDS NEEDED RF(Z) DMT570 WRONG SIZE LD A4,MXIND LENGTH MXIND SUK A4,4 MAX A5 VALUE LDKL A5,-2 OFFSET DMT540 EQU * ADK A5,4 GET ENTRY CWR A5,A4 RF(G) DMT570 NO ENTRY FOUND LD A3,MXIND,A5 RB(Z) DMT540 ZERO ENTRY LD A6,MXIND+2,A5 RB(N) DMT540 ENTRY USED SUR A6,A2 NO OF SPARE WORDS RB(N) DMT540 LARGER ENTRY NEEDED * * SUFFICIENT SPACE FOUND * LDKL A1,/8000 USED BIT ORS A1,MXIND+2,A5 MARK ENTRY USED LDR A7,A12 ANK A7,/0E ST A3,OPEMXI,A7 MASTER INDEX ADDR LD A7,FPB:FR+2,A9 STR A7,A3 NO OF ENTRIES LD A1,FPB:RL,A9 ST A1,2,A3 ENTRY LENGTH ADK A3,4 SKIP MX HEADRER ST A3,ECBBA,A8 BUFFER ADDR ST A1,ECBRL,A8 REQ LGTH LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION CWR A1,A4 MXIND ENTRY RF(NL) DMT590 LAST ENTRY LD A3,MXIND+6,A1 RF(N) DMT590 NEXT ENTRY USED * * MOVE SPARE WORDS TO NEXT ENTRY * LD A2,MXIND+2,A1 ANKL A2,/7FFF REMOVE USE BIT SUR A2,A6 ORKL A2,/8000 USE BIT ST A2,MXIND+2,A1 ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER LD A7,MXIND,A1 PREVIOUS POINTER SLL A2,1 NO OF BYTES ADR A7,A2 ST A7,MXIND+4,A1 EJECT DMT590 EQU * * * NOW READ MASTER INDEX WITH SEQUENTIAL READ * LDKL A7,/0082 SEQ READ LKM DATA 1 LD A2,ECBRC,A8 ANKL A2,/FEFF BIT 7 ONLY RETRIES RF(Z) DMT560 NO ERROR * * REMOVE THE ONLY CRN BUFFER * LDR A4,A11 FDB ADDR LD A5,FDBCRL,A4 CRN BUF ADR RF(Z) DMT553 NO CRN CM FDBCRL,A4 INH LD A6,CRNQUE STR A6,A5 ST A5,CRNQUE ENB DMT553 EQU * LDR A1,A2 ANKL A2,/1000 BIT 3 = EOF RF(NZ) DMT595 READY ,WHOLIE MXINDEX IS READ ABL OPEER2 ERR DMT560 EQU * * * RECORD READ,READ NEXRT * LD A2,ECBRL,A8 ADS A2,ECBBA,A8 REC LENGTH RB DMT590 READ NEXT RECORD DMT570 EQU * LDK A6,NOCORE CORE EXHAUSTED ABL OPEERQ * CLOSE MASTER INDEX FILE * DMT595 EQU * ST A10,-34,A14 CLOSE FC ENTRY LDR A8,A10 FWT ADDR ADKL A8,FDBECB ECB ADDR CM FPB:FR+2,A9 DO NOT WRITE LRN LDR A7,A12 LOOP COUNT SRL A7,1 LC A7,OPEFNR,A7 FILE NR SC A7,ECBFC,A8 ST A9,ECBBA,A8 PAR BLOCK ADDR LDK A7,/A2 CLOSE CF A14,CLRBUF RELEASE ALL FREE BUFFERS LKM DATA 15 LDR A1,A10 MAIN FDB CF A14,DMTIOT ERR CHECK LDR A1,A1 ABL(NZ) OPEER2 LDKL A9,OPEFPB FPB ADDR RF OPE700 NEXT FILE EJECT OPE600 EQU * INDEX FILE * * UPDATE PAR BLOCK * LD A3,OPEFWT DATA FILE FDB ADDR LC A2,FDBNIF,A3 CM FPB:NI,A9 FILLER SC A2,FPB:NI,A9 NR OF INDEX LDR A3,A12 SRL A3,1 LDR A2,A3 LDR A4,A9 LDKL A5,FPB:I2 SUKL A5,FPB:I1 OFFSET SUR A4,A5 OPE630 EQU * ADR A4,A5 REL ADDR SUK A2,1 NEXT INDEX RB(NZ) OPE630 ECR A3,A3 ADK A3,1 TYPE DUPL ST A3,FPB:I1,A4 ID AND TYPE CM FPB:I1+2,A4 CM FPB:I1+4,A4 LDK A7,1 ST A7,FPB:I1+6,A4 NR OF ITEMS LD A7,FDBKA,A11 KEY OFFSET ST A7,FPB:A1,A4 KEY ADDR LD A7,FDBRLE,A11 REC LGTH SUK A7,6 CM FPB:L1,A4 FILLER SC A7,FPB:L1,A4 KEY LENGTH ADK A7,8 SRL A7,1 WORD CWK A7,RECBFZ ABL(G) OPEER8 LONG KEY EJECT * * CALCULATE INDEX SIZE * LD A1,FPB:S1,A9 LD A2,FPB:S1+2,A9 SIZE IN SECTORS LC A6,FDBBLZ,A11 BLOCK SIZE ANK A6,/FF CF A14,DIVMOD ABL(O) OPEER3 LONG FILE CM FPB:IS,A9 ST A2,FPB:IS+2,A9 SIZE IN BLOCKS * * GET INDEX VOLUME NAME * LDKL A1,FPB:V1 LDK A3,FPB:IV ADR A1,A9 FROM ADDR ADR A3,A9 TO LDK A2,6 LGTH CF A14,DMTBM MOVE XIF EJECT * OPE700 EQU * NEXT FILE IFF INDXAC=1 NO INDEX RF OPE900 NO INDEX XIF IFT INDXAC=1 INDEXES YES SUKL A12,1 FILE LOOP CWK A12,1 ABL(NG) OPE900 ALL INDEXES ARE OPENED CWK A10,FDBSTA RF(NE) OPE740 READ FILE PAR ORDER * * SKIP MASTER INDEX AT SECONDARY OPEN * LD A1,OPEFWT DATA FILE LC A1,FWTPAR,A1 ANK A1,/3E NR OF OPEN BEYOND 1 RF(Z) OPE710 FIRST ANKL A12,/E NO MASTER INDEX OPE710 EQU * * * NEXT FILE NAME LDR A7,A12 SLL A7,1 WORD ADDR LD A1,OPEFN,A7 FIRST 2 CHAR IN FILE NAME ST A1,FPB:FN,A9 FILE NAME * * FETCH VOLUME NAME FOR INDEXES * LDKL A1,INDVOL FROM ADDR LDR A3,A9 ADKL A3,FPB:V1 TO ADDR LDK A2,6 CF A14,DMTWM MOVE VOLUME NAME * * MOVE SPACES TO OTHER VOLUME NAMES * LDK A6,30 NR OF VOLUME NAMES * 10 OPE750 EQU * SUK A6,10 RF(N) OPE770 ALL LDKL A1,OPESPA FROM ADDR LDR A3,A9 ADKL A3,FPB:V2 ADR A3,A6 TO ADDR LDK A2,6 NR OF CHAR CF A14,DMTWM RB OPE750 OPE740 EQU * GET FILE NR FOR READ FILE PAR LDR A7,A12 SRL A7,1 LC A6,OPEFNR,A7 OPE770 EQU * CM DELAY NO DELAY FOR INDEXES CM NROFIX NO INDEX FOR NEXT FILE ABL OPE100 XIF EJECT OPE800 EQU * DATA FILE * * UPDATE USER PAR BLOCK * LC A2,FDBNIF,A11 ANK A2,/FF RF(Z) OPE830 NO INDEX LDK A2,1 OPE830 EQU * SC A2,FPB:FO,A9 FILE ORG LDK A2,1 SC A2,FPB:FO+1,A9 DEVICE TYPE LC A2,OPEFNR FILE NR SC A2,FPB:FM,A9 LD A2,FDBDBR,A11 SRL A2,14 SC A2,FPB:BO,A9 DELAY BASIC TOSS OPTIONS * * CONVERT SIZE TO NR OF RECORDS * LDK A5,3 4 VOLUMES LDR A13,A9 OPE850 EQU * LD A1,FPB:S1,A13 LENGTH IN SECTORS LD A2,FPB:S1+2,A13 LC A6,FDBBLZ,A11 NR OF SECT IN BLOCK ANK A6,/FF CF A14,DIVMOD ABL(O) OPEER3 OVERFLOW LDR A6,A2 NR OF BLOCKS LC A7,FDBBLF,A11 NR OF REC IN BLOCK ANK A7,/FF CF A14,MPYMOD NR OF RECS ST A1,FPB:S1,A13 ST A2,FPB:S1+2,A13 ADKL A13,10 SUK A5,1 RB(NN) OPE850 MORE VOLUMES * * MOVE PART OF BLOCK TO USER * LDKL A3,FPB:FR SUKL A3,FPB:RL LENGTH LD A4,DWTECB,A10 USER ECB ADDR LD A1,ECBRL,A4 REQ LENGTH SUK A1,FPBRES RESERVED CWR A3,A1 RF(NG) OPE860 TAKE SHORTEST LDR A3,A1 OPE860 EQU * LDR A1,A3 ADK A1,FPBRES ST A1,ECBEL,A4 SET EFFECTIVE LENGTH LDR A1,A9 FROM ADDR IFT MMUPAG=1 LD A2,ECBBA,A4 TO ADDR ADK A2,FPBRES RESERVED FIELD LD A4,DWTTAB,A10 TTAB ADDR USER CF A14,MOV:SU XIF IFT MMUPAG=0 LDR A2,A3 LENGTH LD A3,ECBBA,A4 TO ADDR ADK A3,FPBRES RESERVED ITEM CF A14,DMTBM MOVE XIF * * ADJUST FILE NAME FOR INDEXES * LDR A1,A9 ADKL A1,FPB:FN FROM ADDR LDR A3,A1 ADK A3,2 TO LDK A2,6 NO OF CHAR CF A14,DMTBMR MOVE ABL OPE700 EJECT OPE900 EQU * FINISH LD A11,OPEFWT FDB ADDR DATA FILE CWK A10,FDBSTA RF(NE) OPE990 READ FILE PAR ORDER * * STORE FDB ADDRESSES IN ALL FDB'S * LDK A5,10 NR OF FILES * 2 DMT625 EQU * SUK A5,2 RF(N) DMT635 ALL FDB UPPDATED LD A3,OPEFWT,A5 FDB ADDR INDEX RB(Z) DMT625 NO INDEX FILE LDKL A1,OPEFWT FROM ADDR ADKL A3,FDBADF TO ADDR LDK A2,10 NO OF BYTES CF A14,DMTWM MOVE 5 WORDS RB DMT625 DMT635 EQU * * * CONNECT FILE CODE OF DATA FILE * LD* A2,DWTECB,A10 FILE CODE ANK A2,/FF SC A2,OPEFCD SAVE LDK A5,0 TTAB AND CDTAB LD A1,DWTTAB,A10 USER TTAB ADDR CF A14,FNDFDB ST A11,2,A4 FWT ADDR * * REMOVE CURRENCY BUFFER * LDR A1,A10 CF A14,CRNGET ADDR IN A2 ADKL A1,FDBCRL ROOT INH OPE940 EQU * LDR* A3,A1 NEXT BUFFER CWR A3,A2 RF(E) OPE950 THIS LDR A1,A3 RB OPE940 OPE950 EQU * LDR* A4,A3 NEXT STR A4,A1 LD A3,CRNQUE STR A3,A2 ST A2,CRNQUE ENB =1 OPE990 EQU * * * CHECK USER SIZE AND UPDATE PARAMETER BLOCK * LDK A1,FPB:IV LC A2,FDBNIF,A11 NR OF INDEX ANK A2,/F IFT INDXAC=1 RF(Z) OPE994 LDR A3,A2 SLL A2,3 SLL A3,2 ADR A2,A3 MULT WITH 12 ADK A2,FPB:I1 SUR A2,A1 MAX NR OF REM CHAR OPE994 EQU * XIF ADR A1,A9 FROM ADDR LD A3,DWTECB,A10 USER ECB LD A4,ECBRL,A3 TOT LGTH SUK A4,FPB:IV+FPBRES CWR A2,A4 REM LGTH RF(NG) OPE995 TAKE SHORTEST LDR A2,A4 OPE995 EQU * LDR A4,A2 ADK A4,FPB:IV+FPBRES ST A4,ECBEL,A3 SET EFF LENGTH IFT MMUPAG=0 LD A3,ECBBA,A3 TO ADDR ADK A3,FPB:IV+FPBRES CF A14,DMTBM MOVE XIF IFT MMUPAG=1 LDR A4,A2 LD A2,ECBBA,A3 ADK A2,FPB:IV+FPBRES TO ADDER LDR A3,A4 LENGTH LD A4,DWTTAB,A10 USER TTAB ADDR CF A14,MOV:SU XIF LDR A6,A10 SYSTEM FWT ADDR LDK A1,0 RET CODE ABL DMTERX TENDIO+EXIT IN DMTASK EJECT DMCLOS EQU * CLOSE * * 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 ) * LD A4,FDBDBR,A1 RF(NN) CLO200 NO DELAY LDK A7,/95 WRITE LKM DATA 15 FM IO CF A14,DMTIOT ERR CHECK CLO200 EQU * CF A14,DMTRBU RELEASE BUFFER * * CLEAR CURRENCY * LDR A1,A6 FDB ADDR =1 CF A14,CRNGET GET CURRENCY BUFFER =1 LDK A1,0 SC A1,CRNSTA,A2 STATUS CM CRNCDF,A2 CM CRNCDF+2,A2 IFT INDXAC=1 CM CRNCIF,A2 CM CRNCIF+2,A2 XIF * * BUILD CLOSE TABLES * LC A7,ECBFC,A9 FILE CODE LDK A5,10 2 * FILES CLO210 EQU * SUK A5,2 RF(N) CLO300 ALL FILES LDR A4,A6 ADR A4,A5 LDK A1,0 LDK A2,0 SUR A8,A8 SUR A9,A9 SUR A10,A10 LD A3,FDBADF,A4 FDB ADDR RF(Z) CLO230 NO FILE LD A8,FDBMIA,A3 MASTER INDEX ADDR LC A2,FWTFNR,A3 FILE NR LC A9,FDBLRN,A3 LAST REC NR LD A10,FDBLRN+1,A3 CLO230 EQU * ST A8,OPEMXI,A5 ST A3,OPEFWT,A5 LDR A4,A5 SRL A4,1 SC A2,OPEFNR,A4 FILE NR SC A1,OPEFCD,A4 FILE CODE SLL A4,2 ST A9,OPELRN,A4 LAST REC NR ST A10,OPELRN+2,A4 RB CLO210 NEXT FILE CLO300 EQU * SC A7,OPEFCD FILE CODE LDR A10,A6 MAIN FDB ADDR EJECT OPEER1 EQU * RECOVERY AT ERRORS LDR A6,A10 MAIN FDB LD A2,DWTOR,A10 ORDER ANK A2,/FF CWK A2,QRFP READ FILE PAR ABL(E) DMTERX * FREE FILE CODES,MASTER INDEXES,FILES, CURRENCY * LDKL A12,5 OPEE10 EQU * SUKL A12,1 RF(NN) OPEE20 MORE FILES LDR A6,A10 MAIN FDB ADDR LDK A1,0 RET CODE ABL DMTERX OPEE20 EQU * * RESET FILE CODE* * LC A2,OPEFCD,A12 FILE CODE ANK A2,/FF RF(Z) OPEE25 NO CODE LDK A5,0 TTAB AND CDTAB LD A1,DWTTAB,A10 USER TTAB ADDR CF A14,FNDFDB LDR A2,A2 RET CD RF(Z) OPEE25 NO ENTRY LDKL A7,FDBSTA SYSTEM FDB ADDR ST A7,2,A4 SYSTEM FWT ADDR OPEE25 EQU * EJECT * * RELEASE EA+CRN BUFFERS * LDR A7,A12 SLL A7,1 WORDS LD A11,OPEFWT,A7 FDB ADDR RF(Z) DMT894 NO FDB LDR A1,A11 LDKL A2,/C000 SUR A9,A9 CF A14,EARELB REL PROTECT BUFFERS ENB LC A5,FWTPAR,A11 ANK A5,/3F NR OF USERS SUK A5,1 RF(NZ) DMT894 MORE THAN ONE OPEN LD A5,FDBEAL,A11 PRO LINK ABL(NZ) TASHLT DM ERR EJECT * * RELEASE CURRENCY BUFFERS * LDKL A5,FDBCRL ADR A5,A11 LINK ROOT LDR* A4,A5 CMR A5 CLEAR FDB RF DMT830 DMT820 EQU * LDR A4,A5 BUFFER ADDRESS DMT830 EQU * RF(Z) DMT840 ALL BUFFER S REMOVED LDR* A5,A4 NEXT BUFFER ADDRESS * * RETIURN BUFFER TO POOL * INH LD A3,CRNQUE STR A3,A4 ST A4,CRNQUE ENB RB DMT820 EJECT DMT840 EQU * IFT INDXAC=1 * RELEASE MASRTER INDEX * LD A1,OPEMXI,A7 MASTER INDEX ADDR RF(Z) DMT894 NO MX LD A5,MXIND LENTH SUK A5,2 DMT885 EQU * SUK A5,4 RF(Z) DMT890 FIRST INDEX RF(N) DMT894 NO MATER IX CW A1,MXIND+2,A5 RB(NE) DMT885 LD A4,MXIND,A5 RF(N) DMT890 PREVIOUS ENTRY USED LD A4,MXIND+4,A5 NO OF WORDS ANKL A4,/7FFF REMOV USE BIT ADS A4,MXIND,A5 NR OF WORDS EJECT * * * MOVE UP REST OF MXIND * LDKL A1,MXIND+6 ADR A1,A5 FROM ADDR LDR A3,A1 SUK A3,4 TO ADDR LD A2,MXIND SUR A2,A5 SUK A2,2 NO OF CHAR CF A14,DMTWM MOVE UOP RF DMT894 DMT890 EQU * LDKL A4,/7FFF ANS A4,MXIND+4,A5 REMOVE USE BIT XIF EJECT * * CLOSE FILE * DMT894 LDR A8,A10 ADKL A8,FDBECB ECB ADDR LDKL A9,OPEFPB FPB ADDR LDR A7,A12 SLL A7,2 2 WORD INDEX LD A1,OPELRN,A7 LAST REC NR ST A1,FPB:FR,A9 LD A1,OPELRN+2,A7 ST A1,FPB:FR+2,A9 LC A7,OPEFNR,A12 ANK A7,/FF RF(Z) DMT898 NO FILE OPENED ST A7,ECBFC-1,A8 FILE NR ST A9,ECBBA,A8 PAR BLOCK ADDR LDK A7,/A2 CLOSE CF A14,CLRBUF CLEAR FREE BUFFERS LKM DATA 15 LDR A1,A10 MAIN FDB CF A14,DMTIOT ERR CHECK ORS A1,ECBRC,A9 SEND CODE DMT898 EQU * ABL OPEE10 NEXT FILE END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DMOPCL REL 10.0 80-03-14 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005c Head {h00=0x001a, h01=0x0050, text=» =3 ,RECORD LGTH 256«, t00=0x0000, t01=0x0042}
0x005c…0070 Head {h00=0x0010, h01=0x0050, text=» 79-11-28 «, t00=0x0000, t01=0x0060}
0x0070…008c Head {h00=0x0018, h01=0x0050, text=» =2, COMMIT CHECK «, t00=0x0000, t01=0x0074}
0x008c…00a0 Head {h00=0x0010, h01=0x0050, text=» 79-11-22 «, t00=0x0000, t01=0x0090}
0x00a0…00be Head {h00=0x001a, h01=0x0050, text=» =1 ,CONCURRENT OPEN«, t00=0x0000, t01=0x00a4}
0x00be…00d2 Head {h00=0x0010, h01=0x0050, text=» 79-11-02 «, t00=0x0000, t01=0x00c2}
0x00d2…010e Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x00d6}
0x010e…0118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0112}
0x0118…0140 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0000, t01=0x011c}
0x0140…014a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0144}
0x014a…0188 Head {h00=0x003a, h01=0x0050, text=»* DMOPCL HANDLES OPEN CLOSE AND READ FILE PARAMETERS«, t00=0x0000, t01=0x014e}
0x0188…01b0 Head {h00=0x0024, h01=0x0050, text=»* IT IS ACTIVATED FROM DMTASK «, t00=0x0000, t01=0x018c}
0x01b0…01ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0024}
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…021e Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0001, t01=0x0056}
0x021e…0228 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0092}
0x0228…0236 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x009c}
0x0236…0240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00aa}
0x0240…0258 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0001, t01=0x00b4}
0x0258…0270 Head {h00=0x0014, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x00cc}
0x0270…0288 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0001, t01=0x00e4}
0x0288…0292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fc}
0x0292…029c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0106}
0x029c…02be Head {h00=0x001e, h01=0x0050, text=» ENTRY DMOPEN,DMCLOS,DMRFP«, t00=0x0001, t01=0x0110}
0x02be…02cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0132}
0x02cc…02d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0140}
0x02d6…02f0 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0001, t01=0x014a}
0x02f0…030a Head {h00=0x0016, h01=0x0050, text=»* EXTERNALS * «, t00=0x0001, t01=0x0164}
0x030a…0324 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0001, t01=0x017e}
0x0324…032e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0008}
0x032e…0360 Head {h00=0x002e, h01=0x0050, text=» EXTRN CLRBUF,CRNCDF,CRNCIF,CRNGET,CRNQUE «, t00=0x0002, t01=0x0012}
0x0360…0374 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRC«, t00=0x0002, t01=0x0044}
0x0374…03ac Head {h00=0x0034, h01=0x0050, text=» EXTRN FDBADF,FDBBLF,FDBCRL,FDBECB,FDBKA,FDBLRN «, t00=0x0002, t01=0x0058}
0x03ac…03de Head {h00=0x002e, h01=0x0050, text=» EXTRN FDBMEC,FDBMIA,FDBNIF,FDBRLE,FDBSTA «, t00=0x0002, t01=0x0090}
0x03de…03f4 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBTNR «, t00=0x0002, t01=0x00c2}
0x03f4…0410 Head {h00=0x0018, h01=0x0050, text=» EXTRN FNDFDB,DMTWM «, t00=0x0002, t01=0x00d8}
0x0410…0434 Head {h00=0x0020, h01=0x0050, text=» EXTRN FWTFNR,FWTPAR,FWTVOL «, t00=0x0002, t01=0x00f4}
0x0434…0450 Head {h00=0x0018, h01=0x0050, text=» EXTRN MOV:SU,MOV:US«, t00=0x0002, t01=0x0118}
0x0450…047a Head {h00=0x0026, h01=0x0050, text=» EXTRN MPYMOD,MXIND,TENDIO,TTB:MT «, t00=0x0002, t01=0x0134}
0x047a…0490 Head {h00=0x0012, h01=0x0050, text=» EXTRN DIVMOD «, t00=0x0002, t01=0x015e}
0x0490…04ba Head {h00=0x0026, h01=0x0050, text=» EXTRN FDBDBR,FDBMRO,FDBDMI,FDBBLZ«, t00=0x0002, t01=0x0174}
0x04ba…04ce Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBFC«, t00=0x0003, t01=0x000e}
0x04ce…04e2 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBBA«, t00=0x0003, t01=0x0022}
0x04e2…04f6 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBEL«, t00=0x0003, t01=0x0036}
0x04f6…050a Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRL«, t00=0x0003, t01=0x004a}
0x050a…0520 Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTECB «, t00=0x0003, t01=0x005e}
0x0520…0534 Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTOR«, t00=0x0003, t01=0x0074}
0x0534…0558 Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTTAB,DWTOPT,BLKMXL «, t00=0x0003, t01=0x0088}
0x0558…0590 Head {h00=0x0034, h01=0x0050, text=» EXTRN FPB:RL,FPB:BF,FPB:FO,FPB:BO,FPB:FN,FPB:EL«, t00=0x0003, t01=0x00ac}
0x0590…05d6 Head {h00=0x0042, h01=0x0050, text=» EXTRN FPB:V1,FPB:S1,FPB:V2,FPB:S2,FPB:V3,FPB:S3,FPB:V4,FPB:S4«, t00=0x0003, t01=0x00e4}
0x05d6…0616 Head {h00=0x003c, h01=0x0050, text=» EXTRN FPB:FR,FPB:US,FPB:SH,FPB:MN,FPB:SN,FPB:IF,FPB:KA «, t00=0x0003, t01=0x012a}
0x0616…0630 Head {h00=0x0016, h01=0x0050, text=» EXTRN QOPEN,QRFP «, t00=0x0003, t01=0x016a}
0x0630…0644 Head {h00=0x0010, h01=0x0050, text=» EXTRN PRUN «, t00=0x0003, t01=0x0184}
0x0644…0666 Head {h00=0x001e, h01=0x0050, text=» EXTRN CRNSTA,DFTAB,DMTIDP«, t00=0x0004, t01=0x0008}
0x0666…0686 Head {h00=0x001c, h01=0x0050, text=» EXTRN MONMMU,DMTERX,QCL«, t00=0x0004, t01=0x002a}
0x0686…06a2 Head {h00=0x0018, h01=0x0050, text=» EXTRN DMTRBU,DMTBM «, t00=0x0004, t01=0x004a}
0x06a2…06b8 Head {h00=0x0012, h01=0x0050, text=» EXTRN DMTIOT «, t00=0x0004, t01=0x0066}
0x06b8…06ce Head {h00=0x0012, h01=0x0050, text=» EXTRN EARELB «, t00=0x0004, t01=0x007c}
0x06ce…06e4 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASHLT «, t00=0x0004, t01=0x0092}
0x06e4…06fa Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBEAL «, t00=0x0004, t01=0x00a8}
0x06fa…0716 Head {h00=0x0018, h01=0x0050, text=» EXTRN RECBFZ,REQERR«, t00=0x0004, t01=0x00be}
0x0716…072c Head {h00=0x0012, h01=0x0050, text=» EXTRN DMTBMR «, t00=0x0004, t01=0x00da}
0x072c…0744 Head {h00=0x0014, h01=0x0050, text=» EJECT DMTASK «, t00=0x0004, t01=0x00f0}
0x0744…0764 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0004, t01=0x0108}
0x0764…0786 Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0004, t01=0x0128}
0x0786…0790 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x014a}
0x0790…079a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0154}
0x079a…07cc Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0004, t01=0x015e}
0x07cc…07fa Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0004, t01=0x0190}
0x07fa…0804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x002e}
0x0804…0818 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0005, t01=0x0038}
0x0818…0822 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004c}
0x0822…082c Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0005, t01=0x0056}
0x082c…0836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0060}
0x0836…0870 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION FOR INDEXED ACCESS HANDLING «, t00=0x0005, t01=0x006a}
0x0870…089e Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING INDXAC = 1 «, t00=0x0005, t01=0x00a4}
0x089e…08b0 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0005, t01=0x00d2}
0x08b0…08c6 Head {h00=0x0012, h01=0x0050, text=»INDXAC EQU X:B«, t00=0x0005, t01=0x00e4}
0x08c6…08d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00fa}
0x08d0…08da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0104}
0x08da…08e8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x010e}
0x08e8…090c Head {h00=0x0020, h01=0x0050, text=»FPBSTA EQU 0 START ADDR FPB «, t00=0x0005, t01=0x011c}
0x090c…0938 Head {h00=0x0028, h01=0x0050, text=»FPB:IV EQU FPBSTA+58 VOL NAME INDEX «, t00=0x0005, t01=0x0140}
0x0938…0960 Head {h00=0x0024, h01=0x0050, text=»FPB:IS EQU FPBSTA+64 INDEX SIZE «, t00=0x0005, t01=0x016c}
0x0960…0988 (6, 0, 400) Head {h00=0x0024, h01=0x0050, text=»FPB:NI EQU FPBSTA+68 NR OF INDEX«, t00=0x0006, t01=0x0004}
0x0988…09b0 Head {h00=0x0024, h01=0x0050, text=»FPB:I1 EQU FPBSTA+70 INDEX ID 1 «, t00=0x0006, t01=0x002c}
0x09b0…09dc Head {h00=0x0028, h01=0x0050, text=»FPB:K1 EQU FPBSTA+77 NR OF KEY ITEMS«, t00=0x0006, t01=0x0054}
0x09dc…0a04 Head {h00=0x0024, h01=0x0050, text=»FPB:A1 EQU FPBSTA+78 KEY ADDR 1 «, t00=0x0006, t01=0x0080}
0x0a04…0a2e Head {h00=0x0026, h01=0x0050, text=»FPB:L1 EQU FPBSTA+80 KEY LENGTH 1 «, t00=0x0006, t01=0x00a8}
0x0a2e…0a4a Head {h00=0x0018, h01=0x0050, text=»FPB:I2 EQU FPBSTA+82«, t00=0x0006, t01=0x00d2}
0x0a4a…0a68 Head {h00=0x001a, h01=0x0050, text=»FPB:L4 EQU FPBSTA+116 «, t00=0x0006, t01=0x00ee}
0x0a68…0a72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010c}
0x0a72…0a9a Head {h00=0x0024, h01=0x0050, text=»FPB:FM EQU FPBSTA+6 TOSS FILE NR«, t00=0x0006, t01=0x0116}
0x0a9a…0aa4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013e}
0x0aa4…0ad4 Head {h00=0x002c, h01=0x0050, text=»FPBSIZ EQU 60 SIZE OF FPB AREA IN WORDS «, t00=0x0006, t01=0x0148}
0x0ad4…0ade Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0178}
0x0ade…0b1a Head {h00=0x0038, h01=0x0050, text=»FPBRES EQU 8 RESERVED FIELD LENGTH IN FILE PAR BLOCK«, t00=0x0006, t01=0x0182}
0x0b1a…0b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002e}
0x0b24…0b4c Head {h00=0x0024, h01=0x0050, text=»NOCORE EQU 1 NO CORE ERROR CODE «, t00=0x0007, t01=0x0038}
0x0b4c…0b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0060}
0x0b56…0b7c Head {h00=0x0022, h01=0x0050, text=»ERPAR EQU 4 WRONG PAR ERR CODE«, t00=0x0007, t01=0x006a}
0x0b7c…0b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0090}
0x0b86…0baa Head {h00=0x0020, h01=0x0050, text=»OFLW EQU 3 OVERFLOW ERR CODE«, t00=0x0007, t01=0x009a}
0x0baa…0bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00be}
0x0bb4…0bda Head {h00=0x0022, h01=0x0050, text=»ERKEYL EQU 8 LONG KEY ERR CODE«, t00=0x0007, t01=0x00c8}
0x0bda…0be8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00ee}
0x0be8…0c08 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0007, t01=0x00fc}
0x0c08…0c28 Head {h00=0x001c, h01=0x0050, text=»* DATA DEFINITIONS *«, t00=0x0007, t01=0x011c}
0x0c28…0c48 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0007, t01=0x013c}
0x0c48…0c86 Head {h00=0x003a, h01=0x0050, text=»* HERE FOLLOWS NON-REENTRANT AREAS USED BY ORDERS : «, t00=0x0007, t01=0x015c}
0x0c86…0cb2 Head {h00=0x0028, h01=0x0050, text=»* OPEN,CLOSE,READ FILE PARAMETERS.«, t00=0x0008, t01=0x000a}
0x0cb2…0cbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x0cbc…0cde Head {h00=0x001e, h01=0x0050, text=»OPESPA DATA ' ' 2 SPACES «, t00=0x0008, t01=0x0040}
0x0cde…0d04 Head {h00=0x0022, h01=0x0050, text=»OPEFN EQU * FILE NAME PREFIXES«, t00=0x0008, t01=0x0062}
0x0d04…0d18 Head {h00=0x0010, h01=0x0050, text=» DATA ' '«, t00=0x0008, t01=0x0088}
0x0d18…0d2c Head {h00=0x0010, h01=0x0050, text=» DATA 'I1M1'«, t00=0x0008, t01=0x009c}
0x0d2c…0d40 Head {h00=0x0010, h01=0x0050, text=» DATA 'I2M2'«, t00=0x0008, t01=0x00b0}
0x0d40…0d54 Head {h00=0x0010, h01=0x0050, text=» DATA 'I3M3'«, t00=0x0008, t01=0x00c4}
0x0d54…0d68 Head {h00=0x0010, h01=0x0050, text=» DATA 'I4M4'«, t00=0x0008, t01=0x00d8}
0x0d68…0d8c Head {h00=0x0020, h01=0x0050, text=»OPEFNR EQU * OPENED FILE NRS«, t00=0x0008, t01=0x00ec}
0x0d8c…0da0 Head {h00=0x0010, h01=0x0050, text=» DATA 0,0,0 «, t00=0x0008, t01=0x0110}
0x0da0…0dc6 Head {h00=0x0022, h01=0x0050, text=»OPEFCD EQU * OPENED FILE CODES«, t00=0x0008, t01=0x0124}
0x0dc6…0dda Head {h00=0x0010, h01=0x0050, text=» DATA 0,0,0 «, t00=0x0008, t01=0x014a}
0x0dda…0dfc Head {h00=0x001e, h01=0x0050, text=»OPEFWT EQU * FWT ADDRESSES«, t00=0x0008, t01=0x015e}
0x0dfc…0e14 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0,0,0,0 «, t00=0x0008, t01=0x0180}
0x0e14…0e40 Head {h00=0x0028, h01=0x0050, text=»OPEMXI EQU * MASTER INDEX ADDRESSES «, t00=0x0009, t01=0x0008}
0x0e40…0e58 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0,0,0,0 «, t00=0x0009, t01=0x0034}
0x0e58…0e8c Head {h00=0x0030, h01=0x0050, text=»OPELRN DATA 0,0,0,0,0,0,0,0,0,0 LAST REC NRS«, t00=0x0009, t01=0x004c}
0x0e8c…0eb8 Head {h00=0x0028, h01=0x0050, text=»OPEKAD DATA 0,0,0,0,0 KEY ADDRESSES «, t00=0x0009, t01=0x0080}
0x0eb8…0ee0 Head {h00=0x0024, h01=0x0050, text=»OPEKYL DATA 0,0,0,0,0 KEY LENGTH«, t00=0x0009, t01=0x00ac}
0x0ee0…0ef4 Head {h00=0x0010, h01=0x0050, text=»DELAY DATA 0«, t00=0x0009, t01=0x00d4}
0x0ef4…0f1c Head {h00=0x0024, h01=0x0050, text=»NROFIX DATA 0 NR OF INDEX FILES «, t00=0x0009, t01=0x00e8}
0x0f1c…0f48 Head {h00=0x0028, h01=0x0050, text=»INDVOL RES 3 VOLUME NAME INDEX FILES«, t00=0x0009, t01=0x0110}
0x0f48…0f78 Head {h00=0x002c, h01=0x0050, text=»OPEFPB RES FPBSIZ FILE ADM PARAM. BLOCK «, t00=0x0009, t01=0x013c}
0x0f78…0fa0 Head {h00=0x0024, h01=0x0050, text=»OPEEND EQU *-OPEFNR NR OF BYTES «, t00=0x0009, t01=0x016c}
0x0fa0…0fae (10, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0004}
0x0fae…0fd6 Head {h00=0x0024, h01=0x0050, text=»DMRFP EQU * READ FILE PARAMETERS«, t00=0x000a, t01=0x0012}
0x0fd6…0fe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x003a}
0x0fe0…0ff4 Head {h00=0x0010, h01=0x0050, text=»* A1 = A6 «, t00=0x000a, t01=0x0044}
0x0ff4…101c Head {h00=0x0024, h01=0x0050, text=»* A6 = FDB ADDRESS ALL ORDERS «, t00=0x000a, t01=0x0058}
0x101c…1042 Head {h00=0x0022, h01=0x0050, text=»* A7 = ORDER CODE ALL ORDERS«, t00=0x000a, t01=0x0080}
0x1042…104c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a6}
0x104c…1068 Head {h00=0x0018, h01=0x0050, text=» LDR A10,A6 FBD ADDR«, t00=0x000a, t01=0x00b0}
0x1068…108e Head {h00=0x0022, h01=0x0050, text=» LC A6,FDBNIF,A10 NR OF INDEX «, t00=0x000a, t01=0x00cc}
0x108e…10a2 Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x000a, t01=0x00f2}
0x10a2…10b8 Head {h00=0x0012, h01=0x0050, text=» ST A6,NROFIX «, t00=0x000a, t01=0x0106}
0x10b8…10dc Head {h00=0x0020, h01=0x0050, text=»* STORE FILE NRS IN OPEFNR«, t00=0x000a, t01=0x011c}
0x10dc…10e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0140}
0x10e6…1104 Head {h00=0x001a, h01=0x0050, text=» LDK A5,10 2 * INDEXES«, t00=0x000a, t01=0x014a}
0x1104…1118 Head {h00=0x0010, h01=0x0050, text=»RFP100 EQU *«, t00=0x000a, t01=0x0168}
0x1118…112a Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x000a, t01=0x017c}
0x112a…114a Head {h00=0x001c, h01=0x0050, text=» RF(N) OPE099 ALL FILES «, t00=0x000a, t01=0x018e}
0x114a…115e Head {h00=0x0010, h01=0x0050, text=» LDR A4,A10 «, t00=0x000b, t01=0x001e}
0x115e…1170 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x000b, t01=0x0032}
0x1170…1192 Head {h00=0x001e, h01=0x0050, text=» LD A3,FDBADF,A4 FDB ADDR «, t00=0x000b, t01=0x0044}
0x1192…11b0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) RFP130 NO FILE «, t00=0x000b, t01=0x0066}
0x11b0…11d0 Head {h00=0x001c, h01=0x0050, text=» LC A6,FWTFNR,A3 FILE NR«, t00=0x000b, t01=0x0084}
0x11d0…11e4 Head {h00=0x0010, h01=0x0050, text=»RFP130 EQU *«, t00=0x000b, t01=0x00a4}
0x11e4…11f6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x000b, t01=0x00b8}
0x11f6…1208 Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x000b, t01=0x00ca}
0x1208…122e Head {h00=0x0022, h01=0x0050, text=» SC A6,OPEFNR,A4 SAVE FILE NR «, t00=0x000b, t01=0x00dc}
0x122e…124a Head {h00=0x0018, h01=0x0050, text=» RB RFP100 NEXT FILE«, t00=0x000b, t01=0x0102}
0x124a…1258 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x011e}
0x1258…126c Head {h00=0x0010, h01=0x0050, text=»* A1 = A6 «, t00=0x000b, t01=0x012c}
0x126c…1294 Head {h00=0x0024, h01=0x0050, text=»* A6 = FDB ADDRESS ALL ORDERS «, t00=0x000b, t01=0x0140}
0x1294…12ba Head {h00=0x0022, h01=0x0050, text=»* A7 = ORDER CODE ALL ORDERS«, t00=0x000b, t01=0x0168}
0x12ba…12c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x018e}
0x12c4…12de Head {h00=0x0016, h01=0x0050, text=»DMOPEN EQU * OPEN «, t00=0x000c, t01=0x0008}
0x12de…12e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0022}
0x12e8…1302 Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDR «, t00=0x000c, t01=0x002c}
0x1302…131c Head {h00=0x0016, h01=0x0050, text=»* A9 = FPB ADDR «, t00=0x000c, t01=0x0046}
0x131c…133c Head {h00=0x001c, h01=0x0050, text=»* A10= SYSTEM FWT ADDR«, t00=0x000c, t01=0x0060}
0x133c…135e Head {h00=0x001e, h01=0x0050, text=»* A11= CURRENT FWT ADDR «, t00=0x000c, t01=0x0080}
0x135e…1388 Head {h00=0x0026, h01=0x0050, text=»* A12= LOOP COUNTER (FILE INDEX)«, t00=0x000c, t01=0x00a2}
0x1388…1392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00cc}
0x1392…13b2 Head {h00=0x001c, h01=0x0050, text=» LDKL A9,OPEFPB AS ABOVE«, t00=0x000c, t01=0x00d6}
0x13b2…13cc Head {h00=0x0016, h01=0x0050, text=»* CHECK OPTIONS «, t00=0x000c, t01=0x00f6}
0x13cc…13d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0110}
0x13d6…13fa Head {h00=0x0020, h01=0x0050, text=» LDR A10,A6 SYSTEM FWT ADDR «, t00=0x000c, t01=0x011a}
0x13fa…1410 Head {h00=0x0012, h01=0x0050, text=» LDR A11,A10 «, t00=0x000c, t01=0x013e}
0x1410…1430 Head {h00=0x001c, h01=0x0050, text=» LC A2,DWTOPT,A10 OPTION«, t00=0x000c, t01=0x0154}
0x1430…1442 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x000c, t01=0x0174}
0x1442…1456 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FC «, t00=0x000c, t01=0x0186}
0x1456…1468 Head {h00=0x000e, h01=0x0050, text=» SUK A2,/8«, t00=0x000d, t01=0x000a}
0x1468…1488 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) OPE020 NOT INPUT«, t00=0x000d, t01=0x001c}
0x1488…149a Head {h00=0x000e, h01=0x0050, text=» ANK A3,/3«, t00=0x000d, t01=0x003c}
0x149a…14bc Head {h00=0x001e, h01=0x0050, text=» RF(NZ) OPEERR ONLY UNPROT«, t00=0x000d, t01=0x004e}
0x14bc…14ce Head {h00=0x000e, h01=0x0050, text=» RF OPE030«, t00=0x000d, t01=0x0070}
0x14ce…14e2 Head {h00=0x0010, h01=0x0050, text=»OPE020 EQU *«, t00=0x000d, t01=0x0082}
0x14e2…14f6 Head {h00=0x0010, h01=0x0050, text=» SUK A2,/30 «, t00=0x000d, t01=0x0096}
0x14f6…151a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) OPEERR NOT INP/OUTP «, t00=0x000d, t01=0x00aa}
0x151a…152c Head {h00=0x000e, h01=0x0050, text=» ANK A3,/3«, t00=0x000d, t01=0x00ce}
0x152c…1554 Head {h00=0x0024, h01=0x0050, text=» RF(Z) OPEERR UNPROT NOT ALLOWED«, t00=0x000d, t01=0x00e0}
0x1554…1566 Head {h00=0x000e, h01=0x0050, text=» SUK A3,3 «, t00=0x000d, t01=0x0108}
0x1566…1584 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPEERR NOT BOTH«, t00=0x000d, t01=0x011a}
0x1584…1598 Head {h00=0x0010, h01=0x0050, text=»OPE030 EQU *«, t00=0x000d, t01=0x0138}
0x1598…15a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x014c}
0x15a6…15ca Head {h00=0x0020, h01=0x0050, text=»* A12 = LOOP COUNTER FILES«, t00=0x000d, t01=0x015a}
0x15ca…15d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017e}
0x15d4…15f4 Head {h00=0x001c, h01=0x0050, text=»* 1 = DATA FILE «, t00=0x000d, t01=0x0188}
0x15f4…1612 Head {h00=0x001a, h01=0x0050, text=»* 2 = INDEX 1 «, t00=0x000e, t01=0x0018}
0x1612…1636 Head {h00=0x0020, h01=0x0050, text=»* 3 = MASTER INDEX 1«, t00=0x000e, t01=0x0036}
0x1636…1654 Head {h00=0x001a, h01=0x0050, text=»* 4 = INDEX 2 «, t00=0x000e, t01=0x005a}
0x1654…166a Head {h00=0x0012, h01=0x0050, text=»* ETC «, t00=0x000e, t01=0x0078}
0x166a…1674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x008e}
0x1674…1690 Head {h00=0x0018, h01=0x0050, text=»* CLEAR WORK AREA «, t00=0x000e, t01=0x0098}
0x1690…169a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00b4}
0x169a…16c4 Head {h00=0x0026, h01=0x0050, text=» LDK A2,OPEEND NR OF BYTE TO CLEAR«, t00=0x000e, t01=0x00be}
0x16c4…16d8 Head {h00=0x0010, h01=0x0050, text=»OPE050 EQU *«, t00=0x000e, t01=0x00e8}
0x16d8…16ea Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x000e, t01=0x00fc}
0x16ea…170e Head {h00=0x0020, h01=0x0050, text=» RF(N) OPE060 NO MORE WORDS «, t00=0x000e, t01=0x010e}
0x170e…1724 Head {h00=0x0012, h01=0x0050, text=» CM OPEFNR,A2 «, t00=0x000e, t01=0x0132}
0x1724…1740 Head {h00=0x0018, h01=0x0050, text=» RB OPE050 NEXT WORD«, t00=0x000e, t01=0x0148}
0x1740…1754 Head {h00=0x0010, h01=0x0050, text=»OPE060 EQU *«, t00=0x000e, t01=0x0164}
0x1754…175e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0178}
0x175e…1782 Head {h00=0x0020, h01=0x0050, text=»* MOVE IN PARAMETER BLOCK «, t00=0x000e, t01=0x0182}
0x1782…178c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0016}
0x178c…17b4 Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTECB,A10 USER ECB ADDR «, t00=0x000f, t01=0x0020}
0x17b4…17da Head {h00=0x0022, h01=0x0050, text=» LD A1,ECBBA,A3 FD ADDR USER «, t00=0x000f, t01=0x0048}
0x17da…1800 Head {h00=0x0022, h01=0x0050, text=» ADK A1,FPBRES RESERVED FIELDS«, t00=0x000f, t01=0x006e}
0x1800…181c Head {h00=0x0018, h01=0x0050, text=» LDR A2,A9 FPB ADDR «, t00=0x000f, t01=0x0094}
0x181c…1844 Head {h00=0x0024, h01=0x0050, text=» LDK A3,FPB:L4+1 MAX SIGN LENGTH«, t00=0x000f, t01=0x00b0}
0x1844…185a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x00d8}
0x185a…1882 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTTAB,A10 USER TTAB ADDR«, t00=0x000f, t01=0x00ee}
0x1882…1898 Head {h00=0x0012, h01=0x0050, text=» CF A14,MOV:US«, t00=0x000f, t01=0x0116}
0x1898…18a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x012c}
0x18a4…18ba Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000f, t01=0x0138}
0x18ba…18cc Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x000f, t01=0x014e}
0x18cc…18e6 Head {h00=0x0016, h01=0x0050, text=» LDR A3,A9 TO ADDR«, t00=0x000f, t01=0x0160}
0x18e6…18fc Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTBM «, t00=0x000f, t01=0x017a}
0x18fc…1908 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0190}
0x1908…191e Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0010, t01=0x000c}
0x191e…1928 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0022}
0x1928…1950 Head {h00=0x0024, h01=0x0050, text=»* SAVE VOLUME NAME INDEX FILES«, t00=0x0010, t01=0x002c}
0x1950…195a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0054}
0x195a…1976 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A9 FPB ADDR «, t00=0x0010, t01=0x005e}
0x1976…1998 Head {h00=0x001e, h01=0x0050, text=» ADKL A1,FPB:IV FROM ADDR «, t00=0x0010, t01=0x007a}
0x1998…19b8 Head {h00=0x001c, h01=0x0050, text=» LDKL A3,INDVOL TO ADDR «, t00=0x0010, t01=0x009c}
0x19b8…19ca Head {h00=0x000e, h01=0x0050, text=» LDK A2,6 «, t00=0x0010, t01=0x00bc}
0x19ca…19e0 Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTBM «, t00=0x0010, t01=0x00ce}
0x19e0…19ec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00e4}
0x19ec…1a12 Head {h00=0x0022, h01=0x0050, text=» LC A5,FPB:BO,A9 TOSS OPTIONS «, t00=0x0010, t01=0x00f0}
0x1a12…1a24 Head {h00=0x000e, h01=0x0050, text=» ANK A5,2 «, t00=0x0010, t01=0x0116}
0x1a24…1a36 Head {h00=0x000e, h01=0x0050, text=» SLL A5,14«, t00=0x0010, t01=0x0128}
0x1a36…1a4a Head {h00=0x0010, h01=0x0050, text=» ST A5,DELAY«, t00=0x0010, t01=0x013a}
0x1a4a…1a60 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0010, t01=0x014e}
0x1a60…1a78 Head {h00=0x0014, h01=0x0050, text=» LC A5,FPB:FO,A9«, t00=0x0010, t01=0x0164}
0x1a78…1a8c Head {h00=0x0010, h01=0x0050, text=» ANK A5,/FF «, t00=0x0010, t01=0x017c}
0x1a8c…1ab0 Head {h00=0x0020, h01=0x0050, text=» RF(Z) OPE099 STANDARD FILE «, t00=0x0010, t01=0x0190}
0x1ab0…1ad8 Head {h00=0x0024, h01=0x0050, text=» LD A5,DWTECB,A10 USER ECB ADDR «, t00=0x0011, t01=0x0024}
0x1ad8…1af8 Head {h00=0x001c, h01=0x0050, text=» LD A5,ECBRL,A5 REQ LGTH«, t00=0x0011, t01=0x004c}
0x1af8…1b16 Head {h00=0x001a, h01=0x0050, text=» CWK A5,FPB:NI+FPBRES «, t00=0x0011, t01=0x006c}
0x1b16…1b36 Head {h00=0x001c, h01=0x0050, text=» RF(NG) OPEERR NO INDEX «, t00=0x0011, t01=0x008a}
0x1b36…1b5c Head {h00=0x0022, h01=0x0050, text=» LC A5,FPB:NI,A9 NR OF INDEXES«, t00=0x0011, t01=0x00aa}
0x1b5c…1b74 Head {h00=0x0014, h01=0x0050, text=» SC A5,NROFIX+1 «, t00=0x0011, t01=0x00d0}
0x1b74…1b82 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00e8}
0x1b82…1b8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f6}
0x1b8c…1bb8 Head {h00=0x0028, h01=0x0050, text=»* SAVE BASE ADDRESSES FOR INDEXES «, t00=0x0011, t01=0x0100}
0x1bb8…1bc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012c}
0x1bc2…1bd8 Head {h00=0x0012, h01=0x0050, text=» LDK A2,FPB:A1«, t00=0x0011, t01=0x0136}
0x1bd8…1bfe Head {h00=0x0022, h01=0x0050, text=» ADR A2,A9 ADDR FIRST KEY ADDR«, t00=0x0011, t01=0x014c}
0x1bfe…1c10 Head {h00=0x000e, h01=0x0050, text=» ANK A5,/F«, t00=0x0011, t01=0x0172}
0x1c10…1c30 Head {h00=0x001c, h01=0x0050, text=» LDK A3,2 OFFSET INDEX 1«, t00=0x0011, t01=0x0184}
0x1c30…1c44 Head {h00=0x0010, h01=0x0050, text=»OPE070 EQU *«, t00=0x0012, t01=0x0014}
0x1c44…1c56 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0012, t01=0x0028}
0x1c56…1c78 Head {h00=0x001e, h01=0x0050, text=» RF(N) OPE099 ALL INDEXES «, t00=0x0012, t01=0x003a}
0x1c78…1c8a Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0012, t01=0x005c}
0x1c8a…1cae Head {h00=0x0020, h01=0x0050, text=» LC A1,-1,A2 NR OF KEY ITEMS«, t00=0x0012, t01=0x006e}
0x1cae…1cc0 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0012, t01=0x0092}
0x1cc0…1cda Head {h00=0x0016, h01=0x0050, text=» RF(NZ) OPEER4 ERR«, t00=0x0012, t01=0x00a4}
0x1cda…1cf8 Head {h00=0x001a, h01=0x0050, text=» LC A1,2,A2 KEY LENGTH«, t00=0x0012, t01=0x00be}
0x1cf8…1d10 Head {h00=0x0014, h01=0x0050, text=» ST A1,OPEKYL,A3«, t00=0x0012, t01=0x00dc}
0x1d10…1d2e Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A2 KEY OFFSET«, t00=0x0012, t01=0x00f4}
0x1d2e…1d46 Head {h00=0x0014, h01=0x0050, text=» ST A1,OPEKAD,A3«, t00=0x0012, t01=0x0112}
0x1d46…1d64 Head {h00=0x001a, h01=0x0050, text=» ADK A2,FPB:I2-FPB:I1 «, t00=0x0012, t01=0x012a}
0x1d64…1d76 Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0012, t01=0x0148}
0x1d76…1d88 Head {h00=0x000e, h01=0x0050, text=» RB OPE070«, t00=0x0012, t01=0x015a}
0x1d88…1d94 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x016c}
0x1d94…1da2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0178}
0x1da2…1dcc Head {h00=0x0026, h01=0x0050, text=»OPE099 LDKL A12,1 DATA FILE INDEX «, t00=0x0012, t01=0x0186}
0x1dcc…1dea Head {h00=0x001a, h01=0x0050, text=»OPE100 EQU * FILE LOOP«, t00=0x0013, t01=0x0020}
0x1dea…1df4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003e}
0x1df4…1e0c Head {h00=0x0014, h01=0x0050, text=»* OPEN FM FILE«, t00=0x0013, t01=0x0048}
0x1e0c…1e16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0060}
0x1e16…1e36 Head {h00=0x001c, h01=0x0050, text=» LDKL A9,OPEFPB FPB ADDR«, t00=0x0013, t01=0x006a}
0x1e36…1e4a Head {h00=0x0010, h01=0x0050, text=» LDR A8,A10 «, t00=0x0013, t01=0x008a}
0x1e4a…1e6a Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0013, t01=0x009e}
0x1e6a…1e8a Head {h00=0x001c, h01=0x0050, text=» ST A9,ECBBA,A8 FPB ADDR«, t00=0x0013, t01=0x00be}
0x1e8a…1ea2 Head {h00=0x0014, h01=0x0050, text=» LC A5,FPB:BO,A9«, t00=0x0013, t01=0x00de}
0x1ea2…1eb4 Head {h00=0x000e, h01=0x0050, text=» ANK A5,1 «, t00=0x0013, t01=0x00f6}
0x1eb4…1ee0 Head {h00=0x0028, h01=0x0050, text=» SC A5,FPB:BO,A9 ONLY BASIC ALLOWED «, t00=0x0013, t01=0x0108}
0x1ee0…1ef2 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0013, t01=0x0134}
0x1ef2…1f18 Head {h00=0x0022, h01=0x0050, text=» SC A5,FPB:SH,A9 NOT EXCLUSIVE«, t00=0x0013, t01=0x0146}
0x1f18…1f30 Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x0013, t01=0x016c}
0x1f30…1f5a Head {h00=0x0026, h01=0x0050, text=» RF(NE) OPE110 READ FILE PAR ORDER«, t00=0x0013, t01=0x0184}
0x1f5a…1f72 Head {h00=0x0014, h01=0x0050, text=» LDK A7,/A1 OPEN«, t00=0x0014, t01=0x001e}
0x1f72…1f7e Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0014, t01=0x0036}
0x1f7e…1f8e Head {h00=0x000c, h01=0x0050, text=» DATA 15«, t00=0x0014, t01=0x0042}
0x1f8e…1faa Head {h00=0x0018, h01=0x0050, text=» LDR A1,A10 MAIN FDB«, t00=0x0014, t01=0x0052}
0x1faa…1fca Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOT ERR CHECK«, t00=0x0014, t01=0x006e}
0x1fca…1fdc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0014, t01=0x008e}
0x1fdc…1ff6 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) OPEER0 ERR«, t00=0x0014, t01=0x00a0}
0x1ff6…2004 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x00ba}
0x2004…200e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00c8}
0x200e…2028 Head {h00=0x0016, h01=0x0050, text=»* STORE FILE NR «, t00=0x0014, t01=0x00d2}
0x2028…2032 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ec}
0x2032…2050 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A12 LOOP INDEX«, t00=0x0014, t01=0x00f6}
0x2050…2062 Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0014, t01=0x0114}
0x2062…2076 Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A8 «, t00=0x0014, t01=0x0126}
0x2076…209e Head {h00=0x0024, h01=0x0050, text=» SC A6,OPEFNR,A1 OPENED FILE NRS«, t00=0x0014, t01=0x013a}
0x209e…20b2 Head {h00=0x0010, h01=0x0050, text=»OPE110 EQU *«, t00=0x0014, t01=0x0162}
0x20b2…20bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0176}
0x20bc…20dc Head {h00=0x001c, h01=0x0050, text=»* GET FWT ADDR IN A11 «, t00=0x0014, t01=0x0180}
0x20dc…20e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0010}
0x20e6…20fa Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x0015, t01=0x001a}
0x20fa…2120 Head {h00=0x0022, h01=0x0050, text=» LDKL A11,FDBSTA SYST FDB ADDR«, t00=0x0015, t01=0x002e}
0x2120…213a Head {h00=0x0016, h01=0x0050, text=» LDR A3,A6 FILE NR«, t00=0x0015, t01=0x0054}
0x213a…214e Head {h00=0x0010, h01=0x0050, text=»OPE150 EQU *«, t00=0x0015, t01=0x006e}
0x214e…216e Head {h00=0x001c, h01=0x0050, text=» RF(Z) OPE190 END COUNT «, t00=0x0015, t01=0x0082}
0x216e…218c Head {h00=0x001a, h01=0x0050, text=» LDR* A11,A11 NEXT FDB«, t00=0x0015, t01=0x00a2}
0x218c…21ac Head {h00=0x001c, h01=0x0050, text=» ANKL A11,/FFFE USE BIT «, t00=0x0015, t01=0x00c0}
0x21ac…21be Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0015, t01=0x00e0}
0x21be…21d0 Head {h00=0x000e, h01=0x0050, text=» RB OPE150«, t00=0x0015, t01=0x00f2}
0x21d0…21de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0104}
0x21de…220c Head {h00=0x002a, h01=0x0050, text=»OPEERR LDKL A1,REQERR GENERAL ERR CODE«, t00=0x0015, t01=0x0112}
0x220c…221e Head {h00=0x000e, h01=0x0050, text=» RF OPEER2«, t00=0x0015, t01=0x0140}
0x221e…2232 Head {h00=0x0010, h01=0x0050, text=»OPEER0 EQU *«, t00=0x0015, t01=0x0152}
0x2232…224e Head {h00=0x0018, h01=0x0050, text=» LDR A5,A1 RET CODE «, t00=0x0015, t01=0x0166}
0x224e…2260 Head {h00=0x000e, h01=0x0050, text=» ECR A6,A5«, t00=0x0015, t01=0x0182}
0x2260…2280 (22, 0, 400) Head {h00=0x001c, h01=0x0050, text=» ANK A6,/F BIT 4-7 IN RC«, t00=0x0016, t01=0x0004}
0x2280…22a6 Head {h00=0x0022, h01=0x0050, text=» RF(Z) OPEERA NO SPECIAL CODE «, t00=0x0016, t01=0x0024}
0x22a6…22d0 Head {h00=0x0026, h01=0x0050, text=» ANK A6,/A GET BIT 4 AND 6 FROM RC«, t00=0x0016, t01=0x004a}
0x22d0…22f0 Head {h00=0x001c, h01=0x0050, text=» ADK A6,1 B4=9,B5=1,B6=3«, t00=0x0016, t01=0x0074}
0x22f0…2304 Head {h00=0x0010, h01=0x0050, text=»OPEERS EQU *«, t00=0x0016, t01=0x0094}
0x2304…2320 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A10 SYST FDB«, t00=0x0016, t01=0x00a8}
0x2320…234a Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNGET GET CURRENCY BUFFER«, t00=0x0016, t01=0x00c4}
0x234a…236c Head {h00=0x001e, h01=0x0050, text=» SC A6,CRNSTA,A2 STAT CODE«, t00=0x0016, t01=0x00ee}
0x236c…2394 Head {h00=0x0024, h01=0x0050, text=» ANKL A5,/F1EF NOT BIT 4,5,6,11 «, t00=0x0016, t01=0x0110}
0x2394…23b2 Head {h00=0x001a, h01=0x0050, text=» ORK A5,/80 INF AVAIL «, t00=0x0016, t01=0x0138}
0x23b2…23d4 Head {h00=0x001e, h01=0x0050, text=»OPEERA LDR A1,A5 RET CODE «, t00=0x0016, t01=0x0156}
0x23d4…23e8 Head {h00=0x0010, h01=0x0050, text=»OPEER2 EQU *«, t00=0x0016, t01=0x0178}
0x23e8…2410 Head {h00=0x0024, h01=0x0050, text=» LD A9,DWTECB,A10 USER ECB ADDR «, t00=0x0016, t01=0x018c}
0x2410…2432 Head {h00=0x001e, h01=0x0050, text=» ORS A1,ECBRC,A9 SEND CODE«, t00=0x0017, t01=0x0024}
0x2432…2446 Head {h00=0x0010, h01=0x0050, text=» ABL OPEER1 «, t00=0x0017, t01=0x0046}
0x2446…246a Head {h00=0x0020, h01=0x0050, text=»OPEER3 LDK A6,OFLW OVERFLOW «, t00=0x0017, t01=0x005a}
0x246a…247c Head {h00=0x000e, h01=0x0050, text=» RF OPEERQ«, t00=0x0017, t01=0x007e}
0x247c…24a8 Head {h00=0x0028, h01=0x0050, text=»OPEER4 LDK A6,ERPAR WRONG PARAMETER «, t00=0x0017, t01=0x0090}
0x24a8…24cc Head {h00=0x0020, h01=0x0050, text=»OPEERQ LDKL A5,REQERR BIT 0 «, t00=0x0017, t01=0x00bc}
0x24cc…24de Head {h00=0x000e, h01=0x0050, text=» RB OPEERS«, t00=0x0017, t01=0x00e0}
0x24de…2504 Head {h00=0x0022, h01=0x0050, text=»OPEER8 LDK A6,ERKEYL LONG KEY «, t00=0x0017, t01=0x00f2}
0x2504…2516 Head {h00=0x000e, h01=0x0050, text=» RB OPEERQ«, t00=0x0017, t01=0x0118}
0x2516…2524 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x012a}
0x2524…2548 Head {h00=0x0020, h01=0x0050, text=»OPE190 EQU * FWT ADDR IN A11«, t00=0x0017, t01=0x0138}
0x2548…2552 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x015c}
0x2552…2572 Head {h00=0x001c, h01=0x0050, text=»* READ FILE PARAMETERS«, t00=0x0017, t01=0x0166}
0x2572…257c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0186}
0x257c…2596 Head {h00=0x0016, h01=0x0050, text=» STR A6,A8 FILE NR«, t00=0x0017, t01=0x0190}
0x2596…25ae Head {h00=0x0014, h01=0x0050, text=» LDK A7,/83 RFP «, t00=0x0018, t01=0x001a}
0x25ae…25ba Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0018, t01=0x0032}
0x25ba…25ca Head {h00=0x000c, h01=0x0050, text=» DATA 15«, t00=0x0018, t01=0x003e}
0x25ca…25e6 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A10 MAIN FDB«, t00=0x0018, t01=0x004e}
0x25e6…2606 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOT ERR CHECK«, t00=0x0018, t01=0x006a}
0x2606…2628 Head {h00=0x001e, h01=0x0050, text=» ORS A1,ECBRC,A9 RET CODE «, t00=0x0018, t01=0x008a}
0x2628…2648 Head {h00=0x001c, h01=0x0050, text=» LDKL A9,OPEFPB FPB ADDR«, t00=0x0018, t01=0x00ac}
0x2648…265a Head {h00=0x000e, h01=0x0050, text=» CWK A12,1«, t00=0x0018, t01=0x00cc}
0x265a…267c Head {h00=0x001e, h01=0x0050, text=» RF(NE) OPE192 INDEX FILE «, t00=0x0018, t01=0x00de}
0x267c…26a0 Head {h00=0x0020, h01=0x0050, text=» LD A7,NROFIX NR OF INDEXES «, t00=0x0018, t01=0x0100}
0x26a0…26b2 Head {h00=0x000e, h01=0x0050, text=» CWK A7,4 «, t00=0x0018, t01=0x0124}
0x26b2…26d8 Head {h00=0x0022, h01=0x0050, text=» RB(G) OPEERR TOO MANY INDEXES«, t00=0x0018, t01=0x0136}
0x26d8…26ea Head {h00=0x000e, h01=0x0050, text=» SLL A7,1 «, t00=0x0018, t01=0x015c}
0x26ea…26fc Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0018, t01=0x016e}
0x26fc…271a Head {h00=0x001a, h01=0x0050, text=» LDR A12,A7 NEW LOOPER«, t00=0x0018, t01=0x0180}
0x271a…274a Head {h00=0x002c, h01=0x0050, text=» SUR A13,A13 REL ADDR IN TABLES OF OPEN «, t00=0x0019, t01=0x000e}
0x274a…275c Head {h00=0x000e, h01=0x0050, text=» RF OPE191«, t00=0x0019, t01=0x003e}
0x275c…2770 Head {h00=0x0010, h01=0x0050, text=»OPE192 EQU *«, t00=0x0019, t01=0x0050}
0x2770…2784 Head {h00=0x0010, h01=0x0050, text=» LDR A7,A12 «, t00=0x0019, t01=0x0064}
0x2784…27a0 Head {h00=0x0018, h01=0x0050, text=» ANK A7,/FE REL ADDR«, t00=0x0019, t01=0x0078}
0x27a0…27b4 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A7 «, t00=0x0019, t01=0x0094}
0x27b4…27c8 Head {h00=0x0010, h01=0x0050, text=»OPE191 EQU *«, t00=0x0019, t01=0x00a8}
0x27c8…27e0 Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x0019, t01=0x00bc}
0x27e0…280c Head {h00=0x0028, h01=0x0050, text=» ABL(NE) OPE300 READ FILE PAR ORDER «, t00=0x0019, t01=0x00d4}
0x280c…281e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0019, t01=0x0100}
0x281e…2834 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) OPEER2«, t00=0x0019, t01=0x0112}
0x2834…2842 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0128}
0x2842…284c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0136}
0x284c…286a Head {h00=0x001a, h01=0x0050, text=»* CHECK OPENED FILE «, t00=0x0019, t01=0x0140}
0x286a…2874 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x015e}
0x2874…288c Head {h00=0x0014, h01=0x0050, text=» LDK A3,/53 'S' «, t00=0x0019, t01=0x0168}
0x288c…28a4 Head {h00=0x0014, h01=0x0050, text=» CC A3,FPB:FO,A9«, t00=0x0019, t01=0x0180}
0x28a4…28c8 Head {h00=0x0020, h01=0x0050, text=» RB(NE) OPEERR NOT STD FILE «, t00=0x001a, t01=0x0008}
0x28c8…28ec Head {h00=0x0020, h01=0x0050, text=» LC A3,FPB:US,A9 NR OF USERS«, t00=0x001a, t01=0x002c}
0x28ec…28fe Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x001a, t01=0x0050}
0x28fe…291e Head {h00=0x001c, h01=0x0050, text=» RF(Z) OPE195 FIRST OPEN«, t00=0x001a, t01=0x0062}
0x291e…293e Head {h00=0x001c, h01=0x0050, text=» LC A3,DWTOPT,A10 OPTION«, t00=0x001a, t01=0x0082}
0x293e…2950 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x001a, t01=0x00a2}
0x2950…2968 Head {h00=0x0014, h01=0x0050, text=» ANK A3,/02 EXCL«, t00=0x001a, t01=0x00b4}
0x2968…2998 Head {h00=0x002c, h01=0x0050, text=» RB(NZ) OPEERR EXCLUSIVE WANTED IN VAIN «, t00=0x001a, t01=0x00cc}
0x2998…29b6 Head {h00=0x001a, h01=0x0050, text=» ANK A2,/3 WANTED MODE«, t00=0x001a, t01=0x00fc}
0x29b6…29d0 Head {h00=0x0016, h01=0x0050, text=» LC A3,FDBDBR,A11 «, t00=0x001a, t01=0x011a}
0x29d0…29ec Head {h00=0x0018, h01=0x0050, text=» ANK A3,/3 OLD MODE «, t00=0x001a, t01=0x0134}
0x29ec…29fe Head {h00=0x000e, h01=0x0050, text=» CWR A2,A3«, t00=0x001a, t01=0x0150}
0x29fe…2a24 Head {h00=0x0022, h01=0x0050, text=» RB(NE) OPEERR ALL OPEN SAME !«, t00=0x001a, t01=0x0162}
0x2a24…2a5e Head {h00=0x0036, h01=0x0050, text=» LC A3,FDBNIF,A11 NR OF INDEX BEFORE FOR THIS FILE«, t00=0x001a, t01=0x0188}
0x2a5e…2a82 Head {h00=0x0020, h01=0x0050, text=» CW A3,NROFIX NR OF INDEXES «, t00=0x001b, t01=0x0032}
0x2a82…2aaa Head {h00=0x0024, h01=0x0050, text=» RB(NE) OPEER4 ALW SAME INDEXES «, t00=0x001b, t01=0x0056}
0x2aaa…2abe Head {h00=0x0010, h01=0x0050, text=» LD A2,DELAY«, t00=0x001b, t01=0x007e}
0x2abe…2aec Head {h00=0x002a, h01=0x0050, text=» RF(N) OPE193 2ND DELAY WANTED IN VAIN«, t00=0x001b, t01=0x0092}
0x2aec…2b02 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/7FFF«, t00=0x001b, t01=0x00c0}
0x2b02…2b26 Head {h00=0x0020, h01=0x0050, text=» ANS A2,FDBDBR,A11 NO DELAY «, t00=0x001b, t01=0x00d6}
0x2b26…2b3a Head {h00=0x0010, h01=0x0050, text=»OPE193 EQU *«, t00=0x001b, t01=0x00fa}
0x2b3a…2b4e Head {h00=0x0010, h01=0x0050, text=» ABL OPE300 «, t00=0x001b, t01=0x010e}
0x2b4e…2b5c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0122}
0x2b5c…2b70 Head {h00=0x0010, h01=0x0050, text=»OPE195 EQU *«, t00=0x001b, t01=0x0130}
0x2b70…2b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0144}
0x2b7a…2b90 Head {h00=0x0012, h01=0x0050, text=»* CLEAR FDB «, t00=0x001b, t01=0x014e}
0x2b90…2b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0164}
0x2b9a…2bb2 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,FDBMEC «, t00=0x001b, t01=0x016e}
0x2bb2…2bd0 Head {h00=0x001a, h01=0x0050, text=» SUKL A2,FDBECB LENGTH«, t00=0x001b, t01=0x0186}
0x2bd0…2be4 Head {h00=0x0010, h01=0x0050, text=»OPE196 EQU *«, t00=0x001c, t01=0x0014}
0x2be4…2bf6 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x001c, t01=0x0028}
0x2bf6…2c0e Head {h00=0x0014, h01=0x0050, text=» RF(N) OPE200 OK«, t00=0x001c, t01=0x003a}
0x2c0e…2c22 Head {h00=0x0010, h01=0x0050, text=» LDR A7,A11 «, t00=0x001c, t01=0x0052}
0x2c22…2c34 Head {h00=0x000e, h01=0x0050, text=» ADR A7,A2«, t00=0x001c, t01=0x0066}
0x2c34…2c4a Head {h00=0x0012, h01=0x0050, text=» CM FDBECB,A7 «, t00=0x001c, t01=0x0078}
0x2c4a…2c5c Head {h00=0x000e, h01=0x0050, text=» RB OPE196«, t00=0x001c, t01=0x008e}
0x2c5c…2c70 Head {h00=0x0010, h01=0x0050, text=»OPE200 EQU *«, t00=0x001c, t01=0x00a0}
0x2c70…2c84 Head {h00=0x0010, h01=0x0050, text=» LD A2,DELAY«, t00=0x001c, t01=0x00b4}
0x2c84…2cb4 Head {h00=0x002c, h01=0x0050, text=» ST A2,FDBDBR,A11 SET DELAY FOR NEW FILE«, t00=0x001c, t01=0x00c8}
0x2cb4…2cc2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x00f8}
0x2cc2…2ccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0106}
0x2ccc…2cea Head {h00=0x001a, h01=0x0050, text=»* BUILD FWT FDB PART«, t00=0x001c, t01=0x0110}
0x2cea…2cf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012e}
0x2cf4…2d08 Head {h00=0x0010, h01=0x0050, text=»OPE250 EQU *«, t00=0x001c, t01=0x0138}
0x2d08…2d22 Head {h00=0x0016, h01=0x0050, text=» LD A3,FPB:RL,A9 «, t00=0x001c, t01=0x014c}
0x2d22…2d4a Head {h00=0x0024, h01=0x0050, text=» ST A3,FDBRLE,A11 RECORD LENGTH «, t00=0x001c, t01=0x0166}
0x2d4a…2d62 Head {h00=0x0014, h01=0x0050, text=» LC A3,FPB:BF,A9«, t00=0x001c, t01=0x018e}
0x2d62…2d88 Head {h00=0x0022, h01=0x0050, text=» SC A3,FDBBLF,A11 BLOCK FACTOR«, t00=0x001d, t01=0x0016}
0x2d88…2dac Head {h00=0x0020, h01=0x0050, text=» LD A3,NROFIX NR OF INDEXES «, t00=0x001d, t01=0x003c}
0x2dac…2dd8 Head {h00=0x0028, h01=0x0050, text=» SC A3,FDBNIF,A11 NR OF INDEX FILES «, t00=0x001d, t01=0x0060}
0x2dd8…2df2 Head {h00=0x0016, h01=0x0050, text=» LC A3,FPB:FR+1,A9«, t00=0x001d, t01=0x008c}
0x2df2…2e0c Head {h00=0x0016, h01=0x0050, text=» SC A3,FDBLRN,A11 «, t00=0x001d, t01=0x00a6}
0x2e0c…2e26 Head {h00=0x0016, h01=0x0050, text=» LD A3,FPB:FR+2,A9«, t00=0x001d, t01=0x00c0}
0x2e26…2e4e Head {h00=0x0024, h01=0x0050, text=» ST A3,FDBLRN+1,A11 LAST REC NR «, t00=0x001d, t01=0x00da}
0x2e4e…2e68 Head {h00=0x0016, h01=0x0050, text=» LD A3,OPEMXI,A13 «, t00=0x001d, t01=0x0102}
0x2e68…2e94 Head {h00=0x0028, h01=0x0050, text=» ST A3,FDBMIA,A11 MASTER INDEX ADDR «, t00=0x001d, t01=0x011c}
0x2e94…2eba Head {h00=0x0022, h01=0x0050, text=» RF(Z) OPE255 NO MASTER INDEX «, t00=0x001d, t01=0x0148}
0x2eba…2ed2 Head {h00=0x0014, h01=0x0050, text=» LD A3,FPB:KA,A9«, t00=0x001d, t01=0x016e}
0x2ed2…2eec Head {h00=0x0016, h01=0x0050, text=» CW A3,OPEKAD,A13 «, t00=0x001d, t01=0x0186}
0x2eec…2f0c Head {h00=0x001c, h01=0x0050, text=» RB(NE) OPEER4 WRONG KEY«, t00=0x001e, t01=0x0010}
0x2f0c…2f2e Head {h00=0x001e, h01=0x0050, text=» ST A3,FDBKA,A11 KEY ADDR «, t00=0x001e, t01=0x0030}
0x2f2e…2f42 Head {h00=0x0010, h01=0x0050, text=»OPE255 EQU *«, t00=0x001e, t01=0x0052}
0x2f42…2f5a Head {h00=0x0014, h01=0x0050, text=» LC A3,FPB:BO,A9«, t00=0x001e, t01=0x0066}
0x2f5a…2f88 Head {h00=0x002a, h01=0x0050, text=» SLL A3,6 TOSS OPTIONS DELAY AND BASIC«, t00=0x001e, t01=0x007e}
0x2f88…2fa2 Head {h00=0x0016, h01=0x0050, text=» LC A4,DWTOPT,A10 «, t00=0x001e, t01=0x00ac}
0x2fa2…2fbc Head {h00=0x0016, h01=0x0050, text=» ANK A4,/3 OPTIONS«, t00=0x001e, t01=0x00c6}
0x2fbc…2fce Head {h00=0x000e, h01=0x0050, text=» ORR A3,A4«, t00=0x001e, t01=0x00e0}
0x2fce…2fe4 Head {h00=0x0012, h01=0x0050, text=» ANK A4,1 =2 «, t00=0x001e, t01=0x00f2}
0x2fe4…3008 Head {h00=0x0020, h01=0x0050, text=» RF(Z) OPE257 NOT PROTECT =2«, t00=0x001e, t01=0x0108}
0x3008…302e Head {h00=0x0022, h01=0x0050, text=» IM FDBBLZ,A11 COMMIT FLAG =2 «, t00=0x001e, t01=0x012c}
0x302e…3046 Head {h00=0x0014, h01=0x0050, text=»OPE257 EQU * =2«, t00=0x001e, t01=0x0152}
0x3046…3058 Head {h00=0x000e, h01=0x0050, text=» SLL A3,8 «, t00=0x001e, t01=0x016a}
0x3058…3082 Head {h00=0x0026, h01=0x0050, text=» ORS A3,FDBDBR,A11 BASIC + OPTION «, t00=0x001e, t01=0x017c}
0x3082…30a2 Head {h00=0x001c, h01=0x0050, text=»* CALCULATE DMTASK ID «, t00=0x001f, t01=0x0016}
0x30a2…30ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0036}
0x30ac…30dc Head {h00=0x002c, h01=0x0050, text=» LC A3,FWTVOL,A11 FIRST EXTENT VOLUME FC«, t00=0x001f, t01=0x0040}
0x30dc…30ee Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x001f, t01=0x0070}
0x30ee…310c Head {h00=0x001a, h01=0x0050, text=»OPE260 CC A3,DFTAB,A6 «, t00=0x001f, t01=0x0082}
0x310c…312c Head {h00=0x001c, h01=0x0050, text=» RF(E) OPE270 THIS DISC «, t00=0x001f, t01=0x00a0}
0x312c…313e Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x001f, t01=0x00c0}
0x313e…3166 Head {h00=0x0024, h01=0x0050, text=» RB OPE260 SEARCH NEXT DISC CODE«, t00=0x001f, t01=0x00d2}
0x3166…3192 Head {h00=0x0028, h01=0x0050, text=»OPE270 LC A3,DMTIDP,A6 REL DMTASK ID«, t00=0x001f, t01=0x00fa}
0x3192…31ba Head {h00=0x0024, h01=0x0050, text=» SC A3,FDBDMI,A11 MAIN DMTASK ID«, t00=0x001f, t01=0x0126}
0x31ba…31c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x014e}
0x31c4…31e4 Head {h00=0x001c, h01=0x0050, text=»* CALCULATE MAX FDBRRO«, t00=0x001f, t01=0x0158}
0x31e4…31ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0178}
0x31ee…3212 Head {h00=0x0020, h01=0x0050, text=» LD A6,FDBRLE,A11 REC LENGTH«, t00=0x001f, t01=0x0182}
0x3212…3224 Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0020, t01=0x0016}
0x3224…3236 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0020, t01=0x0028}
0x3236…325a Head {h00=0x0020, h01=0x0050, text=» LC A7,FDBBLF,A11 BLOCK FACT«, t00=0x0020, t01=0x003a}
0x325a…326c Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0020, t01=0x005e}
0x326c…328e Head {h00=0x001e, h01=0x0050, text=» CF A14,MPYMOD A1,A2=A6*A7«, t00=0x0020, t01=0x0070}
0x328e…32b2 Head {h00=0x0020, h01=0x0050, text=» ST A2,FDBMRO,A11 MAX FDBRRO«, t00=0x0020, t01=0x0092}
0x32b2…32d2 Head {h00=0x001c, h01=0x0050, text=»* CALCULATE BLOCK SIZE«, t00=0x0020, t01=0x00b6}
0x32d2…32dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00d6}
0x32dc…3300 Head {h00=0x0020, h01=0x0050, text=» AD A2,FDBRLE,A11 BLOCK LGTH«, t00=0x0020, t01=0x00e0}
0x3300…331c Head {h00=0x0018, h01=0x0050, text=» ADK A2,1 STATUS =3 «, t00=0x0020, t01=0x0104}
0x331c…3336 Head {h00=0x0016, h01=0x0050, text=» LDR A1,A2 RESULT «, t00=0x0020, t01=0x0120}
0x3336…3352 Head {h00=0x0018, h01=0x0050, text=» SRL A2,8 SECTOR NR «, t00=0x0020, t01=0x013a}
0x3352…3366 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0020, t01=0x0156}
0x3366…3384 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPE290 NO SPILL«, t00=0x0020, t01=0x016a}
0x3384…3396 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0020, t01=0x0188}
0x3396…33aa Head {h00=0x0010, h01=0x0050, text=»OPE290 EQU *«, t00=0x0021, t01=0x000a}
0x33aa…33ce Head {h00=0x0020, h01=0x0050, text=» SC A2,FDBBLZ,A11 BLOCK SIZE«, t00=0x0021, t01=0x001e}
0x33ce…33e6 Head {h00=0x0014, h01=0x0050, text=» SLL A2,7 WORDS «, t00=0x0021, t01=0x0042}
0x33e6…33fc Head {h00=0x0012, h01=0x0050, text=» CWK A2,BLKMXL«, t00=0x0021, t01=0x005a}
0x33fc…3428 Head {h00=0x0028, h01=0x0050, text=» ABL(G) OPEER4 TOO LARGE BLOCK SIZE «, t00=0x0021, t01=0x0070}
0x3428…3444 Head {h00=0x0018, h01=0x0050, text=» ST A11,FDBADF,A11 «, t00=0x0021, t01=0x009c}
0x3444…3458 Head {h00=0x0010, h01=0x0050, text=»OPE300 EQU *«, t00=0x0021, t01=0x00b8}
0x3458…3480 Head {h00=0x0024, h01=0x0050, text=» ST A11,OPEFWT,A13 SAVE FWT ADDR«, t00=0x0021, t01=0x00cc}
0x3480…3494 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A13«, t00=0x0021, t01=0x00f4}
0x3494…34b4 Head {h00=0x001c, h01=0x0050, text=» ABL(Z) OPE800 DATA FILE«, t00=0x0021, t01=0x0108}
0x34b4…34ca Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0021, t01=0x0128}
0x34ca…34de Head {h00=0x0010, h01=0x0050, text=» LDR A3,A12 «, t00=0x0021, t01=0x013e}
0x34de…34f0 Head {h00=0x000e, h01=0x0050, text=» ANK A3,/1«, t00=0x0021, t01=0x0152}
0x34f0…3512 Head {h00=0x001e, h01=0x0050, text=» ABL(Z) OPE600 INDEX FILE «, t00=0x0021, t01=0x0164}
0x3512…3520 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0186}
0x3520…3548 (34, 0, 400) Head {h00=0x0024, h01=0x0050, text=»OPE400 EQU * MASTER INDEX BRANCH«, t00=0x0022, t01=0x0004}
0x3548…3560 Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x0022, t01=0x002c}
0x3560…358c Head {h00=0x0028, h01=0x0050, text=» ABL(NE) OPE700 ORDER READ FILE PAR «, t00=0x0022, t01=0x0044}
0x358c…35a0 Head {h00=0x0010, h01=0x0050, text=» LDR A8,A10 «, t00=0x0022, t01=0x0070}
0x35a0…35c0 Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0022, t01=0x0084}
0x35c0…35e4 Head {h00=0x0020, h01=0x0050, text=» LD* A3,DWTECB,A10 FILE CODE«, t00=0x0022, t01=0x00a4}
0x35e4…35f8 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0022, t01=0x00c8}
0x35f8…3626 Head {h00=0x002a, h01=0x0050, text=» ST A3,-36,A14 FC ENTRY IN TTAB DMTASK«, t00=0x0022, t01=0x00dc}
0x3626…363e Head {h00=0x0014, h01=0x0050, text=» ST A11,-34,A14 «, t00=0x0022, t01=0x010a}
0x363e…3650 Head {h00=0x000e, h01=0x0050, text=» STR A3,A8«, t00=0x0022, t01=0x0122}
0x3650…3662 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0022, t01=0x0134}
0x3662…3698 Head {h00=0x0032, h01=0x0050, text=» SC A2,FDBDBR,A11 NO SPECIAL FUNCTIONS ALLOWED«, t00=0x0022, t01=0x0146}
0x3698…36c6 Head {h00=0x002a, h01=0x0050, text=» SC A2,FDBBLZ+1,A11 NO COMMIT CHECK =2«, t00=0x0022, t01=0x017c}
0x36c6…36d8 Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0023, t01=0x001a}
0x36d8…3710 Head {h00=0x0034, h01=0x0050, text=» SC A2,FDBDMI,A11 LET DMTASK 1 READ MASTER INDEX«, t00=0x0023, t01=0x002c}
0x3710…371a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0064}
0x371a…374e Head {h00=0x0030, h01=0x0050, text=»* CALC NO OF WORDS NEEDED IN MASTRE INDEX «, t00=0x0023, t01=0x006e}
0x374e…3758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00a2}
0x3758…377a Head {h00=0x001e, h01=0x0050, text=» LD A6,FPB:RL,A9 REC LGTH «, t00=0x0023, t01=0x00ac}
0x377a…378c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0023, t01=0x00ce}
0x378c…37a8 Head {h00=0x0018, h01=0x0050, text=» SUK A1,3 KEY LENGTH«, t00=0x0023, t01=0x00e0}
0x37a8…37cc Head {h00=0x0020, h01=0x0050, text=» CW A1,OPEKYL,A13 REQUESTED «, t00=0x0023, t01=0x00fc}
0x37cc…37e8 Head {h00=0x0018, h01=0x0050, text=» ABL(NE) OPEER4 ERR «, t00=0x0023, t01=0x0120}
0x37e8…380e Head {h00=0x0022, h01=0x0050, text=» LD A7,FPB:FR+2,A9 NO OF RECS «, t00=0x0023, t01=0x013c}
0x380e…383e Head {h00=0x002c, h01=0x0050, text=» CF A14,MPYMOD A1,A2=NO OF BYTES NEEDED «, t00=0x0023, t01=0x0162}
0x383e…3850 (36, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SRC A1,1 «, t00=0x0024, t01=0x0004}
0x3850…3874 Head {h00=0x0020, h01=0x0050, text=» ORR A2,A1 GET MOST SIGN BIT«, t00=0x0024, t01=0x0016}
0x3874…3886 Head {h00=0x000e, h01=0x0050, text=» ADK A2,5 «, t00=0x0024, t01=0x003a}
0x3886…38aa Head {h00=0x0020, h01=0x0050, text=» SRL A2,1 NO OF WORDS NEEDED«, t00=0x0024, t01=0x004c}
0x38aa…38ca Head {h00=0x001c, h01=0x0050, text=» RF(Z) DMT570 WRONG SIZE«, t00=0x0024, t01=0x0070}
0x38ca…38ec Head {h00=0x001e, h01=0x0050, text=» LD A4,MXIND LENGTH MXIND «, t00=0x0024, t01=0x0090}
0x38ec…390a Head {h00=0x001a, h01=0x0050, text=» SUK A4,4 MAX A5 VALUE«, t00=0x0024, t01=0x00b2}
0x390a…3924 Head {h00=0x0016, h01=0x0050, text=» LDKL A5,-2 OFFSET«, t00=0x0024, t01=0x00d0}
0x3924…3938 Head {h00=0x0010, h01=0x0050, text=»DMT540 EQU *«, t00=0x0024, t01=0x00ea}
0x3938…3954 Head {h00=0x0018, h01=0x0050, text=» ADK A5,4 GET ENTRY «, t00=0x0024, t01=0x00fe}
0x3954…3966 Head {h00=0x000e, h01=0x0050, text=» CWR A5,A4«, t00=0x0024, t01=0x011a}
0x3966…398a Head {h00=0x0020, h01=0x0050, text=» RF(G) DMT570 NO ENTRY FOUND«, t00=0x0024, t01=0x012c}
0x398a…39a2 Head {h00=0x0014, h01=0x0050, text=» LD A3,MXIND,A5 «, t00=0x0024, t01=0x0150}
0x39a2…39c2 Head {h00=0x001c, h01=0x0050, text=» RB(Z) DMT540 ZERO ENTRY«, t00=0x0024, t01=0x0168}
0x39c2…39dc Head {h00=0x0016, h01=0x0050, text=» LD A6,MXIND+2,A5 «, t00=0x0024, t01=0x0188}
0x39dc…39fc Head {h00=0x001c, h01=0x0050, text=» RB(N) DMT540 ENTRY USED«, t00=0x0025, t01=0x0012}
0x39fc…3a20 Head {h00=0x0020, h01=0x0050, text=» SUR A6,A2 NO OF SPARE WORDS«, t00=0x0025, t01=0x0032}
0x3a20…3a4a Head {h00=0x0026, h01=0x0050, text=» RB(N) DMT540 LARGER ENTRY NEEDED «, t00=0x0025, t01=0x0056}
0x3a4a…3a54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0080}
0x3a54…3a76 Head {h00=0x001e, h01=0x0050, text=»* SUFFICIENT SPACE FOUND«, t00=0x0025, t01=0x008a}
0x3a76…3a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00ac}
0x3a80…3aa0 Head {h00=0x001c, h01=0x0050, text=» LDKL A1,/8000 USED BIT «, t00=0x0025, t01=0x00b6}
0x3aa0…3aca Head {h00=0x0026, h01=0x0050, text=» ORS A1,MXIND+2,A5 MARK ENTRY USED«, t00=0x0025, t01=0x00d6}
0x3aca…3ade Head {h00=0x0010, h01=0x0050, text=» LDR A7,A12 «, t00=0x0025, t01=0x0100}
0x3ade…3af2 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/0E «, t00=0x0025, t01=0x0114}
0x3af2…3b1c Head {h00=0x0026, h01=0x0050, text=» ST A3,OPEMXI,A7 MASTER INDEX ADDR«, t00=0x0025, t01=0x0128}
0x3b1c…3b36 Head {h00=0x0016, h01=0x0050, text=» LD A7,FPB:FR+2,A9«, t00=0x0025, t01=0x0152}
0x3b36…3b56 Head {h00=0x001c, h01=0x0050, text=» STR A7,A3 NO OF ENTRIES«, t00=0x0025, t01=0x016c}
0x3b56…3b6e Head {h00=0x0014, h01=0x0050, text=» LD A1,FPB:RL,A9«, t00=0x0025, t01=0x018c}
0x3b6e…3b8e Head {h00=0x001c, h01=0x0050, text=» ST A1,2,A3 ENTRY LENGTH«, t00=0x0026, t01=0x0014}
0x3b8e…3bb0 Head {h00=0x001e, h01=0x0050, text=» ADK A3,4 SKIP MX HEADRER «, t00=0x0026, t01=0x0034}
0x3bb0…3bd4 Head {h00=0x0020, h01=0x0050, text=» ST A3,ECBBA,A8 BUFFER ADDR «, t00=0x0026, t01=0x0056}
0x3bd4…3bf4 Head {h00=0x001c, h01=0x0050, text=» ST A1,ECBRL,A8 REQ LGTH«, t00=0x0026, t01=0x007a}
0x3bf4…3c26 Head {h00=0x002e, h01=0x0050, text=» LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION«, t00=0x0026, t01=0x009a}
0x3c26…3c44 Head {h00=0x001a, h01=0x0050, text=» CWR A1,A4 MXIND ENTRY«, t00=0x0026, t01=0x00cc}
0x3c44…3c66 Head {h00=0x001e, h01=0x0050, text=» RF(NL) DMT590 LAST ENTRY «, t00=0x0026, t01=0x00ea}
0x3c66…3c80 Head {h00=0x0016, h01=0x0050, text=» LD A3,MXIND+6,A1 «, t00=0x0026, t01=0x010c}
0x3c80…3ca6 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMT590 NEXT ENTRY USED «, t00=0x0026, t01=0x0126}
0x3ca6…3cb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x014c}
0x3cb0…3cda Head {h00=0x0026, h01=0x0050, text=»* MOVE SPARE WORDS TO NEXT ENTRY«, t00=0x0026, t01=0x0156}
0x3cda…3ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0180}
0x3ce4…3cfe Head {h00=0x0016, h01=0x0050, text=» LD A2,MXIND+2,A1 «, t00=0x0026, t01=0x018a}
0x3cfe…3d24 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/7FFF REMOVE USE BIT «, t00=0x0027, t01=0x0014}
0x3d24…3d36 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A6«, t00=0x0027, t01=0x003a}
0x3d36…3d54 Head {h00=0x001a, h01=0x0050, text=» ORKL A2,/8000 USE BIT«, t00=0x0027, t01=0x004c}
0x3d54…3d6e Head {h00=0x0016, h01=0x0050, text=» ST A2,MXIND+2,A1 «, t00=0x0027, t01=0x006a}
0x3d6e…3da0 Head {h00=0x002e, h01=0x0050, text=» ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER «, t00=0x0027, t01=0x0084}
0x3da0…3dc8 Head {h00=0x0024, h01=0x0050, text=» LD A7,MXIND,A1 PREVIOUS POINTER«, t00=0x0027, t01=0x00b6}
0x3dc8…3de6 Head {h00=0x001a, h01=0x0050, text=» SLL A2,1 NO OF BYTES «, t00=0x0027, t01=0x00de}
0x3de6…3df8 Head {h00=0x000e, h01=0x0050, text=» ADR A7,A2«, t00=0x0027, t01=0x00fc}
0x3df8…3e12 Head {h00=0x0016, h01=0x0050, text=» ST A7,MXIND+4,A1 «, t00=0x0027, t01=0x010e}
0x3e12…3e20 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0128}
0x3e20…3e34 Head {h00=0x0010, h01=0x0050, text=»DMT590 EQU *«, t00=0x0027, t01=0x0136}
0x3e34…3e3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x014a}
0x3e3e…3e74 Head {h00=0x0032, h01=0x0050, text=»* NOW READ MASTER INDEX WITH SEQUENTIAL READ«, t00=0x0027, t01=0x0154}
0x3e74…3e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x018a}
0x3e7e…3e9e (40, 0, 398) Head {h00=0x001c, h01=0x0050, text=» LDKL A7,/0082 SEQ READ «, t00=0x0028, t01=0x0004}
0x3e9e…3eaa Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0028, t01=0x0024}
0x3eaa…3eba Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0028, t01=0x0030}
0x3eba…3ed2 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRC,A8 «, t00=0x0028, t01=0x0040}
0x3ed2…3efc Head {h00=0x0026, h01=0x0050, text=» ANKL A2,/FEFF BIT 7 ONLY RETRIES «, t00=0x0028, t01=0x0058}
0x3efc…3f1a Head {h00=0x001a, h01=0x0050, text=» RF(Z) DMT560 NO ERROR«, t00=0x0028, t01=0x0082}
0x3f1a…3f24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a0}
0x3f24…3f4a Head {h00=0x0022, h01=0x0050, text=»* REMOVE THE ONLY CRN BUFFER«, t00=0x0028, t01=0x00aa}
0x3f4a…3f54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00d0}
0x3f54…3f70 Head {h00=0x0018, h01=0x0050, text=» LDR A4,A11 FDB ADDR«, t00=0x0028, t01=0x00da}
0x3f70…3f94 Head {h00=0x0020, h01=0x0050, text=» LD A5,FDBCRL,A4 CRN BUF ADR«, t00=0x0028, t01=0x00f6}
0x3f94…3fb0 Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMT553 NO CRN«, t00=0x0028, t01=0x011a}
0x3fb0…3fc6 Head {h00=0x0012, h01=0x0050, text=» CM FDBCRL,A4 «, t00=0x0028, t01=0x0136}
0x3fc6…3fd2 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0028, t01=0x014c}
0x3fd2…3fe8 Head {h00=0x0012, h01=0x0050, text=» LD A6,CRNQUE «, t00=0x0028, t01=0x0158}
0x3fe8…3ffa Head {h00=0x000e, h01=0x0050, text=» STR A6,A5«, t00=0x0028, t01=0x016e}
0x3ffa…4010 Head {h00=0x0012, h01=0x0050, text=» ST A5,CRNQUE «, t00=0x0028, t01=0x0180}
0x4010…401c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0029, t01=0x0008}
0x401c…4030 Head {h00=0x0010, h01=0x0050, text=»DMT553 EQU *«, t00=0x0029, t01=0x0014}
0x4030…4042 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0029, t01=0x0028}
0x4042…4064 Head {h00=0x001e, h01=0x0050, text=» ANKL A2,/1000 BIT 3 = EOF«, t00=0x0029, t01=0x003a}
0x4064…4098 Head {h00=0x0030, h01=0x0050, text=» RF(NZ) DMT595 READY ,WHOLIE MXINDEX IS READ«, t00=0x0029, t01=0x005c}
0x4098…40b0 Head {h00=0x0014, h01=0x0050, text=» ABL OPEER2 ERR «, t00=0x0029, t01=0x0090}
0x40b0…40c4 Head {h00=0x0010, h01=0x0050, text=»DMT560 EQU *«, t00=0x0029, t01=0x00a8}
0x40c4…40ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00bc}
0x40ce…40f0 Head {h00=0x001e, h01=0x0050, text=»* RECORD READ,READ NEXRT«, t00=0x0029, t01=0x00c6}
0x40f0…40fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00e8}
0x40fa…4112 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A8 «, t00=0x0029, t01=0x00f2}
0x4112…4136 Head {h00=0x0020, h01=0x0050, text=» ADS A2,ECBBA,A8 REC LENGTH «, t00=0x0029, t01=0x010a}
0x4136…415a Head {h00=0x0020, h01=0x0050, text=» RB DMT590 READ NEXT RECORD «, t00=0x0029, t01=0x012e}
0x415a…416e Head {h00=0x0010, h01=0x0050, text=»DMT570 EQU *«, t00=0x0029, t01=0x0152}
0x416e…4194 Head {h00=0x0022, h01=0x0050, text=» LDK A6,NOCORE CORE EXHAUSTED «, t00=0x0029, t01=0x0166}
0x4194…41a8 Head {h00=0x0010, h01=0x0050, text=» ABL OPEERQ «, t00=0x0029, t01=0x018c}
0x41a8…41cc Head {h00=0x0020, h01=0x0050, text=»* CLOSE MASTER INDEX FILE «, t00=0x002a, t01=0x0010}
0x41cc…41d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0034}
0x41d6…41ea Head {h00=0x0010, h01=0x0050, text=»DMT595 EQU *«, t00=0x002a, t01=0x003e}
0x41ea…4210 Head {h00=0x0022, h01=0x0050, text=» ST A10,-34,A14 CLOSE FC ENTRY«, t00=0x002a, t01=0x0052}
0x4210…422c Head {h00=0x0018, h01=0x0050, text=» LDR A8,A10 FWT ADDR«, t00=0x002a, t01=0x0078}
0x422c…424c Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x002a, t01=0x0094}
0x424c…4274 Head {h00=0x0024, h01=0x0050, text=» CM FPB:FR+2,A9 DO NOT WRITE LRN«, t00=0x002a, t01=0x00b4}
0x4274…4292 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A12 LOOP COUNT«, t00=0x002a, t01=0x00dc}
0x4292…42a4 Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x002a, t01=0x00fa}
0x42a4…42c4 Head {h00=0x001c, h01=0x0050, text=» LC A7,OPEFNR,A7 FILE NR«, t00=0x002a, t01=0x010c}
0x42c4…42dc Head {h00=0x0014, h01=0x0050, text=» SC A7,ECBFC,A8 «, t00=0x002a, t01=0x012c}
0x42dc…4302 Head {h00=0x0022, h01=0x0050, text=» ST A9,ECBBA,A8 PAR BLOCK ADDR«, t00=0x002a, t01=0x0144}
0x4302…431c Head {h00=0x0016, h01=0x0050, text=» LDK A7,/A2 CLOSE «, t00=0x002a, t01=0x016a}
0x431c…434c Head {h00=0x002c, h01=0x0050, text=» CF A14,CLRBUF RELEASE ALL FREE BUFFERS «, t00=0x002a, t01=0x0184}
0x434c…4358 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002b, t01=0x0024}
0x4358…4368 Head {h00=0x000c, h01=0x0050, text=» DATA 15«, t00=0x002b, t01=0x0030}
0x4368…4384 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A10 MAIN FDB«, t00=0x002b, t01=0x0040}
0x4384…43a4 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOT ERR CHECK«, t00=0x002b, t01=0x005c}
0x43a4…43b6 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x002b, t01=0x007c}
0x43b6…43ce Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) OPEER2 «, t00=0x002b, t01=0x008e}
0x43ce…43ee Head {h00=0x001c, h01=0x0050, text=» LDKL A9,OPEFPB FPB ADDR«, t00=0x002b, t01=0x00a6}
0x43ee…440a Head {h00=0x0018, h01=0x0050, text=» RF OPE700 NEXT FILE«, t00=0x002b, t01=0x00c6}
0x440a…4418 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x00e2}
0x4418…4438 Head {h00=0x001c, h01=0x0050, text=»OPE600 EQU * INDEX FILE «, t00=0x002b, t01=0x00f0}
0x4438…4442 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0110}
0x4442…445e Head {h00=0x0018, h01=0x0050, text=»* UPDATE PAR BLOCK«, t00=0x002b, t01=0x011a}
0x445e…4468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0136}
0x4468…4490 Head {h00=0x0024, h01=0x0050, text=» LD A3,OPEFWT DATA FILE FDB ADDR«, t00=0x002b, t01=0x0140}
0x4490…44aa Head {h00=0x0016, h01=0x0050, text=» LC A2,FDBNIF,A3 «, t00=0x002b, t01=0x0168}
0x44aa…44c6 Head {h00=0x0018, h01=0x0050, text=» CM FPB:NI,A9 FILLER«, t00=0x002b, t01=0x0182}
0x44c6…44ea Head {h00=0x0020, h01=0x0050, text=» SC A2,FPB:NI,A9 NR OF INDEX«, t00=0x002c, t01=0x000e}
0x44ea…44fe Head {h00=0x0010, h01=0x0050, text=» LDR A3,A12 «, t00=0x002c, t01=0x0032}
0x44fe…4510 Head {h00=0x000e, h01=0x0050, text=» SRL A3,1 «, t00=0x002c, t01=0x0046}
0x4510…4522 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002c, t01=0x0058}
0x4522…4534 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A9«, t00=0x002c, t01=0x006a}
0x4534…454c Head {h00=0x0014, h01=0x0050, text=» LDKL A5,FPB:I2 «, t00=0x002c, t01=0x007c}
0x454c…456a Head {h00=0x001a, h01=0x0050, text=» SUKL A5,FPB:I1 OFFSET«, t00=0x002c, t01=0x0094}
0x456a…457c Head {h00=0x000e, h01=0x0050, text=» SUR A4,A5«, t00=0x002c, t01=0x00b2}
0x457c…4590 Head {h00=0x0010, h01=0x0050, text=»OPE630 EQU *«, t00=0x002c, t01=0x00c4}
0x4590…45ac Head {h00=0x0018, h01=0x0050, text=» ADR A4,A5 REL ADDR «, t00=0x002c, t01=0x00d8}
0x45ac…45c8 Head {h00=0x0018, h01=0x0050, text=» SUK A2,1 NEXT INDEX«, t00=0x002c, t01=0x00f4}
0x45c8…45de Head {h00=0x0012, h01=0x0050, text=» RB(NZ) OPE630«, t00=0x002c, t01=0x0110}
0x45de…45f0 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x002c, t01=0x0126}
0x45f0…460c Head {h00=0x0018, h01=0x0050, text=» ADK A3,1 TYPE DUPL «, t00=0x002c, t01=0x0138}
0x460c…4630 Head {h00=0x0020, h01=0x0050, text=» ST A3,FPB:I1,A4 ID AND TYPE«, t00=0x002c, t01=0x0154}
0x4630…4648 Head {h00=0x0014, h01=0x0050, text=» CM FPB:I1+2,A4 «, t00=0x002c, t01=0x0178}
0x4648…4660 Head {h00=0x0014, h01=0x0050, text=» CM FPB:I1+4,A4 «, t00=0x002c, t01=0x0190}
0x4660…4672 Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x002d, t01=0x0018}
0x4672…4698 Head {h00=0x0022, h01=0x0050, text=» ST A7,FPB:I1+6,A4 NR OF ITEMS«, t00=0x002d, t01=0x002a}
0x4698…46bc Head {h00=0x0020, h01=0x0050, text=» LD A7,FDBKA,A11 KEY OFFSET «, t00=0x002d, t01=0x0050}
0x46bc…46de Head {h00=0x001e, h01=0x0050, text=» ST A7,FPB:A1,A4 KEY ADDR «, t00=0x002d, t01=0x0074}
0x46de…4700 Head {h00=0x001e, h01=0x0050, text=» LD A7,FDBRLE,A11 REC LGTH«, t00=0x002d, t01=0x0096}
0x4700…4712 Head {h00=0x000e, h01=0x0050, text=» SUK A7,6 «, t00=0x002d, t01=0x00b8}
0x4712…472e Head {h00=0x0018, h01=0x0050, text=» CM FPB:L1,A4 FILLER«, t00=0x002d, t01=0x00ca}
0x472e…4752 Head {h00=0x0020, h01=0x0050, text=» SC A7,FPB:L1,A4 KEY LENGTH «, t00=0x002d, t01=0x00e6}
0x4752…4764 Head {h00=0x000e, h01=0x0050, text=» ADK A7,8 «, t00=0x002d, t01=0x010a}
0x4764…477a Head {h00=0x0012, h01=0x0050, text=» SRL A7,1 WORD«, t00=0x002d, t01=0x011c}
0x477a…4790 Head {h00=0x0012, h01=0x0050, text=» CWK A7,RECBFZ«, t00=0x002d, t01=0x0132}
0x4790…47b0 Head {h00=0x001c, h01=0x0050, text=» ABL(G) OPEER8 LONG KEY «, t00=0x002d, t01=0x0148}
0x47b0…47be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0168}
0x47be…47c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0176}
0x47c8…47e8 Head {h00=0x001c, h01=0x0050, text=»* CALCULATE INDEX SIZE«, t00=0x002d, t01=0x0180}
0x47e8…47f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0010}
0x47f2…480a Head {h00=0x0014, h01=0x0050, text=» LD A1,FPB:S1,A9«, t00=0x002e, t01=0x001a}
0x480a…4834 Head {h00=0x0026, h01=0x0050, text=» LD A2,FPB:S1+2,A9 SIZE IN SECTORS«, t00=0x002e, t01=0x0032}
0x4834…4858 Head {h00=0x0020, h01=0x0050, text=» LC A6,FDBBLZ,A11 BLOCK SIZE«, t00=0x002e, t01=0x005c}
0x4858…486c Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x002e, t01=0x0080}
0x486c…4882 Head {h00=0x0012, h01=0x0050, text=» CF A14,DIVMOD«, t00=0x002e, t01=0x0094}
0x4882…48a2 Head {h00=0x001c, h01=0x0050, text=» ABL(O) OPEER3 LONG FILE«, t00=0x002e, t01=0x00aa}
0x48a2…48b8 Head {h00=0x0012, h01=0x0050, text=» CM FPB:IS,A9 «, t00=0x002e, t01=0x00ca}
0x48b8…48e2 Head {h00=0x0026, h01=0x0050, text=» ST A2,FPB:IS+2,A9 SIZE IN BLOCKS «, t00=0x002e, t01=0x00e0}
0x48e2…48ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x010a}
0x48ec…490e Head {h00=0x001e, h01=0x0050, text=»* GET INDEX VOLUME NAME «, t00=0x002e, t01=0x0114}
0x490e…4918 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0136}
0x4918…4930 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,FPB:V1 «, t00=0x002e, t01=0x0140}
0x4930…4946 Head {h00=0x0012, h01=0x0050, text=» LDK A3,FPB:IV«, t00=0x002e, t01=0x0158}
0x4946…4962 Head {h00=0x0018, h01=0x0050, text=» ADR A1,A9 FROM ADDR«, t00=0x002e, t01=0x016e}
0x4962…4978 Head {h00=0x0012, h01=0x0050, text=» ADR A3,A9 TO «, t00=0x002e, t01=0x018a}
0x4978…498e Head {h00=0x0012, h01=0x0050, text=» LDK A2,6 LGTH«, t00=0x002f, t01=0x0010}
0x498e…49a8 Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x002f, t01=0x0026}
0x49a8…49b4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x0040}
0x49b4…49c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x004c}
0x49c2…49cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x005a}
0x49cc…49ea Head {h00=0x001a, h01=0x0050, text=»OPE700 EQU * NEXT FILE«, t00=0x002f, t01=0x0064}
0x49ea…4a08 Head {h00=0x001a, h01=0x0050, text=» IFF INDXAC=1 NO INDEX«, t00=0x002f, t01=0x0082}
0x4a08…4a24 Head {h00=0x0018, h01=0x0050, text=» RF OPE900 NO INDEX «, t00=0x002f, t01=0x00a0}
0x4a24…4a30 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00bc}
0x4a30…4a52 Head {h00=0x001e, h01=0x0050, text=» IFT INDXAC=1 INDEXES YES «, t00=0x002f, t01=0x00c8}
0x4a52…4a70 Head {h00=0x001a, h01=0x0050, text=» SUKL A12,1 FILE LOOP «, t00=0x002f, t01=0x00ea}
0x4a70…4a82 Head {h00=0x000e, h01=0x0050, text=» CWK A12,1«, t00=0x002f, t01=0x0108}
0x4a82…4ab0 Head {h00=0x002a, h01=0x0050, text=» ABL(NG) OPE900 ALL INDEXES ARE OPENED«, t00=0x002f, t01=0x011a}
0x4ab0…4ac8 Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x002f, t01=0x0148}
0x4ac8…4af2 Head {h00=0x0026, h01=0x0050, text=» RF(NE) OPE740 READ FILE PAR ORDER«, t00=0x002f, t01=0x0160}
0x4af2…4afc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x018a}
0x4afc…4b2c (48, 0, 400) Head {h00=0x002c, h01=0x0050, text=»* SKIP MASTER INDEX AT SECONDARY OPEN «, t00=0x0030, t01=0x0004}
0x4b2c…4b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0034}
0x4b36…4b56 Head {h00=0x001c, h01=0x0050, text=» LD A1,OPEFWT DATA FILE «, t00=0x0030, t01=0x003e}
0x4b56…4b6e Head {h00=0x0014, h01=0x0050, text=» LC A1,FWTPAR,A1«, t00=0x0030, t01=0x005e}
0x4b6e…4b96 Head {h00=0x0024, h01=0x0050, text=» ANK A1,/3E NR OF OPEN BEYOND 1 «, t00=0x0030, t01=0x0076}
0x4b96…4bb2 Head {h00=0x0018, h01=0x0050, text=» RF(Z) OPE710 FIRST «, t00=0x0030, t01=0x009e}
0x4bb2…4bd6 Head {h00=0x0020, h01=0x0050, text=» ANKL A12,/E NO MASTER INDEX«, t00=0x0030, t01=0x00ba}
0x4bd6…4bea Head {h00=0x0010, h01=0x0050, text=»OPE710 EQU *«, t00=0x0030, t01=0x00de}
0x4bea…4bf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00f2}
0x4bf4…4c0e Head {h00=0x0016, h01=0x0050, text=»* NEXT FILE NAME«, t00=0x0030, t01=0x00fc}
0x4c0e…4c22 Head {h00=0x0010, h01=0x0050, text=» LDR A7,A12 «, t00=0x0030, t01=0x0116}
0x4c22…4c3e Head {h00=0x0018, h01=0x0050, text=» SLL A7,1 WORD ADDR «, t00=0x0030, t01=0x012a}
0x4c3e…4c70 Head {h00=0x002e, h01=0x0050, text=» LD A1,OPEFN,A7 FIRST 2 CHAR IN FILE NAME «, t00=0x0030, t01=0x0146}
0x4c70…4c92 Head {h00=0x001e, h01=0x0050, text=» ST A1,FPB:FN,A9 FILE NAME«, t00=0x0030, t01=0x0178}
0x4c92…4c9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x000a}
0x4c9c…4cc6 Head {h00=0x0026, h01=0x0050, text=»* FETCH VOLUME NAME FOR INDEXES «, t00=0x0031, t01=0x0014}
0x4cc6…4cd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x003e}
0x4cd0…4cf2 Head {h00=0x001e, h01=0x0050, text=» LDKL A1,INDVOL FROM ADDR «, t00=0x0031, t01=0x0048}
0x4cf2…4d04 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A9«, t00=0x0031, t01=0x006a}
0x4d04…4d24 Head {h00=0x001c, h01=0x0050, text=» ADKL A3,FPB:V1 TO ADDR «, t00=0x0031, t01=0x007c}
0x4d24…4d36 Head {h00=0x000e, h01=0x0050, text=» LDK A2,6 «, t00=0x0031, t01=0x009c}
0x4d36…4d5c Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTWM MOVE VOLUME NAME«, t00=0x0031, t01=0x00ae}
0x4d5c…4d66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00d4}
0x4d66…4d94 Head {h00=0x002a, h01=0x0050, text=»* MOVE SPACES TO OTHER VOLUME NAMES «, t00=0x0031, t01=0x00de}
0x4d94…4d9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x010c}
0x4d9e…4dc8 Head {h00=0x0026, h01=0x0050, text=» LDK A6,30 NR OF VOLUME NAMES * 10«, t00=0x0031, t01=0x0116}
0x4dc8…4ddc Head {h00=0x0010, h01=0x0050, text=»OPE750 EQU *«, t00=0x0031, t01=0x0140}
0x4ddc…4dee Head {h00=0x000e, h01=0x0050, text=» SUK A6,10«, t00=0x0031, t01=0x0154}
0x4dee…4e08 Head {h00=0x0016, h01=0x0050, text=» RF(N) OPE770 ALL «, t00=0x0031, t01=0x0166}
0x4e08…4e2a Head {h00=0x001e, h01=0x0050, text=» LDKL A1,OPESPA FROM ADDR «, t00=0x0031, t01=0x0180}
0x4e2a…4e3c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A9«, t00=0x0032, t01=0x0012}
0x4e3c…4e54 Head {h00=0x0014, h01=0x0050, text=» ADKL A3,FPB:V2 «, t00=0x0032, t01=0x0024}
0x4e54…4e6e Head {h00=0x0016, h01=0x0050, text=» ADR A3,A6 TO ADDR«, t00=0x0032, t01=0x003c}
0x4e6e…4e8a Head {h00=0x0018, h01=0x0050, text=» LDK A2,6 NR OF CHAR«, t00=0x0032, t01=0x0056}
0x4e8a…4ea0 Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTWM «, t00=0x0032, t01=0x0072}
0x4ea0…4eb2 Head {h00=0x000e, h01=0x0050, text=» RB OPE750«, t00=0x0032, t01=0x0088}
0x4eb2…4ee4 Head {h00=0x002e, h01=0x0050, text=»OPE740 EQU * GET FILE NR FOR READ FILE PAR«, t00=0x0032, t01=0x009a}
0x4ee4…4ef8 Head {h00=0x0010, h01=0x0050, text=» LDR A7,A12 «, t00=0x0032, t01=0x00cc}
0x4ef8…4f0a Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0032, t01=0x00e0}
0x4f0a…4f22 Head {h00=0x0014, h01=0x0050, text=» LC A6,OPEFNR,A7«, t00=0x0032, t01=0x00f2}
0x4f22…4f36 Head {h00=0x0010, h01=0x0050, text=»OPE770 EQU *«, t00=0x0032, t01=0x010a}
0x4f36…4f5c Head {h00=0x0022, h01=0x0050, text=» CM DELAY NO DELAY FOR INDEXES«, t00=0x0032, t01=0x011e}
0x4f5c…4f86 Head {h00=0x0026, h01=0x0050, text=» CM NROFIX NO INDEX FOR NEXT FILE «, t00=0x0032, t01=0x0144}
0x4f86…4f9a Head {h00=0x0010, h01=0x0050, text=» ABL OPE100 «, t00=0x0032, t01=0x016e}
0x4f9a…4fa6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0182}
0x4fa6…4fb4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x018e}
0x4fb4…4fd2 Head {h00=0x001a, h01=0x0050, text=»OPE800 EQU * DATA FILE«, t00=0x0033, t01=0x000c}
0x4fd2…4fdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x002a}
0x4fdc…4ffe Head {h00=0x001e, h01=0x0050, text=»* UPDATE USER PAR BLOCK «, t00=0x0033, t01=0x0034}
0x4ffe…5008 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0056}
0x5008…5022 Head {h00=0x0016, h01=0x0050, text=» LC A2,FDBNIF,A11 «, t00=0x0033, t01=0x0060}
0x5022…5036 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0033, t01=0x007a}
0x5036…5054 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPE830 NO INDEX«, t00=0x0033, t01=0x008e}
0x5054…5066 Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0033, t01=0x00ac}
0x5066…507a Head {h00=0x0010, h01=0x0050, text=»OPE830 EQU *«, t00=0x0033, t01=0x00be}
0x507a…509c Head {h00=0x001e, h01=0x0050, text=» SC A2,FPB:FO,A9 FILE ORG «, t00=0x0033, t01=0x00d2}
0x509c…50ae Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0033, t01=0x00f4}
0x50ae…50d4 Head {h00=0x0022, h01=0x0050, text=» SC A2,FPB:FO+1,A9 DEVICE TYPE«, t00=0x0033, t01=0x0106}
0x50d4…50f2 Head {h00=0x001a, h01=0x0050, text=» LC A2,OPEFNR FILE NR «, t00=0x0033, t01=0x012c}
0x50f2…510a Head {h00=0x0014, h01=0x0050, text=» SC A2,FPB:FM,A9«, t00=0x0033, t01=0x014a}
0x510a…5124 Head {h00=0x0016, h01=0x0050, text=» LD A2,FDBDBR,A11 «, t00=0x0033, t01=0x0162}
0x5124…5136 Head {h00=0x000e, h01=0x0050, text=» SRL A2,14«, t00=0x0033, t01=0x017c}
0x5136…5168 Head {h00=0x002e, h01=0x0050, text=» SC A2,FPB:BO,A9 DELAY BASIC TOSS OPTIONS «, t00=0x0033, t01=0x018e}
0x5168…5172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0030}
0x5172…519c Head {h00=0x0026, h01=0x0050, text=»* CONVERT SIZE TO NR OF RECORDS «, t00=0x0034, t01=0x003a}
0x519c…51a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0064}
0x51a6…51c2 Head {h00=0x0018, h01=0x0050, text=» LDK A5,3 4 VOLUMES «, t00=0x0034, t01=0x006e}
0x51c2…51d6 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A9 «, t00=0x0034, t01=0x008a}
0x51d6…51ea Head {h00=0x0010, h01=0x0050, text=»OPE850 EQU *«, t00=0x0034, t01=0x009e}
0x51ea…5216 Head {h00=0x0028, h01=0x0050, text=» LD A1,FPB:S1,A13 LENGTH IN SECTORS «, t00=0x0034, t01=0x00b2}
0x5216…5232 Head {h00=0x0018, h01=0x0050, text=» LD A2,FPB:S1+2,A13 «, t00=0x0034, t01=0x00de}
0x5232…5260 Head {h00=0x002a, h01=0x0050, text=» LC A6,FDBBLZ,A11 NR OF SECT IN BLOCK «, t00=0x0034, t01=0x00fa}
0x5260…5274 Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x0034, t01=0x0128}
0x5274…528a Head {h00=0x0012, h01=0x0050, text=» CF A14,DIVMOD«, t00=0x0034, t01=0x013c}
0x528a…52aa Head {h00=0x001c, h01=0x0050, text=» ABL(O) OPEER3 OVERFLOW «, t00=0x0034, t01=0x0152}
0x52aa…52ca Head {h00=0x001c, h01=0x0050, text=» LDR A6,A2 NR OF BLOCKS «, t00=0x0034, t01=0x0172}
0x52ca…52f6 (53, 0, 400) Head {h00=0x0028, h01=0x0050, text=» LC A7,FDBBLF,A11 NR OF REC IN BLOCK«, t00=0x0035, t01=0x0004}
0x52f6…530a Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0035, t01=0x0030}
0x530a…532c Head {h00=0x001e, h01=0x0050, text=» CF A14,MPYMOD NR OF RECS «, t00=0x0035, t01=0x0044}
0x532c…5346 Head {h00=0x0016, h01=0x0050, text=» ST A1,FPB:S1,A13 «, t00=0x0035, t01=0x0066}
0x5346…5362 Head {h00=0x0018, h01=0x0050, text=» ST A2,FPB:S1+2,A13 «, t00=0x0035, t01=0x0080}
0x5362…5376 Head {h00=0x0010, h01=0x0050, text=» ADKL A13,10«, t00=0x0035, t01=0x009c}
0x5376…5388 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0035, t01=0x00b0}
0x5388…53ac Head {h00=0x0020, h01=0x0050, text=» RB(NN) OPE850 MORE VOLUMES «, t00=0x0035, t01=0x00c2}
0x53ac…53b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00e6}
0x53b6…53dc Head {h00=0x0022, h01=0x0050, text=»* MOVE PART OF BLOCK TO USER«, t00=0x0035, t01=0x00f0}
0x53dc…53e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0116}
0x53e6…53fe Head {h00=0x0014, h01=0x0050, text=» LDKL A3,FPB:FR «, t00=0x0035, t01=0x0120}
0x53fe…541c Head {h00=0x001a, h01=0x0050, text=» SUKL A3,FPB:RL LENGTH«, t00=0x0035, t01=0x0138}
0x541c…5444 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTECB,A10 USER ECB ADDR «, t00=0x0035, t01=0x0156}
0x5444…5466 Head {h00=0x001e, h01=0x0050, text=» LD A1,ECBRL,A4 REQ LENGTH«, t00=0x0035, t01=0x017e}
0x5466…5486 Head {h00=0x001c, h01=0x0050, text=» SUK A1,FPBRES RESERVED «, t00=0x0036, t01=0x0010}
0x5486…5498 Head {h00=0x000e, h01=0x0050, text=» CWR A3,A1«, t00=0x0036, t01=0x0030}
0x5498…54bc Head {h00=0x0020, h01=0x0050, text=» RF(NG) OPE860 TAKE SHORTEST«, t00=0x0036, t01=0x0042}
0x54bc…54ce Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0036, t01=0x0066}
0x54ce…54e2 Head {h00=0x0010, h01=0x0050, text=»OPE860 EQU *«, t00=0x0036, t01=0x0078}
0x54e2…54f4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0036, t01=0x008c}
0x54f4…550a Head {h00=0x0012, h01=0x0050, text=» ADK A1,FPBRES«, t00=0x0036, t01=0x009e}
0x550a…5536 Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A4 SET EFFECTIVE LENGTH«, t00=0x0036, t01=0x00b4}
0x5536…5552 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A9 FROM ADDR«, t00=0x0036, t01=0x00e0}
0x5552…5568 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0036, t01=0x00fc}
0x5568…5588 Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBBA,A4 TO ADDR «, t00=0x0036, t01=0x0112}
0x5588…55ae Head {h00=0x0022, h01=0x0050, text=» ADK A2,FPBRES RESERVED FIELD «, t00=0x0036, t01=0x0132}
0x55ae…55d6 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTTAB,A10 TTAB ADDR USER«, t00=0x0036, t01=0x0158}
0x55d6…55ec Head {h00=0x0012, h01=0x0050, text=» CF A14,MOV:SU«, t00=0x0036, t01=0x0180}
0x55ec…55f8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0008}
0x55f8…560e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0037, t01=0x0014}
0x560e…5628 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A3 LENGTH «, t00=0x0037, t01=0x002a}
0x5628…5648 Head {h00=0x001c, h01=0x0050, text=» LD A3,ECBBA,A4 TO ADDR «, t00=0x0037, t01=0x0044}
0x5648…566c Head {h00=0x0020, h01=0x0050, text=» ADK A3,FPBRES RESERVED ITEM«, t00=0x0037, t01=0x0064}
0x566c…5686 Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x0037, t01=0x0088}
0x5686…5692 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00a2}
0x5692…569c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ae}
0x569c…56c4 Head {h00=0x0024, h01=0x0050, text=»* ADJUST FILE NAME FOR INDEXES«, t00=0x0037, t01=0x00b8}
0x56c4…56ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00e0}
0x56ce…56e0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A9«, t00=0x0037, t01=0x00ea}
0x56e0…5702 Head {h00=0x001e, h01=0x0050, text=» ADKL A1,FPB:FN FROM ADDR «, t00=0x0037, t01=0x00fc}
0x5702…5714 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0037, t01=0x011e}
0x5714…5728 Head {h00=0x0010, h01=0x0050, text=» ADK A3,2 TO«, t00=0x0037, t01=0x0130}
0x5728…5744 Head {h00=0x0018, h01=0x0050, text=» LDK A2,6 NO OF CHAR«, t00=0x0037, t01=0x0144}
0x5744…5760 Head {h00=0x0018, h01=0x0050, text=» CF A14,DMTBMR MOVE «, t00=0x0037, t01=0x0160}
0x5760…5774 Head {h00=0x0010, h01=0x0050, text=» ABL OPE700 «, t00=0x0037, t01=0x017c}
0x5774…5782 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0190}
0x5782…579e Head {h00=0x0018, h01=0x0050, text=»OPE900 EQU * FINISH «, t00=0x0038, t01=0x000e}
0x579e…57c8 Head {h00=0x0026, h01=0x0050, text=» LD A11,OPEFWT FDB ADDR DATA FILE «, t00=0x0038, t01=0x002a}
0x57c8…57e0 Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x0038, t01=0x0054}
0x57e0…580a Head {h00=0x0026, h01=0x0050, text=» RF(NE) OPE990 READ FILE PAR ORDER«, t00=0x0038, t01=0x006c}
0x580a…5814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0096}
0x5814…5840 Head {h00=0x0028, h01=0x0050, text=»* STORE FDB ADDRESSES IN ALL FDB'S«, t00=0x0038, t01=0x00a0}
0x5840…584a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00cc}
0x584a…586c Head {h00=0x001e, h01=0x0050, text=» LDK A5,10 NR OF FILES * 2«, t00=0x0038, t01=0x00d6}
0x586c…5880 Head {h00=0x0010, h01=0x0050, text=»DMT625 EQU *«, t00=0x0038, t01=0x00f8}
0x5880…5892 Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0038, t01=0x010c}
0x5892…58b8 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMT635 ALL FDB UPPDATED«, t00=0x0038, t01=0x011e}
0x58b8…58c0 Head {h00=0x0004, h01=0x0050, t00=0x0038, t01=0x0144}
0x58c0…58e8 Head {h00=0x0024, h01=0x0050, text=» LD A3,OPEFWT,A5 FDB ADDR INDEX «, t00=0x0038, t01=0x014c}
0x58e8…590c Head {h00=0x0020, h01=0x0050, text=» RB(Z) DMT625 NO INDEX FILE «, t00=0x0038, t01=0x0174}
0x590c…592e Head {h00=0x001e, h01=0x0050, text=» LDKL A1,OPEFWT FROM ADDR «, t00=0x0039, t01=0x0008}
0x592e…594e Head {h00=0x001c, h01=0x0050, text=» ADKL A3,FDBADF TO ADDR «, t00=0x0039, t01=0x002a}
0x594e…596c Head {h00=0x001a, h01=0x0050, text=» LDK A2,10 NO OF BYTES«, t00=0x0039, t01=0x004a}
0x596c…598e Head {h00=0x001e, h01=0x0050, text=» CF A14,DMTWM MOVE 5 WORDS«, t00=0x0039, t01=0x0068}
0x598e…59a0 Head {h00=0x000e, h01=0x0050, text=» RB DMT625«, t00=0x0039, t01=0x008a}
0x59a0…59b4 Head {h00=0x0010, h01=0x0050, text=»DMT635 EQU *«, t00=0x0039, t01=0x009c}
0x59b4…59be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00b0}
0x59be…59e8 Head {h00=0x0026, h01=0x0050, text=»* CONNECT FILE CODE OF DATA FILE«, t00=0x0039, t01=0x00ba}
0x59e8…59f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00e4}
0x59f2…5a16 Head {h00=0x0020, h01=0x0050, text=» LD* A2,DWTECB,A10 FILE CODE«, t00=0x0039, t01=0x00ee}
0x5a16…5a2a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0039, t01=0x0112}
0x5a2a…5a44 Head {h00=0x0016, h01=0x0050, text=» SC A2,OPEFCD SAVE«, t00=0x0039, t01=0x0126}
0x5a44…5a64 Head {h00=0x001c, h01=0x0050, text=» LDK A5,0 TTAB AND CDTAB«, t00=0x0039, t01=0x0140}
0x5a64…5a8c Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTTAB,A10 USER TTAB ADDR«, t00=0x0039, t01=0x0160}
0x5a8c…5aa2 Head {h00=0x0012, h01=0x0050, text=» CF A14,FNDFDB«, t00=0x0039, t01=0x0188}
0x5aa2…5ac0 Head {h00=0x001a, h01=0x0050, text=» ST A11,2,A4 FWT ADDR «, t00=0x003a, t01=0x000e}
0x5ac0…5aca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x002c}
0x5aca…5aec Head {h00=0x001e, h01=0x0050, text=»* REMOVE CURRENCY BUFFER«, t00=0x003a, t01=0x0036}
0x5aec…5af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0058}
0x5af6…5b0a Head {h00=0x0010, h01=0x0050, text=» LDR A1,A10 «, t00=0x003a, t01=0x0062}
0x5b0a…5b2c Head {h00=0x001e, h01=0x0050, text=» CF A14,CRNGET ADDR IN A2 «, t00=0x003a, t01=0x0076}
0x5b2c…5b48 Head {h00=0x0018, h01=0x0050, text=» ADKL A1,FDBCRL ROOT«, t00=0x003a, t01=0x0098}
0x5b48…5b54 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x003a, t01=0x00b4}
0x5b54…5b68 Head {h00=0x0010, h01=0x0050, text=»OPE940 EQU *«, t00=0x003a, t01=0x00c0}
0x5b68…5b88 Head {h00=0x001c, h01=0x0050, text=» LDR* A3,A1 NEXT BUFFER «, t00=0x003a, t01=0x00d4}
0x5b88…5b9a Head {h00=0x000e, h01=0x0050, text=» CWR A3,A2«, t00=0x003a, t01=0x00f4}
0x5b9a…5bb4 Head {h00=0x0016, h01=0x0050, text=» RF(E) OPE950 THIS«, t00=0x003a, t01=0x0106}
0x5bb4…5bc6 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x003a, t01=0x0120}
0x5bc6…5bd8 Head {h00=0x000e, h01=0x0050, text=» RB OPE940«, t00=0x003a, t01=0x0132}
0x5bd8…5bec Head {h00=0x0010, h01=0x0050, text=»OPE950 EQU *«, t00=0x003a, t01=0x0144}
0x5bec…5c04 Head {h00=0x0014, h01=0x0050, text=» LDR* A4,A3 NEXT«, t00=0x003a, t01=0x0158}
0x5c04…5c16 Head {h00=0x000e, h01=0x0050, text=» STR A4,A1«, t00=0x003a, t01=0x0170}
0x5c16…5c2c Head {h00=0x0012, h01=0x0050, text=» LD A3,CRNQUE «, t00=0x003a, t01=0x0182}
0x5c2c…5c3e Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x003b, t01=0x0008}
0x5c3e…5c54 Head {h00=0x0012, h01=0x0050, text=» ST A2,CRNQUE «, t00=0x003b, t01=0x001a}
0x5c54…5c66 Head {h00=0x000e, h01=0x0050, text=» ENB =1 «, t00=0x003b, t01=0x0030}
0x5c66…5c7a Head {h00=0x0010, h01=0x0050, text=»OPE990 EQU *«, t00=0x003b, t01=0x0042}
0x5c7a…5c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0056}
0x5c84…5cba Head {h00=0x0032, h01=0x0050, text=»* CHECK USER SIZE AND UPDATE PARAMETER BLOCK«, t00=0x003b, t01=0x0060}
0x5cba…5cc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0096}
0x5cc4…5cda Head {h00=0x0012, h01=0x0050, text=» LDK A1,FPB:IV«, t00=0x003b, t01=0x00a0}
0x5cda…5d00 Head {h00=0x0022, h01=0x0050, text=» LC A2,FDBNIF,A11 NR OF INDEX «, t00=0x003b, t01=0x00b6}
0x5d00…5d12 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x003b, t01=0x00dc}
0x5d12…5d28 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x003b, t01=0x00ee}
0x5d28…5d3e Head {h00=0x0012, h01=0x0050, text=» RF(Z) OPE994 «, t00=0x003b, t01=0x0104}
0x5d3e…5d50 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x003b, t01=0x011a}
0x5d50…5d62 Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x003b, t01=0x012c}
0x5d62…5d74 Head {h00=0x000e, h01=0x0050, text=» SLL A3,2 «, t00=0x003b, t01=0x013e}
0x5d74…5d94 Head {h00=0x001c, h01=0x0050, text=» ADR A2,A3 MULT WITH 12 «, t00=0x003b, t01=0x0150}
0x5d94…5daa Head {h00=0x0012, h01=0x0050, text=» ADK A2,FPB:I1«, t00=0x003b, t01=0x0170}
0x5daa…5dd0 Head {h00=0x0022, h01=0x0050, text=» SUR A2,A1 MAX NR OF REM CHAR «, t00=0x003b, t01=0x0186}
0x5dd0…5de4 Head {h00=0x0010, h01=0x0050, text=»OPE994 EQU *«, t00=0x003c, t01=0x001c}
0x5de4…5df0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0030}
0x5df0…5e0c Head {h00=0x0018, h01=0x0050, text=» ADR A1,A9 FROM ADDR«, t00=0x003c, t01=0x003c}
0x5e0c…5e2e Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTECB,A10 USER ECB«, t00=0x003c, t01=0x0058}
0x5e2e…5e4e Head {h00=0x001c, h01=0x0050, text=» LD A4,ECBRL,A3 TOT LGTH«, t00=0x003c, t01=0x007a}
0x5e4e…5e6c Head {h00=0x001a, h01=0x0050, text=» SUK A4,FPB:IV+FPBRES «, t00=0x003c, t01=0x009a}
0x5e6c…5e88 Head {h00=0x0018, h01=0x0050, text=» CWR A2,A4 REM LGTH «, t00=0x003c, t01=0x00b8}
0x5e88…5eac Head {h00=0x0020, h01=0x0050, text=» RF(NG) OPE995 TAKE SHORTEST«, t00=0x003c, t01=0x00d4}
0x5eac…5ebe Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x003c, t01=0x00f8}
0x5ebe…5ed2 Head {h00=0x0010, h01=0x0050, text=»OPE995 EQU *«, t00=0x003c, t01=0x010a}
0x5ed2…5ee4 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x003c, t01=0x011e}
0x5ee4…5f02 Head {h00=0x001a, h01=0x0050, text=» ADK A4,FPB:IV+FPBRES «, t00=0x003c, t01=0x0130}
0x5f02…5f28 Head {h00=0x0022, h01=0x0050, text=» ST A4,ECBEL,A3 SET EFF LENGTH«, t00=0x003c, t01=0x014e}
0x5f28…5f3e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003c, t01=0x0174}
0x5f3e…5f5e Head {h00=0x001c, h01=0x0050, text=» LD A3,ECBBA,A3 TO ADDR «, t00=0x003c, t01=0x018a}
0x5f5e…5f7c Head {h00=0x001a, h01=0x0050, text=» ADK A3,FPB:IV+FPBRES «, t00=0x003d, t01=0x001a}
0x5f7c…5f96 Head {h00=0x0016, h01=0x0050, text=» CF A14,DMTBM MOVE«, t00=0x003d, t01=0x0038}
0x5f96…5fa2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0052}
0x5fa2…5fb8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x003d, t01=0x005e}
0x5fb8…5fca Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x003d, t01=0x0074}
0x5fca…5fe2 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBBA,A3 «, t00=0x003d, t01=0x0086}
0x5fe2…6008 Head {h00=0x0022, h01=0x0050, text=» ADK A2,FPB:IV+FPBRES TO ADDER«, t00=0x003d, t01=0x009e}
0x6008…6022 Head {h00=0x0016, h01=0x0050, text=» LDR A3,A4 LENGTH «, t00=0x003d, t01=0x00c4}
0x6022…604a Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTTAB,A10 USER TTAB ADDR«, t00=0x003d, t01=0x00de}
0x604a…6060 Head {h00=0x0012, h01=0x0050, text=» CF A14,MOV:SU«, t00=0x003d, t01=0x0106}
0x6060…606c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x011c}
0x606c…6090 Head {h00=0x0020, h01=0x0050, text=» LDR A6,A10 SYSTEM FWT ADDR «, t00=0x003d, t01=0x0128}
0x6090…60aa Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RET CODE«, t00=0x003d, t01=0x014c}
0x60aa…60d4 Head {h00=0x0026, h01=0x0050, text=» ABL DMTERX TENDIO+EXIT IN DMTASK «, t00=0x003d, t01=0x0166}
0x60d4…60e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0190}
0x60e2…60fc Head {h00=0x0016, h01=0x0050, text=»DMCLOS EQU * CLOSE«, t00=0x003e, t01=0x000e}
0x60fc…6106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0028}
0x6106…611a Head {h00=0x0010, h01=0x0050, text=»* A1 = A6 «, t00=0x003e, t01=0x0032}
0x611a…6140 Head {h00=0x0022, h01=0x0050, text=»* (A3= BLOCK BUFFER ADDRESS )«, t00=0x003e, t01=0x0046}
0x6140…6160 Head {h00=0x001c, h01=0x0050, text=»* (A5 = BLOCK ADDRESS )«, t00=0x003e, t01=0x006c}
0x6160…6188 Head {h00=0x0024, h01=0x0050, text=»* A6 = FDB ADDRESS ALL ORDERS «, t00=0x003e, t01=0x008c}
0x6188…61ae Head {h00=0x0022, h01=0x0050, text=»* A7 = ORDER CODE ALL ORDERS«, t00=0x003e, t01=0x00b4}
0x61ae…61d0 Head {h00=0x001e, h01=0x0050, text=»* (A8 = FDBECB ADDRESS ) «, t00=0x003e, t01=0x00da}
0x61d0…61f4 Head {h00=0x0020, h01=0x0050, text=»* (A9 = USER ECB ADDRESS ) «, t00=0x003e, t01=0x00fc}
0x61f4…61fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0120}
0x61fe…6216 Head {h00=0x0014, h01=0x0050, text=» LD A4,FDBDBR,A1«, t00=0x003e, t01=0x012a}
0x6216…6236 Head {h00=0x001c, h01=0x0050, text=» RF(NN) CLO200 NO DELAY «, t00=0x003e, t01=0x0142}
0x6236…6250 Head {h00=0x0016, h01=0x0050, text=» LDK A7,/95 WRITE «, t00=0x003e, t01=0x0162}
0x6250…625c Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x003e, t01=0x017c}
0x625c…6272 Head {h00=0x0012, h01=0x0050, text=» DATA 15 FM IO«, t00=0x003e, t01=0x0188}
0x6272…6292 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOT ERR CHECK«, t00=0x003f, t01=0x000e}
0x6292…62a6 Head {h00=0x0010, h01=0x0050, text=»CLO200 EQU *«, t00=0x003f, t01=0x002e}
0x62a6…62cc Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x003f, t01=0x0042}
0x62cc…62d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0068}
0x62d6…62f0 Head {h00=0x0016, h01=0x0050, text=»* CLEAR CURRENCY«, t00=0x003f, t01=0x0072}
0x62f0…62fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x008c}
0x62fa…6318 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A6 FDB ADDR =1«, t00=0x003f, t01=0x0096}
0x6318…6346 Head {h00=0x002a, h01=0x0050, text=» CF A14,CRNGET GET CURRENCY BUFFER =1 «, t00=0x003f, t01=0x00b4}
0x6346…6358 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x003f, t01=0x00e2}
0x6358…6378 Head {h00=0x001c, h01=0x0050, text=» SC A1,CRNSTA,A2 STATUS «, t00=0x003f, t01=0x00f4}
0x6378…638e Head {h00=0x0012, h01=0x0050, text=» CM CRNCDF,A2 «, t00=0x003f, t01=0x0114}
0x638e…63a6 Head {h00=0x0014, h01=0x0050, text=» CM CRNCDF+2,A2 «, t00=0x003f, t01=0x012a}
0x63a6…63bc Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x003f, t01=0x0142}
0x63bc…63d2 Head {h00=0x0012, h01=0x0050, text=» CM CRNCIF,A2 «, t00=0x003f, t01=0x0158}
0x63d2…63ea Head {h00=0x0014, h01=0x0050, text=» CM CRNCIF+2,A2 «, t00=0x003f, t01=0x016e}
0x63ea…63f6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0186}
0x63f6…6400 (64, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0004}
0x6400…641e Head {h00=0x001a, h01=0x0050, text=»* BUILD CLOSE TABLES«, t00=0x0040, t01=0x000e}
0x641e…6428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x002c}
0x6428…644a Head {h00=0x001e, h01=0x0050, text=» LC A7,ECBFC,A9 FILE CODE «, t00=0x0040, t01=0x0036}
0x644a…6466 Head {h00=0x0018, h01=0x0050, text=» LDK A5,10 2 * FILES«, t00=0x0040, t01=0x0058}
0x6466…647a Head {h00=0x0010, h01=0x0050, text=»CLO210 EQU *«, t00=0x0040, t01=0x0074}
0x647a…648c Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0040, t01=0x0088}
0x648c…64ac Head {h00=0x001c, h01=0x0050, text=» RF(N) CLO300 ALL FILES «, t00=0x0040, t01=0x009a}
0x64ac…64be Head {h00=0x000e, h01=0x0050, text=» LDR A4,A6«, t00=0x0040, t01=0x00ba}
0x64be…64d0 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x0040, t01=0x00cc}
0x64d0…64e2 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0040, t01=0x00de}
0x64e2…64f4 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0040, t01=0x00f0}
0x64f4…6506 Head {h00=0x000e, h01=0x0050, text=» SUR A8,A8«, t00=0x0040, t01=0x0102}
0x6506…6518 Head {h00=0x000e, h01=0x0050, text=» SUR A9,A9«, t00=0x0040, t01=0x0114}
0x6518…652c Head {h00=0x0010, h01=0x0050, text=» SUR A10,A10«, t00=0x0040, t01=0x0126}
0x652c…654e Head {h00=0x001e, h01=0x0050, text=» LD A3,FDBADF,A4 FDB ADDR «, t00=0x0040, t01=0x013a}
0x654e…656c Head {h00=0x001a, h01=0x0050, text=» RF(Z) CLO230 NO FILE «, t00=0x0040, t01=0x015c}
0x656c…6596 Head {h00=0x0026, h01=0x0050, text=» LD A8,FDBMIA,A3 MASTER INDEX ADDR«, t00=0x0040, t01=0x017a}
0x6596…65b6 Head {h00=0x001c, h01=0x0050, text=» LC A2,FWTFNR,A3 FILE NR«, t00=0x0041, t01=0x0014}
0x65b6…65da Head {h00=0x0020, h01=0x0050, text=» LC A9,FDBLRN,A3 LAST REC NR«, t00=0x0041, t01=0x0034}
0x65da…65f6 Head {h00=0x0018, h01=0x0050, text=» LD A10,FDBLRN+1,A3 «, t00=0x0041, t01=0x0058}
0x65f6…660a Head {h00=0x0010, h01=0x0050, text=»CLO230 EQU *«, t00=0x0041, t01=0x0074}
0x660a…6622 Head {h00=0x0014, h01=0x0050, text=» ST A8,OPEMXI,A5«, t00=0x0041, t01=0x0088}
0x6622…663a Head {h00=0x0014, h01=0x0050, text=» ST A3,OPEFWT,A5«, t00=0x0041, t01=0x00a0}
0x663a…664c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x0041, t01=0x00b8}
0x664c…665e Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x0041, t01=0x00ca}
0x665e…667e Head {h00=0x001c, h01=0x0050, text=» SC A2,OPEFNR,A4 FILE NR«, t00=0x0041, t01=0x00dc}
0x667e…66a0 Head {h00=0x001e, h01=0x0050, text=» SC A1,OPEFCD,A4 FILE CODE«, t00=0x0041, t01=0x00fc}
0x66a0…66b2 Head {h00=0x000e, h01=0x0050, text=» SLL A4,2 «, t00=0x0041, t01=0x011e}
0x66b2…66d6 Head {h00=0x0020, h01=0x0050, text=» ST A9,OPELRN,A4 LAST REC NR«, t00=0x0041, t01=0x0130}
0x66d6…66f2 Head {h00=0x0018, h01=0x0050, text=» ST A10,OPELRN+2,A4 «, t00=0x0041, t01=0x0154}
0x66f2…670e Head {h00=0x0018, h01=0x0050, text=» RB CLO210 NEXT FILE«, t00=0x0041, t01=0x0170}
0x670e…6722 Head {h00=0x0010, h01=0x0050, text=»CLO300 EQU *«, t00=0x0041, t01=0x018c}
0x6722…6742 Head {h00=0x001c, h01=0x0050, text=» SC A7,OPEFCD FILE CODE «, t00=0x0042, t01=0x0010}
0x6742…6764 Head {h00=0x001e, h01=0x0050, text=» LDR A10,A6 MAIN FDB ADDR «, t00=0x0042, t01=0x0030}
0x6764…6772 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0052}
0x6772…679a Head {h00=0x0024, h01=0x0050, text=»OPEER1 EQU * RECOVERY AT ERRORS «, t00=0x0042, t01=0x0060}
0x679a…67b6 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A10 MAIN FDB«, t00=0x0042, t01=0x0088}
0x67b6…67d4 Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTOR,A10 ORDER«, t00=0x0042, t01=0x00a4}
0x67d4…67e8 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0042, t01=0x00c2}
0x67e8…680a Head {h00=0x001e, h01=0x0050, text=» CWK A2,QRFP READ FILE PAR«, t00=0x0042, t01=0x00d6}
0x680a…6820 Head {h00=0x0012, h01=0x0050, text=» ABL(E) DMTERX«, t00=0x0042, t01=0x00f8}
0x6820…685a Head {h00=0x0036, h01=0x0050, text=»* FREE FILE CODES,MASTER INDEXES,FILES, CURRENCY«, t00=0x0042, t01=0x010e}
0x685a…6864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0148}
0x6864…6878 Head {h00=0x0010, h01=0x0050, text=» LDKL A12,5 «, t00=0x0042, t01=0x0152}
0x6878…688c Head {h00=0x0010, h01=0x0050, text=»OPEE10 EQU *«, t00=0x0042, t01=0x0166}
0x688c…68a0 Head {h00=0x0010, h01=0x0050, text=» SUKL A12,1 «, t00=0x0042, t01=0x017a}
0x68a0…68c2 Head {h00=0x001e, h01=0x0050, text=» RF(NN) OPEE20 MORE FILES «, t00=0x0042, t01=0x018e}
0x68c2…68e4 Head {h00=0x001e, h01=0x0050, text=» LDR A6,A10 MAIN FDB ADDR «, t00=0x0043, t01=0x0020}
0x68e4…68fe Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RET CODE«, t00=0x0043, t01=0x0042}
0x68fe…6912 Head {h00=0x0010, h01=0x0050, text=» ABL DMTERX «, t00=0x0043, t01=0x005c}
0x6912…6926 Head {h00=0x0010, h01=0x0050, text=»OPEE20 EQU *«, t00=0x0043, t01=0x0070}
0x6926…6942 Head {h00=0x0018, h01=0x0050, text=»* RESET FILE CODE*«, t00=0x0043, t01=0x0084}
0x6942…694c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00a0}
0x694c…6970 Head {h00=0x0020, h01=0x0050, text=» LC A2,OPEFCD,A12 FILE CODE «, t00=0x0043, t01=0x00aa}
0x6970…6984 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0043, t01=0x00ce}
0x6984…69a2 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPEE25 NO CODE «, t00=0x0043, t01=0x00e2}
0x69a2…69c2 Head {h00=0x001c, h01=0x0050, text=» LDK A5,0 TTAB AND CDTAB«, t00=0x0043, t01=0x0100}
0x69c2…69ea Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTTAB,A10 USER TTAB ADDR«, t00=0x0043, t01=0x0120}
0x69ea…6a00 Head {h00=0x0012, h01=0x0050, text=» CF A14,FNDFDB«, t00=0x0043, t01=0x0148}
0x6a00…6a1a Head {h00=0x0016, h01=0x0050, text=» LDR A2,A2 RET CD «, t00=0x0043, t01=0x015e}
0x6a1a…6a38 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPEE25 NO ENTRY«, t00=0x0043, t01=0x0178}
0x6a38…6a60 Head {h00=0x0024, h01=0x0050, text=» LDKL A7,FDBSTA SYSTEM FDB ADDR «, t00=0x0044, t01=0x0008}
0x6a60…6a84 Head {h00=0x0020, h01=0x0050, text=» ST A7,2,A4 SYSTEM FWT ADDR «, t00=0x0044, t01=0x0030}
0x6a84…6a98 Head {h00=0x0010, h01=0x0050, text=»OPEE25 EQU *«, t00=0x0044, t01=0x0054}
0x6a98…6aa6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x0068}
0x6aa6…6ab0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0076}
0x6ab0…6ad2 Head {h00=0x001e, h01=0x0050, text=»* RELEASE EA+CRN BUFFERS«, t00=0x0044, t01=0x0080}
0x6ad2…6adc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00a2}
0x6adc…6af0 Head {h00=0x0010, h01=0x0050, text=» LDR A7,A12 «, t00=0x0044, t01=0x00ac}
0x6af0…6b08 Head {h00=0x0014, h01=0x0050, text=» SLL A7,1 WORDS «, t00=0x0044, t01=0x00c0}
0x6b08…6b2a Head {h00=0x001e, h01=0x0050, text=» LD A11,OPEFWT,A7 FDB ADDR«, t00=0x0044, t01=0x00d8}
0x6b2a…6b46 Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMT894 NO FDB«, t00=0x0044, t01=0x00fa}
0x6b46…6b5a Head {h00=0x0010, h01=0x0050, text=» LDR A1,A11 «, t00=0x0044, t01=0x0116}
0x6b5a…6b70 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/C000«, t00=0x0044, t01=0x012a}
0x6b70…6b82 Head {h00=0x000e, h01=0x0050, text=» SUR A9,A9«, t00=0x0044, t01=0x0140}
0x6b82…6bac Head {h00=0x0026, h01=0x0050, text=» CF A14,EARELB REL PROTECT BUFFERS«, t00=0x0044, t01=0x0152}
0x6bac…6bb8 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0044, t01=0x017c}
0x6bb8…6bd2 Head {h00=0x0016, h01=0x0050, text=» LC A5,FWTPAR,A11 «, t00=0x0044, t01=0x0188}
0x6bd2…6bf2 Head {h00=0x001c, h01=0x0050, text=» ANK A5,/3F NR OF USERS «, t00=0x0045, t01=0x0012}
0x6bf2…6c04 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0045, t01=0x0032}
0x6c04…6c2e Head {h00=0x0026, h01=0x0050, text=» RF(NZ) DMT894 MORE THAN ONE OPEN «, t00=0x0045, t01=0x0044}
0x6c2e…6c50 Head {h00=0x001e, h01=0x0050, text=» LD A5,FDBEAL,A11 PRO LINK«, t00=0x0045, t01=0x006e}
0x6c50…6c6e Head {h00=0x001a, h01=0x0050, text=» ABL(NZ) TASHLT DM ERR«, t00=0x0045, t01=0x0090}
0x6c6e…6c7c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x00ae}
0x6c7c…6c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00bc}
0x6c86…6caa Head {h00=0x0020, h01=0x0050, text=»* RELEASE CURRENCY BUFFERS«, t00=0x0045, t01=0x00c6}
0x6caa…6cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ea}
0x6cb4…6ccc Head {h00=0x0014, h01=0x0050, text=» LDKL A5,FDBCRL «, t00=0x0045, t01=0x00f4}
0x6ccc…6cea Head {h00=0x001a, h01=0x0050, text=» ADR A5,A11 LINK ROOT «, t00=0x0045, t01=0x010c}
0x6cea…6cfe Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A5 «, t00=0x0045, t01=0x012a}
0x6cfe…6d18 Head {h00=0x0016, h01=0x0050, text=» CMR A5 CLEAR FDB «, t00=0x0045, t01=0x013e}
0x6d18…6d2a Head {h00=0x000e, h01=0x0050, text=» RF DMT830«, t00=0x0045, t01=0x0158}
0x6d2a…6d3e Head {h00=0x0010, h01=0x0050, text=»DMT820 EQU *«, t00=0x0045, t01=0x016a}
0x6d3e…6d60 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A5 BUFFER ADDRESS «, t00=0x0045, t01=0x017e}
0x6d60…6d74 Head {h00=0x0010, h01=0x0050, text=»DMT830 EQU *«, t00=0x0046, t01=0x0010}
0x6d74…6d9e Head {h00=0x0026, h01=0x0050, text=» RF(Z) DMT840 ALL BUFFER S REMOVED«, t00=0x0046, t01=0x0024}
0x6d9e…6dc6 Head {h00=0x0024, h01=0x0050, text=» LDR* A5,A4 NEXT BUFFER ADDRESS «, t00=0x0046, t01=0x004e}
0x6dc6…6dd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0076}
0x6dd0…6df2 Head {h00=0x001e, h01=0x0050, text=»* RETIURN BUFFER TO POOL«, t00=0x0046, t01=0x0080}
0x6df2…6dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00a2}
0x6dfc…6e08 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0046, t01=0x00ac}
0x6e08…6e1e Head {h00=0x0012, h01=0x0050, text=» LD A3,CRNQUE «, t00=0x0046, t01=0x00b8}
0x6e1e…6e30 Head {h00=0x000e, h01=0x0050, text=» STR A3,A4«, t00=0x0046, t01=0x00ce}
0x6e30…6e46 Head {h00=0x0012, h01=0x0050, text=» ST A4,CRNQUE «, t00=0x0046, t01=0x00e0}
0x6e46…6e52 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0046, t01=0x00f6}
0x6e52…6e64 Head {h00=0x000e, h01=0x0050, text=» RB DMT820«, t00=0x0046, t01=0x0102}
0x6e64…6e72 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0046, t01=0x0114}
0x6e72…6e86 Head {h00=0x0010, h01=0x0050, text=»DMT840 EQU *«, t00=0x0046, t01=0x0122}
0x6e86…6e9c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0046, t01=0x0136}
0x6e9c…6ebe Head {h00=0x001e, h01=0x0050, text=»* RELEASE MASRTER INDEX «, t00=0x0046, t01=0x014c}
0x6ebe…6ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x016e}
0x6ec8…6ef2 Head {h00=0x0026, h01=0x0050, text=» LD A1,OPEMXI,A7 MASTER INDEX ADDR«, t00=0x0046, t01=0x0178}
0x6ef2…6f0e Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMT894 NO MX «, t00=0x0047, t01=0x0012}
0x6f0e…6f28 Head {h00=0x0016, h01=0x0050, text=» LD A5,MXIND LENTH«, t00=0x0047, t01=0x002e}
0x6f28…6f3a Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0047, t01=0x0048}
0x6f3a…6f4e Head {h00=0x0010, h01=0x0050, text=»DMT885 EQU *«, t00=0x0047, t01=0x005a}
0x6f4e…6f60 Head {h00=0x000e, h01=0x0050, text=» SUK A5,4 «, t00=0x0047, t01=0x006e}
0x6f60…6f82 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT890 FIRST INDEX «, t00=0x0047, t01=0x0080}
0x6f82…6fa4 Head {h00=0x001e, h01=0x0050, text=» RF(N) DMT894 NO MATER IX «, t00=0x0047, t01=0x00a2}
0x6fa4…6fbe Head {h00=0x0016, h01=0x0050, text=» CW A1,MXIND+2,A5 «, t00=0x0047, t01=0x00c4}
0x6fbe…6fd4 Head {h00=0x0012, h01=0x0050, text=» RB(NE) DMT885«, t00=0x0047, t01=0x00de}
0x6fd4…6fec Head {h00=0x0014, h01=0x0050, text=» LD A4,MXIND,A5 «, t00=0x0047, t01=0x00f4}
0x6fec…7016 Head {h00=0x0026, h01=0x0050, text=» RF(N) DMT890 PREVIOUS ENTRY USED «, t00=0x0047, t01=0x010c}
0x7016…703c Head {h00=0x0022, h01=0x0050, text=» LD A4,MXIND+4,A5 NO OF WORDS «, t00=0x0047, t01=0x0136}
0x703c…7060 Head {h00=0x0020, h01=0x0050, text=» ANKL A4,/7FFF REMOV USE BIT«, t00=0x0047, t01=0x015c}
0x7060…7084 Head {h00=0x0020, h01=0x0050, text=» ADS A4,MXIND,A5 NR OF WORDS«, t00=0x0047, t01=0x0180}
0x7084…7092 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0048, t01=0x0014}
0x7092…709c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0022}
0x709c…70a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x002c}
0x70a6…70c8 Head {h00=0x001e, h01=0x0050, text=»* MOVE UP REST OF MXIND «, t00=0x0048, t01=0x0036}
0x70c8…70d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0058}
0x70d2…70ea Head {h00=0x0014, h01=0x0050, text=» LDKL A1,MXIND+6«, t00=0x0048, t01=0x0062}
0x70ea…7106 Head {h00=0x0018, h01=0x0050, text=» ADR A1,A5 FROM ADDR«, t00=0x0048, t01=0x007a}
0x7106…7118 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0048, t01=0x0096}
0x7118…7132 Head {h00=0x0016, h01=0x0050, text=» SUK A3,4 TO ADDR «, t00=0x0048, t01=0x00a8}
0x7132…7146 Head {h00=0x0010, h01=0x0050, text=» LD A2,MXIND«, t00=0x0048, t01=0x00c2}
0x7146…7158 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A5«, t00=0x0048, t01=0x00d6}
0x7158…7174 Head {h00=0x0018, h01=0x0050, text=» SUK A2,2 NO OF CHAR«, t00=0x0048, t01=0x00e8}
0x7174…7192 Head {h00=0x001a, h01=0x0050, text=» CF A14,DMTWM MOVE UOP«, t00=0x0048, t01=0x0104}
0x7192…71a4 Head {h00=0x000e, h01=0x0050, text=» RF DMT894«, t00=0x0048, t01=0x0122}
0x71a4…71b8 Head {h00=0x0010, h01=0x0050, text=»DMT890 EQU *«, t00=0x0048, t01=0x0134}
0x71b8…71ce Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/7FFF«, t00=0x0048, t01=0x0148}
0x71ce…71f8 Head {h00=0x0026, h01=0x0050, text=» ANS A4,MXIND+4,A5 REMOVE USE BIT «, t00=0x0048, t01=0x015e}
0x71f8…7204 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x0188}
0x7204…7212 (73, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x0004}
0x7212…721c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0012}
0x721c…7232 Head {h00=0x0012, h01=0x0050, text=»* CLOSE FILE«, t00=0x0049, t01=0x001c}
0x7232…723c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0032}
0x723c…7256 Head {h00=0x0016, h01=0x0050, text=»DMT894 LDR A8,A10 «, t00=0x0049, t01=0x003c}
0x7256…7276 Head {h00=0x001c, h01=0x0050, text=» ADKL A8,FDBECB ECB ADDR«, t00=0x0049, t01=0x0056}
0x7276…7296 Head {h00=0x001c, h01=0x0050, text=» LDKL A9,OPEFPB FPB ADDR«, t00=0x0049, t01=0x0076}
0x7296…72aa Head {h00=0x0010, h01=0x0050, text=» LDR A7,A12 «, t00=0x0049, t01=0x0096}
0x72aa…72c8 Head {h00=0x001a, h01=0x0050, text=» SLL A7,2 2 WORD INDEX«, t00=0x0049, t01=0x00aa}
0x72c8…72ec Head {h00=0x0020, h01=0x0050, text=» LD A1,OPELRN,A7 LAST REC NR«, t00=0x0049, t01=0x00c8}
0x72ec…7304 Head {h00=0x0014, h01=0x0050, text=» ST A1,FPB:FR,A9«, t00=0x0049, t01=0x00ec}
0x7304…731e Head {h00=0x0016, h01=0x0050, text=» LD A1,OPELRN+2,A7«, t00=0x0049, t01=0x0104}
0x731e…7338 Head {h00=0x0016, h01=0x0050, text=» ST A1,FPB:FR+2,A9«, t00=0x0049, t01=0x011e}
0x7338…7352 Head {h00=0x0016, h01=0x0050, text=» LC A7,OPEFNR,A12 «, t00=0x0049, t01=0x0138}
0x7352…7366 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0049, t01=0x0152}
0x7366…738a Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMT898 NO FILE OPENED«, t00=0x0049, t01=0x0166}
0x738a…73ac Head {h00=0x001e, h01=0x0050, text=» ST A7,ECBFC-1,A8 FILE NR «, t00=0x0049, t01=0x018a}
0x73ac…73d2 Head {h00=0x0022, h01=0x0050, text=» ST A9,ECBBA,A8 PAR BLOCK ADDR«, t00=0x004a, t01=0x001c}
0x73d2…73ec Head {h00=0x0016, h01=0x0050, text=» LDK A7,/A2 CLOSE «, t00=0x004a, t01=0x0042}
0x73ec…7416 Head {h00=0x0026, h01=0x0050, text=» CF A14,CLRBUF CLEAR FREE BUFFERS «, t00=0x004a, t01=0x005c}
0x7416…7422 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x004a, t01=0x0086}
0x7422…7432 Head {h00=0x000c, h01=0x0050, text=» DATA 15«, t00=0x004a, t01=0x0092}
0x7432…744e Head {h00=0x0018, h01=0x0050, text=» LDR A1,A10 MAIN FDB«, t00=0x004a, t01=0x00a2}
0x744e…746e Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOT ERR CHECK«, t00=0x004a, t01=0x00be}
0x746e…7490 Head {h00=0x001e, h01=0x0050, text=» ORS A1,ECBRC,A9 SEND CODE«, t00=0x004a, t01=0x00de}
0x7490…74a4 Head {h00=0x0010, h01=0x0050, text=»DMT898 EQU *«, t00=0x004a, t01=0x0100}
0x74a4…74c2 Head {h00=0x001a, h01=0x0050, text=» ABL OPEE10 NEXT FILE «, t00=0x004a, t01=0x0114}
0x74c2…74ce Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x004a, t01=0x0132}
0x74ce…74d2 Head {h00=0x4004, h01=0x0000}
0x74d2…74d6 00 4a 01 3e ┆ J >┆
0x74d6…74de (75, 1, 8) 20 04 00 00 00 4b 00 04 ┆ K ┆
0x74de…752e (76, 0, 400) 52 45 20 41 44 44 52 45 53 53 20 54 4f 20 54 48 49 53 20 49 4e 54 45 52 52 55 50 54 20 54 41 42 4c 45 20 49 4e 20 4d 4f 4e 54 41 42 00 d3 01 8a 00 28 00 50 2a 20 20 49 46 20 41 4e 59 20 44 45 56 49 43 45 20 50 52 45 53 45 4e 54 20 4f 4e 20 ┆RE ADDRESS TO THIS INTERRUPT TABLE IN MONTAB ( P* IF ANY DEVICE PRESENT ON ┆
0x752e…757e 41 4e 59 20 4c 49 4e 45 00 d4 00 34 00 06 00 50 2a 20 00 d4 00 60 00 2a 00 50 5c 4c 44 5c 41 31 2c 53 41 56 45 32 34 2c 41 31 33 5c 41 4e 59 20 44 45 56 49 43 45 20 50 52 45 53 45 4e 54 3f 20 00 d4 00 6a 00 16 00 50 5c 52 46 28 5a 29 5c 42 ┆ANY LINE 4 P* ` * P LD A1,SAVE24,A13 ANY DEVICE PRESENT? j P RF(Z) B┆
0x757e…75ce 49 54 31 35 35 5c 4e 4f 21 20 00 d4 00 98 00 32 00 50 5c 4c 44 5c 41 31 2c 53 41 56 45 32 31 2c 41 31 33 5c 47 45 54 20 49 4e 54 45 52 52 55 50 54 20 54 41 42 4c 45 20 41 44 44 52 45 53 53 20 00 d4 00 b2 00 1a 00 50 5c 53 54 5c 41 31 2c 49 ┆IT155 NO! 2 P LD A1,SAVE21,A13 GET INTERRUPT TABLE ADDRESS P ST A1,I┆
0x75ce…761e 4e 54 4c 54 31 2c 41 37 5c 53 41 56 45 20 00 d4 00 e8 00 0e 00 50 5c 52 46 5c 42 49 54 31 35 38 00 d4 01 06 00 10 00 50 42 49 54 31 35 35 5c 45 51 55 5c 2a 00 d4 01 18 00 2e 00 50 5c 4c 44 5c 41 31 31 2c 53 41 56 45 32 31 2c 41 31 33 5c 47 ┆NTLT1,A7 SAVE P RF BIT158 PBIT155 EQU * . P LD A11,SAVE21,A13 G┆
0x761e…766e 45 54 20 53 54 41 52 54 20 4f 46 20 46 52 45 45 20 41 52 45 41 20 00 d4 01 2c 00 10 00 50 42 49 54 31 35 38 5c 45 51 55 5c 2a 00 d4 01 5e 00 06 00 03 2a 20 00 d4 01 72 00 3a 00 36 2a 20 20 41 4c 4c 20 4c 49 4e 45 53 20 4f 46 20 54 48 49 53 ┆ET START OF FREE AREA , PBIT158 EQU * ^ * r : 6* ALL LINES OF THIS┆