|
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: 36466 (0x8e72)
Notes: pts_type(SC)
Names: »SDMOCR.SC«
└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
└─⟦this⟧ »MONGEN/SDMOCR.SC«
IDENT SDMOCR REL 11.0 81-05-12 870105041100 =8,CONDITION FOR CR,DE,EX =8,REL 11.0 81-04-02 =7,NO DEL OF FILE WHEN NOT OP. EXC. =7,REL 11.0 81-03-24 =6,NO EXCLUSIVE ACCESS WHEN MXIND READ =6,REL 11.0 81-03-16 =5,NO DEL OF FIL WHEN OPEN I/O EXCL. FAILS =5,REL 11.0 81-03-16 =4,STATUS INF. NOT CORRECT =4,REL 11.0 81-02-24 =3,FORMAT FIRST RECORD ALSO WHEN LRN=0 =3,REL 11.0 81-02-12 =2,FILE NBR IN WRONG REG. WHEN RFP =2,REL 11.0 81-02-04 =1,CLOSE FORMAT CHANGED =1,REL 11.0 81-01-26 **************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * SDMOCR HANDLES OPEN CLOSE AND READ FILE PARAMETERS * IT IS ACTIVATED FROM SDMTSK * * * * * **************************************************** * EJECT * *************** * ENTRIES * *************** * * ENTRY SDMOPN,SDMCLO,SDMRFP ENTRY OPEFPB EJECT * ***************** * EXTERNALS * ***************** * EXTRN CLRBUF,CRNCDF,CRNCIF,CRNGET,CRNQUE EXTRN ECBRC EXTRN FDBADF,FDBBLF,FDBCRL,FDBECB,FDBKA,FDBLRN EXTRN FDBMEC,FDBMIA,FDBNIF,FDBRLE,FDBSTA,FDBEXC EXTRN FDBENL EXTRN FNDFDB EXTRN FWTFNR,FWTPAR,FWTVOL EXTRN MOV:SU,MOV:US EXTRN MPYMOD,MXIND EXTRN DIVMOD EXTRN FDBDBR,FDBMRO,FDBDMI,FDBBLZ EXTRN FDBOMD EXTRN ECBFC EXTRN ECBBA EXTRN ECBEL EXTRN ECBRL EXTRN DWTECB EXTRN DWTOR EXTRN DWTTAB,DWTOPT EXTRN FPB:RL,FPB:BF,FPB:FO,FPB:BO,FPB:FN EXTRN FPB:V1,FPB:S1,FPB:V2,FPB:MN,FPB:EL EXTRN FPB:FR,FPB:US,FPB:SH,FPB:KA EXTRN CASZEN,COSZEN EXTRN GTBKBU,FRMFIL,FMIOCR,FMIODL EJECT EXTRN CRNSTA,DFTAB,DMTIDP EXTRN SDMERX EXTRN MOVFW EXTRN EARELB EXTRN TASHLT EXTRN FDBEAL EXTRN RECBFZ,REQERR EXTRN MOVBW EXTRN FMIOOP,FMIOCL,FMIORF,FMIOWR EXTRN SDMOIE,SDMOOS EXTRN CARRBL EXTRN SDMOOR,SDMOEE EXTRN FDBRRO,FDBSNR EXTRN FORMER EXTRN ADDMOD EXTRN SDMRLB,SDMTTD EXTRN ORDFLP EXTRN ENLFAC EJECT SDMTSK ************************* * CONDITIONAL ASSEMBLY ************************** * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 1 * * * * A PROGRAM VERSION FOR INDEXED ACCESS HANDLING * IS OBTAINED BY SETTING INDXAC = 1 X:A EQU 0 INDXAC EQU 00001 * * A VERSION LEAVING OUT OPEN MODES: * OPEN OUTPUT,OPEN EXTEND AND DISCARD * IS OBTAINED BY SETTING Y:C=0 * X:B EQU 0 =8 CRDEEX EQU 00000 =8 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: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 * ILLNAM EQU 9 ILLEGAL NAME =4 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 EJECT 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-2 NR OF BYTES EJECT ********************************************* * R E A D F I L E P A R A M E T E R S * ********************************************* SDMRFP EQU * READ FILE PARAMETERS * * A10,A11 = FDB ADDRESS ALL ORDERS * A7 = ORDER CODE ALL ORDERS * LDR A10,A11 FBD ADDR LC A2,FDBNIF,A11 NR OF INDEX ANK A2,/FF ST A2,NROFIX * STORE FILE NRS IN OPEFNR * LDK A5,10 2 * INDEXES RFP100 EQU * SUK A5,2 RF(N) SDMO30 ALL FILES LDR A4,A11 ADR A4,A5 LD A3,FDBADF,A4 FDB ADDR RF(Z) RFP130 NO FILE LC A2,FWTFNR,A3 FILE NR RFP130 EQU * LDR A4,A5 SRL A4,1 SC A2,OPEFNR,A4 SAVE FILE NR RB RFP100 NEXT FILE EJECT *************** * O P E N * *************** SDMOPN EQU * OPEN * * A8 = ECB ADDR * A9 = LOOP COUNTER * A10,A11 = SYSTEM FDB ADDRESS * A12 = FPB ADDRESS * * A9 = LOOP COUNTER FILES * * 1 = DATA FILE * 2 = INDEX 1 * 3 = MASTER INDEX 1 * 4 = INDEX 2 * ETC * LDR A10,A11 SYSTEM FWT ADDR EJECT * * CLEAR WORK AREA * LDK A2,OPEEND NR OF BYTE TO CLEAR SDMO10 EQU * CM OPEFNR,A2 SUK A2,2 RB(NN) SDMO10 NO MORE WORDS TO CLEAR * * MOVE IN PARAMETER BLOCK * LD A1,DWTECB,A11 USER ECB ADDRESS LD A1,ECBBA,A1 FD ADDR USER ADK A1,FPBRES RESERVED FIELDS LDR A2,A12 FPB ADDR LDK A3,FPB:L4+1 MAX SIGN LENGTH IFT MMUPAG=1 LD A4,DWTTAB,A11 USER TTAB ADDR CF A14,MOV:US XIF IFT MMUPAG=0 CF A14,MOVFW XIF IFT INDXAC=1 EJECT * * SAVE VOLUME NAME INDEX FILES * LDR A1,A12 FPB ADDR ADKL A1,FPB:IV FROM ADDR LDKL A2,INDVOL TO ADDR LDK A3,6 CF A14,MOVFW XIF LC A5,FPB:BO,A12 TOSS OPTIONS ANK A5,2 SLL A5,14 ST A5,DELAY IFT INDXAC=1 LC A5,FPB:FO,A12 ANK A5,/FF RF(Z) SDMO30 STANDARD FILE LC A5,DWTOR+1,A11 ORDER CODE SUKL A5,SDMOEE ABL(NN) OERQER OUTPUT SEQ.,RAND.,EXT. NOT ALLOWED LD A5,DWTECB,A11 USER ECB ADDR LD A5,ECBRL,A5 REQ LGTH SUK A5,FPB:NI+FPBRES ABL(NP) OERQER INDEX NOT DEFINED LC A5,FPB:NI,A12 NR OF INDEXES SC A5,NROFIX+1 EJECT * * SAVE BASE ADDRESSES FOR INDEXES * LDK A2,FPB:A1 ADR A2,A12 ADDR FIRST KEY ADDR ANK A5,/F LDK A3,2 OFFSET INDEX 1 SDMO20 EQU * SUK A5,1 RF(N) SDMO30 ALL INDEXES LDK A1,0 LC A1,-1,A2 NR OF KEY ITEMS SUK A1,1 ABL(NZ) OESWP4 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 SDMO20 XIF SDMO30 EQU * LDKL A9,1 INDICATE DATA FILE EJECT ************************************* * F I L E L O O P E N T R Y * ************************************* * * O P E N O R C R E A T E F I L E W I T H F M * OPLENT EQU * ST A12,ECBBA,A8 FPB ADDR LC A5,FPB:BO,A12 ANK A5,1 SC A5,FPB:BO,A12 ONLY BASIC ALLOWED LDK A5,0 SC A5,FPB:SH,A12 NOT EXCLUSIVE CWK A11,FDBSTA RF(NE) OPL130 READ FILE PAR ORDER IFT CRDEEX=1 =8 * * IF OPEN OUTPUT RANDOM OR * OPEN OUTPUT SEQUENTIAL * THEN CREATE FILE * LC A5,DWTOR+1,A11 SUKL A5,SDMOOS RF(N) OPL120 NO CREATION OF FILE EJECT * * C R E A T E F I L E * CF A14,CASZEN CALCULATE SIZES * * BUILD PART OF FPB SPECIAL FOR CREATE * LDK A1,'S' FILE TYPE SC A1,FPB:FO,A12 LDKL A1,FPB:MN ADR A1,A12 POINTER IN FPB LDK A2,11 NUMBER OF BYTES TO RESET LDK A3,0 OPL110 EQU * SCR A3,A1 RESET BYTE ADK A1,1 UPDATE POINTER SUK A2,1 RB(P) OPL110 NEXT CHARACTER LDKL A3,' ' STR A3,A1 RETENTION PERIOD SC A3,2,A1 CF A14,FMIOCR CREATE FILE RF(NZ) OERCA1 ERROR RF OPL125 XIF =8 EJECT * * O P E N F I L E * OPL120 EQU * CF A14,FMIOOP OPEN RF(NZ) OERCA1 ERR * * SAVE FILE NR * OPL125 EQU * LDR A1,A9 LOOP INDEX SRL A1,1 LDR* A2,A8 SC A2,OPEFNR,A1 OPENED FILE NRS OPL130 EQU * * * GET FWT ADDR IN A10 * ANK A2,/FF LDKL A10,FDBSTA SYST FDB ADDR LDR A3,A2 FILE NR OPL140 EQU * RF(Z) OPL150 END COUNT LDR* A10,A10 NEXT FDB ANKL A10,/FFFE USE BIT SUK A3,1 RB OPL140 EJECT * * R E A D F I L E P A R A M E T E R S * OPL150 EQU * FWT ADDR IN A11 LDK A6,0 DEFAULT ENLARGE FACTOR LC A3,DWTOR+1,A11 INTERN ORDER CODE SUKL A3,SDMOEE RF(N) OPL155 NO ENLARGE DECLARED LD A6,FPB:EL,A12 ENLARGE FACTOR OPL155 EQU * STR A2,A8 FILE NR CF A14,FMIORF READ FILE PARAMETERS (A11=SYSFDB) ST A6,FPB:EL,A12 SET ENLARGE FACTOR LD A2,DWTECB,A11 USER ECB ADDRESS ORS A1,ECBRC,A2 RET CODE XRR A10,A11 XRR A11,A10 XRR A10,A11 EJECT * * A10 = SYSTEM FDB ADDRESS * A11 = CURRENT FDB ADDRESS * IFT INDXAC=1 CWK A9,1 RF(NE) OPL160 INDEX FILE LD A7,NROFIX NR OF INDEXES CWK A7,4 RF(G) OERQER TOO MANY INDEXES SLL A7,1 ADK A7,2 LDR A9,A7 NEW LOOPER SUR A13,A13 REL ADDR IN TABLES OF OPEN RF OPL170 OPL160 EQU * LDR A7,A9 ANK A7,/FE REL ADDR LDR A13,A7 OPL170 EQU * XIF IFT INDXAC=0 SUR A13,A13 IDICATE DATA FILE XIF CWK A10,FDBSTA ABL(NE) OPSPLT READ FILE PAR ORDER LDR A1,A1 RF(NZ) OERCOM EJECT ****************************************** * C H E C K O P E N E D F I L E * ****************************************** LDK A3,'S' 'S' CC A3,FPB:FO,A12 RF(NE) OERQER NOT STANDARD FILE LC A3,FPB:US,A12 NR OF USERS SUK A3,1 RF(Z) OPFRST FIRST OPEN LC A3,DWTOR+1,A10 LD A2,FDBEXC,A11 TTAB IF OPENED EXCLUSIVE RF(NZ) OERQER OPENED EXCLUSIVE BEFORE CC A3,FDBOMD,A11 RF(NE) OERQER THIS OPEN NOT SAME AS OLD OPEN LC A3,FDBNIF,A11 NR OF INDEX BEFORE FOR THIS FILE CW A3,NROFIX NR OF INDEXES RF(NE) OESWP4 ALW SAME INDEXES LD A2,DELAY RF(N) OPL180 2ND DELAY WANTED IN VAIN LDKL A2,/7FFF ANS A2,FDBDBR,A11 NO DELAY OPL180 EQU * ABL OPSPLT EJECT ******************* * E R R O R S * ******************* OERCA1 EQU * =4 LDR A6,A1 RETURN CODE =4 ANKL A6,/E10 MASK BITS 4,5,6 AND 11 =4 RF(Z) OERCOM NO STATUS TO SET =4 SLL A6,4 BIT 4 =4 RF(N) OESIN9 ILLEGAL NAME =4 SLL A6,1 BIT 5 =4 RF(N) OESNC1 NO CORE =4 OESOF3 EQU * =4 LDK A6,OFLW OVERFLOW =4 RF OESCOM =4 OESIN9 EQU * =4 LDK A6,ILLNAM ILLEGAL NAME =4 RF OESCOM =4 OESNC1 EQU * =4 LDK A6,NOCORE CORE EXHAUSTED =4 RF OESCOM =4 OESWP4 EQU * =4 LDK A6,ERPAR WRONG PARAMETER =4 RF OESCOM =4 OESLK8 EQU * =4 LDK A6,ERKEYL LONG KEY =4 OESCOM EQU * =4 LDR A11,A10 MAIN FDB ADDRESS =4 CF A14,CRNGET GET CURRENCY BUFFER =4 SC A6,CRNSTA,A2 SET STATUS =4 LDKL A1,/8080 SET RETURN CODE =4 RF OERCOM =4 OERQER EQU * =4 LDKL A1,/8000 RC REQUEST ERROR =4 OERCOM EQU * =4 LDR A11,A10 MAIN FDB ADDRESS =4 LD A9,DWTECB,A11 USER ECB ADDRESS =4 ORS A1,ECBRC,A9 SET RETURN CODE =4 ABL CLOCOM CLOSE EVENTUALLY FILES =4 EJECT *************************** * F I R S T O P E N * *************************** * * CLEAR FDB * OPFRST EQU * LDKL A2,FDBMEC SUKL A2,FDBECB LENGTH OPF100 EQU * SUK A2,2 RF(N) OPF110 OK LDR A7,A11 ADR A7,A2 CM FDBECB,A7 RB OPF100 EJECT * * BUILD FWT FDB PART * OPF110 EQU * LD A2,DELAY ST A2,FDBDBR,A11 SET DELAY FOR NEW FILE LD A3,FPB:RL,A12 ST A3,FDBRLE,A11 RECORD LENGTH LC A3,FPB:BF,A12 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,A12 SC A3,FDBLRN,A11 LD A3,FPB:FR+2,A12 ST A3,FDBLRN+1,A11 LAST REC NR CM FDBSNR,A11 LDK A3,1 ST A3,FDBSNR+2,A11 RESET SECTOR NUMBER LD A3,OPEMXI,A13 ST A3,FDBMIA,A11 MASTER INDEX ADDR RF(Z) OPF120 NO MASTER INDEX LD A3,FPB:KA,A12 CW A3,OPEKAD,A13 RB(NE) OESWP4 WRONG KEY ST A3,FDBKA,A11 KEY ADDR OPF120 EQU * LC A3,FPB:BO,A12 SLL A3,8 ORS A3,FDBDBR,A11 BASIC + OPTION EJECT * * CALCULATE SDMTSK ID * LC A3,FWTVOL,A11 FIRST EXTENT VOLUME FC LDKL A6,-1 OPF140 EQU * ADK A6,1 CC A3,DFTAB,A6 RB(NE) OPF140 NOT THIS DISC LC A3,DMTIDP,A6 REL DM TASK ID SC A3,FDBDMI,A11 MAIN SDMTSK ID * * CALCULATE MAX FDBRRO AND BLOCKSIZE IN SECTORS * CF A14,CARRBL RB(G) OESWP4 TOO LARGE BLOCK SIZE ST A1,FDBMRO,A11 MAX FDBRRO SC A2,FDBBLZ,A11 BLOCK SIZE IN SECTORS ST A11,FDBADF,A11 IFT CRDEEX=1 =8 * * CALCULATE ENLARGE FACTOR * LDR A4,A2 BLOCK SIZE IN SECTORS CF A14,ENLFAC RB(O) OESOF3 OVERFLOW ST A3,FDBENL,A11 SAVE ENLARGE FACTOR XIF =8 EJECT * * SET OPEN MODE * LDK A1,0 DEFAULT VALUE LD A3,DWTOR,A10 SC A3,FDBOMD,A11 OPEN MODE LDR A2,A3 SLL A2,6 RF(NN) OPF150 EXCLUSIVE ACCESS NOT WANTED LD A1,DWTTAB,A10 TTAB ADDRESS OPF150 EQU * ST A1,FDBEXC,A11 SET EXCLUSIVE ACCESS USER IFT CRDEEX=1 =8 ANK A3,/FF CWK A3,SDMOOR RF(NE) OPSPLT NOT OUTPUT RANDOM,DON'T FORMAT * * FORMAT FILE IF OPEN OUTPUT RANDOM * CF A14,GTBKBU GET BLOCK BUFFER LDR A4,A5 BUFFER ADDRESS CF A14,FRMFIL FORMAT FILE RB(NZ) OERCOM ERROR WHEN FORMATTING XIF =8 EJECT *********************************************************************** * D A T A , I N D E X O R M A S T E R I N D E X F I L E * *********************************************************************** OPSPLT EQU * ST A11,OPEFWT,A13 SAVE FWT ADDR IFT INDXAC=1 LDR A13,A13 ABL(Z) OPDATA DATA FILE LDR A3,A9 ANK A3,/1 ABL(Z) OPINDX INDEX FILE EJECT ******************************* * M A S T E R I N D E X * ******************************* OPMRIX EQU * CWK A10,FDBSTA ABL(NE) OPCHEK ORDER READ FILE PAR LD* A3,DWTECB,A10 FILE CODE ANK A3,/FF ST A3,SDMTTD,A14 FC ENTRY IN TTAB SDMTSK ST A11,SDMTTD+2,A14 STR A3,A8 LDK A2,0 SC A2,FDBDBR,A11 NO SPECIAL FUNCTIONS ALLOWED SC A2,FDBBLZ+1,A11 NO COMMIT CHECK LDK A2,1 SC A2,FDBDMI,A11 LET SDMTSK 1 READ MASTER INDEX EJECT * * CALC NO OF WORDS NEEDED IN MASTER INDEX * LD A6,FPB:RL,A12 REC LGTH LDR A1,A6 SUK A1,3 KEY LENGTH CW A1,OPEKYL,A13 REQUESTED ABL(NE) OESWP4 ERR LD A7,FPB:FR+2,A12 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) OPM140 WRONG SIZE LD A4,MXIND LENGTH MXIND SUK A4,4 MAX A5 VALUE LDKL A5,-2 OFFSET OPM100 EQU * ADK A5,4 GET ENTRY CWR A5,A4 RF(G) OPM140 NO ENTRY FOUND LD A3,MXIND,A5 RB(Z) OPM100 ZERO ENTRY LD A6,MXIND+2,A5 RB(N) OPM100 ENTRY USED SUR A6,A2 NO OF SPARE WORDS RB(N) OPM100 LARGER ENTRY NEEDED EJECT * * SUFFICIENT SPACE FOUND * LDKL A1,/8000 USED BIT ORS A1,MXIND+2,A5 MARK ENTRY USED LDR A7,A9 ANK A7,/0E ST A3,OPEMXI,A7 MASTER INDEX ADDR LD A7,FPB:FR+2,A12 STR A7,A3 NO OF ENTRIES LD A1,FPB:RL,A12 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) OPM110 LAST ENTRY LD A3,MXIND+6,A1 RF(N) OPM110 NEXT ENTRY USED EJECT * * 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 * * R E A D M A S T E R I N D E X * OPM110 EQU * * * DATA MANAGEMENT REQUEST: * GET MASTER INDEX WITH READ SEQUENTIAL * LD A2,FDBEXC,A11 EXCLUSIVE TTAB =6 CM FDBEXC,A11 INDICATE NO EXCLUSIVE ACCESS =6 LDK A7,/82 READ SEQUENTIAL LKM DATA 1 ST A2,FDBEXC,A11 EXCLUSIVE ACCESS CORRECT AGAIN =6 LD A2,ECBRC,A8 ANKL A2,/FEFF BIT 7 ONLY RETRIES RF(Z) OPM130 NO ERROR * * REMOVE THE ONLY CRN BUFFER * LD A5,FDBCRL,A11 CRN BUF ADR RF(Z) OPM120 NO CRN CM FDBCRL,A11 INH LD A6,CRNQUE STR A6,A5 ST A5,CRNQUE ENB OPM120 EQU * LDR A1,A2 ANKL A2,/1000 BIT 3 = EOF RF(NZ) OPM150 READY ,WHOLIE MXINDEX IS READ ABL OERCOM ERR EJECT OPM130 EQU * * * RECORD READ,READ NEXRT * LD A2,ECBRL,A8 ADS A2,ECBBA,A8 REC LENGTH RB OPM110 READ NEXT RECORD OPM140 EQU * ABL OESNC1 CORE EXHAUSTED =4 EJECT * * C O M P L E T E M A S T E R I N D E X F I L E R E A D * * CLOSE MASTER INDEX FILE * OPM150 EQU * ST A10,SDMTTD+2,A14 CLOSE FC ENTRY CM FPB:FR+2,A12 DO NOT WRITE LRN LDR A7,A9 LOOP COUNT SRL A7,1 LC A7,OPEFNR,A7 FILE NR SC A7,ECBFC,A8 ST A12,ECBBA,A8 PAR BLOCK ADDR CF A14,CLRBUF RELEASE ALL FREE BUFFERS XRR A10,A11 XRR A11,A10 XRR A10,A11 CF A14,FMIOCL CLOSE (MAIN FDB ADDRESS) XRR A10,A11 XRR A11,A10 XRR A10,A11 ADK A1,0 ABL(NZ) OERCOM ABL OPCHEK NEXT FILE EJECT *************************** * I N D E X F I L E * *************************** OPINDX EQU * INDEX FILE * * UPDATE PAR BLOCK * LD A3,OPEFWT DATA FILE FDB ADDR LC A2,FDBNIF,A3 CM FPB:NI,A12 FILLER SC A2,FPB:NI,A12 NR OF INDEX LDR A3,A9 SRL A3,1 LDR A2,A3 LDR A4,A12 LDK A5,FPB:I2-FPB:I1 SUR A4,A5 EJECT OPI100 EQU * ADR A4,A5 REL ADDR SUK A2,1 NEXT INDEX RB(NZ) OPI100 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) OESLK8 LONG KEY EJECT * * CALCULATE INDEX SIZE * LD A1,FPB:S1,A12 LD A2,FPB:S1+2,A12 SIZE IN SECTORS LC A6,FDBBLZ,A11 BLOCK SIZE ANK A6,/FF CF A14,DIVMOD ABL(O) OESOF3 LONG FILE CM FPB:IS,A12 ST A2,FPB:IS+2,A12 SIZE IN BLOCKS * * GET INDEX VOLUME NAME * LDKL A1,FPB:V1 ADR A1,A12 FROM ADDR LDK A2,FPB:IV ADR A2,A12 TO LDK A3,6 LGTH CF A14,MOVFW MOVE RF OPCHEK XIF EJECT ************************* * D A T A F I L E * ************************* OPDATA EQU * DATA FILE * * UPDATE USER PAR BLOCK * LC A2,FDBNIF,A11 ANK A2,/FF RF(Z) OPD100 NO INDEX LDK A2,1 OPD100 EQU * SC A2,FPB:FO,A12 FILE ORG LDK A2,1 SC A2,FPB:FO+1,A12 DEVICE TYPE LC A2,OPEFNR FILE NR SC A2,FPB:FM,A12 LD A2,FDBDBR,A11 SRL A2,14 SC A2,FPB:BO,A12 DELAY BASIC TOSS OPTIONS * * CONVERT SIZE TO NUMBER OF RECORDS AND * ENLARGE FACTOR TO PERCENTAGE * CF A14,COSZEN EJECT * * 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) OPD120 TAKE SHORTEST LDR A3,A1 OPD120 EQU * LDR A1,A3 ADK A1,FPBRES ST A1,ECBEL,A4 SET EFFECTIVE LENGTH LDR A1,A12 FROM ADDR LD A2,ECBBA,A4 TO ADDR ADK A2,FPBRES RESERVED FIELD IFT MMUPAG=1 LD A4,DWTTAB,A10 TTAB ADDR USER CF A14,MOV:SU XIF IFT MMUPAG=0 CF A14,MOVFW MOVE XIF * * ADJUST FILE NAME FOR INDEXES * LDR A1,A12 ADKL A1,FPB:FN FROM ADDR LDR A2,A1 ADK A2,2 TO LDK A3,6 NO OF CHAR CF A14,MOVBW MOVE EJECT ***************************************************************** * C H E C K I F A L L F I L E S A R E O P E N E D * ***************************************************************** OPCHEK EQU * NEXT FILE IFT INDXAC=1 INDEXES YES SUKL A9,1 FILE LOOP CWK A9,1 RF(NG) OPEND ALL INDEXES ARE OPENED EJECT ******************************************* * M O R E F I L E S T O O P E N * ******************************************* CWK A10,FDBSTA RF(NE) OPN120 READ FILE PAR ORDER OPNEXT EQU * * * 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) OPN100 FIRST ANKL A9,/E NO MASTER INDEX OPN100 EQU * * * NEXT FILE NAME LDR A7,A9 SLL A7,1 WORD ADDR LD A1,OPEFN,A7 FIRST 2 CHAR IN FILE NAME ST A1,FPB:FN,A12 FILE NAME * * FETCH VOLUME NAME FOR INDEXES * LDKL A1,INDVOL FROM ADDR LDR A2,A12 ADKL A2,FPB:V1 TO ADDR LDK A3,6 CF A14,MOVFW MOVE VOLUME NAME EJECT * * MOVE SPACES TO OTHER VOLUME NAMES * LDK A6,30 NR OF VOLUME NAMES * 10 OPN110 EQU * SUK A6,10 RF(N) OPN130 ALL LDKL A1,OPESPA FROM ADDR LDR A2,A12 ADKL A2,FPB:V2 ADR A2,A6 TO ADDR LDK A3,6 NR OF CHAR CF A14,MOVFW RB OPN110 OPN120 EQU * GET FILE NR FOR READ FILE PAR LDR A7,A9 SRL A7,1 LC A2,OPEFNR,A7 GET FILE NUMBER =2 OPN130 EQU * CM DELAY NO DELAY FOR INDEXES CM NROFIX NO INDEX FOR NEXT FILE LDR A11,A10 SYSTEM FDB ADDRESS ABL OPLENT XIF EJECT *********************************************** * A L L F I L E S A R E O P E N E D * *********************************************** OPEND EQU * FINISH LD A11,OPEFWT FDB ADDR DATA FILE CWK A10,FDBSTA RF(NE) OPE140 READ FILE PAR ORDER * * STORE FDB ADDRESSES IN ALL FDB'S * LDK A5,10 NR OF FILES * 2 OPE100 EQU * SUK A5,2 RF(N) OPE110 ALL FDB UPPDATED LD A2,OPEFWT,A5 FDB ADDR INDEX RB(Z) OPE100 NO INDEX FILE LDKL A1,OPEFWT FROM ADDR ADKL A2,FDBADF TO ADDR LDK A3,10 NO OF BYTES CF A14,MOVFW MOVE 5 WORDS RB OPE100 OPE110 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 A4=TTAB/SCTCDT ENTRY ADDRESS ST A11,2,A4 FWT ADDR EJECT * * REMOVE CURRENCY BUFFER * XRR A10,A11 XRR A11,A10 XRR A10,A11 CF A14,CRNGET ADDR IN A2 XRR A10,A11 XRR A11,A10 XRR A10,A11 LDR A3,A10 ADKL A3,FDBCRL ROOT INH OPE120 EQU * LDR A1,A3 LDR* A3,A3 NEXT BUFFER CWR A3,A2 RB(NE) OPE120 NEXT BUFFER LDR* A4,A3 NEXT STR A4,A1 LD A3,CRNQUE STR A3,A2 ST A2,CRNQUE ENB EJECT OPE140 EQU * * * CHECK USER SIZE AND UPDATE PARAMETER BLOCK * LDK A1,FPB:IV LC A3,FDBNIF,A11 NR OF INDEX ANK A3,/F IFT INDXAC=1 RF(Z) OPE150 LDR A4,A3 SLL A3,3 SLL A4,2 ADR A3,A4 MULT WITH 12 ADK A3,FPB:I1 SUR A3,A1 MAX NR OF REM CHAR OPE150 EQU * XIF ADR A1,A12 FROM ADDR LD A6,DWTECB,A10 USER ECB LD A2,ECBRL,A6 TOT LENGTH SUK A2,FPB:IV+FPBRES CWR A3,A2 REM LGTH RF(NG) OPE160 TAKE SHORTEST LDR A3,A2 EJECT OPE160 EQU * LDR A2,A3 ADK A2,FPB:IV+FPBRES ST A2,ECBEL,A6 SET EFFECTIVE LENGTH LD A2,ECBBA,A6 ADK A2,FPB:IV+FPBRES TO ADDER IFT MMUPAG=0 CF A14,MOVFW MOVE XIF IFT MMUPAG=1 LD A4,DWTTAB,A10 USER TTAB ADDR CF A14,MOV:SU XIF EJECT * **************** * OPEN END * **************** * LDR A11,A10 MAIN FDB ADDRESS LDK A1,0 RET CODE ABL SDMERX TENDIO+EXIT IN SDMTSK EJECT ***************** * C L O S E * ***************** SDMCLO EQU * CLOSE * * (A4= BLOCK BUFFER ADDRESS ) * (A5 = BLOCK BUFFER DATA ADDRESS ) * A11= FDB ADDRESS ALL ORDERS * A7 = ORDER CODE ALL ORDERS * (A8 = FDBECB ADDRESS ) * (A9 = USER ECB ADDRESS ) * LD A9,DWTECB,A11 USER ECB ADDRESS LD A3,FDBDBR,A11 RF(NN) SDMC10 NO DELAY CF A14,FMIOWR WRITE ORS A1,ECBRC,A9 SET RETURN CODE SDMC10 EQU * IFT CRDEEX=1 =8 LC A3,DWTOPT,A11 ANK A3,2 RF(NZ) SDMC20 CLOSE DISCARD EJECT * * CLOSE LOCK * LC A3,FDBOMD,A11 OPEN MODE CWK A3,SDMOOR RF(E) SDMC20 DON'T FORMAT,OUTPUT RANDOM CWK A3,SDMOEE RF(L) SDMC20 DON'T FORMAT,NOT EXTEND OR SEQ. * * FORMAT FILE IF OPENED OUTPUT SEQUENTIAL OR EXTEND * LDR A4,A5 BLOCK BUFFER DATA ADDRESS LD A3,FDBRRO,A11 RECORD OFFSET IN BLOCK =1 LD A1,FDBBLZ,A11 SLL A1,8 BLOCK SIZE IN BYTES LD A5,FDBLRN+1,A11 =3 RF(NZ) SDMC12 FILE NOT EMPTY =3 LC A5,FDBLRN,A11 =3 ADK A5,0 SET CR =3 RF(Z) SDMC16 FILE EMPTY =3 SDMC12 EQU * =3 AD A3,FDBRLE,A11 RECORD LENGTH =1 ADK A3,1 OFFSET TO LRN + 1 =1 SUR A1,A3 LENGTH LEFT IN BUFFER =1 SDMC16 EQU * =3 ADR A3,A4 RECORD POINTER LRN+1 =1 CF A14,FORMER BUILD FORMATTED BUFFER =1 CF A14,FMIOWR WRITE BLOCK BUFFER LDR A2,A1 RETURN CODE SLL A2,2 RF(N) SDMC20 END OF FILE ORS A1,ECBRC,A9 SET RETURN CODE LD A1,FDBSNR,A11 SECTOR NUMBER LD A2,FDBSNR+2,A11 LDK A6,0 LD A7,FDBBLZ,A11 BLOCK SIZE IN SECTORS CF A14,ADDMOD GET NEXT SECTOR ST A1,FDBSNR,A11 ST A2,FDBSNR+2,A11 CF A14,FRMFIL FORMAT REST OF FILE ORS A1,ECBRC,A9 SET RETURN CODE RF SDMC30 SDMC20 EQU * XIF =8 LD A4,FDBEXC,A11 EXCLUSIVE ACCESS INDICATOR =7 RF(NZ) SDMC25 OPENED EXCLUSIVE =7 SC A4,DWTOPT,A11 INDICATE CLOSE LOCK =7 SDMC25 EQU * =7 CF A14,SDMRLB RELEASE BLOCK BUFFER SDMC30 EQU * * * CLEAR CURRENCY * CF A14,CRNGET GET CURRENCY BUFFER 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 EJECT * * BUILD CLOSE TABLES * LC A7,ECBFC,A9 FILE CODE LDK A5,10 2 * FILES SDMC40 EQU * SUK A5,2 RF(N) SDMC60 ALL FILES LDR A4,A11 ADR A4,A5 LDK A1,0 LDK A2,0 LDK A6,0 SUR A9,A9 SUR A10,A10 LD A3,FDBADF,A4 FDB ADDR RF(Z) SDMC50 NO FILE LD A6,FDBMIA,A3 MASTER INDEX ADDR LC A2,FWTFNR,A3 FILE NR LC A9,FDBLRN,A3 LAST REC NR LD A10,FDBLRN+1,A3 SDMC50 EQU * ST A6,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 SDMC40 NEXT FILE EJECT SDMC60 EQU * SC A7,OPEFCD FILE CODE * * A11=MAIN FDB ADDRESS * CLOCOM EQU * RECOVERY AT ERRORS LC A2,DWTOR+1,A11 ORDER CODE INTERNAL CWK A2,ORDFLP ABL(E) SDMERX READ FILE PARAMETERS * * FREE FILE CODES,MASTER INDEXES,FILES, CURRENCY * LDKL A9,5 OPEE10 EQU * SUKL A9,1 RF(NN) OPEE20 MORE FILES EJECT * ***************** * CLOSE END * ***************** * LDK A1,0 RET CODE ABL SDMERX EJECT * * RESET FILE CODE* * OPEE20 EQU * LC A2,OPEFCD,A9 FILE CODE ANK A2,/FF RF(Z) OPEE25 NO CODE LDK A5,0 TTAB AND CDTAB LD A1,DWTTAB,A11 USER TTAB ADDR CF A14,FNDFDB LDR A2,A2 RET CD RF(Z) OPEE25 NO ENTRY LDKL A7,FDBSTA SYSTEM FDB ADDRESS ST A7,2,A4 SYSTEM FWT ADDR OPEE25 EQU * EJECT * * RELEASE EA+CRN BUFFERS * LDR A7,A9 SLL A7,1 WORDS LDR A13,A11 SAVE FDB ADDRESS LD A11,OPEFWT,A7 FDB ADDR RF(Z) CLODEL NO FDB LDKL A1,/C000 LDK A3,0 CF A14,EARELB REL PROTECT BUFFERS ENB LC A5,FWTPAR,A11 ANK A5,/3F NR OF USERS SUK A5,1 RF(NZ) CLODEL 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 RCRN20 RCRN10 EQU * LDR A4,A5 BUFFER ADDRESS RCRN20 EQU * RF(Z) RMIX10 ALL BUFFER S REMOVED LDR* A5,A4 NEXT BUFFER ADDRESS * * RETURN BUFFER TO POOL * INH LD A3,CRNQUE STR A3,A4 ST A4,CRNQUE ENB RB RCRN10 EJECT RMIX10 EQU * IFT INDXAC=1 * * RELEASE MASTER INDEX * LD A1,OPEMXI,A7 MASTER INDEX ADDR RF(Z) CLODEL NO MX LD A5,MXIND LENTH SUK A5,2 RMIX20 EQU * SUK A5,4 RF(Z) RMIX30 FIRST INDEX RF(N) CLODEL NO MASTER INDEX CW A1,MXIND+2,A5 RB(NE) RMIX20 LD A4,MXIND,A5 RF(N) RMIX30 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 A2,A1 SUK A2,4 TO ADDR LD A3,MXIND SUR A3,A5 SUK A3,2 NO OF CHAR CF A14,MOVFW MOVE RF CLODEL RMIX30 EQU * LDKL A4,/7FFF ANS A4,MXIND+4,A5 REMOVE USE BIT XIF EJECT * * CLOSE OR DELETE FILE * CLODEL EQU * LDR A7,A9 SLL A7,2 2 WORD INDEX LD A1,OPELRN,A7 LAST REC NR ST A1,FPB:FR,A12 LD A1,OPELRN+2,A7 ST A1,FPB:FR+2,A12 LC A7,OPEFNR,A9 ANK A7,/FF RF(Z) CLDL20 NO FILE OPENED ST A7,ECBFC-1,A8 FILE NR ST A12,ECBBA,A8 PAR BLOCK ADDR CF A14,CLRBUF CLEAR FREE BUFFERS LDR A11,A13 MAIN FDB ADDRESS EJECT IFT CRDEEX=1 =8 LC A7,DWTOPT,A11 ANK A7,/4F TEST MASK =5 SUK A7,2 =5 RF(Z) DELETE CLOSE DISCARD,OPEN OUT SEQ OR OPEN OUT RAN =5 XIF =8 CF A14,FMIOCL CLOSE IFT CRDEEX=1 =8 RF CLDL10 DELETE EQU * CF A14,FMIODL DELETE CLDL10 EQU * XIF =8 LD A2,DWTECB,A11 USER ECB ADDRESS ORS A1,ECBRC,A2 SEND CODE CLDL20 EQU * LDR A11,A13 MAIN FDB ADDRESS ABL OPEE10 NEXT FILE END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT SDMOCR REL 11.0 81-05-12 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0062 Head {h00=0x0020, h01=0x0050, text=» =8,CONDITION FOR CR,DE,EX«, t00=0x0000, t01=0x0042}
0x0062…0082 Head {h00=0x001c, h01=0x0050, text=» =8,REL 11.0 81-04-02 «, t00=0x0000, t01=0x0066}
0x0082…00b0 Head {h00=0x002a, h01=0x0050, text=» =7,NO DEL OF FILE WHEN NOT OP. EXC.«, t00=0x0000, t01=0x0086}
0x00b0…00d0 Head {h00=0x001c, h01=0x0050, text=» =7,REL 11.0 81-03-24 «, t00=0x0000, t01=0x00b4}
0x00d0…0102 Head {h00=0x002e, h01=0x0050, text=» =6,NO EXCLUSIVE ACCESS WHEN MXIND READ «, t00=0x0000, t01=0x00d4}
0x0102…0122 Head {h00=0x001c, h01=0x0050, text=» =6,REL 11.0 81-03-16 «, t00=0x0000, t01=0x0106}
0x0122…0158 Head {h00=0x0032, h01=0x0050, text=» =5,NO DEL OF FIL WHEN OPEN I/O EXCL. FAILS «, t00=0x0000, t01=0x0126}
0x0158…0178 Head {h00=0x001c, h01=0x0050, text=» =5,REL 11.0 81-03-16 «, t00=0x0000, t01=0x015c}
0x0178…019e Head {h00=0x0022, h01=0x0050, text=» =4,STATUS INF. NOT CORRECT «, t00=0x0000, t01=0x017c}
0x019e…01be Head {h00=0x001c, h01=0x0050, text=» =4,REL 11.0 81-02-24 «, t00=0x0001, t01=0x0012}
0x01be…01f0 Head {h00=0x002e, h01=0x0050, text=» =3,FORMAT FIRST RECORD ALSO WHEN LRN=0 «, t00=0x0001, t01=0x0032}
0x01f0…0210 Head {h00=0x001c, h01=0x0050, text=» =3,REL 11.0 81-02-12 «, t00=0x0001, t01=0x0064}
0x0210…023e Head {h00=0x002a, h01=0x0050, text=» =2,FILE NBR IN WRONG REG. WHEN RFP «, t00=0x0001, t01=0x0084}
0x023e…025e Head {h00=0x001c, h01=0x0050, text=» =2,REL 11.0 81-02-04 «, t00=0x0001, t01=0x00b2}
0x025e…0280 Head {h00=0x001e, h01=0x0050, text=» =1,CLOSE FORMAT CHANGED«, t00=0x0001, t01=0x00d2}
0x0280…02a0 Head {h00=0x001c, h01=0x0050, text=» =1,REL 11.0 81-01-26 «, t00=0x0001, t01=0x00f4}
0x02a0…02dc Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0001, t01=0x0114}
0x02dc…02e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0150}
0x02e6…030e Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0001, t01=0x015a}
0x030e…0318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0182}
0x0318…0356 Head {h00=0x003a, h01=0x0050, text=»* SDMOCR HANDLES OPEN CLOSE AND READ FILE PARAMETERS«, t00=0x0001, t01=0x018c}
0x0356…037e Head {h00=0x0024, h01=0x0050, text=»* IT IS ACTIVATED FROM SDMTSK «, t00=0x0002, t01=0x003a}
0x037e…0388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0062}
0x0388…0392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006c}
0x0392…039c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0076}
0x039c…03a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0080}
0x03a6…03b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008a}
0x03b0…03ec Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x0094}
0x03ec…03f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d0}
0x03f6…0404 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x00da}
0x0404…040e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e8}
0x040e…0426 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0002, t01=0x00f2}
0x0426…043e Head {h00=0x0014, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x010a}
0x043e…0456 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0002, t01=0x0122}
0x0456…0460 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013a}
0x0460…046a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0144}
0x046a…048e Head {h00=0x0020, h01=0x0050, text=» ENTRY SDMOPN,SDMCLO,SDMRFP «, t00=0x0002, t01=0x014e}
0x048e…04a4 Head {h00=0x0012, h01=0x0050, text=» ENTRY OPEFPB «, t00=0x0002, t01=0x0172}
0x04a4…04b2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0188}
0x04b2…04bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0008}
0x04bc…04d6 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0003, t01=0x0012}
0x04d6…04f0 Head {h00=0x0016, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x002c}
0x04f0…050a Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0003, t01=0x0046}
0x050a…0514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0060}
0x0514…0546 Head {h00=0x002e, h01=0x0050, text=» EXTRN CLRBUF,CRNCDF,CRNCIF,CRNGET,CRNQUE «, t00=0x0003, t01=0x006a}
0x0546…055a Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRC«, t00=0x0003, t01=0x009c}
0x055a…0592 Head {h00=0x0034, h01=0x0050, text=» EXTRN FDBADF,FDBBLF,FDBCRL,FDBECB,FDBKA,FDBLRN «, t00=0x0003, t01=0x00b0}
0x0592…05ca Head {h00=0x0034, h01=0x0050, text=» EXTRN FDBMEC,FDBMIA,FDBNIF,FDBRLE,FDBSTA,FDBEXC«, t00=0x0003, t01=0x00e8}
0x05ca…05e0 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBENL «, t00=0x0003, t01=0x0120}
0x05e0…05f6 Head {h00=0x0012, h01=0x0050, text=» EXTRN FNDFDB «, t00=0x0003, t01=0x0136}
0x05f6…061a Head {h00=0x0020, h01=0x0050, text=» EXTRN FWTFNR,FWTPAR,FWTVOL «, t00=0x0003, t01=0x014c}
0x061a…0636 Head {h00=0x0018, h01=0x0050, text=» EXTRN MOV:SU,MOV:US«, t00=0x0003, t01=0x0170}
0x0636…0652 Head {h00=0x0018, h01=0x0050, text=» EXTRN MPYMOD,MXIND «, t00=0x0003, t01=0x018c}
0x0652…0668 Head {h00=0x0012, h01=0x0050, text=» EXTRN DIVMOD «, t00=0x0004, t01=0x0018}
0x0668…0692 Head {h00=0x0026, h01=0x0050, text=» EXTRN FDBDBR,FDBMRO,FDBDMI,FDBBLZ«, t00=0x0004, t01=0x002e}
0x0692…06a8 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBOMD «, t00=0x0004, t01=0x0058}
0x06a8…06bc Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBFC«, t00=0x0004, t01=0x006e}
0x06bc…06d0 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBBA«, t00=0x0004, t01=0x0082}
0x06d0…06e4 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBEL«, t00=0x0004, t01=0x0096}
0x06e4…06f8 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRL«, t00=0x0004, t01=0x00aa}
0x06f8…070e Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTECB «, t00=0x0004, t01=0x00be}
0x070e…0722 Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTOR«, t00=0x0004, t01=0x00d4}
0x0722…073e Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTTAB,DWTOPT«, t00=0x0004, t01=0x00e8}
0x073e…0770 Head {h00=0x002e, h01=0x0050, text=» EXTRN FPB:RL,FPB:BF,FPB:FO,FPB:BO,FPB:FN «, t00=0x0004, t01=0x0104}
0x0770…07a2 Head {h00=0x002e, h01=0x0050, text=» EXTRN FPB:V1,FPB:S1,FPB:V2,FPB:MN,FPB:EL «, t00=0x0004, t01=0x0136}
0x07a2…07cc Head {h00=0x0026, h01=0x0050, text=» EXTRN FPB:FR,FPB:US,FPB:SH,FPB:KA«, t00=0x0004, t01=0x0168}
0x07cc…07e8 (5, 0, 400) Head {h00=0x0018, h01=0x0050, text=» EXTRN CASZEN,COSZEN«, t00=0x0005, t01=0x0004}
0x07e8…0812 Head {h00=0x0026, h01=0x0050, text=» EXTRN GTBKBU,FRMFIL,FMIOCR,FMIODL«, t00=0x0005, t01=0x0020}
0x0812…0820 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x004a}
0x0820…0842 Head {h00=0x001e, h01=0x0050, text=» EXTRN CRNSTA,DFTAB,DMTIDP«, t00=0x0005, t01=0x0058}
0x0842…0858 Head {h00=0x0012, h01=0x0050, text=» EXTRN SDMERX «, t00=0x0005, t01=0x007a}
0x0858…086c Head {h00=0x0010, h01=0x0050, text=» EXTRN MOVFW«, t00=0x0005, t01=0x0090}
0x086c…0882 Head {h00=0x0012, h01=0x0050, text=» EXTRN EARELB «, t00=0x0005, t01=0x00a4}
0x0882…0898 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASHLT «, t00=0x0005, t01=0x00ba}
0x0898…08ae Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBEAL «, t00=0x0005, t01=0x00d0}
0x08ae…08ca Head {h00=0x0018, h01=0x0050, text=» EXTRN RECBFZ,REQERR«, t00=0x0005, t01=0x00e6}
0x08ca…08de Head {h00=0x0010, h01=0x0050, text=» EXTRN MOVBW«, t00=0x0005, t01=0x0102}
0x08de…0908 Head {h00=0x0026, h01=0x0050, text=» EXTRN FMIOOP,FMIOCL,FMIORF,FMIOWR«, t00=0x0005, t01=0x0116}
0x0908…0924 Head {h00=0x0018, h01=0x0050, text=» EXTRN SDMOIE,SDMOOS«, t00=0x0005, t01=0x0140}
0x0924…093a Head {h00=0x0012, h01=0x0050, text=» EXTRN CARRBL «, t00=0x0005, t01=0x015c}
0x093a…0956 Head {h00=0x0018, h01=0x0050, text=» EXTRN SDMOOR,SDMOEE«, t00=0x0005, t01=0x0172}
0x0956…0972 Head {h00=0x0018, h01=0x0050, text=» EXTRN FDBRRO,FDBSNR«, t00=0x0005, t01=0x018e}
0x0972…0988 Head {h00=0x0012, h01=0x0050, text=» EXTRN FORMER «, t00=0x0006, t01=0x001a}
0x0988…099e Head {h00=0x0012, h01=0x0050, text=» EXTRN ADDMOD «, t00=0x0006, t01=0x0030}
0x099e…09ba Head {h00=0x0018, h01=0x0050, text=» EXTRN SDMRLB,SDMTTD«, t00=0x0006, t01=0x0046}
0x09ba…09d0 Head {h00=0x0012, h01=0x0050, text=» EXTRN ORDFLP «, t00=0x0006, t01=0x0062}
0x09d0…09e6 Head {h00=0x0012, h01=0x0050, text=» EXTRN ENLFAC «, t00=0x0006, t01=0x0078}
0x09e6…09fe Head {h00=0x0014, h01=0x0050, text=» EJECT SDMTSK «, t00=0x0006, t01=0x008e}
0x09fe…0a20 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0006, t01=0x00a6}
0x0a20…0a40 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0006, t01=0x00c8}
0x0a40…0a62 Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0006, t01=0x00e8}
0x0a62…0a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010a}
0x0a6c…0a76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0114}
0x0a76…0aa8 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0006, t01=0x011e}
0x0aa8…0ad6 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0006, t01=0x0150}
0x0ad6…0ae0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017e}
0x0ae0…0af4 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0006, t01=0x0188}
0x0af4…0afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000c}
0x0afe…0b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0016}
0x0b08…0b12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0020}
0x0b12…0b4c Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION FOR INDEXED ACCESS HANDLING «, t00=0x0007, t01=0x002a}
0x0b4c…0b7a Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING INDXAC = 1 «, t00=0x0007, t01=0x0064}
0x0b7a…0b8c Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0007, t01=0x0092}
0x0b8c…0ba4 Head {h00=0x0014, h01=0x0050, text=»INDXAC EQU 00001«, t00=0x0007, t01=0x00a4}
0x0ba4…0bae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00bc}
0x0bae…0bda Head {h00=0x0028, h01=0x0050, text=»* A VERSION LEAVING OUT OPEN MODES: «, t00=0x0007, t01=0x00c6}
0x0bda…0c08 Head {h00=0x002a, h01=0x0050, text=»* OPEN OUTPUT,OPEN EXTEND AND DISCARD «, t00=0x0007, t01=0x00f2}
0x0c08…0c2e Head {h00=0x0022, h01=0x0050, text=»* IS OBTAINED BY SETTING Y:C=0«, t00=0x0007, t01=0x0120}
0x0c2e…0c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0146}
0x0c38…0c4e Head {h00=0x0012, h01=0x0050, text=»X:B EQU 0 =8 «, t00=0x0007, t01=0x0150}
0x0c4e…0c6a Head {h00=0x0018, h01=0x0050, text=»CRDEEX EQU 00000 =8«, t00=0x0007, t01=0x0166}
0x0c6a…0c78 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0182}
0x0c78…0c9c Head {h00=0x0020, h01=0x0050, text=»FPBSTA EQU 0 START ADDR FPB «, t00=0x0007, t01=0x0190}
0x0c9c…0cc8 Head {h00=0x0028, h01=0x0050, text=»FPB:IV EQU FPBSTA+58 VOL NAME INDEX «, t00=0x0008, t01=0x0024}
0x0cc8…0cf0 Head {h00=0x0024, h01=0x0050, text=»FPB:IS EQU FPBSTA+64 INDEX SIZE «, t00=0x0008, t01=0x0050}
0x0cf0…0d18 Head {h00=0x0024, h01=0x0050, text=»FPB:NI EQU FPBSTA+68 NR OF INDEX«, t00=0x0008, t01=0x0078}
0x0d18…0d40 Head {h00=0x0024, h01=0x0050, text=»FPB:I1 EQU FPBSTA+70 INDEX ID 1 «, t00=0x0008, t01=0x00a0}
0x0d40…0d68 Head {h00=0x0024, h01=0x0050, text=»FPB:A1 EQU FPBSTA+78 KEY ADDR 1 «, t00=0x0008, t01=0x00c8}
0x0d68…0d92 Head {h00=0x0026, h01=0x0050, text=»FPB:L1 EQU FPBSTA+80 KEY LENGTH 1 «, t00=0x0008, t01=0x00f0}
0x0d92…0dae Head {h00=0x0018, h01=0x0050, text=»FPB:I2 EQU FPBSTA+82«, t00=0x0008, t01=0x011a}
0x0dae…0dcc Head {h00=0x001a, h01=0x0050, text=»FPB:L4 EQU FPBSTA+116 «, t00=0x0008, t01=0x0136}
0x0dcc…0dd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0154}
0x0dd6…0dfe Head {h00=0x0024, h01=0x0050, text=»FPB:FM EQU FPBSTA+6 TOSS FILE NR«, t00=0x0008, t01=0x015e}
0x0dfe…0e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0186}
0x0e08…0e38 Head {h00=0x002c, h01=0x0050, text=»FPBSIZ EQU 60 SIZE OF FPB AREA IN WORDS «, t00=0x0008, t01=0x0190}
0x0e38…0e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0030}
0x0e42…0e7e Head {h00=0x0038, h01=0x0050, text=»FPBRES EQU 8 RESERVED FIELD LENGTH IN FILE PAR BLOCK«, t00=0x0009, t01=0x003a}
0x0e7e…0e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0076}
0x0e88…0eb0 Head {h00=0x0024, h01=0x0050, text=»NOCORE EQU 1 NO CORE ERROR CODE «, t00=0x0009, t01=0x0080}
0x0eb0…0eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a8}
0x0eba…0ee0 Head {h00=0x0022, h01=0x0050, text=»ERPAR EQU 4 WRONG PAR ERR CODE«, t00=0x0009, t01=0x00b2}
0x0ee0…0eea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d8}
0x0eea…0f0e Head {h00=0x0020, h01=0x0050, text=»OFLW EQU 3 OVERFLOW ERR CODE«, t00=0x0009, t01=0x00e2}
0x0f0e…0f18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0106}
0x0f18…0f3e Head {h00=0x0022, h01=0x0050, text=»ERKEYL EQU 8 LONG KEY ERR CODE«, t00=0x0009, t01=0x0110}
0x0f3e…0f48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0136}
0x0f48…0f6c Head {h00=0x0020, h01=0x0050, text=»ILLNAM EQU 9 ILLEGAL NAME =4«, t00=0x0009, t01=0x0140}
0x0f6c…0f7a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0164}
0x0f7a…0f9a Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x0172}
0x0f9a…0fba (10, 0, 400) Head {h00=0x001c, h01=0x0050, text=»* DATA DEFINITIONS *«, t00=0x000a, t01=0x0004}
0x0fba…0fda Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000a, t01=0x0024}
0x0fda…1018 Head {h00=0x003a, h01=0x0050, text=»* HERE FOLLOWS NON-REENTRANT AREAS USED BY ORDERS : «, t00=0x000a, t01=0x0044}
0x1018…1044 Head {h00=0x0028, h01=0x0050, text=»* OPEN,CLOSE,READ FILE PARAMETERS.«, t00=0x000a, t01=0x0082}
0x1044…104e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00ae}
0x104e…1070 Head {h00=0x001e, h01=0x0050, text=»OPESPA DATA ' ' 2 SPACES «, t00=0x000a, t01=0x00b8}
0x1070…1096 Head {h00=0x0022, h01=0x0050, text=»OPEFN EQU * FILE NAME PREFIXES«, t00=0x000a, t01=0x00da}
0x1096…10aa Head {h00=0x0010, h01=0x0050, text=» DATA ' '«, t00=0x000a, t01=0x0100}
0x10aa…10be Head {h00=0x0010, h01=0x0050, text=» DATA 'I1M1'«, t00=0x000a, t01=0x0114}
0x10be…10d2 Head {h00=0x0010, h01=0x0050, text=» DATA 'I2M2'«, t00=0x000a, t01=0x0128}
0x10d2…10e6 Head {h00=0x0010, h01=0x0050, text=» DATA 'I3M3'«, t00=0x000a, t01=0x013c}
0x10e6…10fa Head {h00=0x0010, h01=0x0050, text=» DATA 'I4M4'«, t00=0x000a, t01=0x0150}
0x10fa…111e Head {h00=0x0020, h01=0x0050, text=»OPEFNR EQU * OPENED FILE NRS«, t00=0x000a, t01=0x0164}
0x111e…1132 Head {h00=0x0010, h01=0x0050, text=» DATA 0,0,0 «, t00=0x000a, t01=0x0188}
0x1132…1158 Head {h00=0x0022, h01=0x0050, text=»OPEFCD EQU * OPENED FILE CODES«, t00=0x000b, t01=0x000c}
0x1158…116c Head {h00=0x0010, h01=0x0050, text=» DATA 0,0,0 «, t00=0x000b, t01=0x0032}
0x116c…118e Head {h00=0x001e, h01=0x0050, text=»OPEFWT EQU * FWT ADDRESSES«, t00=0x000b, t01=0x0046}
0x118e…11a6 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0,0,0,0 «, t00=0x000b, t01=0x0068}
0x11a6…11d2 Head {h00=0x0028, h01=0x0050, text=»OPEMXI EQU * MASTER INDEX ADDRESSES «, t00=0x000b, t01=0x0080}
0x11d2…11ea Head {h00=0x0014, h01=0x0050, text=» DATA 0,0,0,0,0 «, t00=0x000b, t01=0x00ac}
0x11ea…121e Head {h00=0x0030, h01=0x0050, text=»OPELRN DATA 0,0,0,0,0,0,0,0,0,0 LAST REC NRS«, t00=0x000b, t01=0x00c4}
0x121e…122c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00f8}
0x122c…1258 Head {h00=0x0028, h01=0x0050, text=»OPEKAD DATA 0,0,0,0,0 KEY ADDRESSES «, t00=0x000b, t01=0x0106}
0x1258…1280 Head {h00=0x0024, h01=0x0050, text=»OPEKYL DATA 0,0,0,0,0 KEY LENGTH«, t00=0x000b, t01=0x0132}
0x1280…1294 Head {h00=0x0010, h01=0x0050, text=»DELAY DATA 0«, t00=0x000b, t01=0x015a}
0x1294…12bc Head {h00=0x0024, h01=0x0050, text=»NROFIX DATA 0 NR OF INDEX FILES «, t00=0x000b, t01=0x016e}
0x12bc…12e8 Head {h00=0x0028, h01=0x0050, text=»INDVOL RES 3 VOLUME NAME INDEX FILES«, t00=0x000c, t01=0x0008}
0x12e8…1318 Head {h00=0x002c, h01=0x0050, text=»OPEFPB RES FPBSIZ FILE ADM PARAM. BLOCK «, t00=0x000c, t01=0x0034}
0x1318…1342 Head {h00=0x0026, h01=0x0050, text=»OPEEND EQU *-OPEFNR-2 NR OF BYTES «, t00=0x000c, t01=0x0064}
0x1342…1350 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x008e}
0x1350…1386 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x000c, t01=0x009c}
0x1386…13bc Head {h00=0x0032, h01=0x0050, text=»* R E A D F I L E P A R A M E T E R S * «, t00=0x000c, t01=0x00d2}
0x13bc…13f2 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x000c, t01=0x0108}
0x13f2…13fa Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x013e}
0x13fa…1424 Head {h00=0x0026, h01=0x0050, text=»SDMRFP EQU * READ FILE PARAMETERS «, t00=0x000c, t01=0x0146}
0x1424…142e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0170}
0x142e…145a Head {h00=0x0028, h01=0x0050, text=»* A10,A11 = FDB ADDRESS ALL ORDERS«, t00=0x000c, t01=0x017a}
0x145a…1480 Head {h00=0x0022, h01=0x0050, text=»* A7 = ORDER CODE ALL ORDERS«, t00=0x000d, t01=0x0016}
0x1480…148a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x003c}
0x148a…14a8 Head {h00=0x001a, h01=0x0050, text=» LDR A10,A11 FBD ADDR «, t00=0x000d, t01=0x0046}
0x14a8…14ce Head {h00=0x0022, h01=0x0050, text=» LC A2,FDBNIF,A11 NR OF INDEX «, t00=0x000d, t01=0x0064}
0x14ce…14e2 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x000d, t01=0x008a}
0x14e2…14f8 Head {h00=0x0012, h01=0x0050, text=» ST A2,NROFIX «, t00=0x000d, t01=0x009e}
0x14f8…151c Head {h00=0x0020, h01=0x0050, text=»* STORE FILE NRS IN OPEFNR«, t00=0x000d, t01=0x00b4}
0x151c…1526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00d8}
0x1526…1544 Head {h00=0x001a, h01=0x0050, text=» LDK A5,10 2 * INDEXES«, t00=0x000d, t01=0x00e2}
0x1544…1558 Head {h00=0x0010, h01=0x0050, text=»RFP100 EQU *«, t00=0x000d, t01=0x0100}
0x1558…156a Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x000d, t01=0x0114}
0x156a…158a Head {h00=0x001c, h01=0x0050, text=» RF(N) SDMO30 ALL FILES «, t00=0x000d, t01=0x0126}
0x158a…159e Head {h00=0x0010, h01=0x0050, text=» LDR A4,A11 «, t00=0x000d, t01=0x0146}
0x159e…15b0 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x000d, t01=0x015a}
0x15b0…15d2 Head {h00=0x001e, h01=0x0050, text=» LD A3,FDBADF,A4 FDB ADDR «, t00=0x000d, t01=0x016c}
0x15d2…15f0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) RFP130 NO FILE «, t00=0x000d, t01=0x018e}
0x15f0…1610 Head {h00=0x001c, h01=0x0050, text=» LC A2,FWTFNR,A3 FILE NR«, t00=0x000e, t01=0x001c}
0x1610…1624 Head {h00=0x0010, h01=0x0050, text=»RFP130 EQU *«, t00=0x000e, t01=0x003c}
0x1624…1636 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x000e, t01=0x0050}
0x1636…1648 Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x000e, t01=0x0062}
0x1648…166e Head {h00=0x0022, h01=0x0050, text=» SC A2,OPEFNR,A4 SAVE FILE NR «, t00=0x000e, t01=0x0074}
0x166e…168a Head {h00=0x0018, h01=0x0050, text=» RB RFP100 NEXT FILE«, t00=0x000e, t01=0x009a}
0x168a…1698 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x00b6}
0x1698…16b0 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x000e, t01=0x00c4}
0x16b0…16c8 Head {h00=0x0014, h01=0x0050, text=»* O P E N * «, t00=0x000e, t01=0x00dc}
0x16c8…16e0 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x000e, t01=0x00f4}
0x16e0…16e8 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x010c}
0x16e8…1702 Head {h00=0x0016, h01=0x0050, text=»SDMOPN EQU * OPEN «, t00=0x000e, t01=0x0114}
0x1702…170c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012e}
0x170c…1726 Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDR «, t00=0x000e, t01=0x0138}
0x1726…1744 Head {h00=0x001a, h01=0x0050, text=»* A9 = LOOP COUNTER «, t00=0x000e, t01=0x0152}
0x1744…176c Head {h00=0x0024, h01=0x0050, text=»* A10,A11 = SYSTEM FDB ADDRESS«, t00=0x000e, t01=0x0170}
0x176c…178a Head {h00=0x001a, h01=0x0050, text=»* A12 = FPB ADDRESS «, t00=0x000f, t01=0x0008}
0x178a…1794 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0026}
0x1794…17b8 Head {h00=0x0020, h01=0x0050, text=»* A9 = LOOP COUNTER FILES«, t00=0x000f, t01=0x0030}
0x17b8…17c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0054}
0x17c2…17e2 Head {h00=0x001c, h01=0x0050, text=»* 1 = DATA FILE «, t00=0x000f, t01=0x005e}
0x17e2…1800 Head {h00=0x001a, h01=0x0050, text=»* 2 = INDEX 1 «, t00=0x000f, t01=0x007e}
0x1800…1824 Head {h00=0x0020, h01=0x0050, text=»* 3 = MASTER INDEX 1«, t00=0x000f, t01=0x009c}
0x1824…1842 Head {h00=0x001a, h01=0x0050, text=»* 4 = INDEX 2 «, t00=0x000f, t01=0x00c0}
0x1842…1858 Head {h00=0x0012, h01=0x0050, text=»* ETC «, t00=0x000f, t01=0x00de}
0x1858…1862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f4}
0x1862…1886 Head {h00=0x0020, h01=0x0050, text=» LDR A10,A11 SYSTEM FWT ADDR«, t00=0x000f, t01=0x00fe}
0x1886…1894 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0122}
0x1894…189e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0130}
0x189e…18ba Head {h00=0x0018, h01=0x0050, text=»* CLEAR WORK AREA «, t00=0x000f, t01=0x013a}
0x18ba…18c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0156}
0x18c4…18ee Head {h00=0x0026, h01=0x0050, text=» LDK A2,OPEEND NR OF BYTE TO CLEAR«, t00=0x000f, t01=0x0160}
0x18ee…1902 Head {h00=0x0010, h01=0x0050, text=»SDMO10 EQU *«, t00=0x000f, t01=0x018a}
0x1902…1918 Head {h00=0x0012, h01=0x0050, text=» CM OPEFNR,A2 «, t00=0x0010, t01=0x000e}
0x1918…192a Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0010, t01=0x0024}
0x192a…1958 Head {h00=0x002a, h01=0x0050, text=» RB(NN) SDMO10 NO MORE WORDS TO CLEAR «, t00=0x0010, t01=0x0036}
0x1958…1962 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0064}
0x1962…1986 Head {h00=0x0020, h01=0x0050, text=»* MOVE IN PARAMETER BLOCK «, t00=0x0010, t01=0x006e}
0x1986…1990 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0092}
0x1990…19ba Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTECB,A11 USER ECB ADDRESS«, t00=0x0010, t01=0x009c}
0x19ba…19e0 Head {h00=0x0022, h01=0x0050, text=» LD A1,ECBBA,A1 FD ADDR USER «, t00=0x0010, t01=0x00c6}
0x19e0…1a06 Head {h00=0x0022, h01=0x0050, text=» ADK A1,FPBRES RESERVED FIELDS«, t00=0x0010, t01=0x00ec}
0x1a06…1a22 Head {h00=0x0018, h01=0x0050, text=» LDR A2,A12 FPB ADDR«, t00=0x0010, t01=0x0112}
0x1a22…1a4a Head {h00=0x0024, h01=0x0050, text=» LDK A3,FPB:L4+1 MAX SIGN LENGTH«, t00=0x0010, t01=0x012e}
0x1a4a…1a60 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0010, t01=0x0156}
0x1a60…1a88 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTTAB,A11 USER TTAB ADDR«, t00=0x0010, t01=0x016c}
0x1a88…1a9e (17, 0, 400) Head {h00=0x0012, h01=0x0050, text=» CF A14,MOV:US«, t00=0x0011, t01=0x0004}
0x1a9e…1aaa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x001a}
0x1aaa…1ac0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0011, t01=0x0026}
0x1ac0…1ad6 Head {h00=0x0012, h01=0x0050, text=» CF A14,MOVFW «, t00=0x0011, t01=0x003c}
0x1ad6…1ae2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0052}
0x1ae2…1af8 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0011, t01=0x005e}
0x1af8…1b06 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0074}
0x1b06…1b10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0082}
0x1b10…1b38 Head {h00=0x0024, h01=0x0050, text=»* SAVE VOLUME NAME INDEX FILES«, t00=0x0011, t01=0x008c}
0x1b38…1b42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b4}
0x1b42…1b5e Head {h00=0x0018, h01=0x0050, text=» LDR A1,A12 FPB ADDR«, t00=0x0011, t01=0x00be}
0x1b5e…1b80 Head {h00=0x001e, h01=0x0050, text=» ADKL A1,FPB:IV FROM ADDR «, t00=0x0011, t01=0x00da}
0x1b80…1ba0 Head {h00=0x001c, h01=0x0050, text=» LDKL A2,INDVOL TO ADDR «, t00=0x0011, t01=0x00fc}
0x1ba0…1bb2 Head {h00=0x000e, h01=0x0050, text=» LDK A3,6 «, t00=0x0011, t01=0x011c}
0x1bb2…1bc8 Head {h00=0x0012, h01=0x0050, text=» CF A14,MOVFW «, t00=0x0011, t01=0x012e}
0x1bc8…1bd4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0144}
0x1bd4…1bfa Head {h00=0x0022, h01=0x0050, text=» LC A5,FPB:BO,A12 TOSS OPTIONS«, t00=0x0011, t01=0x0150}
0x1bfa…1c0c Head {h00=0x000e, h01=0x0050, text=» ANK A5,2 «, t00=0x0011, t01=0x0176}
0x1c0c…1c1e Head {h00=0x000e, h01=0x0050, text=» SLL A5,14«, t00=0x0011, t01=0x0188}
0x1c1e…1c32 Head {h00=0x0010, h01=0x0050, text=» ST A5,DELAY«, t00=0x0012, t01=0x000a}
0x1c32…1c48 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0012, t01=0x001e}
0x1c48…1c62 Head {h00=0x0016, h01=0x0050, text=» LC A5,FPB:FO,A12 «, t00=0x0012, t01=0x0034}
0x1c62…1c76 Head {h00=0x0010, h01=0x0050, text=» ANK A5,/FF «, t00=0x0012, t01=0x004e}
0x1c76…1c9a Head {h00=0x0020, h01=0x0050, text=» RF(Z) SDMO30 STANDARD FILE «, t00=0x0012, t01=0x0062}
0x1c9a…1cc0 Head {h00=0x0022, h01=0x0050, text=» LC A5,DWTOR+1,A11 ORDER CODE «, t00=0x0012, t01=0x0086}
0x1cc0…1cd8 Head {h00=0x0014, h01=0x0050, text=» SUKL A5,SDMOEE «, t00=0x0012, t01=0x00ac}
0x1cd8…1d12 Head {h00=0x0036, h01=0x0050, text=» ABL(NN) OERQER OUTPUT SEQ.,RAND.,EXT. NOT ALLOWED«, t00=0x0012, t01=0x00c4}
0x1d12…1d3a Head {h00=0x0024, h01=0x0050, text=» LD A5,DWTECB,A11 USER ECB ADDR «, t00=0x0012, t01=0x00fe}
0x1d3a…1d5a Head {h00=0x001c, h01=0x0050, text=» LD A5,ECBRL,A5 REQ LGTH«, t00=0x0012, t01=0x0126}
0x1d5a…1d78 Head {h00=0x001a, h01=0x0050, text=» SUK A5,FPB:NI+FPBRES «, t00=0x0012, t01=0x0146}
0x1d78…1da2 Head {h00=0x0026, h01=0x0050, text=» ABL(NP) OERQER INDEX NOT DEFINED «, t00=0x0012, t01=0x0164}
0x1da2…1dca Head {h00=0x0024, h01=0x0050, text=» LC A5,FPB:NI,A12 NR OF INDEXES «, t00=0x0012, t01=0x018e}
0x1dca…1de2 Head {h00=0x0014, h01=0x0050, text=» SC A5,NROFIX+1 «, t00=0x0013, t01=0x0026}
0x1de2…1df0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x003e}
0x1df0…1dfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x004c}
0x1dfa…1e26 Head {h00=0x0028, h01=0x0050, text=»* SAVE BASE ADDRESSES FOR INDEXES «, t00=0x0013, t01=0x0056}
0x1e26…1e30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0082}
0x1e30…1e46 Head {h00=0x0012, h01=0x0050, text=» LDK A2,FPB:A1«, t00=0x0013, t01=0x008c}
0x1e46…1e6e Head {h00=0x0024, h01=0x0050, text=» ADR A2,A12 ADDR FIRST KEY ADDR «, t00=0x0013, t01=0x00a2}
0x1e6e…1e80 Head {h00=0x000e, h01=0x0050, text=» ANK A5,/F«, t00=0x0013, t01=0x00ca}
0x1e80…1ea0 Head {h00=0x001c, h01=0x0050, text=» LDK A3,2 OFFSET INDEX 1«, t00=0x0013, t01=0x00dc}
0x1ea0…1eb4 Head {h00=0x0010, h01=0x0050, text=»SDMO20 EQU *«, t00=0x0013, t01=0x00fc}
0x1eb4…1ec6 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0013, t01=0x0110}
0x1ec6…1ee8 Head {h00=0x001e, h01=0x0050, text=» RF(N) SDMO30 ALL INDEXES «, t00=0x0013, t01=0x0122}
0x1ee8…1efa Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0013, t01=0x0144}
0x1efa…1f1e Head {h00=0x0020, h01=0x0050, text=» LC A1,-1,A2 NR OF KEY ITEMS«, t00=0x0013, t01=0x0156}
0x1f1e…1f30 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0013, t01=0x017a}
0x1f30…1f4c Head {h00=0x0018, h01=0x0050, text=» ABL(NZ) OESWP4 ERR «, t00=0x0013, t01=0x018c}
0x1f4c…1f6a Head {h00=0x001a, h01=0x0050, text=» LC A1,2,A2 KEY LENGTH«, t00=0x0014, t01=0x0018}
0x1f6a…1f82 Head {h00=0x0014, h01=0x0050, text=» ST A1,OPEKYL,A3«, t00=0x0014, t01=0x0036}
0x1f82…1fa0 Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A2 KEY OFFSET«, t00=0x0014, t01=0x004e}
0x1fa0…1fb8 Head {h00=0x0014, h01=0x0050, text=» ST A1,OPEKAD,A3«, t00=0x0014, t01=0x006c}
0x1fb8…1fd6 Head {h00=0x001a, h01=0x0050, text=» ADK A2,FPB:I2-FPB:I1 «, t00=0x0014, t01=0x0084}
0x1fd6…1fe8 Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0014, t01=0x00a2}
0x1fe8…1ffa Head {h00=0x000e, h01=0x0050, text=» RB SDMO20«, t00=0x0014, t01=0x00b4}
0x1ffa…2006 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00c6}
0x2006…201a Head {h00=0x0010, h01=0x0050, text=»SDMO30 EQU *«, t00=0x0014, t01=0x00d2}
0x201a…2040 Head {h00=0x0022, h01=0x0050, text=» LDKL A9,1 INDICATE DATA FILE «, t00=0x0014, t01=0x00e6}
0x2040…204e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x010c}
0x204e…2056 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x011a}
0x2056…2084 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0014, t01=0x0122}
0x2084…20b2 Head {h00=0x002a, h01=0x0050, text=»* F I L E L O O P E N T R Y * «, t00=0x0014, t01=0x0150}
0x20b2…20e0 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0014, t01=0x017e}
0x20e0…20e8 Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x001c}
0x20e8…20f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0024}
0x20f2…2136 Head {h00=0x0040, h01=0x0050, text=»* O P E N O R C R E A T E F I L E W I T H F M «, t00=0x0015, t01=0x002e}
0x2136…2140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0072}
0x2140…2154 Head {h00=0x0010, h01=0x0050, text=»OPLENT EQU *«, t00=0x0015, t01=0x007c}
0x2154…2176 Head {h00=0x001e, h01=0x0050, text=» ST A12,ECBBA,A8 FPB ADDR «, t00=0x0015, t01=0x0090}
0x2176…2190 Head {h00=0x0016, h01=0x0050, text=» LC A5,FPB:BO,A12 «, t00=0x0015, t01=0x00b2}
0x2190…21a2 Head {h00=0x000e, h01=0x0050, text=» ANK A5,1 «, t00=0x0015, t01=0x00cc}
0x21a2…21ce Head {h00=0x0028, h01=0x0050, text=» SC A5,FPB:BO,A12 ONLY BASIC ALLOWED«, t00=0x0015, t01=0x00de}
0x21ce…21e0 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0015, t01=0x010a}
0x21e0…2208 Head {h00=0x0024, h01=0x0050, text=» SC A5,FPB:SH,A12 NOT EXCLUSIVE «, t00=0x0015, t01=0x011c}
0x2208…2220 Head {h00=0x0014, h01=0x0050, text=» CWK A11,FDBSTA «, t00=0x0015, t01=0x0144}
0x2220…224a Head {h00=0x0026, h01=0x0050, text=» RF(NE) OPL130 READ FILE PAR ORDER«, t00=0x0015, t01=0x015c}
0x224a…2264 Head {h00=0x0016, h01=0x0050, text=» IFT CRDEEX=1 =8 «, t00=0x0015, t01=0x0186}
0x2264…226e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0010}
0x226e…2294 Head {h00=0x0022, h01=0x0050, text=»* IF OPEN OUTPUT RANDOM OR «, t00=0x0016, t01=0x001a}
0x2294…22ba Head {h00=0x0022, h01=0x0050, text=»* OPEN OUTPUT SEQUENTIAL «, t00=0x0016, t01=0x0040}
0x22ba…22d4 Head {h00=0x0016, h01=0x0050, text=»* THEN CREATE FILE«, t00=0x0016, t01=0x0066}
0x22d4…22de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0080}
0x22de…22f8 Head {h00=0x0016, h01=0x0050, text=» LC A5,DWTOR+1,A11«, t00=0x0016, t01=0x008a}
0x22f8…2310 Head {h00=0x0014, h01=0x0050, text=» SUKL A5,SDMOOS «, t00=0x0016, t01=0x00a4}
0x2310…233a Head {h00=0x0026, h01=0x0050, text=» RF(N) OPL120 NO CREATION OF FILE «, t00=0x0016, t01=0x00bc}
0x233a…2348 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x00e6}
0x2348…2352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00f4}
0x2352…2372 Head {h00=0x001c, h01=0x0050, text=»* C R E A T E F I L E «, t00=0x0016, t01=0x00fe}
0x2372…237c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x011e}
0x237c…23a2 Head {h00=0x0022, h01=0x0050, text=» CF A14,CASZEN CALCULATE SIZES«, t00=0x0016, t01=0x0128}
0x23a2…23ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x014e}
0x23ac…23da Head {h00=0x002a, h01=0x0050, text=»* BUILD PART OF FPB SPECIAL FOR CREATE«, t00=0x0016, t01=0x0158}
0x23da…23e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0186}
0x23e4…2402 Head {h00=0x001a, h01=0x0050, text=» LDK A1,'S' FILE TYPE «, t00=0x0016, t01=0x0190}
0x2402…241c Head {h00=0x0016, h01=0x0050, text=» SC A1,FPB:FO,A12 «, t00=0x0017, t01=0x001e}
0x241c…2434 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,FPB:MN «, t00=0x0017, t01=0x0038}
0x2434…2456 Head {h00=0x001e, h01=0x0050, text=» ADR A1,A12 POINTER IN FPB«, t00=0x0017, t01=0x0050}
0x2456…2482 Head {h00=0x0028, h01=0x0050, text=» LDK A2,11 NUMBER OF BYTES TO RESET «, t00=0x0017, t01=0x0072}
0x2482…2494 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0017, t01=0x009e}
0x2494…24a8 Head {h00=0x0010, h01=0x0050, text=»OPL110 EQU *«, t00=0x0017, t01=0x00b0}
0x24a8…24c6 Head {h00=0x001a, h01=0x0050, text=» SCR A3,A1 RESET BYTE «, t00=0x0017, t01=0x00c4}
0x24c6…24e6 Head {h00=0x001c, h01=0x0050, text=» ADK A1,1 UPDATE POINTER«, t00=0x0017, t01=0x00e2}
0x24e6…24f8 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0017, t01=0x0102}
0x24f8…251c Head {h00=0x0020, h01=0x0050, text=» RB(P) OPL110 NEXT CHARACTER«, t00=0x0017, t01=0x0114}
0x251c…2532 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,' ' «, t00=0x0017, t01=0x0138}
0x2532…2556 Head {h00=0x0020, h01=0x0050, text=» STR A3,A1 RETENTION PERIOD «, t00=0x0017, t01=0x014e}
0x2556…256a Head {h00=0x0010, h01=0x0050, text=» SC A3,2,A1 «, t00=0x0017, t01=0x0172}
0x256a…258c Head {h00=0x001e, h01=0x0050, text=» CF A14,FMIOCR CREATE FILE«, t00=0x0017, t01=0x0186}
0x258c…25a8 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) OERCA1 ERROR«, t00=0x0018, t01=0x0018}
0x25a8…25ba Head {h00=0x000e, h01=0x0050, text=» RF OPL125«, t00=0x0018, t01=0x0034}
0x25ba…25cc Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x0018, t01=0x0046}
0x25cc…25da Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x0058}
0x25da…25e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0066}
0x25e4…2600 Head {h00=0x0018, h01=0x0050, text=»* O P E N F I L E «, t00=0x0018, t01=0x0070}
0x2600…260a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x008c}
0x260a…261e Head {h00=0x0010, h01=0x0050, text=»OPL120 EQU *«, t00=0x0018, t01=0x0096}
0x261e…263a Head {h00=0x0018, h01=0x0050, text=» CF A14,FMIOOP OPEN «, t00=0x0018, t01=0x00aa}
0x263a…2654 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) OERCA1 ERR«, t00=0x0018, t01=0x00c6}
0x2654…265e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e0}
0x265e…2676 Head {h00=0x0014, h01=0x0050, text=»* SAVE FILE NR«, t00=0x0018, t01=0x00ea}
0x2676…2680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0102}
0x2680…2694 Head {h00=0x0010, h01=0x0050, text=»OPL125 EQU *«, t00=0x0018, t01=0x010c}
0x2694…26b2 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A9 LOOP INDEX «, t00=0x0018, t01=0x0120}
0x26b2…26c4 Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0018, t01=0x013e}
0x26c4…26d8 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A8 «, t00=0x0018, t01=0x0150}
0x26d8…2700 Head {h00=0x0024, h01=0x0050, text=» SC A2,OPEFNR,A1 OPENED FILE NRS«, t00=0x0018, t01=0x0164}
0x2700…2714 Head {h00=0x0010, h01=0x0050, text=»OPL130 EQU *«, t00=0x0018, t01=0x018c}
0x2714…271e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0010}
0x271e…273e Head {h00=0x001c, h01=0x0050, text=»* GET FWT ADDR IN A10 «, t00=0x0019, t01=0x001a}
0x273e…2748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x003a}
0x2748…275c Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0019, t01=0x0044}
0x275c…2782 Head {h00=0x0022, h01=0x0050, text=» LDKL A10,FDBSTA SYST FDB ADDR«, t00=0x0019, t01=0x0058}
0x2782…279c Head {h00=0x0016, h01=0x0050, text=» LDR A3,A2 FILE NR«, t00=0x0019, t01=0x007e}
0x279c…27b0 Head {h00=0x0010, h01=0x0050, text=»OPL140 EQU *«, t00=0x0019, t01=0x0098}
0x27b0…27d0 Head {h00=0x001c, h01=0x0050, text=» RF(Z) OPL150 END COUNT «, t00=0x0019, t01=0x00ac}
0x27d0…27ee Head {h00=0x001a, h01=0x0050, text=» LDR* A10,A10 NEXT FDB«, t00=0x0019, t01=0x00cc}
0x27ee…280e Head {h00=0x001c, h01=0x0050, text=» ANKL A10,/FFFE USE BIT «, t00=0x0019, t01=0x00ea}
0x280e…2820 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0019, t01=0x010a}
0x2820…2832 Head {h00=0x000e, h01=0x0050, text=» RB OPL140«, t00=0x0019, t01=0x011c}
0x2832…2840 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x012e}
0x2840…284a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x013c}
0x284a…287c Head {h00=0x002e, h01=0x0050, text=»* R E A D F I L E P A R A M E T E R S «, t00=0x0019, t01=0x0146}
0x287c…2886 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0178}
0x2886…28aa Head {h00=0x0020, h01=0x0050, text=»OPL150 EQU * FWT ADDR IN A11«, t00=0x0019, t01=0x0182}
0x28aa…28d2 Head {h00=0x0024, h01=0x0050, text=» LDK A6,0 DEFAULT ENLARGE FACTOR«, t00=0x001a, t01=0x0016}
0x28d2…28fe Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTOR+1,A11 INTERN ORDER CODE«, t00=0x001a, t01=0x003e}
0x28fe…2916 Head {h00=0x0014, h01=0x0050, text=» SUKL A3,SDMOEE «, t00=0x001a, t01=0x006a}
0x2916…2940 Head {h00=0x0026, h01=0x0050, text=» RF(N) OPL155 NO ENLARGE DECLARED «, t00=0x001a, t01=0x0082}
0x2940…2968 Head {h00=0x0024, h01=0x0050, text=» LD A6,FPB:EL,A12 ENLARGE FACTOR«, t00=0x001a, t01=0x00ac}
0x2968…297c Head {h00=0x0010, h01=0x0050, text=»OPL155 EQU *«, t00=0x001a, t01=0x00d4}
0x297c…2996 Head {h00=0x0016, h01=0x0050, text=» STR A2,A8 FILE NR«, t00=0x001a, t01=0x00e8}
0x2996…29ce Head {h00=0x0034, h01=0x0050, text=» CF A14,FMIORF READ FILE PARAMETERS (A11=SYSFDB)«, t00=0x001a, t01=0x0102}
0x29ce…29fa Head {h00=0x0028, h01=0x0050, text=» ST A6,FPB:EL,A12 SET ENLARGE FACTOR«, t00=0x001a, t01=0x013a}
0x29fa…2a24 Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTECB,A11 USER ECB ADDRESS«, t00=0x001a, t01=0x0166}
0x2a24…2a46 Head {h00=0x001e, h01=0x0050, text=» ORS A1,ECBRC,A2 RET CODE «, t00=0x001a, t01=0x0190}
0x2a46…2a5a Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x001b, t01=0x0022}
0x2a5a…2a6e Head {h00=0x0010, h01=0x0050, text=» XRR A11,A10«, t00=0x001b, t01=0x0036}
0x2a6e…2a82 Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x001b, t01=0x004a}
0x2a82…2a90 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x005e}
0x2a90…2a9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006c}
0x2a9a…2abc Head {h00=0x001e, h01=0x0050, text=»* A10 = SYSTEM FDB ADDRESS«, t00=0x001b, t01=0x0076}
0x2abc…2ae0 Head {h00=0x0020, h01=0x0050, text=»* A11 = CURRENT FDB ADDRESS «, t00=0x001b, t01=0x0098}
0x2ae0…2aea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00bc}
0x2aea…2b00 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x001b, t01=0x00c6}
0x2b00…2b12 Head {h00=0x000e, h01=0x0050, text=» CWK A9,1 «, t00=0x001b, t01=0x00dc}
0x2b12…2b34 Head {h00=0x001e, h01=0x0050, text=» RF(NE) OPL160 INDEX FILE «, t00=0x001b, t01=0x00ee}
0x2b34…2b58 Head {h00=0x0020, h01=0x0050, text=» LD A7,NROFIX NR OF INDEXES «, t00=0x001b, t01=0x0110}
0x2b58…2b6a Head {h00=0x000e, h01=0x0050, text=» CWK A7,4 «, t00=0x001b, t01=0x0134}
0x2b6a…2b90 Head {h00=0x0022, h01=0x0050, text=» RF(G) OERQER TOO MANY INDEXES«, t00=0x001b, t01=0x0146}
0x2b90…2ba2 Head {h00=0x000e, h01=0x0050, text=» SLL A7,1 «, t00=0x001b, t01=0x016c}
0x2ba2…2bb4 Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x001b, t01=0x017e}
0x2bb4…2bd2 Head {h00=0x001a, h01=0x0050, text=» LDR A9,A7 NEW LOOPER «, t00=0x001b, t01=0x0190}
0x2bd2…2c02 Head {h00=0x002c, h01=0x0050, text=» SUR A13,A13 REL ADDR IN TABLES OF OPEN «, t00=0x001c, t01=0x001e}
0x2c02…2c14 Head {h00=0x000e, h01=0x0050, text=» RF OPL170«, t00=0x001c, t01=0x004e}
0x2c14…2c28 Head {h00=0x0010, h01=0x0050, text=»OPL160 EQU *«, t00=0x001c, t01=0x0060}
0x2c28…2c3a Head {h00=0x000e, h01=0x0050, text=» LDR A7,A9«, t00=0x001c, t01=0x0074}
0x2c3a…2c56 Head {h00=0x0018, h01=0x0050, text=» ANK A7,/FE REL ADDR«, t00=0x001c, t01=0x0086}
0x2c56…2c6a Head {h00=0x0010, h01=0x0050, text=» LDR A13,A7 «, t00=0x001c, t01=0x00a2}
0x2c6a…2c7e Head {h00=0x0010, h01=0x0050, text=»OPL170 EQU *«, t00=0x001c, t01=0x00b6}
0x2c7e…2c8a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00ca}
0x2c8a…2ca0 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=0 «, t00=0x001c, t01=0x00d6}
0x2ca0…2cc6 Head {h00=0x0022, h01=0x0050, text=» SUR A13,A13 IDICATE DATA FILE«, t00=0x001c, t01=0x00ec}
0x2cc6…2cd2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0112}
0x2cd2…2cea Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x001c, t01=0x011e}
0x2cea…2d16 Head {h00=0x0028, h01=0x0050, text=» ABL(NE) OPSPLT READ FILE PAR ORDER «, t00=0x001c, t01=0x0136}
0x2d16…2d28 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x001c, t01=0x0162}
0x2d28…2d3e Head {h00=0x0012, h01=0x0050, text=» RF(NZ) OERCOM«, t00=0x001c, t01=0x0174}
0x2d3e…2d4c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x018a}
0x2d4c…2d54 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0008}
0x2d54…2d86 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x001d, t01=0x0010}
0x2d86…2db8 Head {h00=0x002e, h01=0x0050, text=»* C H E C K O P E N E D F I L E *«, t00=0x001d, t01=0x0042}
0x2db8…2dea Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x001d, t01=0x0074}
0x2dea…2df2 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00a6}
0x2df2…2e0a Head {h00=0x0014, h01=0x0050, text=» LDK A3,'S' 'S' «, t00=0x001d, t01=0x00ae}
0x2e0a…2e24 Head {h00=0x0016, h01=0x0050, text=» CC A3,FPB:FO,A12 «, t00=0x001d, t01=0x00c6}
0x2e24…2e4c Head {h00=0x0024, h01=0x0050, text=» RF(NE) OERQER NOT STANDARD FILE«, t00=0x001d, t01=0x00e0}
0x2e4c…2e72 Head {h00=0x0022, h01=0x0050, text=» LC A3,FPB:US,A12 NR OF USERS «, t00=0x001d, t01=0x0108}
0x2e72…2e84 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x001d, t01=0x012e}
0x2e84…2ea4 Head {h00=0x001c, h01=0x0050, text=» RF(Z) OPFRST FIRST OPEN«, t00=0x001d, t01=0x0140}
0x2ea4…2ebe Head {h00=0x0016, h01=0x0050, text=» LC A3,DWTOR+1,A10«, t00=0x001d, t01=0x0160}
0x2ebe…2ef0 Head {h00=0x002e, h01=0x0050, text=» LD A2,FDBEXC,A11 TTAB IF OPENED EXCLUSIVE«, t00=0x001d, t01=0x017a}
0x2ef0…2f1e Head {h00=0x002a, h01=0x0050, text=» RF(NZ) OERQER OPENED EXCLUSIVE BEFORE«, t00=0x001e, t01=0x001c}
0x2f1e…2f38 Head {h00=0x0016, h01=0x0050, text=» CC A3,FDBOMD,A11 «, t00=0x001e, t01=0x004a}
0x2f38…2f6e Head {h00=0x0032, h01=0x0050, text=» RF(NE) OERQER THIS OPEN NOT SAME AS OLD OPEN «, t00=0x001e, t01=0x0064}
0x2f6e…2fa8 Head {h00=0x0036, h01=0x0050, text=» LC A3,FDBNIF,A11 NR OF INDEX BEFORE FOR THIS FILE«, t00=0x001e, t01=0x009a}
0x2fa8…2fcc Head {h00=0x0020, h01=0x0050, text=» CW A3,NROFIX NR OF INDEXES «, t00=0x001e, t01=0x00d4}
0x2fcc…2ff4 Head {h00=0x0024, h01=0x0050, text=» RF(NE) OESWP4 ALW SAME INDEXES «, t00=0x001e, t01=0x00f8}
0x2ff4…3008 Head {h00=0x0010, h01=0x0050, text=» LD A2,DELAY«, t00=0x001e, t01=0x0120}
0x3008…3036 Head {h00=0x002a, h01=0x0050, text=» RF(N) OPL180 2ND DELAY WANTED IN VAIN«, t00=0x001e, t01=0x0134}
0x3036…304c Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/7FFF«, t00=0x001e, t01=0x0162}
0x304c…3070 Head {h00=0x0020, h01=0x0050, text=» ANS A2,FDBDBR,A11 NO DELAY «, t00=0x001e, t01=0x0178}
0x3070…3084 Head {h00=0x0010, h01=0x0050, text=»OPL180 EQU *«, t00=0x001f, t01=0x000c}
0x3084…3098 Head {h00=0x0010, h01=0x0050, text=» ABL OPSPLT «, t00=0x001f, t01=0x0020}
0x3098…30a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0034}
0x30a6…30ae Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0042}
0x30ae…30ca Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x001f, t01=0x004a}
0x30ca…30e6 Head {h00=0x0018, h01=0x0050, text=»* E R R O R S * «, t00=0x001f, t01=0x0066}
0x30e6…3102 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x001f, t01=0x0082}
0x3102…310a Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x009e}
0x310a…3122 Head {h00=0x0014, h01=0x0050, text=»OERCA1 EQU * =4«, t00=0x001f, t01=0x00a6}
0x3122…3144 Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 RETURN CODE =4 «, t00=0x001f, t01=0x00be}
0x3144…3174 Head {h00=0x002c, h01=0x0050, text=» ANKL A6,/E10 MASK BITS 4,5,6 AND 11 =4 «, t00=0x001f, t01=0x00e0}
0x3174…319e Head {h00=0x0026, h01=0x0050, text=» RF(Z) OERCOM NO STATUS TO SET =4 «, t00=0x001f, t01=0x0110}
0x319e…31b8 Head {h00=0x0016, h01=0x0050, text=» SLL A6,4 BIT 4 =4«, t00=0x001f, t01=0x013a}
0x31b8…31de Head {h00=0x0022, h01=0x0050, text=» RF(N) OESIN9 ILLEGAL NAME =4 «, t00=0x001f, t01=0x0154}
0x31de…31f8 Head {h00=0x0016, h01=0x0050, text=» SLL A6,1 BIT 5 =4«, t00=0x001f, t01=0x017a}
0x31f8…3218 (32, 0, 400) Head {h00=0x001c, h01=0x0050, text=» RF(N) OESNC1 NO CORE =4«, t00=0x0020, t01=0x0004}
0x3218…3230 Head {h00=0x0014, h01=0x0050, text=»OESOF3 EQU * =4«, t00=0x0020, t01=0x0024}
0x3230…3250 Head {h00=0x001c, h01=0x0050, text=» LDK A6,OFLW OVERFLOW =4«, t00=0x0020, t01=0x003c}
0x3250…3266 Head {h00=0x0012, h01=0x0050, text=» RF OESCOM =4«, t00=0x0020, t01=0x005c}
0x3266…327e Head {h00=0x0014, h01=0x0050, text=»OESIN9 EQU * =4«, t00=0x0020, t01=0x0072}
0x327e…32a4 Head {h00=0x0022, h01=0x0050, text=» LDK A6,ILLNAM ILLEGAL NAME =4«, t00=0x0020, t01=0x008a}
0x32a4…32ba Head {h00=0x0012, h01=0x0050, text=» RF OESCOM =4«, t00=0x0020, t01=0x00b0}
0x32ba…32d2 Head {h00=0x0014, h01=0x0050, text=»OESNC1 EQU * =4«, t00=0x0020, t01=0x00c6}
0x32d2…32fa Head {h00=0x0024, h01=0x0050, text=» LDK A6,NOCORE CORE EXHAUSTED =4«, t00=0x0020, t01=0x00de}
0x32fa…3310 Head {h00=0x0012, h01=0x0050, text=» RF OESCOM =4«, t00=0x0020, t01=0x0106}
0x3310…3328 Head {h00=0x0014, h01=0x0050, text=»OESWP4 EQU * =4«, t00=0x0020, t01=0x011c}
0x3328…3350 Head {h00=0x0024, h01=0x0050, text=» LDK A6,ERPAR WRONG PARAMETER =4«, t00=0x0020, t01=0x0134}
0x3350…3366 Head {h00=0x0012, h01=0x0050, text=» RF OESCOM =4«, t00=0x0020, t01=0x015c}
0x3366…337e Head {h00=0x0014, h01=0x0050, text=»OESLK8 EQU * =4«, t00=0x0020, t01=0x0172}
0x337e…33a0 Head {h00=0x001e, h01=0x0050, text=» LDK A6,ERKEYL LONG KEY =4«, t00=0x0020, t01=0x018a}
0x33a0…33b8 Head {h00=0x0014, h01=0x0050, text=»OESCOM EQU * =4«, t00=0x0021, t01=0x001c}
0x33b8…33e0 Head {h00=0x0024, h01=0x0050, text=» LDR A11,A10 MAIN FDB ADDRESS =4«, t00=0x0021, t01=0x0034}
0x33e0…340e Head {h00=0x002a, h01=0x0050, text=» CF A14,CRNGET GET CURRENCY BUFFER =4 «, t00=0x0021, t01=0x005c}
0x340e…3434 Head {h00=0x0022, h01=0x0050, text=» SC A6,CRNSTA,A2 SET STATUS =4«, t00=0x0021, t01=0x008a}
0x3434…345e Head {h00=0x0026, h01=0x0050, text=» LDKL A1,/8080 SET RETURN CODE =4 «, t00=0x0021, t01=0x00b0}
0x345e…3474 Head {h00=0x0012, h01=0x0050, text=» RF OERCOM =4«, t00=0x0021, t01=0x00da}
0x3474…348c Head {h00=0x0014, h01=0x0050, text=»OERQER EQU * =4«, t00=0x0021, t01=0x00f0}
0x348c…34b6 Head {h00=0x0026, h01=0x0050, text=» LDKL A1,/8000 RC REQUEST ERROR =4«, t00=0x0021, t01=0x0108}
0x34b6…34ce Head {h00=0x0014, h01=0x0050, text=»OERCOM EQU * =4«, t00=0x0021, t01=0x0132}
0x34ce…34f6 Head {h00=0x0024, h01=0x0050, text=» LDR A11,A10 MAIN FDB ADDRESS =4«, t00=0x0021, t01=0x014a}
0x34f6…3524 Head {h00=0x002a, h01=0x0050, text=» LD A9,DWTECB,A11 USER ECB ADDRESS =4 «, t00=0x0021, t01=0x0172}
0x3524…3550 Head {h00=0x0028, h01=0x0050, text=» ORS A1,ECBRC,A9 SET RETURN CODE =4 «, t00=0x0022, t01=0x0010}
0x3550…357e Head {h00=0x002a, h01=0x0050, text=» ABL CLOCOM CLOSE EVENTUALLY FILES =4 «, t00=0x0022, t01=0x003c}
0x357e…358c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x006a}
0x358c…3594 Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0078}
0x3594…35b8 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0022, t01=0x0080}
0x35b8…35dc Head {h00=0x0020, h01=0x0050, text=»* F I R S T O P E N * «, t00=0x0022, t01=0x00a4}
0x35dc…3600 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0022, t01=0x00c8}
0x3600…3608 Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x00ec}
0x3608…3612 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00f4}
0x3612…3628 Head {h00=0x0012, h01=0x0050, text=»* CLEAR FDB «, t00=0x0022, t01=0x00fe}
0x3628…3632 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0114}
0x3632…3646 Head {h00=0x0010, h01=0x0050, text=»OPFRST EQU *«, t00=0x0022, t01=0x011e}
0x3646…365e Head {h00=0x0014, h01=0x0050, text=» LDKL A2,FDBMEC «, t00=0x0022, t01=0x0132}
0x365e…367c Head {h00=0x001a, h01=0x0050, text=» SUKL A2,FDBECB LENGTH«, t00=0x0022, t01=0x014a}
0x367c…3690 Head {h00=0x0010, h01=0x0050, text=»OPF100 EQU *«, t00=0x0022, t01=0x0168}
0x3690…36a2 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0022, t01=0x017c}
0x36a2…36ba Head {h00=0x0014, h01=0x0050, text=» RF(N) OPF110 OK«, t00=0x0022, t01=0x018e}
0x36ba…36ce Head {h00=0x0010, h01=0x0050, text=» LDR A7,A11 «, t00=0x0023, t01=0x0016}
0x36ce…36e0 Head {h00=0x000e, h01=0x0050, text=» ADR A7,A2«, t00=0x0023, t01=0x002a}
0x36e0…36f6 Head {h00=0x0012, h01=0x0050, text=» CM FDBECB,A7 «, t00=0x0023, t01=0x003c}
0x36f6…3708 Head {h00=0x000e, h01=0x0050, text=» RB OPF100«, t00=0x0023, t01=0x0052}
0x3708…3716 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0064}
0x3716…3720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0072}
0x3720…373e Head {h00=0x001a, h01=0x0050, text=»* BUILD FWT FDB PART«, t00=0x0023, t01=0x007c}
0x373e…3748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x009a}
0x3748…375c Head {h00=0x0010, h01=0x0050, text=»OPF110 EQU *«, t00=0x0023, t01=0x00a4}
0x375c…3770 Head {h00=0x0010, h01=0x0050, text=» LD A2,DELAY«, t00=0x0023, t01=0x00b8}
0x3770…37a0 Head {h00=0x002c, h01=0x0050, text=» ST A2,FDBDBR,A11 SET DELAY FOR NEW FILE«, t00=0x0023, t01=0x00cc}
0x37a0…37ba Head {h00=0x0016, h01=0x0050, text=» LD A3,FPB:RL,A12 «, t00=0x0023, t01=0x00fc}
0x37ba…37e2 Head {h00=0x0024, h01=0x0050, text=» ST A3,FDBRLE,A11 RECORD LENGTH «, t00=0x0023, t01=0x0116}
0x37e2…37fc Head {h00=0x0016, h01=0x0050, text=» LC A3,FPB:BF,A12 «, t00=0x0023, t01=0x013e}
0x37fc…3822 Head {h00=0x0022, h01=0x0050, text=» SC A3,FDBBLF,A11 BLOCK FACTOR«, t00=0x0023, t01=0x0158}
0x3822…3846 Head {h00=0x0020, h01=0x0050, text=» LD A3,NROFIX NR OF INDEXES «, t00=0x0023, t01=0x017e}
0x3846…3872 Head {h00=0x0028, h01=0x0050, text=» SC A3,FDBNIF,A11 NR OF INDEX FILES «, t00=0x0024, t01=0x0012}
0x3872…388e Head {h00=0x0018, h01=0x0050, text=» LC A3,FPB:FR+1,A12 «, t00=0x0024, t01=0x003e}
0x388e…38a8 Head {h00=0x0016, h01=0x0050, text=» SC A3,FDBLRN,A11 «, t00=0x0024, t01=0x005a}
0x38a8…38c4 Head {h00=0x0018, h01=0x0050, text=» LD A3,FPB:FR+2,A12 «, t00=0x0024, t01=0x0074}
0x38c4…38ec Head {h00=0x0024, h01=0x0050, text=» ST A3,FDBLRN+1,A11 LAST REC NR «, t00=0x0024, t01=0x0090}
0x38ec…3902 Head {h00=0x0012, h01=0x0050, text=» CM FDBSNR,A11«, t00=0x0024, t01=0x00b8}
0x3902…3914 Head {h00=0x000e, h01=0x0050, text=» LDK A3,1 «, t00=0x0024, t01=0x00ce}
0x3914…3944 Head {h00=0x002c, h01=0x0050, text=» ST A3,FDBSNR+2,A11 RESET SECTOR NUMBER «, t00=0x0024, t01=0x00e0}
0x3944…395e Head {h00=0x0016, h01=0x0050, text=» LD A3,OPEMXI,A13 «, t00=0x0024, t01=0x0110}
0x395e…398a Head {h00=0x0028, h01=0x0050, text=» ST A3,FDBMIA,A11 MASTER INDEX ADDR «, t00=0x0024, t01=0x012a}
0x398a…39b0 Head {h00=0x0022, h01=0x0050, text=» RF(Z) OPF120 NO MASTER INDEX «, t00=0x0024, t01=0x0156}
0x39b0…39ca Head {h00=0x0016, h01=0x0050, text=» LD A3,FPB:KA,A12 «, t00=0x0024, t01=0x017c}
0x39ca…39e4 Head {h00=0x0016, h01=0x0050, text=» CW A3,OPEKAD,A13 «, t00=0x0025, t01=0x0008}
0x39e4…3a04 Head {h00=0x001c, h01=0x0050, text=» RB(NE) OESWP4 WRONG KEY«, t00=0x0025, t01=0x0022}
0x3a04…3a26 Head {h00=0x001e, h01=0x0050, text=» ST A3,FDBKA,A11 KEY ADDR «, t00=0x0025, t01=0x0042}
0x3a26…3a3a Head {h00=0x0010, h01=0x0050, text=»OPF120 EQU *«, t00=0x0025, t01=0x0064}
0x3a3a…3a54 Head {h00=0x0016, h01=0x0050, text=» LC A3,FPB:BO,A12 «, t00=0x0025, t01=0x0078}
0x3a54…3a66 Head {h00=0x000e, h01=0x0050, text=» SLL A3,8 «, t00=0x0025, t01=0x0092}
0x3a66…3a90 Head {h00=0x0026, h01=0x0050, text=» ORS A3,FDBDBR,A11 BASIC + OPTION «, t00=0x0025, t01=0x00a4}
0x3a90…3a9e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x00ce}
0x3a9e…3aa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00dc}
0x3aa8…3ac8 Head {h00=0x001c, h01=0x0050, text=»* CALCULATE SDMTSK ID «, t00=0x0025, t01=0x00e6}
0x3ac8…3ad2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0106}
0x3ad2…3b02 Head {h00=0x002c, h01=0x0050, text=» LC A3,FWTVOL,A11 FIRST EXTENT VOLUME FC«, t00=0x0025, t01=0x0110}
0x3b02…3b16 Head {h00=0x0010, h01=0x0050, text=» LDKL A6,-1 «, t00=0x0025, t01=0x0140}
0x3b16…3b2a Head {h00=0x0010, h01=0x0050, text=»OPF140 EQU *«, t00=0x0025, t01=0x0154}
0x3b2a…3b3c Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0025, t01=0x0168}
0x3b3c…3b54 Head {h00=0x0014, h01=0x0050, text=» CC A3,DFTAB,A6 «, t00=0x0025, t01=0x017a}
0x3b54…3b78 (38, 0, 400) Head {h00=0x0020, h01=0x0050, text=» RB(NE) OPF140 NOT THIS DISC«, t00=0x0026, t01=0x0004}
0x3b78…3ba0 Head {h00=0x0024, h01=0x0050, text=» LC A3,DMTIDP,A6 REL DM TASK ID «, t00=0x0026, t01=0x0028}
0x3ba0…3bc8 Head {h00=0x0024, h01=0x0050, text=» SC A3,FDBDMI,A11 MAIN SDMTSK ID«, t00=0x0026, t01=0x0050}
0x3bc8…3bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0078}
0x3bd2…3c0a Head {h00=0x0034, h01=0x0050, text=»* CALCULATE MAX FDBRRO AND BLOCKSIZE IN SECTORS «, t00=0x0026, t01=0x0082}
0x3c0a…3c14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00ba}
0x3c14…3c2a Head {h00=0x0012, h01=0x0050, text=» CF A14,CARRBL«, t00=0x0026, t01=0x00c4}
0x3c2a…3c54 Head {h00=0x0026, h01=0x0050, text=» RB(G) OESWP4 TOO LARGE BLOCK SIZE«, t00=0x0026, t01=0x00da}
0x3c54…3c78 Head {h00=0x0020, h01=0x0050, text=» ST A1,FDBMRO,A11 MAX FDBRRO«, t00=0x0026, t01=0x0104}
0x3c78…3ca8 Head {h00=0x002c, h01=0x0050, text=» SC A2,FDBBLZ,A11 BLOCK SIZE IN SECTORS «, t00=0x0026, t01=0x0128}
0x3ca8…3cc4 Head {h00=0x0018, h01=0x0050, text=» ST A11,FDBADF,A11 «, t00=0x0026, t01=0x0158}
0x3cc4…3cde Head {h00=0x0016, h01=0x0050, text=» IFT CRDEEX=1 =8 «, t00=0x0026, t01=0x0174}
0x3cde…3ce8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x018e}
0x3ce8…3d0a Head {h00=0x001e, h01=0x0050, text=»* CALCULATE ENLARGE FACTOR«, t00=0x0027, t01=0x0008}
0x3d0a…3d14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x002a}
0x3d14…3d3c Head {h00=0x0024, h01=0x0050, text=» LDR A4,A2 BLOCK SIZE IN SECTORS«, t00=0x0027, t01=0x0034}
0x3d3c…3d52 Head {h00=0x0012, h01=0x0050, text=» CF A14,ENLFAC«, t00=0x0027, t01=0x005c}
0x3d52…3d70 Head {h00=0x001a, h01=0x0050, text=» RB(O) OESOF3 OVERFLOW«, t00=0x0027, t01=0x0072}
0x3d70…3d9e Head {h00=0x002a, h01=0x0050, text=» ST A3,FDBENL,A11 SAVE ENLARGE FACTOR «, t00=0x0027, t01=0x0090}
0x3d9e…3db0 Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x0027, t01=0x00be}
0x3db0…3dbe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x00d0}
0x3dbe…3dc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00de}
0x3dc8…3de0 Head {h00=0x0014, h01=0x0050, text=»* SET OPEN MODE «, t00=0x0027, t01=0x00e8}
0x3de0…3dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0100}
0x3dea…3e0a Head {h00=0x001c, h01=0x0050, text=» LDK A1,0 DEFAULT VALUE «, t00=0x0027, t01=0x010a}
0x3e0a…3e22 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTOR,A10«, t00=0x0027, t01=0x012a}
0x3e22…3e46 Head {h00=0x0020, h01=0x0050, text=» SC A3,FDBOMD,A11 OPEN MODE «, t00=0x0027, t01=0x0142}
0x3e46…3e58 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0027, t01=0x0166}
0x3e58…3e6a Head {h00=0x000e, h01=0x0050, text=» SLL A2,6 «, t00=0x0027, t01=0x0178}
0x3e6a…3e9c Head {h00=0x002e, h01=0x0050, text=» RF(NN) OPF150 EXCLUSIVE ACCESS NOT WANTED«, t00=0x0027, t01=0x018a}
0x3e9c…3ec2 Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTTAB,A10 TTAB ADDRESS«, t00=0x0028, t01=0x002c}
0x3ec2…3ed6 Head {h00=0x0010, h01=0x0050, text=»OPF150 EQU *«, t00=0x0028, t01=0x0052}
0x3ed6…3f0a Head {h00=0x0030, h01=0x0050, text=» ST A1,FDBEXC,A11 SET EXCLUSIVE ACCESS USER «, t00=0x0028, t01=0x0066}
0x3f0a…3f24 Head {h00=0x0016, h01=0x0050, text=» IFT CRDEEX=1 =8 «, t00=0x0028, t01=0x009a}
0x3f24…3f38 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0028, t01=0x00b4}
0x3f38…3f4e Head {h00=0x0012, h01=0x0050, text=» CWK A3,SDMOOR«, t00=0x0028, t01=0x00c8}
0x3f4e…3f84 Head {h00=0x0032, h01=0x0050, text=» RF(NE) OPSPLT NOT OUTPUT RANDOM,DON'T FORMAT «, t00=0x0028, t01=0x00de}
0x3f84…3f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0114}
0x3f8e…3fba Head {h00=0x0028, h01=0x0050, text=»* FORMAT FILE IF OPEN OUTPUT RANDOM «, t00=0x0028, t01=0x011e}
0x3fba…3fc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x014a}
0x3fc4…3fec Head {h00=0x0024, h01=0x0050, text=» CF A14,GTBKBU GET BLOCK BUFFER «, t00=0x0028, t01=0x0154}
0x3fec…400e Head {h00=0x001e, h01=0x0050, text=» LDR A4,A5 BUFFER ADDRESS «, t00=0x0028, t01=0x017c}
0x400e…4030 Head {h00=0x001e, h01=0x0050, text=» CF A14,FRMFIL FORMAT FILE«, t00=0x0029, t01=0x000e}
0x4030…405c Head {h00=0x0028, h01=0x0050, text=» RB(NZ) OERCOM ERROR WHEN FORMATTING«, t00=0x0029, t01=0x0030}
0x405c…406e Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x0029, t01=0x005c}
0x406e…407c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x006e}
0x407c…4084 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x007c}
0x4084…40d4 Head {h00=0x004c, h01=0x0050, text=»*********************************************************************** «, t00=0x0029, t01=0x0084}
0x40d4…4124 Head {h00=0x004c, h01=0x0050, text=»* D A T A , I N D E X O R M A S T E R I N D E X F I L E * «, t00=0x0029, t01=0x00d4}
0x4124…4174 Head {h00=0x004c, h01=0x0050, text=»*********************************************************************** «, t00=0x0029, t01=0x0124}
0x4174…417c Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0174}
0x417c…4190 Head {h00=0x0010, h01=0x0050, text=»OPSPLT EQU *«, t00=0x0029, t01=0x017c}
0x4190…41b8 Head {h00=0x0024, h01=0x0050, text=» ST A11,OPEFWT,A13 SAVE FWT ADDR«, t00=0x0029, t01=0x0190}
0x41b8…41ce Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x002a, t01=0x0028}
0x41ce…41e2 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A13«, t00=0x002a, t01=0x003e}
0x41e2…4202 Head {h00=0x001c, h01=0x0050, text=» ABL(Z) OPDATA DATA FILE«, t00=0x002a, t01=0x0052}
0x4202…4214 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A9«, t00=0x002a, t01=0x0072}
0x4214…4226 Head {h00=0x000e, h01=0x0050, text=» ANK A3,/1«, t00=0x002a, t01=0x0084}
0x4226…4248 Head {h00=0x001e, h01=0x0050, text=» ABL(Z) OPINDX INDEX FILE «, t00=0x002a, t01=0x0096}
0x4248…4256 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x00b8}
0x4256…425e Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x00c6}
0x425e…4286 Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x002a, t01=0x00ce}
0x4286…42ae Head {h00=0x0024, h01=0x0050, text=»* M A S T E R I N D E X * «, t00=0x002a, t01=0x00f6}
0x42ae…42d6 Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x002a, t01=0x011e}
0x42d6…42de Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0146}
0x42de…42f2 Head {h00=0x0010, h01=0x0050, text=»OPMRIX EQU *«, t00=0x002a, t01=0x014e}
0x42f2…430a Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x002a, t01=0x0162}
0x430a…4336 Head {h00=0x0028, h01=0x0050, text=» ABL(NE) OPCHEK ORDER READ FILE PAR «, t00=0x002a, t01=0x017a}
0x4336…435a Head {h00=0x0020, h01=0x0050, text=» LD* A3,DWTECB,A10 FILE CODE«, t00=0x002b, t01=0x0016}
0x435a…436e Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x002b, t01=0x003a}
0x436e…43a0 Head {h00=0x002e, h01=0x0050, text=» ST A3,SDMTTD,A14 FC ENTRY IN TTAB SDMTSK «, t00=0x002b, t01=0x004e}
0x43a0…43bc Head {h00=0x0018, h01=0x0050, text=» ST A11,SDMTTD+2,A14«, t00=0x002b, t01=0x0080}
0x43bc…43ce Head {h00=0x000e, h01=0x0050, text=» STR A3,A8«, t00=0x002b, t01=0x009c}
0x43ce…43e0 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x002b, t01=0x00ae}
0x43e0…4416 Head {h00=0x0032, h01=0x0050, text=» SC A2,FDBDBR,A11 NO SPECIAL FUNCTIONS ALLOWED«, t00=0x002b, t01=0x00c0}
0x4416…4442 Head {h00=0x0028, h01=0x0050, text=» SC A2,FDBBLZ+1,A11 NO COMMIT CHECK «, t00=0x002b, t01=0x00f6}
0x4442…4454 Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x002b, t01=0x0122}
0x4454…448c Head {h00=0x0034, h01=0x0050, text=» SC A2,FDBDMI,A11 LET SDMTSK 1 READ MASTER INDEX«, t00=0x002b, t01=0x0134}
0x448c…449a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x016c}
0x449a…44a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x017a}
0x44a4…44d8 Head {h00=0x0030, h01=0x0050, text=»* CALC NO OF WORDS NEEDED IN MASTER INDEX «, t00=0x002b, t01=0x0184}
0x44d8…44e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0028}
0x44e2…4504 Head {h00=0x001e, h01=0x0050, text=» LD A6,FPB:RL,A12 REC LGTH«, t00=0x002c, t01=0x0032}
0x4504…4516 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x002c, t01=0x0054}
0x4516…4532 Head {h00=0x0018, h01=0x0050, text=» SUK A1,3 KEY LENGTH«, t00=0x002c, t01=0x0066}
0x4532…4556 Head {h00=0x0020, h01=0x0050, text=» CW A1,OPEKYL,A13 REQUESTED «, t00=0x002c, t01=0x0082}
0x4556…4572 Head {h00=0x0018, h01=0x0050, text=» ABL(NE) OESWP4 ERR «, t00=0x002c, t01=0x00a6}
0x4572…4598 Head {h00=0x0022, h01=0x0050, text=» LD A7,FPB:FR+2,A12 NO OF RECS«, t00=0x002c, t01=0x00c2}
0x4598…45c8 Head {h00=0x002c, h01=0x0050, text=» CF A14,MPYMOD A1,A2=NO OF BYTES NEEDED «, t00=0x002c, t01=0x00e8}
0x45c8…45da Head {h00=0x000e, h01=0x0050, text=» SRC A1,1 «, t00=0x002c, t01=0x0118}
0x45da…45fe Head {h00=0x0020, h01=0x0050, text=» ORR A2,A1 GET MOST SIGN BIT«, t00=0x002c, t01=0x012a}
0x45fe…4610 Head {h00=0x000e, h01=0x0050, text=» ADK A2,5 «, t00=0x002c, t01=0x014e}
0x4610…4634 Head {h00=0x0020, h01=0x0050, text=» SRL A2,1 NO OF WORDS NEEDED«, t00=0x002c, t01=0x0160}
0x4634…4654 Head {h00=0x001c, h01=0x0050, text=» RF(Z) OPM140 WRONG SIZE«, t00=0x002c, t01=0x0184}
0x4654…4676 Head {h00=0x001e, h01=0x0050, text=» LD A4,MXIND LENGTH MXIND «, t00=0x002d, t01=0x0014}
0x4676…4694 Head {h00=0x001a, h01=0x0050, text=» SUK A4,4 MAX A5 VALUE«, t00=0x002d, t01=0x0036}
0x4694…46ae Head {h00=0x0016, h01=0x0050, text=» LDKL A5,-2 OFFSET«, t00=0x002d, t01=0x0054}
0x46ae…46c2 Head {h00=0x0010, h01=0x0050, text=»OPM100 EQU *«, t00=0x002d, t01=0x006e}
0x46c2…46de Head {h00=0x0018, h01=0x0050, text=» ADK A5,4 GET ENTRY «, t00=0x002d, t01=0x0082}
0x46de…46f0 Head {h00=0x000e, h01=0x0050, text=» CWR A5,A4«, t00=0x002d, t01=0x009e}
0x46f0…4714 Head {h00=0x0020, h01=0x0050, text=» RF(G) OPM140 NO ENTRY FOUND«, t00=0x002d, t01=0x00b0}
0x4714…472c Head {h00=0x0014, h01=0x0050, text=» LD A3,MXIND,A5 «, t00=0x002d, t01=0x00d4}
0x472c…474c Head {h00=0x001c, h01=0x0050, text=» RB(Z) OPM100 ZERO ENTRY«, t00=0x002d, t01=0x00ec}
0x474c…4766 Head {h00=0x0016, h01=0x0050, text=» LD A6,MXIND+2,A5 «, t00=0x002d, t01=0x010c}
0x4766…4786 Head {h00=0x001c, h01=0x0050, text=» RB(N) OPM100 ENTRY USED«, t00=0x002d, t01=0x0126}
0x4786…47aa Head {h00=0x0020, h01=0x0050, text=» SUR A6,A2 NO OF SPARE WORDS«, t00=0x002d, t01=0x0146}
0x47aa…47d4 Head {h00=0x0026, h01=0x0050, text=» RB(N) OPM100 LARGER ENTRY NEEDED «, t00=0x002d, t01=0x016a}
0x47d4…47e2 (46, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0004}
0x47e2…47ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0012}
0x47ec…480e Head {h00=0x001e, h01=0x0050, text=»* SUFFICIENT SPACE FOUND«, t00=0x002e, t01=0x001c}
0x480e…4818 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x003e}
0x4818…4838 Head {h00=0x001c, h01=0x0050, text=» LDKL A1,/8000 USED BIT «, t00=0x002e, t01=0x0048}
0x4838…4862 Head {h00=0x0026, h01=0x0050, text=» ORS A1,MXIND+2,A5 MARK ENTRY USED«, t00=0x002e, t01=0x0068}
0x4862…4874 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A9«, t00=0x002e, t01=0x0092}
0x4874…4888 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/0E «, t00=0x002e, t01=0x00a4}
0x4888…48b2 Head {h00=0x0026, h01=0x0050, text=» ST A3,OPEMXI,A7 MASTER INDEX ADDR«, t00=0x002e, t01=0x00b8}
0x48b2…48ce Head {h00=0x0018, h01=0x0050, text=» LD A7,FPB:FR+2,A12 «, t00=0x002e, t01=0x00e2}
0x48ce…48ee Head {h00=0x001c, h01=0x0050, text=» STR A7,A3 NO OF ENTRIES«, t00=0x002e, t01=0x00fe}
0x48ee…4908 Head {h00=0x0016, h01=0x0050, text=» LD A1,FPB:RL,A12 «, t00=0x002e, t01=0x011e}
0x4908…4928 Head {h00=0x001c, h01=0x0050, text=» ST A1,2,A3 ENTRY LENGTH«, t00=0x002e, t01=0x0138}
0x4928…494a Head {h00=0x001e, h01=0x0050, text=» ADK A3,4 SKIP MX HEADRER «, t00=0x002e, t01=0x0158}
0x494a…496e Head {h00=0x0020, h01=0x0050, text=» ST A3,ECBBA,A8 BUFFER ADDR «, t00=0x002e, t01=0x017a}
0x496e…498e Head {h00=0x001c, h01=0x0050, text=» ST A1,ECBRL,A8 REQ LGTH«, t00=0x002f, t01=0x000e}
0x498e…49c0 Head {h00=0x002e, h01=0x0050, text=» LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION«, t00=0x002f, t01=0x002e}
0x49c0…49de Head {h00=0x001a, h01=0x0050, text=» CWR A1,A4 MXIND ENTRY«, t00=0x002f, t01=0x0060}
0x49de…4a00 Head {h00=0x001e, h01=0x0050, text=» RF(NL) OPM110 LAST ENTRY «, t00=0x002f, t01=0x007e}
0x4a00…4a1a Head {h00=0x0016, h01=0x0050, text=» LD A3,MXIND+6,A1 «, t00=0x002f, t01=0x00a0}
0x4a1a…4a40 Head {h00=0x0022, h01=0x0050, text=» RF(N) OPM110 NEXT ENTRY USED «, t00=0x002f, t01=0x00ba}
0x4a40…4a4e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x00e0}
0x4a4e…4a58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00ee}
0x4a58…4a82 Head {h00=0x0026, h01=0x0050, text=»* MOVE SPARE WORDS TO NEXT ENTRY«, t00=0x002f, t01=0x00f8}
0x4a82…4a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0122}
0x4a8c…4aa6 Head {h00=0x0016, h01=0x0050, text=» LD A2,MXIND+2,A1 «, t00=0x002f, t01=0x012c}
0x4aa6…4acc Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/7FFF REMOVE USE BIT «, t00=0x002f, t01=0x0146}
0x4acc…4ade Head {h00=0x000e, h01=0x0050, text=» SUR A2,A6«, t00=0x002f, t01=0x016c}
0x4ade…4afc Head {h00=0x001a, h01=0x0050, text=» ORKL A2,/8000 USE BIT«, t00=0x002f, t01=0x017e}
0x4afc…4b16 Head {h00=0x0016, h01=0x0050, text=» ST A2,MXIND+2,A1 «, t00=0x0030, t01=0x000c}
0x4b16…4b48 Head {h00=0x002e, h01=0x0050, text=» ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER «, t00=0x0030, t01=0x0026}
0x4b48…4b70 Head {h00=0x0024, h01=0x0050, text=» LD A7,MXIND,A1 PREVIOUS POINTER«, t00=0x0030, t01=0x0058}
0x4b70…4b8e Head {h00=0x001a, h01=0x0050, text=» SLL A2,1 NO OF BYTES «, t00=0x0030, t01=0x0080}
0x4b8e…4ba0 Head {h00=0x000e, h01=0x0050, text=» ADR A7,A2«, t00=0x0030, t01=0x009e}
0x4ba0…4bba Head {h00=0x0016, h01=0x0050, text=» ST A7,MXIND+4,A1 «, t00=0x0030, t01=0x00b0}
0x4bba…4bc8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x00ca}
0x4bc8…4bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00d8}
0x4bd2…4bfe Head {h00=0x0028, h01=0x0050, text=»* R E A D M A S T E R I N D E X «, t00=0x0030, t01=0x00e2}
0x4bfe…4c08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x010e}
0x4c08…4c1c Head {h00=0x0010, h01=0x0050, text=»OPM110 EQU *«, t00=0x0030, t01=0x0118}
0x4c1c…4c26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x012c}
0x4c26…4c48 Head {h00=0x001e, h01=0x0050, text=»* DATA MANAGEMENT REQUEST:«, t00=0x0030, t01=0x0136}
0x4c48…4c78 Head {h00=0x002c, h01=0x0050, text=»* GET MASTER INDEX WITH READ SEQUENTIAL «, t00=0x0030, t01=0x0158}
0x4c78…4c82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0188}
0x4c82…4cae (49, 0, 400) Head {h00=0x0028, h01=0x0050, text=» LD A2,FDBEXC,A11 EXCLUSIVE TTAB =6 «, t00=0x0031, t01=0x0004}
0x4cae…4ce4 Head {h00=0x0032, h01=0x0050, text=» CM FDBEXC,A11 INDICATE NO EXCLUSIVE ACCESS =6«, t00=0x0031, t01=0x0030}
0x4ce4…4d08 Head {h00=0x0020, h01=0x0050, text=» LDK A7,/82 READ SEQUENTIAL «, t00=0x0031, t01=0x0066}
0x4d08…4d14 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0031, t01=0x008a}
0x4d14…4d24 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0031, t01=0x0096}
0x4d24…4d60 Head {h00=0x0038, h01=0x0050, text=» ST A2,FDBEXC,A11 EXCLUSIVE ACCESS CORRECT AGAIN =6 «, t00=0x0031, t01=0x00a6}
0x4d60…4d78 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRC,A8 «, t00=0x0031, t01=0x00e2}
0x4d78…4da2 Head {h00=0x0026, h01=0x0050, text=» ANKL A2,/FEFF BIT 7 ONLY RETRIES «, t00=0x0031, t01=0x00fa}
0x4da2…4dc0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPM130 NO ERROR«, t00=0x0031, t01=0x0124}
0x4dc0…4dca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0142}
0x4dca…4df0 Head {h00=0x0022, h01=0x0050, text=»* REMOVE THE ONLY CRN BUFFER«, t00=0x0031, t01=0x014c}
0x4df0…4dfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0172}
0x4dfa…4e20 Head {h00=0x0022, h01=0x0050, text=» LD A5,FDBCRL,A11 CRN BUF ADR «, t00=0x0031, t01=0x017c}
0x4e20…4e3c Head {h00=0x0018, h01=0x0050, text=» RF(Z) OPM120 NO CRN«, t00=0x0032, t01=0x0012}
0x4e3c…4e52 Head {h00=0x0012, h01=0x0050, text=» CM FDBCRL,A11«, t00=0x0032, t01=0x002e}
0x4e52…4e5e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0032, t01=0x0044}
0x4e5e…4e74 Head {h00=0x0012, h01=0x0050, text=» LD A6,CRNQUE «, t00=0x0032, t01=0x0050}
0x4e74…4e86 Head {h00=0x000e, h01=0x0050, text=» STR A6,A5«, t00=0x0032, t01=0x0066}
0x4e86…4e9c Head {h00=0x0012, h01=0x0050, text=» ST A5,CRNQUE «, t00=0x0032, t01=0x0078}
0x4e9c…4ea8 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0032, t01=0x008e}
0x4ea8…4ebc Head {h00=0x0010, h01=0x0050, text=»OPM120 EQU *«, t00=0x0032, t01=0x009a}
0x4ebc…4ece Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0032, t01=0x00ae}
0x4ece…4ef0 Head {h00=0x001e, h01=0x0050, text=» ANKL A2,/1000 BIT 3 = EOF«, t00=0x0032, t01=0x00c0}
0x4ef0…4f24 Head {h00=0x0030, h01=0x0050, text=» RF(NZ) OPM150 READY ,WHOLIE MXINDEX IS READ«, t00=0x0032, t01=0x00e2}
0x4f24…4f3c Head {h00=0x0014, h01=0x0050, text=» ABL OERCOM ERR «, t00=0x0032, t01=0x0116}
0x4f3c…4f4a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x012e}
0x4f4a…4f5e Head {h00=0x0010, h01=0x0050, text=»OPM130 EQU *«, t00=0x0032, t01=0x013c}
0x4f5e…4f68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0150}
0x4f68…4f8a Head {h00=0x001e, h01=0x0050, text=»* RECORD READ,READ NEXRT«, t00=0x0032, t01=0x015a}
0x4f8a…4f94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x017c}
0x4f94…4fac Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A8 «, t00=0x0032, t01=0x0186}
0x4fac…4fd0 Head {h00=0x0020, h01=0x0050, text=» ADS A2,ECBBA,A8 REC LENGTH «, t00=0x0033, t01=0x000e}
0x4fd0…4ff4 Head {h00=0x0020, h01=0x0050, text=» RB OPM110 READ NEXT RECORD «, t00=0x0033, t01=0x0032}
0x4ff4…5008 Head {h00=0x0010, h01=0x0050, text=»OPM140 EQU *«, t00=0x0033, t01=0x0056}
0x5008…502e Head {h00=0x0022, h01=0x0050, text=» ABL OESNC1 CORE EXHAUSTED =4 «, t00=0x0033, t01=0x006a}
0x502e…503c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x0090}
0x503c…5046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x009e}
0x5046…508e Head {h00=0x0044, h01=0x0050, text=»* C O M P L E T E M A S T E R I N D E X F I L E R E A D «, t00=0x0033, t01=0x00a8}
0x508e…5098 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00f0}
0x5098…50bc Head {h00=0x0020, h01=0x0050, text=»* CLOSE MASTER INDEX FILE «, t00=0x0033, t01=0x00fa}
0x50bc…50c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x011e}
0x50c6…50da Head {h00=0x0010, h01=0x0050, text=»OPM150 EQU *«, t00=0x0033, t01=0x0128}
0x50da…5106 Head {h00=0x0028, h01=0x0050, text=» ST A10,SDMTTD+2,A14 CLOSE FC ENTRY «, t00=0x0033, t01=0x013c}
0x5106…5130 Head {h00=0x0026, h01=0x0050, text=» CM FPB:FR+2,A12 DO NOT WRITE LRN «, t00=0x0033, t01=0x0168}
0x5130…514e (52, 0, 398) Head {h00=0x001a, h01=0x0050, text=» LDR A7,A9 LOOP COUNT «, t00=0x0034, t01=0x0004}
0x514e…5160 Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0034, t01=0x0022}
0x5160…5180 Head {h00=0x001c, h01=0x0050, text=» LC A7,OPEFNR,A7 FILE NR«, t00=0x0034, t01=0x0034}
0x5180…5198 Head {h00=0x0014, h01=0x0050, text=» SC A7,ECBFC,A8 «, t00=0x0034, t01=0x0054}
0x5198…51c0 Head {h00=0x0024, h01=0x0050, text=» ST A12,ECBBA,A8 PAR BLOCK ADDR «, t00=0x0034, t01=0x006c}
0x51c0…51f0 Head {h00=0x002c, h01=0x0050, text=» CF A14,CLRBUF RELEASE ALL FREE BUFFERS «, t00=0x0034, t01=0x0094}
0x51f0…5204 Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x0034, t01=0x00c4}
0x5204…5218 Head {h00=0x0010, h01=0x0050, text=» XRR A11,A10«, t00=0x0034, t01=0x00d8}
0x5218…522c Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x0034, t01=0x00ec}
0x522c…525c Head {h00=0x002c, h01=0x0050, text=» CF A14,FMIOCL CLOSE (MAIN FDB ADDRESS) «, t00=0x0034, t01=0x0100}
0x525c…5270 Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x0034, t01=0x0130}
0x5270…5284 Head {h00=0x0010, h01=0x0050, text=» XRR A11,A10«, t00=0x0034, t01=0x0144}
0x5284…5298 Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x0034, t01=0x0158}
0x5298…52aa Head {h00=0x000e, h01=0x0050, text=» ADK A1,0 «, t00=0x0034, t01=0x016c}
0x52aa…52c2 Head {h00=0x0014, h01=0x0050, text=» ABL(NZ) OERCOM «, t00=0x0034, t01=0x017e}
0x52c2…52e0 Head {h00=0x001a, h01=0x0050, text=» ABL OPCHEK NEXT FILE «, t00=0x0035, t01=0x0008}
0x52e0…52ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x0026}
0x52ee…52f6 Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x0034}
0x52f6…531a Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0035, t01=0x003c}
0x531a…533e Head {h00=0x0020, h01=0x0050, text=»* I N D E X F I L E * «, t00=0x0035, t01=0x0060}
0x533e…5362 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0035, t01=0x0084}
0x5362…536a Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x00a8}
0x536a…538a Head {h00=0x001c, h01=0x0050, text=»OPINDX EQU * INDEX FILE «, t00=0x0035, t01=0x00b0}
0x538a…5394 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00d0}
0x5394…53b0 Head {h00=0x0018, h01=0x0050, text=»* UPDATE PAR BLOCK«, t00=0x0035, t01=0x00da}
0x53b0…53ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00f6}
0x53ba…53e2 Head {h00=0x0024, h01=0x0050, text=» LD A3,OPEFWT DATA FILE FDB ADDR«, t00=0x0035, t01=0x0100}
0x53e2…53fc Head {h00=0x0016, h01=0x0050, text=» LC A2,FDBNIF,A3 «, t00=0x0035, t01=0x0128}
0x53fc…541a Head {h00=0x001a, h01=0x0050, text=» CM FPB:NI,A12 FILLER «, t00=0x0035, t01=0x0142}
0x541a…5440 Head {h00=0x0022, h01=0x0050, text=» SC A2,FPB:NI,A12 NR OF INDEX «, t00=0x0035, t01=0x0160}
0x5440…5452 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A9«, t00=0x0035, t01=0x0186}
0x5452…5464 Head {h00=0x000e, h01=0x0050, text=» SRL A3,1 «, t00=0x0036, t01=0x0008}
0x5464…5476 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0036, t01=0x001a}
0x5476…548a Head {h00=0x0010, h01=0x0050, text=» LDR A4,A12 «, t00=0x0036, t01=0x002c}
0x548a…54a8 Head {h00=0x001a, h01=0x0050, text=» LDK A5,FPB:I2-FPB:I1 «, t00=0x0036, t01=0x0040}
0x54a8…54ba Head {h00=0x000e, h01=0x0050, text=» SUR A4,A5«, t00=0x0036, t01=0x005e}
0x54ba…54c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0070}
0x54c8…54dc Head {h00=0x0010, h01=0x0050, text=»OPI100 EQU *«, t00=0x0036, t01=0x007e}
0x54dc…54f8 Head {h00=0x0018, h01=0x0050, text=» ADR A4,A5 REL ADDR «, t00=0x0036, t01=0x0092}
0x54f8…5514 Head {h00=0x0018, h01=0x0050, text=» SUK A2,1 NEXT INDEX«, t00=0x0036, t01=0x00ae}
0x5514…552a Head {h00=0x0012, h01=0x0050, text=» RB(NZ) OPI100«, t00=0x0036, t01=0x00ca}
0x552a…553c Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0036, t01=0x00e0}
0x553c…5558 Head {h00=0x0018, h01=0x0050, text=» ADK A3,1 TYPE DUPL «, t00=0x0036, t01=0x00f2}
0x5558…557c Head {h00=0x0020, h01=0x0050, text=» ST A3,FPB:I1,A4 ID AND TYPE«, t00=0x0036, t01=0x010e}
0x557c…5594 Head {h00=0x0014, h01=0x0050, text=» CM FPB:I1+2,A4 «, t00=0x0036, t01=0x0132}
0x5594…55ac Head {h00=0x0014, h01=0x0050, text=» CM FPB:I1+4,A4 «, t00=0x0036, t01=0x014a}
0x55ac…55be Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0036, t01=0x0162}
0x55be…55e4 Head {h00=0x0022, h01=0x0050, text=» ST A7,FPB:I1+6,A4 NR OF ITEMS«, t00=0x0036, t01=0x0174}
0x55e4…5608 Head {h00=0x0020, h01=0x0050, text=» LD A7,FDBKA,A11 KEY OFFSET «, t00=0x0037, t01=0x000a}
0x5608…562a Head {h00=0x001e, h01=0x0050, text=» ST A7,FPB:A1,A4 KEY ADDR «, t00=0x0037, t01=0x002e}
0x562a…564c Head {h00=0x001e, h01=0x0050, text=» LD A7,FDBRLE,A11 REC LGTH«, t00=0x0037, t01=0x0050}
0x564c…565e Head {h00=0x000e, h01=0x0050, text=» SUK A7,6 «, t00=0x0037, t01=0x0072}
0x565e…567a Head {h00=0x0018, h01=0x0050, text=» CM FPB:L1,A4 FILLER«, t00=0x0037, t01=0x0084}
0x567a…569e Head {h00=0x0020, h01=0x0050, text=» SC A7,FPB:L1,A4 KEY LENGTH «, t00=0x0037, t01=0x00a0}
0x569e…56b0 Head {h00=0x000e, h01=0x0050, text=» ADK A7,8 «, t00=0x0037, t01=0x00c4}
0x56b0…56c6 Head {h00=0x0012, h01=0x0050, text=» SRL A7,1 WORD«, t00=0x0037, t01=0x00d6}
0x56c6…56dc Head {h00=0x0012, h01=0x0050, text=» CWK A7,RECBFZ«, t00=0x0037, t01=0x00ec}
0x56dc…56fc Head {h00=0x001c, h01=0x0050, text=» ABL(G) OESLK8 LONG KEY «, t00=0x0037, t01=0x0102}
0x56fc…570a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0122}
0x570a…5714 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0130}
0x5714…5734 Head {h00=0x001c, h01=0x0050, text=»* CALCULATE INDEX SIZE«, t00=0x0037, t01=0x013a}
0x5734…573e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x015a}
0x573e…5758 Head {h00=0x0016, h01=0x0050, text=» LD A1,FPB:S1,A12 «, t00=0x0037, t01=0x0164}
0x5758…5784 Head {h00=0x0028, h01=0x0050, text=» LD A2,FPB:S1+2,A12 SIZE IN SECTORS «, t00=0x0037, t01=0x017e}
0x5784…57a8 Head {h00=0x0020, h01=0x0050, text=» LC A6,FDBBLZ,A11 BLOCK SIZE«, t00=0x0038, t01=0x001a}
0x57a8…57bc Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x0038, t01=0x003e}
0x57bc…57d2 Head {h00=0x0012, h01=0x0050, text=» CF A14,DIVMOD«, t00=0x0038, t01=0x0052}
0x57d2…57f2 Head {h00=0x001c, h01=0x0050, text=» ABL(O) OESOF3 LONG FILE«, t00=0x0038, t01=0x0068}
0x57f2…5808 Head {h00=0x0012, h01=0x0050, text=» CM FPB:IS,A12«, t00=0x0038, t01=0x0088}
0x5808…5832 Head {h00=0x0026, h01=0x0050, text=» ST A2,FPB:IS+2,A12 SIZE IN BLOCKS«, t00=0x0038, t01=0x009e}
0x5832…583c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00c8}
0x583c…585e Head {h00=0x001e, h01=0x0050, text=»* GET INDEX VOLUME NAME «, t00=0x0038, t01=0x00d2}
0x585e…5868 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00f4}
0x5868…5880 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,FPB:V1 «, t00=0x0038, t01=0x00fe}
0x5880…589e Head {h00=0x001a, h01=0x0050, text=» ADR A1,A12 FROM ADDR «, t00=0x0038, t01=0x0116}
0x589e…58b4 Head {h00=0x0012, h01=0x0050, text=» LDK A2,FPB:IV«, t00=0x0038, t01=0x0134}
0x58b4…58ca Head {h00=0x0012, h01=0x0050, text=» ADR A2,A12 TO«, t00=0x0038, t01=0x014a}
0x58ca…58e0 Head {h00=0x0012, h01=0x0050, text=» LDK A3,6 LGTH«, t00=0x0038, t01=0x0160}
0x58e0…58fa Head {h00=0x0016, h01=0x0050, text=» CF A14,MOVFW MOVE«, t00=0x0038, t01=0x0176}
0x58fa…590c Head {h00=0x000e, h01=0x0050, text=» RF OPCHEK«, t00=0x0038, t01=0x0190}
0x590c…5918 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0012}
0x5918…5926 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x001e}
0x5926…592e Head {h00=0x0004, h01=0x0050, t00=0x0039, t01=0x002c}
0x592e…5950 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0039, t01=0x0034}
0x5950…5972 Head {h00=0x001e, h01=0x0050, text=»* D A T A F I L E * «, t00=0x0039, t01=0x0056}
0x5972…5994 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0039, t01=0x0078}
0x5994…599c Head {h00=0x0004, h01=0x0050, t00=0x0039, t01=0x009a}
0x599c…59ba Head {h00=0x001a, h01=0x0050, text=»OPDATA EQU * DATA FILE«, t00=0x0039, t01=0x00a2}
0x59ba…59c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00c0}
0x59c4…59e6 Head {h00=0x001e, h01=0x0050, text=»* UPDATE USER PAR BLOCK «, t00=0x0039, t01=0x00ca}
0x59e6…59f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00ec}
0x59f0…5a0a Head {h00=0x0016, h01=0x0050, text=» LC A2,FDBNIF,A11 «, t00=0x0039, t01=0x00f6}
0x5a0a…5a1e Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0039, t01=0x0110}
0x5a1e…5a3c Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPD100 NO INDEX«, t00=0x0039, t01=0x0124}
0x5a3c…5a4e Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0039, t01=0x0142}
0x5a4e…5a62 Head {h00=0x0010, h01=0x0050, text=»OPD100 EQU *«, t00=0x0039, t01=0x0154}
0x5a62…5a84 Head {h00=0x001e, h01=0x0050, text=» SC A2,FPB:FO,A12 FILE ORG«, t00=0x0039, t01=0x0168}
0x5a84…5a96 Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0039, t01=0x018a}
0x5a96…5abe Head {h00=0x0024, h01=0x0050, text=» SC A2,FPB:FO+1,A12 DEVICE TYPE «, t00=0x003a, t01=0x000c}
0x5abe…5adc Head {h00=0x001a, h01=0x0050, text=» LC A2,OPEFNR FILE NR «, t00=0x003a, t01=0x0034}
0x5adc…5af6 Head {h00=0x0016, h01=0x0050, text=» SC A2,FPB:FM,A12 «, t00=0x003a, t01=0x0052}
0x5af6…5b10 Head {h00=0x0016, h01=0x0050, text=» LD A2,FDBDBR,A11 «, t00=0x003a, t01=0x006c}
0x5b10…5b22 Head {h00=0x000e, h01=0x0050, text=» SRL A2,14«, t00=0x003a, t01=0x0086}
0x5b22…5b54 Head {h00=0x002e, h01=0x0050, text=» SC A2,FPB:BO,A12 DELAY BASIC TOSS OPTIONS«, t00=0x003a, t01=0x0098}
0x5b54…5b5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00ca}
0x5b5e…5b8e Head {h00=0x002c, h01=0x0050, text=»* CONVERT SIZE TO NUMBER OF RECORDS AND «, t00=0x003a, t01=0x00d4}
0x5b8e…5bbc Head {h00=0x002a, h01=0x0050, text=»* ENLARGE FACTOR TO PERCENTAGE«, t00=0x003a, t01=0x0104}
0x5bbc…5bc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0132}
0x5bc6…5bdc Head {h00=0x0012, h01=0x0050, text=» CF A14,COSZEN«, t00=0x003a, t01=0x013c}
0x5bdc…5bea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003a, t01=0x0152}
0x5bea…5bf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0160}
0x5bf4…5c1a Head {h00=0x0022, h01=0x0050, text=»* MOVE PART OF BLOCK TO USER«, t00=0x003a, t01=0x016a}
0x5c1a…5c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0190}
0x5c24…5c3c Head {h00=0x0014, h01=0x0050, text=» LDKL A3,FPB:FR «, t00=0x003b, t01=0x000a}
0x5c3c…5c5a Head {h00=0x001a, h01=0x0050, text=» SUKL A3,FPB:RL LENGTH«, t00=0x003b, t01=0x0022}
0x5c5a…5c82 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTECB,A10 USER ECB ADDR «, t00=0x003b, t01=0x0040}
0x5c82…5ca4 Head {h00=0x001e, h01=0x0050, text=» LD A1,ECBRL,A4 REQ LENGTH«, t00=0x003b, t01=0x0068}
0x5ca4…5cc4 Head {h00=0x001c, h01=0x0050, text=» SUK A1,FPBRES RESERVED «, t00=0x003b, t01=0x008a}
0x5cc4…5cd6 Head {h00=0x000e, h01=0x0050, text=» CWR A3,A1«, t00=0x003b, t01=0x00aa}
0x5cd6…5cfa Head {h00=0x0020, h01=0x0050, text=» RF(NG) OPD120 TAKE SHORTEST«, t00=0x003b, t01=0x00bc}
0x5cfa…5d0c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x003b, t01=0x00e0}
0x5d0c…5d20 Head {h00=0x0010, h01=0x0050, text=»OPD120 EQU *«, t00=0x003b, t01=0x00f2}
0x5d20…5d32 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x003b, t01=0x0106}
0x5d32…5d48 Head {h00=0x0012, h01=0x0050, text=» ADK A1,FPBRES«, t00=0x003b, t01=0x0118}
0x5d48…5d74 Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A4 SET EFFECTIVE LENGTH«, t00=0x003b, t01=0x012e}
0x5d74…5d92 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A12 FROM ADDR «, t00=0x003b, t01=0x015a}
0x5d92…5db2 Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBBA,A4 TO ADDR «, t00=0x003b, t01=0x0178}
0x5db2…5dd8 Head {h00=0x0022, h01=0x0050, text=» ADK A2,FPBRES RESERVED FIELD «, t00=0x003c, t01=0x0008}
0x5dd8…5dee Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x003c, t01=0x002e}
0x5dee…5e16 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTTAB,A10 TTAB ADDR USER«, t00=0x003c, t01=0x0044}
0x5e16…5e2c Head {h00=0x0012, h01=0x0050, text=» CF A14,MOV:SU«, t00=0x003c, t01=0x006c}
0x5e2c…5e38 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0082}
0x5e38…5e4e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003c, t01=0x008e}
0x5e4e…5e68 Head {h00=0x0016, h01=0x0050, text=» CF A14,MOVFW MOVE«, t00=0x003c, t01=0x00a4}
0x5e68…5e74 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x00be}
0x5e74…5e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00ca}
0x5e7e…5ea6 Head {h00=0x0024, h01=0x0050, text=»* ADJUST FILE NAME FOR INDEXES«, t00=0x003c, t01=0x00d4}
0x5ea6…5eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00fc}
0x5eb0…5ec4 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A12 «, t00=0x003c, t01=0x0106}
0x5ec4…5ee6 Head {h00=0x001e, h01=0x0050, text=» ADKL A1,FPB:FN FROM ADDR «, t00=0x003c, t01=0x011a}
0x5ee6…5ef8 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x003c, t01=0x013c}
0x5ef8…5f0c Head {h00=0x0010, h01=0x0050, text=» ADK A2,2 TO«, t00=0x003c, t01=0x014e}
0x5f0c…5f28 Head {h00=0x0018, h01=0x0050, text=» LDK A3,6 NO OF CHAR«, t00=0x003c, t01=0x0162}
0x5f28…5f42 Head {h00=0x0016, h01=0x0050, text=» CF A14,MOVBW MOVE«, t00=0x003c, t01=0x017e}
0x5f42…5f50 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0008}
0x5f50…5f58 Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x0016}
0x5f58…5fa2 Head {h00=0x0046, h01=0x0050, text=»***************************************************************** «, t00=0x003d, t01=0x001e}
0x5fa2…5fec Head {h00=0x0046, h01=0x0050, text=»* C H E C K I F A L L F I L E S A R E O P E N E D * «, t00=0x003d, t01=0x0068}
0x5fec…6036 Head {h00=0x0046, h01=0x0050, text=»***************************************************************** «, t00=0x003d, t01=0x00b2}
0x6036…603e Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x00fc}
0x603e…605c Head {h00=0x001a, h01=0x0050, text=»OPCHEK EQU * NEXT FILE«, t00=0x003d, t01=0x0104}
0x605c…607e Head {h00=0x001e, h01=0x0050, text=» IFT INDXAC=1 INDEXES YES «, t00=0x003d, t01=0x0122}
0x607e…609a Head {h00=0x0018, h01=0x0050, text=» SUKL A9,1 FILE LOOP«, t00=0x003d, t01=0x0144}
0x609a…60ac Head {h00=0x000e, h01=0x0050, text=» CWK A9,1 «, t00=0x003d, t01=0x0160}
0x60ac…60d8 Head {h00=0x0028, h01=0x0050, text=» RF(NG) OPEND ALL INDEXES ARE OPENED«, t00=0x003d, t01=0x0172}
0x60d8…60e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003e, t01=0x000e}
0x60e6…60ee Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x001c}
0x60ee…6122 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x003e, t01=0x0024}
0x6122…6156 Head {h00=0x0030, h01=0x0050, text=»* M O R E F I L E S T O O P E N * «, t00=0x003e, t01=0x0058}
0x6156…618a Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x003e, t01=0x008c}
0x618a…6192 Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x00c0}
0x6192…61aa Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x003e, t01=0x00c8}
0x61aa…61d4 Head {h00=0x0026, h01=0x0050, text=» RF(NE) OPN120 READ FILE PAR ORDER«, t00=0x003e, t01=0x00e0}
0x61d4…61e8 Head {h00=0x0010, h01=0x0050, text=»OPNEXT EQU *«, t00=0x003e, t01=0x010a}
0x61e8…61f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x011e}
0x61f2…6222 Head {h00=0x002c, h01=0x0050, text=»* SKIP MASTER INDEX AT SECONDARY OPEN «, t00=0x003e, t01=0x0128}
0x6222…622c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0158}
0x622c…624c Head {h00=0x001c, h01=0x0050, text=» LD A1,OPEFWT DATA FILE «, t00=0x003e, t01=0x0162}
0x624c…6264 Head {h00=0x0014, h01=0x0050, text=» LC A1,FWTPAR,A1«, t00=0x003e, t01=0x0182}
0x6264…628c Head {h00=0x0024, h01=0x0050, text=» ANK A1,/3E NR OF OPEN BEYOND 1 «, t00=0x003f, t01=0x000a}
0x628c…62a8 Head {h00=0x0018, h01=0x0050, text=» RF(Z) OPN100 FIRST «, t00=0x003f, t01=0x0032}
0x62a8…62cc Head {h00=0x0020, h01=0x0050, text=» ANKL A9,/E NO MASTER INDEX «, t00=0x003f, t01=0x004e}
0x62cc…62e0 Head {h00=0x0010, h01=0x0050, text=»OPN100 EQU *«, t00=0x003f, t01=0x0072}
0x62e0…62ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0086}
0x62ea…6304 Head {h00=0x0016, h01=0x0050, text=»* NEXT FILE NAME«, t00=0x003f, t01=0x0090}
0x6304…6316 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A9«, t00=0x003f, t01=0x00aa}
0x6316…6332 Head {h00=0x0018, h01=0x0050, text=» SLL A7,1 WORD ADDR «, t00=0x003f, t01=0x00bc}
0x6332…6364 Head {h00=0x002e, h01=0x0050, text=» LD A1,OPEFN,A7 FIRST 2 CHAR IN FILE NAME «, t00=0x003f, t01=0x00d8}
0x6364…6388 Head {h00=0x0020, h01=0x0050, text=» ST A1,FPB:FN,A12 FILE NAME «, t00=0x003f, t01=0x010a}
0x6388…6392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x012e}
0x6392…63bc Head {h00=0x0026, h01=0x0050, text=»* FETCH VOLUME NAME FOR INDEXES «, t00=0x003f, t01=0x0138}
0x63bc…63c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0162}
0x63c6…63e8 Head {h00=0x001e, h01=0x0050, text=» LDKL A1,INDVOL FROM ADDR «, t00=0x003f, t01=0x016c}
0x63e8…63fc Head {h00=0x0010, h01=0x0050, text=» LDR A2,A12 «, t00=0x003f, t01=0x018e}
0x63fc…641c Head {h00=0x001c, h01=0x0050, text=» ADKL A2,FPB:V1 TO ADDR «, t00=0x0040, t01=0x0012}
0x641c…642e Head {h00=0x000e, h01=0x0050, text=» LDK A3,6 «, t00=0x0040, t01=0x0032}
0x642e…6454 Head {h00=0x0022, h01=0x0050, text=» CF A14,MOVFW MOVE VOLUME NAME«, t00=0x0040, t01=0x0044}
0x6454…6462 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0040, t01=0x006a}
0x6462…646c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0078}
0x646c…649a Head {h00=0x002a, h01=0x0050, text=»* MOVE SPACES TO OTHER VOLUME NAMES «, t00=0x0040, t01=0x0082}
0x649a…64a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00b0}
0x64a4…64ce Head {h00=0x0026, h01=0x0050, text=» LDK A6,30 NR OF VOLUME NAMES * 10«, t00=0x0040, t01=0x00ba}
0x64ce…64e2 Head {h00=0x0010, h01=0x0050, text=»OPN110 EQU *«, t00=0x0040, t01=0x00e4}
0x64e2…64f4 Head {h00=0x000e, h01=0x0050, text=» SUK A6,10«, t00=0x0040, t01=0x00f8}
0x64f4…650e Head {h00=0x0016, h01=0x0050, text=» RF(N) OPN130 ALL «, t00=0x0040, t01=0x010a}
0x650e…6530 Head {h00=0x001e, h01=0x0050, text=» LDKL A1,OPESPA FROM ADDR «, t00=0x0040, t01=0x0124}
0x6530…6544 Head {h00=0x0010, h01=0x0050, text=» LDR A2,A12 «, t00=0x0040, t01=0x0146}
0x6544…655c Head {h00=0x0014, h01=0x0050, text=» ADKL A2,FPB:V2 «, t00=0x0040, t01=0x015a}
0x655c…6576 Head {h00=0x0016, h01=0x0050, text=» ADR A2,A6 TO ADDR«, t00=0x0040, t01=0x0172}
0x6576…6592 Head {h00=0x0018, h01=0x0050, text=» LDK A3,6 NR OF CHAR«, t00=0x0040, t01=0x018c}
0x6592…65a8 Head {h00=0x0012, h01=0x0050, text=» CF A14,MOVFW «, t00=0x0041, t01=0x0018}
0x65a8…65ba Head {h00=0x000e, h01=0x0050, text=» RB OPN110«, t00=0x0041, t01=0x002e}
0x65ba…65ec Head {h00=0x002e, h01=0x0050, text=»OPN120 EQU * GET FILE NR FOR READ FILE PAR«, t00=0x0041, t01=0x0040}
0x65ec…65fe Head {h00=0x000e, h01=0x0050, text=» LDR A7,A9«, t00=0x0041, t01=0x0072}
0x65fe…6610 Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0041, t01=0x0084}
0x6610…663c Head {h00=0x0028, h01=0x0050, text=» LC A2,OPEFNR,A7 GET FILE NUMBER =2 «, t00=0x0041, t01=0x0096}
0x663c…6650 Head {h00=0x0010, h01=0x0050, text=»OPN130 EQU *«, t00=0x0041, t01=0x00c2}
0x6650…6676 Head {h00=0x0022, h01=0x0050, text=» CM DELAY NO DELAY FOR INDEXES«, t00=0x0041, t01=0x00d6}
0x6676…66a0 Head {h00=0x0026, h01=0x0050, text=» CM NROFIX NO INDEX FOR NEXT FILE «, t00=0x0041, t01=0x00fc}
0x66a0…66c8 Head {h00=0x0024, h01=0x0050, text=» LDR A11,A10 SYSTEM FDB ADDRESS «, t00=0x0041, t01=0x0126}
0x66c8…66dc Head {h00=0x0010, h01=0x0050, text=» ABL OPLENT «, t00=0x0041, t01=0x014e}
0x66dc…66e8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x0162}
0x66e8…66f6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x016e}
0x66f6…66fe Head {h00=0x0004, h01=0x0050, t00=0x0041, t01=0x017c}
0x66fe…6736 Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0041, t01=0x0184}
0x6736…676e Head {h00=0x0034, h01=0x0050, text=»* A L L F I L E S A R E O P E N E D * «, t00=0x0042, t01=0x002c}
0x676e…67a6 Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0042, t01=0x0064}
0x67a6…67ae Head {h00=0x0004, h01=0x0050, t00=0x0042, t01=0x009c}
0x67ae…67c8 Head {h00=0x0016, h01=0x0050, text=»OPEND EQU * FINISH«, t00=0x0042, t01=0x00a4}
0x67c8…67f2 Head {h00=0x0026, h01=0x0050, text=» LD A11,OPEFWT FDB ADDR DATA FILE «, t00=0x0042, t01=0x00be}
0x67f2…680a Head {h00=0x0014, h01=0x0050, text=» CWK A10,FDBSTA «, t00=0x0042, t01=0x00e8}
0x680a…6834 Head {h00=0x0026, h01=0x0050, text=» RF(NE) OPE140 READ FILE PAR ORDER«, t00=0x0042, t01=0x0100}
0x6834…683e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x012a}
0x683e…686a Head {h00=0x0028, h01=0x0050, text=»* STORE FDB ADDRESSES IN ALL FDB'S«, t00=0x0042, t01=0x0134}
0x686a…6874 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0160}
0x6874…6896 Head {h00=0x001e, h01=0x0050, text=» LDK A5,10 NR OF FILES * 2«, t00=0x0042, t01=0x016a}
0x6896…68aa Head {h00=0x0010, h01=0x0050, text=»OPE100 EQU *«, t00=0x0042, t01=0x018c}
0x68aa…68bc Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0043, t01=0x0010}
0x68bc…68e2 Head {h00=0x0022, h01=0x0050, text=» RF(N) OPE110 ALL FDB UPPDATED«, t00=0x0043, t01=0x0022}
0x68e2…68ea Head {h00=0x0004, h01=0x0050, t00=0x0043, t01=0x0048}
0x68ea…6912 Head {h00=0x0024, h01=0x0050, text=» LD A2,OPEFWT,A5 FDB ADDR INDEX «, t00=0x0043, t01=0x0050}
0x6912…6936 Head {h00=0x0020, h01=0x0050, text=» RB(Z) OPE100 NO INDEX FILE «, t00=0x0043, t01=0x0078}
0x6936…6958 Head {h00=0x001e, h01=0x0050, text=» LDKL A1,OPEFWT FROM ADDR «, t00=0x0043, t01=0x009c}
0x6958…6978 Head {h00=0x001c, h01=0x0050, text=» ADKL A2,FDBADF TO ADDR «, t00=0x0043, t01=0x00be}
0x6978…6996 Head {h00=0x001a, h01=0x0050, text=» LDK A3,10 NO OF BYTES«, t00=0x0043, t01=0x00de}
0x6996…69b8 Head {h00=0x001e, h01=0x0050, text=» CF A14,MOVFW MOVE 5 WORDS«, t00=0x0043, t01=0x00fc}
0x69b8…69ca Head {h00=0x000e, h01=0x0050, text=» RB OPE100«, t00=0x0043, t01=0x011e}
0x69ca…69de Head {h00=0x0010, h01=0x0050, text=»OPE110 EQU *«, t00=0x0043, t01=0x0130}
0x69de…69e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0144}
0x69e8…6a12 Head {h00=0x0026, h01=0x0050, text=»* CONNECT FILE CODE OF DATA FILE«, t00=0x0043, t01=0x014e}
0x6a12…6a1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0178}
0x6a1c…6a40 Head {h00=0x0020, h01=0x0050, text=» LD* A2,DWTECB,A10 FILE CODE«, t00=0x0043, t01=0x0182}
0x6a40…6a54 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0044, t01=0x0016}
0x6a54…6a6e Head {h00=0x0016, h01=0x0050, text=» SC A2,OPEFCD SAVE«, t00=0x0044, t01=0x002a}
0x6a6e…6a8e Head {h00=0x001c, h01=0x0050, text=» LDK A5,0 TTAB AND CDTAB«, t00=0x0044, t01=0x0044}
0x6a8e…6ab6 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTTAB,A10 USER TTAB ADDR«, t00=0x0044, t01=0x0064}
0x6ab6…6aea Head {h00=0x0030, h01=0x0050, text=» CF A14,FNDFDB A4=TTAB/SCTCDT ENTRY ADDRESS «, t00=0x0044, t01=0x008c}
0x6aea…6b08 Head {h00=0x001a, h01=0x0050, text=» ST A11,2,A4 FWT ADDR «, t00=0x0044, t01=0x00c0}
0x6b08…6b16 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x00de}
0x6b16…6b20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00ec}
0x6b20…6b42 Head {h00=0x001e, h01=0x0050, text=»* REMOVE CURRENCY BUFFER«, t00=0x0044, t01=0x00f6}
0x6b42…6b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0118}
0x6b4c…6b60 Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x0044, t01=0x0122}
0x6b60…6b74 Head {h00=0x0010, h01=0x0050, text=» XRR A11,A10«, t00=0x0044, t01=0x0136}
0x6b74…6b88 Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x0044, t01=0x014a}
0x6b88…6baa Head {h00=0x001e, h01=0x0050, text=» CF A14,CRNGET ADDR IN A2 «, t00=0x0044, t01=0x015e}
0x6baa…6bbe Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x0044, t01=0x0180}
0x6bbe…6bd2 (69, 0, 400) Head {h00=0x0010, h01=0x0050, text=» XRR A11,A10«, t00=0x0045, t01=0x0004}
0x6bd2…6be6 Head {h00=0x0010, h01=0x0050, text=» XRR A10,A11«, t00=0x0045, t01=0x0018}
0x6be6…6bfa Head {h00=0x0010, h01=0x0050, text=» LDR A3,A10 «, t00=0x0045, t01=0x002c}
0x6bfa…6c16 Head {h00=0x0018, h01=0x0050, text=» ADKL A3,FDBCRL ROOT«, t00=0x0045, t01=0x0040}
0x6c16…6c22 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0045, t01=0x005c}
0x6c22…6c36 Head {h00=0x0010, h01=0x0050, text=»OPE120 EQU *«, t00=0x0045, t01=0x0068}
0x6c36…6c48 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0045, t01=0x007c}
0x6c48…6c68 Head {h00=0x001c, h01=0x0050, text=» LDR* A3,A3 NEXT BUFFER «, t00=0x0045, t01=0x008e}
0x6c68…6c7a Head {h00=0x000e, h01=0x0050, text=» CWR A3,A2«, t00=0x0045, t01=0x00ae}
0x6c7a…6c9c Head {h00=0x001e, h01=0x0050, text=» RB(NE) OPE120 NEXT BUFFER«, t00=0x0045, t01=0x00c0}
0x6c9c…6cb4 Head {h00=0x0014, h01=0x0050, text=» LDR* A4,A3 NEXT«, t00=0x0045, t01=0x00e2}
0x6cb4…6cc6 Head {h00=0x000e, h01=0x0050, text=» STR A4,A1«, t00=0x0045, t01=0x00fa}
0x6cc6…6cdc Head {h00=0x0012, h01=0x0050, text=» LD A3,CRNQUE «, t00=0x0045, t01=0x010c}
0x6cdc…6cee Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0045, t01=0x0122}
0x6cee…6d04 Head {h00=0x0012, h01=0x0050, text=» ST A2,CRNQUE «, t00=0x0045, t01=0x0134}
0x6d04…6d12 Head {h00=0x000a, h01=0x0050, text=» ENB «, t00=0x0045, t01=0x014a}
0x6d12…6d20 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x0158}
0x6d20…6d34 Head {h00=0x0010, h01=0x0050, text=»OPE140 EQU *«, t00=0x0045, t01=0x0166}
0x6d34…6d3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x017a}
0x6d3e…6d74 Head {h00=0x0032, h01=0x0050, text=»* CHECK USER SIZE AND UPDATE PARAMETER BLOCK«, t00=0x0045, t01=0x0184}
0x6d74…6d7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x002a}
0x6d7e…6d94 Head {h00=0x0012, h01=0x0050, text=» LDK A1,FPB:IV«, t00=0x0046, t01=0x0034}
0x6d94…6dba Head {h00=0x0022, h01=0x0050, text=» LC A3,FDBNIF,A11 NR OF INDEX «, t00=0x0046, t01=0x004a}
0x6dba…6dcc Head {h00=0x000e, h01=0x0050, text=» ANK A3,/F«, t00=0x0046, t01=0x0070}
0x6dcc…6de2 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0046, t01=0x0082}
0x6de2…6df8 Head {h00=0x0012, h01=0x0050, text=» RF(Z) OPE150 «, t00=0x0046, t01=0x0098}
0x6df8…6e0a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0046, t01=0x00ae}
0x6e0a…6e1c Head {h00=0x000e, h01=0x0050, text=» SLL A3,3 «, t00=0x0046, t01=0x00c0}
0x6e1c…6e2e Head {h00=0x000e, h01=0x0050, text=» SLL A4,2 «, t00=0x0046, t01=0x00d2}
0x6e2e…6e4e Head {h00=0x001c, h01=0x0050, text=» ADR A3,A4 MULT WITH 12 «, t00=0x0046, t01=0x00e4}
0x6e4e…6e64 Head {h00=0x0012, h01=0x0050, text=» ADK A3,FPB:I1«, t00=0x0046, t01=0x0104}
0x6e64…6e8a Head {h00=0x0022, h01=0x0050, text=» SUR A3,A1 MAX NR OF REM CHAR «, t00=0x0046, t01=0x011a}
0x6e8a…6e9e Head {h00=0x0010, h01=0x0050, text=»OPE150 EQU *«, t00=0x0046, t01=0x0140}
0x6e9e…6eaa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0154}
0x6eaa…6ec8 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A12 FROM ADDR «, t00=0x0046, t01=0x0160}
0x6ec8…6eea Head {h00=0x001e, h01=0x0050, text=» LD A6,DWTECB,A10 USER ECB«, t00=0x0046, t01=0x017e}
0x6eea…6f0c Head {h00=0x001e, h01=0x0050, text=» LD A2,ECBRL,A6 TOT LENGTH«, t00=0x0047, t01=0x0010}
0x6f0c…6f2a Head {h00=0x001a, h01=0x0050, text=» SUK A2,FPB:IV+FPBRES «, t00=0x0047, t01=0x0032}
0x6f2a…6f46 Head {h00=0x0018, h01=0x0050, text=» CWR A3,A2 REM LGTH «, t00=0x0047, t01=0x0050}
0x6f46…6f6a Head {h00=0x0020, h01=0x0050, text=» RF(NG) OPE160 TAKE SHORTEST«, t00=0x0047, t01=0x006c}
0x6f6a…6f7c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0047, t01=0x0090}
0x6f7c…6f8a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x00a2}
0x6f8a…6f9e Head {h00=0x0010, h01=0x0050, text=»OPE160 EQU *«, t00=0x0047, t01=0x00b0}
0x6f9e…6fb0 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0047, t01=0x00c4}
0x6fb0…6fce Head {h00=0x001a, h01=0x0050, text=» ADK A2,FPB:IV+FPBRES «, t00=0x0047, t01=0x00d6}
0x6fce…6ffa Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBEL,A6 SET EFFECTIVE LENGTH«, t00=0x0047, t01=0x00f4}
0x6ffa…7012 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBBA,A6 «, t00=0x0047, t01=0x0120}
0x7012…7038 Head {h00=0x0022, h01=0x0050, text=» ADK A2,FPB:IV+FPBRES TO ADDER«, t00=0x0047, t01=0x0138}
0x7038…704e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0047, t01=0x015e}
0x704e…7068 Head {h00=0x0016, h01=0x0050, text=» CF A14,MOVFW MOVE«, t00=0x0047, t01=0x0174}
0x7068…7074 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x018e}
0x7074…708a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0048, t01=0x000a}
0x708a…70b2 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTTAB,A10 USER TTAB ADDR«, t00=0x0048, t01=0x0020}
0x70b2…70c8 Head {h00=0x0012, h01=0x0050, text=» CF A14,MOV:SU«, t00=0x0048, t01=0x0048}
0x70c8…70d4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x005e}
0x70d4…70e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0048, t01=0x006a}
0x70e2…70ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0078}
0x70ec…7104 Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x0048, t01=0x0082}
0x7104…711c Head {h00=0x0014, h01=0x0050, text=»* OPEN END *«, t00=0x0048, t01=0x009a}
0x711c…7134 Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x0048, t01=0x00b2}
0x7134…713e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00ca}
0x713e…7164 Head {h00=0x0022, h01=0x0050, text=» LDR A11,A10 MAIN FDB ADDRESS «, t00=0x0048, t01=0x00d4}
0x7164…717e Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RET CODE«, t00=0x0048, t01=0x00fa}
0x717e…71a8 Head {h00=0x0026, h01=0x0050, text=» ABL SDMERX TENDIO+EXIT IN SDMTSK «, t00=0x0048, t01=0x0114}
0x71a8…71b6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0048, t01=0x013e}
0x71b6…71d0 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0048, t01=0x014c}
0x71d0…71ea Head {h00=0x0016, h01=0x0050, text=»* C L O S E * «, t00=0x0048, t01=0x0166}
0x71ea…7204 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0048, t01=0x0180}
0x7204…720c Head {h00=0x0004, h01=0x0050, t00=0x0049, t01=0x000a}
0x720c…7226 Head {h00=0x0016, h01=0x0050, text=»SDMCLO EQU * CLOSE«, t00=0x0049, t01=0x0012}
0x7226…7230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x002c}
0x7230…7256 Head {h00=0x0022, h01=0x0050, text=»* (A4= BLOCK BUFFER ADDRESS )«, t00=0x0049, t01=0x0036}
0x7256…7282 Head {h00=0x0028, h01=0x0050, text=»* (A5 = BLOCK BUFFER DATA ADDRESS )«, t00=0x0049, t01=0x005c}
0x7282…72aa Head {h00=0x0024, h01=0x0050, text=»* A11= FDB ADDRESS ALL ORDERS «, t00=0x0049, t01=0x0088}
0x72aa…72d0 Head {h00=0x0022, h01=0x0050, text=»* A7 = ORDER CODE ALL ORDERS«, t00=0x0049, t01=0x00b0}
0x72d0…72f2 Head {h00=0x001e, h01=0x0050, text=»* (A8 = FDBECB ADDRESS ) «, t00=0x0049, t01=0x00d6}
0x72f2…7316 Head {h00=0x0020, h01=0x0050, text=»* (A9 = USER ECB ADDRESS ) «, t00=0x0049, t01=0x00f8}
0x7316…7320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x011c}
0x7320…734a Head {h00=0x0026, h01=0x0050, text=» LD A9,DWTECB,A11 USER ECB ADDRESS«, t00=0x0049, t01=0x0126}
0x734a…7364 Head {h00=0x0016, h01=0x0050, text=» LD A3,FDBDBR,A11 «, t00=0x0049, t01=0x0150}
0x7364…7384 Head {h00=0x001c, h01=0x0050, text=» RF(NN) SDMC10 NO DELAY «, t00=0x0049, t01=0x016a}
0x7384…73a0 Head {h00=0x0018, h01=0x0050, text=» CF A14,FMIOWR WRITE«, t00=0x0049, t01=0x018a}
0x73a0…73c8 Head {h00=0x0024, h01=0x0050, text=» ORS A1,ECBRC,A9 SET RETURN CODE«, t00=0x004a, t01=0x0016}
0x73c8…73dc Head {h00=0x0010, h01=0x0050, text=»SDMC10 EQU *«, t00=0x004a, t01=0x003e}
0x73dc…73f6 Head {h00=0x0016, h01=0x0050, text=» IFT CRDEEX=1 =8 «, t00=0x004a, t01=0x0052}
0x73f6…7410 Head {h00=0x0016, h01=0x0050, text=» LC A3,DWTOPT,A11 «, t00=0x004a, t01=0x006c}
0x7410…7422 Head {h00=0x000e, h01=0x0050, text=» ANK A3,2 «, t00=0x004a, t01=0x0086}
0x7422…7446 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) SDMC20 CLOSE DISCARD«, t00=0x004a, t01=0x0098}
0x7446…7454 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004a, t01=0x00bc}
0x7454…745e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00ca}
0x745e…7472 Head {h00=0x0010, h01=0x0050, text=»* CLOSE LOCK«, t00=0x004a, t01=0x00d4}
0x7472…747c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00e8}
0x747c…74a0 Head {h00=0x0020, h01=0x0050, text=» LC A3,FDBOMD,A11 OPEN MODE «, t00=0x004a, t01=0x00f2}
0x74a0…74b6 Head {h00=0x0012, h01=0x0050, text=» CWK A3,SDMOOR«, t00=0x004a, t01=0x0116}
0x74b6…74e6 Head {h00=0x002c, h01=0x0050, text=» RF(E) SDMC20 DON'T FORMAT,OUTPUT RANDOM«, t00=0x004a, t01=0x012c}
0x74e6…74fc Head {h00=0x0012, h01=0x0050, text=» CWK A3,SDMOEE«, t00=0x004a, t01=0x015c}
0x74fc…7532 Head {h00=0x0032, h01=0x0050, text=» RF(L) SDMC20 DON'T FORMAT,NOT EXTEND OR SEQ. «, t00=0x004a, t01=0x0172}
0x7532…753c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0018}
0x753c…7578 Head {h00=0x0038, h01=0x0050, text=»* FORMAT FILE IF OPENED OUTPUT SEQUENTIAL OR EXTEND «, t00=0x004b, t01=0x0022}
0x7578…7582 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x005e}
0x7582…75ae Head {h00=0x0028, h01=0x0050, text=» LDR A4,A5 BLOCK BUFFER DATA ADDRESS«, t00=0x004b, t01=0x0068}
0x75ae…75e2 Head {h00=0x0030, h01=0x0050, text=» LD A3,FDBRRO,A11 RECORD OFFSET IN BLOCK =1 «, t00=0x004b, t01=0x0094}
0x75e2…75fc Head {h00=0x0016, h01=0x0050, text=» LD A1,FDBBLZ,A11 «, t00=0x004b, t01=0x00c8}
0x75fc…7622 Head {h00=0x0022, h01=0x0050, text=» SLL A1,8 BLOCK SIZE IN BYTES «, t00=0x004b, t01=0x00e2}
0x7622…7642 Head {h00=0x001c, h01=0x0050, text=» LD A5,FDBLRN+1,A11 =3 «, t00=0x004b, t01=0x0108}
0x7642…766a Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SDMC12 FILE NOT EMPTY =3«, t00=0x004b, t01=0x0128}
0x766a…7688 Head {h00=0x001a, h01=0x0050, text=» LC A5,FDBLRN,A11 =3 «, t00=0x004b, t01=0x0150}
0x7688…76a4 Head {h00=0x0018, h01=0x0050, text=» ADK A5,0 SET CR =3 «, t00=0x004b, t01=0x016e}
0x76a4…76c8 Head {h00=0x0020, h01=0x0050, text=» RF(Z) SDMC16 FILE EMPTY =3 «, t00=0x004b, t01=0x018a}
0x76c8…76e0 Head {h00=0x0014, h01=0x0050, text=»SDMC12 EQU * =3«, t00=0x004c, t01=0x001e}
0x76e0…770a Head {h00=0x0026, h01=0x0050, text=» AD A3,FDBRLE,A11 RECORD LENGTH =1«, t00=0x004c, t01=0x0036}
0x770a…7730 Head {h00=0x0022, h01=0x0050, text=» ADK A3,1 OFFSET TO LRN + 1 =1«, t00=0x004c, t01=0x0060}
0x7730…775c Head {h00=0x0028, h01=0x0050, text=» SUR A1,A3 LENGTH LEFT IN BUFFER =1 «, t00=0x004c, t01=0x0086}
0x775c…7774 Head {h00=0x0014, h01=0x0050, text=»SDMC16 EQU * =3«, t00=0x004c, t01=0x00b2}
0x7774…779e Head {h00=0x0026, h01=0x0050, text=» ADR A3,A4 RECORD POINTER LRN+1 =1«, t00=0x004c, t01=0x00ca}
0x779e…77ce Head {h00=0x002c, h01=0x0050, text=» CF A14,FORMER BUILD FORMATTED BUFFER =1«, t00=0x004c, t01=0x00f4}
0x77ce…77f8 Head {h00=0x0026, h01=0x0050, text=» CF A14,FMIOWR WRITE BLOCK BUFFER «, t00=0x004c, t01=0x0124}
0x77f8…7816 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A1 RETURN CODE«, t00=0x004c, t01=0x014e}
0x7816…7828 Head {h00=0x000e, h01=0x0050, text=» SLL A2,2 «, t00=0x004c, t01=0x016c}
0x7828…784a Head {h00=0x001e, h01=0x0050, text=» RF(N) SDMC20 END OF FILE «, t00=0x004c, t01=0x017e}
0x784a…7872 Head {h00=0x0024, h01=0x0050, text=» ORS A1,ECBRC,A9 SET RETURN CODE«, t00=0x004d, t01=0x0010}
0x7872…789a Head {h00=0x0024, h01=0x0050, text=» LD A1,FDBSNR,A11 SECTOR NUMBER «, t00=0x004d, t01=0x0038}
0x789a…78b6 Head {h00=0x0018, h01=0x0050, text=» LD A2,FDBSNR+2,A11 «, t00=0x004d, t01=0x0060}
0x78b6…78c8 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x004d, t01=0x007c}
0x78c8…78f8 Head {h00=0x002c, h01=0x0050, text=» LD A7,FDBBLZ,A11 BLOCK SIZE IN SECTORS «, t00=0x004d, t01=0x008e}
0x78f8…791e Head {h00=0x0022, h01=0x0050, text=» CF A14,ADDMOD GET NEXT SECTOR«, t00=0x004d, t01=0x00be}
0x791e…7938 Head {h00=0x0016, h01=0x0050, text=» ST A1,FDBSNR,A11 «, t00=0x004d, t01=0x00e4}
0x7938…7954 Head {h00=0x0018, h01=0x0050, text=» ST A2,FDBSNR+2,A11 «, t00=0x004d, t01=0x00fe}
0x7954…797e Head {h00=0x0026, h01=0x0050, text=» CF A14,FRMFIL FORMAT REST OF FILE«, t00=0x004d, t01=0x011a}
0x797e…79a6 Head {h00=0x0024, h01=0x0050, text=» ORS A1,ECBRC,A9 SET RETURN CODE«, t00=0x004d, t01=0x0144}
0x79a6…79b8 Head {h00=0x000e, h01=0x0050, text=» RF SDMC30«, t00=0x004d, t01=0x016c}
0x79b8…79cc Head {h00=0x0010, h01=0x0050, text=»SDMC20 EQU *«, t00=0x004d, t01=0x017e}
0x79cc…79de (78, 0, 400) Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x004e, t01=0x0004}
0x79de…7a16 Head {h00=0x0034, h01=0x0050, text=» LD A4,FDBEXC,A11 EXCLUSIVE ACCESS INDICATOR =7 «, t00=0x004e, t01=0x0016}
0x7a16…7a40 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SDMC25 OPENED EXCLUSIVE =7«, t00=0x004e, t01=0x004e}
0x7a40…7a70 Head {h00=0x002c, h01=0x0050, text=» SC A4,DWTOPT,A11 INDICATE CLOSE LOCK =7«, t00=0x004e, t01=0x0078}
0x7a70…7a88 Head {h00=0x0014, h01=0x0050, text=»SDMC25 EQU * =7«, t00=0x004e, t01=0x00a8}
0x7a88…7ab4 Head {h00=0x0028, h01=0x0050, text=» CF A14,SDMRLB RELEASE BLOCK BUFFER «, t00=0x004e, t01=0x00c0}
0x7ab4…7ac8 Head {h00=0x0010, h01=0x0050, text=»SDMC30 EQU *«, t00=0x004e, t01=0x00ec}
0x7ac8…7ad2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0100}
0x7ad2…7aec Head {h00=0x0016, h01=0x0050, text=»* CLEAR CURRENCY«, t00=0x004e, t01=0x010a}
0x7aec…7af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0124}
0x7af6…7b20 Head {h00=0x0026, h01=0x0050, text=» CF A14,CRNGET GET CURRENCY BUFFER«, t00=0x004e, t01=0x012e}
0x7b20…7b32 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x004e, t01=0x0158}
0x7b32…7b52 Head {h00=0x001c, h01=0x0050, text=» SC A1,CRNSTA,A2 STATUS «, t00=0x004e, t01=0x016a}
0x7b52…7b68 Head {h00=0x0012, h01=0x0050, text=» CM CRNCDF,A2 «, t00=0x004e, t01=0x018a}
0x7b68…7b80 Head {h00=0x0014, h01=0x0050, text=» CM CRNCDF+2,A2 «, t00=0x004f, t01=0x0010}
0x7b80…7b96 Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x004f, t01=0x0028}
0x7b96…7bac Head {h00=0x0012, h01=0x0050, text=» CM CRNCIF,A2 «, t00=0x004f, t01=0x003e}
0x7bac…7bc4 Head {h00=0x0014, h01=0x0050, text=» CM CRNCIF+2,A2 «, t00=0x004f, t01=0x0054}
0x7bc4…7bd0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x006c}
0x7bd0…7bde Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x0078}
0x7bde…7be8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0086}
0x7be8…7c06 Head {h00=0x001a, h01=0x0050, text=»* BUILD CLOSE TABLES«, t00=0x004f, t01=0x0090}
0x7c06…7c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00ae}
0x7c10…7c32 Head {h00=0x001e, h01=0x0050, text=» LC A7,ECBFC,A9 FILE CODE «, t00=0x004f, t01=0x00b8}
0x7c32…7c4e Head {h00=0x0018, h01=0x0050, text=» LDK A5,10 2 * FILES«, t00=0x004f, t01=0x00da}
0x7c4e…7c62 Head {h00=0x0010, h01=0x0050, text=»SDMC40 EQU *«, t00=0x004f, t01=0x00f6}
0x7c62…7c74 Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x004f, t01=0x010a}
0x7c74…7c94 Head {h00=0x001c, h01=0x0050, text=» RF(N) SDMC60 ALL FILES «, t00=0x004f, t01=0x011c}
0x7c94…7ca8 Head {h00=0x0010, h01=0x0050, text=» LDR A4,A11 «, t00=0x004f, t01=0x013c}
0x7ca8…7cba Head {h00=0x000e, h01=0x0050, text=» ADR A4,A5«, t00=0x004f, t01=0x0150}
0x7cba…7ccc Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x004f, t01=0x0162}
0x7ccc…7cde Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x004f, t01=0x0174}
0x7cde…7cf0 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x004f, t01=0x0186}
0x7cf0…7d02 Head {h00=0x000e, h01=0x0050, text=» SUR A9,A9«, t00=0x0050, t01=0x0008}
0x7d02…7d16 Head {h00=0x0010, h01=0x0050, text=» SUR A10,A10«, t00=0x0050, t01=0x001a}
0x7d16…7d38 Head {h00=0x001e, h01=0x0050, text=» LD A3,FDBADF,A4 FDB ADDR «, t00=0x0050, t01=0x002e}
0x7d38…7d56 Head {h00=0x001a, h01=0x0050, text=» RF(Z) SDMC50 NO FILE «, t00=0x0050, t01=0x0050}
0x7d56…7d80 Head {h00=0x0026, h01=0x0050, text=» LD A6,FDBMIA,A3 MASTER INDEX ADDR«, t00=0x0050, t01=0x006e}
0x7d80…7da0 Head {h00=0x001c, h01=0x0050, text=» LC A2,FWTFNR,A3 FILE NR«, t00=0x0050, t01=0x0098}
0x7da0…7dc4 Head {h00=0x0020, h01=0x0050, text=» LC A9,FDBLRN,A3 LAST REC NR«, t00=0x0050, t01=0x00b8}
0x7dc4…7de0 Head {h00=0x0018, h01=0x0050, text=» LD A10,FDBLRN+1,A3 «, t00=0x0050, t01=0x00dc}
0x7de0…7df4 Head {h00=0x0010, h01=0x0050, text=»SDMC50 EQU *«, t00=0x0050, t01=0x00f8}
0x7df4…7e0c Head {h00=0x0014, h01=0x0050, text=» ST A6,OPEMXI,A5«, t00=0x0050, t01=0x010c}
0x7e0c…7e24 Head {h00=0x0014, h01=0x0050, text=» ST A3,OPEFWT,A5«, t00=0x0050, t01=0x0124}
0x7e24…7e36 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A5«, t00=0x0050, t01=0x013c}
0x7e36…7e48 Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x0050, t01=0x014e}
0x7e48…7e68 Head {h00=0x001c, h01=0x0050, text=» SC A2,OPEFNR,A4 FILE NR«, t00=0x0050, t01=0x0160}
0x7e68…7e8a Head {h00=0x001e, h01=0x0050, text=» SC A1,OPEFCD,A4 FILE CODE«, t00=0x0050, t01=0x0180}
0x7e8a…7e9c Head {h00=0x000e, h01=0x0050, text=» SLL A4,2 «, t00=0x0051, t01=0x0012}
0x7e9c…7ec0 Head {h00=0x0020, h01=0x0050, text=» ST A9,OPELRN,A4 LAST REC NR«, t00=0x0051, t01=0x0024}
0x7ec0…7edc Head {h00=0x0018, h01=0x0050, text=» ST A10,OPELRN+2,A4 «, t00=0x0051, t01=0x0048}
0x7edc…7ef8 Head {h00=0x0018, h01=0x0050, text=» RB SDMC40 NEXT FILE«, t00=0x0051, t01=0x0064}
0x7ef8…7f06 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x0080}
0x7f06…7f1a Head {h00=0x0010, h01=0x0050, text=»SDMC60 EQU *«, t00=0x0051, t01=0x008e}
0x7f1a…7f3a Head {h00=0x001c, h01=0x0050, text=» SC A7,OPEFCD FILE CODE «, t00=0x0051, t01=0x00a2}
0x7f3a…7f44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00c2}
0x7f44…7f62 Head {h00=0x001a, h01=0x0050, text=»* A11=MAIN FDB ADDRESS«, t00=0x0051, t01=0x00cc}
0x7f62…7f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ea}
0x7f6c…7f94 Head {h00=0x0024, h01=0x0050, text=»CLOCOM EQU * RECOVERY AT ERRORS «, t00=0x0051, t01=0x00f4}
0x7f94…7fc2 Head {h00=0x002a, h01=0x0050, text=» LC A2,DWTOR+1,A11 ORDER CODE INTERNAL«, t00=0x0051, t01=0x011c}
0x7fc2…7fd8 Head {h00=0x0012, h01=0x0050, text=» CWK A2,ORDFLP«, t00=0x0051, t01=0x014a}
0x7fd8…8004 Head {h00=0x0028, h01=0x0050, text=» ABL(E) SDMERX READ FILE PARAMETERS «, t00=0x0051, t01=0x0160}
0x8004…800e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x018c}
0x800e…8048 Head {h00=0x0036, h01=0x0050, text=»* FREE FILE CODES,MASTER INDEXES,FILES, CURRENCY«, t00=0x0052, t01=0x0008}
0x8048…8052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0042}
0x8052…8064 Head {h00=0x000e, h01=0x0050, text=» LDKL A9,5«, t00=0x0052, t01=0x004c}
0x8064…8078 Head {h00=0x0010, h01=0x0050, text=»OPEE10 EQU *«, t00=0x0052, t01=0x005e}
0x8078…808a Head {h00=0x000e, h01=0x0050, text=» SUKL A9,1«, t00=0x0052, t01=0x0072}
0x808a…80ac Head {h00=0x001e, h01=0x0050, text=» RF(NN) OPEE20 MORE FILES «, t00=0x0052, t01=0x0084}
0x80ac…80ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x00a6}
0x80ba…80c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00b4}
0x80c4…80de Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0052, t01=0x00be}
0x80de…80f8 Head {h00=0x0016, h01=0x0050, text=»* CLOSE END * «, t00=0x0052, t01=0x00d8}
0x80f8…8112 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0052, t01=0x00f2}
0x8112…811c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x010c}
0x811c…8136 Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RET CODE«, t00=0x0052, t01=0x0116}
0x8136…814a Head {h00=0x0010, h01=0x0050, text=» ABL SDMERX «, t00=0x0052, t01=0x0130}
0x814a…8158 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x0144}
0x8158…8162 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0152}
0x8162…817e Head {h00=0x0018, h01=0x0050, text=»* RESET FILE CODE*«, t00=0x0052, t01=0x015c}
0x817e…8188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0178}
0x8188…819c Head {h00=0x0010, h01=0x0050, text=»OPEE20 EQU *«, t00=0x0052, t01=0x0182}
0x819c…81be Head {h00=0x001e, h01=0x0050, text=» LC A2,OPEFCD,A9 FILE CODE«, t00=0x0053, t01=0x0008}
0x81be…81d2 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0053, t01=0x002a}
0x81d2…81f0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPEE25 NO CODE «, t00=0x0053, t01=0x003e}
0x81f0…8210 Head {h00=0x001c, h01=0x0050, text=» LDK A5,0 TTAB AND CDTAB«, t00=0x0053, t01=0x005c}
0x8210…8238 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTTAB,A11 USER TTAB ADDR«, t00=0x0053, t01=0x007c}
0x8238…824e Head {h00=0x0012, h01=0x0050, text=» CF A14,FNDFDB«, t00=0x0053, t01=0x00a4}
0x824e…8268 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A2 RET CD «, t00=0x0053, t01=0x00ba}
0x8268…8286 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPEE25 NO ENTRY«, t00=0x0053, t01=0x00d4}
0x8286…82b0 Head {h00=0x0026, h01=0x0050, text=» LDKL A7,FDBSTA SYSTEM FDB ADDRESS«, t00=0x0053, t01=0x00f2}
0x82b0…82d4 Head {h00=0x0020, h01=0x0050, text=» ST A7,2,A4 SYSTEM FWT ADDR «, t00=0x0053, t01=0x011c}
0x82d4…82e8 Head {h00=0x0010, h01=0x0050, text=»OPEE25 EQU *«, t00=0x0053, t01=0x0140}
0x82e8…82f6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0053, t01=0x0154}
0x82f6…8300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0162}
0x8300…8322 Head {h00=0x001e, h01=0x0050, text=»* RELEASE EA+CRN BUFFERS«, t00=0x0053, t01=0x016c}
0x8322…832c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x018e}
0x832c…833e Head {h00=0x000e, h01=0x0050, text=» LDR A7,A9«, t00=0x0054, t01=0x0008}
0x833e…8356 Head {h00=0x0014, h01=0x0050, text=» SLL A7,1 WORDS «, t00=0x0054, t01=0x001a}
0x8356…837c Head {h00=0x0022, h01=0x0050, text=» LDR A13,A11 SAVE FDB ADDRESS «, t00=0x0054, t01=0x0032}
0x837c…839e Head {h00=0x001e, h01=0x0050, text=» LD A11,OPEFWT,A7 FDB ADDR«, t00=0x0054, t01=0x0058}
0x839e…83ba Head {h00=0x0018, h01=0x0050, text=» RF(Z) CLODEL NO FDB«, t00=0x0054, t01=0x007a}
0x83ba…83d0 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C000«, t00=0x0054, t01=0x0096}
0x83d0…83e2 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0054, t01=0x00ac}
0x83e2…840c Head {h00=0x0026, h01=0x0050, text=» CF A14,EARELB REL PROTECT BUFFERS«, t00=0x0054, t01=0x00be}
0x840c…8418 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0054, t01=0x00e8}
0x8418…8432 Head {h00=0x0016, h01=0x0050, text=» LC A5,FWTPAR,A11 «, t00=0x0054, t01=0x00f4}
0x8432…8452 Head {h00=0x001c, h01=0x0050, text=» ANK A5,/3F NR OF USERS «, t00=0x0054, t01=0x010e}
0x8452…8464 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0054, t01=0x012e}
0x8464…848e Head {h00=0x0026, h01=0x0050, text=» RF(NZ) CLODEL MORE THAN ONE OPEN «, t00=0x0054, t01=0x0140}
0x848e…84b0 Head {h00=0x001e, h01=0x0050, text=» LD A5,FDBEAL,A11 PRO LINK«, t00=0x0054, t01=0x016a}
0x84b0…84ce Head {h00=0x001a, h01=0x0050, text=» ABL(NZ) TASHLT DM ERR«, t00=0x0054, t01=0x018c}
0x84ce…84dc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0055, t01=0x001a}
0x84dc…84e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0028}
0x84e6…850a Head {h00=0x0020, h01=0x0050, text=»* RELEASE CURRENCY BUFFERS«, t00=0x0055, t01=0x0032}
0x850a…8514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0056}
0x8514…852c Head {h00=0x0014, h01=0x0050, text=» LDKL A5,FDBCRL «, t00=0x0055, t01=0x0060}
0x852c…854a Head {h00=0x001a, h01=0x0050, text=» ADR A5,A11 LINK ROOT «, t00=0x0055, t01=0x0078}
0x854a…855e Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A5 «, t00=0x0055, t01=0x0096}
0x855e…8578 Head {h00=0x0016, h01=0x0050, text=» CMR A5 CLEAR FDB «, t00=0x0055, t01=0x00aa}
0x8578…858a Head {h00=0x000e, h01=0x0050, text=» RF RCRN20«, t00=0x0055, t01=0x00c4}
0x858a…859e Head {h00=0x0010, h01=0x0050, text=»RCRN10 EQU *«, t00=0x0055, t01=0x00d6}
0x859e…85c0 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A5 BUFFER ADDRESS «, t00=0x0055, t01=0x00ea}
0x85c0…85d4 Head {h00=0x0010, h01=0x0050, text=»RCRN20 EQU *«, t00=0x0055, t01=0x010c}
0x85d4…85fe Head {h00=0x0026, h01=0x0050, text=» RF(Z) RMIX10 ALL BUFFER S REMOVED«, t00=0x0055, t01=0x0120}
0x85fe…8626 Head {h00=0x0024, h01=0x0050, text=» LDR* A5,A4 NEXT BUFFER ADDRESS «, t00=0x0055, t01=0x014a}
0x8626…8630 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0172}
0x8630…8652 Head {h00=0x001e, h01=0x0050, text=»* RETURN BUFFER TO POOL «, t00=0x0055, t01=0x017c}
0x8652…865c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x000e}
0x865c…8668 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0056, t01=0x0018}
0x8668…867e Head {h00=0x0012, h01=0x0050, text=» LD A3,CRNQUE «, t00=0x0056, t01=0x0024}
0x867e…8690 Head {h00=0x000e, h01=0x0050, text=» STR A3,A4«, t00=0x0056, t01=0x003a}
0x8690…86a6 Head {h00=0x0012, h01=0x0050, text=» ST A4,CRNQUE «, t00=0x0056, t01=0x004c}
0x86a6…86b2 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0056, t01=0x0062}
0x86b2…86c4 Head {h00=0x000e, h01=0x0050, text=» RB RCRN10«, t00=0x0056, t01=0x006e}
0x86c4…86d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x0080}
0x86d2…86e6 Head {h00=0x0010, h01=0x0050, text=»RMIX10 EQU *«, t00=0x0056, t01=0x008e}
0x86e6…86fc Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0056, t01=0x00a2}
0x86fc…8706 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00b8}
0x8706…8726 Head {h00=0x001c, h01=0x0050, text=»* RELEASE MASTER INDEX«, t00=0x0056, t01=0x00c2}
0x8726…8730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00e2}
0x8730…875a Head {h00=0x0026, h01=0x0050, text=» LD A1,OPEMXI,A7 MASTER INDEX ADDR«, t00=0x0056, t01=0x00ec}
0x875a…8776 Head {h00=0x0018, h01=0x0050, text=» RF(Z) CLODEL NO MX «, t00=0x0056, t01=0x0116}
0x8776…8790 Head {h00=0x0016, h01=0x0050, text=» LD A5,MXIND LENTH«, t00=0x0056, t01=0x0132}
0x8790…87a2 Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0056, t01=0x014c}
0x87a2…87b6 Head {h00=0x0010, h01=0x0050, text=»RMIX20 EQU *«, t00=0x0056, t01=0x015e}
0x87b6…87c8 Head {h00=0x000e, h01=0x0050, text=» SUK A5,4 «, t00=0x0056, t01=0x0172}
0x87c8…87ea Head {h00=0x001e, h01=0x0050, text=» RF(Z) RMIX30 FIRST INDEX «, t00=0x0056, t01=0x0184}
0x87ea…8810 Head {h00=0x0022, h01=0x0050, text=» RF(N) CLODEL NO MASTER INDEX «, t00=0x0057, t01=0x0016}
0x8810…882a Head {h00=0x0016, h01=0x0050, text=» CW A1,MXIND+2,A5 «, t00=0x0057, t01=0x003c}
0x882a…8840 Head {h00=0x0012, h01=0x0050, text=» RB(NE) RMIX20«, t00=0x0057, t01=0x0056}
0x8840…8858 Head {h00=0x0014, h01=0x0050, text=» LD A4,MXIND,A5 «, t00=0x0057, t01=0x006c}
0x8858…8882 Head {h00=0x0026, h01=0x0050, text=» RF(N) RMIX30 PREVIOUS ENTRY USED «, t00=0x0057, t01=0x0084}
0x8882…88a8 Head {h00=0x0022, h01=0x0050, text=» LD A4,MXIND+4,A5 NO OF WORDS «, t00=0x0057, t01=0x00ae}
0x88a8…88cc Head {h00=0x0020, h01=0x0050, text=» ANKL A4,/7FFF REMOV USE BIT«, t00=0x0057, t01=0x00d4}
0x88cc…88f0 Head {h00=0x0020, h01=0x0050, text=» ADS A4,MXIND,A5 NR OF WORDS«, t00=0x0057, t01=0x00f8}
0x88f0…88fe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x011c}
0x88fe…8908 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x012a}
0x8908…892a Head {h00=0x001e, h01=0x0050, text=»* MOVE UP REST OF MXIND «, t00=0x0057, t01=0x0134}
0x892a…8934 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0156}
0x8934…894c Head {h00=0x0014, h01=0x0050, text=» LDKL A1,MXIND+6«, t00=0x0057, t01=0x0160}
0x894c…8968 Head {h00=0x0018, h01=0x0050, text=» ADR A1,A5 FROM ADDR«, t00=0x0057, t01=0x0178}
0x8968…897a (88, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0058, t01=0x0004}
0x897a…8994 Head {h00=0x0016, h01=0x0050, text=» SUK A2,4 TO ADDR «, t00=0x0058, t01=0x0016}
0x8994…89a8 Head {h00=0x0010, h01=0x0050, text=» LD A3,MXIND«, t00=0x0058, t01=0x0030}
0x89a8…89ba Head {h00=0x000e, h01=0x0050, text=» SUR A3,A5«, t00=0x0058, t01=0x0044}
0x89ba…89d6 Head {h00=0x0018, h01=0x0050, text=» SUK A3,2 NO OF CHAR«, t00=0x0058, t01=0x0056}
0x89d6…89f0 Head {h00=0x0016, h01=0x0050, text=» CF A14,MOVFW MOVE«, t00=0x0058, t01=0x0072}
0x89f0…8a02 Head {h00=0x000e, h01=0x0050, text=» RF CLODEL«, t00=0x0058, t01=0x008c}
0x8a02…8a16 Head {h00=0x0010, h01=0x0050, text=»RMIX30 EQU *«, t00=0x0058, t01=0x009e}
0x8a16…8a2c Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/7FFF«, t00=0x0058, t01=0x00b2}
0x8a2c…8a56 Head {h00=0x0026, h01=0x0050, text=» ANS A4,MXIND+4,A5 REMOVE USE BIT «, t00=0x0058, t01=0x00c8}
0x8a56…8a62 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x00f2}
0x8a62…8a70 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x00fe}
0x8a70…8a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x010c}
0x8a7a…8a98 Head {h00=0x001a, h01=0x0050, text=»* CLOSE OR DELETE FILE«, t00=0x0058, t01=0x0116}
0x8a98…8aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0134}
0x8aa2…8ab6 Head {h00=0x0010, h01=0x0050, text=»CLODEL EQU *«, t00=0x0058, t01=0x013e}
0x8ab6…8ac8 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A9«, t00=0x0058, t01=0x0152}
0x8ac8…8ae6 Head {h00=0x001a, h01=0x0050, text=» SLL A7,2 2 WORD INDEX«, t00=0x0058, t01=0x0164}
0x8ae6…8b0a Head {h00=0x0020, h01=0x0050, text=» LD A1,OPELRN,A7 LAST REC NR«, t00=0x0058, t01=0x0182}
0x8b0a…8b24 Head {h00=0x0016, h01=0x0050, text=» ST A1,FPB:FR,A12 «, t00=0x0059, t01=0x0016}
0x8b24…8b3e Head {h00=0x0016, h01=0x0050, text=» LD A1,OPELRN+2,A7«, t00=0x0059, t01=0x0030}
0x8b3e…8b5a Head {h00=0x0018, h01=0x0050, text=» ST A1,FPB:FR+2,A12 «, t00=0x0059, t01=0x004a}
0x8b5a…8b72 Head {h00=0x0014, h01=0x0050, text=» LC A7,OPEFNR,A9«, t00=0x0059, t01=0x0066}
0x8b72…8b86 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0059, t01=0x007e}
0x8b86…8baa Head {h00=0x0020, h01=0x0050, text=» RF(Z) CLDL20 NO FILE OPENED«, t00=0x0059, t01=0x0092}
0x8baa…8bcc Head {h00=0x001e, h01=0x0050, text=» ST A7,ECBFC-1,A8 FILE NR «, t00=0x0059, t01=0x00b6}
0x8bcc…8bf4 Head {h00=0x0024, h01=0x0050, text=» ST A12,ECBBA,A8 PAR BLOCK ADDR «, t00=0x0059, t01=0x00d8}
0x8bf4…8c1e Head {h00=0x0026, h01=0x0050, text=» CF A14,CLRBUF CLEAR FREE BUFFERS «, t00=0x0059, t01=0x0100}
0x8c1e…8c44 Head {h00=0x0022, h01=0x0050, text=» LDR A11,A13 MAIN FDB ADDRESS «, t00=0x0059, t01=0x012a}
0x8c44…8c52 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0059, t01=0x0150}
0x8c52…8c6c Head {h00=0x0016, h01=0x0050, text=» IFT CRDEEX=1 =8 «, t00=0x0059, t01=0x015e}
0x8c6c…8c86 Head {h00=0x0016, h01=0x0050, text=» LC A7,DWTOPT,A11 «, t00=0x0059, t01=0x0178}
0x8c86…8ca6 (90, 0, 400) Head {h00=0x001c, h01=0x0050, text=» ANK A7,/4F TEST MASK =5«, t00=0x005a, t01=0x0004}
0x8ca6…8cbc Head {h00=0x0012, h01=0x0050, text=» SUK A7,2 =5 «, t00=0x005a, t01=0x0024}
0x8cbc…8d00 Head {h00=0x0040, h01=0x0050, text=» RF(Z) DELETE CLOSE DISCARD,OPEN OUT SEQ OR OPEN OUT RAN =5 «, t00=0x005a, t01=0x003a}
0x8d00…8d12 Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x005a, t01=0x007e}
0x8d12…8d2e Head {h00=0x0018, h01=0x0050, text=» CF A14,FMIOCL CLOSE«, t00=0x005a, t01=0x0090}
0x8d2e…8d48 Head {h00=0x0016, h01=0x0050, text=» IFT CRDEEX=1 =8 «, t00=0x005a, t01=0x00ac}
0x8d48…8d5a Head {h00=0x000e, h01=0x0050, text=» RF CLDL10«, t00=0x005a, t01=0x00c6}
0x8d5a…8d6e Head {h00=0x0010, h01=0x0050, text=»DELETE EQU *«, t00=0x005a, t01=0x00d8}
0x8d6e…8d8c Head {h00=0x001a, h01=0x0050, text=» CF A14,FMIODL DELETE «, t00=0x005a, t01=0x00ec}
0x8d8c…8da0 Head {h00=0x0010, h01=0x0050, text=»CLDL10 EQU *«, t00=0x005a, t01=0x010a}
0x8da0…8db2 Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x005a, t01=0x011e}
0x8db2…8ddc Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTECB,A11 USER ECB ADDRESS«, t00=0x005a, t01=0x0130}
0x8ddc…8dfe Head {h00=0x001e, h01=0x0050, text=» ORS A1,ECBRC,A2 SEND CODE«, t00=0x005a, t01=0x015a}
0x8dfe…8e12 Head {h00=0x0010, h01=0x0050, text=»CLDL20 EQU *«, t00=0x005a, t01=0x017c}
0x8e12…8e38 Head {h00=0x0022, h01=0x0050, text=» LDR A11,A13 MAIN FDB ADDRESS «, t00=0x005a, t01=0x0190}
0x8e38…8e56 Head {h00=0x001a, h01=0x0050, text=» ABL OPEE10 NEXT FILE «, t00=0x005b, t01=0x0026}
0x8e56…8e62 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x005b, t01=0x0044}
0x8e62…8e66 Head {h00=0x4004, h01=0x0000}
0x8e66…8e6a 00 5b 00 50 ┆ [ P┆
0x8e6a…8e72 (92, 1, 8) 20 04 00 00 00 5c 00 04 ┆ ┆