Seq # *Modification Id* Act
----------------------------+
03144 M00S02823.1hy +++| ADD HN
03145 M00S02824.1hy +++| SBM SFRB,DT CHECK NEXT SECTOR
03146 M00S02825.1hy +++| LMD NR+2
03147 M00S02826.1hy +++| NJN SFR1 IF NOT NEXT SECTOR ON CONSECUTIVE TRACKS
03148 M00S02827.1hy +++| SFR6 LDD NB
03149 M00S02828.1hy +++| UJN SFR2 RETURN
03150 M00S02829.1hy +++|
03151 M00S02830.1hy +++|
03152 M00S02831.1hy +++| SFRA BSS 0 PHYSICAL SECTORS PER I/O BUFFER
03153 M00S02832.1hy +++| CON PSBFDF
03154 M00S02833.1hy +++| CON PSBFDH
03155 M00S02834.1hy +++|
03156 M00S02835.1hy +++| SFRB BSS 0 FACTOR FOR NEXT SECTOR CALCULATION
03157 M00S02836.1hy +++| CON PSPTDF-PSBFDF
03158 M00S02837.1hy +++| CON PSPTDH-PSBFDH
03159 M00S02838.1hy +++| SLB SPACE 4,15
03160 M00S02839.1hy +++|** SLB - SET LINKAGE BITS.
03161 M00S02840.1hy +++|*
03162 M00S02841.1hy +++|* ENTRY (PB) = *CBT* ORDINAL.
03163 M00S02842.1hy +++|* (RW) = READ / WRITE STATUS.
03164 M00S02843.1hy +++|*
03165 M00S02844.1hy +++|* EXIT LINKAGE BITS SET IN *CBT* ENTRY / UEM BUFFER.
03166 M00S02845.1hy +++|*
03167 M00S02846.1hy +++|* USES CM - CM+4, T0 - T6, UA - UA+1.
03168 M00S02847.1hy +++|*
03169 M00S02848.1hy +++|* CALLS RLB, SUA, WLB.
03170 M00S02849.1hy +++|*
03171 M00S02850.1hy +++|* MACROS CBTE.
03172 M00S02851.1hy +++|
03173 M00S02852.1hy +++|
03174 M00S02853.1hy +++| SLB SUBR ENTRY/EXIT
03175 M00S02854.1hy +++| LDD PB
03176 M00S02855.1hy +++| RJM SUA SET UEM ADDRESS
03177 M00S02856.1hy +++| LDN PAD1
03178 M00S02857.1hy +++| STD T2
03179 M00S02858.1hy +++| SRD T3
03180 M00S02859.1hy +++| LDN 5 UEM WORD COUNT
03181 M00S02860.1hy +++| STD T5
03182 M00S02861.1hy +++| LDM SLBB,RW SET PROCESSOR ADDRESS
03183 M00S02862.1hy +++| STM SLBA
03184 M00S02863.1hy +++| SLB1 LRD UA LOAD *R* REGISTER
03185 M00S02864.1hy +++| LDD PB
03186 M00S02865.1hy +++| SHN CBTLS READ CONTROL BUFFER WORD
03187 M00S02866.1hy +++| CBTE *
03188 M00S02867.1hy +++| ADC 0 FWA OF *CBT*
03189 M00S02868.1hy +++| ADD T2
03190 M00S02869.1hy +++| CRD CM
03191 M00S02870.1hy +++| LDC SBUF-4 SET BUFFER ADDRESS
03192 M00S02871.1hy +++| STD T1
03193 M00S02872.1hy +++| LDC 1S17 READ START OF BUFFER SEGMENT
03194 M00S02873.1hy +++| CRML SBUF,T5
03195 M00S02874.1hy +++| LDN CM+3 SET *CBT* ENTRY ADDRESS
03196 M00S02875.1hy +++| STD T6
03197 M00S02876.1hy +++| RJM 0 MOVE LINKAGE BITS
03198 M00S02877.1hy +++| SLBA EQU *-1
03199 M00S02878.1hy +++| LDN 10 ADVANCE *R* REGISTER IMAGE
03200 M00S02879.1hy +++| RAD UA+1
03201 M00S02880.1hy +++| SHN -14
03202 M00S02881.1hy +++| RAD UA
03203 M00S02882.1hy +++| AOD T2 ADVANCE CONTROL BUFFER WORD
03204 M00S02883.1hy +++| LMN PAD4+1
03205 M00S02884.1hy +++| NJN SLB1 IF NOT COMPLETE
03206 M00S02885.1hy +++| LRD T3
03207 M00S02886.1hy +++| UJP SLBX RETURN
03208 M00S02887.1hy +++|
03209 M00S02888.1hy +++|
03210 M00S02889.1hy +++| SLBB CON RLB
03211 M00S02890.1hy +++| CON WLB
03212 M00S02891.1hy +++| SRF SPACE 4,10
03213 M00S02892.1hy +++|** SRF - SET DRIVER RELOAD FLAG.
03214 M00S02893.1hy +++|*
03215 M00S02894.1hy +++|* EXIT (A) = 0.
03216 M00S02895.1hy +++|*
03217 M00S02896.1hy +++|* USES CM - CM+4.
03218 M00S02897.1hy +++|*
03219 M00S02898.1hy +++|* CALLS CMC, DCR.
03220 M00S02899.1hy +++|*
03221 M00S02900.1hy +++|* MACROS CHTE, MONITOR.
03222 M00S02901.1hy +++|
03223 M00S02902.1hy +++|
03224 M00S02903.1hy +++| SRF SUBR ENTRY/EXIT
03225 M00S02904.1hy +++| RJM CMC
03226 M00S02905.1hy +++| RJM DCR DROP CHANNEL RESERVATION
03227 M00S02906.1hy +++|* LDN 0
03228 M00S02907.1hy +++| STD CM+2 CLEAR UNUSED BYTE
03229 M00S02908.1hy +++| CHTE *
03230 M00S02909.1hy +++| LDC CTALL*2 ADDRESS OF CHANNEL CONTROLWARE TABLE ENTRY
03231 M00S02910.1hy +++| STD CM+4
03232 M00S02911.1hy +++| SHN -14
03233 M00S02912.1hy +++| STD CM+3
03234 M00S02913.1hy +++| LDN 1 SET NUMBER OF REQUESTS
03235 M00S02914.1hy +++| STD CM+1
03236 M00S02915.1hy +++| LDD MA STORE REQUEST IN MESSAGE BUFFER
03237 M00S02916.1hy +++| CWM SRFA,CM+1
03238 M00S02917.1hy +++| MONITOR UTEM SET RELOAD FLAG
03239 M00S02918.1hy +++|* LDN 0
03240 M00S02919.1hy +++| UJN SRFX RETURN
03241 M00S02920.1hy +++|
03242 M00S02921.1hy +++|
03243 M00S02922.1hy +++| SRFA VFD 1/0,5/0,6/1,6/,42/1
03244 M00S02923.1hy +++| SSD SPACE 4,15
03245 M00S02924.1hy +++|** SSD - SELECT SLAVE DEVICE.
03246 M00S02925.1hy +++|*
03247 M00S02926.1hy +++|* ENTRY (SF) = 1 IF DEVICE PREVIOUSLY SELECTED.
03248 M00S02927.1hy +++|* (UN) = UNIT NUMBER.
03249 M00S02928.1hy +++|*
03250 M00S02929.1hy +++|* EXIT (A) .NE. 0 IF DEVICE SELECTED.
03251 M00S02930.1hy +++|* (SF) = 1 IF DEVICE SELECTED.
03252 M00S02931.1hy +++|*
03253 M00S02932.1hy +++|* ERROR TO *ERR* IF SELECT REJECT.
03254 M00S02933.1hy +++|*
| Line S02934 Modification History |
M01 (Removed by) | 1hy7 |
Seq # *Modification Id* Act
----------------------------+
03255 M01S02934.1hy7 ---|* USES T2, T3.
03256 M01S02935.1hy7 ---|*
03257 M01S02936.1hy7 ---|* CALLS R1B, SAP, WFW.
03258 M01S02937.1hy7 ---|*
03259 M01S02938.1hy7 ---|* MACROS DELAY.
| Line S00004 Modification History |
M01 (Added by) | 1hy7 |
Seq # *Modification Id* Act
----------------------------+
03260 M01S00004.1hy7 +++|* USES T2.
03261 M01S00005.1hy7 +++|*
03262 M01S00006.1hy7 +++|* CALLS FCN, R1B, SAP, WFW.
03263 M00S02939.1hy +++|
03264 M00S02940.1hy +++|
03265 M00S02941.1hy +++| SSD4 AOD SF SET DEVICE SELECTED
03266 M00S02942.1hy +++|
03267 M00S02943.1hy +++| SSD SUBR ENTRY/EXIT
03268 M00S02944.1hy +++| LDD SF
03269 M00S02945.1hy +++| NJN SSDX IF DEVICE PREVIOUSLY SELECTED
03270 M00S02946.1hy +++| LDN DSRC
03271 M00S02947.1hy +++| STD T2
03272 M00S02948.1hy +++| RJM SAP SELECT ADAPTOR PORT
03273 M00S02949.1hy +++| SSD1 LDD UN
03274 M00S02950.1hy +++| LMC FWBS WRITE FUNCTION WORD
03275 M00S02951.1hy +++| RJM WFW
| Line S02952 Modification History |
M01 (Removed by) | 1hy7 |
Seq # *Modification Id* Act
----------------------------+
03276 M01S02952.1hy7 ---| LDN 50D SET LOCAL TIMEOUT = 50 MILLISECONDS
03277 M01S02953.1hy7 ---| STD T3
03278 M00S02954.1hy +++| SSD2 LDC FCRO GET OPERATIONAL STATUS
03279 M00S02955.1hy +++| RJM R1B
03280 M00S02956.1hy +++| SHN 0-11
03281 M00S02957.1hy +++| LPN 35 EXTRACT PAUSE, SYNC IN/OUT, SELECT ACTIVE
03282 M00S02958.1hy +++| LMN 1
03283 M00S02959.1hy +++| ZJN SSD4 IF DEVICE SELECTED
| Line S02960 Modification History |
M01 (Removed by) | 1hy7 |
Seq # *Modification Id* Act
----------------------------+
03284 M01S02960.1hy7 ---| DELAY 7
03285 M01S02961.1hy7 ---| SOD T3
03286 M01S02962.1hy7 ---| NJN SSD2 IF NOT TIMED OUT
| Line S00007 Modification History |
M01 (Added by) | 1hy7 |
Seq # *Modification Id* Act
----------------------------+
03287 M01S00007.1hy7 +++| LDC FCCH
03288 M01S00008.1hy7 +++| RJM FCN CLEAR SELECT HOLD
03289 M00S02963.1hy +++| SOD T2
03290 M00S02964.1hy +++| NJN SSD1 IF RETRY COUNT NOT EXHAUSTED
03291 M00S02965.1hy +++| LDC FCIS
03292 M00S02966.1hy +++| RJM R1B CHECK IDLE STATUS
03293 M00S02967.1hy +++| SHN -10
03294 M00S02968.1hy +++| LPML TMSK,UN
03295 M00S02969.1hy +++| ZJN SSD3 IF DRIVE NOT BUSY
03296 M00S02970.1hy +++| LDN EDRA&ETSL
03297 M00S02971.1hy +++| SSD3 LMN ETSL
03298 M00S02972.1hy +++| RJM ERR PROCESS ERROR
03299 M00S02973.1hy +++| STF SPACE 4,15
03300 M00S02974.1hy +++|** STF - REQUEST TRACK FLAW.
03301 M00S02975.1hy +++|*
03302 M00S02976.1hy +++|* ENTRY (CB) = CURRENT *CBT* ORDINAL.
03303 M00S02977.1hy +++|* (EO) = EST ORDINAL.
03304 M00S02978.1hy +++|*
03305 M00S02979.1hy +++|* USES CM - CM+4, T3 - T3+4.
03306 M00S02980.1hy +++|*
| Line S02981 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03307 M01S02981.271l716 ---|* CALLS CMC, DFM.
| Line S00072 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03308 M01S00072.271l716 +++|* CALLS CMC, C2D, IBM.
03309 M00S02982.1hy +++|*
03310 M00S02983.1hy +++|* MACROS CBTE, MONITOR.
03311 M00S02984.1hy +++|
03312 M00S02985.1hy +++|
03313 M00S02986.1hy +++| STF SUBR ENTRY/EXIT
03314 M00S02987.1hy +++| RJM CMC
03315 M00S02988.1hy +++| LDD EO CONVERT EST ORDINAL
03316 M00S02989.1hy +++| SHN -3
03317 M00S02990.1hy +++| RJM C2D
| Line S02991 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03318 M01S02991.271l716 ---| STM STFA+1 SET ORDINAL IN MESSAGE
| Line S00073 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03319 M01S00073.271l716 +++| STM STFB+1 SET ORDINAL IN MESSAGE
03320 M00S02992.1hy +++| LDD EO
03321 M00S02993.1hy +++| STD CM+1
03322 M00S02994.1hy +++| LPN 7
03323 M00S02995.1hy +++| SHN 6
03324 M00S02996.1hy +++| ADC 2R0,
| Line S02997 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03325 M01S02997.271l716 ---| STM STFA+2
| Line S00074 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03326 M01S00074.271l716 +++| STM STFB+2
03327 M00S02998.1hy +++| LDD CB FETCH *CBT* INFORMATION
03328 M00S02999.1hy +++| SHN CBTLS
03329 M00S03000.1hy +++| CBTE *
03330 M00S03001.1hy +++| ADC PAD1
03331 M00S03002.1hy +++| CRD T3
03332 M00S03003.1hy +++| LDD T3+1 DETERMINE LOGICAL TRACK NUMBER
03333 M00S03004.1hy +++| SHN 1
03334 M00S03005.1hy +++| ERRNZ LTCYDF-2 CODE DEPENDS ON VALUE
03335 M00S03006.1hy +++| ADC 4000
03336 M00S03007.1hy +++| ERRNZ LTCYDH-LTCYDF CODE DEPENDS ON VALUE
03337 M00S03008.1hy +++| STD CM+2
03338 M00S03009.1hy +++| LDD T3+2
03339 M00S03010.1hy +++| ERRNZ PTCYDF-4 CODE DEPENDS ON VALUE
03340 M00S03011.1hy +++| SHN -7
03341 M00S03012.1hy +++| ERRNZ PTCYDH-PTCYDF CODE DEPENDS ON VALUE
03342 M00S03013.1hy +++| RAD CM+2
03343 M00S03014.1hy +++| RJM C2D CONVERT TRACK NUMBER FOR MESSAGE
| Line S03015 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03344 M01S03015.271l716 ---| STM STFA+5
| Line S00075 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03345 M01S00075.271l716 +++| STM STFB+5
03346 M00S03016.1hy +++| LDD CM+2
03347 M00S03017.1hy +++| SHN -6
03348 M00S03018.1hy +++| RJM C2D
| Line S03019 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03349 M01S03019.271l716 ---| STM STFA+4
| Line S00076 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03350 M01S00076.271l716 +++| STM STFB+4
03351 M00S03020.1hy +++| LDK SFTS INSERT SUBFUNCTION
03352 M00S03021.1hy +++| STD CM+3
| Line S03022 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
03353 M01S03022.253l688 ---| MONITOR STBM SET TRACK FLAW REQUEST IN MST
| Line S00014 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
03354 M01S00014.253l688 +++| MONITOR SMDM SET TRACK FLAW REQUEST IN MST
03355 M00S03023.1hy +++| LDD CM+1
03356 M00S03024.1hy +++| NJN STF2 IF THIS FLAW ALREADY REQUESTED
| Line S03025 Modification History |
M01 (Removed by) | ns2596 |
Seq # *Modification Id* Act
----------------------------+
03357 M01S03025.ns2596 ---| LDC STFA+ERLN
| Line S00001 Modification History |
M01 (Added by) | ns2596 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03358 M02S00001.271l716 ---| LDC STFA+ERLN+400000
| Line S03026 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03359 M01S03026.271l716 ---| RJM DFM
| Line S00077 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03360 M01S00077.271l716 +++| LDC STFA
03361 M01S00078.271l716 +++| STM MAD1 ISSUE ERROR LOG MESSAGE
03362 M01S00079.271l716 +++| RJM IBM
03363 M00S03027.1hy +++| STF2 LJM STFX RETURN
03364 M00S03028.1hy +++|
03365 M00S03029.1hy +++|
| Line S03030 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03366 M01S03030.271l716 ---| STFA DATA C*EQXXX,TKNNNN, MEDIA DEFECT ENCOUNTERED.*
| Line S00080 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
03367 M01S00080.271l716 +++| STFA VFD 24/0 RESERVED
03368 M01S00081.271l716 +++| VFD 12/1 ERRLOG ALERT FLAG
03369 M01S00082.271l716 +++| VFD 12/STFAL MESSAGE LENGTH
03370 M01S00083.271l716 +++| VFD 12/ELDY ERRLOG DAYFILE
03371 M01S00084.271l716 +++|
03372 M01S00085.271l716 +++| STFB DATA C*EQXXX,TKNNNN, MEDIA DEFECT ENCOUNTERED.*
03373 M01S00086.271l716 +++|
03374 M01S00087.271l716 +++| .1 SET *-STFA+4
03375 M01S00088.271l716 +++| STFAL EQU .1/5
03376 M00S03031.1hy +++| STO SPACE 4,10
03377 M00S03032.1hy +++|** STO - SET TIMEOUT.
03378 M00S03033.1hy +++|*
03379 M00S03034.1hy +++|* ENTRY (A) = TIMEOUT VALUE (IN SECONDS).
03380 M00S03035.1hy +++|* (PO) = *PUT* ORDINAL.
03381 M00S03036.1hy +++|*
03382 M00S03037.1hy +++|* USES T5, T6, T7, CM - CM+4.
03383 M00S03038.1hy +++|*
03384 M00S03039.1hy +++|* MACROS FTTE.
03385 M00S03040.1hy +++|
03386 M00S03041.1hy +++|
03387 M00S03042.1hy +++| STO SUBR ENTRY/EXIT
03388 M00S03043.1hy +++| STD T6
03389 M00S03044.1hy +++| LDC RTCL FETCH CURRENT TIME
03390 M00S03045.1hy +++| CRD CM
03391 M00S03046.1hy +++| LDD T6
03392 M00S03047.1hy +++| RAD CM+1 SET TIME LIMIT
03393 M00S03048.1hy +++| SHN -14
03394 M00S03049.1hy +++| RAD CM
03395 M00S03050.1hy +++| LDM STO SET CALLERS ADDRESS
03396 M00S03051.1hy +++| STD T7
03397 M00S03052.1hy +++| LDN 0
03398 M00S03053.1hy +++| STD T5
03399 M00S03054.1hy +++| LDD PO STORE TABLE ENTRY
03400 M00S03055.1hy +++| SHK FTTLS
03401 M00S03056.1hy +++| FTTE *
03402 M00S03057.1hy +++| ADC 0
03403 M00S03058.1hy +++| CWD T5
03404 M00S03059.1hy +++| UJN STOX RETURN
03405 M00S03060.1hy +++| SUA SPACE 4,10
03406 M00S03061.1hy +++|** SUA - SET UEM ADDRESS.
03407 M00S03062.1hy +++|*
03408 M00S03063.1hy +++|* ENTRY (A) = *CBT* ORDINAL.
03409 M00S03064.1hy +++|*
03410 M00S03065.1hy +++|* EXIT (UA - UA+1) = UEM ADDRESS / 100.
03411 M00S03066.1hy +++|*
03412 M00S03067.1hy +++|* USES CM - CM+4.
03413 M00S03068.1hy +++|*
03414 M00S03069.1hy +++|* MACROS CBTE.
03415 M00S03070.1hy +++|
03416 M00S03071.1hy +++|
03417 M00S03072.1hy +++| SUA SUBR ENTRY/EXIT
03418 M00S03073.1hy +++| SHN CBTLS
03419 M00S03074.1hy +++| CBTE *
03420 M00S03075.1hy +++| ADC IOLK READ *CBT* ENTRY
03421 M00S03076.1hy +++| CRD CM
03422 M00S03077.1hy +++| LDD CM+4 EXTRACT RELATIVE UEM ADDRESS
03423 M00S03078.1hy +++| ADC 0
03424 M00S03079.1hy +++| SUAA EQU *-1
03425 M00S03080.1hy +++| SHN -6
03426 M00S03081.1hy +++| STD UA+1 SET ABSOLUTE ADDRESS / 100
03427 M00S03082.1hy +++| LDD CM+3
03428 M00S03083.1hy +++| ADC 0
03429 M00S03084.1hy +++| SUAB EQU *-1
03430 M00S03085.1hy +++| SHN 6
03431 M00S03086.1hy +++| RAD UA+1
03432 M00S03087.1hy +++| SHN -14
03433 M00S03088.1hy +++| STD UA
03434 M00S03089.1hy +++| UJN SUAX RETURN
03435 M00S03090.1hy +++| SUI SPACE 4,15
03436 M00S03091.1hy +++|** SUI - SET UNIT INTERLOCK.
03437 M00S03092.1hy +++|*
03438 M00S03093.1hy +++|* ENTRY (PO) = *PUT ORDINAL.
03439 M00S03094.1hy +++|*
03440 M00S03095.1hy +++|* EXIT (A) = 0 IF *PUT* ENTRY INTERLOCKED.
03441 M00S03096.1hy +++|* (UC) = UNIT ACTIVITY COUNT INCREMENTED.
03442 M00S03097.1hy +++|*
03443 M00S03098.1hy +++|* USES CM - CM+4.
03444 M00S03099.1hy +++|*
03445 M00S03100.1hy +++|* CALLS CMC.
03446 M00S03101.1hy +++|*
03447 M00S03102.1hy +++|* MACROS MONITOR.
03448 M00S03103.1hy +++|
03449 M00S03104.1hy +++|
03450 M00S03105.1hy +++| SUI1 AOD UC ADVANCE UNIT ASSIGNED COUNT
03451 M00S03106.1hy +++| LDN 0
03452 M00S03107.1hy +++|
03453 M00S03108.1hy +++| SUI SUBR ENTRY/EXIT
03454 M00S03109.1hy +++| RJM CMC
03455 M00S03110.1hy +++| LDD PO SET *PUT* ORDINAL
03456 M00S03111.1hy +++| STD CM+2
03457 M00S03112.1hy +++| LDN SUIS SET SUBFUNCTION
03458 M00S03113.1hy +++| STD CM+1
03459 M00S03114.1hy +++| MONITOR BIOM INTERLOCK DEVICE
03460 M00S03115.1hy +++| LDD CM+1
03461 M00S03116.1hy +++| ZJN SUI1 IF INTERLOCK ACQUIRED
03462 M00S03117.1hy +++| LMD OA
03463 M00S03118.1hy +++| UJN SUIX RETURN
03464 M00S03119.1hy +++| TMSE SPACE 4,10
03465 M00S03120.1hy +++|** TMSE - TABLE OF MASS STORAGE ERROR CODES.
03466 M00S03121.1hy +++|*
03467 M00S03122.1hy +++|* INDEXED BY FAULT CODE / 4.
03468 M00S03123.1hy +++|
03469 M00S03124.1hy +++|
03470 M00S03125.1hy +++| TMSE BSS 0
03471 M00S03126.1hy +++| LOC 0
03472 M00S03127.1hy +++|
03473 M00S03128.1hy +++| CON CHPE CHANNEL PARITY
03474 M00S03129.1hy +++| CON CHFE CHANNEL FAILURE
03475 M00S03130.1hy +++| CON FTOE FUNCTION TIMEOUT
03476 M00S03131.1hy +++| CON PARE DATA PARITY (MEDIA)
03477 M00S03132.1hy +++| CON NRDE DEVICE NOT READY
03478 M00S03133.1hy +++| CON IDTE DATA TRANSFER
03479 M00S03134.1hy +++| CON DSTE DEVICE STATUS
03480 M00S03135.1hy +++| CON DSTE DEVICE STATUS
03481 M00S03136.1hy +++| CON DSTE DEVICE STATUS
03482 M00S03137.1hy +++| CON DSTE DEVICE STATUS
03483 M00S03138.1hy +++| CON DDFE DIAGNOSTIC FAILURE
03484 M00S03139.1hy +++| CON DRVE DRIVE RESERVED
03485 M00S03140.1hy +++| LOC *O
03486 M00S03141.1hy +++| TMSK SPACE 4,10
03487 M00S03142.1hy +++|** TMSK - TABLE OF UNIT MASKS.
03488 M00S03143.1hy +++|*
03489 M00S03144.1hy +++|* INDEXED BY UNIT NUMBER.
03490 M00S03145.1hy +++|
03491 M00S03146.1hy +++|
03492 M00S03147.1hy +++| TMSK BSS 0
03493 M00S03148.1hy +++| LOC 0
03494 M00S03149.1hy +++|
03495 M00S03150.1hy +++| CON 200
03496 M00S03151.1hy +++| CON 100
03497 M00S03152.1hy +++| CON 040
03498 M00S03153.1hy +++| CON 020
03499 M00S03154.1hy +++| CON 010
03500 M00S03155.1hy +++| CON 004
03501 M00S03156.1hy +++| CON 002
03502 M00S03157.1hy +++| CON 001
03503 M00S03158.1hy +++| LOC *O
03504 M00S03159.1hy +++| UEC SPACE 4,15
03505 M00S03160.1hy +++|** UEC - UPDATE MST ERROR COUNT.
03506 M00S03161.1hy +++|*
03507 M00S03162.1hy +++|* ENTRY (EO) = EST ORDINAL.
03508 M00S03163.1hy +++|* (BMLM+2) = BML MESSAGE SYMPTOM CODE.
03509 M00S03164.1hy +++|* (MISC - BIT 0) = 1 IF UNRECOVERED ERROR.
03510 M00S03165.1hy +++|*
03511 M00S03166.1hy +++|* USES CM - CM+4.
03512 M00S03167.1hy +++|*
03513 M00S03168.1hy +++|* MACROS MONITOR.
03514 M00S03169.1hy +++|
03515 M00S03170.1hy +++|
03516 M00S03171.1hy +++| UEC SUBR ENTRY/EXIT
03517 M00S03172.1hy +++| LDM BMLM+1
| Line S03173 Modification History |
M01 (Removed by) | ns2714 |
Seq # *Modification Id* Act
----------------------------+
03518 M01S03173.ns2714 ---| LMC HD0105
| Line S00001 Modification History |
M01 (Added by) | ns2714 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
03519 M02S00001.272l774 ---| LMC D1HY*400+HD0105
| Line S00002 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
03520 M01S00002.272l774 +++| LMC D1HY*400+HD0111
03521 M00S03174.1hy +++| NJN UECX IF NOT COMPLETION MESSAGE
03522 M00S03175.1hy +++| LDD EO
03523 M00S03176.1hy +++| STD CM+1 SET EST ORDINAL
03524 M00S03177.1hy +++| LDM MISC
03525 M00S03178.1hy +++| LPN 1 SET BYTE NUMBER
03526 M00S03179.1hy +++| ADN 3
03527 M00S03180.1hy +++| STD CM+2
03528 M00S03181.1hy +++| LDN ICTS INCREMENT ERROR COUNT
03529 M00S03182.1hy +++| STD CM+3
| Line S03183 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
03530 M01S03183.253l688 ---| MONITOR STBM
| Line S00015 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
03531 M01S00015.253l688 +++| MONITOR SMDM
03532 M00S03184.1hy +++| UJN UECX RETURN
03533 M00S03185.1hy +++| UHD SPACE 4,15
03534 M00S03186.1hy +++|** UHD - UNPACK HEX DATA.
03535 M00S03187.1hy +++|*
03536 M00S03188.1hy +++|* ENTRY (A) = 6/ BC, 12/ SA
03537 M00S03189.1hy +++|* BC = BYTE COUNT OF HEX DATA.
03538 M00S03190.1hy +++|* SA = SOURCE DATA ADDRESS.
03539 M00S03191.1hy +++|* (T3) = DESTINATION DATA ADDRESS.
03540 M00S03192.1hy +++|*
03541 M00S03193.1hy +++|* EXIT (A) = CM WORD COUNT OF 12 BIT DATA.
03542 M00S03194.1hy +++|*
03543 M00S03195.1hy +++|* USES T2, T4, T5.
03544 M00S03196.1hy +++|*
03545 M00S03197.1hy +++|* CALLS DV5.
03546 M00S03198.1hy +++|
03547 M00S03199.1hy +++|
03548 M00S03200.1hy +++| UHD3 AOD T3 SET END OF 12 BIT DATA
03549 M00S03201.1hy +++| STM UHDA
03550 M00S03202.1hy +++| LDN ZERL ENSURE ZERO FILL TO CM WORD BOUNDARY
03551 M00S03203.1hy +++| CRM *,ON
03552 M00S03204.1hy +++| UHDA EQU *-1
03553 M00S03205.1hy +++| LDD T3 SET BYTE COUNT OF 12 BIT DATA
03554 M00S03206.1hy +++| SBD T5
03555 M00S03207.1hy +++| RJM DV5 CONVERT TO CM WORD COUNT
03556 M00S03208.1hy +++|
03557 M00S03209.1hy +++| UHD SUBR ENTRY/EXIT
03558 M00S03210.1hy +++| STD T2
03559 M00S03211.1hy +++| SHN -14 SET BYTE COUNT
03560 M00S03212.1hy +++| STD T4
03561 M00S03213.1hy +++| LDD T3 PRESERVE DESTINATION BUFFER ADDRESS
03562 M00S03214.1hy +++| STD T5
03563 M00S03215.1hy +++| UHD1 LDIL T2 UNPACK N+3RD BYTE
03564 M00S03216.1hy +++| SHN 16
03565 M00S03217.1hy +++| STI T3
03566 M00S03218.1hy +++| SHN -6
03567 M00S03219.1hy +++| SCN 77
03568 M00S03220.1hy +++| STM 1,T3
03569 M00S03221.1hy +++| AOD T3
03570 M00S03222.1hy +++| SOD T4
03571 M00S03223.1hy +++| UHD2 ZJN UHD3 IF END OF HEX DATA
03572 M00S03224.1hy +++| AOD T2
03573 M00S03225.1hy +++| LDIL T2 UNPACK N+4TH BYTE
03574 M00S03226.1hy +++| SHN -10
03575 M00S03227.1hy +++| RAI T3
03576 M00S03228.1hy +++| AOD T3
03577 M00S03229.1hy +++| LDIL T2
03578 M00S03230.1hy +++| SHN 4
03579 M00S03231.1hy +++| SCN 17
03580 M00S03232.1hy +++| STI T3
03581 M00S03233.1hy +++| SOD T4
03582 M00S03234.1hy +++| ZJN UHD2 IF END OF HEX DATA
03583 M00S03235.1hy +++| AOD T2
03584 M00S03236.1hy +++| LDIL T2 UNPACK N+5TH BYTE
03585 M00S03237.1hy +++| STM 1,T3
03586 M00S03238.1hy +++| SHN -14
03587 M00S03239.1hy +++| RAI T3
03588 M00S03240.1hy +++| AOD T3
03589 M00S03241.1hy +++| SOD T4
03590 M00S03242.1hy +++| ZJN UHD2 IF END OF HEX DATA
03591 M00S03243.1hy +++| AOD T2
03592 M00S03244.1hy +++| AOD T3
03593 M00S03245.1hy +++| UJP UHD1 CONTINUE UNPACK
03594 M00S03246.1hy +++| WBD SPACE 4,10
03595 M00S03247.1hy +++|** WBD - WRITE BUFFERED DISK.
03596 M00S03248.1hy +++|*
03597 M00S03249.1hy +++|* ENTRY (CB) = CURRENT *CBT* ORDINAL.
03598 M00S03250.1hy +++|*
03599 M00S03251.1hy +++|* EXIT (A) = *ETTR* IF *T* REGISTER EMPTY TIMEOUT.
03600 M00S03252.1hy +++|*
03601 M00S03253.1hy +++|* CALLS COS, EIO, SFR, WTR.
03602 M00S03254.1hy +++|
03603 M00S03255.1hy +++|
03604 M00S03256.1hy +++| WBD2 RJM WTR WRITE *T* REGISTER
03605 M00S03257.1hy +++| RJM SFR
03606 M00S03258.1hy +++| NJN WBD1 IF CONSECUTIVE REQUEST FOUND
03607 M00S03259.1hy +++|
03608 M00S03260.1hy +++| WBD SUBR ENTRY/EXIT
03609 M00S03261.1hy +++| LDD CB
03610 M00S03262.1hy +++| WBD1 STD CB ENTER REQUEST IN I/O QUEUE
03611 M00S03263.1hy +++| RJM EIO
03612 M00S03264.1hy +++| LDN 2 CHECK OPERATIONAL STATUS
03613 M00S03265.1hy +++| RJM COS
03614 M00S03266.1hy +++| ZJN WBD2 IF *T* REGISTER EMPTY
03615 M00S03267.1hy +++| LDN ETTR
03616 M00S03268.1hy +++| UJN WBDX RETURN ERROR
03617 M00S03269.1hy +++| WCB SPACE 4,15
03618 M00S03270.1hy +++|** WCB - WRITE COMMAND BLOCK.
03619 M00S03271.1hy +++|*
03620 M00S03272.1hy +++|* ENTRY (A) = 1/ CA, 1/, 16/ CC
03621 M00S03273.1hy +++|* CA = 1 IF NOT CLEARING ATTENTION.
03622 M00S03274.1hy +++|* CC = COMMAND CODE.
03623 M00S03275.1hy +++|* (TO) = TIMEOUT VALUE FOR *FTT*.
03624 M00S03276.1hy +++|*
03625 M00S03277.1hy +++|* USES T3.
03626 M00S03278.1hy +++|*
03627 M00S03279.1hy +++|* CALLS FCN, R1B, STO, WFW, WTC.
03628 M00S03280.1hy +++|
03629 M00S03281.1hy +++|
03630 M00S03282.1hy +++| WCB SUBR ENTRY/EXIT
03631 M00S03283.1hy +++| STML WCBA+7
| Line S03284 Modification History |
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03632 M01S03284.ns2769 ---| STML LCMD
| Line S00129 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03633 M01S00129.ns2769 +++| STML LCMD,DI
03634 M00S03285.1hy +++| SHN 0-21 EXTRACT *CLEAR ATTENTION* STATUS
03635 M00S03286.1hy +++| SHN 14-0
03636 M00S03287.1hy +++| LMC FWCB INITIATE COMMAND BLOCK WRITE
03637 M00S03288.1hy +++| WCB1 RJM WFW
03638 M00S03289.1hy +++| LDN 10 SET LENGTH OF BLOCK
03639 M00S03290.1hy +++| ACN CH
03640 M00S03291.1hy +++| OAM WCBA,CH OUTPUT COMMAND BLOCK
03641 M00S03292.1hy +++| RJM WTC
03642 M00S03293.1hy +++| LDC 250D SET LOCAL TIMEOUT
03643 M00S03294.1hy +++| STD T3
03644 M00S03295.1hy +++| WCB2 LDC FCRO GET OPERATIONAL STATUS
03645 M00S03296.1hy +++| RJM R1B
03646 M00S03297.1hy +++| LPN 1
03647 M00S03298.1hy +++| NJN WCB4 IF COMMAND BLOCK TRANSFER INCOMPLETE
03648 M00S03299.1hy +++|* LDN 0
03649 M00S03300.1hy +++| STM WCBA+4 CLEAR PARAMETER WORD
03650 M00S03301.1hy +++| LDC FCCS
03651 M00S03302.1hy +++| RJM FCN CLEAR COMMAND SEQUENCE
03652 M00S03303.1hy +++| LDD TO
03653 M00S03304.1hy +++| RJM STO SET REQUEST TIMEOUT
03654 M00S03305.1hy +++| WCB3 UJP WCBX RETURN
03655 M00S03306.1hy +++|
03656 M00S03307.1hy +++| WCB4 DELAY 7 WAIT AWHILE
03657 M00S03308.1hy +++| SOD T3
03658 M00S03309.1hy +++| NJN WCB2 IF NOT TIMEOUT
03659 M00S03310.1hy +++| LDN ETCB
03660 M00S03311.1hy +++| RJM ERR PROCESS ERROR
03661 M00S03312.1hy +++|
03662 M00S03313.1hy +++|
03663 M00S03314.1hy +++| WCBA BSS 10 COMMAND BLOCK
03664 M00S03315.1hy +++| WFC SPACE 4,10
03665 M00S03316.1hy +++|** WFC - WRITE FUNCTION WORD AND CLEAR.
03666 M00S03317.1hy +++|*
03667 M00S03318.1hy +++|* ENTRY (A) = FUNCTION WORD.
03668 M00S03319.1hy +++|*
03669 M00S03320.1hy +++|* CALLS FCN, WFW.
03670 M00S03321.1hy +++|
03671 M00S03322.1hy +++|
03672 M00S03323.1hy +++| WFC SUBR ENTRY/EXIT
03673 M00S03324.1hy +++| RJM WFW WRITE FUNCTION WORD
03674 M00S03325.1hy +++| LDC FCCS CLEAR COMMAND SEQUENCE
03675 M00S03326.1hy +++| RJM FCN
03676 M00S03327.1hy +++| UJN WFCX RETURN
03677 M00S03328.1hy +++| WFW SPACE 4,10
03678 M00S03329.1hy +++|** WFW - WRITE FUNCTION WORD.
03679 M00S03330.1hy +++|*
03680 M00S03331.1hy +++|* ENTRY (A) = FUNCTION WORD.
03681 M00S03332.1hy +++|*
03682 M00S03333.1hy +++|* CALLS FCN, WTC.
03683 M00S03334.1hy +++|
03684 M00S03335.1hy +++|
03685 M00S03336.1hy +++| WFW SUBR ENTRY/EXIT
03686 M00S03337.1hy +++| STML WFWA
03687 M00S03338.1hy +++| LDC FCCS CLEAR COMMAND SEQUENCE
03688 M00S03339.1hy +++| RJM FCN
03689 M00S03340.1hy +++| LDC FCSS SET COMMAND SEQUENCE / SELECT HOLD
03690 M00S03341.1hy +++| RJM FCN
03691 M00S03342.1hy +++| LDN 1 SET BYTE COUNT
03692 M00S03343.1hy +++| ACN CH
03693 M00S03344.1hy +++| OAM WFWA,CH OUTPUT FUNCTION WORD
03694 M00S03345.1hy +++| RJM WTC
03695 M00S03346.1hy +++| UJN WFWX RETURN
03696 M00S03347.1hy +++|
03697 M00S03348.1hy +++|
03698 M00S03349.1hy +++| WFWA CON 0 FUNCTION WORD BUFFER
03699 M00S03350.1hy +++| WLB SPACE 4,10
03700 M00S03351.1hy +++|** WLB - WRITE LINKAGE BITS.
03701 M00S03352.1hy +++|*
03702 M00S03353.1hy +++|* ENTRY (A) = (T6) = ADDRESS FOR LINKAGE IN (CM - CM+4).
03703 M00S03354.1hy +++|* (T1) = DATA BUFFER ADDRESS.
03704 M00S03355.1hy +++|* (T5) = NUMBER OF WORDS TO WRITE.
03705 M00S03356.1hy +++|* (CM - CM+4) = *PAD* WORD OF *CBT* ENTRY.
03706 M00S03357.1hy +++|*
03707 M00S03358.1hy +++|* EXIT SECTOR LINKAGE SET IN DATA BUFFER.
03708 M00S03359.1hy +++|*
03709 M00S03360.1hy +++|* USES T6.
03710 M00S03361.1hy +++|
03711 M00S03362.1hy +++|
03712 M00S03363.1hy +++| WLB1 LDN 10+4 ADVANCE BUFFER ADDRESS
03713 M00S03364.1hy +++| RAD T1
03714 M00S03365.1hy +++| LDI T6 EXTRACT LINKAGE FROM *CBT* ENTRY
03715 M00S03366.1hy +++| SHN -10
03716 M00S03367.1hy +++|* LPN 17
03717 M00S03368.1hy +++| SHN 14 POSITION FOR DATA BUFFER
03718 M00S03369.1hy +++| LMI T1
03719 M00S03370.1hy +++| STIL T1
03720 M00S03371.1hy +++| WLB2 LDI T6 EXTRACT LINKAGE FROM *CBT* ENTRY
03721 M00S03372.1hy +++| SHN -4
03722 M00S03373.1hy +++| LPN 17
03723 M00S03374.1hy +++| SHN 14 POSITION FOR DATA BUFFER
03724 M00S03375.1hy +++| LMM 4,T1
03725 M00S03376.1hy +++| STML 4,T1
03726 M00S03377.1hy +++| LDI T6 EXTRACT LINKAGE FROM *CBT* ENTRY
03727 M00S03378.1hy +++|* SHN 0
03728 M00S03379.1hy +++| LPN 17
03729 M00S03380.1hy +++| SHN 14 POSITION FOR DATA BUFFER
03730 M00S03381.1hy +++| LMM 10,T1
03731 M00S03382.1hy +++| STML 10,T1
03732 M00S03383.1hy +++| AOD T6 ADVANCE *CBT* WORD ADDRESS
03733 M00S03384.1hy +++| LMN CM+5
03734 M00S03385.1hy +++| NJN WLB1 IF MORE LINKAGE
03735 M00S03386.1hy +++| LDC 1S17
03736 M00S03387.1hy +++| CWML SBUF,T5 UPDATE DATA BUFFER
03737 M00S03388.1hy +++|
03738 M00S03389.1hy +++| WLB SUBR ENTRY/EXIT
03739 M00S03390.1hy +++|* LDD T6
03740 M00S03391.1hy +++| UJN WLB2 MOVE SECTOR LINKAGE
03741 M00S03392.1hy +++| WMC SPACE 4,10
03742 M00S03393.1hy +++|** WMC - WAIT MAINTENANCE CHANNEL EMPTY.
03743 M00S03394.1hy +++|*
03744 M00S03395.1hy +++|* ENTRY (A) = 0 IF TRANSFER COMPLETE.
03745 M00S03396.1hy +++|* (T5) = 0 IF INITIAL ENTRY.
03746 M00S03397.1hy +++|*
03747 M00S03398.1hy +++|* EXIT (A) = 0 IF CHANNEL EMPTY.
03748 M00S03399.1hy +++|* = (T5) IF CHANNEL HUNG FULL.
03749 M00S03400.1hy +++|*
03750 M00S03401.1hy +++|* USES CM - CM+4.
03751 M00S03402.1hy +++|
03752 M00S03403.1hy +++|
03753 M00S03404.1hy +++| WMC3 LDD T5
03754 M00S03405.1hy +++| ZJN WMCX IF NO ERRORS
03755 M00S03406.1hy +++| LDN ZERL
03756 M00S03407.1hy +++| CRD CM CLEAR BUFFER
03757 M00S03408.1hy +++| LDD CP
03758 M00S03409.1hy +++| ADN MS2W CLEAR CP MESSAGE
03759 M00S03410.1hy +++| CWD CM
03760 M00S03411.1hy +++| LDN 0 INDICATE CHANNEL EMPTY
03761 M00S03412.1hy +++|
03762 M00S03413.1hy +++| WMC SUBR ENTRY/EXIT
03763 M00S03414.1hy +++| NJN WMC2 IF INCOMPLETE TRANSFER
03764 M00S03415.1hy +++| LDD TH
03765 M00S03416.1hy +++| WMC1 EJM. WMC3,MR IF TRANSMISSION COMPLETE
03766 M00S03417.1hy +++| SBN 1
03767 M00S03418.1hy +++| NJN WMC1 IF NOT TIMED OUT
03768 M00S03419.1hy +++| WMC2 DCN. MR+40
03769 M00S03420.1hy +++| CCF. *+2,MR CLEAR CHANNEL FLAG
03770 M00S03421.1hy +++| LDD CP
03771 M00S03422.1hy +++| ADN MS2W STORE CP MESSAGE
03772 M00S03423.1hy +++| CWM WMCA,TR
03773 M00S03424.1hy +++| STD T5
03774 M00S03425.1hy +++| UJN WMCX RETURN
03775 M00S03426.1hy +++|
03776 M00S03427.1hy +++|
03777 M00S03428.1hy +++| WMCA DATA C*MR ERROR.*
03778 M00S03429.1hy +++| WTC SPACE 4,10
03779 M00S03430.1hy +++|** WTC - WAIT TRANSMISSION COMPLETE.
03780 M00S03431.1hy +++|*
03781 M00S03432.1hy +++|* EXIT (A) = 0.
03782 M00S03433.1hy +++|*
03783 M00S03434.1hy +++|* ERROR TO *ERR*.
03784 M00S03435.1hy +++|*
03785 M00S03436.1hy +++|* USES T1.
03786 M00S03437.1hy +++|*
03787 M00S03438.1hy +++|* CALLS CFE.
03788 M00S03439.1hy +++|
03789 M00S03440.1hy +++|
03790 M00S03441.1hy +++| WTC3 LDD T1 CHECK FOR I/O ERROR
03791 M00S03442.1hy +++| RJM CFE
03792 M00S03443.1hy +++|* LDN 0 EXIT CONDITION FROM *CFE*
03793 M00S03444.1hy +++|
03794 M00S03445.1hy +++| WTC SUBR ENTRY/EXIT
03795 M00S03446.1hy +++| STD T1
03796 M00S03447.1hy +++| LDN 5 SET TIMEOUT = 5*262 MILLISECONDS
03797 M00S03448.1hy +++| STD T0
03798 M00S03449.1hy +++| WTC1 LDN 0
03799 M00S03450.1hy +++| WTC2 EJM WTC3,CH IF LAST BYTE TAKEN OFF CHANNEL
03800 M00S03451.1hy +++| SBN 1
03801 M00S03452.1hy +++| NJN WTC2 IF NOT TIMED OUT
03802 M00S03453.1hy +++| SOD T0
03803 M00S03454.1hy +++| NJN WTC1 IF NOT TIMEOUT
03804 M00S03455.1hy +++| DCN CH+40
03805 M00S03456.1hy +++| LDN ECHF
03806 M00S03457.1hy +++| RJM ERR PROCESS CHANNEL ERROR
03807 M00S03458.1hy +++| WTR SPACE 4,10
03808 M00S03459.1hy +++|** WTR - WRITE *T* REGISTER.
03809 M00S03460.1hy +++|*
03810 M00S03461.1hy +++|* ENTRY (CB) = *CBT* ORDINAL.
03811 M00S03462.1hy +++|* (TO) = TIMEOUT VALUE FOR *FTT*.
03812 M00S03463.1hy +++|*
03813 M00S03464.1hy +++|* CALLS FCN, STO, SUA, WTC.
03814 M00S03465.1hy +++|
03815 M00S03466.1hy +++|
03816 M00S03467.1hy +++| WTR SUBR ENTRY/EXIT
03817 M00S03468.1hy +++| LDD CB
03818 M00S03469.1hy +++| RJM SUA SET UEM ADDRESS
03819 M00S03470.1hy +++| LDD UA+1
03820 M00S03471.1hy +++| SHN 11
03821 M00S03472.1hy +++| SCN 7
03822 M00S03473.1hy +++| STML WTRA+2 FORM ABSOLUTE UEM ADDRESS
03823 M00S03474.1hy +++| LDD UA
03824 M00S03475.1hy +++| SHN 14
03825 M00S03476.1hy +++| LMD UA+1
03826 M00S03477.1hy +++| SHN 11-20 SET IN *T* REGISTER
03827 M00S03478.1hy +++| STM WTRA+1
03828 M00S03479.1hy +++| LDC FCWT ISSUE WRITE *T* REGISTER FUNCTION
03829 M00S03480.1hy +++| RJM FCN
03830 M00S03481.1hy +++| LDN 3 SET BLOCK LENGTH
03831 M00S03482.1hy +++| ACN CH
03832 M00S03483.1hy +++| OAM WTRA,CH OUTPUT BUFFER PARAMETERS
03833 M00S03484.1hy +++| RJM WTC
03834 M00S03485.1hy +++| LDD TO SET REQUEST TIMEOUT
03835 M00S03486.1hy +++| RJM STO
03836 M00S03487.1hy +++| UJP WTRX RETURN
03837 M00S03488.1hy +++|
03838 M00S03489.1hy +++|
03839 M00S03490.1hy +++| WTRA BSS 0 *T* REGISTER BUFFER
03840 M00S03491.1hy +++| CONL 40000 BYTE LENGTH OF I/O TRANSFER
03841 M00S03492.1hy +++| CONL 0,0 UEM ADDRESS OF BUFFER
03842 M00S03493.1hy +++| TITLE MISCELLANEOUS.
03843 M00S03494.1hy +++| SPACE 4,10
03844 M00S03495.1hy +++|** COMMON DECKS.
03845 M00S03496.1hy +++|
03846 M00S03497.1hy +++|
03847 M00S03498.1hy +++|*CALL COMPC2D
03848 M00S03499.1hy +++| RND$ EQU 0 DEFINE ROUNDING FOR *COMPDV5*
03849 M00S03500.1hy +++|*CALL COMPDV5
| Line S00130 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03850 M01S00130.ns2769 +++| M8K$ EQU 1 USE LONG INSTRUCTIONS
03851 M01S00131.ns2769 +++|*CALL COMPIMB
03852 M00S03501.1hy +++|*CALL COMPSES
03853 M00S03502.1hy +++| SPACE 4,10
03854 M00S03503.1hy +++|** BUFFERS.
03855 M00S03504.1hy +++|
03856 M00S03505.1hy +++|
03857 M00S03506.1hy +++| SLST BSS 0 SLAVE STATUS
03858 M00S03507.1hy +++| DVST EQU SLST+SLSTL DEVICE STATUS
03859 M00S03508.1hy +++|
| Line S03509 Modification History |
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03860 M01S03509.ns2769 ---| EBUF EQU DVST+DVSTL ERROR MESSAGE ASSEMBLY BUFFER
| Line S00132 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03861 M01S00132.ns2769 +++| EHDR EQU DVST+DVSTL ERROR MESSAGE HEADER BUFFER
03862 M01S00133.ns2769 +++| EBUF EQU EHDR+5*3 ERROR MESSAGE ASSEMBLY BUFFER
03863 M00S03510.1hy +++| CODE EQU EBUF INITIAL FAULT CODE
03864 M00S03511.1hy +++| FCS1 EQU EBUF+1 FAULT CODE - ERROR STEP 1
03865 M00S03512.1hy +++| FCS2 EQU EBUF+2 FAULT CODE - ERROR STEP 2
03866 M00S03513.1hy +++| FCS3 EQU EBUF+3 FAULT CODE - ERROR STEP 3
03867 M00S03514.1hy +++| FALT EQU EBUF+4 FINAL FAULT CODE
03868 M00S03515.1hy +++| RSVD EQU EBUF+5 RESERVED
03869 M00S03516.1hy +++| RBCT EQU EBUF+6 RESIDUAL BYTE COUNT
03870 M00S03517.1hy +++| STCT EQU EBUF+7 SECTORS TRANSFERED COUNT
03871 M00S03518.1hy +++| ICYL EQU EBUF+10 CYLINDER ON INITIAL SEEK
03872 M00S03519.1hy +++| ITAS EQU EBUF+11 TRACK + SECTOR ON INITIAL SEEK
03873 M00S03520.1hy +++|
03874 M00S03521.1hy +++| DBUF EQU EBUF+EBUFL DATA BUFFER
03875 M00S03522.1hy +++| EXST EQU DBUF EXECUTION STATUS
03876 M00S03523.1hy +++| IDST EQU DBUF+1 IDLE STATUS
03877 M00S03524.1hy +++| BSRN EQU DBUF+2 BIT SIGNIFICANT RESPONSE
03878 M00S03525.1hy +++| LSCC EQU DBUF+3 LAST SLAVE COMMAND
03879 M00S03526.1hy +++| LCFN EQU DBUF+4 LAST CHANNEL FUNCTION
03880 M00S03527.1hy +++| RBUF EQU DBUF+5 REGISTER BUFFER
03881 M00S03528.1hy +++|
| Line S03529 Modification History |
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03882 M01S03529.ns2769 ---| MBUF EQU DBUF+DBUFL MESSAGE ASSEMBLY BUFFER
| Line S00134 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03883 M01S00134.ns2769 +++| SBUF EQU DBUF+DBUFL SCRATCH BUFFER
03884 M00S03530.1hy +++|
| Line S03531 Modification History |
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03885 M01S03531.ns2769 ---| SBUF EQU MBUF-5*3 SCRATCH BUFFER
| Line S00135 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03886 M01S00135.ns2769 +++| MBUF EQU SBUF+5*3 MESSAGE ASSEMBLY BUFFER
03887 M00S03532.1hy +++| TITLE PRESET ROUTINES.
03888 M00S03533.1hy +++| CCP SPACE 4,10
03889 M00S03534.1hy +++|** CCP - CHECK CALLING PROGRAM.
03890 M00S03535.1hy +++|*
03891 M00S03536.1hy +++|* EXIT (A) = 0.
03892 M00S03537.1hy +++|*
03893 M00S03538.1hy +++|* USES CM - CM+4.
03894 M00S03539.1hy +++|*
03895 M00S03540.1hy +++|* CALLS DFM.
03896 M00S03541.1hy +++|*
03897 M00S03542.1hy +++|* MACROS MONITOR.
03898 M00S03543.1hy +++|
03899 M00S03544.1hy +++|
03900 M00S03545.1hy +++| CCP SUBR ENTRY/EXIT
03901 M00S03546.1hy +++| LDK NCPL
03902 M00S03547.1hy +++| CRD CM GET NUMBER OF CONTROL POINTS
03903 M00S03548.1hy +++| AOD CM+1
03904 M00S03549.1hy +++| SHN 7
03905 M00S03550.1hy +++| LMD CP
03906 M00S03551.1hy +++| ZJN CCPX IF DRIVER AT SYSTEM CP
03907 M00S03552.1hy +++| LDC CCPA
03908 M00S03553.1hy +++| RJM DFM ISSUE DAYFILE MESSAGE
03909 M00S03554.1hy +++| MONITOR ABTM
03910 M00S03555.1hy +++| LJM PPR EXIT TO PP RESIDENT
03911 M00S03556.1hy +++|
03912 M00S03557.1hy +++|
03913 M00S03558.1hy +++| CCPA DATA C* 1HY - UNAUTHORIZED CALL.*
03914 M00S03559.1hy +++| IST SPACE 4,15
03915 M00S03560.1hy +++|** IST - INITIALIZE DEVICE STATE TABLE.
03916 M00S03561.1hy +++|*
03917 M00S03562.1hy +++|* ENTRY (PO) = 0.
03918 M00S03563.1hy +++|* (RC) = NUMBER OF ENTRIES IN *PUT*.
03919 M00S03564.1hy +++|*
03920 M00S03565.1hy +++|* EXIT (A) = 0 IF NO DEVICES FOR THIS DRIVER.
03921 M00S03566.1hy +++|*
03922 M00S03567.1hy +++|* USES DI, PO, CM - CM+4.
03923 M00S03568.1hy +++|*
03924 M00S03569.1hy +++|* MACROS PUTE, SFA.
03925 M00S03570.1hy +++|
03926 M00S03571.1hy +++|
03927 M00S03572.1hy +++| IST6 LDD DI DEFINE END OF DEVICES
03928 M00S03573.1hy +++| STM HYDA
03929 M00S03574.1hy +++| LMC DSTB SET EXIT CONDITION
03930 M00S03575.1hy +++|
03931 M00S03576.1hy +++| IST SUBR ENTRY/EXIT
03932 M00S03577.1hy +++| LDC DSTBL-1
03933 M00S03578.1hy +++| STD DI
03934 M00S03579.1hy +++| IST1 LDN 0 CLEAR DEVICE STATE TABLE
03935 M00S03580.1hy +++| STI DI
03936 M00S03581.1hy +++| SOD DI
03937 M00S03582.1hy +++| LMC DSTB
03938 M00S03583.1hy +++| NJN IST1 IF MORE TO CLEAR
03939 M00S03584.1hy +++| IST2 AOD PO
03940 M00S03585.1hy +++| LMD RC
03941 M00S03586.1hy +++| ZJN IST6 IF END OF PHYSICAL UNIT TABLE
03942 M00S03587.1hy +++| LDD PO
03943 M00S03588.1hy +++| SHN PUTLS READ *PUT* ENTRY
03944 M00S03589.1hy +++| PUTE *
03945 M00S03590.1hy +++| ADC UNCT GET UNIT CONTROL WORD
03946 M00S03591.1hy +++| CRD CM
03947 M00S03592.1hy +++| SFA EST,CM+1 FETCH EST ENTRY
03948 M00S03593.1hy +++| ADK EQDE
03949 M00S03594.1hy +++| CRD CM
03950 M00S03595.1hy +++| LDN CM INITIALIZE CHANNEL BYTE ADDRESS
03951 M00S03596.1hy +++| STD CM
03952 M00S03597.1hy +++| IST3 AOD CM ADVANCE PATH DESCRIPTOR ADDRESS
03953 M00S03598.1hy +++| LMN CM+3
03954 M00S03599.1hy +++| ZJN IST2 IF TWO POSSIBLE CHANNELS CHECKED
03955 M00S03600.1hy +++| LDI CM
03956 M00S03601.1hy +++| ZJN IST3 IF NULL ACCESS
03957 M00S03602.1hy +++| LMD IR+4
03958 M00S03603.1hy +++| LPN 77
03959 M00S03604.1hy +++| IST4 NJN IST3 IF NOT THIS DRIVERS CHANNEL
03960 M00S03605.1hy +++|
03961 M00S03606.1hy +++| IST5 LDD PO SET *PUT* ORDINAL IN STATE TABLE
03962 M00S03607.1hy +++| STI DI
03963 M00S03608.1hy +++| ERRNZ PUTO CODE DEPENDS ON VALUE
03964 M00S03609.1hy +++| LDI CM
03965 M00S03610.1hy +++| LPC 200 SET PORT SELECT IN CONTROL REGISTER
03966 M00S03611.1hy +++| SHN 16-7
| Line S03612 Modification History |
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03967 M01S03612.ns2769 ---| STML CREG
| Line S00136 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
03968 M01S00136.ns2769 +++| STML CREG,DI
03969 M00S03613.1hy +++| LDN DSTBE ADVANCE STATE TABLE ADDRESS
03970 M00S03614.1hy +++| RAD DI
03971 M00S03615.1hy +++| LMC DSTBL
03972 M00S03616.1hy +++| NJN IST4 IF NOT AT BLOCK LIMIT
03973 M00S03617.1hy +++| LJM IST6 SET INITIAL STATE TABLE ADDRESS
03974 M00S03618.1hy +++| MCI SPACE 4,10
03975 M00S03619.1hy +++|** MCI - MODIFY CHANNEL INSTRUCTIONS.
03976 M00S03620.1hy +++|*
03977 M00S03621.1hy +++|* ENTRY (IR+4) = CONCURRENT CHANNEL NUMBER.
03978 M00S03622.1hy +++|*
03979 M00S03623.1hy +++|* EXIT (A) = 0.
03980 M00S03624.1hy +++|*
03981 M00S03625.1hy +++|* USES T1, T2.
03982 M00S03626.1hy +++|
03983 M00S03627.1hy +++|
03984 M00S03628.1hy +++| MCI1 RAIL T2 MODIFY CHANNEL INSTRUCTION
03985 M00S03629.1hy +++| AOD T1
03986 M00S03630.1hy +++| MCI2 LDM TCHA,T1 EXTRACT NEXT ADDRESS
03987 M00S03631.1hy +++| STD T2
03988 M00S03632.1hy +++| LDD T0 CHECK END OF LIST
03989 M00S03633.1hy +++| CHTL *
03990 M00S03634.1hy +++| SBN CH
03991 M00S03635.1hy +++| NJN MCI1 IF MORE INSTRUCTIONS TO MODIFY
03992 M00S03636.1hy +++|
03993 M00S03637.1hy +++| MCI SUBR ENTRY/EXIT
03994 M00S03638.1hy +++| LDD IR+4
03995 M00S03639.1hy +++| LPN 37 EXTRACT CHANNEL NUMBER
03996 M00S03640.1hy +++| STD T0
03997 M00S03641.1hy +++| LDN 0 INITIALIZE REMOTE TABLE INDEX
03998 M00S03642.1hy +++| STD T1
03999 M00S03643.1hy +++| UJN MCI2 ENTER LOOP
04000 M00S03644.1hy +++| TCHA SPACE 4,10
04001 M00S03645.1hy +++|** TABLE OF CHANNEL INSTRUCTIONS ADDRESSES.
04002 M00S03646.1hy +++|
04003 M00S03647.1hy +++|
04004 M00S03648.1hy +++| TCHA CHTB
04005 M00S03649.1hy +++| RSTC RESTORE CHANNEL INSTRUCTIONS
04006 M00S03650.1hy +++| TCBT SPACE 4,10
04007 M00S03651.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF *CBT*.
04008 M00S03652.1hy +++|
04009 M00S03653.1hy +++|
04010 M00S03654.1hy +++| TCBT BSS 0
04011 M00S03655.1hy +++| TCBT HERE
04012 M00S03656.1hy +++| CON 0 TERMINATE TABLE
04013 M00S03657.1hy +++| TCCT SPACE 4,10
04014 M00S03658.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING ADDRESS OF *CCT* ENTRY.
04015 M00S03659.1hy +++|
04016 M00S03660.1hy +++|
04017 M00S03661.1hy +++| TCCT BSS 0
04018 M00S03662.1hy +++| TCCT HERE
04019 M00S03663.1hy +++| CON 0 TERMINATE TABLE
04020 M00S03664.1hy +++| TCHT SPACE 4,10
04021 M00S03665.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF CHANNEL TABLE.
04022 M00S03666.1hy +++|
04023 M00S03667.1hy +++|
04024 M00S03668.1hy +++| TCHT BSS 0
04025 M00S03669.1hy +++| TCHT HERE
04026 M00S03670.1hy +++| CON 0 TERMINATE TABLE
04027 M00S03671.1hy +++| TEMB SPACE 4,10
04028 M00S03672.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF *EMB*.
04029 M00S03673.1hy +++|
04030 M00S03674.1hy +++|
04031 M00S03675.1hy +++| TEMB BSS 0
| Line S00137 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
04032 M01S00137.ns2769 +++| QUAL COMPIMB
04033 M00S03676.1hy +++| TEMB HERE
| Line S00138 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
04034 M01S00138.ns2769 +++| QUAL *
04035 M00S03677.1hy +++| CON 0 TERMINATE TABLE
04036 M00S03678.1hy +++| TEXP SPACE 4,10
04037 M00S03679.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF PP EXCHANGE PACKAGE.
04038 M00S03680.1hy +++|
04039 M00S03681.1hy +++|
04040 M00S03682.1hy +++| TEXP BSS 0
04041 M00S03683.1hy +++| TEXP HERE
04042 M00S03684.1hy +++| CON 0 TERMINATE TABLE
04043 M00S03685.1hy +++| TFTT SPACE 4,10
04044 M00S03686.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF *FTT*.
04045 M00S03687.1hy +++|
04046 M00S03688.1hy +++|
04047 M00S03689.1hy +++| TFTT BSS 0
04048 M00S03690.1hy +++| TFTT HERE
04049 M00S03691.1hy +++| CON 0 TERMINATE TABLE
04050 M00S03692.1hy +++| TPUT SPACE 4,10
04051 M00S03693.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF *PUT*.
04052 M00S03694.1hy +++|
04053 M00S03695.1hy +++|
04054 M00S03696.1hy +++| TPUT BSS 0
04055 M00S03697.1hy +++| TPUT HERE
04056 M00S03698.1hy +++| CON 0 TERMINATE TABLE
04057 M00S03699.1hy +++| SPACE 4,10
04058 M00S03700.1hy +++| ERRPL *-10000 CODE DEPENDS ON VALUE
04059 M00S03701.1hy +++| PRS SPACE 4,20
04060 M00S03702.1hy +++|** PRS - PRESET *1HY* FOR PROCESSING.
04061 M00S03703.1hy +++|*
04062 M00S03704.1hy +++|* EXIT (UC) = 0.
04063 M00S03705.1hy +++|*
04064 M00S03706.1hy +++|* CALLS CCP, CCR, MCI, IST, PCT, RCR, SPA, STA.
04065 M00S03707.1hy +++|
04066 M00S03708.1hy +++|
04067 M00S03709.1hy +++| PRS RJM CCP CHECK CALLING PROGRAM
04068 M00S03710.1hy +++|* LDN 0
04069 M00S03711.1hy +++| STD UC SET NO UNITS RESERVED
04070 M00S03712.1hy +++| STD PO
04071 M00S03713.1hy +++| RJM MCI MODIFY CHANNEL INSTRUCTIONS
04072 M00S03714.1hy +++| STD CR
04073 M00S03715.1hy +++| RJM SPA SET PP EXCHANGE PACKAGE ADDRESSES
04074 M00S03716.1hy +++| PRS1 RJM SCT SET CHANNEL TABLE ADDRESSES
04075 M00S03717.1hy +++| LDK BIOL
04076 M00S03718.1hy +++| CRD CM READ BUFFERED I/O POINTERS
04077 M00S03719.1hy +++| LDD CM+1
04078 M00S03720.1hy +++| SHN 14
04079 M00S03721.1hy +++| LMD CM+2
04080 M00S03722.1hy +++| ADN FTTP READ *FTT* POINTER
04081 M00S03723.1hy +++| CRD T6
04082 M00S03724.1hy +++| SBN FTTP-CCTP READ *CCT* POINTER
04083 M00S03725.1hy +++| CRD T4
04084 M00S03726.1hy +++| ADN PUTP-CCTP READ *PUT* POINTER
04085 M00S03727.1hy +++| CRD T2
04086 M00S03728.1hy +++| ADN CBTP-PUTP READ *CBT* POINTER
04087 M00S03729.1hy +++| CRD WB
04088 M00S03730.1hy +++| AOD T2 SET NUMBER OF *PUT* ENTRIES
04089 M00S03731.1hy +++| STD RC
04090 M00S03732.1hy +++| LDC T5*10000+TPUT SET *PUT* ADDRESSES
04091 M00S03733.1hy +++| RJM STA
04092 M00S03734.1hy +++| LDD IR+2 ADJUST CHANNEL CONTROL TABLE POINTER
04093 M00S03735.1hy +++| SHN CCTLS-6
04094 M00S03736.1hy +++| RAD CM
04095 M00S03737.1hy +++| SHN -14
04096 M00S03738.1hy +++| RAD T7
04097 M00S03739.1hy +++| LDC T7*10000+TCCT SET *CCT* ADDRESSES
04098 M00S03740.1hy +++| RJM STA
04099 M00S03741.1hy +++| .CM1 EQU CM+1
04100 M00S03742.1hy +++| LDC .CM1*10000+TFTT SET *FTT* ADDRESSES
04101 M00S03743.1hy +++| RJM STA
04102 M00S03744.1hy +++| .WB3 EQU WB+3
04103 M00S03745.1hy +++| LDC .WB3*10000+TCBT SET *CBT* ADDRESSES
04104 M00S03746.1hy +++| RJM STA
04105 M00S03747.1hy +++| LDN EMBP FETCH *EMB* POINTER
04106 M00S03748.1hy +++| CRD CM
04107 M00S03749.1hy +++| LDC .CM1*10000+TEMB SET *EMB* ADDRESSES
04108 M00S03750.1hy +++| RJM STA
04109 M00S03751.1hy +++| LDK UEML
04110 M00S03752.1hy +++| CRD CM READ UEM POINTERS
04111 M00S03753.1hy +++| LDD CM
04112 M00S03754.1hy +++| PRSA SHN 11
04113 M00S03755.1hy +++|* SHN 11+EMSC
04114 M00S03756.1hy +++| SCN 77
04115 M00S03757.1hy +++| STM SUAA SET FWA OF UEM
04116 M00S03758.1hy +++| LDD CM
04117 M00S03759.1hy +++| PRSB SHN -3
04118 M00S03760.1hy +++|* SHN EMSC-3
04119 M00S03761.1hy +++| STM SUAB
04120 M00S03762.1hy +++| LDK MMFL FETCH MACHINE ID
04121 M00S03763.1hy +++| CRD CM
04122 M00S03764.1hy +++| LDD CM SET MAINFRAME ID FOR BML MESSAGES
04123 M00S03765.1hy +++| STM MFID
04124 M00S03766.1hy +++| LDC PRS3 SET RETURN ADDRESS
04125 M00S03767.1hy +++| STM CCR
04126 M00S03768.1hy +++| RJM IST INITIALIZE DEVICE STATE TABLE
04127 M00S03769.1hy +++| ZJN PRS4 IF NO DEVICES FOR THIS DRIVER
04128 M00S03770.1hy +++| LDN 0 CLEAR RESIDUAL BYTE COUNT
04129 M00S03771.1hy +++| STM RBCT
04130 M00S03772.1hy +++| LJM CCR2 RESERVE CHANNEL
04131 M00S03773.1hy +++|
04132 M00S03774.1hy +++| PRS3 NJP RCR+1 IF CHANNEL NOT DOWN
04133 M00S03775.1hy +++| PRS4 LJM HYD8 DROP CPP
04134 M00S03776.1hy +++| SCT SPACE 4,10
04135 M00S03777.1hy +++|** SCT - SET CHANNEL TABLE ENTRY ADDRESSES.
04136 M00S03778.1hy +++|*
04137 M00S03779.1hy +++|* ENTRY (IR+4) = CHANNEL NUMBER.
04138 M00S03780.1hy +++|*
04139 M00S03781.1hy +++|* USES T1, T2, CM - CM+4.
04140 M00S03782.1hy +++|*
04141 M00S03783.1hy +++|* CALLS STA.
04142 M00S03784.1hy +++|
04143 M00S03785.1hy +++|
04144 M00S03786.1hy +++| SCT SUBR ENTRY/EXIT
04145 M00S03787.1hy +++| LDD IR+4
04146 M00S03788.1hy +++| STD T1 SET CHANNEL NUMBER
04147 M00S03789.1hy +++| STM RCSA+3
04148 M00S03790.1hy +++| RAM BMLM+2
04149 M00S03791.1hy +++|* SHN 6 SAVE RECOVERY CHANNEL FOR *BML*
04150 M00S03792.1hy +++|* STM BMLM+7
04151 M00S03793.1hy +++| LCN 0 WORD OFFSET
04152 M00S03794.1hy +++| STD T2
04153 M00S03795.1hy +++| SCT1 AOD T2 INCREMENT WORD OFFSET
04154 M00S03796.1hy +++| LCN 5
04155 M00S03797.1hy +++| RAD T1
04156 M00S03798.1hy +++| PJN SCT1 IF CHANNEL NOT IN THIS WORD
04157 M00S03799.1hy +++| ADN 5
04158 M00S03800.1hy +++| STD T1
04159 M00S03801.1hy +++| RAM RCTA SET BYTE OFFSET
04160 M00S03802.1hy +++| LDD T1
04161 M00S03803.1hy +++| SHN 1 BYTE OFFSET * 2
04162 M00S03804.1hy +++| ADD T1 BYTE OFFSET * 3
04163 M00S03805.1hy +++| SHN 2 BYTE OFFSET * 12
04164 M00S03806.1hy +++| SBN 59D (BYTE OFFSET * 12) - 59
04165 M00S03807.1hy +++| LMC -0 59 - (BYTE OFFSET * 12)
04166 M00S03808.1hy +++| SBN 2
04167 M00S03809.1hy +++| SHN 6
04168 M00S03810.1hy +++| STM SRFA+1 SET DRIVER FLAG BIT POSITION
04169 M00S03811.1hy +++| LDK CHTP
04170 M00S03812.1hy +++| CRD CM
04171 M00S03813.1hy +++| LDD T2 SET ADDRESS OF WORD IN CHANNEL TABLE
04172 M00S03814.1hy +++| RAD CM+3
04173 M00S03815.1hy +++| SHN -14
04174 M00S03816.1hy +++| RAD CM+2
04175 M00S03817.1hy +++| .CM2 EQU CM+2
04176 M00S03818.1hy +++| LDC .CM2*10000+TCHT SET CHANNEL TABLE ADDRESSES
04177 M00S03819.1hy +++| RJM STA
04178 M00S03820.1hy +++| LJM SCTX RETURN
04179 M00S03821.1hy +++| SPA SPACE 4,10
04180 M00S03822.1hy +++|** SPA - SET PP EXCHANGE PACKAGE ADDRESSES.
04181 M00S03823.1hy +++|*
04182 M00S03824.1hy +++|* USES T1 - T5, CM - CM+4.
04183 M00S03825.1hy +++|*
04184 M00S03826.1hy +++|* CALLS STA.
04185 M00S03827.1hy +++|
04186 M00S03828.1hy +++|
04187 M00S03829.1hy +++| SPA SUBR ENTRY/EXIT
04188 M00S03830.1hy +++| LDN PXPP
04189 M00S03831.1hy +++| CRD CM FETCH FWA OF PP EXCHANGE PACKAGE AREA
04190 M00S03832.1hy +++| ADN 1
04191 M00S03833.1hy +++| CRM AMEA,ON SET FIRST WORD OF PP EXCHANGE PACKAGE
04192 M00S03834.1hy +++| ADN PPCP-PXPP-2
04193 M00S03835.1hy +++| CRD T1 READ PP COMMUNICATION AREA POINTER
04194 M00S03836.1hy +++| LDD IA
04195 M00S03837.1hy +++| STM AMEA+4 SET (B0) NON-ZERO FOR EXCHANGE TEST
04196 M00S03838.1hy +++| SBD T1+4
04197 M00S03839.1hy +++| SHN -3 (A) = CPP NUMBER
04198 M00S03840.1hy +++| SBN 24
04199 M00S03841.1hy +++| SHN 6
04200 M00S03842.1hy +++| STM BMLM+2 INSERT CPP NUMBER IN BML MESSAGE
04201 M00S03843.1hy +++| SHN -6
04202 M00S03844.1hy +++| ADN 24-2
04203 M00S03845.1hy +++| STD T1 CPP NUMBER - 2
04204 M00S03846.1hy +++| SHN 4
04205 M00S03847.1hy +++| ADD T1 (CPP NUMBER - 2) * 21B
04206 M00S03848.1hy +++| RAD CM+4
04207 M00S03849.1hy +++| SHN -14
04208 M00S03850.1hy +++| RAD CM+3
04209 M00S03851.1hy +++| .CM3 EQU CM+3
04210 M00S03852.1hy +++| LDC .CM3*10000+TEXP SET EXCHANGE PACKAGE ADDRESSES
04211 M00S03853.1hy +++| RJM STA
04212 M00S03854.1hy +++| LJM SPAX RETURN
04213 M00S03855.1hy +++| STA SPACE 4,10
| Line S03856 Modification History |
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
04214 M01S03856.ns2769 ---|** STA - SET BUFFERED DEVICE TABLE ADDRESSES.
| Line S00139 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
04215 M01S00139.ns2769 +++|** STA - SET TABLE ADDRESSES.
04216 M00S03857.1hy +++|*
04217 M00S03858.1hy +++|* ENTRY (A) = 6/ TP, 12/ TA
| Line S03859 Modification History |
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
04218 M01S03859.ns2769 ---|* TP = BUFFERED DEVICE TABLE POINTER.
| Line S00140 Modification History |
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act
----------------------------+
04219 M01S00140.ns2769 +++|* TP = TABLE POINTER.
04220 M00S03860.1hy +++|* TA = INSTRUCTION TABLE ADDRESS.
04221 M00S03861.1hy +++|*
04222 M00S03862.1hy +++|* EXIT (A) = 0.
04223 M00S03863.1hy +++|*
04224 M00S03864.1hy +++|* USES T1, T2, T3.
04225 M00S03865.1hy +++|
04226 M00S03866.1hy +++|
04227 M00S03867.1hy +++| STA1 STD T2 SET INSTRUCTION ADDRESS
04228 M00S03868.1hy +++| LDM 1,T1
04229 M00S03869.1hy +++| RAM 1,T2 SET LOWER 12 BITS OF ADDRESS
04230 M00S03870.1hy +++| SHN -14
04231 M00S03871.1hy +++| ADI T1 SET UPPER 6 BITS OF ADDRESS
| Line S00089 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04232 M01S00089.271l716 +++| LPN 37
04233 M00S03872.1hy +++| RAI T2
04234 M00S03873.1hy +++| AOD T3 ADVANCE INSTRUCTION LIST
04235 M00S03874.1hy +++| STA2 LDI T3
04236 M00S03875.1hy +++| NJN STA1 IF NOT END OF TABLE
04237 M00S03876.1hy +++|
04238 M00S03877.1hy +++| STA SUBR ENTRY/EXIT
04239 M00S03878.1hy +++| STD T3
04240 M00S03879.1hy +++| SHN -14 SET ADDRESS POINTER
04241 M00S03880.1hy +++| STD T1
04242 M00S03881.1hy +++| UJN STA2 ENTER LOOP
04243 M00S03882.1hy +++|
04244 M00S03883.1hy +++|
| Line S03884 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04245 M01S03884.271l716 ---| OVERFLOW OHYD
| Line S00090 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
04246 M01S00090.271l716 +++| OVERFLOW OHYD,20000
04247 M00S03885.1hy +++|
04248 M00S03886.1hy +++| END