cdc:nos2.source:opl.opl871:deck:set.010
Deck SET Part 010
79 Modifications
Listing Sections
- Deck SET Start
- Deck SET Part 1 (Line 1817)
- Deck SET Part 2 (Line 3543)
- Deck SET Part 3 (Line 5328)
- Deck SET Part 4 (Line 6862)
- Deck SET Part 5 (Line 8562)
- Deck SET Part 6 (Line 10220)
- Deck SET Part 7 (Line 11963)
- Deck SET Part 8 (Line 13745)
- Deck SET Part 9 (Line 15434)
- Deck SET Part 10 (Line 17125)
- Deck SET Part 11 (Line 18893)
- Deck SET Part 12 (Line 20702)
- Deck SET Part 13 (Line 22346)
- Deck SET Part 14 (Line 24235)
- Deck SET Part 15 (Line 25805)
Source
Seq # *Modification Id* Act ----------------------------+ 17125 M01S11669.272l774 ---| RAM TDDB+DVED 17126 M00S11670.set +++| AOD CM+4 17127 M00S11671.set +++| LDM EBUT+4 CHECK FOR INITIALIZE REQUEST 17128 M00S11672.set +++| SCN 17 17129 M00S11673.set +++| ZJN RMM11 IF NO INITIALIZE OPTIONS 17130 M00S11674.set +++| STD T0 17131 M00S11675.set +++| LPC MLFPR+MLIAL 17132 M00S11676.set +++| NJN RMM10 IF FULL INITIALIZE SPECIFIED 17133 M00S11677.set +++| LDD T0 17134 M00S11678.set +++| SHN 4 17135 M00S11679.set +++| STD CM+1 SET DAYFILE OPTIONS 17136 M00S11680.set +++| SHN -6 17137 M00S11681.set +++| LPC MLIPF+MLIQF 17138 M00S11682.set +++| RMM10 LMN MLIRP ADD INITIALIZE PENDING FLAG 17139 M00S11683.set +++| STD CM 17140 M00S11684.set +++| RMM11 STD T1 17141 M00S11685.set +++| LDM EBUT+4 SET ALTERNATE DEVICE STATUS 17142 M00S11686.set +++| SHN RASD-RASD/12D*12D-3 17143 M00S11687.set +++| LPN MRASD 17144 M00S11688.set +++| RAD CM 17145 M00S11689.set +++| LDD AB SET UNLOAD REQUESTED IF *OFF* OR *DOWN* 17146 M00S11690.set +++| LPN 2 17147 M00S11691.set +++| SHN LUNL-LUNL/12D*12D-1 17148 M00S11692.set +++| STD T0 17149 M00S11693.set +++| SHN LDUL-LUNL SET LOCAL UNLOAD IF *OFF* OR *DOWN* 17150 M00S11694.set +++| LMD T0 17151 M00S11695.set +++| RAD CM 17152 M00S11696.set +++| LDD AB+4 STORE DEVICE STATUS 17153 M00S11697.set +++| SHN 3 17154 M00S11698.set +++| ADN STLL 17155 M00S11699.set +++| CWD CM 17156 M00S11700.set +++|
| Line S11701 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17157 M01S11701.284l847 ---|* DDLL - DEVICE DEFINITION WORD (UNIT LIST).
| Line S00644 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17158 M01S00644.284l847 +++|* SCYL - STARTING CYLINDER OF PARTITION. 17159 M01S00645.284l847 +++| 17160 M01S00646.284l847 +++| LDN ZERL 17161 M01S00647.284l847 +++| CRD CM 17162 M01S00648.284l847 +++| LDM TDDB+DVCO SET STARTING CYLINDER 17163 M01S00649.284l847 +++| STD CM+2 17164 M01S00650.284l847 +++| LDD AB+4 STORE STARTING CYLINDER 17165 M01S00651.284l847 +++| SHN 3 17166 M01S00652.284l847 +++| ADN SCYL 17167 M01S00653.284l847 +++| CWD CM 17168 M01S00654.284l847 +++| 17169 M01S00655.284l847 +++|* DDLL - DEVICE DEFINITION WORD (WITH UNIT LIST). 17170 M00S11702.set +++|
| Line S11703 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17171 M01S11703.271l716 ---| ADN DDLL-STLL STORE *DDLL*
| Line S00271 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17172 M02S00271.272l774 ---| LDM TDDB+DVPR EXTRACT CONTROLLER NUMBER
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17173 M01S00043.272l774 +++| LDM EBUT+4 SET NUMBER OF UNITS 17174 M01S00044.272l774 +++| LPN 7 17175 M01S00045.272l774 +++| STM TDDB+DVED 17176 M01S00046.272l774 +++| SHN 3 17177 M01S00047.272l774 +++| RAM TDDB+DVED 17178 M01S00048.272l774 +++| LDM TDDB+DVPR SET EQUIPMENT (CONTROLLER) NUMBER
| Line S00272 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17179 M01S00272.271l716 +++| SHN -11
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17180 M02S00273.272l774 ---| STD T0 17181 M02S00274.272l774 ---| LDC TDDB+DVUN+3 SET ADDRESS OF UNIT LIST 17182 M02S00275.272l774 ---| STD T5 17183 M02S00276.272l774 ---| RMM12 LDD T0 CONTROLLER NUMBER
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17184 M01S00049.272l774 +++| SHN 6 17185 M01S00050.272l774 +++| RAM TDDB+DVED 17186 M01S00051.272l774 +++| LDD AB+4 STORE DEVICE DEFINITION
| Line S00277 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17187 M01S00277.271l716 +++| SHN 3
| Line S00278 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17188 M02S00278.272l774 ---| RAI T5 MERGE WITH DRIVE NUMBER 17189 M02S00279.272l774 ---| SOD T4 17190 M02S00280.272l774 ---| MJN RMM13 IF NO MORE UNITS 17191 M02S00281.272l774 ---| LDD T0 17192 M02S00282.272l774 ---| SHN 11 FORM UNIT NUMBER 17193 M02S00283.272l774 ---| RAI T5 17194 M02S00284.272l774 ---| SOD T5 DECREMENT UNIT LIST ADDRESS 17195 M02S00285.272l774 ---| SOD T4 17196 M02S00286.272l774 ---| PJN RMM12 IF MORE UNITS 17197 M02S00287.272l774 ---| RMM13 LDD AB+4 17198 M02S00288.272l774 ---| SHN 3 17199 M02S00289.272l774 ---| ADN DDLL STORE *DDLL*
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17200 M01S00052.272l774 +++| ADN DDLL 17201 M00S11704.set +++| CWM TDDB+DVED,ON 17202 M00S11705.set +++| 17203 M00S11706.set +++|* THLL - DEVICE ERROR THRESHOLD WORD. 17204 M00S11707.set +++| 17205 M00S11708.set +++| ADN THLL-DDLL-1 STORE THRESHOLD VALUES 17206 M00S11709.set +++| CWM TDDB+DVTH,ON 17207 M00S11710.set +++| LDD T1 17208 M00S11711.set +++| LPC MLIAL
| Line S11712 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17209 M01S11712.271l716 ---| NJN RMM13 IF FULL INITIALIZE SPECIFIED 17210 M01S11713.271l716 ---| LJM RMMX RETURN
| Line S00290 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17211 M01S00290.271l716 +++| ZJP RMMX IF FULL INITIALIZE NOT SPECIFIED 17212 M00S11714.set +++| 17213 M00S11715.set +++|* PUGL - PERMANENT FILE USER DESCRIPTION. 17214 M00S11716.set +++|
| Line S11717 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17215 M01S11717.271l716 ---| RMM13 LDN ZERL
| Line S00291 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17216 M01S00291.271l716 +++| LDN 0 CLEAR USER DESCRIPTION 17217 M00S11718.set +++| CRD CM 17218 M00S11719.set +++| LDI T3 17219 M00S11720.set +++| NJN RMM14 IF PF DESCRIPTION 17220 M00S11721.set +++| LDD EQ 17221 M00S11722.set +++| LMM DFMS 17222 M00S11723.set +++| NJN RMM16 IF NOT DEFAULT EQUIPMENT 17223 M00S11724.set +++| LDC 177777 17224 M00S11725.set +++| UJN RMM15 SET DEFAULT MASKS 17225 M00S11726.set +++| 17226 M00S11727.set +++| RMM14 LDM TDDB+DVPF SET MASKS 17227 M00S11728.set +++| LPN 17 17228 M00S11729.set +++| SHN 14 17229 M00S11730.set +++| LMM TDDB+DVPF+1 17230 M00S11731.set +++| RMM15 STD CM+4 17231 M00S11732.set +++| SHN -14 17232 M00S11733.set +++| STD CM+3 17233 M00S11734.set +++| LDD AB+4 STORE *PUGL* 17234 M00S11735.set +++| SHN 3 17235 M00S11736.set +++| ADN PUGL 17236 M00S11737.set +++| CWD CM 17237 M00S11738.set +++| 17238 M00S11739.set +++|* PFGL - PERMANENT FILE DESCRIPTION WORD. 17239 M00S11740.set +++| 17240 M00S11741.set +++| RMM16 LDI T3 17241 M00S11742.set +++| NJN RMM17 IF PF DESCRIPTION 17242 M00S11743.set +++| AOM DEFN 17243 M00S11744.set +++| LDC DEFM 17244 M00S11745.set +++| STM RMMA 17245 M00S11746.set +++| STD T3 17246 M00S11747.set +++| RMM17 SFA EST,EQ SET DEVICE ACCESS LEVELS IN PFGL 17247 M00S11748.set +++| ADK EQAE 17248 M00S11749.set +++| CRD CM 17249 M00S11750.set +++| LDD CM+3 17250 M00S11751.set +++| SHN 6
| Line S11752 Modification History | |
|---|---|
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17251 M01S11752.272l774 ---| LMM TDDB+DVED 17252 M00S11753.set +++| STM 4,T3
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17253 M01S00053.272l774 +++| LDM TDDB+DVED SET UNIT COUNTS IN PFGL 17254 M01S00054.272l774 +++| LPN 77 17255 M01S00055.272l774 +++| RAM 4,T3 17256 M00S11754.set +++| LDD AB+4 STORE PF DESCRIPTOR WORD 17257 M00S11755.set +++| SHN 3 17258 M00S11756.set +++| ADN PFGL 17259 M00S11757.set +++| CWM **,ON 17260 M00S11758.set +++| RMMA EQU *-1 17261 M00S11759.set +++| LJM RMMX RETURN 17262 M00S11760.set +++| 17263 M00S11761.set +++| DEFM DATA 6LSYSTEM DEFAULT FAMILY NAME 17264 M00S11762.set +++| DEFN CON 0 DEFAULT DEVICE NUMBER 17265 M00S11763.set +++| CON 0 UNIT COUNT 17266 M00S11764.set +++| SHS SPACE 4,10 17267 M00S11765.set +++|** SHS - SET HASH TABLE SIZE. 17268 M00S11766.set +++|* UPDATE .HATP AND .PUTP FOR BUFFERED DISKS. 17269 M00S11767.set +++|* 17270 M00S11768.set +++|* ENTRY EBUT = EST ENTRY BUILT BY *CMR*. 17271 M00S11769.set +++|* TDDB = MST PARAMETERS FROM *CMR*. 17272 M00S11770.set +++|* 17273 M00S11771.set +++|* USES T2. 17274 M00S11772.set +++| 17275 M00S11773.set +++| 17276 M00S11774.set +++| SHS SUBR ENTRY/EXIT 17277 M00S11775.set +++| LDM TDDB+DVED 17278 M00S11776.set +++| SHN 21-12 17279 M00S11777.set +++| PJN SHSX IF NOT BUFFERED DEVICE 17280 M00S11778.set +++| LDD AB+3 SAVE EQUIPMENT MNEMONIC IN MESSAGE 17281 M00S11779.set +++| STM BDTB 17282 M00S11780.set +++| LDM EBUT+4 17283 M00S11781.set +++| LPN 7 17284 M00S11782.set +++| ADN 1 17285 M00S11783.set +++| STD T2 SAVE UNIT COUNT
| Line S00656 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17286 M01S00656.284l847 +++| RJM SPP SEARCH FOR PRIOR PARTITIONS 17287 M01S00657.284l847 +++| ZJN SHS1 IF A PRIOR PARTITION WAS FOUND 17288 M00S11784.set +++| RAM .PUTP UPDATE NUMBER OF *PUT* ENTRIES NEEDED 17289 M00S11785.set +++| SHN PUTLS 17290 M00S11786.set +++| STM .PUTP+2 ADVANCE TABLE LENGTH 17291 M00S11787.set +++| SHS1 SOD T2 17292 M00S11788.set +++| MJN SHSX IF NO MORE UNITS 17293 M00S11789.set +++| LDK HATLE/10B 17294 M00S11790.set +++| RAM .HATP ACCUMULATE HASH TABLE LENGTHS 17295 M00S11791.set +++| SHN 3 17296 M00S11792.set +++| STM .HATP+2 UPDATE TOTAL LENGTH 17297 M00S11793.set +++| SHN -14 17298 M00S11794.set +++| LMD TH 17299 M00S11795.set +++| STM .HATP+1 17300 M00S11796.set +++| LPN 70 17301 M00S11797.set +++| ZJN SHS1 IF NO OVERFLOW 17302 M00S11798.set +++| LDC =C*HASH TABLE OVERFLOW.* 17303 M00S11799.set +++| LJM DSE ERROR HALT
| Line S00658 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17304 M01S00658.284l847 +++| SPP SPACE 4,10 17305 M01S00659.284l847 +++|** SPP - SEARCH FOR PRIOR PARTITIONS. 17306 M01S00660.284l847 +++|* 17307 M01S00661.284l847 +++|* ENTRY (EQ) = CURRENT EST ORDINAL. 17308 M01S00662.284l847 +++|* (T2) = NUMBER OF UNITS. 17309 M01S00663.284l847 +++|* (AB)-(AB+4) = CURRENT EST ENTRY. 17310 M01S00664.284l847 +++|* 17311 M01S00665.284l847 +++|* EXIT (A) = NUMBER OF UNITS IF NO PRIOR PARTITION. 17312 M01S00666.284l847 +++|* (A) = 0 IF PRIOR PARTITION FOUND. 17313 M01S00667.284l847 +++|* (RMMC) = (T1) = EST ORDINAL IF PRIOR PARTITION FOUND. 17314 M01S00668.284l847 +++|* 17315 M01S00669.284l847 +++|* USES T1, CM - CM+4. 17316 M01S00670.284l847 +++|* 17317 M01S00671.284l847 +++|* MACROS SFA. 17318 M01S00672.284l847 +++| 17319 M01S00673.284l847 +++| 17320 M01S00674.284l847 +++| SPP6 STM RMMC CLEAR PRIOR PARTITION LINK 17321 M01S00675.284l847 +++| LDD T2 GET NUMBER OF UNITS 17322 M01S00676.284l847 +++| 17323 M01S00677.284l847 +++| SPP SUBR ENTRY/EXIT 17324 M01S00678.284l847 +++| LDD EQ 17325 M01S00679.284l847 +++| STD T1 17326 M01S00680.284l847 +++| SPP1 SOD T1 17327 M01S00681.284l847 +++| ZJN SPP6 IF END OF EST - NO PRIOR PARTITION FOUND 17328 M01S00682.284l847 +++| SFA EST,T1 17329 M01S00683.284l847 +++| CRD CM READ EST ENTRY 17330 M01S00684.284l847 +++| LDD CM 17331 M01S00685.284l847 +++| SHN 21-13 17332 M01S00686.284l847 +++| PJN SPP1 IF NOT MASS STORAGE 17333 M01S00687.284l847 +++| LDD AB+3 17334 M01S00688.284l847 +++| LMD CM+3 17335 M01S00689.284l847 +++| SPP2 NJN SPP1 IF NOT THE SAME DEVICE TYPE 17336 M01S00690.284l847 +++| LDN CM COMPARE CHANNEL ENTRIES 17337 M01S00691.284l847 +++| STD CM 17338 M01S00692.284l847 +++| SPP3 AOD CM 17339 M01S00693.284l847 +++| SBN CM+3 17340 M01S00694.284l847 +++| ZJN SPP1 IF ALL PRIOR DEVICE CHANNELS CHECKED 17341 M01S00695.284l847 +++| LDN AB 17342 M01S00696.284l847 +++| STD T0 17343 M01S00697.284l847 +++| SPP4 AOD T0 17344 M01S00698.284l847 +++| SBN AB+3 17345 M01S00699.284l847 +++| ZJN SPP3 IF ALL CURRENT DEVICE CHANNELS CHECKED 17346 M01S00700.284l847 +++| LDI T0 CURRENT CHANNEL 17347 M01S00701.284l847 +++| ZJN SPP4 IF NO CHANNEL ENTRY 17348 M01S00702.284l847 +++| LMI CM PRIOR DEVICE CHANNEL 17349 M01S00703.284l847 +++| LPC 4277 17350 M01S00704.284l847 +++| NJN SPP4 IF CHANNELS ARE NOT THE SAME 17351 M01S00705.284l847 +++| LDD CM+4 GET EQUIPMENT/UNIT FROM PRIOR DEVICE MST 17352 M01S00706.284l847 +++| SHN 3 17353 M01S00707.284l847 +++| ADN DDLL 17354 M01S00708.284l847 +++| CRD CM 17355 M01S00709.284l847 +++| LDM TDDB+DVUN+3 COMPARE UNIT NUMBER 17356 M01S00710.284l847 +++| LMD CM+4 17357 M01S00711.284l847 +++| SPP5 NJN SPP2 IF NO MATCH 17358 M01S00712.284l847 +++| LDM TDDB+DVPR COMPARE EQUIPMENT NUMBER 17359 M01S00713.284l847 +++| SHN -3 17360 M01S00714.284l847 +++| LMD CM 17361 M01S00715.284l847 +++| SHN -6 17362 M01S00716.284l847 +++| NJN SPP5 IF NO MATCH 17363 M01S00717.284l847 +++| LDD T1 SET LINK TO PRIOR PARTITION 17364 M01S00718.284l847 +++| STM RMMC 17365 M01S00719.284l847 +++| LDN 0 INDICATE PRIOR PARTITION FOUND 17366 M01S00720.284l847 +++| UJP SPPX RETURN 17367 M00S11800.set +++| SPACE 4,10 17368 M00S11801.set +++| USE LITERALS DUMP LITERALS BLOCK 17369 M00S11802.set +++| INO SPACE 4,10 17370 M00S11803.set +++|** INO - INITIALIZE OVERLAY. 17371 M00S11804.set +++| 17372 M00S11805.set +++| 17373 M00S11806.set +++| INO SUBR ENTRY/EXIT 17374 M00S11807.set +++| LDD RS 17375 M00S11808.set +++| ZJN INOX IF NOT RECOVERY DEADSTART 17376 M00S11809.set +++| LDC * 17377 M00S11810.set +++| ORG *-1 17378 M00S11811.set +++| LOC LSTA 17379 M00S11812.set +++| UJN LSTX RETURN 17380 M00S11813.set +++| LOC *O 17381 M00S11814.set +++| STM LSTA 17382 M00S11815.set +++| UJN INOX RETURN 17383 M00S11816.set +++| SPACE 4,10
| Line S02290 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 17384 M01S02290.274l797 +++| QUAL * 17385 M01S02291.274l797 +++| SPACE 4,10 17386 M00S11817.set +++| ERRNG 7777-*-4 IF OVERFLOW 17387 M00S11818.set +++| TTL SET/APR - AUXILIARY MASS STORAGE PARAMETERS. 17388 M00S11819.set +++| TITLE 17389 M00S11820.set +++| IDENT APR,APRL 17390 M00S11821.set +++| QUAL APR
| Line S11822 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 17391 M01S11822.274l797 ---| ORG /EQP/APRL
| Line S02292 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 17392 M01S02292.274l797 +++| ORG APRL 17393 M00S11823.set +++|*COMMENT SET - AUXILIARY MASS STORAGE PARAMETERS.
| Line S11824 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 17394 M01S11824.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 17395 M01S00008.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 17396 M00S11825.set +++| SPACE 4,10 17397 M00S11826.set +++|** TBLM - GENERATE TABLE OF MASS STORAGE FLAWING PARAMETERS. 17398 M00S11827.set +++|* 17399 M00S11828.set +++|* TBLM EQ 17400 M00S11829.set +++|* EQ = MASS STORAGE EQUIPMENT MNEMONIC. 17401 M00S11830.set +++| 17402 M00S11831.set +++| 17403 M00S11832.set +++| TBLM MACRO EQ 17404 M00S11833.set +++| MS_EQ VFD 12/2R_EQ 17405 M00S11834.set +++| .A IFNE CYUN_EQ,0
| Line S11835 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17406 M01S11835.284l847 ---| CON CYUN_EQ CYLINDERS/UNIT
| Line S00721 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17407 M01S00721.284l847 +++| CON CYPN_EQ CYLINDERS/PARTITION 17408 M00S11836.set +++| CON PTCY_EQ PHYSICAL TRACKS/CYLINDER 17409 M00S11837.set +++| CON PSPT_EQ PHYSICAL SECTORS/PHYSICAL TRACK
| Line S11838 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17410 M01S11838.271l716 ---| CON LTCY_EQ LOGICAL TRACKS/CYLINDER 17411 M01S11839.271l716 ---| CON PSLT_EQ PHYSICAL SECTORS/LOGICAL TRACK 17412 M01S11840.271l716 ---| CON GS_EQ GAP SECTORS 17413 M01S11841.271l716 ---| CON TT_EQ HALF TRACK FLAG
| Line S00292 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17414 M02S00292.272l774 ---| CON CF_EQ CONVERSION FACTOR 17415 M02S00293.272l774 ---| CON PSPT_EQ*PTCY_EQ*LSPS_EQ LOGICAL SECTORS/CYLINDER
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 17416 M01S00056.272l774 +++| CON CFS_EQ CONVERSION FACTOR SHIFT COUNT 17417 M01S00057.272l774 +++| .B SET PSPT_EQ*PTCY_EQ-SPSC_EQ
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17418 M02S00058.284l847 ---| CON .B*LSPS_EQ LOGICAL SECTORS/CYLINDER
| Line S00722 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17419 M01S00722.284l847 +++| .C SET .B*LSPS_EQ 17420 M01S00723.284l847 +++| .D SET .C/10000 17421 M01S00724.284l847 +++| .E SET .D*10000 17422 M01S00725.284l847 +++| CON .D UPPER LOGICAL SECTORS/CYLINDER 17423 M01S00726.284l847 +++| CON .C-.E LOWER LOGICAL SECTORS/CYLINDER
| Line S00294 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17424 M01S00294.271l716 +++| CON LSPT_EQ LOGICAL SECTORS/PHYSICAL TRACK 17425 M01S00295.271l716 +++| CON SL_EQ+GS_EQ LOGICAL SECTORS/LOGICAL TRACK 17426 M00S11842.set +++| CON FRD FLAW ROTATING MASS STORAGE DEVICE 17427 M00S11843.set +++| .A ELSE
| Line S11844 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17428 M01S11844.284l847 ---| BSS 7 DUMMY TABLE ENTRIES
| Line S00727 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17429 M01S00727.284l847 +++| BSS 10B DUMMY TABLE ENTRIES 17430 M00S11845.set +++| CON FMD FLAW LARGE MEMORY DEVICE 17431 M00S11846.set +++| .A ENDIF 17432 M00S11847.set +++| ENDM 17433 M00S11848.set +++| SPACE 4,10 17434 M00S11849.set +++|** ENTRY POINTS. 17435 M00S11850.set +++| 17436 M00S11851.set +++| 17437 M00S11852.set +++| CON TSYN-1 ADDRESS OF SYNTAX TABLE 17438 M00S11853.set +++| CON TSYNA ADDRESS OF END OF SYNTAX TABLE 17439 M00S11854.set +++| MSF SPACE 4,10 17440 M00S11855.set +++|** MSF - PROCESS MASS STORAGE FLAWS. 17441 M00S11856.set +++| 17442 M00S11857.set +++| 17443 M00S11858.set +++| MSF1 RJM PDF PROCESS DISK FLAWS 17444 M00S11859.set +++| RJM PTL PROCESS TRT LENGTHS 17445 M00S11860.set +++| MSF4 RJM CMC CHECK MACHINE CONFIGURATION 17446 M00S11861.set +++| RJM ECT DEFINE *EICB* TABLES. 17447 M00S11862.set +++| RJM BVS BUILD VARIABLE *SAB* TABLE 17448 M00S11863.set +++| LDD DP SET DISPLAY CONTROL FOR *IPRDECK* 17449 M00S11864.set +++| STD DS 17450 M00S11865.set +++| 17451 M00S11866.set +++| MSF SUBR ENTRY/EXIT 17452 M00S11867.set +++| AOD DI ADVANCE DECK INDEX 17453 M00S11868.set +++| LDD RS 17454 M00S11869.set +++| NJN MSF4 IF NOT A LEVEL 0 DEADSTART 17455 M00S11870.set +++|* LDN 0 17456 M00S11871.set +++| RJM RTD LOAD *APRINST* AND *APRD00* 17457 M00S11872.set +++| LMN 1 17458 M00S11873.set +++| ZJN MSF1 IF TEXT DECK EMPTY 17459 M00S11874.set +++| LDC MSFA 17460 M00S11875.set +++| JMP DSE DISPLAY MESSAGE AND HANG 17461 M00S11876.set +++| 17462 M00S11877.set +++| MSFA DATA C+*APRD00* MUST BE EMPTY.+
| Line S11878 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17463 M01S11878.284l847 ---| SMT SPACE 4,10 17464 M01S11879.284l847 ---|** SMT - SEARCH MASS STORAGE FLAW TABLE *TMSF*.
| Line S00728 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17465 M01S00728.284l847 +++| SMF SPACE 4,10 17466 M01S00729.284l847 +++|** SMF - SEARCH MASS STORAGE FLAW TABLE *TMSF*. 17467 M00S11880.set +++|* 17468 M00S11881.set +++|* ENTRY (A) = EQUIPMENT TYPE (DEVICE MNEMONIC). 17469 M00S11882.set +++|* 17470 M00S11883.set +++|* EXIT (A) = (T3) = ADDRESS OF ENTRY. 17471 M00S11884.set +++|* (A) = 0, IF ENTRY NOT FOUND. 17472 M00S11885.set +++|* 17473 M00S11886.set +++|* USES T0, T3. 17474 M00S11887.set +++| 17475 M00S11888.set +++|
| Line S11889 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17476 M01S11889.284l847 ---| SMT1 LDN TMSFL ADVANCE TABLE ADDRESS
| Line S00730 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17477 M01S00730.284l847 +++| SMF1 LDN TMSFL ADVANCE TABLE ADDRESS 17478 M00S11890.set +++| RAD T3
| Line S11891 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17479 M01S11891.284l847 ---| SMT2 LDI T3 CHECK ENTRY 17480 M01S11892.284l847 ---| ZJN SMTX IF END OF TABLE
| Line S00731 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17481 M01S00731.284l847 +++| SMF2 LDI T3 CHECK ENTRY 17482 M01S00732.284l847 +++| ZJN SMFX IF END OF TABLE 17483 M00S11893.set +++| LMD T0 COMPARE DEVICE TYPE
| Line S11894 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17484 M01S11894.284l847 ---| NJN SMT1 IF NO MATCH
| Line S00733 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17485 M01S00733.284l847 +++| NJN SMF1 IF NO MATCH 17486 M00S11895.set +++| LDD T3 EXIT WITH ADDRESS OF ENTRY 17487 M00S11896.set +++|
| Line S11897 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17488 M01S11897.284l847 ---| SMT SUBR ENTRY/EXIT
| Line S00734 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17489 M01S00734.284l847 +++| SMF SUBR ENTRY/EXIT 17490 M00S11898.set +++| STD T0 17491 M00S11899.set +++| LDC TMSF SET TABLE ADDRESS 17492 M00S11900.set +++| STD T3
| Line S11901 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17493 M01S11901.284l847 ---| UJN SMT2 ENTER LOOP
| Line S00735 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17494 M01S00735.284l847 +++| UJN SMF2 ENTER LOOP 17495 M00S11902.set +++| TMSF SPACE 4,10 17496 M00S11903.set +++|** TMSF - TABLE OF MASS STORAGE DEVICES. 17497 M00S11904.set +++|* 17498 M00S11905.set +++|* ENTRY = TMSFL WORDS. 17499 M00S11906.set +++| 17500 M00S11907.set +++|* THE ENTRIES IN *TMSF* ARE REFERENCED WITH THE FOLLOWING TAGS. 17501 M00S11908.set +++| 17502 M00S11909.set +++| 17503 M00S11910.set +++| TMSF BSS 0 17504 M00S11911.set +++| LOC 0 17505 M00S11912.set +++| 17506 M00S11913.set +++| BSS 1 DEVICE MNEMONIC 17507 M00S11914.set +++| CYUN BSS 1 CYLINDERS/UNIT 17508 M00S11915.set +++| TKCY BSS 1 PHYSICAL TRACKS/CYLINDER 17509 M00S11916.set +++| PSPT BSS 1 PHYSICAL SECTORS/PHYSICAL TRACK
| Line S11917 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17510 M01S11917.271l716 ---| LTCY BSS 1 LOGICAL TRACKS/CYLINDER 17511 M01S11918.271l716 ---| PSLT BSS 1 PHYSICAL SECTORS/LOGICAL TRACK 17512 M01S11919.271l716 ---| GSLT BSS 1 GAP SECTORS/LOGICAL TRACK 17513 M01S11920.271l716 ---| HTFT BSS 1 HALF TRACK FLAG
| Line S00296 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17514 M01S00296.271l716 +++| CVNF BSS 1 CONVERSION FACTOR
| Line S00297 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | set80 |
Seq # *Modification Id* Act ----------------------------+ 17515 M02S00297.set80 ---| LSCY BSS 1 LOGICAL SECTORS/CYLINDER
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | set80 |
Seq # *Modification Id* Act ----------------------------+ 17516 M01S00001.set80 +++| LSCY BSS 2 LOGICAL SECTORS/CYLINDER
| Line S00298 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17517 M01S00298.271l716 +++| LSPT BSS 1 LOGICAL SECTORS/PHYSICAL TRACK 17518 M01S00299.271l716 +++| LSLT BSS 1 LOGICAL SECTORS/LOGICAL TRACK 17519 M00S11921.set +++| PADR BSS 1 PROCESSOR ADDRESS 17520 M00S11922.set +++| 17521 M00S11923.set +++| TMSFL BSS 0 TABLE ENTRY LENGTH 17522 M00S11924.set +++| ORG TMSF 17523 M00S11925.set +++| 17524 M00S11926.set +++| LIST G 17525 M00S11927.set +++| TBL "MSEQ" 17526 M00S11928.set +++| LIST * 17527 M00S11929.set +++| PURGMAC TBLM 17528 M00S11930.set +++| 17529 M00S11931.set +++| CON 0 END OF TABLE 17530 M00S11932.set +++| TSYN SPACE 4,10 17531 M00S11933.set +++|** TSYN - SYNTAX TABLE. 17532 M00S11934.set +++| 17533 M00S11935.set +++| 17534 M00S11936.set +++| TSYN BSS 0 17535 M00S11937.set +++| CON SPF SET PHYSICAL DEVICE FLAW 17536 M00S11938.set +++| CON CPF CLEAR PHYSICAL DEVICE FLAW 17537 M00S11939.set +++| CON SLF SET LOGICAL TRACK FLAW 17538 M00S11940.set +++| CON CLF CLEAR LOGICAL TRACK FLAW 17539 M00S11941.set +++| CON CAF CLEAR ALL DEVICE FLAWS 17540 M00S11942.set +++| 17541 M00S11943.set +++| TSYNA CON 0 17542 M00S11944.set +++| CON NEXT 17543 M00S11945.set +++| CON IPR 17544 M00S11946.set +++| CON 0 END OF TABLE 17545 M00S11947.set +++| TITLE TRACK FLAWS. 17546 M00S11948.set +++| CAF SPACE 4,10 17547 M00S11949.set +++|*** CAF. 17548 M00S11950.set +++|* CLEAR ALL FLAWS PREVIOUSLY SET FOR THIS EQUIPMENT. 17549 M00S11951.set +++| 17550 M00S11952.set +++| 17551 M00S11953.set +++| CAF DATA C*CAF.* 17552 M00S11954.set +++| LDD T7 GET TRT LENGTH 17553 M00S11955.set +++| SHN 3 17554 M00S11956.set +++| ADK TDGL 17555 M00S11957.set +++| CRD CN 17556 M00S11958.set +++| ADN TRLL-TDGL 17557 M00S11959.set +++| CRD CM 17558 M00S11960.set +++| LDD CM+4 SET TRT ADDRESS 17559 M00S11961.set +++| STD CA+1 17560 M00S11962.set +++| LDD CM+3 17561 M00S11963.set +++| LPN 77 17562 M00S11964.set +++| STD CA 17563 M00S11965.set +++| LDD CN+2 CLEAR TRT 17564 M00S11966.set +++| RJM CLS 17565 M00S11967.set +++| LDD CN RESET TRACK COUNT 17566 M00S11968.set +++| STD CN+4 17567 M00S11969.set +++| LDD T7 17568 M00S11970.set +++| SHN 3 17569 M00S11971.set +++| ADK TDGL 17570 M00S11972.set +++| CWD CN 17571 M00S11973.set +++| JMP KBR RETURN 17572 M00S11974.set +++| CLF SPACE 4,10 17573 M00S11975.set +++|*** CLF=XXXX. 17574 M00S11976.set +++|* CLEAR FLAW ON LOGICAL TRACK XXXX. 17575 M00S11977.set +++| 17576 M00S11978.set +++| 17577 M00S11979.set +++| CLF DATA C*CLF=* 17578 M00S11980.set +++| LDN 1 PRESET TO CLEAR FLAW 17579 M00S11981.set +++| UJN SLF1 ENTER PROCESSING 17580 M00S11982.set +++| SLF SPACE 4,10 17581 M00S11983.set +++|*** SLF=XXXX. 17582 M00S11984.set +++|* SET FLAW ON LOGICAL TRACK XXXX. 17583 M00S11985.set +++| 17584 M00S11986.set +++| 17585 M00S11987.set +++| SLF DATA C*SLF=* 17586 M00S11988.set +++| LDN 0 PRESET TO SET FLAW 17587 M00S11989.set +++| SLF1 STD T4 SET *PTF* OPTION 17588 M00S11990.set +++| RJM ASD ASSEMBLE DIGITS 17589 M00S11991.set +++| RJM PTF PROCESS TRACK FLAW 17590 M00S11992.set +++| JMP KBR KEYBOARD RETURN 17591 M00S11993.set +++| CPF SPACE 4,10 17592 M00S11994.set +++|*** CPF=CAAAA,TBB,SCC. 17593 M00S11995.set +++|* CLEAR FLAW ON CYLINDER AAAA, TRACK BB, AND SECTOR CC. 17594 M00S11996.set +++|* 17595 M00S11997.set +++|* CPF=AIIIIIII. 17596 M00S11998.set +++|* CLEAR FLAW ON EXTENDED MEMORY BLOCK STARTING AT 17597 M00S11999.set +++|* ADDRESS IIIIIII. 17598 M00S12000.set +++|* 17599 M00S12001.set +++|* CPF=AIIIIIII-AJJJJJJJ. 17600 M00S12002.set +++|* CLEAR FLAW ON EXTENDED MEMORY BLOCK FROM ADDRESS IIIIIII 17601 M00S12003.set +++|* THROUGH ADDRESS JJJJJJJ. 17602 M00S12004.set +++| 17603 M00S12005.set +++| 17604 M00S12006.set +++| CPF DATA C*CPF=* 17605 M00S12007.set +++| LDN 1 17606 M00S12008.set +++| UJN SPF1 CLEAR LOGICAL TRACK FLAW 17607 M00S12009.set +++| SPF SPACE 4,10 17608 M00S12010.set +++|*** SPF=CAAAA,TBB,SCC. 17609 M00S12011.set +++|* SET FLAW ON CYLINDER AAAA, TRACK BB, AND SECTOR CC. 17610 M00S12012.set +++|* 17611 M00S12013.set +++|* SPF=AIIIIIIII. 17612 M00S12014.set +++|* SET FLAW ON EXTENDED MEMORY BLOCK STARTING AT 17613 M00S12015.set +++|* ADDRESS IIIIIIII. 17614 M00S12016.set +++|* 17615 M00S12017.set +++|* SPF=AIIIIIIII-AJJJJJJJJ. 17616 M00S12018.set +++|* SET FLAW ON EXTENDED MEMORY BLOCK FROM ADDRESS IIIIIIII 17617 M00S12019.set +++|* THROUGH ADDRESS JJJJJJJJ. 17618 M00S12020.set +++| 17619 M00S12021.set +++| 17620 M00S12022.set +++| SPF DATA C*SPF=* 17621 M00S12023.set +++| LDN 0 PRESET FOR TRACK FLAWING 17622 M00S12024.set +++| SPF1 STD T4 17623 M00S12025.set +++| LDC ** SEARCH FOR ENTRY IN *TMSF* 17624 M00S12026.set +++| SPFA EQU *-1
| Line S12027 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17625 M01S12027.284l847 ---| RJM SMT SEARCH MASS STORAGE FLAW PROCESSOR TABLE
| Line S00736 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17626 M01S00736.284l847 +++| RJM SMF SEARCH MASS STORAGE FLAW PROCESSOR TABLE 17627 M00S12028.set +++| NJN SPF2 IF ENTRY FOUND 17628 M00S12029.set +++| JMP ILL PROCESS INCORRECT ENTRY 17629 M00S12030.set +++| 17630 M00S12031.set +++| SPF2 LDM PADR,T3 PROCESS ENTRY 17631 M00S12032.set +++| STD T2 17632 M00S12033.set +++| LJM 0,T2 ENTER PROCESSOR 17633 M00S12034.set +++| FMD SPACE 4,10 17634 M00S12035.set +++|** FMD - SET/CLEAR FLAW ON LARGE MEMORY DEVICE. 17635 M00S12036.set +++| 17636 M00S12037.set +++| 17637 M00S12038.set +++| FMD LDI KA CHECK CHARACTER 17638 M00S12039.set +++| LMN 1RA 17639 M00S12040.set +++| NJN FMD2 IF NOT *A* 17640 M00S12041.set +++| AOD KA ASSEMBLE ADDRESS 17641 M00S12042.set +++| RJM CDR 17642 M00S12043.set +++| RJM CET CONVERT ADDRESS TO TRACK 17643 M00S12044.set +++| STD T5 SET FIRST TRACK 17644 M00S12045.set +++| LDI KA CHECK SEPARATOR 17645 M00S12046.set +++| LMN 1R. 17646 M00S12047.set +++| ZJN FMD1 IF PERIOD TERMINATOR (NO RANGE) 17647 M00S12048.set +++| LMN 1R-&1R. 17648 M00S12049.set +++| NJN FMD2 IF INCORRECT SEPARATOR 17649 M00S12050.set +++| AOD KA 17650 M00S12051.set +++| LDI KA 17651 M00S12052.set +++| LMN 1RA 17652 M00S12053.set +++| NJN FMD2 IF NOT AN *A* 17653 M00S12054.set +++| AOD KA 17654 M00S12055.set +++| RJM ASD ASSEMBLE SECOND ADDRESS 17655 M00S12056.set +++| RJM CET CONVERT EXTENDED MEMORY ADDRESS TO TRACK 17656 M00S12057.set +++| FMD1 LDD T5 17657 M00S12058.set +++| STD AB+4 SET FIRST TRACK TO FLAW 17658 M00S12059.set +++| SBD T3 17659 M00S12060.set +++| ZJN FMD3 IF ONE TRACK (FIRST = LAST) 17660 M00S12061.set +++| MJN FMD3 IF FIRST .LE. LAST TRACK 17661 M00S12062.set +++| FMD2 JMP ILL PROCESS INCORRECT ENTRY 17662 M00S12063.set +++| 17663 M00S12064.set +++| FMD3 LDM /EQP/EBUT+7 17664 M00S12065.set +++| LPC 300 17665 M00S12066.set +++| NJN FMD4 IF NOT DEFAULT TRACK SIZE 17666 M00S12067.set +++| LDD AB+4 17667 M00S12068.set +++| LMN CETK-4000B 17668 M00S12069.set +++| ZJN FMD2 IF *CETK* 17669 M00S12070.set +++| FMD4 RJM PTF PROCESS TRACK FLAW 17670 M00S12071.set +++| AOD AB+4 17671 M00S12072.set +++| SBD T3 17672 M00S12073.set +++| MJN FMD3 IF MORE TRACKS TO FLAW 17673 M00S12074.set +++| ZJN FMD3 IF MORE TRACKS TO FLAW 17674 M00S12075.set +++| JMP KBR RETURN 17675 M00S12076.set +++| FRD SPACE 4,10 17676 M00S12077.set +++|** FRD - SET/CLEAR FLAW ON ROTATING MASS STORAGE DEVICE. 17677 M00S12078.set +++|* 17678 M00S12079.set +++|* *FRD* CONVERTS A PHYSICAL DISK ADDRESS INTO A LOGICAL TRACK
| Line S12080 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17679 M01S12080.271l716 ---|* ADDRESS AND THEN FLAWS OR CLEARS THE FLAW ON THAT LOGICAL 17680 M01S12081.271l716 ---|* TRACK. IF THE USER SPECIFIES A GAP SECTOR, NO ACTION IS 17681 M01S12082.271l716 ---|* TAKEN SINCE THE SECTOR IS NOT AVAILABLE TO THE SYSTEM ANYWAY.
| Line S00300 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17682 M01S00300.271l716 +++|* NUMBER AND THEN SETS OR CLEARS THE FLAW ON THAT TRACK. 17683 M00S12083.set +++|* 17684 M00S12084.set +++|* ENTRY (T3) = ADDRESS OF DEVICE DESCRIPTOR ENTRIES. 17685 M00S12085.set +++|* (T4) = 0, IF A FLAW IS TO BE SET. 17686 M00S12086.set +++|* 1, IF A FLAW IS TO BE CLEARED. 17687 M00S12087.set +++| 17688 M00S12088.set +++|
| Line S12089 Modification History | |
|---|---|
M01 (Removed by) | ns2775 |
Seq # *Modification Id* Act ----------------------------+ 17689 M01S12089.ns2775 ---| FRD LDC 1LC CHECK FOR VALID CYLINDER ADDRESS 17690 M01S12090.ns2775 ---| LMM CYUN,T3
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2775 |
Seq # *Modification Id* Act ----------------------------+ 17691 M01S00001.ns2775 +++| FRD5 JMP ILL PROCESS INCORRECT ENTRY 17692 M01S00002.ns2775 +++| 17693 M01S00003.ns2775 +++| FRD LDM /EQP/TDDB+DVCO BASE CYLINDER FOR PARTITION 17694 M01S00004.ns2775 +++| ADM CYUN,T3 CHECK FOR VALID CYLINDER ADDRESS 17695 M01S00005.ns2775 +++| SBN 1 17696 M01S00006.ns2775 +++| LMC 1LC 17697 M00S12091.set +++| RJM CTE
| Line S12092 Modification History | |
|---|---|
M01 (Removed by) | ns2775 |
Seq # *Modification Id* Act ----------------------------+ 17698 M01S12092.ns2775 ---| STD CM SAVE CYLINDER
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2775 |
Seq # *Modification Id* Act ----------------------------+ 17699 M01S00007.ns2775 +++| SBM /EQP/TDDB+DVCO BASE CYLINDER FOR PARTITION 17700 M01S00008.ns2775 +++| MJN FRD5 IF CYLINDER NOT IN THIS PARTITION 17701 M01S00009.ns2775 +++| STD CM SAVE RELATIVE CYLINDER
| Line S12093 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17702 M01S12093.271l716 ---| LDC 1LT CHECK FOR A VALID TRACK ADDRESS 17703 M01S12094.271l716 ---| LMM TKCY,T3
| Line S00301 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17704 M01S00301.271l716 +++| LDM CVNF,T3 17705 M01S00302.271l716 +++| ERRNZ SHNI-1000 CODE DEPENDS ON VALUE 17706 M01S00303.271l716 +++| LMD TH 17707 M01S00304.271l716 +++| STM FRDA SET PHYSICAL SECTOR CONVERSION 17708 M01S00305.271l716 +++| LDC 1LT 17709 M01S00306.271l716 +++| LMM TKCY,T3 CHECK FOR VALID TRACK ADDRESS 17710 M00S12095.set +++| RJM CTE 17711 M00S12096.set +++| STD CM+1 SAVE TRACK 17712 M00S12097.set +++| LDM PSPT,T3 17713 M00S12098.set +++| LMC 1LS CHECK FOR A VALID SECTOR ADDRESS 17714 M00S12099.set +++| RJM CTE
| Line S12100 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17715 M01S12100.271l716 ---| STD T0 SAVE SECTOR 17716 M01S12101.271l716 ---| 17717 M01S12102.271l716 ---| 17718 M01S12103.271l716 ---|* MULTIPLY THE CYLINDER VALUE BY THE NUMBER OF LOGICAL TRACKS 17719 M01S12104.271l716 ---|* PER CYLINDER. 17720 M01S12105.271l716 ---| 17721 M01S12106.271l716 ---| LDN 0 INITIALIZE LOGICAL TRACK 17722 M01S12107.271l716 ---| STD AB+4 17723 M01S12108.271l716 ---| FRD4 SOD CM 17724 M01S12109.271l716 ---| MJN FRD5 IF END OF CONVERSION 17725 M01S12110.271l716 ---| LDM LTCY,T3 17726 M01S12111.271l716 ---| RAD AB+4 17727 M01S12112.271l716 ---| UJN FRD4 LOOP ON CONVERSION 17728 M01S12113.271l716 ---| 17729 M01S12114.271l716 ---|* COMPUTE THE RELATIVE SECTOR OFFSET OF THE SPECIFIED SECTOR 17730 M01S12115.271l716 ---|* FROM THE BEGINNING OF THE CYLINDER. 17731 M01S12116.271l716 ---| 17732 M01S12117.271l716 ---| FRD5 SOD CM+1 17733 M01S12118.271l716 ---| MJN FRD6 IF END OF CONVERSION 17734 M01S12119.271l716 ---| LDM PSPT,T3 17735 M01S12120.271l716 ---| RAD T0 17736 M01S12121.271l716 ---| UJN FRD5 LOOP ON CONVERSION 17737 M01S12122.271l716 ---| 17738 M01S12123.271l716 ---| FRD6 LDM HTFT,T3 17739 M01S12124.271l716 ---| ZJN FRD9 IF A FULL TRACK DEVICE 17740 M01S12125.271l716 ---| 17741 M01S12126.271l716 ---|* FOR HALF TRACK DEVICES, DETERMINE WHICH LOGICAL TRACK IN THE 17742 M01S12127.271l716 ---|* CYLINDER CONTAINS THE SPECIFIED ADDRESS AND ADD THE LOGICAL 17743 M01S12128.271l716 ---|* TRACK OFFSET TO THE LOGICAL TRACK TOTAL VALUE. FOR ALL HALF 17744 M01S12129.271l716 ---|* TRACK DEVICES EXCEPT *DI*, THE BOTTOM BIT OF THE RELATIVE 17745 M01S12130.271l716 ---|* SECTOR OFFSET IS THE LOGICAL TRACK OFFSET. 17746 M01S12131.271l716 ---| 17747 M01S12132.271l716 ---| LDM SPFA 17748 M01S12133.271l716 ---| LMC 2RDI 17749 M01S12134.271l716 ---| STD T5 17750 M01S12135.271l716 ---| NJN FRD7 IF NOT A *DI* DEVICE 17751 M01S12136.271l716 ---| LDD T0 MULTIPLY BOTTOM BIT BY TWO 17752 M01S12137.271l716 ---| LPN 1 17753 M01S12138.271l716 ---| SHN 1 17754 M01S12139.271l716 ---| UJN FRD8 ADD TO LOGICAL TRACK TOTAL 17755 M01S12140.271l716 ---| 17756 M01S12141.271l716 ---| FRD7 LDD T0 THE BOTTOM BIT IS THE LOGICAL TRACK OFFSET 17757 M01S12142.271l716 ---| LPN 1 17758 M01S12143.271l716 ---| FRD8 RAD AB+4 17759 M01S12144.271l716 ---| 17760 M01S12145.271l716 ---|* FOR FULL TRACK DEVICES, THE LOGICAL TRACK OFFSET IN THE 17761 M01S12146.271l716 ---|* CYLINDER IS DETERMINED BY DIVIDING BY THE NUMBER OF SECTORS 17762 M01S12147.271l716 ---|* PER LOGICAL TRACK, INCLUDING ANY GAP SECTORS. 17763 M01S12148.271l716 ---| 17764 M01S12149.271l716 ---| FRD9 LDN 0 17765 M01S12150.271l716 ---| SBM PSLT,T3 17766 M01S12151.271l716 ---| RAD T0 17767 M01S12152.271l716 ---| MJN FRD11 IF IN PREVIOUS LOGICAL TRACK 17768 M01S12153.271l716 ---| LDD T5 17769 M01S12154.271l716 ---| ZJN FRD10 IF *DI* (TREAT LIKE A FULL TRACK DEVICE) 17770 M01S12155.271l716 ---| LDM HTFT,T3 17771 M01S12156.271l716 ---| NJN FRD9 IF A HALF TRACK DEVICE 17772 M01S12157.271l716 ---| FRD10 AOD AB+4 17773 M01S12158.271l716 ---| UJN FRD9 CHECK NEXT LOGICAL TRACK 17774 M01S12159.271l716 ---| 17775 M01S12160.271l716 ---|* DETERMINE WHETHER OR NOT THE USER GAVE THE PHYSICAL ADDRESS 17776 M01S12161.271l716 ---|* OF A GAP SECTOR. IF SO, AVOID SETTING OR CLEARING THE FLAW. 17777 M01S12162.271l716 ---| 17778 M01S12163.271l716 ---| FRD11 ADM GSLT,T3 17779 M01S12164.271l716 ---| PJN FRD12 IF GAP SECTOR
| Line S00307 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17780 M01S00307.271l716 +++| FRDA SHN 0 CONVERT PHYSICAL TO LOGICAL SECTOR 17781 M01S00308.271l716 +++| STD AB+1 17782 M01S00309.271l716 +++| SHN -14 17783 M01S00310.271l716 +++| STD AB 17784 M01S00311.271l716 +++| LCN 0 INITIALIZE LOGICAL TRACK CALCULATION 17785 M01S00312.271l716 +++| STD AB+4 17786 M01S00313.271l716 +++| 17787 M01S00314.271l716 +++|* MULTIPLY THE TRACK VALUE BY THE NUMBER OF LOGICAL 17788 M01S00315.271l716 +++|* SECTORS PER PHYSICAL TRACK. 17789 M01S00316.271l716 +++| 17790 M01S00317.271l716 +++| FRD1 SOD CM+1 17791 M01S00318.271l716 +++| MJN FRD3 IF END OF CONVERSION 17792 M01S00319.271l716 +++| LDM LSPT,T3 17793 M01S00320.271l716 +++| RAD AB+1 ADVANCE LOGICAL SECTOR COUNT 17794 M01S00321.271l716 +++| SHN -14 17795 M01S00322.271l716 +++| RAD AB 17796 M01S00323.271l716 +++| UJN FRD1 LOOP ON CONVERSION 17797 M01S00324.271l716 +++| 17798 M01S00325.271l716 +++|* MULTIPLY THE CYLINDER VALUE BY THE NUMBER OF LOGICAL 17799 M01S00326.271l716 +++|* SECTORS PER CYLINDER. 17800 M01S00327.271l716 +++|
| Line S00328 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17801 M02S00328.284l847 ---| FRD2 LDM LSCY,T3 ADVANCE LOGICAL SECTOR COUNT
| Line S00737 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17802 M01S00737.284l847 +++| FRD2 LDM LSCY+1,T3 ADVANCE LOGICAL SECTOR COUNT
| Line S00329 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17803 M01S00329.271l716 +++| RAD AB+1 17804 M01S00330.271l716 +++| SHN -14
| Line S00738 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 17805 M01S00738.284l847 +++| ADM LSCY,T3
| Line S00331 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17806 M01S00331.271l716 +++| RAD AB 17807 M01S00332.271l716 +++| FRD3 SOD CM 17808 M01S00333.271l716 +++| PJN FRD2 IF NOT END OF CONVERSION 17809 M01S00334.271l716 +++| 17810 M01S00335.271l716 +++|* DIVIDE THE ACCUMULATED LOGICAL SECTOR COUNT BY THE 17811 M01S00336.271l716 +++|* SUM OF (LOGICAL + GAP) SECTORS PER LOGICAL TRACK. 17812 M01S00337.271l716 +++| 17813 M01S00338.271l716 +++| FRD4 AOD AB+4 ADVANCE LOGICAL TRACK NUMBER 17814 M01S00339.271l716 +++| LDN 0 17815 M01S00340.271l716 +++| SBM LSLT,T3 DIVIDE BY ITERATIVE SUBTRACTION 17816 M01S00341.271l716 +++| RAD AB+1 17817 M01S00342.271l716 +++| PJN FRD4 IF NO UNDERFLOW 17818 M01S00343.271l716 +++| AOD AB+1 17819 M01S00344.271l716 +++| SOD AB 17820 M01S00345.271l716 +++| PJN FRD4 IF DIVISION INCOMPLETE 17821 M00S12165.set +++| RJM PTF PROCESS TRACK FLAW 17822 M00S12166.set +++| JMP KBR RETURN
| Line S12167 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 17823 M01S12167.271l716 ---| 17824 M01S12168.271l716 ---| FRD12 JMP ILL PROCESS INCORRECT ENTRY 17825 M00S12169.set +++| CTE SPACE 4,10 17826 M00S12170.set +++|** CTE - CHECK TRACK ENTRY. 17827 M00S12171.set +++|* 17828 M00S12172.set +++|* ENTRY (A) 12 - 17 = CHARACTER OF NEXT ENTRY. 17829 M00S12173.set +++|* (A) 0 - 11 = LIMIT FOR NUMBER. 17830 M00S12174.set +++|* (KA) = NEXT CHARACTER ADDRESS. 17831 M00S12175.set +++|* 17832 M00S12176.set +++|* CALLS AOD. 17833 M00S12177.set +++| 17834 M00S12178.set +++| 17835 M00S12179.set +++| CTE2 AOD KA SKIP PREFIX CHARACTER 17836 M00S12180.set +++| RJM AOD 17837 M00S12181.set +++| LDI KA CHECK SEPARATOR 17838 M00S12182.set +++| LMN 1R. 17839 M00S12183.set +++| ZJN CTE3 IF END OF ENTRY 17840 M00S12184.set +++| AOD KA 17841 M00S12185.set +++| CTE3 LDC * CHECK ASSEMBLY 17842 M00S12186.set +++| CTEA EQU *-1 17843 M00S12187.set +++| SBD AB+4 17844 M00S12188.set +++| MJN CTE1 IF OUT OF RANGE 17845 M00S12189.set +++| LDD AB+4 RETURN WITH ASSEMBLY 17846 M00S12190.set +++| 17847 M00S12191.set +++| CTE SUBR ENTRY/EXIT 17848 M00S12192.set +++| SBN 1 SET LIMIT 17849 M00S12193.set +++| STM CTEA 17850 M00S12194.set +++| SHN -14 CHECK NEXT CHARACTER 17851 M00S12195.set +++| LMI KA 17852 M00S12196.set +++| ZJN CTE2 IF PROPER CHARACTER 17853 M00S12197.set +++| CTE1 JMP ILL PROCESS INCORRECT ENTRY 17854 M00S12198.set +++| AJT SPACE 4,10 17855 M00S12199.set +++|** AJT - ADJUST TRT FOR UNUSED TRACKS. 17856 M00S12200.set +++|* 17857 M00S12201.set +++|* ENTRY (T7) = MST ADDRESS / 10B. 17858 M00S12202.set +++|* (T4) = 0 (SET FLAW REQUEST FOR *PTF*). 17859 M00S12203.set +++|* 17860 M00S12204.set +++|* USES AB+4, CN - CN+4. 17861 M00S12205.set +++|* 17862 M00S12206.set +++|* CALLS PTF. 17863 M00S12207.set +++| 17864 M00S12208.set +++| 17865 M00S12209.set +++| AJT SUBR ENTRY/EXIT 17866 M00S12210.set +++| LDD T7 READ *TDGL* 17867 M00S12211.set +++| SHN 3 17868 M00S12212.set +++| ADK TDGL 17869 M00S12213.set +++| CRD CN 17870 M00S12214.set +++| LDD CN SET LAST TRACK 17871 M00S12215.set +++| STD AB+4 17872 M00S12216.set +++| AJT1 LPN 3 17873 M00S12217.set +++| ZJN AJTX IF END OF TRT 17874 M00S12218.set +++| RJM PTF PROCESS TRACK FLAW 17875 M00S12219.set +++| AOD CN+4 RESET TRACK COUNT 17876 M00S12220.set +++| LDD T7 RESTORE *TDGL* 17877 M00S12221.set +++| SHN 3 17878 M00S12222.set +++| ADK TDGL 17879 M00S12223.set +++| CWD CN 17880 M00S12224.set +++| AOD AB+4 ADVANCE TRACK 17881 M00S12225.set +++| UJN AJT1 LOOP FOR NEXT TRACK 17882 M00S12226.set +++| CET SPACE 4,10 17883 M00S12227.set +++|** CET - CONVERT EXTENDED MEMORY ADDRESS TO TRACK NUMBER. 17884 M00S12228.set +++|* 17885 M00S12229.set +++|* ENTRY (AB+3 - AB+4) = EXTENDED MEMORY ADDRESS. 17886 M00S12230.set +++|* 17887 M00S12231.set +++|* EXIT (A) = (T3) = TRACK NUMBER. 17888 M00S12232.set +++|* 17889 M00S12233.set +++|* USES T1 - T3. 17890 M00S12234.set +++| 17891 M00S12235.set +++| 17892 M00S12236.set +++| CET2 JMP ILL ADDRESS TOO LARGE 17893 M00S12237.set +++| 17894 M00S12238.set +++| CET SUBR 17895 M00S12239.set +++| LDD AB+4 17896 M00S12240.set +++| CETA SHN -3 17897 M00S12241.set +++|* SHN -3-EMSC (EMSC = EXTENDED MEMORY SHIFT COUNT) 17898 M00S12242.set +++| STD T2 17899 M00S12243.set +++| LDD AB+3 CHECK ASSEMBLY 17900 M00S12244.set +++| CETB SHN -11 17901 M00S12245.set +++|* SHN -11-EMSC (EMSC = EXTENDED MEMORY SHIFT COUNT) 17902 M00S12246.set +++| NJN CET2 IF OUT OF RANGE 17903 M00S12247.set +++| LDD AB+3 17904 M00S12248.set +++| CETC SHN 17 17905 M00S12249.set +++|* SHN 17-EMSC (EMSC = EXTENDED MEMORY SHIFT COUNT) 17906 M00S12250.set +++| STD T1 17907 M00S12251.set +++| SHN -6 17908 M00S12252.set +++| RAD T2 17909 M00S12253.set +++| LCN 0 CLEAR TRACK 17910 M00S12254.set +++| STD T3 17911 M00S12255.set +++| CET1 AOD T3 17912 M00S12256.set +++| LDC -202 17913 M00S12257.set +++| RAD T2 17914 M00S12258.set +++| PJN CET1 IF TRACK NOT FOUND 17915 M00S12259.set +++| AOD T2 17916 M00S12260.set +++| SOD T1 17917 M00S12261.set +++| PJN CET1 IF TRACK NOT FOUND 17918 M00S12262.set +++| LDD T3 17919 M00S12263.set +++| UJN CETX RETURN 17920 M00S12264.set +++| PDF SPACE 4,10 17921 M00S12265.set +++|** PDF - PROCESS DISK FLAWS. 17922 M00S12266.set +++|* 17923 M00S12267.set +++|* USES EQ, T5, T7, CM - CM+4, CN - CN+4. 17924 M00S12268.set +++|* 17925 M00S12269.set +++|* CALLS ATD, IBF, RTD, SME, /EQP/STA. 17926 M00S12270.set +++| 17927 M00S12271.set +++| 17928 M00S12272.set +++| PDF9 LDC 0 17929 M00S12273.set +++| PDFD EQU *-1 17930 M00S12274.set +++| ZJN PDFX IF NO MORE FLAW DECKS TO PROCESS 17931 M00S12275.set +++| STM TTXC+APRD 17932 M00S12276.set +++| RJM RTD LOAD NEXT DECK 17933 M00S12277.set +++| LDN 0 17934 M00S12278.set +++| STM PDFD 17935 M00S12279.set +++| UJN PDF1 FIND EQUIPMENT ENTRY TO MATCH APRDECK 17936 M00S12280.set +++| 17937 M00S12281.set +++| PDF SUBR ENTRY/EXIT 17938 M00S12282.set +++| PDF1 LDN NOPE-1 INITIALIZE EQUIPMENT SEARCH 17939 M00S12283.set +++| STD EQ 17940 M00S12284.set +++| PDF2 RJM SME 17941 M00S12285.set +++| ZJN PDF9 IF EST SCAN COMPLETE
| Line S12286 Modification History | |
|---|---|
M01 (Removed by) | set73 |
Seq # *Modification Id* Act ----------------------------+ 17942 M01S12286.set73 ---| SHN 13-10 17943 M01S12287.set73 ---| MJN PDF2 IF REMOVABLE DEVICE 17944 M00S12288.set +++| LDD AB+4 17945 M00S12289.set +++| STD T7 17946 M00S12290.set +++| SHN 3 17947 M00S12291.set +++| ADN STLL 17948 M00S12292.set +++| CRD CM 17949 M00S12293.set +++| LDD CM CHECK FOR INITIALIZE SET 17950 M00S12294.set +++| LPC MLIAL 17951 M00S12295.set +++| ZJN PDF2 IF NOT INITIALIZED 17952 M00S12296.set +++| 17953 M00S12297.set +++|* PROCESS EXTENDED MEMORY. 17954 M00S12298.set +++| 17955 M00S12299.set +++| LDD AB+3 17956 M00S12300.set +++| LMC 2RDE 17957 M00S12301.set +++| ZJN PDF3 IF EXTENDED MEMORY 17958 M00S12302.set +++| LMK 2RDP&2RDE 17959 M00S12303.set +++| NJP PDF5 IF NOT EXTENDED MEMORY 17960 M00S12304.set +++| PDF3 LDD AB+2 17961 M00S12305.set +++| SHN -6 17962 M00S12306.set +++| LPN 3 17963 M00S12307.set +++| STD T0 17964 M00S12308.set +++| LDC SHNI+77-3 17965 M00S12309.set +++| SBD T0 17966 M00S12310.set +++| STM CETA PRESET EXTENDED MEMORY SHIFTS 17967 M00S12311.set +++| SBN 6 17968 M00S12312.set +++| STM CETB 17969 M00S12313.set +++| ADK 11+17-77 17970 M00S12314.set +++| STM CETC 17971 M00S12315.set +++| LDD T0 17972 M00S12316.set +++| NJN PDF4 IF NOT DEFAULT TRACK SIZE 17973 M00S12317.set +++| LDC CETK SET *CETK* TRACK FLAW 17974 M00S12318.set +++| STD AB+4 17975 M00S12319.set +++| LDN 0 PROCESS TRACK FLAW 17976 M00S12320.set +++| STD T4 17977 M00S12321.set +++| RJM PTF 17978 M00S12322.set +++| PDF4 LDK BIOL CHECK IF BUFFERED I/O PRESENT 17979 M00S12323.set +++| CRD CM 17980 M00S12324.set +++| LDD CM+1 17981 M00S12325.set +++| ADD CM+2 17982 M00S12326.set +++| ZJN PDF5 IF NO BUFFERED I/O DEFINED 17983 M00S12327.set +++| LDD T7 17984 M00S12328.set +++| SHN 3 17985 M00S12329.set +++| ADN DILL 17986 M00S12330.set +++| CRD CN 17987 M00S12331.set +++| LDD CN+3 CHECK FOR LCME 17988 M00S12332.set +++| LPN 70 17989 M00S12333.set +++| LMN 20 17990 M00S12334.set +++| NJN PDF5 IF NOT LCME 17991 M00S12335.set +++| LDC LCTK RESERVE 176/BUFFERED I/O TRACK 17992 M00S12336.set +++| STD AB+4 17993 M00S12337.set +++| RJM PTF PROCESS TRACK FLAW 17994 M00S12338.set +++| PDF5 LDD EQ 17995 M00S12339.set +++| RJM /EQP/STA FETCH DEVICE PARAMETERS 17996 M00S12340.set +++| LDM /EQP/TDDB+DVAP 17997 M00S12341.set +++| STD CN+4 SAVE APRDECK NUMBER 17998 M00S12342.set +++| SBM TTXC+APRD 17999 M00S12343.set +++| NJN PDF6 IF NOT APRDECK MATCH 18000 M00S12344.set +++| LDD EQ 18001 M00S12345.set +++| STD T5 18002 M00S12346.set +++| LDN RPSF RESET SECOND BUFFER 18003 M00S12347.set +++| RJM IBF 18004 M00S12348.set +++| LDD AB+3 SAVE EQUIPMENT MNEMONIC 18005 M00S12349.set +++| STM SPFA 18006 M00S12350.set +++| RJM ATD ASSEMBLE TEXT 18007 M00S12351.set +++| UJN PDF8 CHECK NEXT ORDINAL 18008 M00S12352.set +++| 18009 M00S12353.set +++| PDF6 MJN PDF8 IF SMALLER APRDECK NUMBER 18010 M00S12354.set +++| LDM PDFD 18011 M00S12355.set +++| ZJN PDF7 IF FIRST DECK ON THIS EST PASS 18012 M00S12356.set +++| LDD CN+4 FIND NEXT LARGEST APRDECK 18013 M00S12357.set +++| SBM PDFD 18014 M00S12358.set +++| PJN PDF8 IF NOT A SMALLER APRDECK NUMBER 18015 M00S12359.set +++| PDF7 LDD CN+4 SET NEXT DECK NUMBER 18016 M00S12360.set +++| STM PDFD 18017 M00S12361.set +++| PDF8 LJM PDF2 CHECK NEXT ORDINAL 18018 M00S12362.set +++| PTF SPACE 4,10 18019 M00S12363.set +++|** PTF - PROCESS TRACK FLAW. 18020 M00S12364.set +++|* 18021 M00S12365.set +++|* ENTRY (T4) = 0, IF SET FLAW REQUEST. 18022 M00S12366.set +++|* 1, IF CLEAR FLAW REQUEST. 18023 M00S12367.set +++|* (T7) = MST ADDRESS / 10B. 18024 M00S12368.set +++|* (AB+4) = TRACK NUMBER. 18025 M00S12369.set +++|* 18026 M00S12370.set +++|* EXIT (CA - CA+1) = TRT ADDRESS. 18027 M00S12371.set +++|* 18028 M00S12372.set +++|* USES T1 - T2, CM - CM+4, CN - CN+4. 18029 M00S12373.set +++| 18030 M00S12374.set +++| 18031 M00S12375.set +++| PTF SUBR ENTRY/EXIT 18032 M00S12376.set +++| LDD AB+4 UNPACK TRACK 18033 M00S12377.set +++| LPC 3777 18034 M00S12378.set +++| SHN 21-1 SET WORD INDEX 18035 M00S12379.set +++| STD T1 18036 M00S12380.set +++| SHN 1-21 SET BYTE INDEX 18037 M00S12381.set +++| ADN CM 18038 M00S12382.set +++| STD T2 18039 M00S12383.set +++| LMC SHNI+77-CM FORM SHIFT INSTRUCTION 18040 M00S12384.set +++| STM PTFA 18041 M00S12385.set +++| STM PTFB 18042 M00S12386.set +++| LDD T7 READ MST TRACK COUNT 18043 M00S12387.set +++| SHN 3 18044 M00S12388.set +++| ADK TDGL 18045 M00S12389.set +++| CRD CN 18046 M00S12390.set +++| ADN TRLL-TDGL 18047 M00S12391.set +++| CRD CM 18048 M00S12392.set +++| LDD CM+3 SET TRT ADDRESS 18049 M00S12393.set +++| LPN 77 18050 M00S12394.set +++| STD CA 18051 M00S12395.set +++| SHN 14 READ TRT WORD 18052 M00S12396.set +++| LMD CM+4 18053 M00S12397.set +++| STD CA+1 18054 M00S12398.set +++| ADD T1 18055 M00S12399.set +++| CRD CM 18056 M00S12400.set +++| LDD CN+2 CHECK TRACK 18057 M00S12401.set +++| SHN 2 18058 M00S12402.set +++| SBD T1 18059 M00S12403.set +++| SBN 1 18060 M00S12404.set +++| PJN PTF1 IF TRACK WITHIN TRT 18061 M00S12405.set +++| JMP ILL PROCESS INCORRECT ENTRY 18062 M00S12406.set +++| 18063 M00S12407.set +++| PTF1 LDD T4 18064 M00S12408.set +++| ZJN PTF4 IF SET FLAW OPTION 18065 M00S12409.set +++| LDI T2 18066 M00S12410.set +++| ZJN PTF3 IF TRACK NOT RESERVED 18067 M00S12411.set +++| AOD CN+4 INCREMENT AVAILABLE TRACK COUNT 18068 M00S12412.set +++| LDN 10 RESERVE TRACK 18069 M00S12413.set +++| PTFA SHN -** 18070 M00S12414.set +++| LMD CM+4 CLEAR RESERVATION 18071 M00S12415.set +++| STD CM+4 18072 M00S12416.set +++| LDN 0 CLEAR BYTE 18073 M00S12417.set +++| PTF3 STI T2 18074 M00S12418.set +++| LDD T7 UPDATE TRACK COUNT IN MST 18075 M00S12419.set +++| SHN 3 18076 M00S12420.set +++| ADK TDGL 18077 M00S12421.set +++| CWD CN 18078 M00S12422.set +++| LDD CA STORE TRT WORD 18079 M00S12423.set +++| SHN 14 18080 M00S12424.set +++| LMD CA+1 18081 M00S12425.set +++| ADD T1 18082 M00S12426.set +++| CWD CM 18083 M00S12427.set +++| LJM PTFX RETURN 18084 M00S12428.set +++| 18085 M00S12429.set +++| PTF4 LDN 10 18086 M00S12430.set +++| PTFB SHN -** 18087 M00S12431.set +++| STD T0 18088 M00S12432.set +++| LMC 7777 18089 M00S12433.set +++| STM PTFC 18090 M00S12434.set +++| LDD CM+4 SET TRACK RESERVATION 18091 M00S12435.set +++| LPC 0 18092 M00S12436.set +++| PTFC EQU *-1 18093 M00S12437.set +++| LMD T0 18094 M00S12438.set +++| STD CM+4 18095 M00S12439.set +++| LDI T2 18096 M00S12440.set +++| NJN PTF5 IF TRACK ALREADY FLAWED 18097 M00S12441.set +++| SOD CN+4 DECREMENT TRACK COUNT 18098 M00S12442.set +++| PTF5 LDC 3777 18099 M00S12443.set +++| UJN PTF3 SET TRACK BYTE 18100 M00S12444.set +++| PTL SPACE 4,10 18101 M00S12445.set +++|** PTL - PROCESS TRT LENGTH. 18102 M00S12446.set +++|* 18103 M00S12447.set +++|* USES EQ, T4, T7, CM - CM+4. 18104 M00S12448.set +++|* 18105 M00S12449.set +++|* CALLS AJT, SME. 18106 M00S12450.set +++| 18107 M00S12451.set +++| 18108 M00S12452.set +++| PTL1 LDD AB+4 SET MST POINTER 18109 M00S12453.set +++| STD T7 18110 M00S12454.set +++| SHN 3 18111 M00S12455.set +++| ADN STLL 18112 M00S12456.set +++| CRD CM 18113 M00S12457.set +++| LDD CM CHECK FOR INITIALIZE SET 18114 M00S12458.set +++| LPC MLIAL 18115 M00S12459.set +++| ZJN PTL2 IF INITIALIZE NOT SET 18116 M00S12460.set +++| RJM AJT 18117 M00S12461.set +++| PTL2 RJM SME 18118 M00S12462.set +++| NJN PTL1 IF NOT END OF EST 18119 M00S12463.set +++| 18120 M00S12464.set +++| PTL SUBR ENTRY/EXIT 18121 M00S12465.set +++| LDN 0 18122 M00S12466.set +++| STD T4 SELECT SET FLAW PROCESSING 18123 M00S12467.set +++| STD EQ 18124 M00S12468.set +++| UJN PTL2 CHECK TRT LENGTHS 18125 M00S12469.set +++| TITLE SUBROUTINES.
| Line S02293 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 18126 M01S02293.274l797 +++| AODSUB 18127 M01S02294.274l797 +++| ASDSUB 18128 M01S02295.274l797 +++| CDRSUB 18129 M00S12470.set +++| CMC SPACE 4,10 18130 M00S12471.set +++|** CMC - CHECK MACHINE CONFIGURATION. 18131 M00S12472.set +++|* 18132 M00S12473.set +++|* ENTRY (EP) = EST ADDRESS. 18133 M00S12474.set +++|* (LD) = LINK DEVICE DEFINITION. 18134 M00S12475.set +++|* 18135 M00S12476.set +++|* USES AB - AB+4, CM - CM+4, T1 - T7. 18136 M00S12477.set +++| 18137 M00S12478.set +++| 18138 M00S12479.set +++| CMC SUBR ENTRY/EXIT 18139 M00S12480.set +++| LDD LD 18140 M00S12481.set +++| LPC 777 18141 M00S12482.set +++| ZJN CMCX IF NOT MMF ENVIRONMENT 18142 M00S12483.set +++| SFA EST 18143 M00S12484.set +++| CRD CM READ EST ENTRY FOR LINK DEVICE 18144 M00S12485.set +++| LDN ZERL 18145 M00S12486.set +++| CRD T0 18146 M00S12487.set +++| CRD AB 18147 M00S12488.set +++| LCN 0 INITIALIZE FLAG REGISTER STATUS 18148 M00S12489.set +++| STD AB+3 18149 M00S12490.set +++| LDD CM+4 GET MST STATUS WORD 18150 M00S12491.set +++| SHN 3 18151 M00S12492.set +++| ADN STLL 18152 M00S12493.set +++| CRD CM 18153 M00S12494.set +++| ADN TRLL-STLL FETCH TRT ADDRESS 18154 M00S12495.set +++| CRD T7-4 18155 M00S12496.set +++| LDD CM EXTRACT INITIALIZE FLAG 18156 M00S12497.set +++| SHN -6 18157 M00S12498.set +++| LPN 20 18158 M00S12499.set +++| RAD AB+2
| Line S12500 Modification History | |
|---|---|
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act ----------------------------+ 18159 M01S12500.283l840 ---| LDM SETD CHECK PRESET STATUS
| Line S00825 Modification History | |
|---|---|
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act ----------------------------+ 18160 M01S00825.283l840 +++| LDM PRSF CHECK PRESET STATUS 18161 M00S12501.set +++| ZJN CMC7 IF PRESET NOT SPECIFIED 18162 M00S12502.set +++| LDN 40 SET *PRESET* SELECTED 18163 M00S12503.set +++| RAD AB+2 18164 M00S12504.set +++| UJN CMC7 FIND POTENTIAL LABEL TRACK 18165 M00S12505.set +++| 18166 M00S12506.set +++| CMC4 LDC =C*LINK DEVICE LABEL TRACK ERROR.* 18167 M00S12507.set +++| LJM DSE GO DISPLAY ERROR 18168 M00S12508.set +++| 18169 M00S12509.set +++|* LOCATE FIRST AVAILABLE TRACK AS POSSIBLE LABEL TRACK. 18170 M00S12510.set +++| 18171 M00S12511.set +++| CMC6 AOD T1 ADVANCE TRT INDEX 18172 M00S12512.set +++| SHN 2 18173 M00S12513.set +++| SBN LTKL-4000 18174 M00S12514.set +++| PJN CMC4 IF AT LABEL TRACK LIMIT 18175 M00S12515.set +++| CMC7 LDD T6 18176 M00S12516.set +++| LPN 77 18177 M00S12517.set +++| SHN 14 READ TRT WORD 18178 M00S12518.set +++| LMD T7 18179 M00S12519.set +++| ADD T1 18180 M00S12520.set +++| CRD CM 18181 M00S12521.set +++| LDD CM+4 CHECK FOR UNASSIGNED TRACK 18182 M00S12522.set +++| LPN 17 18183 M00S12523.set +++| LMN 17 18184 M00S12524.set +++| ZJN CMC6 IF THESE 4 TRACKS RESERVED 18185 M00S12525.set +++| LMN 17 18186 M00S12526.set +++| SHN 13-3 18187 M00S12527.set +++| STD T2 18188 M00S12528.set +++| LDN 0 INITIALIZE BYTE INDEX 18189 M00S12529.set +++| STD T0 18190 M00S12530.set +++| CMC8 RAD T0 ADVANCE BYTE INDEX 18191 M00S12531.set +++| LDD T2 CHECK NEXT TRACK 18192 M00S12532.set +++| SHN 1 18193 M00S12533.set +++| STD T2 18194 M00S12534.set +++| SHN -14 18195 M00S12535.set +++| NJN CMC8 IF TRACK RESERVED 18196 M00S12536.set +++| LDD T1 FORM TRACK NUMBER 18197 M00S12537.set +++| LMD TH 18198 M00S12538.set +++| SHN 2 18199 M00S12539.set +++| LMD T0 18200 M00S12540.set +++| CMC9 STD AB+4 18201 M00S12541.set +++| LDC EFRL STORE STATUS FOR *CPUMTR*/*MTE* 18202 M00S12542.set +++| CWD AB 18203 M00S12543.set +++| LJM CMCX RETURN 18204 M00S12544.set +++| ECT SPACE 4,10 18205 M00S12545.set +++|** ECT - DEFINE *EICB* TABLES. 18206 M00S12546.set +++|* 18207 M00S12547.set +++|* USES AB - AB+4, CA - CA+1, CM - CM+4, CN - CN+4. 18208 M00S12548.set +++|* 18209 M00S12549.set +++|* CALLS DFO, DML. 18210 M00S12550.set +++| 18211 M00S12551.set +++| 18212 M00S12552.set +++| ECT SUBR ENTRY/EXIT 18213 M00S12553.set +++| LDM C8XX 18214 M00S12554.set +++| NJN ECTX IF NOT LOWER 800 SERIES MAINFRAME 18215 M00S12555.set +++| CRD CN 18216 M00S12556.set +++| CRD AB 18217 M00S12557.set +++| LDK EIBP READ *EICB* POINTER WORD 18218 M00S12558.set +++| CRD CM 18219 M00S12559.set +++| LDM VEMZ SET WORD *D7CM*
| Line S12560 Modification History | |
|---|---|
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act ----------------------------+ 18220 M01S12560.ns2633 ---| LPN 77
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act ----------------------------+ 18221 M01S00057.ns2633 +++| LPN 7 18222 M00S12561.set +++| SHN 14 18223 M00S12562.set +++| ADM VEMZ+1 18224 M00S12563.set +++| SHN -3 FORM BLOCK SIZE/1000B 18225 M00S12564.set +++| STD CN+4
| Line S12565 Modification History | |
|---|---|
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act ----------------------------+ 18226 M01S12565.ns2633 ---| SHN -14
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act ----------------------------+ 18227 M01S00058.ns2633 +++| LDM VEMZ 18228 M01S00059.ns2633 +++| SHN -3 18229 M00S12566.set +++| STD CN+3 18230 M00S12567.set +++| LDM /EQP/MCMS FORM MINCM/1000 18231 M00S12568.set +++| SHN 14 18232 M00S12569.set +++| LMM /EQP/MCMS+1 18233 M00S12570.set +++| ADN 7 18234 M00S12571.set +++| SHN -3 18235 M00S12572.set +++| STD CN+2 18236 M00S12573.set +++| SHN -14 18237 M00S12574.set +++| STD CN+1 18238 M00S12575.set +++| LDD MZ SET WORD *D7CM+1*
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act ----------------------------+ 18239 M01S00060.ns2633 +++| LPN 7 18240 M00S12576.set +++| SHN 14 18241 M00S12577.set +++| LMD MZ+1 18242 M00S12578.set +++| ADN 7 18243 M00S12579.set +++| SHN -3 18244 M00S12580.set +++| STD AB+2 18245 M00S12581.set +++| STD AB+4 18246 M00S12582.set +++| SHN -14
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act ----------------------------+ 18247 M01S00061.ns2633 +++| STD CM 18248 M01S00062.ns2633 +++| LDD MZ 18249 M01S00063.ns2633 +++| SHN -3 18250 M01S00064.ns2633 +++| ADD CM 18251 M00S12583.set +++| STD AB+1 18252 M00S12584.set +++| STD AB+3 18253 M00S12585.set +++| LDD CM+3 WRITE WORD *D7TY* 18254 M00S12586.set +++| SHN 14 18255 M00S12587.set +++| LMD CM+4 18256 M00S12588.set +++| ADK D7TY 18257 M00S12589.set +++| CWM ECTA,ON 18258 M00S12590.set +++| ADN D7CM-D7TY-1 WRITE WORD *D7CM 18259 M00S12591.set +++| CWD CN 18260 M00S12592.set +++| ADN 1 WRITE WORD *D7CM+1* 18261 M00S12593.set +++| CWD AB 18262 M00S12594.set +++| ADN DSCBL-D7CM-1 SAVE DFT/OS BUFFER FWA 18263 M00S12595.set +++| STD CA+1 18264 M00S12596.set +++| SHN -14 18265 M00S12597.set +++| STD CA 18266 M00S12598.set +++| RJM DML DEFINE *MLST* BUFFER 18267 M00S12599.set +++| RJM DFO DEFINE DFT/OS BUFFER 18268 M00S12600.set +++| LJM ECTX RETURN 18269 M00S12601.set +++| 18270 M00S12602.set +++| ECTA BSS 0 WORD *D7TY* 18271 M00S12603.set +++| VFD 6/0 RESERVED 18272 M00S12604.set +++| VFD 18/DTEL DATE WORD ADDRESS 18273 M00S12605.set +++| 18274 M00S12606.set +++| VFD 18/TIML TIME WORD ADDRESS 18275 M00S12607.set +++| 18276 M00S12608.set +++| VFD 6/1 OS TYPE
| Line S12609 Modification History | |
|---|---|
M01 (Removed by) | ns2683 |
Seq # *Modification Id* Act ----------------------------+ 18277 M01S12609.ns2683 ---| VFD 6/4 INTERFACE VERSION
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2683 |
Seq # *Modification Id* Act ----------------------------+ 18278 M01S00001.ns2683 +++| VFD 6/5 *EICB* INTERFACE VERSION 18279 M00S12610.set +++| VFD 6/1 INTERFACE LEVEL 18280 M00S12611.set +++| DML SPACE 4,10 18281 M00S12612.set +++|** DML - DEFINE *MLST* BUFFER. 18282 M00S12613.set +++|* 18283 M00S12614.set +++|* ENTRY (CA - CA+1) = FWA OF *MLST* BUFFER IF VE DEFINED. 18284 M00S12615.set +++|* (CM+3 - CM+4) = *EICB* POINTER. 18285 M00S12616.set +++|* 18286 M00S12617.set +++|* EXIT (CA - CA+1) ADVANCED. 18287 M00S12618.set +++|* 18288 M00S12619.set +++|* USES CN - CN+4. 18289 M00S12620.set +++| 18290 M00S12621.set +++| 18291 M00S12622.set +++| DML SUBR ENTRY/EXIT 18292 M00S12623.set +++| LDN ZERL CLEAR FOR *MLST* POINTER 18293 M00S12624.set +++| CRD CN 18294 M00S12625.set +++| LDC 4000 18295 M00S12626.set +++| STD CN
| Line S12627 Modification History | |
|---|---|
M01 (Removed by) | ns2633 |
Seq # *Modification Id* Act ----------------------------+ 18296 M01S12627.ns2633 ---| LDM VEMZ
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | ns2633 |
Seq # *Modification Id* Act ----------------------------+ 18297 M01S00065.ns2633 +++| LDM VEFL 18298 M00S12628.set +++| ZJN DML1 IF NOS/VE NOT DEFINED 18299 M00S12629.set +++| LDD CA 18300 M00S12630.set +++| SHN 14 18301 M00S12631.set +++| LMD CA+1 *MLST* ADDRESS (BITS 35-17 OF *D7ST*) 18302 M00S12632.set +++| SHN 14 18303 M00S12633.set +++| STD CN+2 18304 M00S12634.set +++| LDD CA+1 18305 M00S12635.set +++| SHN 6 18306 M00S12636.set +++| LMM .MLS+MTBL *MLST* SIZE 18307 M00S12637.set +++| STD CN+3 18308 M00S12638.set +++| LPN 77 18309 M00S12639.set +++| RAD CA+1 ADVANCE PAST *MLST* 18310 M00S12640.set +++| SHN -14 18311 M00S12641.set +++| RAD CA 18312 M00S12642.set +++| DML1 LDD CM+3 WRITE STATUS AND *MLST* POINTER 18313 M00S12643.set +++| SHN 14 18314 M00S12644.set +++| LMD CM+4 18315 M00S12645.set +++| ADN D7ST 18316 M00S12646.set +++| CWD CN 18317 M00S12647.set +++| UJP DMLX RETURN 18318 M00S12648.set +++| DFO SPACE 4,10 18319 M00S12649.set +++|** DFO - DEFINE *DFT/OS* BUFFER. 18320 M00S12650.set +++|* 18321 M00S12651.set +++|* ENTRY (CA - CA+1) = FWA OF *DFT/OS* BUFFER. 18322 M00S12652.set +++|* (CM+3 - CM+4) = *EICB* POINTER WORD. 18323 M00S12653.set +++|* (DFTA) = *DFT* ALLOCATION DATA. 18324 M00S12654.set +++|* 18325 M00S12655.set +++|* EXIT *DFT/OS* BUFFER INITIALIZED. 18326 M00S12656.set +++|* 18327 M00S12657.set +++|* USES AB - AB+4, CM - CM+1, CN - CN+4, T1 - T6. 18328 M00S12658.set +++| 18329 M00S12659.set +++|
| Line S00121 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18330 M01S00121.261l700 +++|* BUILD *DFT/OS* INTERFACE HANDOFF FOR VERSION 4 AND ABOVE. 18331 M01S00122.261l700 +++|* 18332 M01S00123.261l700 +++|* NOTE - THE *DFT/OS* BUFFER CANNOT START ON THE LAST WORD OF 18333 M01S00124.261l700 +++|* A SECTOR. THIS IS TO ENSURE A NON-ZERO VALUE FOR THE 18334 M01S00125.261l700 +++|* *OFFSET* FIELD OF THE *DFT/OS* BUFFER POINTER WORD IN THE 18335 M01S00126.261l700 +++|* *EICB*. THIS POINTER POINTS TO THE *DFT* CONTROL WORD, 18336 M01S00127.261l700 +++|* WHICH IS THE SECOND WORD OF THE BUFFER. 18337 M01S00128.261l700 +++|
| Line S00129 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 18338 M02S00129.271l716 ---| DFO10 LDM DFSZ SAVE TOTAL SIZE FROM DESCRIPTOR
| Line S00346 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 18339 M01S00346.271l716 +++| DFO10 LDM DFTV DETERMINE LOWEST *DFT* LEVEL 18340 M01S00347.271l716 +++| SBN DIRL-3 CURRENT OS *DFT* LEVEL 18341 M01S00348.271l716 +++| MJN DFO10.1 IF OS IS NOT LOWEST LEVEL 18342 M01S00349.271l716 +++| LDN 0 18343 M01S00350.271l716 +++| DFO10.1 ADN DIRL RESTORE LEVEL NUMBER 18344 M01S00351.271l716 +++| SHN 4 18345 M01S00352.271l716 +++| STD CN+1 SET LEVEL FOR *DFT* 18346 M01S00353.271l716 +++| LDM DFSZ SAVE TOTAL SIZE FROM DESCRIPTOR
| Line S00130 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18347 M01S00130.261l700 +++| STD AB+4 18348 M01S00131.261l700 +++| STD T3 18349 M01S00132.261l700 +++| LDM DFTA+1 SAVE DEDICATED MODE FLAG 18350 M01S00133.261l700 +++| SHN 0-13 18351 M01S00134.261l700 +++| LMN 1 18352 M01S00135.261l700 +++| STD T6 18353 M01S00136.261l700 +++| ZJN DFO11 IF DEDICATED *DFT* 18354 M01S00137.261l700 +++| LDN 24 SET *C* AND *D* FLAGS IN CONTROL WORD 18355 M01S00138.261l700 +++| DFO11 LMN 10 SET *L* FLAG 18356 M01S00139.261l700 +++| STD CN+4 18357 M01S00140.261l700 +++| AOD CA+1 ENSURE *DFT/OS* BUFFER STARTS ON EVEN WORD 18358 M01S00141.261l700 +++| SCN 1 18359 M01S00142.261l700 +++| STD CA+1 18360 M01S00143.261l700 +++| SHN -14 18361 M01S00144.261l700 +++| RAD CA 18362 M01S00145.261l700 +++| LDD CA CONSTRUCT POINTER TO *DFT/OS* BUFFER 18363 M01S00146.261l700 +++| STD CM 18364 M01S00147.261l700 +++| SHN 14 18365 M01S00148.261l700 +++| LMD CA+1 18366 M01S00149.261l700 +++| STD CM+1 18367 M01S00150.261l700 +++| CWD AB WRITE TOTAL SIZE TO FIRST WORD 18368 M01S00151.261l700 +++| ADN 1 ADVANCE POINTER TO CONTROL WORD 18369 M01S00152.261l700 +++| CWD CN WRITE *DFT* CONTROL WORD 18370 M01S00153.261l700 +++| STD T1 SAVE OFFSET 18371 M01S00154.261l700 +++| SHN -6 18372 M01S00155.261l700 +++| SHN 4 18373 M01S00156.261l700 +++| STD AB+3 R-LOWER 18374 M01S00157.261l700 +++| SHN -14 18375 M01S00158.261l700 +++| STD AB+2 R-UPPER 18376 M01S00159.261l700 +++| LDD T1 18377 M01S00160.261l700 +++| LPN 77 18378 M01S00161.261l700 +++| STD AB OFFSET 18379 M01S00162.261l700 +++| 18380 M01S00163.261l700 +++|* WRITE THE *PPR* SAVE AREA POINTER AND THE NOS OS REQUEST 18381 M01S00164.261l700 +++|* HEADER POINTER TO THE *DFT/OS* HANDOFF INTERFACE. ALSO 18382 M01S00165.261l700 +++|* WRITE THE NOS REQUEST HEADER WORD. 18383 M01S00166.261l700 +++|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | set67 |
Seq # *Modification Id* Act ----------------------------+ 18384 M01S00001.set67 +++| LDN 0 CLEAR *DFT* LEVEL FIELD 18385 M01S00002.set67 +++| STD CN+1
| Line S00167 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18386 M01S00167.261l700 +++| LDN 2 SET ADDRESS OF POINTER WORD TO WRITE 18387 M01S00168.261l700 +++| RAD CA+1 18388 M01S00169.261l700 +++| SHN -14 18389 M01S00170.261l700 +++| RAD CA 18390 M01S00171.261l700 +++| LDD T6 18391 M01S00172.261l700 +++| ZJN DFO12 IF DEDICATED *DFT* 18392 M01S00173.261l700 +++| LDK DFPSL SIZE OF *PPR* SAVE AREA 18393 M01S00174.261l700 +++| STD T6 18394 M01S00175.261l700 +++| STD CN+4 18395 M01S00176.261l700 +++| DFO12 RJM PWP WRITE *PPR* SAVE AREA POINTER 18396 M01S00177.261l700 +++| LDD T6 SET OFFSET TO NOS REQUEST HEADER 18397 M01S00178.261l700 +++| RAD T3 18398 M01S00179.261l700 +++| SHN -14 18399 M01S00180.261l700 +++| RAD T2 18400 M01S00181.261l700 +++| LDN 1 SET NUMBER OF NOS REQUEST BUFFERS 18401 M01S00182.261l700 +++| STD CN+4 18402 M01S00183.261l700 +++| RJM PWP WRITE NOS REQUEST HEADER POINTER 18403 M01S00184.261l700 +++| LDD T3 SET ADDRESS OF NOS REQUEST HEADER 18404 M01S00185.261l700 +++| ADD CM+1 18405 M01S00186.261l700 +++| STD CA+1 18406 M01S00187.261l700 +++| SHN -14 18407 M01S00188.261l700 +++| ADD T2 18408 M01S00189.261l700 +++| ADD CM 18409 M01S00190.261l700 +++| STD CA 18410 M01S00191.261l700 +++| AOD T3 SET OFFSET TO NOS REQUEST AREA 18411 M01S00192.261l700 +++| SHN -14 18412 M01S00193.261l700 +++| RAD T2 18413 M01S00194.261l700 +++| LDN STIN SET STATUS = *INACTIVE* 18414 M01S00195.261l700 +++| STD CN+4 18415 M01S00196.261l700 +++| LDN 1 INSURE POINTER WRITTEN 18416 M01S00197.261l700 +++| RJM PWP WRITE NOS REQUEST HEADER WORD 18417 M01S00198.261l700 +++| 18418 M01S00199.261l700 +++|* CALCULATE TOTAL SIZE OF THE *DFT/OS* BUFFER. 18419 M01S00200.261l700 +++| 18420 M01S00201.261l700 +++| LDM DFSZ GET SIZE FROM DESCRIPTOR 18421 M01S00202.261l700 +++| ADK RQBL+1 ADD NOS REQUEST AREA SIZE 18422 M01S00203.261l700 +++| ADD T6 ADD *PPR* SAVE AREA SIZE 18423 M01S00204.261l700 +++| STD AB+4 18424 M01S00205.261l700 +++| SHN -14 18425 M01S00206.261l700 +++| RAD AB+3 18426 M01S00207.261l700 +++| LDD CM+3 WRITE *DFT/OS* POINTER WITH TOTAL SIZE 18427 M01S00208.261l700 +++| SHN 14 18428 M01S00209.261l700 +++| LMD CM+4 18429 M01S00210.261l700 +++| ADK DSCM+3 18430 M01S00211.261l700 +++| CWD AB 18431 M01S00212.261l700 +++| 18432 M01S00213.261l700 +++|* COPY THE *PPR* SAVE AREA POINTER AND THE NOS REQUEST 18433 M01S00214.261l700 +++|* HEADER POINTER TO THEIR PROPER POSITIONS. THIS IS REQUIRED 18434 M01S00215.261l700 +++|* FOR *MTR* PRESET AND *1MB*, WHICH NEED THEM PRIOR TO *DFT* 18435 M01S00216.261l700 +++|* BUILDING THE COMPLETE *DFT/OS* BUFFER. 18436 M01S00217.261l700 +++| 18437 M01S00218.261l700 +++| LDD CM 18438 M01S00219.261l700 +++| SHN 14 18439 M01S00220.261l700 +++| LMD CM+1 18440 M01S00221.261l700 +++| ADN 2 18441 M01S00222.261l700 +++| CRD CN READ *PPR* SAVE AREA POINTER 18442 M01S00223.261l700 +++| ADN 1 18443 M01S00224.261l700 +++| CRD AB READ NOS REQUEST HEADER POINTER 18444 M01S00225.261l700 +++| ADN 3 18445 M01S00226.261l700 +++| CWD CN WRITE *PPR* SAVE AREA POINTER 18446 M01S00227.261l700 +++| ADN 1 18447 M01S00228.261l700 +++| CWD AB WRITE NOS REQUEST HEADER POINTER 18448 M01S00229.261l700 +++| 18449 M00S12660.set +++| DFO SUBR ENTRY/EXIT 18450 M00S12661.set +++| LDN ZERL CLEAR ASSEMBLY BUFFER 18451 M00S12662.set +++| CRD CN 18452 M00S12663.set +++| CRD AB
| Line S00230 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18453 M01S00230.261l700 +++| CRD T1 18454 M01S00231.261l700 +++| LDM DFTV 18455 M01S00232.261l700 +++| NJP DFO10 IF NOT *DFT* VERSION 3 18456 M01S00233.261l700 +++| 18457 M01S00234.261l700 +++|* CONSTRUCT *DFT/OS* BUFFER FOR *DFT* VERSION 3. 18458 M01S00235.261l700 +++| 18459 M00S12664.set +++| LDD CA 18460 M00S12665.set +++| SHN 14 18461 M00S12666.set +++| LMD CA+1 18462 M00S12667.set +++| STD T1 SAVE OFFSET 18463 M00S12668.set +++| SHN -6 18464 M00S12669.set +++| SHN 4 18465 M00S12670.set +++| STD AB+3 R-LOWER 18466 M00S12671.set +++| SHN -14 18467 M00S12672.set +++| STD AB+2 R-UPPER 18468 M00S12673.set +++| LDD T1 18469 M00S12674.set +++| LPN 77 18470 M00S12675.set +++| STD AB 18471 M00S12676.set +++| LDN DFHL SET NUMBER OF HEADER WORDS 18472 M00S12677.set +++| SHN 14-4 18473 M00S12678.set +++| STD CN
| Line S12679 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 18474 M01S12679.271l716 ---| LDN DIRL*20 SET *DFT* INTERFACE REVISION LEVEL
| Line S00354 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 18475 M01S00354.271l716 +++| LDN 3*20 SET *DFT* REVISION LEVEL TO 3 18476 M00S12680.set +++| STD CN+1 18477 M00S12681.set +++| LDM DFTA GET MAINTENANCE REGISTER BUFFER DATA 18478 M00S12682.set +++| STD T1 18479 M00S12683.set +++| SHN -6 18480 M00S12684.set +++| STD T5 SAVE NUMBER OF BUFFERS 18481 M00S12685.set +++| SHN 4 18482 M00S12686.set +++| STD CN+3 SET *NBUF* IN *DFT* CONTROL WORD 18483 M00S12687.set +++| LDD T1 18484 M00S12688.set +++| LPN 77 18485 M00S12689.set +++| STD CN+2 SET *LBUF* IN *DFT* CONTROL WORD 18486 M00S12690.set +++| STD T4 18487 M00S12691.set +++| LDM DFTA+1 CHECK DEDICATED FLAG 18488 M00S12692.set +++| STD T1 18489 M00S12693.set +++| SHN -13 18490 M00S12694.set +++| NJN DFO1 IF DEDICATED DFT 18491 M00S12695.set +++| LDN 24 SET *C* AND *D* FLAGS IN CONTROL WORD 18492 M00S12696.set +++| STD CN+4 18493 M00S12697.set +++| DFO1 LDN 10 SET *L* FLAG 18494 M00S12698.set +++| RAD CN+4 18495 M00S12699.set +++| LDD CA WRITE *DFT* CONTROL WORD 18496 M00S12700.set +++| STD CM 18497 M00S12701.set +++| SHN 14 18498 M00S12702.set +++| LMD CA+1 18499 M00S12703.set +++| STD CM+1 18500 M00S12704.set +++| CWD CN 18501 M00S12705.set +++| AOD CA+1 ADVANCE ADDRESS 18502 M00S12706.set +++| SHN -14 18503 M00S12707.set +++| RAD CA 18504 M00S12708.set +++| LDN ZERL CLEAR ASSEMBLY BUFFER 18505 M00S12709.set +++| CRD CN 18506 M00S12710.set +++| LDD T1 18507 M00S12711.set +++| SHN 0-12 18508 M00S12712.set +++| LPN 1 18509 M00S12713.set +++| ZJN DFO2 IF NOT 990 18510 M00S12714.set +++| LDM .CPU+1 CHECK FOR DUAL CPU CYBER 990 18511 M00S12715.set +++| LPN 2 18512 M00S12716.set +++| ZJN DFO1.1 IF CPU-1 *OFF* OR NOT PRESENT 18513 M00S12717.set +++| LDC -M9DB REDUCE BUFFER FOR SINGLE CPU CYBER 990 18514 M00S12718.set +++| DFO1.1 ADC M9DB*2 SET MODEL DEPENDENT BUFFER SIZE 18515 M00S12719.set +++| DFO2 STD T6 18516 M00S12720.set +++| 18517 M00S12721.set +++|* WRITE POINTER WORDS. 18518 M00S12722.set +++| 18519 M00S12723.set +++| LDN SIDL LENGTH OF SECDED ID TABLE 18520 M00S12724.set +++| STD CN+4 18521 M00S12725.set +++| LDN DFHL+MECB HEADER + COUNTER BUFFER SIZE 18522 M00S12726.set +++| ADD T5 M/R BUFFER COUNT +1 18523 M00S12727.set +++| STD T3 18524 M00S12728.set +++| RJM PWP WRITE SECDED ID TABLE POINTER 18525 M00S12729.set +++| LDD T1 LENGTH OF M/R BUFFERS 18526 M00S12730.set +++| LPC 1777 18527 M00S12731.set +++| STD T1 18528 M00S12732.set +++| STD CN+4 18529 M00S12733.set +++| LDN SIDL OFFSET OF M/R BUFFERS 18530 M00S12734.set +++| RAD T3 18531 M00S12735.set +++| RJM PWP WRITE M/R BUFFER POINTER 18532 M00S12736.set +++| LDD T1 OFFSET OF MODEL DEPENDENT BUFFER 18533 M00S12737.set +++| RAD T3 18534 M00S12738.set +++| LDD T6 MODEL DEPENDENT BUFFER SIZE 18535 M00S12739.set +++| ZJN DFO3 IF NOT 990 18536 M00S12740.set +++| STD CN+4 18537 M00S12741.set +++| LDD T3 18538 M00S12742.set +++| DFO3 RJM PWP WRITE MODEL DEPENDENT BUFFER POINTER 18539 M00S12743.set +++| LDN 0 18540 M00S12744.set +++| RJM PWP WRITE NOS/VE BUFFER POINTER 18541 M00S12745.set +++| LDC DFPSL LENGTH OF PP RESIDENT SAVE AREA 18542 M00S12746.set +++| STD CN+4
| Line S12747 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18543 M01S12747.261l700 ---| STD T2 SAVE LENGTH OF PP RESIDENT SAVE AREA
| Line S00236 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18544 M01S00236.261l700 +++| STD T7 SAVE LENGTH OF PP RESIDENT SAVE AREA 18545 M00S12748.set +++| LDD T6 OFFSET OF NEXT ELEMENT 18546 M00S12749.set +++| RAD T3 18547 M00S12750.set +++| LDM DFTA+1 18548 M00S12751.set +++| SHN 21-13 18549 M00S12752.set +++| MJN DFO4 IF DEDICATED DFT 18550 M00S12753.set +++| LDD T3 18551 M00S12754.set +++| UJN DFO5 WRITE POINTER 18552 M00S12755.set +++| 18553 M00S12756.set +++| DFO4 LDN 0
| Line S12757 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18554 M01S12757.261l700 ---| STD T2 CLEAR LENGTH OF PP RESIDENT SAVE AREA
| Line S00237 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18555 M01S00237.261l700 +++| STD T7 CLEAR LENGTH OF PP RESIDENT SAVE AREA 18556 M00S12758.set +++| DFO5 RJM PWP WRITE PP RESIDENT POINTER
| Line S12759 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18557 M01S12759.261l700 ---| LDD T2 OFFSET OF NOS REQUEST AREA POINTER
| Line S00238 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18558 M01S00238.261l700 +++| LDD T7 OFFSET OF NOS REQUEST AREA POINTER 18559 M00S12760.set +++| RAD T3 18560 M00S12761.set +++| LDN 1 NUMBER OF NOS REQUEST BUFFERS 18561 M00S12762.set +++| STD CN+4 18562 M00S12763.set +++| RJM PWP WRITE NOS REQUEST AREA POINTER 18563 M00S12764.set +++| AOD T3 18564 M00S12765.set +++| 18565 M00S12766.set +++|* CALCULATE TOTAL LENGTH OF DFT/OS BUFFER. 18566 M00S12767.set +++| 18567 M00S12768.set +++| LDK MECB+SIDL MAINFRAME ELEMENT COUNTERS, SECDED 18568 M00S12769.set +++| ADD T1 M/R BUFFER SIZE 18569 M00S12770.set +++| ADD T6 MODEL DEPENDENT BUFFER SIZE
| Line S12771 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18570 M01S12771.261l700 ---| ADD T2 PP RESIDENT SAVE AREA
| Line S00239 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18571 M01S00239.261l700 +++| ADD T7 PP RESIDENT SAVE AREA 18572 M00S12772.set +++| STD T0 SAVE POINTER OFFSET 18573 M00S12773.set +++| ADD T5 M/R CONTROL WORDS 18574 M00S12774.set +++| ADN DFHL+RQBL+1 CONTROL WORD, POINTERS, NOS REQUEST AREA 18575 M00S12775.set +++| STD AB+4 18576 M00S12776.set +++| LDD CM+3 WRITE DFT/OS POINTER = SIZE 18577 M00S12777.set +++| SHN 14 18578 M00S12778.set +++| LMD CM+4 18579 M00S12779.set +++| ADN DSCM+3 18580 M00S12780.set +++| CWD AB 18581 M00S12781.set +++| 18582 M00S12782.set +++|* ADD OFFSET FIELD TO BUFFER CONTROL WORDS. 18583 M00S12783.set +++| 18584 M00S12784.set +++| LDN ZERL 18585 M00S12785.set +++| CRD CN 18586 M00S12786.set +++| DFO6 SOD T5 18587 M00S12787.set +++| ZJN DFO7 IF NO MORE CONTROL WORDS TO PROCESS 18588 M00S12788.set +++| LDD T4 18589 M00S12789.set +++| RAD CN+4 18590 M00S12790.set +++| LDD CA 18591 M00S12791.set +++| SHN 14 18592 M00S12792.set +++| LMD CA+1 18593 M00S12793.set +++| ADN 1 ADVANCE ADDRESS 18594 M00S12794.set +++| CWD CN 18595 M00S12795.set +++| STD CA+1 18596 M00S12796.set +++| SHN -14 18597 M00S12797.set +++| STD CA 18598 M00S12798.set +++| UJN DFO6 PROCESS NEXT ENTRY 18599 M00S12799.set +++| 18600 M00S12800.set +++|* POST REQUEST TO *DFT* TO UPDATE ERROR THRESHOLDS. 18601 M00S12801.set +++| 18602 M00S12802.set +++| DFO7 AOD T0 ADVANCE TO NOS REQUEST HEADER 18603 M00S12803.set +++| RAD CA+1 18604 M00S12804.set +++| SHN -14 18605 M00S12805.set +++| RAD CA 18606 M00S12806.set +++| LDM .CPU CHECK CPU CONFIGURATION 18607 M00S12807.set +++| LPN 2 18608 M00S12808.set +++| ZJN DFO8 IF CPU-1 PRESENT 18609 M00S12809.set +++| LDN ZERL CLEAR THRESHOLDS FOR CPU-1 18610 M00S12810.set +++| CRM DFOB,ON 18611 M00S12811.set +++| DFO8 LDN STRY SET STATUS = *READY* 18612 M00S12812.set +++| STD CN+4 18613 M00S12813.set +++| RJM PWP WRITE NOS REQUEST HEADER 18614 M00S12814.set +++| LDN DFOAL/5 SET WORD COUNT 18615 M00S12815.set +++| STD CN 18616 M00S12816.set +++| LDD CA WRITE THRESHOLD REQUEST TO BUFFER 18617 M00S12817.set +++| SHN 14 18618 M00S12818.set +++| LMD CA+1 18619 M00S12819.set +++| CWM DFOA,CN 18620 M00S12820.set +++| LJM DFOX RETURN 18621 M00S12821.set +++| 18622 M00S12822.set +++| 18623 M00S12823.set +++|* *DFT* THRESHOLD REQUEST INFORMATION. 18624 M00S12824.set +++| 18625 M00S12825.set +++| DFOA VFD 4/,8/RQTH,8/0,8/7,8/0,8/0,8/THCI,8/THUE IOU 18626 M00S12826.set +++| VFD 4/,8/RQTH,8/0,8/7,8/1,8/0,8/THCM,8/THUE MEMORY 18627 M00S12827.set +++| VFD 4/,8/RQTH,8/0,8/7,8/2,8/0,8/THCP,8/THUE CPU-0 18628 M00S12828.set +++| DFOB VFD 4/,8/RQTH,8/0,8/7,8/2,8/1,8/THCP,8/THUE CPU-1 18629 M00S12829.set +++| VFD 60/0 TERMINATOR 18630 M00S12830.set +++| DFOAL EQU *-DFOA LENGTH OF THRESHOLD DATA (PP WORDS) 18631 M00S12831.set +++| PWP SPACE 4,10 18632 M00S12832.set +++|** PWP - POSITION AND WRITE POINTER. 18633 M00S12833.set +++|* 18634 M00S12834.set +++|* ENTRY (A) = 0 IF A ZERO POINTER WORD IS TO BE WRITTEN.
| Line S12835 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18635 M01S12835.261l700 ---|* (T3) = OFFSET FROM FWA OF DFT/OS BUFFER OF THE BUFFER 18636 M01S12836.261l700 ---|* FOR WHICH THE POINTER IS TO BE WRITTEN.
| Line S00240 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18637 M01S00240.261l700 +++|* (T2 - T3) = OFFSET FROM FWA OF THE DFT/OS BUFFER OF 18638 M01S00241.261l700 +++|* THE BUFFER FOR WHICH THE POINTER IS TO 18639 M01S00242.261l700 +++|* BE WRITTEN. 18640 M00S12837.set +++|* (CN+4) = LENGTH OF BUFFER FOR WHICH POINTER IS TO 18641 M00S12838.set +++|* BE WRIITEN. 18642 M00S12839.set +++|* (CM - CM+1) = FWA OF DFT/OS BUFFER. 18643 M00S12840.set +++|* (CA - CA+1) = ADDRESS TO WRITE. 18644 M00S12841.set +++|* 18645 M00S12842.set +++|* EXIT (CA - CA+1) ADVANCED. 18646 M00S12843.set +++|* 18647 M00S12844.set +++|* USES CN - CN+4. 18648 M00S12845.set +++| 18649 M00S12846.set +++| 18650 M00S12847.set +++| PWP1 LDN ZERL CLEAR POINTER 18651 M00S12848.set +++| CRD CN 18652 M00S12849.set +++| PWP2 LDD CA ADVANCE POINTER WORD 18653 M00S12850.set +++| SHN 14 18654 M00S12851.set +++| LMD CA+1 18655 M00S12852.set +++| CWD CN WRITE POINTER WORD 18656 M00S12853.set +++| AOD CA+1 ADVANCE ADDRESS 18657 M00S12854.set +++| SHN -14 18658 M00S12855.set +++| RAD CA 18659 M00S12856.set +++| 18660 M00S12857.set +++| PWP SUBR ENTRY/EXIT 18661 M00S12858.set +++| ZJN PWP1 IF ZERO WORD TO BE WRITTEN 18662 M00S12859.set +++| LDD CM
| Line S00243 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 18663 M01S00243.261l700 +++| ADD T2 18664 M00S12860.set +++| SHN 14 18665 M00S12861.set +++| LMD CM+1 18666 M00S12862.set +++| ADD T3 ADDRESS OF POINTER WORD 18667 M00S12863.set +++| STD CN SAVE OFFSET 18668 M00S12864.set +++| SHN -6 18669 M00S12865.set +++| SHN 4 18670 M00S12866.set +++| STD CN+3 SAVE R-LOWER 18671 M00S12867.set +++| SHN -14 18672 M00S12868.set +++| STD CN+2 18673 M00S12869.set +++| LDD CN OFFSET 18674 M00S12870.set +++| LPN 77 18675 M00S12871.set +++| STD CN 18676 M00S12872.set +++| UJN PWP2 WRITE AND ADVANCE POINTER WORD 18677 M00S12873.set +++| TITLE BUILD SAB TABLE. 18678 M00S12874.set +++| BVS SPACE 4,10 18679 M00S12875.set +++|** BVS - BUILD VARIABLE SIZE SYSTEM ATTRIBUTE BLOCK. 18680 M00S12876.set +++|* 18681 M00S12877.set +++|* USES KB, CM - CM+4, CN - CN+4, T1 - T7. 18682 M00S12878.set +++|* 18683 M00S12879.set +++|* CALLS APM, CDS, CMN, GPD, IAF, PRS, SDA. 18684 M00S12880.set +++|* 18685 M00S12881.set +++|* MACROS CHKAPE. 18686 M00S12882.set +++| 18687 M00S12883.set +++| 18688 M00S12884.set +++| BVS SUBR ENTRY/EXIT 18689 M00S12885.set +++| LDM .APP MODIFY *APP* CHANNEL INSTRUCTIONS 18690 M00S12886.set +++| RJM PRS 18691 M00S12887.set +++| LDK TSABL LENGTH OF SAB BLOCK 18692 M00S12888.set +++| STD T6 18693 M00S12889.set +++| BVS1 LDN 0 CLEAR SAB BLOCK 18694 M00S12890.set +++| STM TSAB-1,T6 18695 M00S12891.set +++| SOD T6 18696 M00S12892.set +++| NJN BVS1 IF NOT FINISHED 18697 M00S12893.set +++| LDK TEABL 18698 M00S12894.set +++| STD T7 18699 M00S12895.set +++| BVS2 LDN 0 CLEAR EABL BLOCK 18700 M00S12896.set +++| STM TEAB-1,T7 18701 M00S12897.set +++| SOD T7 18702 M00S12898.set +++| NJN BVS2 IF NOT FINISHED 18703 M00S12899.set +++| LDK SABL 18704 M00S12900.set +++| CRD CN 18705 M00S12901.set +++| LDD CN+2 SET ELEMENT DESCRIPTOR BLOCK LENGTH 18706 M00S12902.set +++| STM TEAB+5*MFEI+3 18707 M00S12903.set +++|* LDN 0 INITIALIZE INDICES 18708 M00S12904.set +++|* STD T6 *TSAB* INDEX 18709 M00S12905.set +++|* STD T7 *EABL* INDEX 18710 M00S12906.set +++| 18711 M00S12907.set +++|* BUILD MAINFRAME DESCRIPTOR. 18712 M00S12908.set +++| 18713 M00S12909.set +++| LDC MEBF+2 FETCH EI SPECIFICATION 18714 M00S12910.set +++| CRM DBUF+5,ON 18715 M00S12911.set +++| LDN MFDS REQUEST MAINFRAME DESCRIPTOR 18716 M00S12912.set +++| RJM IAF 18717 M00S12913.set +++| STM DBUF+4 18718 M00S12914.set +++| LDD HO SET HARDWARE OPTIONS 18719 M00S12915.set +++| STM DBUF+OPTN 18720 M00S12916.set +++| LDN MFEI*5 SET MAINFRAME DESCRIPTOR ADDRESS 18721 M00S12917.set +++| RJM SDA 18722 M00S12918.set +++| LDN MFDSL COPY DESCRIPTOR TO SAB 18723 M00S12919.set +++| RJM CDS 18724 M00S12920.set +++| LDM TSAB+HDID 18725 M00S12921.set +++| LPN 77 18726 M00S12922.set +++| LMC MFDWL*100B APPEND DESCRIPTOR LENGTH TO HEADER 18727 M00S12923.set +++| STM TSAB+HDID 18728 M00S12924.set +++| BVS3 RJM CMN CALCULATE MODEL NUMBERS 18729 M00S12925.set +++| 18730 M00S12926.set +++|* PROCESSOR DESCRIPTOR(S). 18731 M00S12927.set +++| 18732 M00S12928.set +++| LDN CPEI*5 SET CPU 0 DESCRIPTOR ADDRESS 18733 M00S12929.set +++| RJM SDA 18734 M00S12930.set +++| LDN 0 GENERATE CPU 0 DESCRIPTOR 18735 M00S12931.set +++| STD T5 18736 M00S12932.set +++| RJM GPD 18737 M00S12933.set +++| LDM .CPU CHECK CPU STATUS 18738 M00S12934.set +++| LPN 2 18739 M00S12935.set +++| NJN BVS4 IF CPU 1 NOT PRESENT 18740 M00S12936.set +++| LCN 5*CPEI+2 SET CPU 1 DESCRIPTOR ADDRESS 18741 M00S12937.set +++| RJM SDA 18742 M00S12938.set +++| AOD T5 GENERATE CPU 1 DESCRIPTOR 18743 M00S12939.set +++| RJM GPD 18744 M00S12940.set +++| 18745 M00S12941.set +++|* CENTRAL MEMORY DESCRIPTOR. 18746 M00S12942.set +++| 18747 M00S12943.set +++| BVS4 LDN CMDS REQUEST CM DESCRIPTOR 18748 M00S12944.set +++| RJM IAF 18749 M00S12945.set +++| LDN CMEI*5 SET CM DESCRIPTOR ADDRESS 18750 M00S12946.set +++| RJM SDA 18751 M00S12947.set +++| LDM DBUF+MCTC SET CONNECT CODE 18752 M00S12948.set +++| STM TEAB+5*CMEI+3 18753 M00S12949.set +++| LDM DBUF+HDID 18754 M00S12950.set +++| LPN 77 18755 M00S12951.set +++| LMC CMDWL*100B APPEND DESCRIPTOR LENGTH TO HEADER 18756 M00S12952.set +++| STM DBUF+HDID 18757 M00S12953.set +++| LDD T6 18758 M00S12954.set +++| ADC TSAB+2*5-2 LOCATION OF *CTI CM DIRECTORY* POINTER 18759 M00S12955.set +++| STD KB 18760 M00S12956.set +++| LDM C8XX 18761 M00S12957.set +++| ZJN BVS5 IF C180 MAINFRAME 18762 M00S12958.set +++| LDD CM+2 18763 M00S12959.set +++| SHN 4 SET MEMORY MODEL NUMBER 18764 M00S12960.set +++| STM DBUF+HDMN 18765 M00S12961.set +++| BVS5 LDN CMDSL COPY DESCRIPTOR TO SAB 18766 M00S12962.set +++| RJM CDS 18767 M00S12963.set +++| 18768 M00S12964.set +++|* IOU DESCRIPTOR. 18769 M00S12965.set +++| 18770 M00S12966.set +++| LDN IUDS REQUEST IOU DESCRIPTOR 18771 M00S12967.set +++| RJM IAF 18772 M00S12968.set +++| LDM .PPL GET CTI/SET PP00 - PP11 OFF DATA 18773 M00S12969.set +++| STM DBUF+LPP0 UPDATE *SAB* TABLE 18774 M00S12970.set +++| LDM .PPL+1 GET CTI/SET PP20 - PP31 OFF DATA 18775 M00S12971.set +++| STM DBUF+LPP1 UPDATE *SAB* TABLE 18776 M00S12972.set +++| LDM DBUF+HDID 18777 M00S12973.set +++| LPN 77 18778 M00S12974.set +++| ADC IUDWL*100B APPEND DESCRIPTOR LENGTH TO HEADER 18779 M00S12975.set +++| STM DBUF+HDID 18780 M00S12976.set +++| LDM DBUF+MCTC SET CONNECT CODE 18781 M00S12977.set +++| STM TEAB+5*IOEI+3 18782 M00S12978.set +++| LDN IOEI*5 SET IOU DESCRIPTOR ADDRESS 18783 M00S12979.set +++| RJM SDA 18784 M00S12980.set +++| LDM C8XX 18785 M00S12981.set +++| ZJN BVS6 IF C180 MAINFRAME 18786 M00S12982.set +++| LDD CM+3 18787 M00S12983.set +++| SHN 4 SET I/O SUBSYSTEM MODEL NUMBER 18788 M00S12984.set +++| STM DBUF+HDMN 18789 M00S12985.set +++| BVS6 LDN IUDSL COPY DESCRIPTOR TO SAB 18790 M00S12986.set +++| RJM CDS 18791 M00S12987.set +++| LDM C8XX 18792 M00S12988.set +++| NJN BVS7 IF NOT CYBER 800 TYPE MAINFRAME 18793 M00S12989.set +++| 18794 M00S12990.set +++|* CONSOLE DESCRIPTOR. 18795 M00S12991.set +++| 18796 M00S12992.set +++| LDN CIDS REQUEST CONSOLE DESCRIPTOR 18797 M00S12993.set +++| RJM IAF 18798 M00S12994.set +++| LDM DBUF+HDID 18799 M00S12995.set +++| LPN 77 18800 M00S12996.set +++| LMD HN APPEND DESCRIPTOR LENGTH TO HEADER 18801 M00S12997.set +++| STM DBUF+HDID 18802 M00S12998.set +++| LCN 5*DCEI+2 SET DISPLAY CONSOLE DESCRIPTOR ADDRESS 18803 M00S12999.set +++| RJM SDA 18804 M00S13000.set +++| LDN CIDSL COPY DESCRIPTOR TO SAB 18805 M00S13001.set +++| RJM CDS 18806 M00S13002.set +++| BVS7 LDD HO 18807 M00S13003.set +++| SHN 21-11 18808 M00S13004.set +++| PJN BVS8 IF NOT CYBER 176 18809 M00S13005.set +++| 18810 M00S13006.set +++|* FLPP DESCRIPTOR. 18811 M00S13007.set +++| 18812 M00S13008.set +++| LDN FLPS REQUEST FLPP DESCRIPTOR 18813 M00S13009.set +++| RJM IAF 18814 M00S13010.set +++| LDM DBUF+HDID 18815 M00S13011.set +++| LPN 77 18816 M00S13012.set +++| LMD HN APPEND DESCRIPTOR LENGTH TO HEADER 18817 M00S13013.set +++| STM DBUF+HDID 18818 M00S13014.set +++| LDN FLPSL COPY DESCRIPTOR TO SAB 18819 M00S13015.set +++| RJM CDS 18820 M00S13016.set +++| 18821 M00S13017.set +++|* SET ISD SUBSYSTEM STATUS. 18822 M00S13018.set +++| 18823 M00S13019.set +++| BVS8 LDN CFGL 18824 M00S13020.set +++| CRD CM 18825 M00S13021.set +++| LDM ISPF 18826 M00S13022.set +++| SHN 21-13 18827 M00S13023.set +++| MJN BVS9 IF NOT CYBER 810/815/825/830 18828 M00S13024.set +++| ZJN BVS9 IF ISD SUBSYSTEM NOT PRESENT 18829 M00S13025.set +++| LDD TH SET ISD SUBSYSTEM PRESENT 18830 M00S13026.set +++| RAD CM+3 18831 M00S13027.set +++| BVS9 LDN CFGL 18832 M00S13028.set +++| CWD CM 18833 M00S13029.set +++| 18834 M00S13030.set +++|* EXTENDED MEMORY DESCRIPTOR. 18835 M00S13031.set +++| 18836 M00S13032.set +++| LDD EN 18837 M00S13033.set +++| NJN BVS10 IF CPU ACCESS EQUIPMENT DEFINED 18838 M00S13034.set +++| LDM UEMZ 18839 M00S13035.set +++| ADM UEMZ+1 18840 M00S13036.set +++| ZJP BVS13 IF NO USER EXTENDED MEMORY DEFINED 18841 M00S13037.set +++| LDC 440 SET FLAGS / MEMORY TYPE / PATH TYPE 18842 M00S13038.set +++| UJN BVS12 COMPLETE DESCRIPTOR 18843 M00S13039.set +++| 18844 M00S13040.set +++| BVS10 SFA EST 18845 M00S13041.set +++| ADK EQDE 18846 M00S13042.set +++| CRD CM 18847 M00S13043.set +++| LDD CM+4 GET EM TYPE PARAMETERS 18848 M00S13044.set +++| SHN 3 18849 M00S13045.set +++| ADN DILL 18850 M00S13046.set +++| CRD CM 18851 M00S13047.set +++| LDD CM+3 SET MAINTENANCE MODE FLAG 18852 M00S13048.set +++| SHN 0-11 18853 M00S13049.set +++| LPN 1 18854 M00S13050.set +++| LMN 1 18855 M00S13051.set +++| SHN 10-0 18856 M00S13052.set +++| RAM BVSA 18857 M00S13053.set +++| LDD CM+3 SET EXTENDED ADDRESSING FLAG 18858 M00S13054.set +++| LPN 70 18859 M00S13055.set +++| LMN 30 18860 M00S13056.set +++| NJN BVS11 IF NOT EXTENDED ADDRESSING 18861 M00S13057.set +++| LDD HN 18862 M00S13058.set +++| RAM BVSA 18863 M00S13059.set +++| BVS11 LDD CM+3 SET PP PATH TYPE AND MEMORY TYPE 18864 M00S13060.set +++| LPN 77 18865 M00S13061.set +++| LMC 200 18866 M00S13062.set +++| BVSA EQU *-1 18867 M00S13063.set +++| BVS12 STM DBUF+1 18868 M00S13064.set +++| LDN ECRL 18869 M00S13065.set +++| CRD CM 18870 M00S13066.set +++| LDM UESC PRESET SHIFT INSTRUCTIONS 18871 M00S13067.set +++| RAM BVSB 18872 M00S13068.set +++| LDM EMSC 18873 M00S13069.set +++| RAM BVSC 18874 M00S13070.set +++| LDD CM+1 SET USER XM / 1000 18875 M00S13071.set +++| BVSB SHN 14 18876 M00S13072.set +++|* SHN 14+UESC 18877 M00S13073.set +++| STM DBUF+2 18878 M00S13074.set +++| SHN -6 18879 M00S13075.set +++| SCN 7 18880 M00S13076.set +++| STM DBUF+3 18881 M00S13077.set +++| LDM EMFL SET TOTAL XM / 1000 18882 M00S13078.set +++| BVSC SHN 0 18883 M00S13079.set +++|* SHN EMSC 18884 M00S13080.set +++| STM DBUF+4 18885 M00S13081.set +++| SHN -14 18886 M00S13082.set +++| RAM DBUF+3 18887 M00S13083.set +++| LDC 1S6+77 SET LENGTH AND ID 18888 M00S13084.set +++| STM DBUF+HDID 18889 M00S13085.set +++| LCN 5*CMEI+2 SET EXTENDED MEMORY DESCRIPTOR ADDRESS 18890 M00S13086.set +++| RJM SDA 18891 M00S13087.set +++| LDN 5 COPY DESCRIPTOR TO SAB 18892 M00S13088.set +++| RJM CDS
Proceed to Part 11
cdc/nos2.source/opl.opl871/deck/set.010.txt · Last modified: (external edit)