|
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: 23800 (0x5cf8)
Notes: pts_type(SC)
Names: »DMTASS.SC«
└─⟦c47f25c27⟧ Bits:30009688 Philips computer tape "600318"
└─⟦this⟧ »M:KMDV/DMTASS.SC«
└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
└─⟦this⟧ »M:167D/DMTASS.SC«
IDENT DMTASS REL 8.2 78-09-15 870105040820 MX REL. L. 176,565 REL 8.1 78-04-21 * **************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DMTASS = ASSIGN FILE CODE DISC I/O HANDLING * * * * * * **************************************************** * * THIS MODULE IS ACTIVATED FROM TASS * * INPUT A2 = TID TASK IDENT OF DMTASK AT PRESENT NOT USED * TASBLK PARAMETER BLOCK * * IN TASVOL IN TASBLK ALL VOLUMES WHERE THE FILE TO BE ASSIGNED CAN * RECIDE ARE DEFINED. ON THESE VOLUMES THE VTOC:S ARE SEARCHED TO FIND * ALL EXTENTS FOR THE FILE TO BE ASSIGNED. FOR EACH EXTENT ITS * FILE-SECTION-NO, FILE-EXTENT-NO,FILE-EXTENT-LENGTH AND * FILE-EXTENT-BASE ARE SAVED IN TASBLK. * FOR THE FIRST EXTENT (I.E. FILE-SECTION-NO =0 AND FILE-EXTENT-NO =0) * THE LAST-RECORD-NO, RECORD-LENGTH, BLOCKING-FACTOR AND VTOC-REC-NO * ARE SAVED TOO. * WHEN THE FIRST EXTENT HAS BEEN FOUND EXISTING FDB:S CAN BE SEARCHED * TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO * ANOTHER FILE CODE. IF SO THE FDB ADDRESS IS PUT INTO THE CD:TAB AND * THE ASSIGNMENT IS COMPLETED. IF NO FDB DESCRIBING THE FILE IS FOUND * THEN A NEW FDB MUST BE INITIALIZED AND THE REST OF THE * VOLUMES ARE CHECKED TO FIND ALL FILE EXTENTS * * FOR INDEX ASIGN THE PRODGRAM IS RUN TWICE. * DURING THE FIRST LOOP A MASTERINDEX IS READ. * FC 13 IN TTAB FOR DMTASK IS THEN USED EJECT * *************** * ENTRIES * *************** * ENTRY DMTASS ENTRY VTLRN ENTRY VLVBA ENTRY VLVRL ENTRY SECTLE EJECT * ***************** * EXTERNALS * ***************** * EXTRN QTJOB EXTRN FNDTID,TTB:TD * EXTRN DWTST EXTRN DWTADR * EXTRN ECBFC EXTRN ECBBA EXTRN ECBRL EXTRN ECBRC EXTRN ECBCW * EXTRN TIODM EXTRN DMTGBU EXTRN DMTRBU EXTRN CLRBUF EXTRN BUFSTA EXTRN BUFSNR EXTRN BUFDMI * EXTRN QFDBFL EXTRN FDBSTA EXTRN FDBEND EXTRN FDBECB EXTRN FDBEXT EXTRN EXTDMI EXTRN EXTLEN EXTRN EXTBAS EXTRN FDBRLE EXTRN FDBBLF EXTRN FDBVTO EXTRN FDBLRN EXTRN FDBNIF,FDBKA EXTRN FDBMIA,FDBAI1,FDBADF,FDBCRL EXTRN FDBSNR,FDBMRN,GTLGRN,EXTELE,FDBCEX EXTRN FDBDBR,FDBMRO EXTRN MXIND,CRNQUE,DMTWM,MPYMOD EXTRN TASASB EXTRN TASCVO EXTRN TASVOL EXTRN TASCXO EXTRN TASSEX EXTRN TASXLB EXTRN TASFDB EXTRN TASVRL EXTRN TASVLE EXTRN TASVRN EXTRN TASECB EXTRN TASFIL,TASTID,TASMXA EXTRN TASSPW,TASFDD,TASTBE EXTRN TASCAQ EXTRN VOLCHE EJECT X:A EQU 0 RECBFZ EQU X:A INDEX RECORD BUFFER SIZE X:B EQU 0 INDXAC EQU 0 INDEX ACCESS FUNCTIONS WHEN = 1 EJECT * ************ * DATA * ************ * * CYLID 1 WORD INCL FOR VOL LABEL VLVLE EQU 8 VLVBA EQU 12 VLVRL EQU 14 VLVER EQU 34 * VTFSNO EQU 8 VTFXNO EQU 10 VTFXLE EQU 14 VTFXBA EQU 18 VTLRN EQU 21 VTRLE EQU 24 VTBLF EQU 26 VTFIOR EQU 27 VTNIF EQU 37 VTKA EQU 38 * * QVTBLE= (VTOC BF)*(RL+1)+2 QVTBLE EQU 380 VTOC BLOCK LENGTH SECTLE EQU 410 SECTOR LENGTH DATA 0,0 4 WORDS DATA 0,0 STACK DMTA14 EQU *-2 EJECT * ************** * DMTIOC * ************** * * ENTRY DMTIOC CHECK RETURN CODES AFTER DISC I/O * RETURN TO DMTASX WITH A7=1 IF ERROR. * DMTIOC EQU * LDKL A8,TASECB LD A3,ECBBA,A8 LD A1,ECBRC,A8 ANKL A1,/FEFF BIT 7 ONLY RETRIES RF(Z) DMTIOX ADKL A14,4 ANK A1,/80 RF(NZ) DMT060 NEW VOLUME LOADED SUKL A3,BUFSTA CM BUFDMI,A3 CLEAR VOL IDENT IN BUFFER LDK A7,1 ABL DMTASX DISC I/O ERROR DMTIOX EQU * RTN A14 EJECT * ************** * DMTASS * ************** * DMTASS EQU * LDKL A14,DMTA14 INITIALIZE DMTASK A14 STACK POINTER ST A2,TASTID TASK IDENT CM TASMXA MASTER INDEX ADDR ANK A2,/2 RF(Z) DMT010 NOT FLEXTASC * * PERFORM VOLUME CHECK WITH LOCK * LD A8,TASASB ASBLK ADDR LCR A2,A8 ANK A2,/07 NO OF VOL LDKL A11,1 LOCK WANTED CF A14,VOLCHE SEE TASS LDR A1,A1 RF(Z) DMT010 OK LDK A7,4 VOL UNKNOWN ABL DMTASX DMT010 EQU * * LDKL A8,TASECB * LD A1,TASCVO OFFSET INTO TASVOL FOR FIRST VOLUME DMT050 EQU * CF A14,CLRBUF RELEASE ALL FREE BUFFERS ENB ENB LD A1,TASVOL,A1 DMI, FC FIRST VOLUME SC A1,ECBFC,A8 LDKL A2,SECTLE ST A2,ECBRL,A8 SECTOR LENGTH LDK A2,0 ST A2,ECBCW,A8 SECTOR #0 VL (VOLUME LABEL) * * CF A14,DMTGBU GET A DM BUFFER ADDRESS IN A3 DATA /5700 NOP. READ ALWAYS ADKL A3,BUFSTA ST A3,ECBBA,A8 DATA BUFFER START * * PHYS READ 1 SECT FROM DISC * DMT060 EQU * LDK A7,/11 LKM DATA -1 DATA DMTAR3 RESTART ADDRESS AFTER I/O LKM DATA 3 EXIT EJECT DMTAR3 EQU * RESTART AFTER VOLUME LABEL IS READ LDKL A14,DMTA14 SET UP A14 STACK POINTER CF A14,DMTIOC I/O CHECK LD A2,VLVER,A3 VERSION CWK A2,'TO' DTOSS FORMATED DISC? RF(E) DMT100 YES LDK A7,8 NO ABL DMTASX ERROR RETURN * DMT100 EQU * CM TASVRN LD A6,VLVLE,A3 VTOC LENGTH ST A6,TASVLE LD A2,VLVBA,A3 VTOC BASE ST A2,ECBCW,A8 1:ST VTOC SECTOR NO = FSAT LD A9,VLVRL,A3 VTOC RECORD LENGTH ST A9,TASVRL EJECT * * SEARCH ALL VTOC:S * DMT110 EQU * LD A6,TASVLE SUK A6,1 ST A6,TASVLE UPDATE TASVLE RF(P) DMT115 MORE VTOC SECTORS EJECT * * ALL VTOC SECTORS ARE READ * LD A1,TASCVO SUK A1,2 ABL(N) DMT300 ALL VOLUMES CHECKED ST A1,TASCVO UPDATE TASCVO LDK A7,7 TOO MANY FILE SECTIONS LD A3,TASFIL ABL(NZ) DMTASX NOT DATA FILE LD A3,ECBBA,A8 SUKL A3,BUFSTA CF A14,DMTRBU RELEASE BUFFER LC A7,TASVOL,A1 CC A7,TASVOL+2,A1 RB(E) DMT050 SAME DM TASK * * ACTIVATE NEXT DM TASK * ADKL A7,'D0' LKM DATA -4 DATA DMTASS LKM DATA 3 EXIT EJECT * * READ NEXT VTOC SECTOR AND EXIT * DMT115 EQU * LD A3,ECBBA,A8 SUKL A3,BUFSTA CF A14,DMTRBU LD A2,ECBCW,A8 ADK A2,1 NEXT VTOC SECTOR LD A1,TASCVO LD A1,TASVOL,A1 CF A14,DMTGBU GET BUFFER DATA /5700 NOP. READ ALWAYS ADKL A3,BUFSTA ST A3,ECBBA,A8 ST A2,ECBCW,A8 LDK A7,/11 LKM DATA -1 DATA DMTAR4 RESTART ADDRESS LKM DATA 3 EXIT EJECT DMTAR4 EQU * LDKL A14,DMTA14 CF A14,DMTIOC LD A9,TASVRL LD A11,TASASB ADKL A11,2 POINTER TO FILENAME IN ASBLK LDK A4,2 CW A4,TASFIL RF(NE) DMT135 NOT MASTER INDEX ADKL A11,14 MX FILE NAME ADDR DMT135 EQU * ADK A3,2 SKIP CYLID DMT120 EQU * IM TASVRN INCREMENT VTOC RECORD NO LDR A4,A3 ADR A4,A9 ADDRESS STATUS BYTE LCR A2,A4 ANK A2,/FF ABL(Z) DMT250 NOT USED SUR A4,A9 BACK TO START OF VTOC REC LDR A7,A11 LDK A2,4 FILE NAME MAX 4 WORDS DMT150 EQU * LDR* A10,A4 CWR* A10,A7 ABL(NE) DMT250 NO MATCH SUK A2,1 RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH ADK A4,2 ADK A7,2 RB DMT150 CHECK NEXT WORD * * ONLY STANDARD FILES ARE HANDLED * DMT160 EQU * LC A2,VTFIOR,A3 CCK A2,'SS' STANDARD FILE ? RF(E) DMT165 YES CCK A2,'LL' LIBRARY FILE ? ABL(NZ) DMT250 NO LDK A2,0 FILE EXTENT NUMBER RF DMT167 DMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER EJECT DMT167 EQU * * * GET INFO FROM VTOC AND SAVE IN TASBLK * LDR A4,A3 START OF VTOC RECORD LD A1,TASCXO CURRENT OFFSET INTO TASSEX AND TASXLB SUK A1,4 ST A1,TASCXO RF(NN) DMT170 <= 4 EXTENTS LDK A7,9 ABL DMTASX MORE THAN 4 EXTENTS EXIST DMT170 EQU * ECR A2,A2 TO LEFT HALF OF A2 LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 ST A2,TASSEX,A1 LD A6,TASCVO ST A6,TASSEX+2,A1 REMEMBER WHICH VOLUME LD A2,VTFXLE,A4 EXTENT-LENGTH ST A2,TASXLB,A1 LD A2,VTFXBA,A4 EXTENT BASE ST A2,TASXLB+2,A1 LD A2,TASSEX,A1 RF(NZ) DMT250 NOT FIRST EXTENT EJECT * FIRST FILE EXTENT * CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. * LD A12,TASFDB RF(Z) DMT190 FIRST TIME EXT #0 FOUND LDK A7,7 ABL DMTASX EXT #0 ALREADY FOUND DMT190 EQU * LDKL A12,FDBSTA DMT200 EQU * LDR* A5,A12 ANK A5,/01 RF(Z) DMT210 FREE LD A2,FDBEXT,A12 CW A2,TASVOL,A6 RF(NE) DMT210 NOT SAME VOLUME LD A2,FDBVTO,A12 CW A2,TASVRN RF(NE) DMT210 NOT SAME VTOC REC LD A2,FDBMIA,A12 RF(NZ) DMT205 INDEX ASS BEFOR LD A2,TASFIL ABL(E) DMT400 SAME VTOC RECORD FDB FOUND DMT205 EQU * LDK A7,5 FILE CODE USED ABL DMTASX * DMT210 LDR* A12,A12 GET NEXT FDB ANKL A12,/FFFE RB(NE) DMT200 MORE FDB:S TO SEARCH * * NO MATCHING FDB EXIST FIND A FREE FDB * LDKL A12,FDBSTA DMT220 LDR* A5,A12 ANK A5,/01 RF(Z) DMT230 FREE LDR* A12,A12 GET NEXT FDB ANKL A12,/FFFE RB(NE) DMT220 MORE FDB:S TO CHECK LDK A7,3 ABL DMTASX NO FDB AVAILABLE * INITIALIZE FDB ZERO FROM FDB+2 * DMT230 EQU * ST A12,TASFDB LDR A10,A12 ADKL A10,QFDBFL LDK A2,0 LDR A1,A12 DMT233 ADK A1,2 CWR A1,A10 RF(E) DMT237 END OF FDB STR A2,A1 RB DMT233 DMT237 EQU * LDKL A2,/8000 * DEV NOT BUSY ST A2,DWTST,A12 LDKL A2,TIODM ST A2,DWTADR,A12 LDKL A2,SECTLE LDR A1,A12 ADKL A1,FDBECB ST A2,ECBRL,A1 LDK A2,/01 ORRS A2,A12 SET USE BIT LC A2,VTLRN,A4 SC A2,FDBLRN,A12 LD A2,VTLRN+1,A4 ST A2,FDBLRN+1,A12 LD A2,VTRLE,A4 ST A2,FDBRLE,A12 LC A2,VTBLF,A4 SC A2,FDBBLF,A12 LC A2,VTNIF,A4 SC A2,FDBNIF,A12 LD A2,VTKA,A4 ST A2,FDBKA,A12 LD A2,TASVRN ST A2,FDBVTO,A12 EJECT * * CHECK NEXT VTOC RECORD * DMT250 EQU * * A3 = ADR 1ST REC * A9 = VTOC REC LGTH ADR A3,A9 ADK A3,1 SKIP STATUS BYTE LDR A2,A3 SU A2,ECBBA,A8 CWK A2,QVTBLE ABL(L) DMT120 MORE RECORDS IN BUFFER ABL DMT110 GET NEXT VTOC SECTOR * * ALL VTOCS IN ALL VOLUMES ARE SEARCHED AT THIS POINT * DMT300 EQU * LDK A3,16 SU A3,TASCXO RF(NZ) DMT310 LDK A7,6 RF DMTASX FILE NAME UNKNOWN DMT310 EQU * LD A12,TASFDB RF(NZ) DMT320 LDK A7,7 RF DMTASX FIRST EXTENT IS MISSING EJECT * * PUT EXTENT INFORMATION INTO FDB IN ASCENDING ORDER * ACCORDING TO INCREASING SECTOR NO AND EXTENT NO * DMT320 EQU * * * CHECK IF RECORD BUFFERS ARE LARGE ENOUGH FOR INDEX FILE * LD A6,TASFIL RF(Z) DMT330 DATA FILE ASS LD A6,FDBRLE,A12 RECORD LENGTH ADK A6,2 SRL A6,1 NR OF WORDS CWK A6,RECBFZ RECORD BUFFER SIZE RF(NG) DMT330 OK LDK A7,12 RF DMTASX RECORD BUFFER IS TOO SMALL DMT330 EQU * LDR A6,A12 * FDB ADDR ADKL A6,FDBEXT LDK A2,0 LDR A5,A3 SRL A5,2 NUMBER OF EXTENTS DMT340 EQU * LDK A4,16 DMT350 EQU * SUK A4,4 CW A2,TASSEX,A4 RF(E) DMT360 MATCH CW A4,TASCXO RB(NE) DMT350 MORE EXTENTS TO CHECK * * THE EXTENT SEARCHED FOR IS NOT FOUND * CHECK IF RIGHT HALF OF A2 = 0 (EXT-NO = 0) * LDR A1,A2 ANK A1,/FF RF(NZ) DMT370 TRY NEXT SECTION * DMT355 EQU * LDK A7,7 RF DMTASX FILE SECTION MISSING DMT360 EQU * * * MOVE INFO ABOUT THIS EXTENT TO FDB * LD A1,TASSEX+2,A4 LD A1,TASVOL,A1 ST A1,EXTDMI,A6 LD A1,TASXLB,A4 ST A1,EXTLEN,A6 LD A1,TASXLB+2,A4 ST A1,EXTBAS,A6 ADK A6,6 SUK A5,1 RF(NP) DMT500 ALL EXTENTS HANDLED * * FIND NEXT FILE-SECTION-NO, FILE-EXT-NO COMBINATION * TO SEARCH FOR * LDR A1,A2 ANK A1,/FF SUK A1,3 RF(NE) DMT380 NOT EXT-NO = 3 DMT370 EQU * ECR A1,A2 ANK A1,/FF SUK A1,3 RB(E) DMT355 SECTION-NO = 3 ADK A1,4 INCREMENT SECTION-NO ECR A2,A1 EXT-NO = 0 RB DMT340 DMT380 ADK A2,1 INCREMENT EXT-NO RB DMT340 EJECT * * PUT FDB ADDRESS INTO TTAB/CD:TAB * DMT400 EQU * LDK A7,0 DMTASX EQU * LD A2,TASTBE TTAB/CDTAB FILE CODE ADDR LDR A7,A7 RF(Z) DMT420 CORRECT RETURN CM -1,A2 ZERO FILE CODE * * REMOVE FDB WITH MASTER INDEX * LD A4,TASMXA MASTER INDEX ADDR RF(Z) DMT410 NO MASTER INDEX INH INH LD A2,MXIND SIEZE MASTERINDEXINDEX SUK A2,2 DMT405 EQU * SUK A2,4 NEXT OFFSET RF(NN) DMT407 OK RF DMT408 MASTER INDEX MUST BE FOUND DMT407 CW A4,MXIND+2,A2 RB(NE) DMT405 NEXT ENTRY LDKL A4,/7FFF ANS A4,MXIND+4,A2 SET ENTRY FREE DMT408 ENB ENB DMT410 EQU * LD A3,TASFDB RF(Z) DMT430 NO FDB USED LDKL A2,/FFFE ANRS A2,A3 CLEAR FDB USE BIT RF DMT430 DMT420 EQU * ST A12,1,A2 FDB ADDR DMT430 EQU * LDR A8,A8 RF(Z) DMT440 NO BUFFER LD A3,ECBBA,A8 SUKL A3,BUFSTA CF A14,DMTRBU RELEASE BUFFER DMT440 EQU * CF A14,CLRBUF RELEASE ALL FREE BUFFERS CF A14,TASCAQ CHECK ASSIGN QUEUE CF A15,QTJOB QUEUE CALLING TASK ENB LKM DATA 3 EJECT DMT500 EQU * LD A6,TASFIL ABL(Z) DMT700 DATA FILE IFF INDXAC=1 LDKL A7,-1 REQ ERR RB DMTASX XIF IFT INDXAC=1 SUK A6,1 ABL(Z) DMT600 INDEX FILE EJECT * * THIS IS MASTER INDEX LOOP. * CONNECT FDB TO FILE CODE IN DMTASK TTAB AND READ * MASTER INDEX WITH SEQUENTIAL READ ON THIS FILE CODE * LD A7,TASTID DMTASK ID INH CF A15,FNDTID TTAB ADDR TO A2 ENB ST A2,TASSPW LDKL A3,/0100 INDEX DATA FILE LD A1,TASASB LC A3,1,A1 FILE CODE SC A3,TASECB+1 ST A3,TTB:TD+2,A2 TTAB ENTRY ST A12,TTB:TD+4,A2 FDB ADR LD A3,ECBBA,A8 SUKL A3,BUFSTA CF A14,DMTRBU RELEASE BUFFER * * CALC NO OF WORDS NEEDED IN MASTRE INDEX * LD A6,FDBRLE,A12 REC LGTH LD A7,FDBLRN+1,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) DMT570 WRONG SIZE INH LD A4,MXIND LENGTH MXIND SUK A4,4 MAX A5 VALUE LDKL A5,-2 OFFSET DMT540 EQU * ADK A5,4 GET ENTRY CWR A5,A4 RF(G) DMT570 NO ENTRY FOUND LD A3,MXIND,A5 RB(Z) DMT540 ZERO ENTRY LD A6,MXIND+2,A5 RB(N) DMT540 ENTRY USED SUR A6,A2 NO OF SPARE WORDS RB(N) DMT540 LARGER ENTRY NEEDED * * SUFFICIENT SPACE FOUND * LDKL A1,/8000 USED BIT ORS A1,MXIND+2,A5 MARK ENTRY USED ST A3,TASMXA MASTER INDEX ADDR ST A3,FDBMIA,A12 LD A7,FDBLRN+1,A12 STR A7,A3 NO OF ENTRIES LD A1,FDBRLE,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) DMT590 LAST ENTRY LD A3,MXIND+6,A1 RF(N) DMT590 NEXT ENTRY USED * * MOVE SPARE WORDS TO NEXT ENTRY * LD A2,MXIND+2,A1 ANKL A2,/7FFF REMOVE USE BIT SUR A2,A6 ORKL A2,/8000 USE BIT ST A2,MXIND+2,A1 ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER LD A7,MXIND,A1 PREVIOUS POINTER SLL A2,1 NO OF BYTES ADR A7,A2 ST A7,MXIND+4,A1 EJECT DMT590 EQU * ENB * * NOW READ MASTER INDEX WITH SEQUENTIAL READ * A8 = TASECB * OTHER REQ TO THE SAME FILE CODE ARE NOT POSSIBLE * BECAUSE AN INDEX FILE MUST ALWAYS BE ASSIGNED COMMON * DMT550 EQU * LDK A7,/42 SEQ READ,NOWAIT,NO EA LKM DATA -1 DATA DMTAR5 LKM DATA 3 EXIT DMTAR5 EQU * LDKL A14,DMTA14 RESTORE STACK LDKL A8,TASECB ECB ADDR LD A2,ECBRC,A8 ANKL A2,/FEFF BIT 7 ONLY RETRIES RF(Z) DMT560 NO ERROR * * REMOVE THE ONLY CRN BUFFER * LD A4,TASFDB FDB ADDR LD A5,FDBCRL,A4 CRN BUF ADR RF(Z) DMT553 NO CRN CM FDBCRL,A4 INH LD A6,CRNQUE STR A6,A5 ST A5,CRNQUE ENB DMT553 EQU * ANKL A2,/1000 BIT 3 = EOF RF(NZ) DMT595 READY ,WHOLIE MXINDEX IS READ LDK A7,7 DMT555 SUR A8,A8 NO BUFFER ABL DMTASX DISC IO ERR DMT560 EQU * * * RECORD READ,READ NEXRT * LD A2,ECBRL,A8 ADS A2,ECBBA,A8 REC LENGTH RB DMT550 READ NEXT RECORD DMT570 EQU * ENB LDK A7,3 NOT SUFF SPACE RB DMT555 EJECT DMT595 EQU * * * MASTER INDE X READUY. RERUN FOR INDEX FILE * LDK A1,1 ST A1,TASFIL INDEX FILE LD A3,TASSPW TTAB ADR DMTASK CM TTB:TD+2,A3 DELETE ENTRY CM TTB:TD+4,A3 LD A3,TASFDB FDB ADDR LDKL A2,/FFFE ANRS A2,A3 CLEAR FDB USE BIT CM TASFDB EXT 0 NOT FOUND FOR INDEX LDK A1,16 ST A1,TASCXO LAST ENTRY POSSIBLE LDK A1,0 * TASCVO REMAINS ZERO FROM MASTER INDEX LOOP ABL DMT050 ASSIGN INDEX EJECT DMT600 EQU * * * INDEX FILE ASSIGN * LDK A7,10 RET CODE LD A10,TASFDD FDB ADDR DATA FILEP RF(Z) DMT650 NO DATA FILE * * STORE INDEX ADDR IN FDB DATA FILE * INH INH LC A3,DWTST,A10 ANK A3,/40 RF(NZ) DMT639 OTHER REQUEST BUSY LDK A3,8 MAX NO OF INDE*2 DMT620 EQU * SUK A3,2 RF(N) DMT640 MORE THAN 4 INDEX LDR A6,A10 ADR A6,A3 LD A2,FDBAI1,A6 RB(NZ) DMT620 USED ST A12,FDBAI1,A6 STORE FDB ADDR INDEX * * MOVE FDB ADDRESSES FROM DATA FILE TO ALL INDEX FILES * LDK A5,8 NR OF INDEX *2 DMT625 EQU * SUK A5,2 RF(N) DMT635 ALL FDB UPPDATED LDR A1,A10 FDB DATA ADR A1,A5 LD A3,FDBAI1,A1 FDB ADDR INDEX RB(Z) DMT625 NO INDEX FILE LDKL A1,FDBADF ADR A3,A1 TO ADDR ADR A1,A10 FROM ADDR LDK A2,10 NO OF BYTES CF A14,DMTWM MOVE 5 WORDS RB DMT625 DMT635 EQU * LC A1,DWTST,A10 SC A1,DWTST,A12 SAME BUSY BITS AS DATA FILE ENB ENB LD A1,TASMXA ST A1,FDBMIA,A12 MASTER INDEX ADDR RF DMT720 DMT639 ADK A7,2 A7=13=OTHER REQ BUSY DMT640 ADK A7,1 A7=11=4 INDEX ALREADY DMT650 EQU * A7=10=NO DATA FILE ABL DMTASX XIF EJECT DMT700 EQU * ASSIGN DATA FILE ST A12,FDBADF,A12 FDB ADDR TO FDB LD* A1,TASASB ASBLK ADDR ANKL A1,/6000 SLL A1,1 ORS A1,FDBDBR,A12 DELAY + BASIC DMT720 EQU * * * SET FDBMRN TO MAX REC NO IN FILE * LDR A1,A12 ADKL A1,FDBNIF ADKL A1,EXTELE-2 DMT750 SUKL A1,EXTELE LDR* A2,A1 EXT BASE RB(Z) DMT750 AD A2,-2,A1 SUKL A1,EXTELE-2 ST A1,FDBCEX,A12 SUK A2,1 ST A2,FDBSNR,A12 LDR A1,A12 CF A14,GTLGRN GET LOG REC NO LDK A1,0 LC A1,FDBBLF,A12 BLOCK FACTOR SUK A1,1 ADR A3,A1 RF(O) DMT760 RF DMT770 DMT760 ANKL A3,/7FFF ADK A2,1 CARRY DMT770 SC A2,FDBMRN,A12 ST A3,FDBMRN+1,A12 * * CALCULATE FDBMRO WHICH IS MAX FDBRRO IN FILE * LD A6,FDBRLE,A12 REC LENGTH ADK A6,1 LDK A7,0 LC A7,FDBBLF,A12 BLOCK FACT SUK A7,1 CF A14,MPYMOD A1,A2=A6*A7 ST A2,FDBMRO,A12 MAX FDBRRO ABL DMT400 END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DMTASS REL 8.2 78-09-15 870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005c Head {h00=0x001a, h01=0x0050, text=» MX REL. L. 176,565 «, t00=0x0000, t01=0x0042}
0x005c…0078 Head {h00=0x0018, h01=0x0050, text=» REL 8.1 78-04-21 «, t00=0x0000, t01=0x0060}
0x0078…0082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007c}
0x0082…00be Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x0086}
0x00be…00c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c2}
0x00c8…00f0 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0000, t01=0x00cc}
0x00f0…00fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f4}
0x00fa…0132 Head {h00=0x0034, h01=0x0050, text=»* DMTASS = ASSIGN FILE CODE DISC I/O HANDLING «, t00=0x0000, t01=0x00fe}
0x0132…013c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0136}
0x013c…0146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0140}
0x0146…0150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014a}
0x0150…015a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0154}
0x015a…0164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015e}
0x0164…016e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0168}
0x016e…01aa Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x0172}
0x01aa…01b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x001e}
0x01b4…01e2 Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE IS ACTIVATED FROM TASS«, t00=0x0001, t01=0x0028}
0x01e2…01ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0056}
0x01ec…0232 Head {h00=0x0042, h01=0x0050, text=»* INPUT A2 = TID TASK IDENT OF DMTASK AT PRESENT NOT USED «, t00=0x0001, t01=0x0060}
0x0232…025e Head {h00=0x0028, h01=0x0050, text=»* TASBLK PARAMETER BLOCK «, t00=0x0001, t01=0x00a6}
0x025e…0268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d2}
0x0268…02b6 Head {h00=0x004a, h01=0x0050, text=»* IN TASVOL IN TASBLK ALL VOLUMES WHERE THE FILE TO BE ASSIGNED CAN «, t00=0x0001, t01=0x00dc}
0x02b6…0306 Head {h00=0x004c, h01=0x0050, text=»* RECIDE ARE DEFINED. ON THESE VOLUMES THE VTOC:S ARE SEARCHED TO FIND«, t00=0x0001, t01=0x012a}
0x0306…034e Head {h00=0x0044, h01=0x0050, text=»* ALL EXTENTS FOR THE FILE TO BE ASSIGNED. FOR EACH EXTENT ITS«, t00=0x0001, t01=0x017a}
0x034e…0390 Head {h00=0x003e, h01=0x0050, text=»* FILE-SECTION-NO, FILE-EXTENT-NO,FILE-EXTENT-LENGTH AND«, t00=0x0002, t01=0x0032}
0x0390…03c2 Head {h00=0x002e, h01=0x0050, text=»* FILE-EXTENT-BASE ARE SAVED IN TASBLK. «, t00=0x0002, t01=0x0074}
0x03c2…0412 Head {h00=0x004c, h01=0x0050, text=»* FOR THE FIRST EXTENT (I.E. FILE-SECTION-NO =0 AND FILE-EXTENT-NO =0)«, t00=0x0002, t01=0x00a6}
0x0412…0460 Head {h00=0x004a, h01=0x0050, text=»* THE LAST-RECORD-NO, RECORD-LENGTH, BLOCKING-FACTOR AND VTOC-REC-NO«, t00=0x0002, t01=0x00f6}
0x0460…047a Head {h00=0x0016, h01=0x0050, text=»* ARE SAVED TOO.«, t00=0x0002, t01=0x0144}
0x047a…04ca Head {h00=0x004c, h01=0x0050, text=»* WHEN THE FIRST EXTENT HAS BEEN FOUND EXISTING FDB:S CAN BE SEARCHED «, t00=0x0002, t01=0x015e}
0x04ca…051a Head {h00=0x004c, h01=0x0050, text=»* TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO «, t00=0x0003, t01=0x001e}
0x051a…056a Head {h00=0x004c, h01=0x0050, text=»* ANOTHER FILE CODE. IF SO THE FDB ADDRESS IS PUT INTO THE CD:TAB AND «, t00=0x0003, t01=0x006e}
0x056a…05ba Head {h00=0x004c, h01=0x0050, text=»* THE ASSIGNMENT IS COMPLETED. IF NO FDB DESCRIBING THE FILE IS FOUND «, t00=0x0003, t01=0x00be}
0x05ba…05fc Head {h00=0x003e, h01=0x0050, text=»* THEN A NEW FDB MUST BE INITIALIZED AND THE REST OF THE«, t00=0x0003, t01=0x010e}
0x05fc…0634 Head {h00=0x0034, h01=0x0050, text=»* VOLUMES ARE CHECKED TO FIND ALL FILE EXTENTS«, t00=0x0003, t01=0x0150}
0x0634…063e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0188}
0x063e…0674 (4, 0, 400) Head {h00=0x0032, h01=0x0050, text=»* FOR INDEX ASIGN THE PRODGRAM IS RUN TWICE.«, t00=0x0004, t01=0x0004}
0x0674…06ac Head {h00=0x0034, h01=0x0050, text=»* DURING THE FIRST LOOP A MASTERINDEX IS READ.«, t00=0x0004, t01=0x003a}
0x06ac…06de Head {h00=0x002e, h01=0x0050, text=»* FC 13 IN TTAB FOR DMTASK IS THEN USED «, t00=0x0004, t01=0x0072}
0x06de…06ec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x00a4}
0x06ec…06f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b2}
0x06f6…070e Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0004, t01=0x00bc}
0x070e…0726 Head {h00=0x0014, h01=0x0050, text=»* ENTRIES * «, t00=0x0004, t01=0x00d4}
0x0726…073e Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0004, t01=0x00ec}
0x073e…0748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0104}
0x0748…075e Head {h00=0x0012, h01=0x0050, text=» ENTRY DMTASS «, t00=0x0004, t01=0x010e}
0x075e…0772 Head {h00=0x0010, h01=0x0050, text=» ENTRY VTLRN«, t00=0x0004, t01=0x0124}
0x0772…0786 Head {h00=0x0010, h01=0x0050, text=» ENTRY VLVBA«, t00=0x0004, t01=0x0138}
0x0786…079a Head {h00=0x0010, h01=0x0050, text=» ENTRY VLVRL«, t00=0x0004, t01=0x014c}
0x079a…07b0 Head {h00=0x0012, h01=0x0050, text=» ENTRY SECTLE «, t00=0x0004, t01=0x0160}
0x07b0…07be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0176}
0x07be…07c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0184}
0x07c8…07e2 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0004, t01=0x018e}
0x07e2…07fc Head {h00=0x0016, h01=0x0050, text=»* EXTERNALS * «, t00=0x0005, t01=0x0018}
0x07fc…0816 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0005, t01=0x0032}
0x0816…0820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004c}
0x0820…0834 Head {h00=0x0010, h01=0x0050, text=» EXTRN QTJOB«, t00=0x0005, t01=0x0056}
0x0834…0850 Head {h00=0x0018, h01=0x0050, text=» EXTRN FNDTID,TTB:TD«, t00=0x0005, t01=0x006a}
0x0850…085a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0086}
0x085a…086e Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTST«, t00=0x0005, t01=0x0090}
0x086e…0884 Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTADR «, t00=0x0005, t01=0x00a4}
0x0884…088e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ba}
0x088e…08a2 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBFC«, t00=0x0005, t01=0x00c4}
0x08a2…08b6 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBBA«, t00=0x0005, t01=0x00d8}
0x08b6…08ca Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRL«, t00=0x0005, t01=0x00ec}
0x08ca…08de Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBRC«, t00=0x0005, t01=0x0100}
0x08de…08f2 Head {h00=0x0010, h01=0x0050, text=» EXTRN ECBCW«, t00=0x0005, t01=0x0114}
0x08f2…08fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0128}
0x08fc…0910 Head {h00=0x0010, h01=0x0050, text=» EXTRN TIODM«, t00=0x0005, t01=0x0132}
0x0910…0926 Head {h00=0x0012, h01=0x0050, text=» EXTRN DMTGBU «, t00=0x0005, t01=0x0146}
0x0926…093c Head {h00=0x0012, h01=0x0050, text=» EXTRN DMTRBU «, t00=0x0005, t01=0x015c}
0x093c…0952 Head {h00=0x0012, h01=0x0050, text=» EXTRN CLRBUF «, t00=0x0005, t01=0x0172}
0x0952…0968 Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFSTA «, t00=0x0005, t01=0x0188}
0x0968…097e Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFSNR «, t00=0x0006, t01=0x000e}
0x097e…0994 Head {h00=0x0012, h01=0x0050, text=» EXTRN BUFDMI «, t00=0x0006, t01=0x0024}
0x0994…099e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003a}
0x099e…09b4 Head {h00=0x0012, h01=0x0050, text=» EXTRN QFDBFL «, t00=0x0006, t01=0x0044}
0x09b4…09ca Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBSTA «, t00=0x0006, t01=0x005a}
0x09ca…09e0 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBEND «, t00=0x0006, t01=0x0070}
0x09e0…09f6 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBECB «, t00=0x0006, t01=0x0086}
0x09f6…0a0c Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBEXT «, t00=0x0006, t01=0x009c}
0x0a0c…0a22 Head {h00=0x0012, h01=0x0050, text=» EXTRN EXTDMI «, t00=0x0006, t01=0x00b2}
0x0a22…0a38 Head {h00=0x0012, h01=0x0050, text=» EXTRN EXTLEN «, t00=0x0006, t01=0x00c8}
0x0a38…0a4e Head {h00=0x0012, h01=0x0050, text=» EXTRN EXTBAS «, t00=0x0006, t01=0x00de}
0x0a4e…0a64 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBRLE «, t00=0x0006, t01=0x00f4}
0x0a64…0a7a Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBBLF «, t00=0x0006, t01=0x010a}
0x0a7a…0a90 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBVTO «, t00=0x0006, t01=0x0120}
0x0a90…0aa6 Head {h00=0x0012, h01=0x0050, text=» EXTRN FDBLRN «, t00=0x0006, t01=0x0136}
0x0aa6…0ac2 Head {h00=0x0018, h01=0x0050, text=» EXTRN FDBNIF,FDBKA «, t00=0x0006, t01=0x014c}
0x0ac2…0aec Head {h00=0x0026, h01=0x0050, text=» EXTRN FDBMIA,FDBAI1,FDBADF,FDBCRL«, t00=0x0006, t01=0x0168}
0x0aec…0b1e (7, 0, 400) Head {h00=0x002e, h01=0x0050, text=» EXTRN FDBSNR,FDBMRN,GTLGRN,EXTELE,FDBCEX «, t00=0x0007, t01=0x0004}
0x0b1e…0b3a Head {h00=0x0018, h01=0x0050, text=» EXTRN FDBDBR,FDBMRO«, t00=0x0007, t01=0x0036}
0x0b3a…0b62 Head {h00=0x0024, h01=0x0050, text=» EXTRN MXIND,CRNQUE,DMTWM,MPYMOD«, t00=0x0007, t01=0x0052}
0x0b62…0b78 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASASB «, t00=0x0007, t01=0x007a}
0x0b78…0b8e Head {h00=0x0012, h01=0x0050, text=» EXTRN TASCVO «, t00=0x0007, t01=0x0090}
0x0b8e…0ba4 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASVOL «, t00=0x0007, t01=0x00a6}
0x0ba4…0bba Head {h00=0x0012, h01=0x0050, text=» EXTRN TASCXO «, t00=0x0007, t01=0x00bc}
0x0bba…0bd0 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASSEX «, t00=0x0007, t01=0x00d2}
0x0bd0…0be6 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASXLB «, t00=0x0007, t01=0x00e8}
0x0be6…0bfc Head {h00=0x0012, h01=0x0050, text=» EXTRN TASFDB «, t00=0x0007, t01=0x00fe}
0x0bfc…0c12 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASVRL «, t00=0x0007, t01=0x0114}
0x0c12…0c28 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASVLE «, t00=0x0007, t01=0x012a}
0x0c28…0c3e Head {h00=0x0012, h01=0x0050, text=» EXTRN TASVRN «, t00=0x0007, t01=0x0140}
0x0c3e…0c54 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASECB «, t00=0x0007, t01=0x0156}
0x0c54…0c78 Head {h00=0x0020, h01=0x0050, text=» EXTRN TASFIL,TASTID,TASMXA «, t00=0x0007, t01=0x016c}
0x0c78…0c9c Head {h00=0x0020, h01=0x0050, text=» EXTRN TASSPW,TASFDD,TASTBE «, t00=0x0007, t01=0x0190}
0x0c9c…0cb2 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASCAQ «, t00=0x0008, t01=0x0024}
0x0cb2…0cc8 Head {h00=0x0012, h01=0x0050, text=» EXTRN VOLCHE «, t00=0x0008, t01=0x003a}
0x0cc8…0cd6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x0050}
0x0cd6…0ce8 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0008, t01=0x005e}
0x0ce8…0d18 Head {h00=0x002c, h01=0x0050, text=»RECBFZ EQU X:A INDEX RECORD BUFFER SIZE «, t00=0x0008, t01=0x0070}
0x0d18…0d2a Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0008, t01=0x00a0}
0x0d2a…0d5e Head {h00=0x0030, h01=0x0050, text=»INDXAC EQU 0 INDEX ACCESS FUNCTIONS WHEN = 1«, t00=0x0008, t01=0x00b2}
0x0d5e…0d6c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00e6}
0x0d6c…0d76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f4}
0x0d76…0d8a Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0008, t01=0x00fe}
0x0d8a…0d9e Head {h00=0x0010, h01=0x0050, text=»* DATA *«, t00=0x0008, t01=0x0112}
0x0d9e…0db2 Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0008, t01=0x0126}
0x0db2…0dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x013a}
0x0dbc…0de8 Head {h00=0x0028, h01=0x0050, text=»* CYLID 1 WORD INCL FOR VOL LABEL «, t00=0x0008, t01=0x0144}
0x0de8…0dfc Head {h00=0x0010, h01=0x0050, text=»VLVLE EQU 8 «, t00=0x0008, t01=0x0170}
0x0dfc…0e10 Head {h00=0x0010, h01=0x0050, text=»VLVBA EQU 12«, t00=0x0008, t01=0x0184}
0x0e10…0e24 Head {h00=0x0010, h01=0x0050, text=»VLVRL EQU 14«, t00=0x0009, t01=0x0008}
0x0e24…0e38 Head {h00=0x0010, h01=0x0050, text=»VLVER EQU 34«, t00=0x0009, t01=0x001c}
0x0e38…0e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0030}
0x0e42…0e56 Head {h00=0x0010, h01=0x0050, text=»VTFSNO EQU 8«, t00=0x0009, t01=0x003a}
0x0e56…0e6c Head {h00=0x0012, h01=0x0050, text=»VTFXNO EQU 10 «, t00=0x0009, t01=0x004e}
0x0e6c…0e82 Head {h00=0x0012, h01=0x0050, text=»VTFXLE EQU 14 «, t00=0x0009, t01=0x0064}
0x0e82…0e98 Head {h00=0x0012, h01=0x0050, text=»VTFXBA EQU 18 «, t00=0x0009, t01=0x007a}
0x0e98…0eac Head {h00=0x0010, h01=0x0050, text=»VTLRN EQU 21«, t00=0x0009, t01=0x0090}
0x0eac…0ec0 Head {h00=0x0010, h01=0x0050, text=»VTRLE EQU 24«, t00=0x0009, t01=0x00a4}
0x0ec0…0ed4 Head {h00=0x0010, h01=0x0050, text=»VTBLF EQU 26«, t00=0x0009, t01=0x00b8}
0x0ed4…0eea Head {h00=0x0012, h01=0x0050, text=»VTFIOR EQU 27 «, t00=0x0009, t01=0x00cc}
0x0eea…0efe Head {h00=0x0010, h01=0x0050, text=»VTNIF EQU 37«, t00=0x0009, t01=0x00e2}
0x0efe…0f12 Head {h00=0x0010, h01=0x0050, text=»VTKA EQU 38 «, t00=0x0009, t01=0x00f6}
0x0f12…0f1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x010a}
0x0f1c…0f42 Head {h00=0x0022, h01=0x0050, text=»* QVTBLE= (VTOC BF)*(RL+1)+2«, t00=0x0009, t01=0x0114}
0x0f42…0f6a Head {h00=0x0024, h01=0x0050, text=»QVTBLE EQU 380 VTOC BLOCK LENGTH«, t00=0x0009, t01=0x013a}
0x0f6a…0f8e Head {h00=0x0020, h01=0x0050, text=»SECTLE EQU 410 SECTOR LENGTH«, t00=0x0009, t01=0x0162}
0x0f8e…0fa8 Head {h00=0x0016, h01=0x0050, text=» DATA 0,0 4 WORDS «, t00=0x0009, t01=0x0186}
0x0fa8…0fc0 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x000a, t01=0x0010}
0x0fc0…0fd6 Head {h00=0x0012, h01=0x0050, text=»DMTA14 EQU *-2«, t00=0x000a, t01=0x0028}
0x0fd6…0fe4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x003e}
0x0fe4…0fee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x004c}
0x0fee…1004 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000a, t01=0x0056}
0x1004…101a Head {h00=0x0012, h01=0x0050, text=»* DMTIOC *«, t00=0x000a, t01=0x006c}
0x101a…1030 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000a, t01=0x0082}
0x1030…103a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0098}
0x103a…1078 Head {h00=0x003a, h01=0x0050, text=»* ENTRY DMTIOC CHECK RETURN CODES AFTER DISC I/O«, t00=0x000a, t01=0x00a2}
0x1078…10ba Head {h00=0x003e, h01=0x0050, text=»* RETURN TO DMTASX WITH A7=1 IF ERROR. «, t00=0x000a, t01=0x00e0}
0x10ba…10c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0122}
0x10c4…10d8 Head {h00=0x0010, h01=0x0050, text=»DMTIOC EQU *«, t00=0x000a, t01=0x012c}
0x10d8…10f0 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,TASECB «, t00=0x000a, t01=0x0140}
0x10f0…1108 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x000a, t01=0x0158}
0x1108…1120 Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBRC,A8 «, t00=0x000a, t01=0x0170}
0x1120…114a Head {h00=0x0026, h01=0x0050, text=» ANKL A1,/FEFF BIT 7 ONLY RETRIES «, t00=0x000a, t01=0x0188}
0x114a…1160 Head {h00=0x0012, h01=0x0050, text=» RF(Z) DMTIOX «, t00=0x000b, t01=0x0022}
0x1160…1174 Head {h00=0x0010, h01=0x0050, text=» ADKL A14,4 «, t00=0x000b, t01=0x0038}
0x1174…1188 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x000b, t01=0x004c}
0x1188…11b0 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DMT060 NEW VOLUME LOADED«, t00=0x000b, t01=0x0060}
0x11b0…11c8 Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x000b, t01=0x0088}
0x11c8…11f8 Head {h00=0x002c, h01=0x0050, text=» CM BUFDMI,A3 CLEAR VOL IDENT IN BUFFER «, t00=0x000b, t01=0x00a0}
0x11f8…120a Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x000b, t01=0x00d0}
0x120a…122c Head {h00=0x001e, h01=0x0050, text=» ABL DMTASX DISC I/O ERROR«, t00=0x000b, t01=0x00e2}
0x122c…1240 Head {h00=0x0010, h01=0x0050, text=»DMTIOX EQU *«, t00=0x000b, t01=0x0104}
0x1240…1250 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x000b, t01=0x0118}
0x1250…125e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0128}
0x125e…1268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0136}
0x1268…127e Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000b, t01=0x0140}
0x127e…1294 Head {h00=0x0012, h01=0x0050, text=»* DMTASS *«, t00=0x000b, t01=0x0156}
0x1294…12aa Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000b, t01=0x016c}
0x12aa…12b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0182}
0x12b4…12c8 Head {h00=0x0010, h01=0x0050, text=»DMTASS EQU *«, t00=0x000b, t01=0x018c}
0x12c8…1304 Head {h00=0x0038, h01=0x0050, text=» LDKL A14,DMTA14 INITIALIZE DMTASK A14 STACK POINTER«, t00=0x000c, t01=0x0010}
0x1304…1324 Head {h00=0x001c, h01=0x0050, text=» ST A2,TASTID TASK IDENT«, t00=0x000c, t01=0x004c}
0x1324…1348 Head {h00=0x0020, h01=0x0050, text=» CM TASMXA MASTER INDEX ADDR«, t00=0x000c, t01=0x006c}
0x1348…135a Head {h00=0x000e, h01=0x0050, text=» ANK A2,/2«, t00=0x000c, t01=0x0090}
0x135a…137c Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT010 NOT FLEXTASC«, t00=0x000c, t01=0x00a2}
0x137c…1386 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c4}
0x1386…13b0 Head {h00=0x0026, h01=0x0050, text=»* PERFORM VOLUME CHECK WITH LOCK«, t00=0x000c, t01=0x00ce}
0x13b0…13ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f8}
0x13ba…13da Head {h00=0x001c, h01=0x0050, text=» LD A8,TASASB ASBLK ADDR«, t00=0x000c, t01=0x0102}
0x13da…13ec Head {h00=0x000e, h01=0x0050, text=» LCR A2,A8«, t00=0x000c, t01=0x0122}
0x13ec…140a Head {h00=0x001a, h01=0x0050, text=» ANK A2,/07 NO OF VOL «, t00=0x000c, t01=0x0134}
0x140a…142a Head {h00=0x001c, h01=0x0050, text=» LDKL A11,1 LOCK WANTED «, t00=0x000c, t01=0x0152}
0x142a…144a Head {h00=0x001c, h01=0x0050, text=» CF A14,VOLCHE SEE TASS «, t00=0x000c, t01=0x0172}
0x144a…145c (13, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x000d, t01=0x0004}
0x145c…1474 Head {h00=0x0014, h01=0x0050, text=» RF(Z) DMT010 OK«, t00=0x000d, t01=0x0016}
0x1474…1492 Head {h00=0x001a, h01=0x0050, text=» LDK A7,4 VOL UNKNOWN «, t00=0x000d, t01=0x002e}
0x1492…14a6 Head {h00=0x0010, h01=0x0050, text=» ABL DMTASX «, t00=0x000d, t01=0x004c}
0x14a6…14ba Head {h00=0x0010, h01=0x0050, text=»DMT010 EQU *«, t00=0x000d, t01=0x0060}
0x14ba…14c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0074}
0x14c4…14dc Head {h00=0x0014, h01=0x0050, text=» LDKL A8,TASECB «, t00=0x000d, t01=0x007e}
0x14dc…14e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0096}
0x14e6…1520 Head {h00=0x0036, h01=0x0050, text=» LD A1,TASCVO OFFSET INTO TASVOL FOR FIRST VOLUME «, t00=0x000d, t01=0x00a0}
0x1520…1534 Head {h00=0x0010, h01=0x0050, text=»DMT050 EQU *«, t00=0x000d, t01=0x00da}
0x1534…1564 Head {h00=0x002c, h01=0x0050, text=» CF A14,CLRBUF RELEASE ALL FREE BUFFERS «, t00=0x000d, t01=0x00ee}
0x1564…1576 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x000d, t01=0x011e}
0x1576…15a4 Head {h00=0x002a, h01=0x0050, text=» LD A1,TASVOL,A1 DMI, FC FIRST VOLUME «, t00=0x000d, t01=0x0130}
0x15a4…15bc Head {h00=0x0014, h01=0x0050, text=» SC A1,ECBFC,A8 «, t00=0x000d, t01=0x015e}
0x15bc…15d4 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,SECTLE «, t00=0x000d, t01=0x0176}
0x15d4…15fa Head {h00=0x0022, h01=0x0050, text=» ST A2,ECBRL,A8 SECTOR LENGTH «, t00=0x000d, t01=0x018e}
0x15fa…160c Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x000e, t01=0x0024}
0x160c…1640 Head {h00=0x0030, h01=0x0050, text=» ST A2,ECBCW,A8 SECTOR #0 VL (VOLUME LABEL) «, t00=0x000e, t01=0x0036}
0x1640…164a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006a}
0x164a…1654 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0074}
0x1654…168a Head {h00=0x0032, h01=0x0050, text=» CF A14,DMTGBU GET A DM BUFFER ADDRESS IN A3 «, t00=0x000e, t01=0x007e}
0x168a…16ae Head {h00=0x0020, h01=0x0050, text=» DATA /5700 NOP. READ ALWAYS«, t00=0x000e, t01=0x00b4}
0x16ae…16c6 Head {h00=0x0014, h01=0x0050, text=» ADKL A3,BUFSTA «, t00=0x000e, t01=0x00d8}
0x16c6…16f0 Head {h00=0x0026, h01=0x0050, text=» ST A3,ECBBA,A8 DATA BUFFER START «, t00=0x000e, t01=0x00f0}
0x16f0…16fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011a}
0x16fa…1720 Head {h00=0x0022, h01=0x0050, text=»* PHYS READ 1 SECT FROM DISC«, t00=0x000e, t01=0x0124}
0x1720…172a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x014a}
0x172a…173e Head {h00=0x0010, h01=0x0050, text=»DMT060 EQU *«, t00=0x000e, t01=0x0154}
0x173e…1752 Head {h00=0x0010, h01=0x0050, text=» LDK A7,/11 «, t00=0x000e, t01=0x0168}
0x1752…175e Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000e, t01=0x017c}
0x175e…176e Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x000e, t01=0x0188}
0x176e…179c Head {h00=0x002a, h01=0x0050, text=» DATA DMTAR3 RESTART ADDRESS AFTER I/O«, t00=0x000f, t01=0x0008}
0x179c…17a8 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000f, t01=0x0036}
0x17a8…17bc Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x000f, t01=0x0042}
0x17bc…17ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0056}
0x17ca…1802 Head {h00=0x0034, h01=0x0050, text=»DMTAR3 EQU * RESTART AFTER VOLUME LABEL IS READ «, t00=0x000f, t01=0x0064}
0x1802…1834 Head {h00=0x002e, h01=0x0050, text=» LDKL A14,DMTA14 SET UP A14 STACK POINTER «, t00=0x000f, t01=0x009c}
0x1834…1854 Head {h00=0x001c, h01=0x0050, text=» CF A14,DMTIOC I/O CHECK«, t00=0x000f, t01=0x00ce}
0x1854…1874 Head {h00=0x001c, h01=0x0050, text=» LD A2,VLVER,A3 VERSION «, t00=0x000f, t01=0x00ee}
0x1874…189e Head {h00=0x0026, h01=0x0050, text=» CWK A2,'TO' DTOSS FORMATED DISC? «, t00=0x000f, t01=0x010e}
0x189e…18b8 Head {h00=0x0016, h01=0x0050, text=» RF(E) DMT100 YES «, t00=0x000f, t01=0x0138}
0x18b8…18cc Head {h00=0x0010, h01=0x0050, text=» LDK A7,8 NO«, t00=0x000f, t01=0x0152}
0x18cc…18ec Head {h00=0x001c, h01=0x0050, text=» ABL DMTASX ERROR RETURN«, t00=0x000f, t01=0x0166}
0x18ec…18f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0186}
0x18f6…190a Head {h00=0x0010, h01=0x0050, text=»DMT100 EQU *«, t00=0x000f, t01=0x0190}
0x190a…191c Head {h00=0x000e, h01=0x0050, text=» CM TASVRN«, t00=0x0010, t01=0x0014}
0x191c…1940 Head {h00=0x0020, h01=0x0050, text=» LD A6,VLVLE,A3 VTOC LENGTH «, t00=0x0010, t01=0x0026}
0x1940…1956 Head {h00=0x0012, h01=0x0050, text=» ST A6,TASVLE «, t00=0x0010, t01=0x004a}
0x1956…1978 Head {h00=0x001e, h01=0x0050, text=» LD A2,VLVBA,A3 VTOC BASE «, t00=0x0010, t01=0x0060}
0x1978…19aa Head {h00=0x002e, h01=0x0050, text=» ST A2,ECBCW,A8 1:ST VTOC SECTOR NO = FSAT«, t00=0x0010, t01=0x0082}
0x19aa…19d4 Head {h00=0x0026, h01=0x0050, text=» LD A9,VLVRL,A3 VTOC RECORD LENGTH«, t00=0x0010, t01=0x00b4}
0x19d4…19ea Head {h00=0x0012, h01=0x0050, text=» ST A9,TASVRL «, t00=0x0010, t01=0x00de}
0x19ea…19f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00f4}
0x19f8…1a02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0102}
0x1a02…1a20 Head {h00=0x001a, h01=0x0050, text=»* SEARCH ALL VTOC:S «, t00=0x0010, t01=0x010c}
0x1a20…1a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012a}
0x1a2a…1a3e Head {h00=0x0010, h01=0x0050, text=»DMT110 EQU *«, t00=0x0010, t01=0x0134}
0x1a3e…1a54 Head {h00=0x0012, h01=0x0050, text=» LD A6,TASVLE «, t00=0x0010, t01=0x0148}
0x1a54…1a66 Head {h00=0x000e, h01=0x0050, text=» SUK A6,1 «, t00=0x0010, t01=0x015e}
0x1a66…1a8a Head {h00=0x0020, h01=0x0050, text=» ST A6,TASVLE UPDATE TASVLE «, t00=0x0010, t01=0x0170}
0x1a8a…1ab2 (17, 0, 400) Head {h00=0x0024, h01=0x0050, text=» RF(P) DMT115 MORE VTOC SECTORS «, t00=0x0011, t01=0x0004}
0x1ab2…1ac0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x002c}
0x1ac0…1aca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x003a}
0x1aca…1af0 Head {h00=0x0022, h01=0x0050, text=»* ALL VTOC SECTORS ARE READ «, t00=0x0011, t01=0x0044}
0x1af0…1afa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006a}
0x1afa…1b10 Head {h00=0x0012, h01=0x0050, text=» LD A1,TASCVO «, t00=0x0011, t01=0x0074}
0x1b10…1b22 Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0011, t01=0x008a}
0x1b22…1b4c Head {h00=0x0026, h01=0x0050, text=» ABL(N) DMT300 ALL VOLUMES CHECKED«, t00=0x0011, t01=0x009c}
0x1b4c…1b70 Head {h00=0x0020, h01=0x0050, text=» ST A1,TASCVO UPDATE TASCVO «, t00=0x0011, t01=0x00c6}
0x1b70…1b98 Head {h00=0x0024, h01=0x0050, text=» LDK A7,7 TOO MANY FILE SECTIONS«, t00=0x0011, t01=0x00ea}
0x1b98…1bae Head {h00=0x0012, h01=0x0050, text=» LD A3,TASFIL «, t00=0x0011, t01=0x0112}
0x1bae…1bd4 Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) DMTASX NOT DATA FILE «, t00=0x0011, t01=0x0128}
0x1bd4…1bec Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x0011, t01=0x014e}
0x1bec…1c04 Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x0011, t01=0x0166}
0x1c04…1c2a Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0011, t01=0x017e}
0x1c2a…1c42 Head {h00=0x0014, h01=0x0050, text=» LC A7,TASVOL,A1«, t00=0x0012, t01=0x0014}
0x1c42…1c5c Head {h00=0x0016, h01=0x0050, text=» CC A7,TASVOL+2,A1«, t00=0x0012, t01=0x002c}
0x1c5c…1c7e Head {h00=0x001e, h01=0x0050, text=» RB(E) DMT050 SAME DM TASK«, t00=0x0012, t01=0x0046}
0x1c7e…1c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0068}
0x1c88…1caa Head {h00=0x001e, h01=0x0050, text=»* ACTIVATE NEXT DM TASK «, t00=0x0012, t01=0x0072}
0x1caa…1cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0094}
0x1cb4…1cca Head {h00=0x0012, h01=0x0050, text=» ADKL A7,'D0' «, t00=0x0012, t01=0x009e}
0x1cca…1cd6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0012, t01=0x00b4}
0x1cd6…1ce6 Head {h00=0x000c, h01=0x0050, text=» DATA -4«, t00=0x0012, t01=0x00c0}
0x1ce6…1cfa Head {h00=0x0010, h01=0x0050, text=» DATA DMTASS«, t00=0x0012, t01=0x00d0}
0x1cfa…1d06 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0012, t01=0x00e4}
0x1d06…1d1a Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x0012, t01=0x00f0}
0x1d1a…1d28 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0104}
0x1d28…1d32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0112}
0x1d32…1d5c Head {h00=0x0026, h01=0x0050, text=»* READ NEXT VTOC SECTOR AND EXIT«, t00=0x0012, t01=0x011c}
0x1d5c…1d66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0146}
0x1d66…1d7a Head {h00=0x0010, h01=0x0050, text=»DMT115 EQU *«, t00=0x0012, t01=0x0150}
0x1d7a…1d92 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x0012, t01=0x0164}
0x1d92…1daa Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x0012, t01=0x017c}
0x1daa…1dc0 (19, 0, 398) Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTRBU«, t00=0x0013, t01=0x0004}
0x1dc0…1dd8 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A8 «, t00=0x0013, t01=0x001a}
0x1dd8…1dfa Head {h00=0x001e, h01=0x0050, text=» ADK A2,1 NEXT VTOC SECTOR«, t00=0x0013, t01=0x0032}
0x1dfa…1e10 Head {h00=0x0012, h01=0x0050, text=» LD A1,TASCVO «, t00=0x0013, t01=0x0054}
0x1e10…1e28 Head {h00=0x0014, h01=0x0050, text=» LD A1,TASVOL,A1«, t00=0x0013, t01=0x006a}
0x1e28…1e4a Head {h00=0x001e, h01=0x0050, text=» CF A14,DMTGBU GET BUFFER «, t00=0x0013, t01=0x0082}
0x1e4a…1e6e Head {h00=0x0020, h01=0x0050, text=» DATA /5700 NOP. READ ALWAYS«, t00=0x0013, t01=0x00a4}
0x1e6e…1e86 Head {h00=0x0014, h01=0x0050, text=» ADKL A3,BUFSTA «, t00=0x0013, t01=0x00c8}
0x1e86…1e9e Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBBA,A8 «, t00=0x0013, t01=0x00e0}
0x1e9e…1eb6 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0013, t01=0x00f8}
0x1eb6…1eca Head {h00=0x0010, h01=0x0050, text=» LDK A7,/11 «, t00=0x0013, t01=0x0110}
0x1eca…1ed6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0013, t01=0x0124}
0x1ed6…1ee6 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0013, t01=0x0130}
0x1ee6…1f0a Head {h00=0x0020, h01=0x0050, text=» DATA DMTAR4 RESTART ADDRESS«, t00=0x0013, t01=0x0140}
0x1f0a…1f16 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0013, t01=0x0164}
0x1f16…1f2a Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x0013, t01=0x0170}
0x1f2a…1f38 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0184}
0x1f38…1f4c (20, 0, 400) Head {h00=0x0010, h01=0x0050, text=»DMTAR4 EQU *«, t00=0x0014, t01=0x0004}
0x1f4c…1f64 Head {h00=0x0014, h01=0x0050, text=» LDKL A14,DMTA14«, t00=0x0014, t01=0x0018}
0x1f64…1f7a Head {h00=0x0012, h01=0x0050, text=» CF A14,DMTIOC«, t00=0x0014, t01=0x0030}
0x1f7a…1f90 Head {h00=0x0012, h01=0x0050, text=» LD A9,TASVRL «, t00=0x0014, t01=0x0046}
0x1f90…1fa6 Head {h00=0x0012, h01=0x0050, text=» LD A11,TASASB«, t00=0x0014, t01=0x005c}
0x1fa6…1fd6 Head {h00=0x002c, h01=0x0050, text=» ADKL A11,2 POINTER TO FILENAME IN ASBLK«, t00=0x0014, t01=0x0072}
0x1fd6…1fe8 Head {h00=0x000e, h01=0x0050, text=» LDK A4,2 «, t00=0x0014, t01=0x00a2}
0x1fe8…1ffe Head {h00=0x0012, h01=0x0050, text=» CW A4,TASFIL «, t00=0x0014, t01=0x00b4}
0x1ffe…2026 Head {h00=0x0024, h01=0x0050, text=» RF(NE) DMT135 NOT MASTER INDEX «, t00=0x0014, t01=0x00ca}
0x2026…204c Head {h00=0x0022, h01=0x0050, text=» ADKL A11,14 MX FILE NAME ADDR«, t00=0x0014, t01=0x00f2}
0x204c…2060 Head {h00=0x0010, h01=0x0050, text=»DMT135 EQU *«, t00=0x0014, t01=0x0118}
0x2060…207c Head {h00=0x0018, h01=0x0050, text=» ADK A3,2 SKIP CYLID«, t00=0x0014, t01=0x012c}
0x207c…2090 Head {h00=0x0010, h01=0x0050, text=»DMT120 EQU *«, t00=0x0014, t01=0x0148}
0x2090…20bc Head {h00=0x0028, h01=0x0050, text=» IM TASVRN INCREMENT VTOC RECORD NO «, t00=0x0014, t01=0x015c}
0x20bc…20ce Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0014, t01=0x0188}
0x20ce…20f4 Head {h00=0x0022, h01=0x0050, text=» ADR A4,A9 ADDRESS STATUS BYTE«, t00=0x0015, t01=0x000a}
0x20f4…2106 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A4«, t00=0x0015, t01=0x0030}
0x2106…211a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0015, t01=0x0042}
0x211a…213a Head {h00=0x001c, h01=0x0050, text=» ABL(Z) DMT250 NOT USED «, t00=0x0015, t01=0x0056}
0x213a…2166 Head {h00=0x0028, h01=0x0050, text=» SUR A4,A9 BACK TO START OF VTOC REC«, t00=0x0015, t01=0x0076}
0x2166…217a Head {h00=0x0010, h01=0x0050, text=» LDR A7,A11 «, t00=0x0015, t01=0x00a2}
0x217a…21a2 Head {h00=0x0024, h01=0x0050, text=» LDK A2,4 FILE NAME MAX 4 WORDS «, t00=0x0015, t01=0x00b6}
0x21a2…21b6 Head {h00=0x0010, h01=0x0050, text=»DMT150 EQU *«, t00=0x0015, t01=0x00de}
0x21b6…21ca Head {h00=0x0010, h01=0x0050, text=» LDR* A10,A4«, t00=0x0015, t01=0x00f2}
0x21ca…21de Head {h00=0x0010, h01=0x0050, text=» CWR* A10,A7«, t00=0x0015, t01=0x0106}
0x21de…21fe Head {h00=0x001c, h01=0x0050, text=» ABL(NE) DMT250 NO MATCH«, t00=0x0015, t01=0x011a}
0x21fe…2210 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0015, t01=0x013a}
0x2210…2242 Head {h00=0x002e, h01=0x0050, text=» RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH«, t00=0x0015, t01=0x014c}
0x2242…2254 Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x0015, t01=0x017e}
0x2254…2266 Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0015, t01=0x0190}
0x2266…2288 Head {h00=0x001e, h01=0x0050, text=» RB DMT150 CHECK NEXT WORD«, t00=0x0016, t01=0x0012}
0x2288…2292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0034}
0x2292…22be Head {h00=0x0028, h01=0x0050, text=»* ONLY STANDARD FILES ARE HANDLED «, t00=0x0016, t01=0x003e}
0x22be…22c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006a}
0x22c8…22dc Head {h00=0x0010, h01=0x0050, text=»DMT160 EQU *«, t00=0x0016, t01=0x0074}
0x22dc…22f4 Head {h00=0x0014, h01=0x0050, text=» LC A2,VTFIOR,A3«, t00=0x0016, t01=0x0088}
0x22f4…2318 Head {h00=0x0020, h01=0x0050, text=» CCK A2,'SS' STANDARD FILE ?«, t00=0x0016, t01=0x00a0}
0x2318…2332 Head {h00=0x0016, h01=0x0050, text=» RF(E) DMT165 YES «, t00=0x0016, t01=0x00c4}
0x2332…2356 Head {h00=0x0020, h01=0x0050, text=» CCK A2,'LL' LIBRARY FILE ? «, t00=0x0016, t01=0x00de}
0x2356…2370 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) DMT250 NO«, t00=0x0016, t01=0x0102}
0x2370…2394 Head {h00=0x0020, h01=0x0050, text=» LDK A2,0 FILE EXTENT NUMBER«, t00=0x0016, t01=0x011c}
0x2394…23a6 Head {h00=0x000e, h01=0x0050, text=» RF DMT167«, t00=0x0016, t01=0x0140}
0x23a6…23d8 Head {h00=0x002e, h01=0x0050, text=»DMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER«, t00=0x0016, t01=0x0152}
0x23d8…23e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0184}
0x23e6…23fa (23, 0, 400) Head {h00=0x0010, h01=0x0050, text=»DMT167 EQU *«, t00=0x0017, t01=0x0004}
0x23fa…2404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0018}
0x2404…2436 Head {h00=0x002e, h01=0x0050, text=»* GET INFO FROM VTOC AND SAVE IN TASBLK «, t00=0x0017, t01=0x0022}
0x2436…2440 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0054}
0x2440…2468 Head {h00=0x0024, h01=0x0050, text=» LDR A4,A3 START OF VTOC RECORD «, t00=0x0017, t01=0x005e}
0x2468…24a4 Head {h00=0x0038, h01=0x0050, text=» LD A1,TASCXO CURRENT OFFSET INTO TASSEX AND TASXLB «, t00=0x0017, t01=0x0086}
0x24a4…24b6 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0017, t01=0x00c2}
0x24b6…24cc Head {h00=0x0012, h01=0x0050, text=» ST A1,TASCXO «, t00=0x0017, t01=0x00d4}
0x24cc…24f0 Head {h00=0x0020, h01=0x0050, text=» RF(NN) DMT170 <= 4 EXTENTS «, t00=0x0017, t01=0x00ea}
0x24f0…2502 Head {h00=0x000e, h01=0x0050, text=» LDK A7,9 «, t00=0x0017, t01=0x010e}
0x2502…2530 Head {h00=0x002a, h01=0x0050, text=» ABL DMTASX MORE THAN 4 EXTENTS EXIST «, t00=0x0017, t01=0x0120}
0x2530…2544 Head {h00=0x0010, h01=0x0050, text=»DMT170 EQU *«, t00=0x0017, t01=0x014e}
0x2544…256a Head {h00=0x0022, h01=0x0050, text=» ECR A2,A2 TO LEFT HALF OF A2 «, t00=0x0017, t01=0x0162}
0x256a…25a2 Head {h00=0x0034, h01=0x0050, text=» LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 «, t00=0x0017, t01=0x0188}
0x25a2…25ba Head {h00=0x0014, h01=0x0050, text=» ST A2,TASSEX,A1«, t00=0x0018, t01=0x0030}
0x25ba…25d0 Head {h00=0x0012, h01=0x0050, text=» LD A6,TASCVO «, t00=0x0018, t01=0x0048}
0x25d0…2600 Head {h00=0x002c, h01=0x0050, text=» ST A6,TASSEX+2,A1 REMEMBER WHICH VOLUME«, t00=0x0018, t01=0x005e}
0x2600…2626 Head {h00=0x0022, h01=0x0050, text=» LD A2,VTFXLE,A4 EXTENT-LENGTH«, t00=0x0018, t01=0x008e}
0x2626…263e Head {h00=0x0014, h01=0x0050, text=» ST A2,TASXLB,A1«, t00=0x0018, t01=0x00b4}
0x263e…2662 Head {h00=0x0020, h01=0x0050, text=» LD A2,VTFXBA,A4 EXTENT BASE«, t00=0x0018, t01=0x00cc}
0x2662…267c Head {h00=0x0016, h01=0x0050, text=» ST A2,TASXLB+2,A1«, t00=0x0018, t01=0x00f0}
0x267c…2694 Head {h00=0x0014, h01=0x0050, text=» LD A2,TASSEX,A1«, t00=0x0018, t01=0x010a}
0x2694…26bc Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DMT250 NOT FIRST EXTENT «, t00=0x0018, t01=0x0122}
0x26bc…26ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x014a}
0x26ca…26e8 Head {h00=0x001a, h01=0x0050, text=»* FIRST FILE EXTENT «, t00=0x0018, t01=0x0158}
0x26e8…2728 Head {h00=0x003c, h01=0x0050, text=»* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. «, t00=0x0018, t01=0x0176}
0x2728…2732 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0026}
0x2732…2748 Head {h00=0x0012, h01=0x0050, text=» LD A12,TASFDB«, t00=0x0019, t01=0x0030}
0x2748…2776 Head {h00=0x002a, h01=0x0050, text=» RF(Z) DMT190 FIRST TIME EXT #0 FOUND «, t00=0x0019, t01=0x0046}
0x2776…2788 Head {h00=0x000e, h01=0x0050, text=» LDK A7,7 «, t00=0x0019, t01=0x0074}
0x2788…27b0 Head {h00=0x0024, h01=0x0050, text=» ABL DMTASX EXT #0 ALREADY FOUND«, t00=0x0019, t01=0x0086}
0x27b0…27c4 Head {h00=0x0010, h01=0x0050, text=»DMT190 EQU *«, t00=0x0019, t01=0x00ae}
0x27c4…27dc Head {h00=0x0014, h01=0x0050, text=» LDKL A12,FDBSTA«, t00=0x0019, t01=0x00c2}
0x27dc…27f0 Head {h00=0x0010, h01=0x0050, text=»DMT200 EQU *«, t00=0x0019, t01=0x00da}
0x27f0…2804 Head {h00=0x0010, h01=0x0050, text=» LDR* A5,A12«, t00=0x0019, t01=0x00ee}
0x2804…2818 Head {h00=0x0010, h01=0x0050, text=» ANK A5,/01 «, t00=0x0019, t01=0x0102}
0x2818…2832 Head {h00=0x0016, h01=0x0050, text=» RF(Z) DMT210 FREE«, t00=0x0019, t01=0x0116}
0x2832…284c Head {h00=0x0016, h01=0x0050, text=» LD A2,FDBEXT,A12 «, t00=0x0019, t01=0x0130}
0x284c…2864 Head {h00=0x0014, h01=0x0050, text=» CW A2,TASVOL,A6«, t00=0x0019, t01=0x014a}
0x2864…288a Head {h00=0x0022, h01=0x0050, text=» RF(NE) DMT210 NOT SAME VOLUME«, t00=0x0019, t01=0x0162}
0x288a…28a4 Head {h00=0x0016, h01=0x0050, text=» LD A2,FDBVTO,A12 «, t00=0x0019, t01=0x0188}
0x28a4…28ba Head {h00=0x0012, h01=0x0050, text=» CW A2,TASVRN «, t00=0x001a, t01=0x0012}
0x28ba…28e2 Head {h00=0x0024, h01=0x0050, text=» RF(NE) DMT210 NOT SAME VTOC REC«, t00=0x001a, t01=0x0028}
0x28e2…28fc Head {h00=0x0016, h01=0x0050, text=» LD A2,FDBMIA,A12 «, t00=0x001a, t01=0x0050}
0x28fc…2922 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DMT205 INDEX ASS BEFOR«, t00=0x001a, t01=0x006a}
0x2922…2938 Head {h00=0x0012, h01=0x0050, text=» LD A2,TASFIL «, t00=0x001a, t01=0x0090}
0x2938…296a Head {h00=0x002e, h01=0x0050, text=» ABL(E) DMT400 SAME VTOC RECORD FDB FOUND«, t00=0x001a, t01=0x00a6}
0x296a…297e Head {h00=0x0010, h01=0x0050, text=»DMT205 EQU *«, t00=0x001a, t01=0x00d8}
0x297e…299e Head {h00=0x001c, h01=0x0050, text=» LDK A7,5 FILE CODE USED«, t00=0x001a, t01=0x00ec}
0x299e…29b2 Head {h00=0x0010, h01=0x0050, text=» ABL DMTASX «, t00=0x001a, t01=0x010c}
0x29b2…29bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0120}
0x29bc…29e4 Head {h00=0x0024, h01=0x0050, text=»DMT210 LDR* A12,A12 GET NEXT FDB«, t00=0x001a, t01=0x012a}
0x29e4…29fc Head {h00=0x0014, h01=0x0050, text=» ANKL A12,/FFFE «, t00=0x001a, t01=0x0152}
0x29fc…2a28 Head {h00=0x0028, h01=0x0050, text=» RB(NE) DMT200 MORE FDB:S TO SEARCH «, t00=0x001a, t01=0x016a}
0x2a28…2a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0008}
0x2a32…2a66 Head {h00=0x0030, h01=0x0050, text=»* NO MATCHING FDB EXIST FIND A FREE FDB «, t00=0x001b, t01=0x0012}
0x2a66…2a70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0046}
0x2a70…2a88 Head {h00=0x0014, h01=0x0050, text=» LDKL A12,FDBSTA«, t00=0x001b, t01=0x0050}
0x2a88…2aa2 Head {h00=0x0016, h01=0x0050, text=»DMT220 LDR* A5,A12«, t00=0x001b, t01=0x0068}
0x2aa2…2ab6 Head {h00=0x0010, h01=0x0050, text=» ANK A5,/01 «, t00=0x001b, t01=0x0082}
0x2ab6…2ad0 Head {h00=0x0016, h01=0x0050, text=» RF(Z) DMT230 FREE«, t00=0x001b, t01=0x0096}
0x2ad0…2af2 Head {h00=0x001e, h01=0x0050, text=» LDR* A12,A12 GET NEXT FDB«, t00=0x001b, t01=0x00b0}
0x2af2…2b0a Head {h00=0x0014, h01=0x0050, text=» ANKL A12,/FFFE «, t00=0x001b, t01=0x00d2}
0x2b0a…2b34 Head {h00=0x0026, h01=0x0050, text=» RB(NE) DMT220 MORE FDB:S TO CHECK«, t00=0x001b, t01=0x00ea}
0x2b34…2b46 Head {h00=0x000e, h01=0x0050, text=» LDK A7,3 «, t00=0x001b, t01=0x0114}
0x2b46…2b6a Head {h00=0x0020, h01=0x0050, text=» ABL DMTASX NO FDB AVAILABLE«, t00=0x001b, t01=0x0126}
0x2b6a…2b96 Head {h00=0x0028, h01=0x0050, text=»* INITIALIZE FDB ZERO FROM FDB+2«, t00=0x001b, t01=0x014a}
0x2b96…2ba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0176}
0x2ba0…2bb4 Head {h00=0x0010, h01=0x0050, text=»DMT230 EQU *«, t00=0x001b, t01=0x0180}
0x2bb4…2bca (28, 0, 398) Head {h00=0x0012, h01=0x0050, text=» ST A12,TASFDB«, t00=0x001c, t01=0x0004}
0x2bca…2bde Head {h00=0x0010, h01=0x0050, text=» LDR A10,A12«, t00=0x001c, t01=0x001a}
0x2bde…2bf6 Head {h00=0x0014, h01=0x0050, text=» ADKL A10,QFDBFL«, t00=0x001c, t01=0x002e}
0x2bf6…2c08 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x001c, t01=0x0046}
0x2c08…2c1c Head {h00=0x0010, h01=0x0050, text=» LDR A1,A12 «, t00=0x001c, t01=0x0058}
0x2c1c…2c34 Head {h00=0x0014, h01=0x0050, text=»DMT233 ADK A1,2 «, t00=0x001c, t01=0x006c}
0x2c34…2c48 Head {h00=0x0010, h01=0x0050, text=» CWR A1,A10 «, t00=0x001c, t01=0x0084}
0x2c48…2c68 Head {h00=0x001c, h01=0x0050, text=» RF(E) DMT237 END OF FDB«, t00=0x001c, t01=0x0098}
0x2c68…2c7a Head {h00=0x000e, h01=0x0050, text=» STR A2,A1«, t00=0x001c, t01=0x00b8}
0x2c7a…2c8c Head {h00=0x000e, h01=0x0050, text=» RB DMT233«, t00=0x001c, t01=0x00ca}
0x2c8c…2ca0 Head {h00=0x0010, h01=0x0050, text=»DMT237 EQU *«, t00=0x001c, t01=0x00dc}
0x2ca0…2cb6 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/8000«, t00=0x001c, t01=0x00f0}
0x2cb6…2cce Head {h00=0x0014, h01=0x0050, text=»* DEV NOT BUSY«, t00=0x001c, t01=0x0106}
0x2cce…2ce6 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A12«, t00=0x001c, t01=0x011e}
0x2ce6…2cfc Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TIODM«, t00=0x001c, t01=0x0136}
0x2cfc…2d16 Head {h00=0x0016, h01=0x0050, text=» ST A2,DWTADR,A12 «, t00=0x001c, t01=0x014c}
0x2d16…2d2e Head {h00=0x0014, h01=0x0050, text=» LDKL A2,SECTLE «, t00=0x001c, t01=0x0166}
0x2d2e…2d42 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A12 «, t00=0x001c, t01=0x017e}
0x2d42…2d5a (29, 0, 400) Head {h00=0x0014, h01=0x0050, text=» ADKL A1,FDBECB «, t00=0x001d, t01=0x0004}
0x2d5a…2d72 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBRL,A1 «, t00=0x001d, t01=0x001c}
0x2d72…2d86 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/01 «, t00=0x001d, t01=0x0034}
0x2d86…2da6 Head {h00=0x001c, h01=0x0050, text=» ORRS A2,A12 SET USE BIT«, t00=0x001d, t01=0x0048}
0x2da6…2dbe Head {h00=0x0014, h01=0x0050, text=» LC A2,VTLRN,A4 «, t00=0x001d, t01=0x0068}
0x2dbe…2dd8 Head {h00=0x0016, h01=0x0050, text=» SC A2,FDBLRN,A12 «, t00=0x001d, t01=0x0080}
0x2dd8…2df2 Head {h00=0x0016, h01=0x0050, text=» LD A2,VTLRN+1,A4 «, t00=0x001d, t01=0x009a}
0x2df2…2e0e Head {h00=0x0018, h01=0x0050, text=» ST A2,FDBLRN+1,A12 «, t00=0x001d, t01=0x00b4}
0x2e0e…2e26 Head {h00=0x0014, h01=0x0050, text=» LD A2,VTRLE,A4 «, t00=0x001d, t01=0x00d0}
0x2e26…2e40 Head {h00=0x0016, h01=0x0050, text=» ST A2,FDBRLE,A12 «, t00=0x001d, t01=0x00e8}
0x2e40…2e58 Head {h00=0x0014, h01=0x0050, text=» LC A2,VTBLF,A4 «, t00=0x001d, t01=0x0102}
0x2e58…2e72 Head {h00=0x0016, h01=0x0050, text=» SC A2,FDBBLF,A12 «, t00=0x001d, t01=0x011a}
0x2e72…2e8a Head {h00=0x0014, h01=0x0050, text=» LC A2,VTNIF,A4 «, t00=0x001d, t01=0x0134}
0x2e8a…2ea4 Head {h00=0x0016, h01=0x0050, text=» SC A2,FDBNIF,A12 «, t00=0x001d, t01=0x014c}
0x2ea4…2eba Head {h00=0x0012, h01=0x0050, text=» LD A2,VTKA,A4«, t00=0x001d, t01=0x0166}
0x2eba…2ed2 Head {h00=0x0014, h01=0x0050, text=» ST A2,FDBKA,A12«, t00=0x001d, t01=0x017c}
0x2ed2…2ee8 (30, 0, 400) Head {h00=0x0012, h01=0x0050, text=» LD A2,TASVRN «, t00=0x001e, t01=0x0004}
0x2ee8…2f02 Head {h00=0x0016, h01=0x0050, text=» ST A2,FDBVTO,A12 «, t00=0x001e, t01=0x001a}
0x2f02…2f10 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0034}
0x2f10…2f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0042}
0x2f1a…2f3c Head {h00=0x001e, h01=0x0050, text=»* CHECK NEXT VTOC RECORD«, t00=0x001e, t01=0x004c}
0x2f3c…2f46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x006e}
0x2f46…2f5a Head {h00=0x0010, h01=0x0050, text=»DMT250 EQU *«, t00=0x001e, t01=0x0078}
0x2f5a…2f76 Head {h00=0x0018, h01=0x0050, text=»* A3 = ADR 1ST REC«, t00=0x001e, t01=0x008c}
0x2f76…2f94 Head {h00=0x001a, h01=0x0050, text=»* A9 = VTOC REC LGTH«, t00=0x001e, t01=0x00a8}
0x2f94…2fa6 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A9«, t00=0x001e, t01=0x00c6}
0x2fa6…2fc8 Head {h00=0x001e, h01=0x0050, text=» ADK A3,1 SKIP STATUS BYTE«, t00=0x001e, t01=0x00d8}
0x2fc8…2fda Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x001e, t01=0x00fa}
0x2fda…2ff2 Head {h00=0x0014, h01=0x0050, text=» SU A2,ECBBA,A8 «, t00=0x001e, t01=0x010c}
0x2ff2…3008 Head {h00=0x0012, h01=0x0050, text=» CWK A2,QVTBLE«, t00=0x001e, t01=0x0124}
0x3008…3036 Head {h00=0x002a, h01=0x0050, text=» ABL(L) DMT120 MORE RECORDS IN BUFFER «, t00=0x001e, t01=0x013a}
0x3036…305e Head {h00=0x0024, h01=0x0050, text=» ABL DMT110 GET NEXT VTOC SECTOR«, t00=0x001e, t01=0x0168}
0x305e…3068 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0190}
0x3068…30a8 Head {h00=0x003c, h01=0x0050, text=»* ALL VTOCS IN ALL VOLUMES ARE SEARCHED AT THIS POINT «, t00=0x001f, t01=0x000a}
0x30a8…30b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x004a}
0x30b2…30c6 Head {h00=0x0010, h01=0x0050, text=»DMT300 EQU *«, t00=0x001f, t01=0x0054}
0x30c6…30d8 Head {h00=0x000e, h01=0x0050, text=» LDK A3,16«, t00=0x001f, t01=0x0068}
0x30d8…30ee Head {h00=0x0012, h01=0x0050, text=» SU A3,TASCXO «, t00=0x001f, t01=0x007a}
0x30ee…3104 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DMT310«, t00=0x001f, t01=0x0090}
0x3104…3116 Head {h00=0x000e, h01=0x0050, text=» LDK A7,6 «, t00=0x001f, t01=0x00a6}
0x3116…313a Head {h00=0x0020, h01=0x0050, text=» RF DMTASX FILE NAME UNKNOWN«, t00=0x001f, t01=0x00b8}
0x313a…314e Head {h00=0x0010, h01=0x0050, text=»DMT310 EQU *«, t00=0x001f, t01=0x00dc}
0x314e…3164 Head {h00=0x0012, h01=0x0050, text=» LD A12,TASFDB«, t00=0x001f, t01=0x00f0}
0x3164…317a Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DMT320«, t00=0x001f, t01=0x0106}
0x317a…318c Head {h00=0x000e, h01=0x0050, text=» LDK A7,7 «, t00=0x001f, t01=0x011c}
0x318c…31b6 Head {h00=0x0026, h01=0x0050, text=» RF DMTASX FIRST EXTENT IS MISSING«, t00=0x001f, t01=0x012e}
0x31b6…31c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0158}
0x31c4…31ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0166}
0x31ce…320c Head {h00=0x003a, h01=0x0050, text=»* PUT EXTENT INFORMATION INTO FDB IN ASCENDING ORDER«, t00=0x001f, t01=0x0170}
0x320c…3248 Head {h00=0x0038, h01=0x0050, text=»* ACCORDING TO INCREASING SECTOR NO AND EXTENT NO «, t00=0x0020, t01=0x001e}
0x3248…3252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x005a}
0x3252…3266 Head {h00=0x0010, h01=0x0050, text=»DMT320 EQU *«, t00=0x0020, t01=0x0064}
0x3266…3270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0078}
0x3270…32b4 Head {h00=0x0040, h01=0x0050, text=»* CHECK IF RECORD BUFFERS ARE LARGE ENOUGH FOR INDEX FILE «, t00=0x0020, t01=0x0082}
0x32b4…32be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00c6}
0x32be…32d4 Head {h00=0x0012, h01=0x0050, text=» LD A6,TASFIL «, t00=0x0020, t01=0x00d0}
0x32d4…32f8 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMT330 DATA FILE ASS «, t00=0x0020, t01=0x00e6}
0x32f8…3320 Head {h00=0x0024, h01=0x0050, text=» LD A6,FDBRLE,A12 RECORD LENGTH «, t00=0x0020, t01=0x010a}
0x3320…3332 Head {h00=0x000e, h01=0x0050, text=» ADK A6,2 «, t00=0x0020, t01=0x0132}
0x3332…3350 Head {h00=0x001a, h01=0x0050, text=» SRL A6,1 NR OF WORDS «, t00=0x0020, t01=0x0144}
0x3350…337a Head {h00=0x0026, h01=0x0050, text=» CWK A6,RECBFZ RECORD BUFFER SIZE «, t00=0x0020, t01=0x0162}
0x337a…3394 Head {h00=0x0016, h01=0x0050, text=» RF(NG) DMT330 OK «, t00=0x0020, t01=0x018c}
0x3394…33a6 Head {h00=0x000e, h01=0x0050, text=» LDK A7,12«, t00=0x0021, t01=0x0016}
0x33a6…33d4 Head {h00=0x002a, h01=0x0050, text=» RF DMTASX RECORD BUFFER IS TOO SMALL «, t00=0x0021, t01=0x0028}
0x33d4…33e8 Head {h00=0x0010, h01=0x0050, text=»DMT330 EQU *«, t00=0x0021, t01=0x0056}
0x33e8…33fc Head {h00=0x0010, h01=0x0050, text=» LDR A6,A12 «, t00=0x0021, t01=0x006a}
0x33fc…3410 Head {h00=0x0010, h01=0x0050, text=»* FDB ADDR«, t00=0x0021, t01=0x007e}
0x3410…3428 Head {h00=0x0014, h01=0x0050, text=» ADKL A6,FDBEXT «, t00=0x0021, t01=0x0092}
0x3428…343a Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0021, t01=0x00aa}
0x343a…344c Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x0021, t01=0x00bc}
0x344c…3470 Head {h00=0x0020, h01=0x0050, text=» SRL A5,2 NUMBER OF EXTENTS «, t00=0x0021, t01=0x00ce}
0x3470…3484 Head {h00=0x0010, h01=0x0050, text=»DMT340 EQU *«, t00=0x0021, t01=0x00f2}
0x3484…3496 Head {h00=0x000e, h01=0x0050, text=» LDK A4,16«, t00=0x0021, t01=0x0106}
0x3496…34aa Head {h00=0x0010, h01=0x0050, text=»DMT350 EQU *«, t00=0x0021, t01=0x0118}
0x34aa…34bc Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0021, t01=0x012c}
0x34bc…34d4 Head {h00=0x0014, h01=0x0050, text=» CW A2,TASSEX,A4«, t00=0x0021, t01=0x013e}
0x34d4…34f0 Head {h00=0x0018, h01=0x0050, text=» RF(E) DMT360 MATCH «, t00=0x0021, t01=0x0156}
0x34f0…3506 Head {h00=0x0012, h01=0x0050, text=» CW A4,TASCXO «, t00=0x0021, t01=0x0172}
0x3506…3532 Head {h00=0x0028, h01=0x0050, text=» RB(NE) DMT350 MORE EXTENTS TO CHECK«, t00=0x0021, t01=0x0188}
0x3532…353c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0024}
0x353c…356c Head {h00=0x002c, h01=0x0050, text=»* THE EXTENT SEARCHED FOR IS NOT FOUND«, t00=0x0022, t01=0x002e}
0x356c…35a2 Head {h00=0x0032, h01=0x0050, text=»* CHECK IF RIGHT HALF OF A2 = 0 (EXT-NO = 0)«, t00=0x0022, t01=0x005e}
0x35a2…35ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0094}
0x35ac…35be Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0022, t01=0x009e}
0x35be…35d2 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0022, t01=0x00b0}
0x35d2…35fa Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DMT370 TRY NEXT SECTION «, t00=0x0022, t01=0x00c4}
0x35fa…3604 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ec}
0x3604…3618 Head {h00=0x0010, h01=0x0050, text=»DMT355 EQU *«, t00=0x0022, t01=0x00f6}
0x3618…362a Head {h00=0x000e, h01=0x0050, text=» LDK A7,7 «, t00=0x0022, t01=0x010a}
0x362a…3652 Head {h00=0x0024, h01=0x0050, text=» RF DMTASX FILE SECTION MISSING «, t00=0x0022, t01=0x011c}
0x3652…3666 Head {h00=0x0010, h01=0x0050, text=»DMT360 EQU *«, t00=0x0022, t01=0x0144}
0x3666…3670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0158}
0x3670…369e Head {h00=0x002a, h01=0x0050, text=»* MOVE INFO ABOUT THIS EXTENT TO FDB«, t00=0x0022, t01=0x0162}
0x369e…36a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0190}
0x36a8…36c2 Head {h00=0x0016, h01=0x0050, text=» LD A1,TASSEX+2,A4«, t00=0x0023, t01=0x000a}
0x36c2…36da Head {h00=0x0014, h01=0x0050, text=» LD A1,TASVOL,A1«, t00=0x0023, t01=0x0024}
0x36da…36f2 Head {h00=0x0014, h01=0x0050, text=» ST A1,EXTDMI,A6«, t00=0x0023, t01=0x003c}
0x36f2…370a Head {h00=0x0014, h01=0x0050, text=» LD A1,TASXLB,A4«, t00=0x0023, t01=0x0054}
0x370a…3722 Head {h00=0x0014, h01=0x0050, text=» ST A1,EXTLEN,A6«, t00=0x0023, t01=0x006c}
0x3722…373c Head {h00=0x0016, h01=0x0050, text=» LD A1,TASXLB+2,A4«, t00=0x0023, t01=0x0084}
0x373c…3754 Head {h00=0x0014, h01=0x0050, text=» ST A1,EXTBAS,A6«, t00=0x0023, t01=0x009e}
0x3754…3766 Head {h00=0x000e, h01=0x0050, text=» ADK A6,6 «, t00=0x0023, t01=0x00b6}
0x3766…3778 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0023, t01=0x00c8}
0x3778…37a2 Head {h00=0x0026, h01=0x0050, text=» RF(NP) DMT500 ALL EXTENTS HANDLED«, t00=0x0023, t01=0x00da}
0x37a2…37ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0104}
0x37ac…37ea Head {h00=0x003a, h01=0x0050, text=»* FIND NEXT FILE-SECTION-NO, FILE-EXT-NO COMBINATION«, t00=0x0023, t01=0x010e}
0x37ea…3804 Head {h00=0x0016, h01=0x0050, text=»* TO SEARCH FOR «, t00=0x0023, t01=0x014c}
0x3804…380e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0166}
0x380e…3820 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0023, t01=0x0170}
0x3820…3834 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0023, t01=0x0182}
0x3834…3846 Head {h00=0x000e, h01=0x0050, text=» SUK A1,3 «, t00=0x0024, t01=0x0008}
0x3846…386c Head {h00=0x0022, h01=0x0050, text=» RF(NE) DMT380 NOT EXT-NO = 3 «, t00=0x0024, t01=0x001a}
0x386c…3880 Head {h00=0x0010, h01=0x0050, text=»DMT370 EQU *«, t00=0x0024, t01=0x0040}
0x3880…3892 Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0024, t01=0x0054}
0x3892…38a6 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0024, t01=0x0066}
0x38a6…38b8 Head {h00=0x000e, h01=0x0050, text=» SUK A1,3 «, t00=0x0024, t01=0x007a}
0x38b8…38dc Head {h00=0x0020, h01=0x0050, text=» RB(E) DMT355 SECTION-NO = 3«, t00=0x0024, t01=0x008c}
0x38dc…3902 Head {h00=0x0022, h01=0x0050, text=» ADK A1,4 INCREMENT SECTION-NO«, t00=0x0024, t01=0x00b0}
0x3902…3920 Head {h00=0x001a, h01=0x0050, text=» ECR A2,A1 EXT-NO = 0 «, t00=0x0024, t01=0x00d6}
0x3920…3932 Head {h00=0x000e, h01=0x0050, text=» RB DMT340«, t00=0x0024, t01=0x00f4}
0x3932…395a Head {h00=0x0024, h01=0x0050, text=»DMT380 ADK A2,1 INCREMENT EXT-NO«, t00=0x0024, t01=0x0106}
0x395a…396c Head {h00=0x000e, h01=0x0050, text=» RB DMT340«, t00=0x0024, t01=0x012e}
0x396c…397a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0140}
0x397a…3984 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x014e}
0x3984…39b0 Head {h00=0x0028, h01=0x0050, text=»* PUT FDB ADDRESS INTO TTAB/CD:TAB«, t00=0x0024, t01=0x0158}
0x39b0…39ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0184}
0x39ba…39ce Head {h00=0x0010, h01=0x0050, text=»DMT400 EQU *«, t00=0x0024, t01=0x018e}
0x39ce…39e0 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0025, t01=0x0012}
0x39e0…39f4 Head {h00=0x0010, h01=0x0050, text=»DMTASX EQU *«, t00=0x0025, t01=0x0024}
0x39f4…3a24 Head {h00=0x002c, h01=0x0050, text=» LD A2,TASTBE TTAB/CDTAB FILE CODE ADDR «, t00=0x0025, t01=0x0038}
0x3a24…3a36 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A7«, t00=0x0025, t01=0x0068}
0x3a36…3a5a Head {h00=0x0020, h01=0x0050, text=» RF(Z) DMT420 CORRECT RETURN«, t00=0x0025, t01=0x007a}
0x3a5a…3a7a Head {h00=0x001c, h01=0x0050, text=» CM -1,A2 ZERO FILE CODE«, t00=0x0025, t01=0x009e}
0x3a7a…3a84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00be}
0x3a84…3aac Head {h00=0x0024, h01=0x0050, text=»* REMOVE FDB WITH MASTER INDEX«, t00=0x0025, t01=0x00c8}
0x3aac…3ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f0}
0x3ab6…3ade Head {h00=0x0024, h01=0x0050, text=» LD A4,TASMXA MASTER INDEX ADDR «, t00=0x0025, t01=0x00fa}
0x3ade…3b04 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DMT410 NO MASTER INDEX «, t00=0x0025, t01=0x0122}
0x3b04…3b16 Head {h00=0x000e, h01=0x0050, text=» INH INH«, t00=0x0025, t01=0x0148}
0x3b16…3b42 Head {h00=0x0028, h01=0x0050, text=» LD A2,MXIND SIEZE MASTERINDEXINDEX «, t00=0x0025, t01=0x015a}
0x3b42…3b54 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0025, t01=0x0186}
0x3b54…3b68 Head {h00=0x0010, h01=0x0050, text=»DMT405 EQU *«, t00=0x0026, t01=0x0008}
0x3b68…3b86 Head {h00=0x001a, h01=0x0050, text=» SUK A2,4 NEXT OFFSET «, t00=0x0026, t01=0x001c}
0x3b86…3ba0 Head {h00=0x0016, h01=0x0050, text=» RF(NN) DMT407 OK «, t00=0x0026, t01=0x003a}
0x3ba0…3bce Head {h00=0x002a, h01=0x0050, text=» RF DMT408 MASTER INDEX MUST BE FOUND «, t00=0x0026, t01=0x0054}
0x3bce…3bee Head {h00=0x001c, h01=0x0050, text=»DMT407 CW A4,MXIND+2,A2 «, t00=0x0026, t01=0x0082}
0x3bee…3c10 Head {h00=0x001e, h01=0x0050, text=» RB(NE) DMT405 NEXT ENTRY «, t00=0x0026, t01=0x00a2}
0x3c10…3c26 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/7FFF«, t00=0x0026, t01=0x00c4}
0x3c26…3c50 Head {h00=0x0026, h01=0x0050, text=» ANS A4,MXIND+4,A2 SET ENTRY FREE «, t00=0x0026, t01=0x00da}
0x3c50…3c68 Head {h00=0x0014, h01=0x0050, text=»DMT408 ENB ENB«, t00=0x0026, t01=0x0104}
0x3c68…3c7c Head {h00=0x0010, h01=0x0050, text=»DMT410 EQU *«, t00=0x0026, t01=0x011c}
0x3c7c…3c92 Head {h00=0x0012, h01=0x0050, text=» LD A3,TASFDB «, t00=0x0026, t01=0x0130}
0x3c92…3cb4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT430 NO FDB USED «, t00=0x0026, t01=0x0146}
0x3cb4…3cca Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FFFE«, t00=0x0026, t01=0x0168}
0x3cca…3cf0 Head {h00=0x0022, h01=0x0050, text=» ANRS A2,A3 CLEAR FDB USE BIT «, t00=0x0026, t01=0x017e}
0x3cf0…3d02 Head {h00=0x000e, h01=0x0050, text=» RF DMT430«, t00=0x0027, t01=0x0014}
0x3d02…3d16 Head {h00=0x0010, h01=0x0050, text=»DMT420 EQU *«, t00=0x0027, t01=0x0026}
0x3d16…3d34 Head {h00=0x001a, h01=0x0050, text=» ST A12,1,A2 FDB ADDR «, t00=0x0027, t01=0x003a}
0x3d34…3d48 Head {h00=0x0010, h01=0x0050, text=»DMT430 EQU *«, t00=0x0027, t01=0x0058}
0x3d48…3d5a Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0027, t01=0x006c}
0x3d5a…3d7a Head {h00=0x001c, h01=0x0050, text=» RF(Z) DMT440 NO BUFFER «, t00=0x0027, t01=0x007e}
0x3d7a…3d92 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x0027, t01=0x009e}
0x3d92…3daa Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x0027, t01=0x00b6}
0x3daa…3dd0 Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x0027, t01=0x00ce}
0x3dd0…3de4 Head {h00=0x0010, h01=0x0050, text=»DMT440 EQU *«, t00=0x0027, t01=0x00f4}
0x3de4…3e14 Head {h00=0x002c, h01=0x0050, text=» CF A14,CLRBUF RELEASE ALL FREE BUFFERS «, t00=0x0027, t01=0x0108}
0x3e14…3e3e Head {h00=0x0026, h01=0x0050, text=» CF A14,TASCAQ CHECK ASSIGN QUEUE «, t00=0x0027, t01=0x0138}
0x3e3e…3e66 Head {h00=0x0024, h01=0x0050, text=» CF A15,QTJOB QUEUE CALLING TASK«, t00=0x0027, t01=0x0162}
0x3e66…3e72 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0027, t01=0x018a}
0x3e72…3e7e Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0028, t01=0x0008}
0x3e7e…3e8e Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x0028, t01=0x0014}
0x3e8e…3e9c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0024}
0x3e9c…3eb0 Head {h00=0x0010, h01=0x0050, text=»DMT500 EQU *«, t00=0x0028, t01=0x0032}
0x3eb0…3ec6 Head {h00=0x0012, h01=0x0050, text=» LD A6,TASFIL «, t00=0x0028, t01=0x0046}
0x3ec6…3ee6 Head {h00=0x001c, h01=0x0050, text=» ABL(Z) DMT700 DATA FILE«, t00=0x0028, t01=0x005c}
0x3ee6…3efc Head {h00=0x0012, h01=0x0050, text=» IFF INDXAC=1 «, t00=0x0028, t01=0x007c}
0x3efc…3f18 Head {h00=0x0018, h01=0x0050, text=» LDKL A7,-1 REQ ERR «, t00=0x0028, t01=0x0092}
0x3f18…3f2a Head {h00=0x000e, h01=0x0050, text=» RB DMTASX«, t00=0x0028, t01=0x00ae}
0x3f2a…3f36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00c0}
0x3f36…3f4c Head {h00=0x0012, h01=0x0050, text=» IFT INDXAC=1 «, t00=0x0028, t01=0x00cc}
0x3f4c…3f5e Head {h00=0x000e, h01=0x0050, text=» SUK A6,1 «, t00=0x0028, t01=0x00e2}
0x3f5e…3f80 Head {h00=0x001e, h01=0x0050, text=» ABL(Z) DMT600 INDEX FILE «, t00=0x0028, t01=0x00f4}
0x3f80…3f8e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0116}
0x3f8e…3f98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0124}
0x3f98…3fbe Head {h00=0x0022, h01=0x0050, text=»* THIS IS MASTER INDEX LOOP.«, t00=0x0028, t01=0x012e}
0x3fbe…3ffa Head {h00=0x0038, h01=0x0050, text=»* CONNECT FDB TO FILE CODE IN DMTASK TTAB AND READ«, t00=0x0028, t01=0x0154}
0x3ffa…403a Head {h00=0x003c, h01=0x0050, text=»* MASTER INDEX WITH SEQUENTIAL READ ON THIS FILE CODE «, t00=0x0028, t01=0x0190}
0x403a…4044 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0040}
0x4044…4064 Head {h00=0x001c, h01=0x0050, text=» LD A7,TASTID DMTASK ID «, t00=0x0029, t01=0x004a}
0x4064…4070 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0029, t01=0x006a}
0x4070…4096 Head {h00=0x0022, h01=0x0050, text=» CF A15,FNDTID TTAB ADDR TO A2«, t00=0x0029, t01=0x0076}
0x4096…40a2 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0029, t01=0x009c}
0x40a2…40b8 Head {h00=0x0012, h01=0x0050, text=» ST A2,TASSPW «, t00=0x0029, t01=0x00a8}
0x40b8…40de Head {h00=0x0022, h01=0x0050, text=» LDKL A3,/0100 INDEX DATA FILE«, t00=0x0029, t01=0x00be}
0x40de…40f4 Head {h00=0x0012, h01=0x0050, text=» LD A1,TASASB «, t00=0x0029, t01=0x00e4}
0x40f4…4112 Head {h00=0x001a, h01=0x0050, text=» LC A3,1,A1 FILE CODE «, t00=0x0029, t01=0x00fa}
0x4112…412a Head {h00=0x0014, h01=0x0050, text=» SC A3,TASECB+1 «, t00=0x0029, t01=0x0118}
0x412a…4150 Head {h00=0x0022, h01=0x0050, text=» ST A3,TTB:TD+2,A2 TTAB ENTRY «, t00=0x0029, t01=0x0130}
0x4150…4174 Head {h00=0x0020, h01=0x0050, text=» ST A12,TTB:TD+4,A2 FDB ADR «, t00=0x0029, t01=0x0156}
0x4174…418c Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBBA,A8 «, t00=0x0029, t01=0x017a}
0x418c…41a4 (42, 0, 400) Head {h00=0x0014, h01=0x0050, text=» SUKL A3,BUFSTA «, t00=0x002a, t01=0x0004}
0x41a4…41ca Head {h00=0x0022, h01=0x0050, text=» CF A14,DMTRBU RELEASE BUFFER «, t00=0x002a, t01=0x001c}
0x41ca…41d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0042}
0x41d4…4208 Head {h00=0x0030, h01=0x0050, text=»* CALC NO OF WORDS NEEDED IN MASTRE INDEX «, t00=0x002a, t01=0x004c}
0x4208…4212 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0080}
0x4212…4234 Head {h00=0x001e, h01=0x0050, text=» LD A6,FDBRLE,A12 REC LGTH«, t00=0x002a, t01=0x008a}
0x4234…425a Head {h00=0x0022, h01=0x0050, text=» LD A7,FDBLRN+1,A12 NO OF RECS«, t00=0x002a, t01=0x00ac}
0x425a…428a Head {h00=0x002c, h01=0x0050, text=» CF A14,MPYMOD A1,A2=NO OF BYTES NEEDED «, t00=0x002a, t01=0x00d2}
0x428a…429c Head {h00=0x000e, h01=0x0050, text=» SRC A1,1 «, t00=0x002a, t01=0x0102}
0x429c…42c0 Head {h00=0x0020, h01=0x0050, text=» ORR A2,A1 GET MOST SIGN BIT«, t00=0x002a, t01=0x0114}
0x42c0…42d2 Head {h00=0x000e, h01=0x0050, text=» ADK A2,5 «, t00=0x002a, t01=0x0138}
0x42d2…42f6 Head {h00=0x0020, h01=0x0050, text=» SRL A2,1 NO OF WORDS NEEDED«, t00=0x002a, t01=0x014a}
0x42f6…4316 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DMT570 WRONG SIZE«, t00=0x002a, t01=0x016e}
0x4316…4322 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002a, t01=0x018e}
0x4322…4344 Head {h00=0x001e, h01=0x0050, text=» LD A4,MXIND LENGTH MXIND «, t00=0x002b, t01=0x000a}
0x4344…4362 Head {h00=0x001a, h01=0x0050, text=» SUK A4,4 MAX A5 VALUE«, t00=0x002b, t01=0x002c}
0x4362…437c Head {h00=0x0016, h01=0x0050, text=» LDKL A5,-2 OFFSET«, t00=0x002b, t01=0x004a}
0x437c…4390 Head {h00=0x0010, h01=0x0050, text=»DMT540 EQU *«, t00=0x002b, t01=0x0064}
0x4390…43ac Head {h00=0x0018, h01=0x0050, text=» ADK A5,4 GET ENTRY «, t00=0x002b, t01=0x0078}
0x43ac…43be Head {h00=0x000e, h01=0x0050, text=» CWR A5,A4«, t00=0x002b, t01=0x0094}
0x43be…43e2 Head {h00=0x0020, h01=0x0050, text=» RF(G) DMT570 NO ENTRY FOUND«, t00=0x002b, t01=0x00a6}
0x43e2…43fa Head {h00=0x0014, h01=0x0050, text=» LD A3,MXIND,A5 «, t00=0x002b, t01=0x00ca}
0x43fa…441a Head {h00=0x001c, h01=0x0050, text=» RB(Z) DMT540 ZERO ENTRY«, t00=0x002b, t01=0x00e2}
0x441a…4434 Head {h00=0x0016, h01=0x0050, text=» LD A6,MXIND+2,A5 «, t00=0x002b, t01=0x0102}
0x4434…4454 Head {h00=0x001c, h01=0x0050, text=» RB(N) DMT540 ENTRY USED«, t00=0x002b, t01=0x011c}
0x4454…4478 Head {h00=0x0020, h01=0x0050, text=» SUR A6,A2 NO OF SPARE WORDS«, t00=0x002b, t01=0x013c}
0x4478…44a2 Head {h00=0x0026, h01=0x0050, text=» RB(N) DMT540 LARGER ENTRY NEEDED «, t00=0x002b, t01=0x0160}
0x44a2…44ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x018a}
0x44ac…44ce (44, 0, 400) Head {h00=0x001e, h01=0x0050, text=»* SUFFICIENT SPACE FOUND«, t00=0x002c, t01=0x0004}
0x44ce…44d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0026}
0x44d8…44f8 Head {h00=0x001c, h01=0x0050, text=» LDKL A1,/8000 USED BIT «, t00=0x002c, t01=0x0030}
0x44f8…4522 Head {h00=0x0026, h01=0x0050, text=» ORS A1,MXIND+2,A5 MARK ENTRY USED«, t00=0x002c, t01=0x0050}
0x4522…454a Head {h00=0x0024, h01=0x0050, text=» ST A3,TASMXA MASTER INDEX ADDR «, t00=0x002c, t01=0x007a}
0x454a…4564 Head {h00=0x0016, h01=0x0050, text=» ST A3,FDBMIA,A12 «, t00=0x002c, t01=0x00a2}
0x4564…4580 Head {h00=0x0018, h01=0x0050, text=» LD A7,FDBLRN+1,A12 «, t00=0x002c, t01=0x00bc}
0x4580…45a0 Head {h00=0x001c, h01=0x0050, text=» STR A7,A3 NO OF ENTRIES«, t00=0x002c, t01=0x00d8}
0x45a0…45ba Head {h00=0x0016, h01=0x0050, text=» LD A1,FDBRLE,A12 «, t00=0x002c, t01=0x00f8}
0x45ba…45da Head {h00=0x001c, h01=0x0050, text=» ST A1,2,A3 ENTRY LENGTH«, t00=0x002c, t01=0x0112}
0x45da…45fc Head {h00=0x001e, h01=0x0050, text=» ADK A3,4 SKIP MX HEADRER «, t00=0x002c, t01=0x0132}
0x45fc…4620 Head {h00=0x0020, h01=0x0050, text=» ST A3,ECBBA,A8 BUFFER ADDR «, t00=0x002c, t01=0x0154}
0x4620…4640 Head {h00=0x001c, h01=0x0050, text=» ST A1,ECBRL,A8 REQ LGTH«, t00=0x002c, t01=0x0178}
0x4640…4672 Head {h00=0x002e, h01=0x0050, text=» LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION«, t00=0x002d, t01=0x0008}
0x4672…4690 Head {h00=0x001a, h01=0x0050, text=» CWR A1,A4 MXIND ENTRY«, t00=0x002d, t01=0x003a}
0x4690…46b2 Head {h00=0x001e, h01=0x0050, text=» RF(NL) DMT590 LAST ENTRY «, t00=0x002d, t01=0x0058}
0x46b2…46cc Head {h00=0x0016, h01=0x0050, text=» LD A3,MXIND+6,A1 «, t00=0x002d, t01=0x007a}
0x46cc…46f2 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMT590 NEXT ENTRY USED «, t00=0x002d, t01=0x0094}
0x46f2…46fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ba}
0x46fc…4726 Head {h00=0x0026, h01=0x0050, text=»* MOVE SPARE WORDS TO NEXT ENTRY«, t00=0x002d, t01=0x00c4}
0x4726…4730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ee}
0x4730…474a Head {h00=0x0016, h01=0x0050, text=» LD A2,MXIND+2,A1 «, t00=0x002d, t01=0x00f8}
0x474a…4770 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/7FFF REMOVE USE BIT «, t00=0x002d, t01=0x0112}
0x4770…4782 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A6«, t00=0x002d, t01=0x0138}
0x4782…47a0 Head {h00=0x001a, h01=0x0050, text=» ORKL A2,/8000 USE BIT«, t00=0x002d, t01=0x014a}
0x47a0…47ba Head {h00=0x0016, h01=0x0050, text=» ST A2,MXIND+2,A1 «, t00=0x002d, t01=0x0168}
0x47ba…47ec Head {h00=0x002e, h01=0x0050, text=» ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER «, t00=0x002d, t01=0x0182}
0x47ec…4814 Head {h00=0x0024, h01=0x0050, text=» LD A7,MXIND,A1 PREVIOUS POINTER«, t00=0x002e, t01=0x0024}
0x4814…4832 Head {h00=0x001a, h01=0x0050, text=» SLL A2,1 NO OF BYTES «, t00=0x002e, t01=0x004c}
0x4832…4844 Head {h00=0x000e, h01=0x0050, text=» ADR A7,A2«, t00=0x002e, t01=0x006a}
0x4844…485e Head {h00=0x0016, h01=0x0050, text=» ST A7,MXIND+4,A1 «, t00=0x002e, t01=0x007c}
0x485e…486c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0096}
0x486c…4880 Head {h00=0x0010, h01=0x0050, text=»DMT590 EQU *«, t00=0x002e, t01=0x00a4}
0x4880…488c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x002e, t01=0x00b8}
0x488c…4896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00c4}
0x4896…48cc Head {h00=0x0032, h01=0x0050, text=»* NOW READ MASTER INDEX WITH SEQUENTIAL READ«, t00=0x002e, t01=0x00ce}
0x48cc…48e4 Head {h00=0x0014, h01=0x0050, text=»* A8 = TASECB «, t00=0x002e, t01=0x0104}
0x48e4…4920 Head {h00=0x0038, h01=0x0050, text=»* OTHER REQ TO THE SAME FILE CODE ARE NOT POSSIBLE«, t00=0x002e, t01=0x011c}
0x4920…4960 Head {h00=0x003c, h01=0x0050, text=»* BECAUSE AN INDEX FILE MUST ALWAYS BE ASSIGNED COMMON«, t00=0x002e, t01=0x0158}
0x4960…496a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0008}
0x496a…497e Head {h00=0x0010, h01=0x0050, text=»DMT550 EQU *«, t00=0x002f, t01=0x0012}
0x497e…49a8 Head {h00=0x0026, h01=0x0050, text=» LDK A7,/42 SEQ READ,NOWAIT,NO EA «, t00=0x002f, t01=0x0026}
0x49a8…49b4 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002f, t01=0x0050}
0x49b4…49c4 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x002f, t01=0x005c}
0x49c4…49d8 Head {h00=0x0010, h01=0x0050, text=» DATA DMTAR5«, t00=0x002f, t01=0x006c}
0x49d8…49e4 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002f, t01=0x0080}
0x49e4…49f8 Head {h00=0x0010, h01=0x0050, text=» DATA 3 EXIT«, t00=0x002f, t01=0x008c}
0x49f8…4a0c Head {h00=0x0010, h01=0x0050, text=»DMTAR5 EQU *«, t00=0x002f, t01=0x00a0}
0x4a0c…4a32 Head {h00=0x0022, h01=0x0050, text=» LDKL A14,DMTA14 RESTORE STACK«, t00=0x002f, t01=0x00b4}
0x4a32…4a52 Head {h00=0x001c, h01=0x0050, text=» LDKL A8,TASECB ECB ADDR«, t00=0x002f, t01=0x00da}
0x4a52…4a6a Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRC,A8 «, t00=0x002f, t01=0x00fa}
0x4a6a…4a94 Head {h00=0x0026, h01=0x0050, text=» ANKL A2,/FEFF BIT 7 ONLY RETRIES «, t00=0x002f, t01=0x0112}
0x4a94…4ab2 Head {h00=0x001a, h01=0x0050, text=» RF(Z) DMT560 NO ERROR«, t00=0x002f, t01=0x013c}
0x4ab2…4abc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x015a}
0x4abc…4ae2 Head {h00=0x0022, h01=0x0050, text=»* REMOVE THE ONLY CRN BUFFER«, t00=0x002f, t01=0x0164}
0x4ae2…4aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x018a}
0x4aec…4b0a (48, 0, 400) Head {h00=0x001a, h01=0x0050, text=» LD A4,TASFDB FDB ADDR«, t00=0x0030, t01=0x0004}
0x4b0a…4b2e Head {h00=0x0020, h01=0x0050, text=» LD A5,FDBCRL,A4 CRN BUF ADR«, t00=0x0030, t01=0x0022}
0x4b2e…4b4a Head {h00=0x0018, h01=0x0050, text=» RF(Z) DMT553 NO CRN«, t00=0x0030, t01=0x0046}
0x4b4a…4b60 Head {h00=0x0012, h01=0x0050, text=» CM FDBCRL,A4 «, t00=0x0030, t01=0x0062}
0x4b60…4b6c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0030, t01=0x0078}
0x4b6c…4b82 Head {h00=0x0012, h01=0x0050, text=» LD A6,CRNQUE «, t00=0x0030, t01=0x0084}
0x4b82…4b94 Head {h00=0x000e, h01=0x0050, text=» STR A6,A5«, t00=0x0030, t01=0x009a}
0x4b94…4baa Head {h00=0x0012, h01=0x0050, text=» ST A5,CRNQUE «, t00=0x0030, t01=0x00ac}
0x4baa…4bb6 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0030, t01=0x00c2}
0x4bb6…4bca Head {h00=0x0010, h01=0x0050, text=»DMT553 EQU *«, t00=0x0030, t01=0x00ce}
0x4bca…4bec Head {h00=0x001e, h01=0x0050, text=» ANKL A2,/1000 BIT 3 = EOF«, t00=0x0030, t01=0x00e2}
0x4bec…4c20 Head {h00=0x0030, h01=0x0050, text=» RF(NZ) DMT595 READY ,WHOLIE MXINDEX IS READ«, t00=0x0030, t01=0x0104}
0x4c20…4c32 Head {h00=0x000e, h01=0x0050, text=» LDK A7,7 «, t00=0x0030, t01=0x0138}
0x4c32…4c54 Head {h00=0x001e, h01=0x0050, text=»DMT555 SUR A8,A8 NO BUFFER«, t00=0x0030, t01=0x014a}
0x4c54…4c74 Head {h00=0x001c, h01=0x0050, text=» ABL DMTASX DISC IO ERR «, t00=0x0030, t01=0x016c}
0x4c74…4c88 Head {h00=0x0010, h01=0x0050, text=»DMT560 EQU *«, t00=0x0030, t01=0x018c}
0x4c88…4c92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0010}
0x4c92…4cb4 Head {h00=0x001e, h01=0x0050, text=»* RECORD READ,READ NEXRT«, t00=0x0031, t01=0x001a}
0x4cb4…4cbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x003c}
0x4cbe…4cd6 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A8 «, t00=0x0031, t01=0x0046}
0x4cd6…4cfa Head {h00=0x0020, h01=0x0050, text=» ADS A2,ECBBA,A8 REC LENGTH «, t00=0x0031, t01=0x005e}
0x4cfa…4d1e Head {h00=0x0020, h01=0x0050, text=» RB DMT550 READ NEXT RECORD «, t00=0x0031, t01=0x0082}
0x4d1e…4d32 Head {h00=0x0010, h01=0x0050, text=»DMT570 EQU *«, t00=0x0031, t01=0x00a6}
0x4d32…4d3e Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0031, t01=0x00ba}
0x4d3e…4d5e Head {h00=0x001c, h01=0x0050, text=» LDK A7,3 NOT SUFF SPACE«, t00=0x0031, t01=0x00c6}
0x4d5e…4d70 Head {h00=0x000e, h01=0x0050, text=» RB DMT555«, t00=0x0031, t01=0x00e6}
0x4d70…4d7e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x00f8}
0x4d7e…4d92 Head {h00=0x0010, h01=0x0050, text=»DMT595 EQU *«, t00=0x0031, t01=0x0106}
0x4d92…4d9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x011a}
0x4d9c…4dd2 Head {h00=0x0032, h01=0x0050, text=»* MASTER INDE X READUY. RERUN FOR INDEX FILE«, t00=0x0031, t01=0x0124}
0x4dd2…4ddc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x015a}
0x4ddc…4dee Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0031, t01=0x0164}
0x4dee…4e0e Head {h00=0x001c, h01=0x0050, text=» ST A1,TASFIL INDEX FILE«, t00=0x0031, t01=0x0176}
0x4e0e…4e34 Head {h00=0x0022, h01=0x0050, text=» LD A3,TASSPW TTAB ADR DMTASK «, t00=0x0032, t01=0x0008}
0x4e34…4e58 Head {h00=0x0020, h01=0x0050, text=» CM TTB:TD+2,A3 DELETE ENTRY«, t00=0x0032, t01=0x002e}
0x4e58…4e70 Head {h00=0x0014, h01=0x0050, text=» CM TTB:TD+4,A3 «, t00=0x0032, t01=0x0052}
0x4e70…4e8e Head {h00=0x001a, h01=0x0050, text=» LD A3,TASFDB FDB ADDR«, t00=0x0032, t01=0x006a}
0x4e8e…4ea4 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FFFE«, t00=0x0032, t01=0x0088}
0x4ea4…4eca Head {h00=0x0022, h01=0x0050, text=» ANRS A2,A3 CLEAR FDB USE BIT «, t00=0x0032, t01=0x009e}
0x4eca…4ef6 Head {h00=0x0028, h01=0x0050, text=» CM TASFDB EXT 0 NOT FOUND FOR INDEX«, t00=0x0032, t01=0x00c4}
0x4ef6…4f08 Head {h00=0x000e, h01=0x0050, text=» LDK A1,16«, t00=0x0032, t01=0x00f0}
0x4f08…4f32 Head {h00=0x0026, h01=0x0050, text=» ST A1,TASCXO LAST ENTRY POSSIBLE «, t00=0x0032, t01=0x0102}
0x4f32…4f44 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0032, t01=0x012c}
0x4f44…4f7a Head {h00=0x0032, h01=0x0050, text=»* TASCVO REMAINS ZERO FROM MASTER INDEX LOOP«, t00=0x0032, t01=0x013e}
0x4f7a…4f9a Head {h00=0x001c, h01=0x0050, text=» ABL DMT050 ASSIGN INDEX«, t00=0x0032, t01=0x0174}
0x4f9a…4fa8 (51, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x0004}
0x4fa8…4fbc Head {h00=0x0010, h01=0x0050, text=»DMT600 EQU *«, t00=0x0033, t01=0x0012}
0x4fbc…4fc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0026}
0x4fc6…4fe4 Head {h00=0x001a, h01=0x0050, text=»* INDEX FILE ASSIGN «, t00=0x0033, t01=0x0030}
0x4fe4…4fee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x004e}
0x4fee…500a Head {h00=0x0018, h01=0x0050, text=» LDK A7,10 RET CODE «, t00=0x0033, t01=0x0058}
0x500a…5034 Head {h00=0x0026, h01=0x0050, text=» LD A10,TASFDD FDB ADDR DATA FILEP«, t00=0x0033, t01=0x0074}
0x5034…5056 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DMT650 NO DATA FILE«, t00=0x0033, t01=0x009e}
0x5056…5060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00c0}
0x5060…508e Head {h00=0x002a, h01=0x0050, text=»* STORE INDEX ADDR IN FDB DATA FILE «, t00=0x0033, t01=0x00ca}
0x508e…5098 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00f8}
0x5098…50aa Head {h00=0x000e, h01=0x0050, text=» INH INH«, t00=0x0033, t01=0x0102}
0x50aa…50c2 Head {h00=0x0014, h01=0x0050, text=» LC A3,DWTST,A10«, t00=0x0033, t01=0x0114}
0x50c2…50d6 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/40 «, t00=0x0033, t01=0x012c}
0x50d6…5100 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) DMT639 OTHER REQUEST BUSY «, t00=0x0033, t01=0x0140}
0x5100…5122 Head {h00=0x001e, h01=0x0050, text=» LDK A3,8 MAX NO OF INDE*2«, t00=0x0033, t01=0x016a}
0x5122…5136 Head {h00=0x0010, h01=0x0050, text=»DMT620 EQU *«, t00=0x0033, t01=0x018c}
0x5136…5148 Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0034, t01=0x0010}
0x5148…5170 Head {h00=0x0024, h01=0x0050, text=» RF(N) DMT640 MORE THAN 4 INDEX «, t00=0x0034, t01=0x0022}
0x5170…5184 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A10 «, t00=0x0034, t01=0x004a}
0x5184…5196 Head {h00=0x000e, h01=0x0050, text=» ADR A6,A3«, t00=0x0034, t01=0x005e}
0x5196…51ae Head {h00=0x0014, h01=0x0050, text=» LD A2,FDBAI1,A6«, t00=0x0034, t01=0x0070}
0x51ae…51ca Head {h00=0x0018, h01=0x0050, text=» RB(NZ) DMT620 USED «, t00=0x0034, t01=0x0088}
0x51ca…51f8 Head {h00=0x002a, h01=0x0050, text=» ST A12,FDBAI1,A6 STORE FDB ADDR INDEX«, t00=0x0034, t01=0x00a4}
0x51f8…5202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00d2}
0x5202…5242 Head {h00=0x003c, h01=0x0050, text=»* MOVE FDB ADDRESSES FROM DATA FILE TO ALL INDEX FILES«, t00=0x0034, t01=0x00dc}
0x5242…524c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x011c}
0x524c…526c Head {h00=0x001c, h01=0x0050, text=» LDK A5,8 NR OF INDEX *2«, t00=0x0034, t01=0x0126}
0x526c…5280 Head {h00=0x0010, h01=0x0050, text=»DMT625 EQU *«, t00=0x0034, t01=0x0146}
0x5280…5292 Head {h00=0x000e, h01=0x0050, text=» SUK A5,2 «, t00=0x0034, t01=0x015a}
0x5292…52b8 Head {h00=0x0022, h01=0x0050, text=» RF(N) DMT635 ALL FDB UPPDATED«, t00=0x0034, t01=0x016c}
0x52b8…52d4 (53, 0, 398) Head {h00=0x0018, h01=0x0050, text=» LDR A1,A10 FDB DATA«, t00=0x0035, t01=0x0004}
0x52d4…52e6 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A5«, t00=0x0035, t01=0x0020}
0x52e6…530e Head {h00=0x0024, h01=0x0050, text=» LD A3,FDBAI1,A1 FDB ADDR INDEX «, t00=0x0035, t01=0x0032}
0x530e…5332 Head {h00=0x0020, h01=0x0050, text=» RB(Z) DMT625 NO INDEX FILE «, t00=0x0035, t01=0x005a}
0x5332…534a Head {h00=0x0014, h01=0x0050, text=» LDKL A1,FDBADF «, t00=0x0035, t01=0x007e}
0x534a…5364 Head {h00=0x0016, h01=0x0050, text=» ADR A3,A1 TO ADDR«, t00=0x0035, t01=0x0096}
0x5364…5382 Head {h00=0x001a, h01=0x0050, text=» ADR A1,A10 FROM ADDR «, t00=0x0035, t01=0x00b0}
0x5382…53a0 Head {h00=0x001a, h01=0x0050, text=» LDK A2,10 NO OF BYTES«, t00=0x0035, t01=0x00ce}
0x53a0…53c2 Head {h00=0x001e, h01=0x0050, text=» CF A14,DMTWM MOVE 5 WORDS«, t00=0x0035, t01=0x00ec}
0x53c2…53d4 Head {h00=0x000e, h01=0x0050, text=» RB DMT625«, t00=0x0035, t01=0x010e}
0x53d4…53e8 Head {h00=0x0010, h01=0x0050, text=»DMT635 EQU *«, t00=0x0035, t01=0x0120}
0x53e8…5400 Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTST,A10«, t00=0x0035, t01=0x0134}
0x5400…5434 Head {h00=0x0030, h01=0x0050, text=» SC A1,DWTST,A12 SAME BUSY BITS AS DATA FILE«, t00=0x0035, t01=0x014c}
0x5434…5446 Head {h00=0x000e, h01=0x0050, text=» ENB ENB«, t00=0x0035, t01=0x0180}
0x5446…545c (54, 0, 400) Head {h00=0x0012, h01=0x0050, text=» LD A1,TASMXA «, t00=0x0036, t01=0x0004}
0x545c…5488 Head {h00=0x0028, h01=0x0050, text=» ST A1,FDBMIA,A12 MASTER INDEX ADDR «, t00=0x0036, t01=0x001a}
0x5488…549a Head {h00=0x000e, h01=0x0050, text=» RF DMT720«, t00=0x0036, t01=0x0046}
0x549a…54c6 Head {h00=0x0028, h01=0x0050, text=»DMT639 ADK A7,2 A7=13=OTHER REQ BUSY«, t00=0x0036, t01=0x0058}
0x54c6…54f4 Head {h00=0x002a, h01=0x0050, text=»DMT640 ADK A7,1 A7=11=4 INDEX ALREADY «, t00=0x0036, t01=0x0084}
0x54f4…551c Head {h00=0x0024, h01=0x0050, text=»DMT650 EQU * A7=10=NO DATA FILE «, t00=0x0036, t01=0x00b2}
0x551c…5530 Head {h00=0x0010, h01=0x0050, text=» ABL DMTASX «, t00=0x0036, t01=0x00da}
0x5530…553c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00ee}
0x553c…554a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x00fa}
0x554a…5570 Head {h00=0x0022, h01=0x0050, text=»DMT700 EQU * ASSIGN DATA FILE «, t00=0x0036, t01=0x0108}
0x5570…559a Head {h00=0x0026, h01=0x0050, text=» ST A12,FDBADF,A12 FDB ADDR TO FDB«, t00=0x0036, t01=0x012e}
0x559a…55bc Head {h00=0x001e, h01=0x0050, text=» LD* A1,TASASB ASBLK ADDR «, t00=0x0036, t01=0x0158}
0x55bc…55d2 Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/6000«, t00=0x0036, t01=0x017a}
0x55d2…55e4 Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0036, t01=0x0190}
0x55e4…560c Head {h00=0x0024, h01=0x0050, text=» ORS A1,FDBDBR,A12 DELAY + BASIC«, t00=0x0037, t01=0x0012}
0x560c…5620 Head {h00=0x0010, h01=0x0050, text=»DMT720 EQU *«, t00=0x0037, t01=0x003a}
0x5620…562a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x004e}
0x562a…5656 Head {h00=0x0028, h01=0x0050, text=»* SET FDBMRN TO MAX REC NO IN FILE«, t00=0x0037, t01=0x0058}
0x5656…5660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0084}
0x5660…5674 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A12 «, t00=0x0037, t01=0x008e}
0x5674…568c Head {h00=0x0014, h01=0x0050, text=» ADKL A1,FDBNIF «, t00=0x0037, t01=0x00a2}
0x568c…56a6 Head {h00=0x0016, h01=0x0050, text=» ADKL A1,EXTELE-2 «, t00=0x0037, t01=0x00ba}
0x56a6…56c4 Head {h00=0x001a, h01=0x0050, text=»DMT750 SUKL A1,EXTELE «, t00=0x0037, t01=0x00d4}
0x56c4…56e0 Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A1 EXT BASE«, t00=0x0037, t01=0x00f2}
0x56e0…56f6 Head {h00=0x0012, h01=0x0050, text=» RB(Z) DMT750 «, t00=0x0037, t01=0x010e}
0x56f6…570a Head {h00=0x0010, h01=0x0050, text=» AD A2,-2,A1«, t00=0x0037, t01=0x0124}
0x570a…5724 Head {h00=0x0016, h01=0x0050, text=» SUKL A1,EXTELE-2 «, t00=0x0037, t01=0x0138}
0x5724…573e Head {h00=0x0016, h01=0x0050, text=» ST A1,FDBCEX,A12 «, t00=0x0037, t01=0x0152}
0x573e…5750 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0037, t01=0x016c}
0x5750…576a Head {h00=0x0016, h01=0x0050, text=» ST A2,FDBSNR,A12 «, t00=0x0037, t01=0x017e}
0x576a…577e Head {h00=0x0010, h01=0x0050, text=» LDR A1,A12 «, t00=0x0038, t01=0x0008}
0x577e…57a4 Head {h00=0x0022, h01=0x0050, text=» CF A14,GTLGRN GET LOG REC NO «, t00=0x0038, t01=0x001c}
0x57a4…57b6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0038, t01=0x0042}
0x57b6…57dc Head {h00=0x0022, h01=0x0050, text=» LC A1,FDBBLF,A12 BLOCK FACTOR«, t00=0x0038, t01=0x0054}
0x57dc…57ee Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0038, t01=0x007a}
0x57ee…5800 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A1«, t00=0x0038, t01=0x008c}
0x5800…5816 Head {h00=0x0012, h01=0x0050, text=» RF(O) DMT760 «, t00=0x0038, t01=0x009e}
0x5816…5828 Head {h00=0x000e, h01=0x0050, text=» RF DMT770«, t00=0x0038, t01=0x00b4}
0x5828…5844 Head {h00=0x0018, h01=0x0050, text=»DMT760 ANKL A3,/7FFF«, t00=0x0038, t01=0x00c6}
0x5844…585c Head {h00=0x0014, h01=0x0050, text=» ADK A2,1 CARRY «, t00=0x0038, t01=0x00e2}
0x585c…587c Head {h00=0x001c, h01=0x0050, text=»DMT770 SC A2,FDBMRN,A12 «, t00=0x0038, t01=0x00fa}
0x587c…5898 Head {h00=0x0018, h01=0x0050, text=» ST A3,FDBMRN+1,A12 «, t00=0x0038, t01=0x011a}
0x5898…58a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0136}
0x58a2…58da Head {h00=0x0034, h01=0x0050, text=»* CALCULATE FDBMRO WHICH IS MAX FDBRRO IN FILE«, t00=0x0038, t01=0x0140}
0x58da…58e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0178}
0x58e4…5908 Head {h00=0x0020, h01=0x0050, text=» LD A6,FDBRLE,A12 REC LENGTH«, t00=0x0038, t01=0x0182}
0x5908…591a Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0039, t01=0x0016}
0x591a…592c Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0039, t01=0x0028}
0x592c…5950 Head {h00=0x0020, h01=0x0050, text=» LC A7,FDBBLF,A12 BLOCK FACT«, t00=0x0039, t01=0x003a}
0x5950…5962 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0039, t01=0x005e}
0x5962…5984 Head {h00=0x001e, h01=0x0050, text=» CF A14,MPYMOD A1,A2=A6*A7«, t00=0x0039, t01=0x0070}
0x5984…59a8 Head {h00=0x0020, h01=0x0050, text=» ST A2,FDBMRO,A12 MAX FDBRRO«, t00=0x0039, t01=0x0092}
0x59a8…59bc Head {h00=0x0010, h01=0x0050, text=» ABL DMT400 «, t00=0x0039, t01=0x00b6}
0x59bc…59c8 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0039, t01=0x00ca}
0x59c8…59cc Head {h00=0x4004, h01=0x0000}
0x59cc…59d0 00 39 00 d6 ┆ 9 ┆
0x59d0…59d8 (58, 1, 8) 20 04 00 00 00 3a 00 04 ┆ : ┆
0x59d8…5a28 (59, 0, 400) 5c 45 51 55 5c 2a 00 3a 01 8a 00 1e 00 50 5c 41 4e 4b 4c 5c 41 33 2c 2f 46 46 46 45 5c 20 20 46 44 42 20 41 44 44 52 20 00 3b 00 0e 00 22 00 50 5c 52 46 28 5a 29 5c 44 4d 54 39 38 30 5c 41 4c 4c 20 46 44 42 53 20 43 48 45 43 4b 45 44 00 3b ┆ EQU * : P ANKL A3,/FFFE FDB ADDR ; " P RF(Z) DMT980 ALL FDBS CHECKED ;┆
0x5a28…5a78 00 30 00 10 00 50 5c 4c 44 52 2a 5c 41 37 2c 41 33 20 00 3b 00 56 00 0e 00 50 5c 41 4e 4b 5c 41 37 2c 31 20 00 3b 00 6a 00 16 00 50 5c 52 42 28 5a 29 5c 44 4d 54 39 32 30 5c 46 52 45 45 00 3b 00 7c 00 0e 00 50 5c 43 57 52 5c 41 36 2c 41 33 ┆ 0 P LDR* A7,A3 ; V P ANK A7,1 ; j P RB(Z) DMT920 FREE ; | P CWR A6,A3┆
0x5a78…5ac8 00 3b 00 96 00 1e 00 50 5c 52 42 28 45 29 5c 44 4d 54 39 32 30 5c 43 55 52 52 45 4e 54 20 46 44 42 20 00 3b 00 a8 00 1c 00 50 5c 4c 44 4b 5c 41 37 2c 34 5c 45 58 54 45 4e 54 20 43 4f 55 4e 54 45 52 00 3b 00 ca 00 18 00 50 5c 4c 44 52 5c 41 ┆ ; P RB(E) DMT920 CURRENT FDB ; P LDK A7,4 EXTENT COUNTER ; P LDR A┆
0x5ac8…5b18 32 2c 41 33 5c 46 44 42 20 41 44 44 52 20 00 3b 00 ea 00 16 00 50 5c 41 44 4b 4c 5c 41 32 2c 46 44 42 45 58 54 2b 31 20 00 3b 01 06 00 1c 00 50 2a 5c 5c 5c 41 44 44 52 20 4f 46 20 31 53 54 20 56 4f 4c 20 43 4f 44 45 00 3b 01 20 00 26 00 50 ┆2,A3 FDB ADDR ; P ADKL A2,FDBEXT+1 ; P* ADDR OF 1ST VOL CODE ; & P┆
0x5b18…5b68 5c 53 55 4b 4c 5c 41 32 2c 45 58 54 45 4c 45 5c 45 58 54 20 4c 45 4e 47 54 48 20 49 4e 20 46 44 42 20 00 3b 01 40 00 10 00 50 44 4d 54 39 33 30 5c 45 51 55 5c 2a 00 3b 01 6a 00 0e 00 50 5c 53 55 4b 5c 41 37 2c 31 20 00 3b 01 7e 00 26 00 50 ┆ SUKL A2,EXTELE EXT LENGTH IN FDB ; @ PDMT930 EQU * ; j P SUK A7,1 ; ~ & P┆
0x5b68…5bb8 (60, 0, 400) 5c 52 42 28 4e 29 5c 44 4d 54 39 32 30 5c 41 4c 4c 20 45 58 54 45 4e 54 53 20 43 48 45 43 4b 45 44 20 00 3b 01 90 00 14 00 50 5c 41 44 4b 4c 5c 41 32 2c 45 58 54 45 4c 45 20 00 3c 00 2a 00 1a 00 50 5c 43 43 52 5c 41 34 2c 41 32 5c 56 4f 4c ┆ RB(N) DMT920 ALL EXTENTS CHECKED ; P ADKL A2,EXTELE < * P CCR A4,A2 VOL┆
0x5bb8…5c08 55 4d 45 20 43 4f 44 45 00 3c 00 42 00 28 00 50 5c 41 42 4c 28 45 29 5c 44 4d 54 38 38 30 5c 43 4f 44 45 20 55 53 45 44 2e 20 4e 4f 20 55 4e 4c 4f 43 4b 20 00 3c 00 60 00 1a 00 50 5c 52 42 5c 44 4d 54 39 33 30 5c 4e 45 58 54 20 45 58 54 45 ┆UME CODE < B ( P ABL(E) DMT880 CODE USED. NO UNLOCK < ` P RB DMT930 NEXT EXTE┆
0x5c08…5c58 4e 54 00 3c 00 8c 00 06 00 50 2a 20 00 3c 00 aa 00 26 00 50 2a 20 20 20 41 4c 4c 20 46 53 44 42 53 20 43 48 45 43 4b 45 44 2e 20 4d 41 4b 45 20 55 4e 4c 4f 41 44 00 3c 00 b4 00 06 00 50 2a 20 00 3c 00 de 00 10 00 50 44 4d 54 39 38 30 5c 45 ┆NT < P* < & P* ALL FSDBS CHECKED. MAKE UNLOAD < P* < PDMT980 E┆
0x5c58…5ca8 51 55 5c 2a 00 3c 00 e8 00 0e 00 50 5c 45 4e 42 5c 5c 5c 45 4e 42 00 3c 00 fc 00 06 00 50 2a 20 00 3c 01 0e 00 36 00 50 2a 20 20 20 4e 4f 54 45 20 54 48 41 54 20 45 43 42 42 55 46 20 49 53 20 41 53 53 55 4d 45 44 20 4e 4f 54 20 54 4f 20 42 ┆QU * < P ENB ENB < P* < 6 P* NOTE THAT ECBBUF IS ASSUMED NOT TO B┆
0x5ca8…5cf8 45 20 43 48 41 4e 47 45 44 20 00 3c 01 18 00 1a 00 50 2a 20 20 20 57 49 54 48 20 54 48 49 53 20 52 45 51 55 45 53 54 20 00 3c 01 52 00 06 00 50 2a 20 00 3c 01 70 00 1c 00 50 5c 53 43 5c 41 34 2c 45 43 42 46 43 2c 41 38 5c 56 4f 4c 20 43 4f ┆E CHANGED < P* WITH THIS REQUEST < R P* < p P SC A4,ECBFC,A8 VOL CO┆