|
|
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: 17586 (0x44b2)
Notes: pts_type(SC)
Names: »TASS.SC«
└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
└─⟦this⟧ »TOSSWORK/TASS.SC«
└─⟦781e933ac⟧ Bits:30009686 Philips computer tape "600310"
└─⟦this⟧ »M:92T1/TASS.SC«
└─⟦7e2393f80⟧ Bits:30009710 Philips computer tape "M_KONV"
└─⟦this⟧ »M:KONV/TASS.SC«
└─⟦7f25f14aa⟧ Bits:30009683 Philips computer tape "600307"
└─⟦this⟧ »M:92F4/TASS.SC«
└─⟦f740ae34d⟧ Bits:30009708 Philips computer tape "M_92F3"
└─⟦this⟧ »M:92F3/TASS.SC«
IDENT TASS REL 9.2 79-11-16 870105040920 =1, PR 4313 * REL 9.1 78-10-25 * * **************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * TASS = ASSIGN FILE CODE ACTIVATION PART * * * * * * **************************************************** * * THIS MODULE IS ENTERED VIA * ASSIGN REQUEST (DATA 15) OR * ASSIGN INDEX REQUEST (DATA 16). * * LDK A7,TC * LDKL A8,ASBLK * LKM * DATA 15 * * INPUT A5 = TTAB ADDRESS * A7 = TC * A8 = ASBLK ADDRESS * WHERE ASBLK IS A PARAMETER BLOCK * AND TC = 1 WHEN TASK LOCAL ASSIGN IN TTAB IS WANTED * TC = 0 WHEN GLOBAL ASSIGN IN SCTCDT IS WANETED * EJECT * +----------+----------+ * ASBLK I NO OF VOL FC I * +----------+----------+ * I I * I FILE NAME I * I I * I I * +---------------------+ * I I * I VOL NAME I * I I * +---------------------+ * I I * * MAX 4 VOL NAMES CAN BE GIVEN * * * A CONECTION BETWEEN THE FILE CODE IN ASBLK AND A FDB IS * CREATED IN TTAB/CD:TAB. * * THE FDB IS INITIALIZED WITH INFORMATION FROM THE VTOC:S OF THE * VOLUMES MENTIONED IN ASBLK. * * UPON COMPLETION OF THE ASSIGN REQUEST REG A7 WILL HAVE ONE OF THE * FOLLOWING RETURN CODES: * * 0 = CORRECT RETURN ASSIGNMENT PERFORMED * -1 = REQUEST ERROR * 1 = DISC I/O ERROR * 2 = NO FREE ENTRY IN TABLE * 3 = NO FDB AVAILABLE * 4 = ONE OR MORE VOLUMES UNKNOWN * 5 = FILE CODE ALREADY USED * 6 = FILE NAME UNKNOWN * 7 = FILE SECTION MISSING OR FOUND TWICE * 8 = FAULTY DISC FORMAT * 9 = MORE THAN 4 EXTENTS EXIST * EJECT * THIS MODULE IS ENTERED VIA * LDKL A8,ASBLK * LKM * DATA 16 * * INPUT A5 = TTAB ADDRESS * A8 = ASBLK ADDRESS * WHERE ASBLK IS A PARAMETER BLOCK * +----------+----------+ * ASBLK I NO OF VOL FC I * +----------+----------+ * I I * I FILE NAME I * I I * +---------------------+ * I I * I VOL NAME I * I I * +---------------------+ * I MASTER INDEX * I FILE NAME * * UPON COMPLETION OF THIS REQUEST REG A7 WILL HAVE ONE OF THE * FOLLOWING RETURN CODES: * 0 = CORRECT RETURN ASSIGNMENT PERFORMED * -1 = REQUEST ERROR * 1 = DISC I/O ERROR * 2 = NO FREE ENTRY IN TABLE * 3 = NO FDB AVAILABLE OR MASTER INDEX CORE AVAIL * 4 = ONE OR MORE VOLUMES UNKNOWN * 5 = FILE CODE ALREADY USED * 6 = FILE NAME UNKNOWN * 7 = FILE SECTION MISSING OR FOUND TWICE * 8 = FAULTY DISC FORMAT * 9 = MORE THAN 4 EXTENTS EXIST * 10= NO DATA FILE ASSIGNED * 11= 4 INDEX FILES ALREADY ASSIGNED * 12= MAX KEY LENGTH TOO SMALL * 13= REQUEST BUSY. REPEAT ASSIGN REQUEST EJECT * *************** * ENTRIES * *************** * ENTRY TASS ENTRY VOLCHE,IXTASS ENTRY TASBLK ENTRY TASQUE ENTRY TASTTA ENTRY TASASB ENTRY TASCVO ENTRY TASVOL ENTRY TASCXO ENTRY TASSEX ENTRY TASXLB ENTRY TASFDB ENTRY TASVRL ENTRY TASVLE ENTRY TASVRN ENTRY TASECB ENTRY TASFIL,TASTID,TASMXA,TASSPW ENTRY TASFDD,TASTBE ENTRY TASCAQ CHECK ASSIGN QUEUE ENTRY TASLFD =1 ENTRY TASHLT HALT SYSTEM DUE TO DM (SYSGEN) ERROR EJECT * ***************** * EXTERNALS * ***************** * EXTRN DFTAB EXTRN DFTABE EXTRN SCTCDT EXTRN DWTVOL EXTRN FNDTID EXTRN DMTASS EXTRN ACTOT EXTRN TDISP EXTRN QTJOB EXTRN LKMQDI EXTRN TTB:SA EXTRN TTB:TD,DMTASX EXTRN ECBFC,ECBRC EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA EXTRN HALT HALT SYSTEM ROUTINE EJECT TOSSIO * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * EJECT * ******************* * DATA AREAS * ******************* * TASBLK DATA 0 USE INDICATOR TASQUE DATA 0 ASSIGN QUEUE ANCOR TASTTA DATA 0 REQUESTING TTAB ADDRESS TASASB DATA 0 ASBLK ADDRESS TASCVO DATA 0 CURRENT OFFSET IN TASVOL TASVOL DATA 0 VOLUME IDENTIFICATION (DMI,FC) DATA 0,0,0 THREE MORE ENTRIES TASCXO DATA 0 CURRENT OFFSET IN TASSEX AND TASXLB TASSEX DATA 0 SECTION NUMBER, EXTENT NUMBER DATA 0 OFFSET IN TASVOL FOR THIS EXT DATA 0,0,0,0,0,0 THREE MORE ENTRIES TASXLB DATA 0 EXTENT LENGTH DATA 0 EXTENT BASE DATA 0,0,0,0,0,0 THREE MORE ENTRIES TASFDB DATA 0 FDB ADDRESS TASVRL DATA 0 VTOC RECORD LENGTH TASVLE DATA 0 VTOC LENGTH TASVRN DATA 0 VTOC RECORD NO TASECB DATA 0,0 ECBFC,ECBBA DATA 410 ECBRL DATA 0,0,0 ECBEL,-RC,-CW DATA 0 CW2 TASFIL DATA 0 0=DATA,1=INDEX,2=MASTER INDEX TASTID DATA 0 DMTSASK IDENT AT ASSIGN TASMXA DATA 0 MASTER INDEX ADDR TASSPW DATA 0 TTAB ADDRESS DMTASK TASFDD DATA 0 FDB ADDR DATA FILE TASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR TASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 DATA 0,0 DATA 0,0 TASS14 EQU *-2 TASS A14 STACK * IFT MMUPAG=1 MASBLK RES 17 ASSIGN BLOCK SAVE AREA XIF * EJECT ************** * TASCAQ * ************** * * ENTRY TASCAQ CHECK ASSIGN QUEUE * * A7= RETURN CODE * * SET OFF USE BIT IN TASBLK * IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND * LET TASQUE POINT TO NEXT IN CHAIN * * USED REGS : A1,A5,A7 * TASCAQ EQU * LD A5,TASQUE RF(Z) TASCEX EMPTY QUEUE LDR* A1,A5 GET NEXT IN CHAIN ST A1,TASQUE AND PUT IT FIRST IN QUEUE LDKL A1,-4 ADS A1,TTB:SA,A5 UPD DISPATCH ADDR CF A15,QTJOB NEXT ASSIGN RF TASC05 TASCEX CM TASQUE ASSIGN COMPLETED TASC05 EQU * CM TASBLK TASC10 EQU * LD A5,TASTTA ST A7,TTB:SA+14,A5 SET RETURN CODE IN SAVED A7 RTN A14 EJECT ****DESCRIPTION************************************* * * VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH * VOLUME NAMES IN DWT FOR DISCS * ****ENTRY PARAMETERS******************************** * * A2 = NO OF VOL IN ASBLK * A8 = ASBLK ADDR * A11 = 0 WHEN NO LOCK IS WANTED. * 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC * ****EXIT PARAMETERS********************************* * * A1 = 0 OK * 1 VOLUME UNKNOWN * A5 = TTAB ADDR * ****USED REGISTERS********************************** * * A1 - A9,A11,A12 * ****************************************************** VOLCHE EQU * CM TASLFD =1 CM TASLFD+2 LOCKED FLEXDISCS =1 SLL A2,1 SUK A2,2 ST A2,TASCVO INIT. TASCVO LDR A4,A8 ADK A4,10 POINTER TO FIRST VOL NAME IN ASBLK TAS110 EQU * LDKL A3,DFTAB POINTER TO FIRST DISC FILE CODE TAS120 LDK A1,0 LCR A1,A3 DISC FILE CODE * * FIND DWT ADDRESS IN CD:TAB AND COMPARE DWTVOL * LD* A6,SCTCDT TAS130 SUK A6,4 RF(N) TASHLT FC NOT FOUND? SHOULD NOT OCCUR. LD A5,SCTCDT ADR A5,A6 CC A1,1,A5 RB(NE) TAS130 NOT THIS FC LDR A11,A11 RF(Z) TAS131 LCR A5,A3 DISC CODE ANK A5,/F8 SUK A5,/F8 RF(NZ) TAS131 NO FLEXDISC * * LOCK FLEXDISC * LDKL A8,TASECB ST A1,ECBFC,A8 FLEX FILE CODE SUR A12,A12 LDK A7,/A6 LOCK,WAIT LKM DATA 1 LD A7,ECBRC,A8 RF(Z) TAS131 ANKL A7,/7FFF RF(NZ) TASF10 NOT ONLY BIT 0 LDKL A12,1 LFLAG=LOCKED BEFORE RF TAS131 TASF10 EQU * ANK A7,/7 BIT 13,14,15 RF(NZ) TAS150 GRAVE ERR TAS131 EQU * ST A1,TASVOL,A2 SAVE FC AD A6,SCTCDT LDR* A5,A6 INDEX LDK A1,0 DISC NAME DISPLACEMENT SRL A5,8 RF(Z) TAS135 * DECIDE DISC DISPL FOR THIS FILE CODE * INDEX IS REL VOL NAME IN DWT * TAS132 EQU * ADK A1,6 NEXT DISC DISPLACEMENT SUK A5,1 RB(P) TAS132 TAS135 EQU * LD A6,2,A6 DWT ADDR RF(Z) TASHLT NO DWT ADDRESS FOUND ADR A6,A1 POINTER TO VOLUME NAME LDK A1,3 VOL NAMES 3 WORDS LDR A5,A4 POINTER ASBLK VOL NAME * * CHECK VOLUME NAMES IN DWT AND ASBLK * TAS140 LDR* A9,A5 CW A9,DWTVOL,A6 RF(NE) TAS146 NO MATCH ADK A5,2 ADK A6,2 SUK A1,1 RB(P) TAS140 CHECK NEXT WORD IN VOL NAME * * VOL NAME MATCH * STORE DMI , FC IN TASVOL * LD A1,TASVOL,A2 ANK A1,/0F CWK A1,/8 RF(L) TAS143 NOT FLEXIBLE DISC LDK A1,2 FD DMI RF TAS145 TAS143 EQU * SRL A1,1 TAS145 EQU * * * A1 = DMI = 0 FOR DRIVE 1 * 1 FOR DRIVE 2 * 2 FOR FLEXDISC * SC A1,TASVOL,A2 * * SAVE FILE CODES FOR NEWLY LOCKED FLEXDISCS =1 * (ONLY SIGNIFICANT WHEN A11 = 1 ) =1 START * SUK A1,2 RF(NZ) TAS147 NO FLEX LDR A12,A12 RF(NZ) TAS147 LOCKED EARLIER LDR A1,A2 SRL A1,1 BYTE LC A3,TASVOL+1,A2 FILE CODE SC A3,TASLFD,A1 SAVE TAS147 EQU * =1 END * * CHECK NEXT VOL IN ASBLK * LDK A1,0 RET CODE ADK A4,6 SUK A2,2 RB(NN) TAS110 MORE VOLUMES TO CHECK RF TAS155 OK ALL VOLUMES ARE ON LINE TAS146 EQU * LDR A11,A11 RF(Z) TAS150 NO LOCK PERFORMED LCR A1,A3 DISC CODE ANK A1,/F8 SUK A1,/F8 RF(NZ) TAS150 NO FLEXDISC LDR A12,A12 LFLAG RF(NZ) TAS150 LOCKED BEFORE * * UNLOCK * LDK A7,/B8 UNLOAD,WAIT LKM DATA 1 * * NO MATCH TRY NEXT FC IN DFTAB * TAS150 EQU * ADK A3,1 CWK A3,DFTABE RB(NE) TAS120 MORE FC IN DFTAB LDK A1,1 TAS155 EQU * RTN A14 * TASHLT LDK A1,/11 INDICATE DM ERROR CF A15,HALT HALT SYSTEM * EJECT * ************ * TASS * ************ * IXTASS EQU * IFT MMUPAG=0 LDK A7,/81 SCR A7,A8 BIT 0+7 IND. ASS ONE INDEX XIF * IFT MMUPAG=1 ELR A7,A8 GET FIRST WORD OF USER ASSIGN BLOCK ANK A7,/FF SKIP LEFT CHARACTER ORKL A7,/8100 BIT 0+7 IND. ASSIGN ONE INDEX ESR A7,A8 SET WORD IN ASSIGN BLOCK XIF *~ LDK A7,0 ONLY GLOBAL ASSIGN ALLOWED * TASS EQU * LDKL A14,TASS14 INITIALIZE A14 STACK POINTER LDR A10,A7 SAVE TC * * CHECK IF PREVIOS ASSIGN NOT COMPLETED * AND IF SO QUEUE THIS REQUEST VIA THE TASQUE * LD A1,TASBLK RF(Z) TAS050 NO CONCURRENT ASSIGN LDKL A1,TASQUE START OF ASSIGN QUEUE TAS020 EQU * QUEUE AS FOR GETBUFFER LDR A2,A1 LDR* A1,A1 RB(NZ) TAS020 NOT LAST IN CHAIN STR A5,A2 CMR A5 ABL TDISP DISPATCH * TAS050 EQU * IM TASBLK INDICATE ASSIGN STARTED CM TASFDD FDB ADDR DATA FILE * ST A5,TASTTA SAVE TTAB ADDRESS OF REQUESTING TASK * IFT MMUPAG=1 * * MOVE USER ASSIGN BLOCK TO SYSTEM AREA MASBLK * LDR A1,A8 GET ADDRESS OF SENDING BLOCK LDKL A2,MASBLK GET ADDRESS OF RECEIVING BLOCK LDR A8,A2 SET A8 TO NEW ASSIGN BLOCK ADDRESS LDK A3,34 ASSIGN BLOCK LENGTH IN BYTES CF A14,MOV:US MOVE ASSIGN BLOCK XIF * ST A8,TASASB SAVE ASBLK ADDRESS * LDK A1,16 ST A1,TASCXO INIT. TASCXO TO LAST ENTRY IN TASSEXXLB * LDKL A7,-1 INITIALIZE RETURN CODE IN A7 * * CHECK MAX NUMBER OF VOLUMES ( 1 - 4 ) * LDK A2,0 LCR A2,A8 NO OF VOLUMES ANK A2,/1F REMOVE INDEX BIT +DELAY+BASIC RF(Z) TAS090 NO VOL CWK A2,4 RF(NG) TAS100 <=4 TAS090 RF TASSEM EJECT * * CHECK IF VOLUMES ARE ON LINE * TAS100 EQU * SUR A11,A11 NO FLEXLOCK CF A14,VOLCHE LD A8,TASASB ASBLK ADDR LDKL A7,-1 RET CODE ADK A1,0 SET CR RF(Z) TAS160 ALL VOLUMES FOUND * * ALL VOL NOT FOUND. ACT FLEXDISCTASK * LD A1,TASCVO LDK A2,2 ID DMTASK FLEXDISC SC A2,TASVOL,A1 SEE TAS195 EJECT * * CHECK IF FILE CODE ALREADY ASSIGNED * TAS160 EQU * LDR* A3,A8 ANK A3,/FF RF(E) TASSEM FILE CODE = 0 NOT ALLOWED LDR A10,A10 TC RF(Z) TAS165 GLOBAL ASSIGN LD A2,TASTTA TTAB ADDR LDR A4,A2 LD A2,TTB:TD,A4 ADKL A4,TTB:TD+1 RF TAS170 TAS165 EQU * LD A4,SCTCDT LDR* A2,A4 ADK A4,1 TAS170 SUK A2,4 RF(L) TAS180 END OF TABLE LDR A1,A4 ADR A1,A2 CCR A3,A1 FILE CODE RB(NE) TAS170 NO MATCH * * FILE CODE USED * OK WHEN REQ = ASS INDEX AND INDEX = 1 * LDR* A2,A8 ASBLK 1ST WORD RF(NN) TASSE5 NORMAL ASSIGN LDK A2,1 CC A2,-1,A1 INDEX RF(NE) TASSE5 FILE CODE ALREADY USED * * DATA FILE FDB IS FOUND * LD A1,1,A1 FDB ADDR ST A1,TASFDD RB TAS170 * * * FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) * TAS180 EQU * LDK A1,0 LDR A10,A10 TC RF(Z) TAS185 GLOBAL ASSIGN LD A2,TASTTA TTAB ADDR LDR A4,A2 LD A2,TTB:TD,A4 ADKL A4,TTB:TD+1 RF TAS190 TAS185 EQU * LD A4,SCTCDT LDR* A2,A4 ADK A4,1 TAS190 SUK A2,4 RF(L) TASSE2 NO FREE ENTRY IN TABLE LDR A9,A4 ADR A9,A2 CCR A1,A9 FILE CODE RB(NE) TAS190 FC NOT EQUAL 0 CW A1,1,A9 RB(NE) TAS190 DWTADR NOT EQUAL 0 LDR* A1,A8 ASBLK 1ST WORD RF(N) TAS195 ASSIGN INDEX ORKL A3,/100 INDEX = 1 FOR DATA FILE TAS195 EQU * ST A3,-1,A9 SET INDEX AND FC IN FREE ENTRY ST A9,TASTBE SAVE ENTRY * * GET FIRST VOLUME AND ACTIVATE ITS DMTASK * LD A1,TASCVO LDK A7,0 LC A7,TASVOL,A1 ADKL A7,'#D' TID DMTASK CF A15,FNDTID LDR A5,A2 TTAB ADDRESS DMTASK RF(NZ) TAS200 TTAB FOUND EJECT * * FLEXDISC DMTASK DOES NOT EXIST * CM -1,A9 REMOVE ENTRY LDK A7,4 VOL UNKNOWN RF TASSEM TAS200 EQU * LDK A2,2 ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK LDKL A2,DMTASS ASSIGN INDEX ENTRY LDR* A6,A8 RF(N) TAS210 INDEX ASSIGN CM TASFIL TAS210 EQU * CM TASFDB =0 INDICATES EXT #0 NOT FOUND LDK A3,0 * A1=PAR,A2=ADR,A3=SEGM,A5=TTAB ADDR CF A15,ACTOT ACTIVATE DMTASK ABL TDISP GO TO DISPATCHER EJECT * * ERROR RETURNS * TASSE5 ADK A7,1 TASSE4 ADK A7,1 TASSE3 ADK A7,1 TASSE2 ADK A7,1 TASSE1 ADK A7,1 ADK A7,1 TASSEM EQU * CF A14,TASCAQ CHECK ASSIGN QUEUE ABL LKMQDI QUEUE AND DISPATCH END
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT TASS REL 9.2 79-11-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0034…003c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0052 Head {h00=0x0012, h01=0x0050, text=» =1, PR 4313«, t00=0x0000, t01=0x0040}
0x0052…006e Head {h00=0x0018, h01=0x0050, text=»* REL 9.1 78-10-25«, t00=0x0000, t01=0x0056}
0x006e…0076 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0072}
0x0076…0080 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007a}
0x0080…008a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0084}
0x008a…00c6 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x008e}
0x00c6…00d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ca}
0x00d0…00f8 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0000, t01=0x00d4}
0x00f8…0102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…0138 Head {h00=0x0032, h01=0x0050, text=»* TASS = ASSIGN FILE CODE ACTIVATION PART «, t00=0x0000, t01=0x0106}
0x0138…0142 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013c}
0x0142…014c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0146}
0x014c…0156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0150}
0x0156…0160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015a}
0x0160…016a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0164}
0x016a…0174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016e}
0x0174…01b0 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x0178}
0x01b0…01ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0024}
0x01ba…01e0 Head {h00=0x0022, h01=0x0050, text=»* THIS MODULE IS ENTERED VIA«, t00=0x0001, t01=0x002e}
0x01e0…0208 Head {h00=0x0024, h01=0x0050, text=»* ASSIGN REQUEST (DATA 15) OR «, t00=0x0001, t01=0x0054}
0x0208…0234 Head {h00=0x0028, h01=0x0050, text=»* ASSIGN INDEX REQUEST (DATA 16). «, t00=0x0001, t01=0x007c}
0x0234…023e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a8}
0x023e…0254 Head {h00=0x0012, h01=0x0050, text=»* LDK A7,TC «, t00=0x0001, t01=0x00b2}
0x0254…026e Head {h00=0x0016, h01=0x0050, text=»* LDKL A8,ASBLK «, t00=0x0001, t01=0x00c8}
0x026e…027e Head {h00=0x000c, h01=0x0050, text=»* LKM «, t00=0x0001, t01=0x00e2}
0x027e…0294 Head {h00=0x0012, h01=0x0050, text=»* DATA 15 «, t00=0x0001, t01=0x00f2}
0x0294…029e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0108}
0x029e…02c4 Head {h00=0x0022, h01=0x0050, text=»* INPUT A5 = TTAB ADDRESS «, t00=0x0001, t01=0x0112}
0x02c4…02e0 Head {h00=0x0018, h01=0x0050, text=»* A7 = TC «, t00=0x0001, t01=0x0138}
0x02e0…0306 Head {h00=0x0022, h01=0x0050, text=»* A8 = ASBLK ADDRESS«, t00=0x0001, t01=0x0154}
0x0306…033a Head {h00=0x0030, h01=0x0050, text=»* WHERE ASBLK IS A PARAMETER BLOCK«, t00=0x0001, t01=0x017a}
0x033a…0382 Head {h00=0x0044, h01=0x0050, text=»* AND TC = 1 WHEN TASK LOCAL ASSIGN IN TTAB IS WANTED «, t00=0x0002, t01=0x001e}
0x0382…03c8 Head {h00=0x0042, h01=0x0050, text=»* TC = 0 WHEN GLOBAL ASSIGN IN SCTCDT IS WANETED«, t00=0x0002, t01=0x0066}
0x03c8…03d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ac}
0x03d2…03e0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x00b6}
0x03e0…0402 Head {h00=0x001e, h01=0x0050, text=»* +----------+----------+«, t00=0x0002, t01=0x00c4}
0x0402…042a Head {h00=0x0024, h01=0x0050, text=»* ASBLK I NO OF VOL FC I «, t00=0x0002, t01=0x00e6}
0x042a…044c Head {h00=0x001e, h01=0x0050, text=»* +----------+----------+«, t00=0x0002, t01=0x010e}
0x044c…046e Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0002, t01=0x0130}
0x046e…0490 Head {h00=0x001e, h01=0x0050, text=»* I FILE NAME I«, t00=0x0002, t01=0x0152}
0x0490…04b2 Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0002, t01=0x0174}
0x04b2…04e4 Head {h00=0x002e, h01=0x0050, text=»* I I «, t00=0x0003, t01=0x0008}
0x04e4…0506 Head {h00=0x001e, h01=0x0050, text=»* +---------------------+«, t00=0x0003, t01=0x003a}
0x0506…0528 Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0003, t01=0x005c}
0x0528…054a Head {h00=0x001e, h01=0x0050, text=»* I VOL NAME I«, t00=0x0003, t01=0x007e}
0x054a…056c Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0003, t01=0x00a0}
0x056c…058e Head {h00=0x001e, h01=0x0050, text=»* +---------------------+«, t00=0x0003, t01=0x00c2}
0x058e…05b0 Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0003, t01=0x00e4}
0x05b0…05ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0106}
0x05ba…05e2 Head {h00=0x0024, h01=0x0050, text=»* MAX 4 VOL NAMES CAN BE GIVEN«, t00=0x0003, t01=0x0110}
0x05e2…05ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0138}
0x05ec…05f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0142}
0x05f6…063a Head {h00=0x0040, h01=0x0050, text=»* A CONECTION BETWEEN THE FILE CODE IN ASBLK AND A FDB IS «, t00=0x0003, t01=0x014c}
0x063a…065e Head {h00=0x0020, h01=0x0050, text=»* CREATED IN TTAB/CD:TAB. «, t00=0x0003, t01=0x0190}
0x065e…0668 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0024}
0x0668…06b2 Head {h00=0x0046, h01=0x0050, text=»* THE FDB IS INITIALIZED WITH INFORMATION FROM THE VTOC:S OF THE«, t00=0x0004, t01=0x002e}
0x06b2…06da Head {h00=0x0024, h01=0x0050, text=»* VOLUMES MENTIONED IN ASBLK. «, t00=0x0004, t01=0x0078}
0x06da…06e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a0}
0x06e4…0732 Head {h00=0x004a, h01=0x0050, text=»* UPON COMPLETION OF THE ASSIGN REQUEST REG A7 WILL HAVE ONE OF THE «, t00=0x0004, t01=0x00aa}
0x0732…0756 Head {h00=0x0020, h01=0x0050, text=»* FOLLOWING RETURN CODES: «, t00=0x0004, t01=0x00f8}
0x0756…0760 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x011c}
0x0760…0794 Head {h00=0x0030, h01=0x0050, text=»* 0 = CORRECT RETURN ASSIGNMENT PERFORMED «, t00=0x0004, t01=0x0126}
0x0794…07b2 Head {h00=0x001a, h01=0x0050, text=»* -1 = REQUEST ERROR «, t00=0x0004, t01=0x015a}
0x07b2…07d0 Head {h00=0x001a, h01=0x0050, text=»* 1 = DISC I/O ERROR«, t00=0x0004, t01=0x0178}
0x07d0…07f6 Head {h00=0x0022, h01=0x0050, text=»* 2 = NO FREE ENTRY IN TABLE«, t00=0x0005, t01=0x0008}
0x07f6…0816 Head {h00=0x001c, h01=0x0050, text=»* 3 = NO FDB AVAILABLE«, t00=0x0005, t01=0x002e}
0x0816…0842 Head {h00=0x0028, h01=0x0050, text=»* 4 = ONE OR MORE VOLUMES UNKNOWN «, t00=0x0005, t01=0x004e}
0x0842…0868 Head {h00=0x0022, h01=0x0050, text=»* 5 = FILE CODE ALREADY USED«, t00=0x0005, t01=0x007a}
0x0868…088a Head {h00=0x001e, h01=0x0050, text=»* 6 = FILE NAME UNKNOWN «, t00=0x0005, t01=0x00a0}
0x088a…08be Head {h00=0x0030, h01=0x0050, text=»* 7 = FILE SECTION MISSING OR FOUND TWICE «, t00=0x0005, t01=0x00c2}
0x08be…08e0 Head {h00=0x001e, h01=0x0050, text=»* 8 = FAULTY DISC FORMAT«, t00=0x0005, t01=0x00f6}
0x08e0…090a Head {h00=0x0026, h01=0x0050, text=»* 9 = MORE THAN 4 EXTENTS EXIST «, t00=0x0005, t01=0x0118}
0x090a…0914 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0142}
0x0914…0922 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x014c}
0x0922…0948 Head {h00=0x0022, h01=0x0050, text=»* THIS MODULE IS ENTERED VIA«, t00=0x0005, t01=0x015a}
0x0948…0962 Head {h00=0x0016, h01=0x0050, text=»* LDKL A8,ASBLK «, t00=0x0005, t01=0x0180}
0x0962…0972 Head {h00=0x000c, h01=0x0050, text=»* LKM «, t00=0x0006, t01=0x000a}
0x0972…0988 Head {h00=0x0012, h01=0x0050, text=»* DATA 16 «, t00=0x0006, t01=0x001a}
0x0988…0992 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0030}
0x0992…09b8 Head {h00=0x0022, h01=0x0050, text=»* INPUT A5 = TTAB ADDRESS «, t00=0x0006, t01=0x003a}
0x09b8…09de Head {h00=0x0022, h01=0x0050, text=»* A8 = ASBLK ADDRESS«, t00=0x0006, t01=0x0060}
0x09de…0a12 Head {h00=0x0030, h01=0x0050, text=»* WHERE ASBLK IS A PARAMETER BLOCK«, t00=0x0006, t01=0x0086}
0x0a12…0a34 Head {h00=0x001e, h01=0x0050, text=»* +----------+----------+«, t00=0x0006, t01=0x00ba}
0x0a34…0a5c Head {h00=0x0024, h01=0x0050, text=»* ASBLK I NO OF VOL FC I «, t00=0x0006, t01=0x00dc}
0x0a5c…0a7e Head {h00=0x001e, h01=0x0050, text=»* +----------+----------+«, t00=0x0006, t01=0x0104}
0x0a7e…0aa0 Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0006, t01=0x0126}
0x0aa0…0ac2 Head {h00=0x001e, h01=0x0050, text=»* I FILE NAME I«, t00=0x0006, t01=0x0148}
0x0ac2…0ae4 Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0006, t01=0x016a}
0x0ae4…0b06 Head {h00=0x001e, h01=0x0050, text=»* +---------------------+«, t00=0x0006, t01=0x018c}
0x0b06…0b28 Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0007, t01=0x001e}
0x0b28…0b4a Head {h00=0x001e, h01=0x0050, text=»* I VOL NAME I«, t00=0x0007, t01=0x0040}
0x0b4a…0b6c Head {h00=0x001e, h01=0x0050, text=»* I I«, t00=0x0007, t01=0x0062}
0x0b6c…0b8e Head {h00=0x001e, h01=0x0050, text=»* +---------------------+«, t00=0x0007, t01=0x0084}
0x0b8e…0bb6 Head {h00=0x0024, h01=0x0050, text=»* I MASTER INDEX«, t00=0x0007, t01=0x00a6}
0x0bb6…0bdc Head {h00=0x0022, h01=0x0050, text=»* I FILE NAME «, t00=0x0007, t01=0x00ce}
0x0bdc…0be6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00f4}
0x0be6…0c2e Head {h00=0x0044, h01=0x0050, text=»* UPON COMPLETION OF THIS REQUEST REG A7 WILL HAVE ONE OF THE «, t00=0x0007, t01=0x00fe}
0x0c2e…0c52 Head {h00=0x0020, h01=0x0050, text=»* FOLLOWING RETURN CODES: «, t00=0x0007, t01=0x0146}
0x0c52…0c86 Head {h00=0x0030, h01=0x0050, text=»* 0 = CORRECT RETURN ASSIGNMENT PERFORMED «, t00=0x0007, t01=0x016a}
0x0c86…0ca4 Head {h00=0x001a, h01=0x0050, text=»* -1 = REQUEST ERROR «, t00=0x0008, t01=0x000e}
0x0ca4…0cc2 Head {h00=0x001a, h01=0x0050, text=»* 1 = DISC I/O ERROR«, t00=0x0008, t01=0x002c}
0x0cc2…0ce8 Head {h00=0x0022, h01=0x0050, text=»* 2 = NO FREE ENTRY IN TABLE«, t00=0x0008, t01=0x004a}
0x0ce8…0d24 Head {h00=0x0038, h01=0x0050, text=»* 3 = NO FDB AVAILABLE OR MASTER INDEX CORE AVAIL «, t00=0x0008, t01=0x0070}
0x0d24…0d50 Head {h00=0x0028, h01=0x0050, text=»* 4 = ONE OR MORE VOLUMES UNKNOWN «, t00=0x0008, t01=0x00ac}
0x0d50…0d76 Head {h00=0x0022, h01=0x0050, text=»* 5 = FILE CODE ALREADY USED«, t00=0x0008, t01=0x00d8}
0x0d76…0d98 Head {h00=0x001e, h01=0x0050, text=»* 6 = FILE NAME UNKNOWN «, t00=0x0008, t01=0x00fe}
0x0d98…0dcc Head {h00=0x0030, h01=0x0050, text=»* 7 = FILE SECTION MISSING OR FOUND TWICE «, t00=0x0008, t01=0x0120}
0x0dcc…0dee Head {h00=0x001e, h01=0x0050, text=»* 8 = FAULTY DISC FORMAT«, t00=0x0008, t01=0x0154}
0x0dee…0e18 Head {h00=0x0026, h01=0x0050, text=»* 9 = MORE THAN 4 EXTENTS EXIST «, t00=0x0008, t01=0x0176}
0x0e18…0e3e Head {h00=0x0022, h01=0x0050, text=»* 10= NO DATA FILE ASSIGNED «, t00=0x0009, t01=0x0010}
0x0e3e…0e6c Head {h00=0x002a, h01=0x0050, text=»* 11= 4 INDEX FILES ALREADY ASSIGNED«, t00=0x0009, t01=0x0036}
0x0e6c…0e94 Head {h00=0x0024, h01=0x0050, text=»* 12= MAX KEY LENGTH TOO SMALL«, t00=0x0009, t01=0x0064}
0x0e94…0ec8 Head {h00=0x0030, h01=0x0050, text=»* 13= REQUEST BUSY. REPEAT ASSIGN REQUEST «, t00=0x0009, t01=0x008c}
0x0ec8…0ed6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00c0}
0x0ed6…0ee0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ce}
0x0ee0…0ef8 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0009, t01=0x00d8}
0x0ef8…0f10 Head {h00=0x0014, h01=0x0050, text=»* ENTRIES * «, t00=0x0009, t01=0x00f0}
0x0f10…0f28 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0009, t01=0x0108}
0x0f28…0f32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0120}
0x0f32…0f46 Head {h00=0x0010, h01=0x0050, text=» ENTRY TASS «, t00=0x0009, t01=0x012a}
0x0f46…0f62 Head {h00=0x0018, h01=0x0050, text=» ENTRY VOLCHE,IXTASS«, t00=0x0009, t01=0x013e}
0x0f62…0f78 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASBLK «, t00=0x0009, t01=0x015a}
0x0f78…0f8e Head {h00=0x0012, h01=0x0050, text=» ENTRY TASQUE «, t00=0x0009, t01=0x0170}
0x0f8e…0fa4 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASTTA «, t00=0x0009, t01=0x0186}
0x0fa4…0fba Head {h00=0x0012, h01=0x0050, text=» ENTRY TASASB «, t00=0x000a, t01=0x000c}
0x0fba…0fd0 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASCVO «, t00=0x000a, t01=0x0022}
0x0fd0…0fe6 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASVOL «, t00=0x000a, t01=0x0038}
0x0fe6…0ffc Head {h00=0x0012, h01=0x0050, text=» ENTRY TASCXO «, t00=0x000a, t01=0x004e}
0x0ffc…1012 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASSEX «, t00=0x000a, t01=0x0064}
0x1012…1028 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASXLB «, t00=0x000a, t01=0x007a}
0x1028…103e Head {h00=0x0012, h01=0x0050, text=» ENTRY TASFDB «, t00=0x000a, t01=0x0090}
0x103e…1054 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASVRL «, t00=0x000a, t01=0x00a6}
0x1054…106a Head {h00=0x0012, h01=0x0050, text=» ENTRY TASVLE «, t00=0x000a, t01=0x00bc}
0x106a…1080 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASVRN «, t00=0x000a, t01=0x00d2}
0x1080…1096 Head {h00=0x0012, h01=0x0050, text=» ENTRY TASECB «, t00=0x000a, t01=0x00e8}
0x1096…10c0 Head {h00=0x0026, h01=0x0050, text=» ENTRY TASFIL,TASTID,TASMXA,TASSPW«, t00=0x000a, t01=0x00fe}
0x10c0…10dc Head {h00=0x0018, h01=0x0050, text=» ENTRY TASFDD,TASTBE«, t00=0x000a, t01=0x0128}
0x10dc…1104 Head {h00=0x0024, h01=0x0050, text=» ENTRY TASCAQ CHECK ASSIGN QUEUE«, t00=0x000a, t01=0x0144}
0x1104…111e Head {h00=0x0016, h01=0x0050, text=» ENTRY TASLFD =1 «, t00=0x000a, t01=0x016c}
0x111e…1158 Head {h00=0x0036, h01=0x0050, text=» ENTRY TASHLT HALT SYSTEM DUE TO DM (SYSGEN) ERROR«, t00=0x000a, t01=0x0186}
0x1158…1166 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0030}
0x1166…1170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003e}
0x1170…118a Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000b, t01=0x0048}
0x118a…11a4 Head {h00=0x0016, h01=0x0050, text=»* EXTERNALS * «, t00=0x000b, t01=0x0062}
0x11a4…11be Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000b, t01=0x007c}
0x11be…11c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0096}
0x11c8…11dc Head {h00=0x0010, h01=0x0050, text=» EXTRN DFTAB«, t00=0x000b, t01=0x00a0}
0x11dc…11f2 Head {h00=0x0012, h01=0x0050, text=» EXTRN DFTABE «, t00=0x000b, t01=0x00b4}
0x11f2…1208 Head {h00=0x0012, h01=0x0050, text=» EXTRN SCTCDT «, t00=0x000b, t01=0x00ca}
0x1208…121e Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTVOL «, t00=0x000b, t01=0x00e0}
0x121e…1234 Head {h00=0x0012, h01=0x0050, text=» EXTRN FNDTID «, t00=0x000b, t01=0x00f6}
0x1234…124a Head {h00=0x0012, h01=0x0050, text=» EXTRN DMTASS «, t00=0x000b, t01=0x010c}
0x124a…125e Head {h00=0x0010, h01=0x0050, text=» EXTRN ACTOT«, t00=0x000b, t01=0x0122}
0x125e…1272 Head {h00=0x0010, h01=0x0050, text=» EXTRN TDISP«, t00=0x000b, t01=0x0136}
0x1272…1286 Head {h00=0x0010, h01=0x0050, text=» EXTRN QTJOB«, t00=0x000b, t01=0x014a}
0x1286…129c Head {h00=0x0012, h01=0x0050, text=» EXTRN LKMQDI «, t00=0x000b, t01=0x015e}
0x129c…12b2 Head {h00=0x0012, h01=0x0050, text=» EXTRN TTB:SA «, t00=0x000b, t01=0x0174}
0x12b2…12ce Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:TD,DMTASX«, t00=0x000b, t01=0x018a}
0x12ce…12e8 Head {h00=0x0016, h01=0x0050, text=» EXTRN ECBFC,ECBRC«, t00=0x000c, t01=0x0016}
0x12e8…131c Head {h00=0x0030, h01=0x0050, text=» EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA «, t00=0x000c, t01=0x0030}
0x131c…1344 Head {h00=0x0024, h01=0x0050, text=» EXTRN HALT HALT SYSTEM ROUTINE «, t00=0x000c, t01=0x0064}
0x1344…135c Head {h00=0x0014, h01=0x0050, text=» EJECT TOSSIO «, t00=0x000c, t01=0x008c}
0x135c…1366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00a4}
0x1366…1370 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ae}
0x1370…13a2 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x00b8}
0x13a2…13ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ea}
0x13ac…13ca Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000c, t01=0x00f4}
0x13ca…13d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0112}
0x13d4…1406 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x011c}
0x1406…1410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x014e}
0x1410…1442 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x0158}
0x1442…1470 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x018a}
0x1470…147a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0028}
0x147a…148e Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000d, t01=0x0032}
0x148e…1498 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0046}
0x1498…14a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0050}
0x14a6…14b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x005e}
0x14b0…14cc Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000d, t01=0x0068}
0x14cc…14e8 Head {h00=0x0018, h01=0x0050, text=»* DATA AREAS * «, t00=0x000d, t01=0x0084}
0x14e8…1504 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000d, t01=0x00a0}
0x1504…150e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00bc}
0x150e…1532 Head {h00=0x0020, h01=0x0050, text=»TASBLK DATA 0 USE INDICATOR «, t00=0x000d, t01=0x00c6}
0x1532…155a Head {h00=0x0024, h01=0x0050, text=»TASQUE DATA 0 ASSIGN QUEUE ANCOR«, t00=0x000d, t01=0x00ea}
0x155a…1588 Head {h00=0x002a, h01=0x0050, text=»TASTTA DATA 0 REQUESTING TTAB ADDRESS «, t00=0x000d, t01=0x0112}
0x1588…15ac Head {h00=0x0020, h01=0x0050, text=»TASASB DATA 0 ASBLK ADDRESS «, t00=0x000d, t01=0x0140}
0x15ac…15da Head {h00=0x002a, h01=0x0050, text=»TASCVO DATA 0 CURRENT OFFSET IN TASVOL«, t00=0x000d, t01=0x0164}
0x15da…160e (14, 0, 398) Head {h00=0x0030, h01=0x0050, text=»TASVOL DATA 0 VOLUME IDENTIFICATION (DMI,FC)«, t00=0x000e, t01=0x0004}
0x160e…1634 Head {h00=0x0022, h01=0x0050, text=» DATA 0,0,0 THREE MORE ENTRIES«, t00=0x000e, t01=0x0038}
0x1634…166e Head {h00=0x0036, h01=0x0050, text=»TASCXO DATA 0 CURRENT OFFSET IN TASSEX AND TASXLB «, t00=0x000e, t01=0x005e}
0x166e…16a2 Head {h00=0x0030, h01=0x0050, text=»TASSEX DATA 0 SECTION NUMBER, EXTENT NUMBER «, t00=0x000e, t01=0x0098}
0x16a2…16d0 Head {h00=0x002a, h01=0x0050, text=» DATA 0 OFFSET IN TASVOL FOR THIS EXT «, t00=0x000e, t01=0x00cc}
0x16d0…16fc Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0,0,0,0 THREE MORE ENTRIES«, t00=0x000e, t01=0x00fa}
0x16fc…1720 Head {h00=0x0020, h01=0x0050, text=»TASXLB DATA 0 EXTENT LENGTH «, t00=0x000e, t01=0x0126}
0x1720…173c Head {h00=0x0018, h01=0x0050, text=» DATA 0 EXTENT BASE «, t00=0x000e, t01=0x014a}
0x173c…1768 Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0,0,0,0 THREE MORE ENTRIES«, t00=0x000e, t01=0x0166}
0x1768…178a (15, 0, 400) Head {h00=0x001e, h01=0x0050, text=»TASFDB DATA 0 FDB ADDRESS «, t00=0x000f, t01=0x0004}
0x178a…17b2 Head {h00=0x0024, h01=0x0050, text=»TASVRL DATA 0 VTOC RECORD LENGTH«, t00=0x000f, t01=0x0026}
0x17b2…17d4 Head {h00=0x001e, h01=0x0050, text=»TASVLE DATA 0 VTOC LENGTH «, t00=0x000f, t01=0x004e}
0x17d4…17f8 Head {h00=0x0020, h01=0x0050, text=»TASVRN DATA 0 VTOC RECORD NO«, t00=0x000f, t01=0x0070}
0x17f8…181c Head {h00=0x0020, h01=0x0050, text=»TASECB DATA 0,0 ECBFC,ECBBA «, t00=0x000f, t01=0x0094}
0x181c…1834 Head {h00=0x0014, h01=0x0050, text=» DATA 410 ECBRL «, t00=0x000f, t01=0x00b8}
0x1834…1856 Head {h00=0x001e, h01=0x0050, text=» DATA 0,0,0 ECBEL,-RC,-CW «, t00=0x000f, t01=0x00d0}
0x1856…186a Head {h00=0x0010, h01=0x0050, text=» DATA 0 CW2 «, t00=0x000f, t01=0x00f2}
0x186a…189e Head {h00=0x0030, h01=0x0050, text=»TASFIL DATA 0 0=DATA,1=INDEX,2=MASTER INDEX «, t00=0x000f, t01=0x0106}
0x189e…18cc Head {h00=0x002a, h01=0x0050, text=»TASTID DATA 0 DMTSASK IDENT AT ASSIGN «, t00=0x000f, t01=0x013a}
0x18cc…18f4 Head {h00=0x0024, h01=0x0050, text=»TASMXA DATA 0 MASTER INDEX ADDR «, t00=0x000f, t01=0x0168}
0x18f4…191e Head {h00=0x0026, h01=0x0050, text=»TASSPW DATA 0 TTAB ADDRESS DMTASK «, t00=0x000f, t01=0x0190}
0x191e…1946 Head {h00=0x0024, h01=0x0050, text=»TASFDD DATA 0 FDB ADDR DATA FILE«, t00=0x0010, t01=0x002a}
0x1946…1972 Head {h00=0x0028, h01=0x0050, text=»TASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR«, t00=0x0010, t01=0x0052}
0x1972…19a8 Head {h00=0x0032, h01=0x0050, text=»TASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 «, t00=0x0010, t01=0x007e}
0x19a8…19ba Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x0010, t01=0x00b4}
0x19ba…19cc Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x0010, t01=0x00c6}
0x19cc…19f2 Head {h00=0x0022, h01=0x0050, text=»TASS14 EQU *-2 TASS A14 STACK «, t00=0x0010, t01=0x00d8}
0x19f2…19fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00fe}
0x19fc…1a12 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0010, t01=0x0108}
0x1a12…1a3e Head {h00=0x0028, h01=0x0050, text=»MASBLK RES 17 ASSIGN BLOCK SAVE AREA«, t00=0x0010, t01=0x011e}
0x1a3e…1a4a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x014a}
0x1a4a…1a54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0156}
0x1a54…1a62 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0160}
0x1a62…1a78 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0010, t01=0x016e}
0x1a78…1a8e Head {h00=0x0012, h01=0x0050, text=»* TASCAQ *«, t00=0x0010, t01=0x0184}
0x1a8e…1aa4 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0011, t01=0x000a}
0x1aa4…1aae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0020}
0x1aae…1ade Head {h00=0x002c, h01=0x0050, text=»* ENTRY TASCAQ CHECK ASSIGN QUEUE «, t00=0x0011, t01=0x002a}
0x1ade…1ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x005a}
0x1ae8…1b08 Head {h00=0x001c, h01=0x0050, text=»* A7= RETURN CODE «, t00=0x0011, t01=0x0064}
0x1b08…1b12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0084}
0x1b12…1b40 Head {h00=0x002a, h01=0x0050, text=»* SET OFF USE BIT IN TASBLK «, t00=0x0011, t01=0x008e}
0x1b40…1b8c Head {h00=0x0048, h01=0x0050, text=»* IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND «, t00=0x0011, t01=0x00bc}
0x1b8c…1bc2 Head {h00=0x0032, h01=0x0050, text=»* LET TASQUE POINT TO NEXT IN CHAIN «, t00=0x0011, t01=0x0108}
0x1bc2…1bcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x013e}
0x1bcc…1bec Head {h00=0x001c, h01=0x0050, text=»* USED REGS : A1,A5,A7«, t00=0x0011, t01=0x0148}
0x1bec…1bf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0168}
0x1bf6…1c0a Head {h00=0x0010, h01=0x0050, text=»TASCAQ EQU *«, t00=0x0011, t01=0x0172}
0x1c0a…1c20 Head {h00=0x0012, h01=0x0050, text=» LD A5,TASQUE «, t00=0x0011, t01=0x0186}
0x1c20…1c42 Head {h00=0x001e, h01=0x0050, text=» RF(Z) TASCEX EMPTY QUEUE «, t00=0x0012, t01=0x000c}
0x1c42…1c68 Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A5 GET NEXT IN CHAIN «, t00=0x0012, t01=0x002e}
0x1c68…1c98 Head {h00=0x002c, h01=0x0050, text=» ST A1,TASQUE AND PUT IT FIRST IN QUEUE «, t00=0x0012, t01=0x0054}
0x1c98…1cac Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-4 «, t00=0x0012, t01=0x0084}
0x1cac…1cd8 Head {h00=0x0028, h01=0x0050, text=» ADS A1,TTB:SA,A5 UPD DISPATCH ADDR «, t00=0x0012, t01=0x0098}
0x1cd8…1cfa Head {h00=0x001e, h01=0x0050, text=» CF A15,QTJOB NEXT ASSIGN «, t00=0x0012, t01=0x00c4}
0x1cfa…1d0c Head {h00=0x000e, h01=0x0050, text=» RF TASC05«, t00=0x0012, t01=0x00e6}
0x1d0c…1d36 Head {h00=0x0026, h01=0x0050, text=»TASCEX CM TASQUE ASSIGN COMPLETED «, t00=0x0012, t01=0x00f8}
0x1d36…1d4a Head {h00=0x0010, h01=0x0050, text=»TASC05 EQU *«, t00=0x0012, t01=0x0122}
0x1d4a…1d5c Head {h00=0x000e, h01=0x0050, text=» CM TASBLK«, t00=0x0012, t01=0x0136}
0x1d5c…1d70 Head {h00=0x0010, h01=0x0050, text=»TASC10 EQU *«, t00=0x0012, t01=0x0148}
0x1d70…1d86 Head {h00=0x0012, h01=0x0050, text=» LD A5,TASTTA «, t00=0x0012, t01=0x015c}
0x1d86…1dbe Head {h00=0x0034, h01=0x0050, text=» ST A7,TTB:SA+14,A5 SET RETURN CODE IN SAVED A7 «, t00=0x0012, t01=0x0172}
0x1dbe…1dce Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0013, t01=0x001a}
0x1dce…1ddc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x002a}
0x1ddc…1e18 Head {h00=0x0038, h01=0x0050, text=»****DESCRIPTION*************************************«, t00=0x0013, t01=0x0038}
0x1e18…1e22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0074}
0x1e22…1e60 Head {h00=0x003a, h01=0x0050, text=»* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH«, t00=0x0013, t01=0x007e}
0x1e60…1e8a Head {h00=0x0026, h01=0x0050, text=»* VOLUME NAMES IN DWT FOR DISCS «, t00=0x0013, t01=0x00bc}
0x1e8a…1e94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e6}
0x1e94…1ed0 Head {h00=0x0038, h01=0x0050, text=»****ENTRY PARAMETERS********************************«, t00=0x0013, t01=0x00f0}
0x1ed0…1eda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x012c}
0x1eda…1efe Head {h00=0x0020, h01=0x0050, text=»* A2 = NO OF VOL IN ASBLK «, t00=0x0013, t01=0x0136}
0x1efe…1f1a Head {h00=0x0018, h01=0x0050, text=»* A8 = ASBLK ADDR «, t00=0x0013, t01=0x015a}
0x1f1a…1f46 Head {h00=0x0028, h01=0x0050, text=»* A11 = 0 WHEN NO LOCK IS WANTED. «, t00=0x0013, t01=0x0176}
0x1f46…1f84 Head {h00=0x003a, h01=0x0050, text=»* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC«, t00=0x0014, t01=0x0012}
0x1f84…1f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0050}
0x1f8e…1fca Head {h00=0x0038, h01=0x0050, text=»****EXIT PARAMETERS*********************************«, t00=0x0014, t01=0x005a}
0x1fca…1fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0096}
0x1fd4…1fea Head {h00=0x0012, h01=0x0050, text=»* A1 = 0 OK «, t00=0x0014, t01=0x00a0}
0x1fea…200c Head {h00=0x001e, h01=0x0050, text=»* 1 VOLUME UNKNOWN «, t00=0x0014, t01=0x00b6}
0x200c…2026 Head {h00=0x0016, h01=0x0050, text=»* A5 = TTAB ADDR«, t00=0x0014, t01=0x00d8}
0x2026…2030 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f2}
0x2030…206c Head {h00=0x0038, h01=0x0050, text=»****USED REGISTERS**********************************«, t00=0x0014, t01=0x00fc}
0x206c…2076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0138}
0x2076…2092 Head {h00=0x0018, h01=0x0050, text=»* A1 - A9,A11,A12 «, t00=0x0014, t01=0x0142}
0x2092…209c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x015e}
0x209c…20da Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0014, t01=0x0168}
0x20da…20ee Head {h00=0x0010, h01=0x0050, text=»VOLCHE EQU *«, t00=0x0015, t01=0x0016}
0x20ee…2104 Head {h00=0x0012, h01=0x0050, text=» CM TASLFD =1«, t00=0x0015, t01=0x002a}
0x2104…212c Head {h00=0x0024, h01=0x0050, text=» CM TASLFD+2 LOCKED FLEXDISCS =1«, t00=0x0015, t01=0x0040}
0x212c…213e Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0015, t01=0x0068}
0x213e…2150 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0015, t01=0x007a}
0x2150…2172 Head {h00=0x001e, h01=0x0050, text=» ST A2,TASCVO INIT. TASCVO«, t00=0x0015, t01=0x008c}
0x2172…2184 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A8«, t00=0x0015, t01=0x00ae}
0x2184…21ba Head {h00=0x0032, h01=0x0050, text=» ADK A4,10 POINTER TO FIRST VOL NAME IN ASBLK «, t00=0x0015, t01=0x00c0}
0x21ba…21ce Head {h00=0x0010, h01=0x0050, text=»TAS110 EQU *«, t00=0x0015, t01=0x00f6}
0x21ce…2204 Head {h00=0x0032, h01=0x0050, text=» LDKL A3,DFTAB POINTER TO FIRST DISC FILE CODE«, t00=0x0015, t01=0x010a}
0x2204…221c Head {h00=0x0014, h01=0x0050, text=»TAS120 LDK A1,0 «, t00=0x0015, t01=0x0140}
0x221c…223e Head {h00=0x001e, h01=0x0050, text=» LCR A1,A3 DISC FILE CODE «, t00=0x0015, t01=0x0158}
0x223e…2248 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017a}
0x2248…2282 Head {h00=0x0036, h01=0x0050, text=»* FIND DWT ADDRESS IN CD:TAB AND COMPARE DWTVOL «, t00=0x0015, t01=0x0184}
0x2282…228c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x002e}
0x228c…22a2 Head {h00=0x0012, h01=0x0050, text=» LD* A6,SCTCDT«, t00=0x0016, t01=0x0038}
0x22a2…22ba Head {h00=0x0014, h01=0x0050, text=»TAS130 SUK A6,4 «, t00=0x0016, t01=0x004e}
0x22ba…22f0 Head {h00=0x0032, h01=0x0050, text=» RF(N) TASHLT FC NOT FOUND? SHOULD NOT OCCUR. «, t00=0x0016, t01=0x0066}
0x22f0…2306 Head {h00=0x0012, h01=0x0050, text=» LD A5,SCTCDT «, t00=0x0016, t01=0x009c}
0x2306…2318 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0016, t01=0x00b2}
0x2318…232c Head {h00=0x0010, h01=0x0050, text=» CC A1,1,A5 «, t00=0x0016, t01=0x00c4}
0x232c…234e Head {h00=0x001e, h01=0x0050, text=» RB(NE) TAS130 NOT THIS FC«, t00=0x0016, t01=0x00d8}
0x234e…2362 Head {h00=0x0010, h01=0x0050, text=» LDR A11,A11«, t00=0x0016, t01=0x00fa}
0x2362…2378 Head {h00=0x0012, h01=0x0050, text=» RF(Z) TAS131 «, t00=0x0016, t01=0x010e}
0x2378…2394 Head {h00=0x0018, h01=0x0050, text=» LCR A5,A3 DISC CODE«, t00=0x0016, t01=0x0124}
0x2394…23a8 Head {h00=0x0010, h01=0x0050, text=» ANK A5,/F8 «, t00=0x0016, t01=0x0140}
0x23a8…23bc Head {h00=0x0010, h01=0x0050, text=» SUK A5,/F8 «, t00=0x0016, t01=0x0154}
0x23bc…23de Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TAS131 NO FLEXDISC«, t00=0x0016, t01=0x0168}
0x23de…23e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x018a}
0x23e8…2402 (23, 0, 400) Head {h00=0x0016, h01=0x0050, text=»* LOCK FLEXDISC «, t00=0x0017, t01=0x0004}
0x2402…240c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x001e}
0x240c…2424 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,TASECB «, t00=0x0017, t01=0x0028}
0x2424…244a Head {h00=0x0022, h01=0x0050, text=» ST A1,ECBFC,A8 FLEX FILE CODE«, t00=0x0017, t01=0x0040}
0x244a…245e Head {h00=0x0010, h01=0x0050, text=» SUR A12,A12«, t00=0x0017, t01=0x0066}
0x245e…247c Head {h00=0x001a, h01=0x0050, text=» LDK A7,/A6 LOCK,WAIT «, t00=0x0017, t01=0x007a}
0x247c…2488 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0017, t01=0x0098}
0x2488…2498 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0017, t01=0x00a4}
0x2498…24b0 Head {h00=0x0014, h01=0x0050, text=» LD A7,ECBRC,A8 «, t00=0x0017, t01=0x00b4}
0x24b0…24c6 Head {h00=0x0012, h01=0x0050, text=» RF(Z) TAS131 «, t00=0x0017, t01=0x00cc}
0x24c6…24dc Head {h00=0x0012, h01=0x0050, text=» ANKL A7,/7FFF«, t00=0x0017, t01=0x00e2}
0x24dc…2502 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TASF10 NOT ONLY BIT 0 «, t00=0x0017, t01=0x00f8}
0x2502…252a Head {h00=0x0024, h01=0x0050, text=» LDKL A12,1 LFLAG=LOCKED BEFORE «, t00=0x0017, t01=0x011e}
0x252a…253c Head {h00=0x000e, h01=0x0050, text=» RF TAS131«, t00=0x0017, t01=0x0146}
0x253c…2550 Head {h00=0x0010, h01=0x0050, text=»TASF10 EQU *«, t00=0x0017, t01=0x0158}
0x2550…2570 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/7 BIT 13,14,15 «, t00=0x0017, t01=0x016c}
0x2570…2590 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) TAS150 GRAVE ERR«, t00=0x0017, t01=0x018c}
0x2590…25a4 Head {h00=0x0010, h01=0x0050, text=»TAS131 EQU *«, t00=0x0018, t01=0x001c}
0x25a4…25c4 Head {h00=0x001c, h01=0x0050, text=» ST A1,TASVOL,A2 SAVE FC«, t00=0x0018, t01=0x0030}
0x25c4…25cc Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0050}
0x25cc…25e2 Head {h00=0x0012, h01=0x0050, text=» AD A6,SCTCDT «, t00=0x0018, t01=0x0058}
0x25e2…25fc Head {h00=0x0016, h01=0x0050, text=» LDR* A5,A6 INDEX «, t00=0x0018, t01=0x006e}
0x25fc…2624 Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 DISC NAME DISPLACEMENT«, t00=0x0018, t01=0x0088}
0x2624…2636 Head {h00=0x000e, h01=0x0050, text=» SRL A5,8 «, t00=0x0018, t01=0x00b0}
0x2636…264c Head {h00=0x0012, h01=0x0050, text=» RF(Z) TAS135 «, t00=0x0018, t01=0x00c2}
0x264c…267c Head {h00=0x002c, h01=0x0050, text=»* DECIDE DISC DISPL FOR THIS FILE CODE«, t00=0x0018, t01=0x00d8}
0x267c…26a4 Head {h00=0x0024, h01=0x0050, text=»* INDEX IS REL VOL NAME IN DWT«, t00=0x0018, t01=0x0108}
0x26a4…26ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0130}
0x26ae…26c2 Head {h00=0x0010, h01=0x0050, text=»TAS132 EQU *«, t00=0x0018, t01=0x013a}
0x26c2…26ea Head {h00=0x0024, h01=0x0050, text=» ADK A1,6 NEXT DISC DISPLACEMENT«, t00=0x0018, t01=0x014e}
0x26ea…26fc Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0018, t01=0x0176}
0x26fc…2712 Head {h00=0x0012, h01=0x0050, text=» RB(P) TAS132 «, t00=0x0018, t01=0x0188}
0x2712…2726 Head {h00=0x0010, h01=0x0050, text=»TAS135 EQU *«, t00=0x0019, t01=0x000e}
0x2726…2742 Head {h00=0x0018, h01=0x0050, text=» LD A6,2,A6 DWT ADDR«, t00=0x0019, t01=0x0022}
0x2742…276c Head {h00=0x0026, h01=0x0050, text=» RF(Z) TASHLT NO DWT ADDRESS FOUND«, t00=0x0019, t01=0x003e}
0x276c…2796 Head {h00=0x0026, h01=0x0050, text=» ADR A6,A1 POINTER TO VOLUME NAME «, t00=0x0019, t01=0x0068}
0x2796…27ba Head {h00=0x0020, h01=0x0050, text=» LDK A1,3 VOL NAMES 3 WORDS «, t00=0x0019, t01=0x0092}
0x27ba…27e4 Head {h00=0x0026, h01=0x0050, text=» LDR A5,A4 POINTER ASBLK VOL NAME «, t00=0x0019, t01=0x00b6}
0x27e4…27ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e0}
0x27ee…281e Head {h00=0x002c, h01=0x0050, text=»* CHECK VOLUME NAMES IN DWT AND ASBLK «, t00=0x0019, t01=0x00ea}
0x281e…2828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x011a}
0x2828…2842 Head {h00=0x0016, h01=0x0050, text=»TAS140 LDR* A9,A5 «, t00=0x0019, t01=0x0124}
0x2842…285a Head {h00=0x0014, h01=0x0050, text=» CW A9,DWTVOL,A6«, t00=0x0019, t01=0x013e}
0x285a…287a Head {h00=0x001c, h01=0x0050, text=» RF(NE) TAS146 NO MATCH «, t00=0x0019, t01=0x0156}
0x287a…288c Head {h00=0x000e, h01=0x0050, text=» ADK A5,2 «, t00=0x0019, t01=0x0176}
0x288c…289e Head {h00=0x000e, h01=0x0050, text=» ADK A6,2 «, t00=0x0019, t01=0x0188}
0x289e…28b0 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001a, t01=0x000a}
0x28b0…28e2 Head {h00=0x002e, h01=0x0050, text=» RB(P) TAS140 CHECK NEXT WORD IN VOL NAME «, t00=0x001a, t01=0x001c}
0x28e2…28ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x004e}
0x28ec…2906 Head {h00=0x0016, h01=0x0050, text=»* VOL NAME MATCH«, t00=0x001a, t01=0x0058}
0x2906…292a Head {h00=0x0020, h01=0x0050, text=»* STORE DMI , FC IN TASVOL«, t00=0x001a, t01=0x0072}
0x292a…2934 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0096}
0x2934…294c Head {h00=0x0014, h01=0x0050, text=» LD A1,TASVOL,A2«, t00=0x001a, t01=0x00a0}
0x294c…2960 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/0F «, t00=0x001a, t01=0x00b8}
0x2960…2972 Head {h00=0x000e, h01=0x0050, text=» CWK A1,/8«, t00=0x001a, t01=0x00cc}
0x2972…299a Head {h00=0x0024, h01=0x0050, text=» RF(L) TAS143 NOT FLEXIBLE DISC «, t00=0x001a, t01=0x00de}
0x299a…29b2 Head {h00=0x0014, h01=0x0050, text=» LDK A1,2 FD DMI«, t00=0x001a, t01=0x0106}
0x29b2…29c4 Head {h00=0x000e, h01=0x0050, text=» RF TAS145«, t00=0x001a, t01=0x011e}
0x29c4…29d8 Head {h00=0x0010, h01=0x0050, text=»TAS143 EQU *«, t00=0x001a, t01=0x0130}
0x29d8…29ea Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x001a, t01=0x0144}
0x29ea…29fe Head {h00=0x0010, h01=0x0050, text=»TAS145 EQU *«, t00=0x001a, t01=0x0156}
0x29fe…2a08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x016a}
0x2a08…2a2c Head {h00=0x0020, h01=0x0050, text=»* A1 = DMI = 0 FOR DRIVE 1«, t00=0x001a, t01=0x0174}
0x2a2c…2a50 Head {h00=0x0020, h01=0x0050, text=»* 1 FOR DRIVE 2«, t00=0x001b, t01=0x0008}
0x2a50…2a76 Head {h00=0x0022, h01=0x0050, text=»* 2 FOR FLEXDISC «, t00=0x001b, t01=0x002c}
0x2a76…2a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0052}
0x2a80…2a98 Head {h00=0x0014, h01=0x0050, text=» SC A1,TASVOL,A2«, t00=0x001b, t01=0x005c}
0x2a98…2aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0074}
0x2aa2…2adc Head {h00=0x0036, h01=0x0050, text=»* SAVE FILE CODES FOR NEWLY LOCKED FLEXDISCS =1 «, t00=0x001b, t01=0x007e}
0x2adc…2b12 Head {h00=0x0032, h01=0x0050, text=»* (ONLY SIGNIFICANT WHEN A11 = 1 ) =1 START«, t00=0x001b, t01=0x00b8}
0x2b12…2b1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ee}
0x2b1c…2b2e Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x001b, t01=0x00f8}
0x2b2e…2b4c Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TAS147 NO FLEX«, t00=0x001b, t01=0x010a}
0x2b4c…2b60 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A12«, t00=0x001b, t01=0x0128}
0x2b60…2b86 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TAS147 LOCKED EARLIER «, t00=0x001b, t01=0x013c}
0x2b86…2b98 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x001b, t01=0x0162}
0x2b98…2bae Head {h00=0x0012, h01=0x0050, text=» SRL A1,1 BYTE«, t00=0x001b, t01=0x0174}
0x2bae…2bd2 Head {h00=0x0020, h01=0x0050, text=» LC A3,TASVOL+1,A2 FILE CODE«, t00=0x001b, t01=0x018a}
0x2bd2…2bf0 Head {h00=0x001a, h01=0x0050, text=» SC A3,TASLFD,A1 SAVE «, t00=0x001c, t01=0x001e}
0x2bf0…2c0c Head {h00=0x0018, h01=0x0050, text=»TAS147 EQU * =1 END«, t00=0x001c, t01=0x003c}
0x2c0c…2c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0058}
0x2c16…2c3a Head {h00=0x0020, h01=0x0050, text=»* CHECK NEXT VOL IN ASBLK «, t00=0x001c, t01=0x0062}
0x2c3a…2c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0086}
0x2c44…2c5e Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RET CODE«, t00=0x001c, t01=0x0090}
0x2c5e…2c70 Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x001c, t01=0x00aa}
0x2c70…2c82 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x001c, t01=0x00bc}
0x2c82…2cae Head {h00=0x0028, h01=0x0050, text=» RB(NN) TAS110 MORE VOLUMES TO CHECK«, t00=0x001c, t01=0x00ce}
0x2cae…2cdc Head {h00=0x002a, h01=0x0050, text=» RF TAS155 OK ALL VOLUMES ARE ON LINE «, t00=0x001c, t01=0x00fa}
0x2cdc…2cf0 Head {h00=0x0010, h01=0x0050, text=»TAS146 EQU *«, t00=0x001c, t01=0x0128}
0x2cf0…2d04 Head {h00=0x0010, h01=0x0050, text=» LDR A11,A11«, t00=0x001c, t01=0x013c}
0x2d04…2d2c Head {h00=0x0024, h01=0x0050, text=» RF(Z) TAS150 NO LOCK PERFORMED «, t00=0x001c, t01=0x0150}
0x2d2c…2d48 Head {h00=0x0018, h01=0x0050, text=» LCR A1,A3 DISC CODE«, t00=0x001c, t01=0x0178}
0x2d48…2d5c (29, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ANK A1,/F8 «, t00=0x001d, t01=0x0004}
0x2d5c…2d70 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/F8 «, t00=0x001d, t01=0x0018}
0x2d70…2d92 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TAS150 NO FLEXDISC«, t00=0x001d, t01=0x002c}
0x2d92…2dac Head {h00=0x0016, h01=0x0050, text=» LDR A12,A12 LFLAG«, t00=0x001d, t01=0x004e}
0x2dac…2dd0 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TAS150 LOCKED BEFORE«, t00=0x001d, t01=0x0068}
0x2dd0…2dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x008c}
0x2dda…2dec Head {h00=0x000e, h01=0x0050, text=»* UNLOCK«, t00=0x001d, t01=0x0096}
0x2dec…2df6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a8}
0x2df6…2e16 Head {h00=0x001c, h01=0x0050, text=» LDK A7,/B8 UNLOAD,WAIT «, t00=0x001d, t01=0x00b2}
0x2e16…2e22 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x001d, t01=0x00d2}
0x2e22…2e32 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x001d, t01=0x00de}
0x2e32…2e3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ee}
0x2e3c…2e66 Head {h00=0x0026, h01=0x0050, text=»* NO MATCH TRY NEXT FC IN DFTAB «, t00=0x001d, t01=0x00f8}
0x2e66…2e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0122}
0x2e70…2e84 Head {h00=0x0010, h01=0x0050, text=»TAS150 EQU *«, t00=0x001d, t01=0x012c}
0x2e84…2e96 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x001d, t01=0x0140}
0x2e96…2eac Head {h00=0x0012, h01=0x0050, text=» CWK A3,DFTABE«, t00=0x001d, t01=0x0152}
0x2eac…2ed4 Head {h00=0x0024, h01=0x0050, text=» RB(NE) TAS120 MORE FC IN DFTAB «, t00=0x001d, t01=0x0168}
0x2ed4…2ee6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x001d, t01=0x0190}
0x2ee6…2efa Head {h00=0x0010, h01=0x0050, text=»TAS155 EQU *«, t00=0x001e, t01=0x0012}
0x2efa…2f0a Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001e, t01=0x0026}
0x2f0a…2f14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0036}
0x2f14…2f40 Head {h00=0x0028, h01=0x0050, text=»TASHLT LDK A1,/11 INDICATE DM ERROR «, t00=0x001e, t01=0x0040}
0x2f40…2f60 Head {h00=0x001c, h01=0x0050, text=» CF A15,HALT HALT SYSTEM«, t00=0x001e, t01=0x006c}
0x2f60…2f6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x008c}
0x2f6a…2f78 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0096}
0x2f78…2f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a4}
0x2f82…2f96 Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x001e, t01=0x00ae}
0x2f96…2faa Head {h00=0x0010, h01=0x0050, text=»* TASS *«, t00=0x001e, t01=0x00c2}
0x2faa…2fbe Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x001e, t01=0x00d6}
0x2fbe…2fc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00ea}
0x2fc8…2fdc Head {h00=0x0010, h01=0x0050, text=»IXTASS EQU *«, t00=0x001e, t01=0x00f4}
0x2fdc…2ff2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001e, t01=0x0108}
0x2ff2…3006 Head {h00=0x0010, h01=0x0050, text=» LDK A7,/81 «, t00=0x001e, t01=0x011e}
0x3006…3034 Head {h00=0x002a, h01=0x0050, text=» SCR A7,A8 BIT 0+7 IND. ASS ONE INDEX «, t00=0x001e, t01=0x0132}
0x3034…3040 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0160}
0x3040…304a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x016c}
0x304a…3060 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x0176}
0x3060…3096 Head {h00=0x0032, h01=0x0050, text=» ELR A7,A8 GET FIRST WORD OF USER ASSIGN BLOCK«, t00=0x001e, t01=0x018c}
0x3096…30be Head {h00=0x0024, h01=0x0050, text=» ANK A7,/FF SKIP LEFT CHARACTER «, t00=0x001f, t01=0x0032}
0x30be…30f2 Head {h00=0x0030, h01=0x0050, text=» ORKL A7,/8100 BIT 0+7 IND. ASSIGN ONE INDEX«, t00=0x001f, t01=0x005a}
0x30f2…311e Head {h00=0x0028, h01=0x0050, text=» ESR A7,A8 SET WORD IN ASSIGN BLOCK «, t00=0x001f, t01=0x008e}
0x311e…312a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00ba}
0x312a…3134 Head {h00=0x0006, h01=0x0050, text=»*~«, t00=0x001f, t01=0x00c6}
0x3134…3160 Head {h00=0x0028, h01=0x0050, text=» LDK A7,0 ONLY GLOBAL ASSIGN ALLOWED«, t00=0x001f, t01=0x00d0}
0x3160…316a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00fc}
0x316a…317c Head {h00=0x000e, h01=0x0050, text=»TASS EQU *«, t00=0x001f, t01=0x0106}
0x317c…31b2 Head {h00=0x0032, h01=0x0050, text=» LDKL A14,TASS14 INITIALIZE A14 STACK POINTER «, t00=0x001f, t01=0x0118}
0x31b2…31ce Head {h00=0x0018, h01=0x0050, text=» LDR A10,A7 SAVE TC «, t00=0x001f, t01=0x014e}
0x31ce…31d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x016a}
0x31d8…320a Head {h00=0x002e, h01=0x0050, text=»* CHECK IF PREVIOS ASSIGN NOT COMPLETED «, t00=0x001f, t01=0x0174}
0x320a…3242 Head {h00=0x0034, h01=0x0050, text=»* AND IF SO QUEUE THIS REQUEST VIA THE TASQUE «, t00=0x0020, t01=0x0016}
0x3242…324c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x004e}
0x324c…3262 Head {h00=0x0012, h01=0x0050, text=» LD A1,TASBLK «, t00=0x0020, t01=0x0058}
0x3262…328c Head {h00=0x0026, h01=0x0050, text=» RF(Z) TAS050 NO CONCURRENT ASSIGN«, t00=0x0020, t01=0x006e}
0x328c…32ba Head {h00=0x002a, h01=0x0050, text=» LDKL A1,TASQUE START OF ASSIGN QUEUE «, t00=0x0020, t01=0x0098}
0x32ba…32e6 Head {h00=0x0028, h01=0x0050, text=»TAS020 EQU * QUEUE AS FOR GETBUFFER «, t00=0x0020, t01=0x00c6}
0x32e6…32f8 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0020, t01=0x00f2}
0x32f8…330c Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A1 «, t00=0x0020, t01=0x0104}
0x330c…3334 Head {h00=0x0024, h01=0x0050, text=» RB(NZ) TAS020 NOT LAST IN CHAIN«, t00=0x0020, t01=0x0118}
0x3334…3346 Head {h00=0x000e, h01=0x0050, text=» STR A5,A2«, t00=0x0020, t01=0x0140}
0x3346…3356 Head {h00=0x000c, h01=0x0050, text=» CMR A5 «, t00=0x0020, t01=0x0152}
0x3356…3372 Head {h00=0x0018, h01=0x0050, text=» ABL TDISP DISPATCH «, t00=0x0020, t01=0x0162}
0x3372…337c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x017e}
0x337c…3390 Head {h00=0x0010, h01=0x0050, text=»TAS050 EQU *«, t00=0x0020, t01=0x0188}
0x3390…33ba Head {h00=0x0026, h01=0x0050, text=» IM TASBLK INDICATE ASSIGN STARTED«, t00=0x0021, t01=0x000c}
0x33ba…33e0 Head {h00=0x0022, h01=0x0050, text=» CM TASFDD FDB ADDR DATA FILE «, t00=0x0021, t01=0x0036}
0x33e0…33ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x005c}
0x33ea…3424 Head {h00=0x0036, h01=0x0050, text=» ST A5,TASTTA SAVE TTAB ADDRESS OF REQUESTING TASK«, t00=0x0021, t01=0x0066}
0x3424…342e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00a0}
0x342e…3444 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0021, t01=0x00aa}
0x3444…344e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00c0}
0x344e…3484 Head {h00=0x0032, h01=0x0050, text=»* MOVE USER ASSIGN BLOCK TO SYSTEM AREA MASBLK«, t00=0x0021, t01=0x00ca}
0x3484…348e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0100}
0x348e…34be Head {h00=0x002c, h01=0x0050, text=» LDR A1,A8 GET ADDRESS OF SENDING BLOCK «, t00=0x0021, t01=0x010a}
0x34be…34f4 Head {h00=0x0032, h01=0x0050, text=» LDKL A2,MASBLK GET ADDRESS OF RECEIVING BLOCK«, t00=0x0021, t01=0x013a}
0x34f4…352a Head {h00=0x0032, h01=0x0050, text=» LDR A8,A2 SET A8 TO NEW ASSIGN BLOCK ADDRESS «, t00=0x0021, t01=0x0170}
0x352a…355a Head {h00=0x002c, h01=0x0050, text=» LDK A3,34 ASSIGN BLOCK LENGTH IN BYTES «, t00=0x0022, t01=0x0016}
0x355a…3582 Head {h00=0x0024, h01=0x0050, text=» CF A14,MOV:US MOVE ASSIGN BLOCK«, t00=0x0022, t01=0x0046}
0x3582…358e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x006e}
0x358e…3598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x007a}
0x3598…35c0 Head {h00=0x0024, h01=0x0050, text=» ST A8,TASASB SAVE ASBLK ADDRESS«, t00=0x0022, t01=0x0084}
0x35c0…35ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ac}
0x35ca…35dc Head {h00=0x000e, h01=0x0050, text=» LDK A1,16«, t00=0x0022, t01=0x00b6}
0x35dc…361a Head {h00=0x003a, h01=0x0050, text=» ST A1,TASCXO INIT. TASCXO TO LAST ENTRY IN TASSEXXLB «, t00=0x0022, t01=0x00c8}
0x361a…3624 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0106}
0x3624…3654 Head {h00=0x002c, h01=0x0050, text=» LDKL A7,-1 INITIALIZE RETURN CODE IN A7«, t00=0x0022, t01=0x0110}
0x3654…365e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0140}
0x365e…3690 Head {h00=0x002e, h01=0x0050, text=»* CHECK MAX NUMBER OF VOLUMES ( 1 - 4 ) «, t00=0x0022, t01=0x014a}
0x3690…369a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x017c}
0x369a…36ac Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0022, t01=0x0186}
0x36ac…36cc Head {h00=0x001c, h01=0x0050, text=» LCR A2,A8 NO OF VOLUMES«, t00=0x0023, t01=0x0008}
0x36cc…36fe Head {h00=0x002e, h01=0x0050, text=» ANK A2,/1F REMOVE INDEX BIT +DELAY+BASIC «, t00=0x0023, t01=0x0028}
0x36fe…371a Head {h00=0x0018, h01=0x0050, text=» RF(Z) TAS090 NO VOL«, t00=0x0023, t01=0x005a}
0x371a…372c Head {h00=0x000e, h01=0x0050, text=» CWK A2,4 «, t00=0x0023, t01=0x0076}
0x372c…3746 Head {h00=0x0016, h01=0x0050, text=» RF(NG) TAS100 <=4«, t00=0x0023, t01=0x0088}
0x3746…375e Head {h00=0x0014, h01=0x0050, text=»TAS090 RF TASSEM«, t00=0x0023, t01=0x00a2}
0x375e…376c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00ba}
0x376c…3776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c8}
0x3776…379e Head {h00=0x0024, h01=0x0050, text=»* CHECK IF VOLUMES ARE ON LINE«, t00=0x0023, t01=0x00d2}
0x379e…37a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00fa}
0x37a8…37bc Head {h00=0x0010, h01=0x0050, text=»TAS100 EQU *«, t00=0x0023, t01=0x0104}
0x37bc…37dc Head {h00=0x001c, h01=0x0050, text=» SUR A11,A11 NO FLEXLOCK«, t00=0x0023, t01=0x0118}
0x37dc…37f2 Head {h00=0x0012, h01=0x0050, text=» CF A14,VOLCHE«, t00=0x0023, t01=0x0138}
0x37f2…3812 Head {h00=0x001c, h01=0x0050, text=» LD A8,TASASB ASBLK ADDR«, t00=0x0023, t01=0x014e}
0x3812…382e Head {h00=0x0018, h01=0x0050, text=» LDKL A7,-1 RET CODE«, t00=0x0023, t01=0x016e}
0x382e…3846 Head {h00=0x0014, h01=0x0050, text=» ADK A1,0 SET CR«, t00=0x0023, t01=0x018a}
0x3846…386e Head {h00=0x0024, h01=0x0050, text=» RF(Z) TAS160 ALL VOLUMES FOUND «, t00=0x0024, t01=0x0012}
0x386e…3878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x003a}
0x3878…38a8 Head {h00=0x002c, h01=0x0050, text=»* ALL VOL NOT FOUND. ACT FLEXDISCTASK «, t00=0x0024, t01=0x0044}
0x38a8…38b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0074}
0x38b2…38c8 Head {h00=0x0012, h01=0x0050, text=» LD A1,TASCVO «, t00=0x0024, t01=0x007e}
0x38c8…38ec Head {h00=0x0020, h01=0x0050, text=» LDK A2,2 ID DMTASK FLEXDISC«, t00=0x0024, t01=0x0094}
0x38ec…3910 Head {h00=0x0020, h01=0x0050, text=» SC A2,TASVOL,A1 SEE TAS195 «, t00=0x0024, t01=0x00b8}
0x3910…391e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x00dc}
0x391e…3928 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00ea}
0x3928…3958 Head {h00=0x002c, h01=0x0050, text=»* CHECK IF FILE CODE ALREADY ASSIGNED «, t00=0x0024, t01=0x00f4}
0x3958…3962 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0124}
0x3962…3976 Head {h00=0x0010, h01=0x0050, text=»TAS160 EQU *«, t00=0x0024, t01=0x012e}
0x3976…398a Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A8 «, t00=0x0024, t01=0x0142}
0x398a…399e Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0024, t01=0x0156}
0x399e…39ce Head {h00=0x002c, h01=0x0050, text=» RF(E) TASSEM FILE CODE = 0 NOT ALLOWED «, t00=0x0024, t01=0x016a}
0x39ce…39e6 Head {h00=0x0014, h01=0x0050, text=» LDR A10,A10 TC «, t00=0x0025, t01=0x000a}
0x39e6…3a0a Head {h00=0x0020, h01=0x0050, text=» RF(Z) TAS165 GLOBAL ASSIGN «, t00=0x0025, t01=0x0022}
0x3a0a…3a2a Head {h00=0x001c, h01=0x0050, text=» LD A2,TASTTA TTAB ADDR «, t00=0x0025, t01=0x0046}
0x3a2a…3a3c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0025, t01=0x0066}
0x3a3c…3a54 Head {h00=0x0014, h01=0x0050, text=» LD A2,TTB:TD,A4«, t00=0x0025, t01=0x0078}
0x3a54…3a6e Head {h00=0x0016, h01=0x0050, text=» ADKL A4,TTB:TD+1 «, t00=0x0025, t01=0x0090}
0x3a6e…3a80 Head {h00=0x000e, h01=0x0050, text=» RF TAS170«, t00=0x0025, t01=0x00aa}
0x3a80…3a94 Head {h00=0x0010, h01=0x0050, text=»TAS165 EQU *«, t00=0x0025, t01=0x00bc}
0x3a94…3aaa Head {h00=0x0012, h01=0x0050, text=» LD A4,SCTCDT «, t00=0x0025, t01=0x00d0}
0x3aaa…3abe Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A4 «, t00=0x0025, t01=0x00e6}
0x3abe…3ad0 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0025, t01=0x00fa}
0x3ad0…3ae8 Head {h00=0x0014, h01=0x0050, text=»TAS170 SUK A2,4 «, t00=0x0025, t01=0x010c}
0x3ae8…3b0a Head {h00=0x001e, h01=0x0050, text=» RF(L) TAS180 END OF TABLE«, t00=0x0025, t01=0x0124}
0x3b0a…3b1c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0025, t01=0x0146}
0x3b1c…3b2e Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x0025, t01=0x0158}
0x3b2e…3b4a Head {h00=0x0018, h01=0x0050, text=» CCR A3,A1 FILE CODE«, t00=0x0025, t01=0x016a}
0x3b4a…3b6a Head {h00=0x001c, h01=0x0050, text=» RB(NE) TAS170 NO MATCH «, t00=0x0025, t01=0x0186}
0x3b6a…3b74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0016}
0x3b74…3b8e Head {h00=0x0016, h01=0x0050, text=»* FILE CODE USED«, t00=0x0026, t01=0x0020}
0x3b8e…3bc0 Head {h00=0x002e, h01=0x0050, text=»* OK WHEN REQ = ASS INDEX AND INDEX = 1 «, t00=0x0026, t01=0x003a}
0x3bc0…3bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x006c}
0x3bca…3bec Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A8 ASBLK 1ST WORD«, t00=0x0026, t01=0x0076}
0x3bec…3c10 Head {h00=0x0020, h01=0x0050, text=» RF(NN) TASSE5 NORMAL ASSIGN«, t00=0x0026, t01=0x0098}
0x3c10…3c22 Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0026, t01=0x00bc}
0x3c22…3c3c Head {h00=0x0016, h01=0x0050, text=» CC A2,-1,A1 INDEX«, t00=0x0026, t01=0x00ce}
0x3c3c…3c6a Head {h00=0x002a, h01=0x0050, text=» RF(NE) TASSE5 FILE CODE ALREADY USED «, t00=0x0026, t01=0x00e8}
0x3c6a…3c74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0116}
0x3c74…3c96 Head {h00=0x001e, h01=0x0050, text=»* DATA FILE FDB IS FOUND«, t00=0x0026, t01=0x0120}
0x3c96…3ca0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0142}
0x3ca0…3cbc Head {h00=0x0018, h01=0x0050, text=» LD A1,1,A1 FDB ADDR«, t00=0x0026, t01=0x014c}
0x3cbc…3cd2 Head {h00=0x0012, h01=0x0050, text=» ST A1,TASFDD «, t00=0x0026, t01=0x0168}
0x3cd2…3ce4 Head {h00=0x000e, h01=0x0050, text=» RB TAS170«, t00=0x0026, t01=0x017e}
0x3ce4…3cee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0190}
0x3cee…3cf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x000a}
0x3cf8…3d3a Head {h00=0x003e, h01=0x0050, text=»* FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) «, t00=0x0027, t01=0x0014}
0x3d3a…3d44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0056}
0x3d44…3d58 Head {h00=0x0010, h01=0x0050, text=»TAS180 EQU *«, t00=0x0027, t01=0x0060}
0x3d58…3d6a Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0027, t01=0x0074}
0x3d6a…3d82 Head {h00=0x0014, h01=0x0050, text=» LDR A10,A10 TC «, t00=0x0027, t01=0x0086}
0x3d82…3da6 Head {h00=0x0020, h01=0x0050, text=» RF(Z) TAS185 GLOBAL ASSIGN «, t00=0x0027, t01=0x009e}
0x3da6…3dc6 Head {h00=0x001c, h01=0x0050, text=» LD A2,TASTTA TTAB ADDR «, t00=0x0027, t01=0x00c2}
0x3dc6…3dd8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0027, t01=0x00e2}
0x3dd8…3df0 Head {h00=0x0014, h01=0x0050, text=» LD A2,TTB:TD,A4«, t00=0x0027, t01=0x00f4}
0x3df0…3e0a Head {h00=0x0016, h01=0x0050, text=» ADKL A4,TTB:TD+1 «, t00=0x0027, t01=0x010c}
0x3e0a…3e1c Head {h00=0x000e, h01=0x0050, text=» RF TAS190«, t00=0x0027, t01=0x0126}
0x3e1c…3e30 Head {h00=0x0010, h01=0x0050, text=»TAS185 EQU *«, t00=0x0027, t01=0x0138}
0x3e30…3e46 Head {h00=0x0012, h01=0x0050, text=» LD A4,SCTCDT «, t00=0x0027, t01=0x014c}
0x3e46…3e5a Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A4 «, t00=0x0027, t01=0x0162}
0x3e5a…3e6c Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0027, t01=0x0176}
0x3e6c…3e84 Head {h00=0x0014, h01=0x0050, text=»TAS190 SUK A2,4 «, t00=0x0027, t01=0x0188}
0x3e84…3eb0 Head {h00=0x0028, h01=0x0050, text=» RF(L) TASSE2 NO FREE ENTRY IN TABLE«, t00=0x0028, t01=0x0010}
0x3eb0…3ec2 Head {h00=0x000e, h01=0x0050, text=» LDR A9,A4«, t00=0x0028, t01=0x003c}
0x3ec2…3ed4 Head {h00=0x000e, h01=0x0050, text=» ADR A9,A2«, t00=0x0028, t01=0x004e}
0x3ed4…3ef0 Head {h00=0x0018, h01=0x0050, text=» CCR A1,A9 FILE CODE«, t00=0x0028, t01=0x0060}
0x3ef0…3f16 Head {h00=0x0022, h01=0x0050, text=» RB(NE) TAS190 FC NOT EQUAL 0 «, t00=0x0028, t01=0x007c}
0x3f16…3f2a Head {h00=0x0010, h01=0x0050, text=» CW A1,1,A9 «, t00=0x0028, t01=0x00a2}
0x3f2a…3f54 Head {h00=0x0026, h01=0x0050, text=» RB(NE) TAS190 DWTADR NOT EQUAL 0 «, t00=0x0028, t01=0x00b6}
0x3f54…3f76 Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A8 ASBLK 1ST WORD«, t00=0x0028, t01=0x00e0}
0x3f76…3f98 Head {h00=0x001e, h01=0x0050, text=» RF(N) TAS195 ASSIGN INDEX«, t00=0x0028, t01=0x0102}
0x3f98…3fc6 Head {h00=0x002a, h01=0x0050, text=» ORKL A3,/100 INDEX = 1 FOR DATA FILE «, t00=0x0028, t01=0x0124}
0x3fc6…3fda Head {h00=0x0010, h01=0x0050, text=»TAS195 EQU *«, t00=0x0028, t01=0x0152}
0x3fda…400e Head {h00=0x0030, h01=0x0050, text=» ST A3,-1,A9 SET INDEX AND FC IN FREE ENTRY «, t00=0x0028, t01=0x0166}
0x400e…402e Head {h00=0x001c, h01=0x0050, text=» ST A9,TASTBE SAVE ENTRY«, t00=0x0029, t01=0x000a}
0x402e…4038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x002a}
0x4038…406c Head {h00=0x0030, h01=0x0050, text=»* GET FIRST VOLUME AND ACTIVATE ITS DMTASK«, t00=0x0029, t01=0x0034}
0x406c…4076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0068}
0x4076…408c Head {h00=0x0012, h01=0x0050, text=» LD A1,TASCVO «, t00=0x0029, t01=0x0072}
0x408c…409e Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0029, t01=0x0088}
0x409e…40b6 Head {h00=0x0014, h01=0x0050, text=» LC A7,TASVOL,A1«, t00=0x0029, t01=0x009a}
0x40b6…40d6 Head {h00=0x001c, h01=0x0050, text=» ADKL A7,'#D' TID DMTASK«, t00=0x0029, t01=0x00b2}
0x40d6…40ec Head {h00=0x0012, h01=0x0050, text=» CF A15,FNDTID«, t00=0x0029, t01=0x00d2}
0x40ec…4112 Head {h00=0x0022, h01=0x0050, text=» LDR A5,A2 TTAB ADDRESS DMTASK«, t00=0x0029, t01=0x00e8}
0x4112…4134 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TAS200 TTAB FOUND «, t00=0x0029, t01=0x010e}
0x4134…4142 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0130}
0x4142…414c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x013e}
0x414c…4176 Head {h00=0x0026, h01=0x0050, text=»* FLEXDISC DMTASK DOES NOT EXIST«, t00=0x0029, t01=0x0148}
0x4176…4180 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0172}
0x4180…419e Head {h00=0x001a, h01=0x0050, text=» CM -1,A9 REMOVE ENTRY«, t00=0x0029, t01=0x017c}
0x419e…41bc Head {h00=0x001a, h01=0x0050, text=» LDK A7,4 VOL UNKNOWN «, t00=0x002a, t01=0x000a}
0x41bc…41ce Head {h00=0x000e, h01=0x0050, text=» RF TASSEM«, t00=0x002a, t01=0x0028}
0x41ce…41e2 Head {h00=0x0010, h01=0x0050, text=»TAS200 EQU *«, t00=0x002a, t01=0x003a}
0x41e2…41f4 Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x002a, t01=0x004e}
0x41f4…422c Head {h00=0x0034, h01=0x0050, text=» ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK «, t00=0x002a, t01=0x0060}
0x422c…4256 Head {h00=0x0026, h01=0x0050, text=» LDKL A2,DMTASS ASSIGN INDEX ENTRY«, t00=0x002a, t01=0x0098}
0x4256…426a Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A8 «, t00=0x002a, t01=0x00c2}
0x426a…428c Head {h00=0x001e, h01=0x0050, text=» RF(N) TAS210 INDEX ASSIGN«, t00=0x002a, t01=0x00d6}
0x428c…429e Head {h00=0x000e, h01=0x0050, text=» CM TASFIL«, t00=0x002a, t01=0x00f8}
0x429e…42b2 Head {h00=0x0010, h01=0x0050, text=»TAS210 EQU *«, t00=0x002a, t01=0x010a}
0x42b2…42e2 Head {h00=0x002c, h01=0x0050, text=» CM TASFDB =0 INDICATES EXT #0 NOT FOUND«, t00=0x002a, t01=0x011e}
0x42e2…42f4 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002a, t01=0x014e}
0x42f4…4322 Head {h00=0x002a, h01=0x0050, text=»* A1=PAR,A2=ADR,A3=SEGM,A5=TTAB ADDR«, t00=0x002a, t01=0x0160}
0x4322…4348 Head {h00=0x0022, h01=0x0050, text=» CF A15,ACTOT ACTIVATE DMTASK «, t00=0x002a, t01=0x018e}
0x4348…436c Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x002b, t01=0x0024}
0x436c…437a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0048}
0x437a…4384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0056}
0x4384…439e Head {h00=0x0016, h01=0x0050, text=»* ERROR RETURNS «, t00=0x002b, t01=0x0060}
0x439e…43a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x007a}
0x43a8…43c0 Head {h00=0x0014, h01=0x0050, text=»TASSE5 ADK A7,1 «, t00=0x002b, t01=0x0084}
0x43c0…43d8 Head {h00=0x0014, h01=0x0050, text=»TASSE4 ADK A7,1 «, t00=0x002b, t01=0x009c}
0x43d8…43f0 Head {h00=0x0014, h01=0x0050, text=»TASSE3 ADK A7,1 «, t00=0x002b, t01=0x00b4}
0x43f0…4408 Head {h00=0x0014, h01=0x0050, text=»TASSE2 ADK A7,1 «, t00=0x002b, t01=0x00cc}
0x4408…4420 Head {h00=0x0014, h01=0x0050, text=»TASSE1 ADK A7,1 «, t00=0x002b, t01=0x00e4}
0x4420…4432 Head {h00=0x000e, h01=0x0050, text=» ADK A7,1 «, t00=0x002b, t01=0x00fc}
0x4432…4446 Head {h00=0x0010, h01=0x0050, text=»TASSEM EQU *«, t00=0x002b, t01=0x010e}
0x4446…4470 Head {h00=0x0026, h01=0x0050, text=» CF A14,TASCAQ CHECK ASSIGN QUEUE «, t00=0x002b, t01=0x0122}
0x4470…4496 Head {h00=0x0022, h01=0x0050, text=» ABL LKMQDI QUEUE AND DISPATCH«, t00=0x002b, t01=0x014c}
0x4496…44a2 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002b, t01=0x0172}
0x44a2…44a6 Head {h00=0x4004, h01=0x0000}
0x44a6…44aa 00 2b 01 7e ┆ + ~┆
0x44aa…44b2 (44, 1, 8) 20 04 00 00 00 2c 00 04 ┆ , ┆