cdc:nos2.source:opl.opl871:deck:dio
Deck DIO
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.dio +++| IDENT DIO,0 00002 M00S00002.dio +++| PERIPH 00003 M00S00003.dio +++| BASE M 00004 M00S00004.dio +++| SST 00005 M00S00005.dio +++| TITLE DIO - DEADSTART I/O PROCESSOR. 00006 M00S00006.dio +++|*COMMENT DIO - DEADSTART I/O PROCESSOR.
| Line S00007 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M00S00008.dio +++| DIO SPACE 4,10 00010 M00S00009.dio +++|***** DIO - DEADSTART I/O PROCESSOR. 00011 M00S00010.dio +++|* 00012 M00S00011.dio +++|* P. D. HAAS. 78/08/04. 00013 M00S00012.dio +++| DIO SPACE 4,10 00014 M00S00013.dio +++|*** *DIO* IS THE CENTRALIZED MEANS OF READING DATA FROM 00015 M00S00014.dio +++|* THE DEADSTART MEDIUM, BE IT TAPE OR DISK. THIS ALLOWS THE 00016 M00S00015.dio +++|* OTHER DEADSTART TIME ROUTINES TO REMAIN MORE OR LESS 00017 M00S00016.dio +++|* UNAWARE OF THE MEDIUM BEING READ. TO THIS END, 10B DISK 00018 M00S00017.dio +++|* SECTORS WILL BE ASSEMBLED, IF DEADSTART IS FROM RMS, INTO 00019 M00S00018.dio +++|* A FACSIMILE OF A TAPE PRU. COMMANDS ARE ISSUED TO *DIO* 00020 M00S00019.dio +++|* VIA AN INTERCOMMUNICATIONS CHANNEL, ACCORDING TO A 00021 M00S00020.dio +++|* PROTOCOL RESEMBLING THAT OF A 3000 TYPE TAPE CONTROLLER 00022 M00S00021.dio +++|* AND A 6681. *DIO* IN THE DISPLAY CHANNEL PP FUNCTIONS AS 00023 M00S00022.dio +++|* THE 6681, READING DATA FROM AN EXTERNAL EQUIPMENT, AND 00024 M00S00023.dio +++|* RETURNING SAME TO THE REQUESTING PP. 00025 M00S00024.dio +++| DIO SPACE 4,10 00026 M00S00025.dio +++|*** OPERATOR MESSAGES. 00027 M00S00026.dio +++|* 00028 M00S00027.dio +++|* REFER TO OPERATORS GUIDE FOR INFORMATION AS TO CAUSE 00029 M00S00028.dio +++|* OF ERROR AND RECOMMENDED CORRECTIVE ACTION. 00030 M00S00029.dio +++|* 00031 M00S00030.dio +++|* *SYSTEM TAPE PARITY ERROR.* 00032 M00S00031.dio +++|* 00033 M00S00032.dio +++|* *BLOCK SEQUENCE ERROR.* 00034 M00S00033.dio +++|* 00035 M00S00034.dio +++|* *CHXX, UNYY - SZZZZ.* 00036 M00S00035.dio +++| DIO SPACE 4,10 00037 M00S00036.dio +++|*CALL COMPMAC 00038 M00S00037.dio +++|*CALL COMPCHM 00039 M00S00038.dio +++|*CALL COMSDSL 00040 M00S00039.dio +++|*CALL COMSMSP 00041 M00S00040.dio +++|*CALL COMSPIM 00042 M00S00041.dio +++| TITLE DIRECT LOCATION ASSIGNMENTS. 00043 M00S00042.dio +++| DIO SPACE 4,10 00044 M00S00043.dio +++|**** DIRECT LOCATION ASSIGNMENTS. 00045 M00S00044.dio +++| 00046 M00S00045.dio +++| 00047 M00S00046.dio +++| ORG 0 00048 M00S00047.dio +++| CON PRS-1 TRANSFER ADDRESS - 1 00049 M00S00048.dio +++| BSS 16-* 00050 M00S00049.dio +++| L1 BSS 1 SCRATCH 00051 M00S00050.dio +++| L2 BSS 1 SCRATCH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00052 M01S00001.241l630 +++| DT CON 0 895 DEADSTART READ FLAG 00053 M01S00002.241l630 +++| ERRNZ DT-MP DIRECT CELL LOCATION MUST MATCH IN *OSB* 00054 M00S00051.dio +++| UN BSS 4 PHYSICAL DISK ADDRESS 00055 M00S00052.dio +++| BF CON 0 TAPE BACKSPACE FUNCTION 00056 M00S00053.dio +++| RF CON 0 TAPE READ FUNCTION 00057 M00S00054.dio +++| SF CON 0 TAPE STATUS FUNCTION 00058 M00S00055.dio +++| LT BSS 1 LOGICAL TRACK FOR BACKSPACE 00059 M00S00056.dio +++| LS BSS 1 LOGICAL SECTOR FOR BACKSPACE 00060 M00S00057.dio +++| DM BSS 1 DEADSTART MEDIUM 00061 M00S00058.dio +++| ST BSS 1 GENERAL STATUS 00062 M00S00059.dio +++| RC BSS 1 ERROR RETRY COUNT 00063 M00S00060.dio +++| WC BSS 1 WORD COUNT 00064 M00S00061.dio +++| DH BSS 1 DEADSTART CHANNEL 00065 M00S00062.dio +++| IH BSS 1 INTERCOMMUNICATIONS CHANNEL 00066 M00S00063.dio +++| ZR CON 0 ZERO BYTE 00067 M00S00064.dio +++| TM CON 0 TAPE MOTION FLAG 00068 M00S00065.dio +++| CN BSS 5 CM WORD BUFFER 00069 M00S00066.dio +++| 00070 M00S00067.dio +++| ERRPL *-IR OVERFLOW CELLS DESTROYED BY RESIDENT 00071 M00S00068.dio +++| 00072 M00S00069.dio +++| BSS 100-*
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00073 M01S00001.ns22000 +++| DN EQU 57 DECK NUMBER 00074 M00S00070.dio +++| DP EQU 60 - 64 CM WORD BUFFER (5 LOCATIONS) 00075 M00S00071.dio +++| BL EQU 65 PP BUFFER LIMIT 00076 M00S00072.dio +++| BC EQU 66 - 67 BLOCK COUNT (2 LOCATIONS) 00077 M00S00073.dio +++|****
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00078 M01S00001.ns21000 +++| 00079 M01S00002.ns21000 +++|* IN ORDER TO AVOID CONFLICTS BETWEEN *COMSMSP* AND THE 00080 M01S00003.ns21000 +++|* *CHTB* MACRO, *DC* IS CHANGED TO *DS*. 00081 M01S00004.ns21000 +++| 00082 M01S00005.ns21000 +++| DS EQU DC DEADSTART CHANNEL
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00083 M01S00002.ns22000 +++| TITLE MACRO DEFINITIONS. 00084 M01S00003.ns22000 +++| SPACE 4,10 00085 M01S00004.ns22000 +++|** JMP - THREADED JUMP. 00086 M01S00005.ns22000 +++|* 00087 M01S00006.ns22000 +++|* 00088 M01S00007.ns22000 +++|* JMP ADDR 00089 M01S00008.ns22000 +++|* ENTRY *ADDR* = JUMP ADDRESS. 00090 M01S00009.ns22000 +++| 00091 M01S00010.ns22000 +++| 00092 M01S00011.ns22000 +++| JMP MACRO ADDR 00093 M01S00012.ns22000 +++| IF -DEF,.ADDR,2 00094 M01S00013.ns22000 +++| NOREF .ADDR 00095 M01S00014.ns22000 +++| .ADDR MAX ADDR,*-40 00096 M01S00015.ns22000 +++| IFGT .ADDR,*-40 00097 M01S00016.ns22000 +++| UJN .ADDR 00098 M01S00017.ns22000 +++| .ADDR SET *-1 00099 M01S00018.ns22000 +++| ELSE 2 00100 M01S00019.ns22000 +++| .ADDR SET * 00101 M01S00020.ns22000 +++| LJM ADDR 00102 M01S00021.ns22000 +++| JMP ENDM 00103 M00S00074.dio +++| TITLE PRESET. 00104 M00S00075.dio +++| PRS SPACE 4,10 00105 M00S00076.dio +++| ORG MSFW 00106 M00S00077.dio +++|
| Line S00078 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00107 M01S00078.ns2776 ---| PRS LDM MXRL+CM SET DEADSTART CHANNEL 00108 M01S00079.ns2776 ---| STD T4 00109 M01S00080.ns2776 ---| STD DH 00110 M01S00081.ns2776 ---| RJM C2D CONVERT FOR STATUS MESSAGE 00111 M01S00082.ns2776 ---| STM DSMA+1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00112 M02S00001.ns2776 ---| LDM MXRL+LA PRESERVE DISPLAY CONSOLE STATUS 00113 M02S00002.ns2776 ---| STD DN
| Line S00083 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00114 M02S00083.ns2776 ---| LDC CTDC MODIFY CHANNEL INSTRUCTIONS
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00115 M02S00006.ns2776 ---| LDC CTDS MODIFY CHANNEL INSTRUCTIONS
| Line S00084 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00116 M01S00084.ns2776 ---| RJM MCI 00117 M01S00085.ns2776 ---| LDN PC CHECK DEADSTART CHANNEL 00118 M01S00086.ns2776 ---| STD IH 00119 M01S00087.ns2776 ---| LMD DH 00120 M01S00088.ns2776 ---| NJN PRS1 IF NOT PP COMMUNICATIONS CHANNEL 00121 M01S00089.ns2776 ---| LDN 12 SET INTERCOMMUNICATIONS CHANNEL 00122 M01S00090.ns2776 ---| STD IH 00123 M01S00091.ns2776 ---| STD T4 00124 M01S00092.ns2776 ---| LDC CTPC MODIFY PP INTERCOMMUNICATION CHANNELS 00125 M01S00093.ns2776 ---| RJM MCI 00126 M01S00094.ns2776 ---| PRS1 LDM MXRL+T7 DISK SECTOR / DEADSTART FUNCTION 00127 M01S00095.ns2776 ---| STD T7 00128 M01S00096.ns2776 ---| LDM MXRL+T6 TRACK / TAPE STATUS 00129 M01S00097.ns2776 ---| STD T6 00130 M01S00098.ns2776 ---| STD DM 00131 M01S00099.ns2776 ---| RJM PSD PRESET DRIVERS 00132 M01S00100.ns2776 ---| LDN 3 DEFINE CONSTANT 3 00133 M01S00101.ns2776 ---| STD TR 00134 M01S00102.ns2776 ---|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00135 M01S00001.ns2776 +++| PRS BSS 0 ENTRY 00136 M01S00002.ns2776 +++| RJM BRP EXECUTE BUFFER RESIDENT PORTION OF PRESET 00137 M01S00003.ns2776 +++| 00138 M00S00103.dio +++|* SEARCH FOR *SET* AND TRANSMIT TO PP0. 00139 M00S00104.dio +++| 00140 M00S00105.dio +++| PRS2 RJM RNR READ NEXT RECORD 00141 M00S00106.dio +++| LDM BUF+5*1+1 CHECK NAME IN *PRFX* TABLE 00142 M00S00107.dio +++| SHN 6 00143 M00S00108.dio +++| LMM BUF+5*1+0 00144 M00S00109.dio +++| LMC 3RTSE 00145 M00S00110.dio +++| NJN PRS2 IF NOT *SET* 00146 M00S00111.dio +++| LDD DH PASS CHANNEL DEFINITIONS TO *SET* 00147 M00S00112.dio +++| STM BUF+5*20+T4 00148 M00S00113.dio +++| LDD IH 00149 M00S00114.dio +++| STM BUF+5*20+T5
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00150 M01S00003.v23l617 +++| LDD DN PASS CONSOLE STATUS TO *SET* 00151 M01S00004.v23l617 +++| STM BUF+5*20+T2
| Line S00115 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00152 M01S00115.ns22000 ---| LDD WC TRANSMIT *SET* TO PP0
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00153 M01S00022.ns22000 +++| LCN 20 TRANSMIT *SET* TO PP0 00154 M01S00023.ns22000 +++| RAD WC 00155 M00S00116.dio +++| SHN 2 00156 M00S00117.dio +++| ADD WC 00157 M00S00118.dio +++| OAM. BUF+5*20,CH
| Line S00119 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00158 M01S00119.ns22000 ---| FJM. *,CH
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00159 M01S00024.ns22000 +++| LDD WC 00160 M01S00025.ns22000 +++| LMC MXRL/5 00161 M01S00026.ns22000 +++| NJN PRS3 IF *SET* DOES NOT EXCEED ONE TAPE PRU 00162 M01S00027.ns22000 +++| RJM RNR READ REMAINDER OF *SET* 00163 M01S00028.ns22000 +++| LDD WC 00164 M01S00029.ns22000 +++| ZJN PRS3 IF ZERO LENGTH PRU 00165 M01S00030.ns22000 +++| SHN 2 00166 M01S00031.ns22000 +++| ADD WC 00167 M01S00032.ns22000 +++| OAM. BUF,CH TRANSMIT REMAINDER OF *SET* 00168 M01S00033.ns22000 +++| PRS3 FJM. *,CH WAIT OUTPUT COMPLETE 00169 M00S00120.dio +++| DCN. CH 00170 M00S00121.dio +++| RJM RNR READ NEXT RECORD 00171 M00S00122.dio +++| LJM DIO ENTER IDLE LOOP
| Line S00123 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00172 M01S00123.ns2776 ---| PSD SPACE 4,10 00173 M01S00124.ns2776 ---|** PSD - PRESET DRIVERS. 00174 M01S00125.ns2776 ---|* 00175 M01S00126.ns2776 ---|* ENTRY (A) = 0 IF TAPE DEADSTART. 00176 M01S00127.ns2776 ---|* (T6) = TRACK / TAPE STATUS. 00177 M01S00128.ns2776 ---|* (T7) = DISK SECTOR / DEADSTART FUNCTION. 00178 M01S00129.ns2776 ---|* 00179 M01S00130.ns2776 ---|* EXIT (UN) = UNIT NUMBER (DISK DEADSTART). 00180 M01S00131.ns2776 ---|* (BF) = BACKSPACE FUNCTION (TAPE DEADSTART). 00181 M01S00132.ns2776 ---|* (RF) = READ FUNCTION (TAPE DEADSTART). 00182 M01S00133.ns2776 ---|* (SF) = STATUS FUNCTION (TAPE DEADSTART). 00183 M01S00134.ns2776 ---|* 00184 M01S00135.ns2776 ---|* CALLS CAU, C2D, PDA. 00185 M01S00136.ns2776 ---| 00186 M01S00137.ns2776 ---| 00187 M01S00138.ns2776 ---| PSD3 LDM MXRL+T5 SET SEEK FUNCTION 00188 M01S00139.ns2776 ---| SHN 14 00189 M01S00140.ns2776 ---| STM POSA 00190 M01S00141.ns2776 ---| SHN -14 POSITION ALGORITHM INDEX 00191 M01S00142.ns2776 ---| RJM PDA PRESET DISK ADDRESS CONVERSION
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00192 M02S00003.ns2776 ---| LDM MXRL+DT GET 895 DEADSTART READ FLAG 00193 M02S00004.ns2776 ---| STD DT
| Line S00143 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00194 M01S00143.ns2776 ---| LDM MXRL+T4 SET UNIT NUMBER 00195 M01S00144.ns2776 ---| PSD4 STD UN 00196 M01S00145.ns2776 ---| RJM C2D CONVERT FOR STATUS MESSAGE 00197 M01S00146.ns2776 ---| STM DSMA+4 00198 M01S00147.ns2776 ---| 00199 M01S00148.ns2776 ---| PSD SUBR ENTRY/EXIT 00200 M01S00149.ns2776 ---| NJN PSD3 IF DISK DEADSTART 00201 M01S00150.ns2776 ---| LDC RTR SET TAPE DRIVER ADDRESS 00202 M01S00151.ns2776 ---| STM RNRA 00203 M01S00152.ns2776 ---| LDD T7 00204 M01S00153.ns2776 ---| SHN -6 00205 M01S00154.ns2776 ---| LPN 7 00206 M01S00155.ns2776 ---| LMN 1 00207 M01S00156.ns2776 ---| NJN PSD1 IF NOT ATS TAPE SYSTEM 00208 M01S00157.ns2776 ---| LCN 0 SET DETAIL STATUS MASK 00209 M01S00158.ns2776 ---| STM GTSB 00210 M01S00159.ns2776 ---| RJM CAU CHECK ATS UNIT
| Line S00160 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00211 M02S00160.ns2776 ---| PSD1 LDD T7 EXTRACT EQUIPMENT NUMBER
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00212 M02S00034.ns2776 ---| PSD1 LDD T7 EXTRACT EQUIPMENT (CONTROLLER) NUMBER
| Line S00161 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00213 M01S00161.ns2776 ---| LPC 7000 00214 M01S00162.ns2776 ---| ADN 12 SET GENERAL STATUS FUNCTION 00215 M01S00163.ns2776 ---| STD SF 00216 M01S00164.ns2776 ---| ADN 40-12 SET READ FUNCTION 00217 M01S00165.ns2776 ---| STD RF 00218 M01S00166.ns2776 ---| ADN 112-40 SET DETAILED STATUS FUNCTION 00219 M01S00167.ns2776 ---| STM GTSA 00220 M01S00168.ns2776 ---| ADN 113-112 SET BACKSPACE FUNCTION 00221 M01S00169.ns2776 ---| STD BF 00222 M01S00170.ns2776 ---| PSD2 LDD T7 EXTRACT UNIT NUMBER 00223 M01S00171.ns2776 ---| LPN 17 00224 M01S00172.ns2776 ---| LJM PSD4 CONVERT FOR STATUS MESSAGE 00225 M01S00173.ns2776 ---| CAU SPACE 4,10 00226 M01S00174.ns2776 ---|** CAU - CHECK ATS UNIT. 00227 M01S00175.ns2776 ---|* 00228 M01S00176.ns2776 ---|* ENTRY (T7) = WORD 6 OF DEADSTART PANEL. 00229 M01S00177.ns2776 ---|*
| Line S00178 Modification History | |
|---|---|
M01 (Removed by) | dio3 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00230 M02S00178.ns2776 ---|* EXIT TAPE READ LOOP MODIFIED FOR 200 IPS 6250 DENSITY 00231 M02S00179.ns2776 ---|* AT 2X PPU SPEED OR ANY 6250 DENSITY AT 1X PPU 00232 M02S00180.ns2776 ---|* SPEED.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dio3 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00233 M02S00001.ns2776 ---|* EXIT TAPE READ LOOP MODIFIED FOR 200 OR 150 IPS 6250 00234 M02S00002.ns2776 ---|* DENSITY AT 2X PPU SPEED OR ANY 6250 DENSITY AT 1X PPU 00235 M02S00003.ns2776 ---|* SPEED.
| Line S00181 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00236 M01S00181.ns2776 ---|* 00237 M01S00182.ns2776 ---|* USES T1. 00238 M01S00183.ns2776 ---| 00239 M01S00184.ns2776 ---|
| Line S00185 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00240 M02S00185.ns2776 ---| CAU2 LDD T1
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00241 M02S00035.ns2776 ---| CAU2 SBN 2 00242 M02S00036.ns2776 ---| PJN CAUX IF PP SPEED .GE. 4X 00243 M02S00037.ns2776 ---| LDD T1
| Line S00186 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00244 M01S00186.ns2776 ---| LPN 7 00245 M01S00187.ns2776 ---| LMN 5 00246 M01S00188.ns2776 ---| ZJN CAU1 IF 200 IPS UNIT
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | dio3 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00247 M02S00004.ns2776 ---| LMN 6&5 00248 M02S00005.ns2776 ---| ZJN CAU1 IF 150 IPS UNIT
| Line S00189 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00249 M01S00189.ns2776 ---| 00250 M01S00190.ns2776 ---| CAU SUBR ENTRY/EXIT
| Line S00191 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00251 M02S00191.ns2776 ---| LDD T7 GET EQUIPMENT NUMBER
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00252 M02S00038.ns2776 ---| LDD T7 GET EQUIPMENT (CONTROLLER) NUMBER
| Line S00192 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00253 M01S00192.ns2776 ---| LPC 7000 00254 M01S00193.ns2776 ---| ADC 212 ADD UNIT STATUS FUNCTION
| Line S00194 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00255 M02S00194.ns2776 ---| FAN DC 00256 M02S00195.ns2776 ---| ACN DC 00257 M02S00196.ns2776 ---| IAN DC 00258 M02S00197.ns2776 ---| DCN DC
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00259 M02S00007.ns2776 ---| FAN DS 00260 M02S00008.ns2776 ---| ACN DS 00261 M02S00009.ns2776 ---| IAN DS 00262 M02S00010.ns2776 ---| DCN DS
| Line S00198 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00263 M01S00198.ns2776 ---| STD T1 00264 M01S00199.ns2776 ---| LPN 30 CHECK UNIT STATUS 00265 M01S00200.ns2776 ---| LMN 30 00266 M01S00201.ns2776 ---| NJN CAUX IF DENSITY NOT 6250 CPI
| Line S00202 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00267 M02S00202.ns2776 ---| AJM. CAU2,SC IF C170 MAINFRAME (2X PPU SPEED)
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00268 M02S00039.ns2776 ---| LDM MXRL+T3 00269 M02S00040.ns2776 ---| NJN CAU2 IF PP SPEED .GT. 1X
| Line S00203 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00270 M01S00203.ns2776 ---| CAU1 LDC UJNI+2 DISABLE INITIATE TAPE MOTION 00271 M01S00204.ns2776 ---| STM RSTA 00272 M01S00205.ns2776 ---| UJN CAUX RETURN 00273 M01S00206.ns2776 ---| MCI SPACE 4,10 00274 M01S00207.ns2776 ---|** MCI - MODIFY CHANNEL INSTRUCTIONS. 00275 M01S00208.ns2776 ---|* 00276 M01S00209.ns2776 ---|* ENTRY (A) = ADDRESS OF INSTRUCTION LIST. 00277 M01S00210.ns2776 ---|* (T4) = CHANNEL NUMBER. 00278 M01S00211.ns2776 ---|* 00279 M01S00212.ns2776 ---|* USES T1, T2. 00280 M01S00213.ns2776 ---| 00281 M01S00214.ns2776 ---| 00282 M01S00215.ns2776 ---| MCI1 STD T2 SET INSTRUCTION ADDRESS 00283 M01S00216.ns2776 ---| LDI T2 MODIFY INSTRUCTION 00284 M01S00217.ns2776 ---| SCN 37 00285 M01S00218.ns2776 ---| LMD T4 00286 M01S00219.ns2776 ---| STI T2 00287 M01S00220.ns2776 ---| AOD T1 ADVANCE LIST ADDRESS 00288 M01S00221.ns2776 ---| MCI2 LDI T1 00289 M01S00222.ns2776 ---| NJN MCI1 IF NOT END OF LIST 00290 M01S00223.ns2776 ---| 00291 M01S00224.ns2776 ---| MCI SUBR ENTRY/EXIT 00292 M01S00225.ns2776 ---| STD T1 SET LIST ADDRESS 00293 M01S00226.ns2776 ---| UJN MCI2 ENTER LOOP
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00294 M01S00041.ns22000 +++| LRO SPACE 4,10 00295 M01S00042.ns22000 +++|** LRO - LOAD RECOVERY OVERLAY. 00296 M01S00043.ns22000 +++| 00297 M01S00044.ns22000 +++| 00298 M01S00045.ns22000 +++| LRO BSS 0 00299 M01S00046.ns22000 +++|* LDC LRO CHECK NEXT RECORD 00300 M01S00047.ns22000 +++| LRO1 RJM CSR 00301 M01S00048.ns22000 +++| NJN LRO1 IF NOT OVERLAY 00302 M01S00049.ns22000 +++| LDM BUF+5*1+1 00303 M01S00050.ns22000 +++| SHN 6 00304 M01S00051.ns22000 +++| LMM BUF+5*1+0 00305 M01S00052.ns22000 +++| LMC 3RMRC 00306 M01S00053.ns22000 +++| NJN LRO1 IF NOT *RCM* 00307 M01S00054.ns22000 +++| DCN PC INDICATE FUNCTION COMPLETE 00308 M01S00055.ns22000 +++| LJM DIO RETURN 00309 M00S00227.dio +++| SPACE 4,10 00310 M00S00228.dio +++| ERRZR PC-12 ILLEGAL CHANNEL DEFINITION 00311 M00S00229.dio +++| ERRPL *-PPFW PRESET OVERFLOWS DRIVER AREA 00312 M00S00230.dio +++| TITLE MAIN ROUTINE. 00313 M00S00231.dio +++| ORG PPFW 00314 M00S00232.dio +++| 00315 M00S00233.dio +++| DIO IAN PC INPUT REQUEST 00316 M00S00234.dio +++| STD L1 00317 M00S00235.dio +++| SBN MXDF 00318 M00S00236.dio +++| PJN * IF ILLEGAL FUNCTION 00319 M00S00237.dio +++| LDM TFPA,L1 00320 M00S00238.dio +++| STD L2 00321 M00S00239.dio +++| LJM 0,L2 PROCESS FUNCTION 00322 M00S00240.dio +++| TFPA SPACE 4,10 00323 M00S00241.dio +++|** TFPA - TABLE OF FUNCTION PROCESSORS. 00324 M00S00242.dio +++| 00325 M00S00243.dio +++| 00326 M00S00244.dio +++| TFPA INDEX 00327 M00S00245.dio +++| INDEX DPPF,DPP DROP PP 00328 M00S00246.dio +++| INDEX LPRF,LPR LOAD PP RESIDENT 00329 M00S00247.dio +++| INDEX IPRF,IPR INITIALIZE PP RESIDENT 00330 M00S00248.dio +++| INDEX RTBF,RTB READ TAPE BLOCK 00331 M00S00249.dio +++| INDEX IPPF,IPP IDLE PP 00332 M00S00250.dio +++| INDEX LSLF,LSL LOAD SYSTEM LIBRARY 00333 M01S00056.ns22000 +++| INDEX LNOF,LNO LOAD NEXT OVERLAY 00334 M01S00057.ns22000 +++| INDEX LTDF,LTD LOAD SELECTED TEXT DECK 00335 M01S00058.ns22000 +++| INDEX LROF,LRO LOAD RECOVERY OVERLAY 00336 M00S00251.dio +++| INDEX MXDF 00337 M00S00252.dio +++| TITLE FUNCTION PROCESSORS. 00338 M00S00253.dio +++| DPP SPACE 4,10 00339 M00S00254.dio +++|** DPP - DROP PP. 00340 M00S00255.dio +++| 00341 M00S00256.dio +++| 00342 M00S00257.dio +++| DPP BSS 0 00343 M00S00258.dio +++| RJM RDT REWIND DEADSTART TAPE 00344 M00S00259.dio +++| RJM RTU RELEASE TAPE UNIT 00345 M00S00260.dio +++| RJM CRI CHECK RESIDENT INITIALIZED 00346 M00S00261.dio +++| RJM WOC WAIT OUTPUT REGISTER CLEAR 00347 M00S00262.dio +++| LDD DH RELEASE DEADSTART CHANNEL 00348 M00S00263.dio +++| DCHAN
| Line S00264 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00349 M01S00264.ns22000 ---| DCN PC INDICATE FUNCTION ACCEPT
| Line S00059 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00350 M01S00059.ns22000 +++| DPPA DCN PC INDICATE FUNCTION ACCEPT 00351 M01S00060.ns22000 +++|* PSN (SYSTEM LIBRARY LOAD)
| Line S00265 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 00352 M01S00265.273l780 ---| LDN NCPL GET NUMBER OF CONTROL POINTS 00353 M01S00266.273l780 ---| CRD CM 00354 M01S00267.273l780 ---| AOD CM+1 MOVE TO SYSTEM CONTROL POINT 00355 M01S00268.273l780 ---| MONITOR CCAM 00356 M00S00269.dio ---| MONITOR DPPM DROP PP 00357 M00S00270.dio ---| LJM PPR EXIT TO PP RESIDENT 00358 M00S00271.dio ---| IPP SPACE 4,10 00359 M00S00272.dio ---|** IPP - IDLE PP UNTIL (IR+4) .NE. 0. 00360 M00S00273.dio ---| 00361 M00S00274.dio ---| 00362 M00S00275.dio ---| IPP BSS 0 00363 M00S00276.dio ---| LDD IA CLEAR (IR+4) 00364 M00S00277.dio ---| CRD IR 00365 M00S00278.dio ---| RJM CRI CHECK RESIDENT INITIALIZED 00366 M00S00279.dio ---| STD IR+4 00367 M00S00280.dio ---| LDD IA 00368 M00S00281.dio ---| CWD IR 00369 M00S00282.dio ---| LDD DH RELEASE DEADSTART CHANNEL 00370 M00S00283.dio ---| DCHAN 00371 M00S00284.dio ---| DCN PC INDICATE FUNCTION ACCEPT 00372 M00S00285.dio ---| IPP1 DELAY WAIT AWHILE 00373 M00S00286.dio ---| LDD IA CHECK (IR+4) 00374 M00S00287.dio ---| CRD IR 00375 M00S00288.dio ---| LDD IR+4 00376 M00S00289.dio ---| ZJN IPP1 IF IDLE NOT CLEARED 00377 M00S00290.dio ---| LDD DH RESERVE DEADSTART CHANNEL 00378 M00S00291.dio ---| RCHAN
| Line S00292 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00379 M01S00292.ns22000 ---| LJM DIO RETURN
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00380 M01S00061.ns22000 +++| JMP DIO RETURN 00381 M00S00293.dio +++| IPR SPACE 4,10 00382 M00S00294.dio +++|** IPR - INITIALIZE PP RESIDENT. 00383 M00S00295.dio +++| 00384 M00S00296.dio +++| 00385 M00S00297.dio +++| IPR BSS 0 00386 M00S00298.dio +++| DCN PC INDICATE FUNCTION ACCEPT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 00387 M01S00001.273l780 +++| LDN 1 SET NO PP DROP 00388 M01S00002.273l780 +++| STD T1 00389 M00S00299.dio +++| RJM MSFW+1 INITIALIZE RESIDENT 00390 M00S00300.dio +++| SOM CRIA SET RESIDENT INITIALIZED 00391 M00S00301.dio +++| LDD DH RESERVE DEADSTART CHANNEL 00392 M00S00302.dio +++| RCHAN
| Line S00303 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00393 M01S00303.ns22000 ---| LJM DIO RETURN
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00394 M01S00062.ns22000 +++| JMP DIO RETURN 00395 M01S00063.ns22000 +++| LNO SPACE 4,10 00396 M01S00064.ns22000 +++|** LNO - LOAD NEXT OVERLAY. 00397 M01S00065.ns22000 +++| 00398 M01S00066.ns22000 +++| 00399 M01S00067.ns22000 +++| LNO BSS 0 00400 M01S00068.ns22000 +++| LDN 0 CHECK CURRENT RECORD 00401 M01S00069.ns22000 +++| LNO1 RJM CSR 00402 M01S00070.ns22000 +++| NJN LNO1 IF NOT OVERLAY 00403 M01S00071.ns22000 +++| LJM RTB TRANSMIT TAPE BLOCK 00404 M00S00304.dio +++| LPR SPACE 4,10 00405 M00S00305.dio +++|** LPR - LOAD PP RESIDENT. 00406 M00S00306.dio +++| 00407 M00S00307.dio +++| 00408 M00S00308.dio +++| LPR BSS 0 00409 M00S00309.dio +++| DCN PC INDICATE FUNCTION ACCEPT 00410 M00S00310.dio +++| LDN IR SKIP DIRECT LOCATIONS BELOW *IR* 00411 M00S00311.dio +++| ACN PC 00412 M00S00312.dio +++| IAM IR,PC 00413 M00S00313.dio +++| LDC PPFW-IR INPUT PP RESIDENT 00414 M00S00314.dio +++| IAM IR,PC 00415 M00S00315.dio +++| DCN PC
| Line S00316 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00416 M01S00316.ns22000 ---| LJM DIO RETURN
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00417 M01S00072.ns22000 +++| JMP DIO RETURN 00418 M00S00317.dio +++| LSL SPACE 4,10 00419 M00S00318.dio +++|** LSL - LOAD SYSTEM LIBRARY. 00420 M00S00319.dio +++| 00421 M00S00320.dio +++| 00422 M00S00321.dio +++| LSL BSS 0
| Line S00322 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00423 M01S00322.ns22000 ---| LDD DM 00424 M01S00323.ns22000 ---| ZJN LSL1 IF TAPE DEADSTART 00425 M01S00324.ns22000 ---| LJM DPP DROP PP 00426 M01S00325.ns22000 ---| 00427 M01S00326.ns22000 ---| LSL1 RJM RDT REWIND DEADSTART TAPE
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00428 M01S00073.ns22000 +++| RJM RDT REWIND DEADSTART TAPE 00429 M00S00327.dio +++| RJM CRI CHECK RESIDENT INITIALIZED 00430 M00S00328.dio +++| STD BC+1 CLEAR BLOCK COUNT 00431 M00S00329.dio +++| STD BC 00432 M00S00330.dio +++| LDN DSCP MOVE TO DEADSTART CONTROL POINT 00433 M00S00331.dio +++| STD CM+1
| Line S00332 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 00434 M01S00332.273l780 ---| SHN 7 00435 M01S00333.273l780 ---| STD CP 00436 M00S00334.dio ---| MONITOR CCAM 00437 M00S00335.dio ---| DCN PC INDICATE FUNCTION ACCEPT
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00438 M01S00074.ns22000 +++| STM DPPA
| Line S00336 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 00439 M01S00336.273l780 ---| PAUSE NE 00440 M00S00337.dio ---| LSL2 LDD RA READ (RA+2) 00441 M00S00338.dio ---| SHN 6 00442 M00S00339.dio ---| ADN 2 00443 M00S00340.dio ---| CRD CM 00444 M00S00341.dio ---| LDD CM+4 SET FET ADDRESS 00445 M00S00342.dio ---| STD IR+4 00446 M00S00343.dio ---| ZJN LSL2 IF NOT YET DEFINED 00447 M00S00344.dio ---| LDM BKSC ENABLE TAPE PARITY ERROR REPORTING 00448 M00S00345.dio ---| STM BKSA 00449 M00S00346.dio ---| LSL3 RJM GTS GET TAPE STATUS 00450 M00S00347.dio ---| LPN 3 00451 M00S00348.dio ---| LMN 1 00452 M00S00349.dio ---| NJN LSL3 IF REWIND NOT COMPLETE 00453 M00S00350.dio ---| 00454 M00S00351.dio ---|* READ SYSTEM TAPE. 00455 M00S00352.dio ---| 00456 M00S00353.dio ---| RJM RST READ SYSTEM TAPE 00457 M00S00354.dio ---| LDD RA 00458 M00S00355.dio ---| SHN 6 00459 M00S00356.dio ---| ADD IR+4 00460 M00S00357.dio ---| CRD CM 00461 M00S00358.dio ---| LDN 33 SET EOF STATUS 00462 M00S00359.dio ---| STD CM+4 00463 M00S00360.dio ---| LDD RA STORE EOF STATUS 00464 M00S00361.dio ---| SHN 6 00465 M00S00362.dio ---| ADD IR+4 00466 M00S00363.dio ---| CWD CM 00467 M00S00364.dio ---| LJM DPP DROP PP
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00468 M01S00075.ns22000 +++| LTD SPACE 4,10 00469 M01S00076.ns22000 +++|** LTD - LOAD SELECTED TEXT DECK. 00470 M01S00077.ns22000 +++| 00471 M01S00078.ns22000 +++| 00472 M01S00079.ns22000 +++| LTD BSS 0 00473 M01S00080.ns22000 +++| IAN PC 00474 M01S00081.ns22000 +++| RJM C2D CONVERT DECK NUMBER 00475 M01S00082.ns22000 +++| STD DN 00476 M01S00083.ns22000 +++| LDN 0 00477 M01S00084.ns22000 +++| UJN LTD2 CHECK CURRENT RECORD 00478 M01S00085.ns22000 +++| 00479 M01S00086.ns22000 +++| LTD1 LDM BUF+2 CHECK TEXT DECK NUMBER 00480 M01S00087.ns22000 +++| LMD DN 00481 M01S00088.ns22000 +++| ZJN RTB IF REQUESTED DECK FOUND 00482 M01S00089.ns22000 +++| LTD2 RJM CSR 00483 M01S00090.ns22000 +++| NJN LTD1 IF NOT BINARY RECORD 00484 M01S00091.ns22000 +++| STD WC 00485 M01S00092.ns22000 +++|* UJN RTB INDICATE DECK NOT FOUND 00486 M00S00365.dio +++| RTB SPACE 4,10 00487 M00S00366.dio +++|** RTB - READ TAPE BLOCK. 00488 M00S00367.dio +++| 00489 M00S00368.dio +++| 00490 M00S00369.dio +++| RTB BSS 0 00491 M00S00370.dio +++| DCN PC INDICATE FUNCTION ACCEPT 00492 M00S00371.dio +++| IJM *,PC IF CALLER NOT READY 00493 M00S00372.dio +++| LDD WC OUTPUT RECORD LENGTH 00494 M00S00373.dio +++| OAN PC 00495 M00S00374.dio +++| ZJN RTB1 IF ZERO LENGTH RECORD 00496 M00S00375.dio +++| SHN 2 CONVERT TO BYTE COUNT 00497 M00S00376.dio +++| ADD WC 00498 M00S00377.dio +++| FJM *,PC WAIT CHANNEL EMPTY 00499 M00S00378.dio +++| OAM BUF,PC TRANSMIT RECORD 00500 M00S00379.dio +++| RTB1 FJM *,PC WAIT TRANSMISSION COMPLETE 00501 M00S00380.dio +++| DCN PC 00502 M00S00381.dio +++| RJM RNR READ NEXT RECORD
| Line S00382 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00503 M01S00382.ns22000 ---| LJM DIO RETURN
| Line S00093 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00504 M01S00093.ns22000 +++| JMP DIO RETURN 00505 M00S00383.dio +++| TITLE SUBROUTINES. 00506 M00S00384.dio +++| CBN SPACE 4,10 00507 M00S00385.dio +++|** CBN - CHECK BLOCK NUMBER. 00508 M00S00386.dio +++|* 00509 M00S00387.dio +++|* ENTRY (WC) = WORD COUNT OF BLOCK. 00510 M00S00388.dio +++|* (BC - BC+1) = EXPECTED BLOCK NUMBER OF BLOCK. 00511 M00S00389.dio +++|* 00512 M00S00390.dio +++|* EXIT BLOCK COUNT INCREMENTED. 00513 M00S00391.dio +++|* MESSAGE ISSUED IF BLOCK SEQUENCE ERROR. 00514 M00S00392.dio +++|* 00515 M00S00393.dio +++|* USES BL. 00516 M00S00394.dio +++|* 00517 M00S00395.dio +++|* CALLS WOG. 00518 M00S00396.dio +++| 00519 M00S00397.dio +++| 00520 M00S00398.dio +++| CBN2 AOD BC+1 ADVANCE BLOCK COUNT 00521 M00S00399.dio +++| SHN -14 00522 M00S00400.dio +++| RAD BC 00523 M00S00401.dio +++| 00524 M00S00402.dio +++| CBN SUBR ENTRY/EXIT 00525 M00S00403.dio +++| LDD WC SET BLOCK LENGTH IN CONTROL WORD 00526 M00S00404.dio +++| SHN 2 00527 M00S00405.dio +++| ADD WC 00528 M00S00406.dio +++| STM BUF-1 00529 M00S00407.dio +++| CBNA ADC BUF SET PP BUFFER LIMIT 00530 M00S00408.dio +++|* UJN CBNX (BLOCK CHECKING DISABLED) 00531 M00S00409.dio +++| STD BL 00532 M00S00410.dio +++| LDM 2,BL CHECK BLOCK NUMBER 00533 M00S00411.dio +++| LMD BC+1 00534 M00S00412.dio +++| NJN CBN1 IF NOT CORRECT BLOCK 00535 M00S00413.dio +++| LDM 1,BL 00536 M00S00414.dio +++| LMD BC 00537 M00S00415.dio +++| ZJN CBN2 IF CORRECT BLOCK 00538 M00S00416.dio +++| CBN1 LDC CBNB *BLOCK SEQUENCE ERROR* 00539 M00S00417.dio +++| RJM WOG ISSUE MESSAGE AND WAIT OPERATOR GO 00540 M00S00418.dio +++| LDM CBNC DISABLE FURTHER BLOCK CHECKING 00541 M00S00419.dio +++| STM CBNA 00542 M00S00420.dio +++| UJN CBNX EXIT 00543 M00S00421.dio +++| 00544 M00S00422.dio +++| CBNB DATA C*BLOCK SEQUENCE ERROR.* 00545 M00S00423.dio +++| 00546 M00S00424.dio +++| CBNC BSS 0 00547 M00S00425.dio +++| LOC CBNA 00548 M00S00426.dio +++| UJN CBNX 00549 M00S00427.dio +++| LOC *O 00550 M00S00428.dio +++| CDD SPACE 4,10 00551 M00S00429.dio +++|** CDD - CONNECT DEADSTART DISK. 00552 M00S00430.dio +++|* 00553 M00S00431.dio +++|* USES ST. 00554 M00S00432.dio +++|* 00555 M00S00433.dio +++|* CALLS DSM, GDS, POS. 00556 M00S00434.dio +++| 00557 M00S00435.dio +++| 00558 M00S00436.dio +++| CDD2 RJM POS POSITION DISK
| Line S00437 Modification History | |
|---|---|
M01 (Removed by) | ns2393 |
Seq # *Modification Id* Act ----------------------------+ 00559 M01S00437.ns2393 ---| LDC DSCP*CPAS+MS2W CLEAR STATUS MESSAGE 00560 M01S00438.ns2393 ---| CWD ZR 00561 M00S00439.dio ---| 00562 M00S00440.dio ---| CDD SUBR ENTRY/EXIT 00563 M00S00441.dio ---| CDD1 RJM GDS GET DISK STATUS (CONNECT) 00564 M00S00442.dio ---| LPC 2000 00565 M00S00443.dio ---| ZJN CDD2 IF COUPLER NOT RESERVED 00566 M00S00444.dio ---| STD ST 00567 M00S00445.dio ---| RJM DSM DISPLAY STATUS MESSAGE 00568 M00S00446.dio ---| UJN CDD1 LOOP 00569 M00S00447.dio ---| CRI SPACE 4,10 00570 M00S00448.dio ---|** CRI - CHECK PP RESIDENT INITIALIZED. 00571 M00S00449.dio ---|* 00572 M00S00450.dio ---|* EXIT (A) = 0. 00573 M00S00451.dio ---| 00574 M00S00452.dio ---| 00575 M00S00453.dio ---| CRI SUBR ENTRY/EXIT 00576 M00S00454.dio ---| CRIA LDN 1 00577 M00S00455.dio ---|* LDN 0 (PP RESIDENT INITIALIZED) 00578 M00S00456.dio ---| ZJN CRIX IF RESIDENT INITIALIZED 00579 M00S00457.dio ---| UJN * HANG PP
| Line S00094 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00580 M01S00094.ns22000 +++| CSR SPACE 4,10 00581 M01S00095.ns22000 +++|** CSR - CHECK OR SKIP CURRENT RECORD. 00582 M01S00096.ns22000 +++|* 00583 M01S00097.ns22000 +++|* ENTRY (A) = 0 TO CHECK RECORD. 00584 M01S00098.ns22000 +++|* .NE. 0 TO SKIP RECORD. 00585 M01S00099.ns22000 +++|* 00586 M01S00100.ns22000 +++|* EXIT (A) = 0 IF BINARY RECORD (OVERLAY) 00587 M01S00101.ns22000 +++|* 00588 M01S00102.ns22000 +++|* USES T4. 00589 M01S00103.ns22000 +++|* 00590 M01S00104.ns22000 +++|* CALLS RNR. 00591 M01S00105.ns22000 +++| 00592 M01S00106.ns22000 +++| 00593 M01S00107.ns22000 +++| CSR SUBR ENTRY/EXIT 00594 M01S00108.ns22000 +++| ZJN CSR2 IF CHECKING CURRENT RECORD 00595 M01S00109.ns22000 +++| CSR1 LDD WC 00596 M01S00110.ns22000 +++| LMC TPLN/5 SET EOR STATUS 00597 M01S00111.ns22000 +++| STD T4 00598 M01S00112.ns22000 +++| RJM RNR READ NEXT BLOCK 00599 M01S00113.ns22000 +++| LDD T4 00600 M01S00114.ns22000 +++| ZJN CSR1 IF NOT NEXT RECORD 00601 M01S00115.ns22000 +++| CSR2 LDM BUF 00602 M01S00116.ns22000 +++| LMC 7700 00603 M01S00117.ns22000 +++| UJN CSRX RETURN 00604 M00S00458.dio +++| DSM SPACE 4,10 00605 M00S00459.dio +++|** DSM - DISPLAY STATUS MESSAGE. 00606 M00S00460.dio +++|* 00607 M00S00461.dio +++|* ENTRY (ST) = GENERAL STATUS. 00608 M00S00462.dio +++|* 00609 M00S00463.dio +++|* CALLS C2D. 00610 M00S00464.dio +++| 00611 M00S00465.dio +++| 00612 M00S00466.dio +++| DSM SUBR ENTRY/EXIT 00613 M00S00467.dio +++| LDD ST CONVERT STATUS 00614 M00S00468.dio +++| RJM C2D 00615 M00S00469.dio +++| STM DSMA+10 SET IN MESSAGE 00616 M00S00470.dio +++| LDD ST 00617 M00S00471.dio +++| SHN -6 00618 M00S00472.dio +++| RJM C2D 00619 M00S00473.dio +++| STM DSMA+7 00620 M00S00474.dio +++| LDC DSCP*CPAS+MS2W STORE MESSAGE 00621 M00S00475.dio +++| CWM DSMA,TR 00622 M00S00476.dio +++| UJN DSMX RETURN 00623 M00S00477.dio +++| 00624 M00S00478.dio +++| DSMA DATA C*CHXX, UNYY - SZZZZ.* 00625 M00S00479.dio +++| RNR SPACE 4,10 00626 M00S00480.dio +++|** RNR - READ NEXT RECORD. 00627 M00S00481.dio +++|* 00628 M00S00482.dio +++|* EXIT (BUF) = NEXT RECORD ON DEADSTART FILE. 00629 M00S00483.dio +++|* 00630 M00S00484.dio +++|* USES RC. 00631 M00S00485.dio +++|* 00632 M00S00486.dio +++|* CALLS RDR, RTR. 00633 M00S00487.dio +++| 00634 M00S00488.dio +++| 00635 M00S00489.dio +++| RNR SUBR ENTRY/EXIT 00636 M00S00490.dio +++| LDN 10 SET RETRY COUNT 00637 M00S00491.dio +++| STD RC 00638 M00S00492.dio +++| RJM RDR READ DISK RECORD 00639 M00S00493.dio +++| RNRA EQU *-1 00640 M00S00494.dio +++|* RJM RTR (TAPE DEADSTART)
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2393 |
Seq # *Modification Id* Act ----------------------------+ 00641 M01S00001.ns2393 +++| LDC DSCP*200+MS2W 00642 M01S00002.ns2393 +++| CWD ZR 00643 M00S00495.dio +++| UJN RNRX RETURN 00644 M00S00496.dio +++| RST SPACE 4,10 00645 M00S00497.dio +++|** RST - READ SYSTEM TAPE. 00646 M00S00498.dio +++|* 00647 M00S00499.dio +++|* USES WC, T1, T2, CM - CM+4, CN - CN+4, DP - DP+4. 00648 M00S00500.dio +++|* 00649 M00S00501.dio +++|* CALLS CBN, ITM, RNR, SBP, WOC. 00650 M00S00502.dio +++| 00651 M00S00503.dio +++| 00652 M00S00504.dio +++| RST SUBR ENTRY/EXIT 00653 M00S00505.dio +++| RJM SRP SET READ PARAMETERS 00654 M00S00506.dio +++| RST1 RJM WOC WAIT OUTPUT REGISTER CLEAR 00655 M00S00507.dio +++| PAUSE NE 00656 M00S00508.dio +++| LDD RA READ OUT 00657 M00S00509.dio +++| SHN 6 00658 M00S00510.dio +++| ADD IR+4 00659 M00S00511.dio +++| ADN 3 00660 M00S00512.dio +++| CRD CN 00661 M00S00513.dio +++| RST2 LDD CN+3 LENGTH = OUT - IN+1 00662 M00S00514.dio +++| SBD DP+3 00663 M00S00515.dio +++| SHN 14 00664 M00S00516.dio +++| ADD CN+4 00665 M00S00517.dio +++| SBD DP+4 00666 M00S00518.dio +++| SBN 1 00667 M00S00519.dio +++| PJN RST3 IF IN+1 .GE OUT 00668 M00S00520.dio +++| .BSA ADC ** (LIMIT - FIRST) 00669 M00S00521.dio +++| RST3 ADC -1002 00670 M00S00522.dio +++| MJN RST1 IF NO ROOM FOR ANOTHER BLOCK 00671 M00S00523.dio +++| RSTA RJM ITM INITIATE TAPE MOTION FOR NEXT READ 00672 M00S00524.dio +++|* UJN *+2 (READ AHEAD DISABLED) 00673 M00S00525.dio +++| LDN 2 INCLUDE CONTROL WORDS IN WORD COUNT 00674 M00S00526.dio +++| RAD WC 00675 M00S00527.dio +++| WCB SPACE 4,10 00676 M00S00528.dio +++|** WCB - WRITE CENTRAL BUFFER. 00677 M00S00529.dio +++| 00678 M00S00530.dio +++| 00679 M00S00531.dio +++| WCB LDD DP+3 CHECK IN + WORD COUNT 00680 M00S00532.dio +++| SHN 14 00681 M00S00533.dio +++| ADD DP+4 00682 M00S00534.dio +++| ADD WC 00683 M00S00535.dio +++| .LMA ADC -** (-LIMIT) 00684 M00S00536.dio +++| STD T2 SET SECOND PART WORD COUNT 00685 M00S00537.dio +++| LMC -0 00686 M00S00538.dio +++| PJN WCB3 IF LIMIT NOT REACHED 00687 M00S00539.dio +++| 00688 M00S00540.dio +++|* PROCESS WRAP AROUND BLOCK. 00689 M00S00541.dio +++| 00690 M00S00542.dio +++| ADD WC SET FIRST PART WORD COUNT 00691 M00S00543.dio +++| STD T1 00692 M00S00544.dio +++| ZJN WCB1 IF NO FIRST PART 00693 M00S00545.dio +++| LDD DP+3 STORE FIRST PART 00694 M00S00546.dio +++| SHN 6 00695 M00S00547.dio +++| ADD RA 00696 M00S00548.dio +++| SHN 6 00697 M00S00549.dio +++| ADD DP+4 00698 M00S00550.dio +++| CWM BUF-5,T1 00699 M00S00551.dio +++| WCB1 LDD T2 CHECK SECOND PART LENGTH 00700 M00S00552.dio +++| ZJN WCB2 IF NO SECOND PART 00701 M00S00553.dio +++| LDD T1 SET PP BUFFER ADDRESS 00702 M00S00554.dio +++| SHN 2 00703 M00S00555.dio +++| ADD T1 00704 M00S00556.dio +++| RAM WCBA 00705 M00S00557.dio +++| LDD RA STORE SECOND PART 00706 M00S00558.dio +++| SHN 6 00707 M00S00559.dio +++| .FTA ADC ** STORE SECOND PART (FIRST) 00708 M00S00560.dio +++| CWM BUF-5,T2 00709 M00S00561.dio +++| WCBA EQU *-1 (RESET) 00710 M00S00562.dio +++| WCB2 LDD T2 SET IN AFTER SECOND PART 00711 M00S00563.dio +++| .FTB ADC ** (FIRST) 00712 M00S00564.dio +++| STD DP+4 00713 M00S00565.dio +++| SHN -14 00714 M00S00566.dio +++| STD DP+3 00715 M00S00567.dio +++| UJN WCB4 00716 M00S00568.dio +++| 00717 M00S00569.dio +++|* PROCESS NORMAL BLOCK. 00718 M00S00570.dio +++| 00719 M00S00571.dio +++| WCB3 LDD DP+3 STORE BLOCK 00720 M00S00572.dio +++| SHN 6 00721 M00S00573.dio +++| ADD RA 00722 M00S00574.dio +++| SHN 6 00723 M00S00575.dio +++| ADD DP+4 00724 M00S00576.dio +++| CWM BUF-5,WC 00725 M00S00577.dio +++| LDC BUF-5 RESET (WCBA) 00726 M00S00578.dio +++| STM WCBA 00727 M00S00579.dio +++| LDD WC ADVANCE IN 00728 M00S00580.dio +++| RAD DP+4 00729 M00S00581.dio +++| SHN -14 00730 M00S00582.dio +++| RAD DP+3 00731 M00S00583.dio +++| WCB4 LDD RA STORE IN 00732 M00S00584.dio +++| SHN 6 00733 M00S00585.dio +++| .INA ADC ** (ADDRESS OF IN) 00734 M00S00586.dio +++| CWD DP 00735 M00S00587.dio +++| ADN 1 READ OUT 00736 M00S00588.dio +++| CRD CN 00737 M00S00589.dio +++| LDN DRCM RECALL CPU 00738 M00S00590.dio +++| STD CM 00739 M00S00591.dio +++| LDD OA 00740 M00S00592.dio +++| CWD CM 00741 M00S00593.dio +++| RJM RNR READ NEXT RECORD 00742 M00S00594.dio +++| RJM CBN CHECK BLOCK NUMBER 00743 M00S00595.dio +++| LJM RST2 LOOP 00744 M00S00596.dio +++| SRP SPACE 4,10 00745 M00S00597.dio +++|** SRP - SET READ PARAMETERS. 00746 M00S00598.dio +++|* 00747 M00S00599.dio +++|* EXIT (DP - DP+4) = IN POINTER. 00748 M00S00600.dio +++|* PARAMETERS INITIALIZED. 00749 M00S00601.dio +++|* FIRST TAPE BLOCK READ. 00750 M00S00602.dio +++|* 00751 M00S00603.dio +++|* USES CM - CM+5, CN - CN+4, T1 - T1+4. 00752 M00S00604.dio +++|* 00753 M00S00605.dio +++|* CALLS CBN, RNR. 00754 M00S00606.dio +++|* 00755 M00S00607.dio +++|* MACROS PAUSE. 00756 M00S00608.dio +++| 00757 M00S00609.dio +++| 00758 M00S00610.dio +++| SRP SUBR ENTRY/EXIT 00759 M00S00611.dio +++| SRP1 PAUSE NE 00760 M00S00612.dio +++| LDD RA READ FILE STATUS 00761 M00S00613.dio +++| SHN 6 00762 M00S00614.dio +++| ADD IR+4 00763 M00S00615.dio +++| CRD CM+1 00764 M00S00616.dio +++| ADN 1 READ FIRST 00765 M00S00617.dio +++| CRD T1 00766 M00S00618.dio +++| ADN 1 READ IN 00767 M00S00619.dio +++| CRD DP 00768 M00S00620.dio +++| ADN 1 READ OUT 00769 M00S00621.dio +++| CRD CN 00770 M00S00622.dio +++| ADN 1 READ LIMIT 00771 M00S00623.dio +++| CRD CM 00772 M00S00624.dio +++| LDD CM+5 00773 M00S00625.dio +++| NJN SRP1 IF *SYSEDIT* NOT READY 00774 M00S00626.dio +++| LDD T1+3 00775 M00S00627.dio +++| LPN 37 00776 M00S00628.dio +++| STD T1+3 00777 M00S00629.dio +++| 00778 M00S00630.dio +++| LDD CM+3 LIMIT - FIRST 00779 M00S00631.dio +++| SBD T1+3 00780 M00S00632.dio +++| SHN 14 00781 M00S00633.dio +++| ADD CM+4 00782 M00S00634.dio +++| SBD T1+4 00783 M00S00635.dio +++| STM .BSA+1 00784 M00S00636.dio +++| SHN -14 00785 M00S00637.dio +++| LMC ADCI 00786 M00S00638.dio +++| STM .BSA 00787 M00S00639.dio +++| 00788 M00S00640.dio +++| LDC ADCI+77 -LIMIT 00789 M00S00641.dio +++| LMD CM+3 00790 M00S00642.dio +++| STM .LMA 00791 M00S00643.dio +++| LCN 0 00792 M00S00644.dio +++| LMD CM+4 00793 M00S00645.dio +++| STM .LMA+1 00794 M00S00646.dio +++| 00795 M00S00647.dio +++| LDD T1+3 FIRST 00796 M00S00648.dio +++| LMC ADCI 00797 M00S00649.dio +++| STM .FTA 00798 M00S00650.dio +++| STM .FTB 00799 M00S00651.dio +++| LDD T1+4 00800 M00S00652.dio +++| STM .FTA+1 00801 M00S00653.dio +++| STM .FTB+1 00802 M00S00654.dio +++| 00803 M00S00655.dio +++| LDD IR+3 ADDRESS OF IN 00804 M00S00656.dio +++| SHN 14 00805 M00S00657.dio +++| ADD IR+4 00806 M00S00658.dio +++| ADN 2 00807 M00S00659.dio +++| STM .INA+1 00808 M00S00660.dio +++| SHN -14 00809 M00S00661.dio +++| LMC ADCI 00810 M00S00662.dio +++| STM .INA 00811 M00S00663.dio +++| 00812 M00S00664.dio +++| LDN ZERL CLEAR CONTROL WORD 00813 M00S00665.dio +++| CRM BUF-5,ON 00814 M00S00666.dio +++| LDD TH SET PRU SIZE IN CONTROL WORD 00815 M00S00667.dio +++| STM BUF-4 00816 M00S00668.dio +++| RJM RNR READ NEXT RECORD 00817 M00S00669.dio +++| RJM CBN CHECK BLOCK NUMBER 00818 M00S00670.dio +++| LJM SRPX RETURN 00819 M00S00671.dio +++| WOC SPACE 4,10 00820 M00S00672.dio +++|** WOC - WAIT OUTPUT REGISTER CLEAR. 00821 M00S00673.dio +++|* 00822 M00S00674.dio +++|* USES CM - CM+4. 00823 M00S00675.dio +++| 00824 M00S00676.dio +++| 00825 M00S00677.dio +++| WOC SUBR ENTRY/EXIT 00826 M00S00678.dio +++| WOC1 LDD OA READ OUTPUT REGISTER 00827 M00S00679.dio +++| CRD CM 00828 M00S00680.dio +++| LDD CM 00829 M00S00681.dio +++| ZJN WOCX RETURN IF CLEAR 00830 M00S00682.dio +++| LDN 77 DELAY 00831 M00S00683.dio +++| SBN 1 00832 M00S00684.dio +++| NJN *-1 00833 M00S00685.dio +++| UJN WOC1 LOOP 00834 M00S00686.dio +++| WOG SPACE 4,10 00835 M00S00687.dio +++|** WOG - WAIT FOR OPERATOR GO. 00836 M00S00688.dio +++|* 00837 M00S00689.dio +++|* ENTRY (A) = ADDRESS OF MESSAGE. 00838 M00S00690.dio +++|* 00839 M00S00691.dio +++|* EXIT (A) = 0. 00840 M00S00692.dio +++|* OPERATOR ENTERED *GO,.* OR *GO,SYS.*. 00841 M00S00693.dio +++|* 00842 M00S00694.dio +++|* USES T3, CM - CM+4. 00843 M00S00695.dio +++|* 00844 M00S00696.dio +++|* MACROS PAUSE. 00845 M00S00697.dio +++| 00846 M00S00698.dio +++| 00847 M00S00699.dio +++| WOG SUBR ENTRY/EXIT 00848 M00S00700.dio +++| STM WOGA SET MESSAGE ADDRESS 00849 M00S00701.dio +++| LDN NCPL 00850 M00S00702.dio +++| CRD CM 00851 M00S00703.dio +++| AOD CM+1 READ SENSE SWITCH WORD AT SYSTEM CP 00852 M00S00704.dio +++| SHN 7 00853 M00S00705.dio +++| ADN SNSW 00854 M00S00706.dio +++| STD T3 00855 M00S00707.dio +++| CRD CM 00856 M00S00708.dio +++| LDD CM+3 SET PAUSE BIT 00857 M00S00709.dio +++| SCN 1 00858 M00S00710.dio +++| LMN 1 00859 M00S00711.dio +++| STD CM+3 00860 M00S00712.dio +++| LDC DSCP*200+MS2W STORE MESSAGE 00861 M00S00713.dio +++| CWM *,TR 00862 M00S00714.dio +++| WOGA EQU *-1 MESSAGE ADDRESS 00863 M00S00715.dio +++| LDD T3 STORE PAUSE FLAG 00864 M00S00716.dio +++| CWD CM 00865 M00S00717.dio +++| WOG1 PAUSE NE 00866 M00S00718.dio +++| LDD T3 CHECK PAUSE BIT 00867 M00S00719.dio +++| CRD CM 00868 M00S00720.dio +++| LDD CM+3 00869 M00S00721.dio +++| LPN 1 00870 M00S00722.dio +++| ZJN WOGX IF PAUSE BIT CLEAR 00871 M00S00723.dio +++| UJN WOG1 LOOP 00872 M00S00724.dio +++| TITLE DISK/TAPE ROUTINES. 00873 M00S00725.dio +++| BKS SPACE 4,10 00874 M00S00726.dio +++|** BKS - BACKSPACE DEADSTART MEDIUM. 00875 M00S00727.dio +++|* 00876 M00S00728.dio +++|* ENTRY (RC) = RETRY COUNT. 00877 M00S00729.dio +++|* 00878 M00S00730.dio +++|* EXIT (RC) DECREMENTED. 00879 M00S00731.dio +++|* 00880 M00S00732.dio +++|* CALLS DSM, GTS, POS, WOG. 00881 M00S00733.dio +++| 00882 M00S00734.dio +++| 00883 M00S00735.dio +++| BKS4 LDD LT RESET DISK ADDRESS 00884 M00S00736.dio +++| STD T6 00885 M00S00737.dio +++| LDD LS 00886 M00S00738.dio +++| STD T7 00887 M00S00739.dio +++| RJM POS POSITION MASS STORAGE 00888 M00S00740.dio +++| 00889 M00S00741.dio +++| BKS SUBR ENTRY/EXIT 00890 M00S00742.dio +++| RJM DSM DISPLAY STATUS MESSAGE 00891 M00S00743.dio +++| SOD RC DECREMENT RETRY COUNT 00892 M00S00744.dio +++| BKSA ZJN * IF RETRY COUNT EXHAUSTED 00893 M00S00745.dio +++|* ZJN BKS3 (TAPE ERROR LOADING SYSTEM FILE) 00894 M00S00746.dio +++| LDD DM 00895 M00S00747.dio +++| NJN BKS4 IF DISK DEADSTART 00896 M00S00748.dio +++| BKS1 RJM GTS GET TAPE STATUS 00897 M00S00749.dio +++| LPN 2 00898 M00S00750.dio +++| NJN BKS1 IF UNIT BUSY 00899 M00S00751.dio +++| LDD BF BACKSPACE TAPE
| Line S00752 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00900 M01S00752.ns21000 ---| FAN DC
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00901 M01S00011.ns21000 +++| FAN DS 00902 M00S00753.dio +++| BKS2 RJM GTS GET TAPE STATUS 00903 M00S00754.dio +++| LPN 2 00904 M00S00755.dio +++| NJN BKS2 IF BACKSPACE NOT COMPLETE 00905 M00S00756.dio +++| UJN BKSX RETURN 00906 M00S00757.dio +++| 00907 M00S00758.dio +++| BKS3 LDC BKSB *SYSTEM TAPE PARITY ERROR.* 00908 M00S00759.dio +++| RJM WOG WAIT FOR OPERATOR *GO.* 00909 M00S00760.dio +++| LJM RTRX EXIT TAPE READ ROUTINE 00910 M00S00761.dio +++| 00911 M00S00762.dio +++| BKSB DATA C*SYSTEM TAPE PARITY ERROR.* 00912 M00S00763.dio +++| 00913 M00S00764.dio +++| BKSC BSS 0 00914 M00S00765.dio +++| LOC BKSA 00915 M00S00766.dio +++| ZJN BKS3 IF TAPE ERROR LOADING SYSTEM FILE 00916 M00S00767.dio +++| LOC *O 00917 M00S00768.dio +++| GDS SPACE 4,10 00918 M00S00769.dio +++|** GDS - GET DISK STATUS. 00919 M00S00770.dio +++|* 00920 M00S00771.dio +++|* EXIT (A) = (ST) = GENERAL STATUS. 00921 M00S00772.dio +++| 00922 M00S00773.dio +++| 00923 M00S00774.dio +++| GDS SUBR ENTRY/EXIT
| Line S00775 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00924 M01S00775.ns21000 ---| FNC 12,DC GET GENERAL STATUS 00925 M01S00776.ns21000 ---| ACN DC 00926 M01S00777.ns21000 ---| IAN DC
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00927 M01S00012.ns21000 +++| FNC 12,DS GET GENERAL STATUS 00928 M01S00013.ns21000 +++| ACN DS 00929 M01S00014.ns21000 +++| IAN DS 00930 M00S00778.dio +++| STD ST 00931 M00S00779.dio +++| UJN GDSX RETURN 00932 M00S00780.dio +++| GTS SPACE 4,10 00933 M00S00781.dio +++|** GTS - GET TAPE STATUS. 00934 M00S00782.dio +++|* 00935 M00S00783.dio +++|* EXIT (A) = (ST) = GENERAL STATUS. 00936 M00S00784.dio +++| 00937 M00S00785.dio +++| 00938 M00S00786.dio +++| GTS1 LDN 70
| Line S00787 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00939 M01S00787.ns21000 ---| GTS2 FJM GTS4,DC IF STATUS READY
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00940 M01S00015.ns21000 +++| GTS2 FJM GTS4,DS IF STATUS READY 00941 M00S00788.dio +++| SBN 1 00942 M00S00789.dio +++| NJN GTS2 WAIT STATUS READY
| Line S00790 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00943 M01S00790.ns21000 ---| DCN DC
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00944 M01S00016.ns21000 +++| DCN DS 00945 M00S00791.dio +++| GTS3 LDD SF REQUEST GENERAL STATUS
| Line S00792 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00946 M01S00792.ns21000 ---| FAN DC 00947 M01S00793.ns21000 ---| ACN DC 00948 M01S00794.ns21000 ---| EJM GTS1,DC IF CHANNEL EMPTY 00949 M01S00795.ns21000 ---| GTS4 IAN DC 00950 M01S00796.ns21000 ---| DCN DC
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00951 M01S00017.ns21000 +++| FAN DS 00952 M01S00018.ns21000 +++| ACN DS 00953 M01S00019.ns21000 +++| EJM GTS1,DS IF CHANNEL EMPTY 00954 M01S00020.ns21000 +++| GTS4 IAN DS 00955 M01S00021.ns21000 +++| DCN DS 00956 M00S00797.dio +++| STD ST SET GENERAL STATUS 00957 M00S00798.dio +++| SHN 0-13 00958 M00S00799.dio +++| ZJN GTS5 IF ALERT FLAG NOT SET
| Line S00800 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00959 M01S00800.ns21000 ---| FNC 112,DC GET DETAILED STATUS
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00960 M01S00022.ns21000 +++| FNC 112,DS GET DETAILED STATUS 00961 M00S00801.dio +++| GTSA EQU *-1
| Line S00802 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00962 M01S00802.ns21000 ---| ACN DC 00963 M01S00803.ns21000 ---| IAN DC 00964 M01S00804.ns21000 ---| DCN DC
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00965 M01S00023.ns21000 +++| ACN DS 00966 M01S00024.ns21000 +++| IAN DS 00967 M01S00025.ns21000 +++| DCN DS 00968 M00S00805.dio +++| LPC 7077 00969 M00S00806.dio +++| GTSB EQU *-1 00970 M00S00807.dio +++|* LPC 7777 (ATS TAPE SYSTEM) 00971 M00S00808.dio +++| NJN GTS5 IF NOT ONLY WARNING 00972 M00S00809.dio +++| LDD ST CLEAR ALERT FLAG 00973 M00S00810.dio +++| LPN 77 00974 M00S00811.dio +++| STD ST 00975 M00S00812.dio +++| GTS5 LDD ST 00976 M00S00813.dio +++| 00977 M00S00814.dio +++| GTS SUBR ENTRY/EXIT 00978 M00S00815.dio +++| UJN GTS3 GET GENERAL STATUS 00979 M00S00816.dio +++| ITM SPACE 4,10 00980 M00S00817.dio +++|** ITM - INITIATE TAPE MOTION. 00981 M00S00818.dio +++|* 00982 M00S00819.dio +++|* ENTRY (TM) = 5005 IF TAPE MOTION INITIATED. 00983 M00S00820.dio +++|* 00984 M00S00821.dio +++|* EXIT (A) = (TM) = 5005. 00985 M00S00822.dio +++|* CHANNEL ACTIVE. 00986 M00S00823.dio +++| 00987 M00S00824.dio +++| 00988 M00S00825.dio +++| ITM SUBR ENTRY/EXIT 00989 M00S00826.dio +++| LDD TM 00990 M00S00827.dio +++| NJN ITMX IF TAPE MOTION ALREADY INITIATED 00991 M00S00828.dio +++| LDD RF ISSUE READ FUNCTION
| Line S00829 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00992 M01S00829.ns21000 ---| FAN DC
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00993 M01S00026.ns21000 +++| FAN DS 00994 M00S00830.dio +++| LDC TPLN+5 SET TAPE MOTION FLAG 00995 M00S00831.dio +++| STD TM
| Line S00832 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00996 M01S00832.ns21000 ---| ACN DC
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00997 M01S00027.ns21000 +++| ACN DS 00998 M00S00833.dio +++| UJN ITMX RETURN 00999 M00S00834.dio +++| POS SPACE 4,10 01000 M00S00835.dio +++|** POS - POSITION MASS STORAGE. 01001 M00S00836.dio +++|* 01002 M00S00837.dio +++|* ENTRY (T6) = LOGICAL TRACK. 01003 M00S00838.dio +++|* (T7) = LOGICAL SECTOR. 01004 M00S00839.dio +++|* (UN) = UNIT NUMBER. 01005 M00S00840.dio +++|* (POSA) = SEEK FUNCTION. 01006 M00S00841.dio +++|* 01007 M00S00842.dio +++|* USES T2. 01008 M00S00843.dio +++|* 01009 M00S00844.dio +++|* CALLS DSM, GDS, LDA. 01010 M00S00845.dio +++| 01011 M00S00846.dio +++| 01012 M00S00847.dio +++| POS SUBR ENTRY/EXIT 01013 M00S00848.dio +++| LDN 0 01014 M00S00849.dio +++| STD T2 01015 M00S00850.dio +++| RJM LDA CONVERT DISK ADDRESS
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01016 M01S00005.241l630 +++| LDD DT SET 895 DEADSTART READ FLAG 01017 M01S00006.241l630 +++| RAD UN+2 01018 M00S00851.dio +++| POS1 SOD T2 01019 M00S00852.dio +++| ZJN POS2 IF BUSY COUNT EXHAUSTED
| Line S00853 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01020 M01S00853.ns21000 ---| FNC 2,DC SEEK FUNCTION
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01021 M01S00028.ns21000 +++| FNC 2,DS SEEK FUNCTION 01022 M00S00854.dio +++| POSA EQU *-1
| Line S00855 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01023 M01S00855.ns21000 ---|* FNC 1,DC (1 TO 1 INTERLACE) 01024 M01S00856.ns21000 ---| ACN DC
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01025 M01S00029.ns21000 +++|* FNC 1,DS (1 TO 1 INTERLACE) 01026 M01S00030.ns21000 +++| ACN DS 01027 M00S00857.dio +++| LDN 4 OUTPUT SEEK PARAMETERS
| Line S00858 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01028 M01S00858.ns21000 ---| OAM UN,DC 01029 M01S00859.ns21000 ---| FJM *,DC 01030 M01S00860.ns21000 ---| DCN DC
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01031 M01S00031.ns21000 +++| OAM UN,DS 01032 M01S00032.ns21000 +++| FJM *,DS IF CHANNEL FULL 01033 M01S00033.ns21000 +++| DCN DS 01034 M00S00861.dio +++| RJM GDS GET DISK STATUS 01035 M00S00862.dio +++| ZJN POSX IF POSITIONING COMPLETE 01036 M00S00863.dio +++| LPN 2 01037 M00S00864.dio +++| NJN POS1 IF BUSY 01038 M00S00865.dio +++| POS2 RJM DSM DISPLAY STATUS MESSAGE 01039 M00S00866.dio +++| UJN POS1 LOOP 01040 M00S00867.dio +++| RDR SPACE 4,10 01041 M00S00868.dio +++|** RDR - READ DISK RECORD. 01042 M00S00869.dio +++|* 01043 M00S00870.dio +++|* ENTRY (T6) = CURRENT LOGICAL TRACK. 01044 M00S00871.dio +++|* (T7) = CURRENT LOGICAL SECTOR. 01045 M00S00872.dio +++|* 01046 M00S00873.dio +++|* EXIT (A) = 0 IF ERROR. 01047 M00S00874.dio +++|* (LT) = (T6) ON ENTRY. 01048 M00S00875.dio +++|* (LS) = (T7) ON ENTRY. 01049 M00S00876.dio +++|* (WC) = CM WORD COUNT OF RECORD. 01050 M00S00877.dio +++|* 01051 M00S00878.dio +++|* CALLS CDD, RNS. 01052 M00S00879.dio +++| 01053 M00S00880.dio +++| 01054 M00S00881.dio +++| RDR SUBR ENTRY/EXIT 01055 M00S00882.dio +++| RJM CDD CONNECT 01056 M00S00883.dio +++| RDR1 LDN 0 CLEAR WORD COUNT 01057 M00S00884.dio +++| STD WC 01058 M00S00885.dio +++| LDD T6 SAVE CURRENT DISK ADDRESS 01059 M00S00886.dio +++| STD LT 01060 M00S00887.dio +++| LDD T7 01061 M00S00888.dio +++| STD LS 01062 M00S00889.dio +++| RDR2 LDD WC READ NEXT SECTOR 01063 M00S00890.dio +++| RJM RNS 01064 M00S00891.dio +++| MJN RDR1 IF DISK ERROR 01065 M00S00892.dio +++| RAD WC 01066 M00S00893.dio +++| LMC TPLN/5 01067 M00S00894.dio +++| ZJN RDR3 IF TAPE PRU ASSEMBLED 01068 M00S00895.dio +++| LDD T2 CHECK SECTOR WORD COUNT 01069 M00S00896.dio +++| SHN -6 01070 M00S00897.dio +++| NJN RDR2 IF NOT EOR
| Line S00898 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01071 M01S00898.ns21000 ---| RDR3 FNC 10,DC RELEASE CONTROLLER / DRIVE
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01072 M01S00034.ns21000 +++| RDR3 FNC 10,DS RELEASE CONTROLLER / DRIVE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dio2 |
Seq # *Modification Id* Act ----------------------------+ 01073 M01S00001.dio2 +++| AJM *,DS IF FUNCTION NOT COMPLETE 01074 M00S00899.dio +++| UJN RDRX RETURN 01075 M00S00900.dio +++| RDT SPACE 4,10 01076 M00S00901.dio +++|** RDT - REWIND DEADSTART TAPE. 01077 M00S00902.dio +++| 01078 M00S00903.dio +++| 01079 M00S00904.dio +++| RDT SUBR ENTRY/EXIT 01080 M00S00905.dio +++| LDD DM 01081 M00S00906.dio +++| NJN RDTX IF DISK DEADSTART 01082 M00S00907.dio +++| RDT1 RJM GTS GET TAPE STATUS 01083 M00S00908.dio +++| LPN 2 01084 M00S00909.dio +++| NJN RDT1 IF UNIT BUSY 01085 M00S00910.dio +++| LDD SF 01086 M00S00911.dio +++| SBN 12-10 REWIND TAPE
| Line S00912 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01087 M01S00912.ns21000 ---| FAN DC
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01088 M01S00035.ns21000 +++| FAN DS 01089 M00S00913.dio +++| UJN RDTX RETURN 01090 M00S00914.dio +++| RNS SPACE 4,10 01091 M00S00915.dio +++|** RNS - READ NEXT SECTOR. 01092 M00S00916.dio +++|* 01093 M00S00917.dio +++|* ENTRY (A) = BIAS FOR BUFFER ADDRESS. 01094 M00S00918.dio +++|* 01095 M00S00919.dio +++|* EXIT (A) = (T2) = SECTOR WORD COUNT. 01096 M00S00920.dio +++|* (T6) = LOGICAL TRACK FOR NEXT READ. 01097 M00S00921.dio +++|* (T7) = LOGICAL SECTOR FOR NEXT READ. 01098 M00S00922.dio +++|* 01099 M00S00923.dio +++|* EREXIT (A) .LT. 0. 01100 M00S00924.dio +++|* DISK BACKSPACED. 01101 M00S00925.dio +++|* 01102 M00S00926.dio +++|* USES T3, L1, L2. 01103 M00S00927.dio +++|* 01104 M00S00928.dio +++|* CALLS BKS, GDS, POS. 01105 M00S00929.dio +++| 01106 M00S00930.dio +++|
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01107 M01S00004.ns2776 +++| RNS2.1 LDN 0 ZERO IF *DR* DEADSTART DEVICE 01108 M01S00005.ns2776 +++| RNSB EQU *-1 01109 M01S00006.ns2776 +++| NJN RNS2.2 IF NOT *DR* DEADSTART DEVICE 01110 M01S00007.ns2776 +++| LDD T7 01111 M01S00008.ns2776 +++| LMC 1200 01112 M01S00009.ns2776 +++| ZJN RNS3.1 IF POSSIBLE CYLINDER SWITCH 01113 M01S00010.ns2776 +++| LMC 1200&2400 01114 M01S00011.ns2776 +++| ZJN RNS3.1 IF POSSIBLE CYLINDER SWITCH 01115 M01S00012.ns2776 +++| RNS2.2 UJN RNS4 RESTORE LINKAGE CELLS AND RETURN 01116 M01S00013.ns2776 +++| 01117 M00S00931.dio +++| RNS3 AOD T7 ADVANCE LOGICAL SECTOR 01118 M00S00932.dio +++| LMI T3
| Line S00933 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01119 M01S00933.ns2776 ---| ZJN RNS4 IF MATCHING SECTOR LINKAGE
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01120 M01S00014.ns2776 +++| ZJN RNS2.1 IF MATCHING SECTOR LINKAGE 01121 M01S00015.ns2776 +++| LDI T3 SET NEXT TRACK 01122 M01S00016.ns2776 +++| SHN 21-13 01123 M01S00017.ns2776 +++| PJN * IF NOT TRACK SWITCH 01124 M01S00018.ns2776 +++| SHN 13-21 01125 M01S00019.ns2776 +++| STD T6 01126 M00S00934.dio +++| LDN 0 SET FIRST SECTOR 01127 M00S00935.dio +++| STD T7
| Line S00936 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01128 M01S00936.ns2776 ---| LDI T3 SET NEXT TRACK 01129 M01S00937.ns2776 ---| STD T6 01130 M01S00938.ns2776 ---| SHN 0-13 01131 M01S00939.ns2776 ---| ZJN * IF NOT TRACK SWITCH 01132 M01S00940.ns2776 ---| RJM POS POSITION MASS STORAGE
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01133 M01S00020.ns2776 +++| RNS3.1 RJM POS POSITION MASS STORAGE 01134 M00S00941.dio +++| RNS4 LDD L1 RESTORE CELLS OVERLAID BY LINKAGE 01135 M00S00942.dio +++| STI T3 01136 M00S00943.dio +++| AOD T3 01137 M00S00944.dio +++| LDI T3 01138 M00S00945.dio +++| STD T2 01139 M00S00946.dio +++| LDD L2 01140 M00S00947.dio +++| STI T3 01141 M00S00948.dio +++| LDD T2 01142 M00S00949.dio +++| 01143 M00S00950.dio +++| RNS SUBR ENTRY/EXIT 01144 M00S00951.dio +++| STD T3 CALCULATE BUFFER ADDRESS 01145 M00S00952.dio +++| SHN 2 01146 M00S00953.dio +++| ADC BUF-2 01147 M00S00954.dio +++| RAD T3 01148 M00S00955.dio +++| STM RNSA 01149 M00S00956.dio +++| LDI T3 SAVE LOCATIONS OVERLAID BY LINKAGE 01150 M00S00957.dio +++| STD L1 01151 M00S00958.dio +++| LDM 1,T3 01152 M00S00959.dio +++| STD L2
| Line S00960 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01153 M01S00960.ns21000 ---| FNC 4,DC READ DISK SECTOR
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01154 M01S00036.ns21000 +++| FNC 4,DS READ DISK SECTOR
| Line S00961 Modification History | |
|---|---|
M01 (Removed by) | dio1 |
Seq # *Modification Id* Act ----------------------------+ 01155 M01S00961.dio1 ---| LDC DSLN+2
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dio1 |
Seq # *Modification Id* Act ----------------------------+ 01156 M01S00001.dio1 +++| RNS1 LDC DSLN+2
| Line S00962 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01157 M01S00962.ns21000 ---| ACN DC 01158 M01S00963.ns21000 ---| IAM BUF,DC
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01159 M01S00037.ns21000 +++| ACN DS 01160 M01S00038.ns21000 +++| IAM BUF,DS 01161 M00S00964.dio +++| RNSA EQU *-1
| Line S00965 Modification History | |
|---|---|
M01 (Removed by) | dio1 |
Seq # *Modification Id* Act ----------------------------+ 01162 M01S00965.dio1 ---| RNS1 RJM GDS GET DISK STATUS 01163 M01S00966.dio1 ---| NJN RNS2 IF NOT READY 01164 M01S00967.dio1 ---| LJM RNS3 COMPLETE PROCESSING 01165 M01S00968.dio1 ---| 01166 M01S00969.dio1 ---| RNS2 LPC 5001 01167 M01S00970.dio1 ---| ZJN RNS1 IF NO ERRORS 01168 M01S00971.dio1 ---| RJM BKS BACKSPACE DISK
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | dio1 |
Seq # *Modification Id* Act ----------------------------+ 01169 M01S00002.dio1 +++| RJM GDS GET DISK STATUS 01170 M01S00003.dio1 +++| ZJP RNS3 IF NO ERRORS 01171 M01S00004.dio1 +++| SHN 21-13 01172 M01S00005.dio1 +++| PJN RNS2 IF NOT ABNORMAL TERMINATION 01173 M01S00006.dio1 +++| SHN 21-10-21+13 01174 M01S00007.dio1 +++| PJN RNS2 IF NOT TO ISSUE CONTINUE 01175 M01S00008.dio1 +++| FNC 14,DS ISSUE CONTINUE FUNCTION 01176 M01S00009.dio1 +++| UJN RNS1 CONTINUE 01177 M01S00010.dio1 +++| 01178 M01S00011.dio1 +++| RNS2 RJM BKS BACKSPACE DISK 01179 M00S00972.dio +++| LCN 0 01180 M00S00973.dio +++| LJM RNSX RETURN 01181 M00S00974.dio +++| RTR SPACE 4,10 01182 M00S00975.dio +++|** RTR - READ TAPE RECORD. 01183 M00S00976.dio +++|* 01184 M00S00977.dio +++|* EXIT (WC) = CM WORD COUNT FOR RECORD. 01185 M00S00978.dio +++|* (TM) = 0. 01186 M00S00979.dio +++|* TO *RSTX* WHEN EOF ENCOUNTERED. 01187 M00S00980.dio +++|* 01188 M00S00981.dio +++|* CALLS BKS, DV5, GTS, ITM. 01189 M00S00982.dio +++| 01190 M00S00983.dio +++| 01191 M00S00984.dio +++| RTR SUBR ENTRY/EXIT 01192 M00S00985.dio +++| RTR1 RJM ITM INITIATE TAPE MOTION 01193 M00S00986.dio +++| STD WC
| Line S00987 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01194 M01S00987.ns21000 ---| IAM BUF,DC INPUT TAPE RECORD
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01195 M01S00039.ns21000 +++| IAM BUF,DS INPUT TAPE RECORD 01196 M00S00988.dio +++| LMC -0 01197 M00S00989.dio +++| ADD WC 01198 M00S00990.dio +++| SBN 3 01199 M00S00991.dio +++| PJN RTR2 IF NOT NOISE 01200 M00S00992.dio +++| LDN 0 01201 M00S00993.dio +++| RTR2 RJM DV5 DIVIDE BY FIVE 01202 M00S00994.dio +++| STD WC 01203 M00S00995.dio +++| RTR3 RJM GTS GET TAPE STATUS 01204 M00S00996.dio +++| LPN 20 01205 M00S00997.dio +++| NJN RTR4 IF EOF 01206 M00S00998.dio +++| STD TM 01207 M00S00999.dio +++| LDD ST 01208 M00S01000.dio +++| LPC 4010 01209 M00S01001.dio +++| ZJN RTRX IF NO ERRORS 01210 M00S01002.dio +++| RJM BKS BACKSPACE TAPE 01211 M00S01003.dio +++| UJN RTR1 RETRY 01212 M00S01004.dio +++| 01213 M00S01005.dio +++| RTR4 LJM RSTX EXIT SYSTEM TAPE LOAD 01214 M00S01006.dio +++| RTU SPACE 4,10 01215 M00S01007.dio +++|** RTU - RELEASE TAPE UNIT. 01216 M00S01008.dio +++| 01217 M00S01009.dio +++| 01218 M00S01010.dio +++| RTU SUBR ENTRY/EXIT 01219 M00S01011.dio +++| LDD DM 01220 M00S01012.dio +++| NJN RTUX IF DISK DEADSTART 01221 M00S01013.dio +++| LDD SF 01222 M00S01014.dio +++| SBN 12-1
| Line S01015 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01223 M01S01015.ns21000 ---| RTU1 FAN DC RELEASE UNIT RESERVATION
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01224 M01S00040.ns21000 +++| RTU1 FAN DS RELEASE UNIT RESERVE 01225 M00S01016.dio +++| UJN RTUX RETURN 01226 M00S01017.dio +++| SPACE 4,10 01227 M00S01018.dio +++|** COMMON DECKS. 01228 M00S01019.dio +++| 01229 M00S01020.dio +++| 01230 M00S01021.dio +++|*CALL COMPC2D 01231 M00S01022.dio +++|*CALL COMPDV5
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01232 M01S00021.ns2776 +++| LIST X 01233 M00S01023.dio +++|*CALL COMPLDA
| Line S01024 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01234 M01S01024.ns2776 ---| SPACE 4,10 01235 M01S01025.ns2776 ---|** CHANNEL TABLES. 01236 M01S01026.ns2776 ---| 01237 M01S01027.ns2776 ---| 01238 M01S01028.ns2776 ---| CHTB PC
| Line S01029 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01239 M02S01029.ns2776 ---| CHTB DC
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01240 M02S00041.ns2776 ---| CHTB DS
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01241 M01S00022.ns2776 +++| LIST * 01242 M01S00023.ns2776 +++| TITLE BUFFER RESIDENT PRESET. 01243 M01S00024.ns2776 +++| BRP SPACE 4,10 01244 M01S00025.ns2776 +++|** BRP - BUFFER RESIDENT PRESET. 01245 M01S00026.ns2776 +++|* 01246 M01S00027.ns2776 +++|* EXIT CHANNEL INSTRUCTIONS MODIFIED. 01247 M01S00028.ns2776 +++|* DRIVERS PRESET. 01248 M01S00029.ns2776 +++|* CONSTANT 3 (TR) DEFINED. 01249 M01S00030.ns2776 +++|* 01250 M01S00031.ns2776 +++|* USES DH, DM, DN, IH, T4, T6, T7. 01251 M01S00032.ns2776 +++|* 01252 M01S00033.ns2776 +++|* CALLS C2D, MCI, PSD. 01253 M01S00034.ns2776 +++| 01254 M01S00035.ns2776 +++| 01255 M01S00036.ns2776 +++| BRP SUBR ENTRY/EXIT 01256 M01S00037.ns2776 +++| LDM MXRL+CM SET DEADSTART CHANNEL 01257 M01S00038.ns2776 +++| STD T4 01258 M01S00039.ns2776 +++| STD DH 01259 M01S00040.ns2776 +++| RJM C2D CONVERT FOR STATUS MESSAGE 01260 M01S00041.ns2776 +++| STM DSMA+1 01261 M01S00042.ns2776 +++| LDM MXRL+LA PRESERVE DISPLAY CONSOLE STATUS 01262 M01S00043.ns2776 +++| STD DN 01263 M01S00044.ns2776 +++| LDC CTDS MODIFY CHANNEL INSTRUCTIONS 01264 M01S00045.ns2776 +++| RJM MCI 01265 M01S00046.ns2776 +++| LDN PC CHECK DEADSTART CHANNEL 01266 M01S00047.ns2776 +++| STD IH 01267 M01S00048.ns2776 +++| LMD DH 01268 M01S00049.ns2776 +++| NJN BRP1 IF NOT PP COMMUNICATIONS CHANNEL 01269 M01S00050.ns2776 +++| LDN 12 SET INTERCOMMUNICATIONS CHANNEL 01270 M01S00051.ns2776 +++| STD IH 01271 M01S00052.ns2776 +++| STD T4 01272 M01S00053.ns2776 +++| LDC CTPC MODIFY PP INTERCOMMUNICATION CHANNELS 01273 M01S00054.ns2776 +++| RJM MCI 01274 M01S00055.ns2776 +++| BRP1 LDM MXRL+T7 DISK SECTOR / DEADSTART FUNCTION 01275 M01S00056.ns2776 +++| STD T7 01276 M01S00057.ns2776 +++| LDM MXRL+T6 TRACK / TAPE STATUS 01277 M01S00058.ns2776 +++| STD T6 01278 M01S00059.ns2776 +++| STD DM 01279 M01S00060.ns2776 +++| RJM PSD PRESET DRIVERS 01280 M01S00061.ns2776 +++| LDN 3 DEFINE CONSTANT 3 01281 M01S00062.ns2776 +++| STD TR 01282 M01S00063.ns2776 +++| UJP BRPX RETURN 01283 M01S00064.ns2776 +++| TITLE BUFFER RESIDENT PRESET SUBROUTINES. 01284 M01S00065.ns2776 +++| CAU SPACE 4,10 01285 M01S00066.ns2776 +++|** CAU - CHECK ATS UNIT. 01286 M01S00067.ns2776 +++|* 01287 M01S00068.ns2776 +++|* ENTRY (T7) = WORD 6 OF DEADSTART PANEL. 01288 M01S00069.ns2776 +++|* 01289 M01S00070.ns2776 +++|* EXIT TAPE READ LOOP MODIFIED FOR 200 OR 150 IPS 6250 01290 M01S00071.ns2776 +++|* DENSITY AT 2X PPU SPEED OR ANY 6250 DENSITY AT 1X PPU 01291 M01S00072.ns2776 +++|* SPEED. 01292 M01S00073.ns2776 +++|* 01293 M01S00074.ns2776 +++|* USES T1. 01294 M01S00075.ns2776 +++| 01295 M01S00076.ns2776 +++| 01296 M01S00077.ns2776 +++| CAU2 SBN 2 01297 M01S00078.ns2776 +++| PJN CAUX IF PP SPEED .GE. 4X 01298 M01S00079.ns2776 +++| LDD T1 01299 M01S00080.ns2776 +++| LPN 7 01300 M01S00081.ns2776 +++| LMN 5 01301 M01S00082.ns2776 +++| ZJN CAU1 IF 200 IPS UNIT 01302 M01S00083.ns2776 +++| LMN 6&5 01303 M01S00084.ns2776 +++| ZJN CAU1 IF 150 IPS UNIT 01304 M01S00085.ns2776 +++| 01305 M01S00086.ns2776 +++| CAU SUBR ENTRY/EXIT 01306 M01S00087.ns2776 +++| LDD T7 GET EQUIPMENT (CONTROLLER) NUMBER 01307 M01S00088.ns2776 +++| LPC 7000 01308 M01S00089.ns2776 +++| ADC 212 ADD UNIT STATUS FUNCTION 01309 M01S00090.ns2776 +++| FAN DS 01310 M01S00091.ns2776 +++| ACN DS 01311 M01S00092.ns2776 +++| IAN DS 01312 M01S00093.ns2776 +++| DCN DS 01313 M01S00094.ns2776 +++| STD T1 01314 M01S00095.ns2776 +++| LPN 30 CHECK UNIT STATUS 01315 M01S00096.ns2776 +++| LMN 30 01316 M01S00097.ns2776 +++| NJN CAUX IF DENSITY NOT 6250 CPI 01317 M01S00098.ns2776 +++| LDM MXRL+T3 01318 M01S00099.ns2776 +++| NJN CAU2 IF PP SPEED .GT. 1X 01319 M01S00100.ns2776 +++| CAU1 LDC UJNI+2 DISABLE INITIATE TAPE MOTION 01320 M01S00101.ns2776 +++| STM RSTA 01321 M01S00102.ns2776 +++| UJN CAUX RETURN 01322 M01S00103.ns2776 +++| MCI SPACE 4,10 01323 M01S00104.ns2776 +++|** MCI - MODIFY CHANNEL INSTRUCTIONS. 01324 M01S00105.ns2776 +++|* 01325 M01S00106.ns2776 +++|* ENTRY (A) = ADDRESS OF INSTRUCTION LIST. 01326 M01S00107.ns2776 +++|* (T4) = CHANNEL NUMBER. 01327 M01S00108.ns2776 +++|* 01328 M01S00109.ns2776 +++|* USES T1, T2. 01329 M01S00110.ns2776 +++| 01330 M01S00111.ns2776 +++| 01331 M01S00112.ns2776 +++| MCI1 STD T2 SET INSTRUCTION ADDRESS 01332 M01S00113.ns2776 +++| LDI T2 MODIFY INSTRUCTION 01333 M01S00114.ns2776 +++| SCN 37 01334 M01S00115.ns2776 +++| LMD T4 01335 M01S00116.ns2776 +++| STI T2 01336 M01S00117.ns2776 +++| AOD T1 ADVANCE LIST ADDRESS 01337 M01S00118.ns2776 +++| MCI2 LDI T1 01338 M01S00119.ns2776 +++| NJN MCI1 IF NOT END OF LIST 01339 M01S00120.ns2776 +++| 01340 M01S00121.ns2776 +++| MCI SUBR ENTRY/EXIT 01341 M01S00122.ns2776 +++| STD T1 SET LIST ADDRESS 01342 M01S00123.ns2776 +++| UJN MCI2 ENTER LOOP 01343 M01S00124.ns2776 +++| PSD SPACE 4,10 01344 M01S00125.ns2776 +++|** PSD - PRESET DRIVERS. 01345 M01S00126.ns2776 +++|* 01346 M01S00127.ns2776 +++|* ENTRY (A) = 0 IF TAPE DEADSTART. 01347 M01S00128.ns2776 +++|* (T6) = TRACK / TAPE STATUS. 01348 M01S00129.ns2776 +++|* (T7) = DISK SECTOR / DEADSTART FUNCTION. 01349 M01S00130.ns2776 +++|* 01350 M01S00131.ns2776 +++|* EXIT (UN) = UNIT NUMBER (DISK DEADSTART). 01351 M01S00132.ns2776 +++|* (BF) = BACKSPACE FUNCTION (TAPE DEADSTART). 01352 M01S00133.ns2776 +++|* (RF) = READ FUNCTION (TAPE DEADSTART). 01353 M01S00134.ns2776 +++|* (SF) = STATUS FUNCTION (TAPE DEADSTART). 01354 M01S00135.ns2776 +++|* 01355 M01S00136.ns2776 +++|* CALLS CAU, C2D, PDA. 01356 M01S00137.ns2776 +++| 01357 M01S00138.ns2776 +++| 01358 M01S00139.ns2776 +++| PSD3 LDM MXRL+T5 SET SEEK FUNCTION 01359 M01S00140.ns2776 +++| SHN 14 01360 M01S00141.ns2776 +++| STM POSA 01361 M01S00142.ns2776 +++| SHN -14 POSITION ALGORITHM INDEX 01362 M01S00143.ns2776 +++| LPN 77 01363 M01S00144.ns2776 +++| LMN AIDR 01364 M01S00145.ns2776 +++| RAM RNSB ZERO FOR CDSS II DEADSTART DEVICE 01365 M01S00146.ns2776 +++| LMN AIDR 01366 M01S00147.ns2776 +++| LPN 77 01367 M01S00148.ns2776 +++| RJM PDA PRESET DISK ADDRESS CONVERSION 01368 M01S00149.ns2776 +++| LDM MXRL+DT GET 895 DEADSTART READ FLAG 01369 M01S00150.ns2776 +++| STD DT 01370 M01S00151.ns2776 +++| LDM MXRL+T4 SET UNIT NUMBER 01371 M01S00152.ns2776 +++| PSD4 STD UN 01372 M01S00153.ns2776 +++| RJM C2D CONVERT FOR STATUS MESSAGE 01373 M01S00154.ns2776 +++| STM DSMA+4 01374 M01S00155.ns2776 +++| 01375 M01S00156.ns2776 +++| PSD SUBR ENTRY/EXIT 01376 M01S00157.ns2776 +++| NJN PSD3 IF DISK DEADSTART 01377 M01S00158.ns2776 +++| LDC RTR SET TAPE DRIVER ADDRESS 01378 M01S00159.ns2776 +++| STM RNRA 01379 M01S00160.ns2776 +++| LDD T7 01380 M01S00161.ns2776 +++| SHN -6 01381 M01S00162.ns2776 +++| LPN 7 01382 M01S00163.ns2776 +++| LMN 1 01383 M01S00164.ns2776 +++| NJN PSD1 IF NOT ATS TAPE SYSTEM 01384 M01S00165.ns2776 +++| LCN 0 SET DETAIL STATUS MASK 01385 M01S00166.ns2776 +++| STM GTSB 01386 M01S00167.ns2776 +++| RJM CAU CHECK ATS UNIT 01387 M01S00168.ns2776 +++| PSD1 LDD T7 EXTRACT EQUIPMENT (CONTROLLER) NUMBER 01388 M01S00169.ns2776 +++| LPC 7000 01389 M01S00170.ns2776 +++| ADN 12 SET GENERAL STATUS FUNCTION 01390 M01S00171.ns2776 +++| STD SF 01391 M01S00172.ns2776 +++| ADN 40-12 SET READ FUNCTION 01392 M01S00173.ns2776 +++| STD RF 01393 M01S00174.ns2776 +++| ADN 112-40 SET DETAILED STATUS FUNCTION 01394 M01S00175.ns2776 +++| STM GTSA 01395 M01S00176.ns2776 +++| ADN 113-112 SET BACKSPACE FUNCTION 01396 M01S00177.ns2776 +++| STD BF 01397 M01S00178.ns2776 +++| PSD2 LDD T7 EXTRACT UNIT NUMBER 01398 M01S00179.ns2776 +++| LPN 17 01399 M01S00180.ns2776 +++| LJM PSD4 CONVERT FOR STATUS MESSAGE 01400 M01S00181.ns2776 +++| 01401 M01S00182.ns2776 +++| LIST G 01402 M01S00183.ns2776 +++| PDA HERE 01403 M01S00184.ns2776 +++| LIST * 01404 M00S01030.dio +++| SPACE 4,10 01405 M01S00185.ns2776 +++|** CHANNEL TABLES. 01406 M01S00186.ns2776 +++| 01407 M01S00187.ns2776 +++| 01408 M01S00188.ns2776 +++| CHTB PC 01409 M01S00189.ns2776 +++| CHTB DS 01410 M01S00190.ns2776 +++| SPACE 4,10 01411 M01S00191.ns2776 +++| ERRNG 7777-* PRESET OVERFLOWS PP MEMORY 01412 M01S00192.ns2776 +++| SPACE 4,10 01413 M00S01031.dio +++|** BUFFER. 01414 M00S01032.dio +++| 01415 M00S01033.dio +++|
| Line S01034 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01416 M01S01034.ns2776 ---| BUF EQU CTPC+5
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01417 M01S00193.ns2776 +++| BUF EQU BRPX+5 01418 M00S01035.dio +++| SPACE 4,10
| Line S01036 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01419 M01S01036.ns2776 ---| ERRPL BUF+TPLN+5-10000 BUFFER OVERFLOWS PP MEMORY 01420 M01S01037.ns2776 ---| ERRPL *-MXRL+4 *DIO* OVERFLOWS ONE TAPE PRU
| Line S00194 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 01421 M01S00194.ns2776 +++| ERRNG 10000-BUF-TPLN-5 BUFFER OVERFLOWS PP MEMORY 01422 M01S00195.ns2776 +++| ERRNG MXRL-*-5 *DIO* OVERFLOWS ONE TAPE PRU 01423 M00S01038.dio +++| 01424 M00S01039.dio +++| END
cdc/nos2.source/opl.opl871/deck/dio.txt · Last modified: (external edit)