Seq # *Modification Id* Act
----------------------------+
12274 M01S01542.283l840 +++| STD T4
12275 M01S01543.283l840 +++| AOM CHRV
12276 M01S01544.283l840 +++| LDC CTDC SET ADDRESS OF INSTRUCTION LIST
12277 M01S01545.283l840 +++| STD T1
12278 M01S01546.283l840 +++| UJN PFR3 MODIFY CHANNEL INSTRUCTIONS
12279 M01S01547.283l840 +++|
12280 M01S01548.283l840 +++| PFR2 STD T2 SET INSTRUCTION ADDRESS
12281 M01S01549.283l840 +++| LDI T2
12282 M01S01550.283l840 +++| SCN 37
12283 M01S01551.283l840 +++| LMD T4 MODIFY INSTRUCTION
12284 M01S01552.283l840 +++| STI T2
12285 M01S01553.283l840 +++| AOD T1 ADVANCE LIST ADDRESS
12286 M01S01554.283l840 +++| PFR3 LDI T1
12287 M01S01555.283l840 +++| NJN PFR2 IF NOT END OF LIST
12288 M01S01556.283l840 +++| LDD FN+4
12289 M01S01557.283l840 +++| SHN 3
12290 M01S01558.283l840 +++| ADN DDLL FETCH UNIT LIST FROM MST
12291 M01S01559.283l840 +++| CRD CN
12292 M01S01560.283l840 +++| LDC DSCP*200+MS1W STORE FORMATTING MESSAGE
12293 M01S01561.283l840 +++| CWM PFRA,ON
12294 M01S01562.283l840 +++|
12295 M01S01563.283l840 +++|* GENERATE PARAMETER BLOCK TO FORMAT DEVICE.
12296 M01S01564.283l840 +++|
12297 M01S01565.283l840 +++| PFR4 LDN 0 SET FIRST CYLINDER
12298 M01S01566.283l840 +++| STD PB
12299 M01S01567.283l840 +++| LDD TH SET LARGE RECORD SIZE
12300 M01S01568.283l840 +++| STD PB+2
12301 M01S01569.283l840 +++| LDD CN+4 EXTRACT NEXT UNIT
12302 M01S01570.283l840 +++| SHN 14
12303 M01S01571.283l840 +++| STD CN+4
12304 M01S01572.283l840 +++| ERRPL 4000-3*SLDC CODE DEPENDS ON VALUE
12305 M01S01573.283l840 +++| SHN -14
12306 M01S01574.283l840 +++| LMC 1S10+3S6 APPEND MODE / OPERATION DECODE
12307 M01S01575.283l840 +++| STD PB+1
12308 M01S01576.283l840 +++| RJM F8D FORMAT DEVICE
12309 M01S01577.283l840 +++| LDD T3
12310 M01S01578.283l840 +++| ZJN PFR7 IF DEADSTART SECTOR READ WITHOUT ERROR
12311 M01S01579.283l840 +++| LDC 885D
12312 M01S01580.283l840 +++| STD PB SET CYLINDER FOR DEADSTART SECTOR
12313 M01S01581.283l840 +++| ADN 1
12314 M01S01582.283l840 +++| STD LC
12315 M01S01583.283l840 +++| LDC 502 SECTOR BUFFER INDEX
12316 M01S01584.283l840 +++| STD PB+2
12317 M01S01585.283l840 +++| PFR5 LDN 0 CLEAR SECTOR BUFFER
12318 M01S01586.283l840 +++| STM BFMS-1,PB+2
12319 M01S01587.283l840 +++| SOD PB+2
12320 M01S01588.283l840 +++| NJN PFR5 IF BUFFER NOT CLEARED
12321 M01S01589.283l840 +++|* LDN 0
12322 M01S01590.283l840 +++|* STD PB+2
12323 M01S01591.283l840 +++| RJM F8D FORMAT DEADSTART CYLINDER
12324 M01S01592.283l840 +++| LDC -1S10
12325 M01S01593.283l840 +++| RAD PB+1
12326 M01S01594.283l840 +++| PFR6 SOD PB FORMAT PROTECTED AREA
12327 M01S01595.283l840 +++| RJM F8D
12328 M01S01596.283l840 +++| AOD PB+2 ADVANCE TRACK NUMBER
12329 M01S01597.283l840 +++| LMN 2
12330 M01S01598.283l840 +++| NJN PFR6 IF MORE TRACKS TO FORMAT
12331 M01S01599.283l840 +++| LDC BFMS+WLSF
12332 M01S01600.283l840 +++| RJM WDS CLEAR DEADSTART SECTOR
12333 M01S01601.283l840 +++| PFR7 LDD CN
12334 M01S01602.283l840 +++| LPN 7
12335 M01S01603.283l840 +++| SBN 1 DECREMENT UNIT COUNT
12336 M01S01604.283l840 +++| STD CN
12337 M01S01605.283l840 +++| PJP PFR4 IF MULTI-UNIT DEVICE
12338 M01S01606.283l840 +++| ENDMS
12339 M01S01607.283l840 +++| LDC DSCP*200+MS1W RESTORE RECOVERY MESSAGE
12340 M01S01608.283l840 +++| CWM PFRB,ON
12341 M01S01609.283l840 +++| CMSTF LFPR CLEAR FORMAT REQUEST
12342 M01S01610.283l840 +++| LJM PFRX RETURN
12343 M01S01611.283l840 +++|
12344 M01S01612.283l840 +++|
12345 M01S01613.283l840 +++| PFRA DATA 10HFORMATTING
12346 M01S01614.283l840 +++| PFRB DATA 10HRECOVERING
12347 M01S01615.283l840 +++| TITLE SUBROUTINES.
12348 M01S01616.283l840 +++| F8D SPACE 4,10
12349 M01S01617.283l840 +++|** F8D - FORMAT 895 DEVICE.
12350 M01S01618.283l840 +++|*
12351 M01S01619.283l840 +++|* ENTRY (LC) = LAST CYLINDER + 1 TO FORMAT.
12352 M01S01620.283l840 +++|* (PB - PB+2) = FORMAT PARAMETER BLOCK.
12353 M01S01621.283l840 +++|*
12354 M01S01622.283l840 +++|* USES PB, CM - CM+4.
12355 M01S01623.283l840 +++|*
12356 M01S01624.283l840 +++|* CALLS C2D, /RMS/SEM, WNB.
12357 M01S01625.283l840 +++|
12358 M01S01626.283l840 +++|
12359 M01S01627.283l840 +++| F8D2 LDC DSCP*200+MS1W+2 UPDATE CYLINDER NUMBER IN MESSAGE
12360 M01S01628.283l840 +++| CWD CM
12361 M01S01629.283l840 +++| FNC FCFP,DC ISSUE FORMAT FUNCTION
12362 M01S01630.283l840 +++| ACN DC
12363 M01S01631.283l840 +++| LDN FPBL OUTPUT PARAMETER BLOCK
12364 M01S01632.283l840 +++| OAM PB,DC
12365 M01S01633.283l840 +++| FJM *,DC WAIT TRANSMISSION COMPLETE
12366 M01S01634.283l840 +++| DCN DC
12367 M01S01635.283l840 +++| AOD PB ADVANCE CYLINDER NUMBER
12368 M01S01636.283l840 +++| F8D3 RJM C2D
12369 M01S01637.283l840 +++| STD CM+3
12370 M01S01638.283l840 +++| LDD PB CONVERT VALUE FOR MESSAGE
12371 M01S01639.283l840 +++| SHN -6
12372 M01S01640.283l840 +++| RJM C2D
12373 M01S01641.283l840 +++| STD CM+2
12374 M01S01642.283l840 +++| RJM WNB WAIT NOT BUSY
12375 M01S01643.283l840 +++| LDD PB
12376 M01S01644.283l840 +++| LMD LC
12377 M01S01645.283l840 +++| NJN F8D2 IF MORE CYLINDERS TO FORMAT
12378 M01S01646.283l840 +++|
12379 M01S01647.283l840 +++| F8D SUBR ENTRY/EXIT
12380 M01S01648.283l840 +++| LDD PB+1
12381 M01S01649.283l840 +++| RJM C2D CONVERT UNIT NUMBER
12382 M01S01650.283l840 +++| STM F8DA
12383 M01S01651.283l840 +++| RJM /RMS/SEM SET EQUIPMENT MESSAGE
12384 M01S01652.283l840 +++| LDN 1RU
12385 M01S01653.283l840 +++| STD CM+4 INSERT UNIT DESIGNATOR
12386 M01S01654.283l840 +++| LDC DSCP*200+MS1W+1
12387 M01S01655.283l840 +++| CWD CM
12388 M01S01656.283l840 +++| ADN 1
12389 M01S01657.283l840 +++| CWM F8DA,TW CHANGE MESSAGE
12390 M01S01658.283l840 +++| SBN 2
12391 M01S01659.283l840 +++| CRD CM
12392 M01S01660.283l840 +++| LDD LC
12393 M01S01661.283l840 +++| NJN F8D1 IF *CTI* COMPONENT FOUND
12394 M01S01662.283l840 +++| LDC NTDC/2
12395 M01S01663.283l840 +++| ERRNZ TTDC CODE DEPENDS ON VALUE
12396 M01S01664.283l840 +++| STD LC
12397 M01S01665.283l840 +++| F8D1 LDD PB
12398 M01S01666.283l840 +++| LJM F8D3 FORMAT DEVICE
12399 M01S01667.283l840 +++|
12400 M01S01668.283l840 +++|
12401 M01S01669.283l840 +++| F8DA DATA C*XX C0000.*
12402 M01S01670.283l840 +++| WNB SPACE 4,10
12403 M01S01671.283l840 +++|** WNB - WAIT NOT BUSY.
12404 M01S01672.283l840 +++|*
12405 M01S01673.283l840 +++|* ERROR TO */RMS/HNG* IF CONTROLLER HUNG BUSY.
12406 M01S01674.283l840 +++|*
12407 M01S01675.283l840 +++|* USES T1, T2.
12408 M01S01676.283l840 +++|*
12409 M01S01677.283l840 +++|* CALLS C2D.
12410 M01S01678.283l840 +++|
12411 M01S01679.283l840 +++|
12412 M01S01680.283l840 +++| WNB SUBR ENTRY/EXIT
12413 M01S01681.283l840 +++| LDC 400D
12414 M01S01682.283l840 +++| STD T2 SET 400 MILLISECOND DELAY
12415 M01S01683.283l840 +++| WNB1 DELAY 10
12416 M01S01684.283l840 +++| FNC FCGS,DC REQUEST GENERAL STATUS
12417 M01S01685.283l840 +++| ACN DC
12418 M01S01686.283l840 +++| IAN DC INPUT STATUS
12419 M01S01687.283l840 +++| DCN DC
12420 M01S01688.283l840 +++| STD T1 SAVE GENERAL STATUS
12421 M01S01689.283l840 +++| LPN 2
12422 M01S01690.283l840 +++| ZJN WNBX IF NOT BUSY
12423 M01S01691.283l840 +++| SOD T2
12424 M01S01692.283l840 +++| NJN WNB1 IF NOT TIMEOUT
12425 M01S01693.283l840 +++| LDD T1
12426 M01S01694.283l840 +++| SHN -6
12427 M01S01695.283l840 +++| RJM C2D CONVERT GENERAL STATUS
12428 M01S01696.283l840 +++| STM WNBA+11
12429 M01S01697.283l840 +++| LDD T1
12430 M01S01698.283l840 +++| RJM C2D
12431 M01S01699.283l840 +++| STM WNBA+12 STORE IN MESSAGE
12432 M01S01700.283l840 +++| LDC WNBA
12433 M01S01701.283l840 +++| LJM /RMS/HNG DISPLAY MESSAGE AND HANG PP
12434 M01S01702.283l840 +++|
12435 M01S01703.283l840 +++|
12436 M01S01704.283l840 +++| WNBA DATA C* HUNG BUSY - GS = XXXX.*
12437 M01S01705.283l840 +++| SPACE 4,10
12438 M01S01706.283l840 +++|** CHANNEL TABLE.
12439 M01S01707.283l840 +++|
12440 M01S01708.283l840 +++|
12441 M01S01709.283l840 +++| CHTB DC
12442 M01S01710.283l840 +++| SPACE 4,10
12443 M01S01711.283l840 +++| ERRNG BFMS-* OVERFLOW INTO BUFFER
12444 M01S01712.283l840 +++| SPACE 4,10
12445 M01S01713.283l840 +++| QUAL
12446 M01S01714.283l840 +++| SPACE 4,10
12447 M01S01715.283l840 +++| OVERFLOW ORDI,EPFW CHECK FOR OVERFLOW
12448 M00S09603.msm +++| TTL MSM/4DJ - DAYFILE RECOVERY ROUTINES.
12449 M00S09604.msm +++| TITLE
12450 M00S09605.msm +++| IDENT 4DJ,/RMS/RDJX
12451 M00S09606.msm +++|*COMMENT MSM - DAYFILE RECOVERY ROUTINES.
| Line S09607 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
12452 M01S09607.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1981.
| Line S00011 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
12453 M01S00011.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
12454 M00S09608.msm +++| SPACE 4,10
12455 M00S09609.msm +++|*** *4DJ* CONTAINS ROUTINES UTILIZED BY *RMS* IN
12456 M00S09610.msm +++|* RECOVERING DAYFILES.
12457 M00S09611.msm +++| SPACE 4,10
12458 M00S09612.msm +++| QUAL RMS
| Line S09613 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12459 M01S09613.283l840 ---| ORG /RDG/OVL
| Line S01716 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12460 M01S01716.283l840 +++| ORG ORDJ
12461 M00S09614.msm +++|
12462 M00S09615.msm +++| RDJ SUBR ENTRY/EXIT
12463 M00S09616.msm +++| UJN RDJX RETURN
12464 M00S09617.msm +++| CDC SPACE 4,25
12465 M00S09618.msm +++|** CDC - CHASE DAYFILE CHAIN.
12466 M00S09619.msm +++|*
12467 M00S09620.msm +++|* CDC CHASES THE DAYFILE CHAIN ON DISK TO RECOVER THE
12468 M00S09621.msm +++|* DAYFILE RIGHT UP TO THE EOI. THE CHAINING IS DONE OFF OF THE
12469 M00S09622.msm +++|* DISK RATHER THAN THE TRTS TO RECOVER THE EXACT DAYFILE AS IT
12470 M00S09623.msm +++|* EXISTS ON DISK. THIS PERMITS DAYFILE RECOVERY TO BE
12471 M00S09624.msm +++|* INDEPENDENT OF TRT UPDATES AND SYSTEM DEVICE CHECKPOINTS.
12472 M00S09625.msm +++|* THE DAYFILE WILL BE TRUNCATED TO THE LAST SECTOR OF THE
12473 M00S09626.msm +++|* CURRENT TRACK IF DISK EOI EXTENDS BEYOND THE CURRENT
12474 M00S09627.msm +++|* TRACK IN THE TRT.
12475 M00S09628.msm +++|*
12476 M00S09629.msm +++|* ENTRY (T5) = EST ORDINAL.
12477 M00S09630.msm +++|* (FN - FN+4) = EST ENTRY.
12478 M00S09631.msm +++|* (FS - FS+4) = DEVICE STATUS WORD (STLL).
12479 M00S09632.msm +++|* (MBUF) = LABEL MST.
12480 M00S09633.msm +++|*
12481 M00S09634.msm +++|* EXIT TRT ALTERED IF TRT AND DISK DO NOT MATCH AND VALID
12482 M00S09635.msm +++|* EOI FOUND.
12483 M00S09636.msm +++|* (A) MUST EQUAL 0 TO ENSURE *MRL* UPDATE OF CM
12484 M00S09637.msm +++|* RECOVERY INFORMATION UPON RETURN FROM */RMS/RCD*.
12485 M00S09638.msm +++|*
12486 M00S09639.msm +++|* USES EE, FA, P1, T6, T7, CM+1 - CM+3.
12487 M00S09640.msm +++|*
12488 M00S09641.msm +++|* CALLS CDR, CFL, RSS, ULA, VEI, WDS.
12489 M00S09642.msm +++|*
12490 M00S09643.msm +++|* MACROS ENDMS, MONITOR, SETMS.
12491 M00S09644.msm +++|
12492 M00S09645.msm +++|
12493 M00S09646.msm +++| CDC5 ENDMS
| Line S00039 Modification History |
M01 (Added by) | ns2669 |
Seq # *Modification Id* Act
----------------------------+
12494 M01S00039.ns2669 +++| SETMS IO,(DF,RW)
12495 M00S09647.msm +++| RJM ULA UPDATE SECTOR OF LOCAL AREAS
12496 M00S09648.msm +++|
12497 M00S09649.msm +++| CDC SUBR ENTRY/EXIT
12498 M00S09650.msm +++| LDM MBUF+5*ACGL+4
12499 M00S09651.msm +++| LPC MGLAP
12500 M00S09652.msm +++| ZJN CDCX IF NO SECTOR OF LOCAL AREAS
| Line S09653 Modification History |
M01 (Removed by) | ns2669 |
Seq # *Modification Id* Act
----------------------------+
12501 M01S09653.ns2669 ---| SETMS IO,(DF,RW)
| Line S00040 Modification History |
M01 (Added by) | ns2669 |
Seq # *Modification Id* Act
----------------------------+
12502 M01S00040.ns2669 +++| SETMS READSTR,(DF,RW)
12503 M00S09654.msm +++| LDN EXDF SET NUMBER OF EXCESS DAYFILES
12504 M00S09655.msm +++| STD P1
12505 M00S09656.msm +++| CDC1 SOD P1
12506 M00S09657.msm +++| MJN CDC5 IF END OF DAYFILES
12507 M00S09658.msm +++| LDM MBUF+5*DALL,P1
12508 M00S09659.msm +++| ZJN CDC1 IF NO TRACK ASSIGNED
12509 M00S09660.msm +++| STD T6
12510 M00S09661.msm +++| RJM CDR CHECK DAYFILE RECOVERY SELECTION
12511 M00S09662.msm +++| NJN CDC1 IF FILE INITIALIZED
12512 M00S09663.msm +++|
12513 M00S09664.msm +++|* VERIFY DAYFILE RECOVERY.
12514 M00S09665.msm +++|
12515 M00S09666.msm +++| RJM CFL CHECK FILE LENGTH
12516 M00S09667.msm +++| ZJN CDC1 IF EMPTY DAYFILE
12517 M00S09668.msm +++| RJM VEI VERIFY EOI SECTOR
12518 M00S09669.msm +++| CDC2 ZJN CDC1 IF EOI ON DISK MATCHES TRT EOI
12519 M00S09670.msm +++| ENDMS
12520 M00S09671.msm +++| LDD T6
12521 M00S09672.msm +++| LPC 3777 SET NEW EOI SECTOR
12522 M00S09673.msm +++| STD CM+2
12523 M00S09674.msm +++| LDD T7 SECTOR
12524 M00S09675.msm +++| STD CM+3
12525 M00S09676.msm +++| LDD T5 EQUIPMENT
12526 M00S09677.msm +++| STD CM+1
12527 M00S09678.msm +++| MONITOR DTKM UPDATE EOI SECTOR
12528 M00S09679.msm +++|* LDN 0
12529 M00S09680.msm +++| UJP CDC1 LOOP FOR NEXT DAYFILE
12530 M00S09681.msm +++| CDR SPACE 4,10
12531 M00S09682.msm +++|** CDR - CHECK DAYFILE RECOVERY.
12532 M00S09683.msm +++|*
12533 M00S09684.msm +++|* ENTRY (T6) = DAYFILE TRACK.
12534 M00S09685.msm +++|* (P1) = DAYFILE INDEX.
12535 M00S09686.msm +++|* (FS - FS+4) = STLL WORD OF THE MST.
12536 M00S09687.msm +++|*
12537 M00S09688.msm +++|* EXIT (A) = 0 IF DAYFILE NOT INITIALIZED.
12538 M00S09689.msm +++|* SPACE RELEASED IF FILE INITIALIZED.
12539 M00S09690.msm +++|*
12540 M00S09691.msm +++|* USES FS, FS+1, CM+1 - CM+3.
12541 M00S09692.msm +++|*
12542 M00S09693.msm +++|* CALLS TLB.
12543 M00S09694.msm +++|*
12544 M00S09695.msm +++|* MACROS CMSTF, ENDMS, MONITOR.
12545 M00S09696.msm +++|
12546 M00S09697.msm +++|
12547 M00S09698.msm +++| CDR SUBR ENTRY/EXIT
12548 M00S09699.msm +++|
12549 M00S09700.msm +++|* CHECK FOR INITIALIZE REQUEST.
12550 M00S09701.msm +++|
12551 M00S09702.msm +++| LDM CDRB,P1
12552 M00S09703.msm +++| STM CDRA
12553 M00S09704.msm +++| LDD FS+1 CHECK INITIALIZE REQUEST
12554 M00S09705.msm +++| LPC *
12555 M00S09706.msm +++| CDRA EQU *-1
12556 M00S09707.msm +++| ZJN CDRX IF INITIALIZE NOT REQUESTED
12557 M00S09708.msm +++|
12558 M00S09709.msm +++|* INITIALIZE DAYFILE.
12559 M00S09710.msm +++|
12560 M00S09711.msm +++| LMD FS+1 CLEAR INITIALIZE REQUEST
12561 M00S09712.msm +++| STD FS+1
12562 M00S09713.msm +++| SHN 6
12563 M00S09714.msm +++| LMD FS
12564 M00S09715.msm +++| SCN MLIRP+MLPTU+MLCKP+MRASD
12565 M00S09716.msm +++| NJN CDR1 IF MORE INITIALIZE FLAGS
12566 M00S09717.msm +++| CMSTF LIRP CLEAR INITIALIZE PENDING
12567 M00S09718.msm +++| CDR1 ENDMS
12568 M00S09719.msm +++|* LDN 0
12569 M00S09720.msm +++| STD CM+3
12570 M00S09721.msm +++| LDD T6 SET FIRST TRACK
12571 M00S09722.msm +++| STD CM+2
12572 M00S09723.msm +++| LDD EQ
12573 M00S09724.msm +++| STD CM+1
12574 M00S09725.msm +++| MONITOR DTKM RELEASE DAYFILE SPACE
12575 M00S09726.msm +++| STM MBUF+5*DALL,P1 CLEAR DAYFILE POINTER
12576 M00S09727.msm +++| AOM ULAA SET LOCAL AREA SECTOR UPDATE
12577 M00S09728.msm +++| LCN 0 CLEAR INITIALIZE REQUEST IN THE MST
12578 M00S09729.msm +++| LMM CDRC,P1
12579 M00S09730.msm +++| RJM TLB
12580 M00S09731.msm +++| LJM CDRX RETURN
12581 M00S09732.msm +++|
12582 M00S09733.msm +++|* INITIALIZE REQUEST MASKS FOR EXCESS DAYFILES.
12583 M00S09734.msm +++|
12584 M00S09735.msm +++| CDRB CON MLIDF DAYFILE
12585 M00S09736.msm +++| CON MLIAF ACCOUNT FILE
12586 M00S09737.msm +++| CON MLIEF ERROR LOG
12587 M00S09738.msm +++| CON MLIMF MAINTENANCE LOG
12588 M00S09739.msm +++|
12589 M00S09740.msm +++|* INITIALIZE REQUEST BIT MAPPING.
12590 M00S09741.msm +++|
12591 M00S09742.msm +++| CDRC CON LIDF DAYFILE
12592 M00S09743.msm +++| CON LIAF ACCOUNT FILE
12593 M00S09744.msm +++| CON LIEF ERROR LOG
12594 M00S09745.msm +++| CON LIMF MAINTENANCE LOG
12595 M00S09746.msm +++| CDT SPACE 4,10
12596 M00S09747.msm +++|** CDT - CHECK LAST UPDATE DATE AND TIME.
12597 M00S09748.msm +++|*
12598 M00S09749.msm +++|* ENTRY (P1) = DAYFILE INDEX.
12599 M00S09750.msm +++|* (WEIA) = DAYFILE EOI SECTOR.
12600 M00S09751.msm +++|* (TPDT) = TIME AND DATE FOR LATEST RECOVERED DAYFILE.
12601 M00S09752.msm +++|*
12602 M00S09753.msm +++|* EXIT RECOVERY POINTERS UPDATED IF THIS IS A LATER DAYFILE.
12603 M00S09754.msm +++|* (TPDT) UPDATED TO LATEST DATE.
12604 M00S09755.msm +++|*
12605 M00S09756.msm +++|* USES P2, CM - CM+4.
12606 M00S09757.msm +++|
12607 M00S09758.msm +++|
12608 M00S09759.msm +++| CDT SUBR ENTRY/EXIT
12609 M00S09760.msm +++| LDD FN
12610 M00S09761.msm +++| SHN 21-10
12611 M00S09762.msm +++| MJN CDTX IF REMOVABLE DEVICE
12612 M00S09763.msm +++| LDD P1
12613 M00S09764.msm +++| SHN 1
12614 M00S09765.msm +++| ADD P1
12615 M00S09766.msm +++| STD P2
12616 M00S09767.msm +++| LDD MA COPY LAST UPDATE DATE AND TIME OF NEW FILE
12617 M00S09768.msm +++| CWM BFMS+DTEI,ON
12618 M00S09769.msm +++| SBN 1
12619 M00S09770.msm +++| CRD CM
12620 M00S09771.msm +++| LDM TPDT,P2 CHECK YEAR AND MONTH
12621 M00S09772.msm +++| SBD CM+2
12622 M00S09773.msm +++| MJN CDT1 IF LATER YEAR OR MONTH
12623 M00S09774.msm +++| NJN CDTX IF NOT LATER YEAR OR MONTH
12624 M00S09775.msm +++| LDM TPDT+1,P2 CHECK DAY AND HOUR
12625 M00S09776.msm +++| SBD CM+3
12626 M00S09777.msm +++| MJN CDT1 IF A LATER DAY OR HOUR
12627 M00S09778.msm +++| NJN CDTX IF NOT A LATER DAY OR HOUR
12628 M00S09779.msm +++| LDM TPDT+2,P2
12629 M00S09780.msm +++| SBD CM+4
12630 M00S09781.msm +++| MJN CDT1 IF A LATER MINUTE
12631 M00S09782.msm +++| NJN CDTX IF NOT A LATER MINUTE
12632 M00S09783.msm +++|
12633 M00S09784.msm +++|* SET THIS DAYFILE AS THE NEW ONE TO RECOVER.
12634 M00S09785.msm +++|
12635 M00S09786.msm +++| CDT1 LDD T5 SET LATEST DAYFILES EQUIPMENT
12636 M00S09787.msm +++| STM RMSF,P1
12637 M00S09788.msm +++| LDD CM+2 SET LATEST DAYFILES DATE
12638 M00S09789.msm +++| STM TPDT,P2
12639 M00S09790.msm +++| LDD CM+3
12640 M00S09791.msm +++| STM TPDT+1,P2
12641 M00S09792.msm +++| LDD CM+4
12642 M00S09793.msm +++| STM TPDT+2,P2
12643 M00S09794.msm +++| LJM CDTX RETURN
12644 M00S09795.msm +++|
12645 M00S09796.msm +++| TPDT BSS 3 LATEST DATE/TIME SYSTEM DAYFILE
12646 M00S09797.msm +++| BSS 3 LATEST DATE/TIME ACCOUNT DAYFILE
12647 M00S09798.msm +++| BSS 3 LATEST DATE/TIME ERRLOG DAYFILE
12648 M00S09799.msm +++| BSS 3 LATEST DATE/TIME MAINTENANCE LOG
12649 M00S09800.msm +++| CFL SPACE 4,10
12650 M00S09801.msm +++|** CFL - CHECK FILE LENGTH.
12651 M00S09802.msm +++|*
12652 M00S09803.msm +++|* ENTRY (T6) = DAYFILE TRACK FROM SECTOR OF LOCAL AREAS.
12653 M00S09804.msm +++|* (P1) = DAYFILE INDEX.
12654 M00S09805.msm +++|*
12655 M00S09806.msm +++|* EXIT (A) = 0 IF DAYFILE EMPTY.
12656 M00S09807.msm +++|* (ET) = DAYFILE EOI TRACK.
12657 M00S09808.msm +++|* (ES) = DAYFILE EOI SECTOR.
12658 M00S09809.msm +++|*
12659 M00S09810.msm +++|* CALLS SEI.
12660 M00S09811.msm +++|
12661 M00S09812.msm +++|
12662 M00S09813.msm +++| CFL1 LDD T6 SAVE EOI TRACK
12663 M00S09814.msm +++| STD ET
12664 M00S09815.msm +++| LDD T7 SAVE EOI SECTOR
12665 M00S09816.msm +++| STD ES
12666 M00S09817.msm +++| LDM MBUF+5*DALL,P1 RESTORE FIRST TRACK
12667 M00S09818.msm +++| STD T6
12668 M00S09819.msm +++|
12669 M00S09820.msm +++| CFL SUBR ENTRY/EXIT
12670 M00S09821.msm +++| RJM SEI SEARCH FOR EOI
12671 M00S09822.msm +++| LDD T3
12672 M00S09823.msm +++| ADD T2
12673 M00S09824.msm +++| NJN CFL1 IF NOT EMPTY FILE
12674 M00S09825.msm +++| AOM ULAA
12675 M00S09826.msm +++| LDN 0 CLEAR DAYFILE POINTER
12676 M00S09827.msm +++| STM MBUF+5*DALL,P1
12677 M00S09828.msm +++| UJN CFLX RETURN
12678 M00S09829.msm +++| TDF SPACE 4,15
12679 M00S09830.msm +++|** TDF - TRUNCATE DAYFILE.
12680 M00S09831.msm +++|*
12681 M00S09832.msm +++|* ENTRY (P1) = DAYFILE INDEX.
12682 M00S09833.msm +++|* (T6) = DAYFILE EOI TRACK.
12683 M00S09834.msm +++|* (T7) = SECTOR AT WHICH EOI TO BE WRITTEN.
12684 M00S09835.msm +++|*
12685 M00S09836.msm +++|* EXIT (EE) .NE. 0 TO INDICATE EOI WRITTEN.
12686 M00S09837.msm +++|*
12687 M00S09838.msm +++|* CALLS WDS.
12688 M00S09839.msm +++|
12689 M00S09840.msm +++|
12690 M00S09841.msm +++| TDF SUBR ENTRY/EXIT
12691 M00S09842.msm +++| LDN 0 SET EOI LINKAGE
12692 M00S09843.msm +++| STM BFMS
12693 M00S09844.msm +++| STM BFMS+1
12694 M00S09845.msm +++| LDN ZERL CLEAR DATE AND TIME
12695 M00S09846.msm +++| CRM BFMS+DTEI,ON
12696 M00S09847.msm +++| LDM MBUF+5*DALL,P1 SET FIRST TRACK
12697 M00S09848.msm +++| STM BFMS+FTEI
12698 M00S09849.msm +++| LDC BFMS+WLSF WRITE EOI SECTOR
12699 M00S09850.msm +++| RJM WDS
12700 M00S09851.msm +++| LDM RMSF,P1 CHECK FOR FILES RECOVERED
12701 M00S09852.msm +++| SHN 6
12702 M00S09853.msm +++| PJN TDFX IF A FILE HAS BEEN RECOVERED
12703 M00S09854.msm +++| LDD T5 SET THIS FILE AS RECOVERED
12704 M00S09855.msm +++| STM RMSF,P1
12705 M00S09856.msm +++| UJN TDFX RETURN
12706 M00S09857.msm +++| ULA SPACE 4,15
12707 M00S09858.msm +++|** ULA - UPDATE SECTOR OF LOCAL AREAS.
12708 M00S09859.msm +++|*
12709 M00S09860.msm +++|* ENTRY (T5) = EST ORDINAL.
12710 M00S09861.msm +++|*
12711 M00S09862.msm +++|* ERROR TO *HNG* IF ERROR READING SECTOR OF LOCAL AREAS.
12712 M00S09863.msm +++|*
12713 M00S09864.msm +++|* USES T6.
12714 M00S09865.msm +++|*
12715 M00S09866.msm +++|* CALLS CTI, RLA, STI, WDS.
12716 M00S09867.msm +++|*
12717 M00S09868.msm +++|* MACROS ENDMS, SETMS.
12718 M00S09869.msm +++|
12719 M00S09870.msm +++|
12720 M00S09871.msm +++| ULA SUBR ENTRY/EXIT
12721 M00S09872.msm +++| LDC 0
12722 M00S09873.msm +++| ULAA EQU *-1
12723 M00S09874.msm +++| ZJN ULAX IF NO UPDATE REQUIRED
12724 M00S09875.msm +++| SETMS POSITION
12725 M00S09876.msm +++|* LDN 0 CLEAR UPDATE FLAG
12726 M00S09877.msm +++| STM ULAA
12727 M00S09878.msm +++| LDM MBUF+5*ALGL+1 SET LABEL TRACK
12728 M00S09879.msm +++| STD T6
12729 M00S09880.msm +++| RJM STI INTERLOCK LABEL TRACK
12730 M00S09881.msm +++| RJM RLA READ LOCAL AREA SECTOR
12731 M00S09882.msm +++| PJN ULA2 IF NO ERROR
12732 M00S09883.msm +++| ULA1 LDD T6 CLEAR LABEL TRACK INTERLOCK
12733 M00S09884.msm +++| RJM CTI
| Line S09885 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12734 M01S09885.283l840 ---| LDC LAEM *LOCAL AREA SECTOR ERROR.*
| Line S01717 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12735 M01S01717.283l840 +++| LDC ULAC *LOCAL AREA SECTOR ERROR.*
12736 M00S09886.msm +++| LJM HNG DISPLAY MESSAGE AND HANG
12737 M00S09887.msm +++|
12738 M00S09888.msm +++| ULA2 STM ULAB
12739 M00S09889.msm +++| ZJN ULA1 IF LOCAL AREA ENTRY NOT FOUND
12740 M00S09890.msm +++| LDD MA TRANSFER DF STATUS TO LOCAL AREA ENTRY
12741 M00S09891.msm +++| CWM MBUF+5*DALL,ON
12742 M00S09892.msm +++| SBN 1
12743 M00S09893.msm +++| CRM *,ON
12744 M00S09894.msm +++| ULAB EQU *-1
12745 M00S09895.msm +++| LDC BFMS+WLSF REWRITE SECTOR OF LOCAL AREAS
12746 M00S09896.msm +++| RJM WDS
12747 M00S09897.msm +++| ENDMS
12748 M00S09898.msm +++| LDD T6 CLEAR LABEL TRACK INTERLOCK
12749 M00S09899.msm +++| RJM CTI
12750 M00S09900.msm +++| LJM ULAX RETURN
12751 M01S01718.283l840 +++|
12752 M01S01719.283l840 +++|
12753 M01S01720.283l840 +++| ULAC DATA C*LOCAL AREA SECTOR ERROR.*
12754 M00S09901.msm +++| VEI SPACE 4,15
12755 M00S09902.msm +++|** VEI - VERIFY END OF INFORMATION SECTOR.
12756 M00S09903.msm +++|*
12757 M00S09904.msm +++|* ENTRY (ET) = TRT EOI TRACK.
12758 M00S09905.msm +++|* (ES) = TRT EOI SECTOR.
12759 M00S09906.msm +++|* (P1) = DAYFILE INDEX.
12760 M00S09907.msm +++|*
12761 M00S09908.msm +++|* EXIT (A) = 0 IF EOI ON DISK MATCHES TRT EOI.
12762 M00S09909.msm +++|* (T7) = DISK EOI SECTOR.
12763 M00S09910.msm +++|*
12764 M00S09911.msm +++|* USES T6, T7.
12765 M00S09912.msm +++|*
12766 M00S09913.msm +++|* CALLS CDT, RDS, TDF.
12767 M00S09914.msm +++|*
12768 M00S09915.msm +++|* MACROS SETMS.
12769 M00S09916.msm +++|
12770 M00S09917.msm +++|
12771 M00S09918.msm +++| VEI4 RJM TDF TRUNCATE DAYFILE
12772 M00S09919.msm +++| VEI5 LDD T7 COMPARE EOI ON DISK WITH TRT EOI
12773 M00S09920.msm +++| LMD ES
12774 M00S09921.msm +++|
12775 M00S09922.msm +++| VEI SUBR ENTRY/EXIT
12776 M00S09923.msm +++| LDD ET SET EOI TRACK
12777 M00S09924.msm +++| STD T6
12778 M00S09925.msm +++| LDD ES SET EOI SECTOR
12779 M00S09926.msm +++| STD T7
12780 M00S09927.msm +++| SETMS POSITION
12781 M00S09928.msm +++| VEI1 LDC BFMS SEARCH FOR EOI ON DISK
12782 M00S09929.msm +++| RJM RDS
12783 M00S09930.msm +++| MJN VEI4 IF READ ERROR
12784 M00S09931.msm +++| LDM BFMS
12785 M00S09932.msm +++| ADM BFMS+1
12786 M00S09933.msm +++| ZJN VEI2 IF EOI FOUND
12787 M00S09934.msm +++| AOD T7 ADVANCE SECTOR NUMBER
12788 M00S09935.msm +++| LDM BFMS CHECK LINKAGE
12789 M00S09936.msm +++| SHN 6
12790 M00S09937.msm +++| PJN VEI1 IF NOT CROSSING TRACK BOUNDARY
12791 M00S09938.msm +++| SOD T7 SET EOI SECTOR AT END OF TRACK
12792 M00S09939.msm +++| RJM TDF TRUNCATE DAYFILE
12793 M00S09940.msm +++| VEI2 RJM CDT CHECK DATE AND TIME
12794 M00S09941.msm +++| UJP VEI5 SET EXIT CONDITIONS AND RETURN
12795 M00S09942.msm +++| SPACE 4,10
12796 M00S09943.msm +++|** COMMON DECKS.
12797 M00S09944.msm +++|
12798 M00S09945.msm +++|
12799 M00S09946.msm +++|*CALL COMPCTI
12800 M00S09947.msm +++|*CALL COMPSEI
12801 M00S09948.msm +++|*CALL COMPSTI
12802 M00S09949.msm +++| SPACE 4,10
12803 M00S09950.msm +++| ERRNG BFMS-* CODE OVERFLOWS INTO BUFFER
| Line S09951 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
12804 M01S09951.272l774 ---| OVERFLOW /RDG/OVL CHECK FOR OVERFLOW
12805 M01S09952.272l774 ---| TTL MSM - MASS STORAGE MANAGER.
| Line S00078 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
12806 M01S00078.272l774 +++| SPACE 4,10
| Line S00079 Modification History |
M01 (Added by) | 272l774 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12807 M02S00079.283l840 ---| OVERFLOW /RDG/OVL,EPFW CHECK FOR OVERFLOW
| Line S01721 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12808 M01S01721.283l840 +++| OVERFLOW ORDJ,EPFW CHECK FOR OVERFLOW
12809 M00S09953.msm +++| TTL MSM/4DK - UEM RECOVERY ROUTINES.
12810 M00S09954.msm +++| TITLE
12811 M00S09955.msm +++| IDENT 4DK,/RMS/RUJX
12812 M00S09956.msm +++|*COMMENT MSM - UEM RECOVERY ROUTINES.
| Line S09957 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
12813 M01S09957.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1983.
| Line S00012 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
12814 M01S00012.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
12815 M00S09958.msm +++| RUE SPACE 4,10
12816 M00S09959.msm +++|*** *4DK* RESTORES UEM FROM THE CHECKPOINT FILE.
12817 M00S09960.msm +++| RUE SPACE 4,10
12818 M00S09961.msm +++| QUAL RMS
| Line S09962 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12819 M01S09962.283l840 ---| ORG O4DB
| Line S01722 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12820 M01S01722.283l840 +++| ORG ORDK
12821 M01S01723.283l840 +++| SPACE 4,10
12822 M00S09963.msm +++| RUJ SUBR ENTRY
12823 M00S09964.msm +++| LDK MEFL
12824 M00S09965.msm +++| CRD CM
12825 M00S09966.msm +++| LDD CM+2 SET TRACK SHIFT COUNTS
12826 M00S09967.msm +++| SHN -5
12827 M00S09968.msm +++| LPN 3
12828 M00S09969.msm +++| STD T1
12829 M00S09970.msm +++| RAM CUAB
12830 M00S09971.msm +++| LDD T1
12831 M00S09972.msm +++| RAM CUAA
12832 M00S09973.msm +++| RJM RUE RESTORE UEM
| Line S00001 Modification History |
M01 (Added by) | msm47 |
Seq # *Modification Id* Act
----------------------------+
12833 M01S00001.msm47 +++| LDN 0
12834 M01S00002.msm47 +++| STD CM
12835 M01S00003.msm47 +++| LDC CPAS+MS2W CLEAR MESSAGE
12836 M01S00004.msm47 +++| CWD CM
12837 M00S09974.msm +++| LJM RMS1 RECOVER UEM
12838 M00S09975.msm +++| CUA SPACE 4,10
12839 M00S09976.msm +++|** CUA - CALCULATE UEM ADDRESS.
12840 M00S09977.msm +++|*
12841 M00S09978.msm +++|* ENTRY (T8) = TRACK.
12842 M00S09979.msm +++|* (FS - FS+1) = UEM BASE ADDRESS.
12843 M00S09980.msm +++|*
12844 M00S09981.msm +++|* EXIT (A) = BITS 5 - 0 OF ABSOLUTE UEM ADDRESS.
12845 M00S09982.msm +++|* (FS+2 - FS+3) = BITS 27 - 6 OF ABSOLUTE UEM ADDRESS
12846 M00S09983.msm +++|* (TO BE USED IN *R* REGISTER).
12847 M00S09984.msm +++|* (FS+4) = BITS 5 - 0 OF ABSOLUTE UEM ADDRESS
12848 M00S09985.msm +++|* (TO BE USED IN *A* REGISTER).
12849 M00S09986.msm +++|*
12850 M00S09987.msm +++|* USES FS+2 - FS+4.
12851 M00S09988.msm +++|
12852 M00S09989.msm +++|
12853 M00S09990.msm +++| CUA SUBR ENTRY/EXIT
12854 M00S09991.msm +++| LDD T8 CALCULATE TRACK * 2020
12855 M00S09992.msm +++| SHN 6 * 100
12856 M00S09993.msm +++| ADD T8 * 101
12857 M00S09994.msm +++| STD FS+3
12858 M00S09995.msm +++| CUAA SHN -10
12859 M00S09996.msm +++|* SHN -10+EMSC
12860 M00S09997.msm +++| STD FS+2 * 2020 HIGH BITS
12861 M00S09998.msm +++| LDD FS+3
12862 M00S09999.msm +++| CUAB SHN 4
12863 M00S10000.msm +++|* SHN 4+EMSC
12864 M00S10001.msm +++| LPC 7777
12865 M00S10002.msm +++| ADD FS+1 ADD UEM BASE ADDRESS
12866 M00S10003.msm +++| STD FS+4 LOW LOW BITS FOR *A* REGISTER
12867 M00S10004.msm +++| SHN -14
12868 M00S10005.msm +++| ADD FS
12869 M00S10006.msm +++| RAD FS+2 HIGH BYTE ABSOLUTE UEM ADDRESS
12870 M00S10007.msm +++| SHN 6 SHIFT RESULT FOR *R* REGISTER
12871 M00S10008.msm +++| STD FS+3
12872 M00S10009.msm +++| SHN 6
12873 M00S10010.msm +++| STD FS+2
12874 M00S10011.msm +++| LDD FS+4
12875 M00S10012.msm +++| SHN 14
12876 M00S10013.msm +++| RAD FS+3
12877 M00S10014.msm +++| SHN -14
12878 M00S10015.msm +++| STD FS+4 SET LOW 6 BITS FOR *A* REGISTER
12879 M00S10016.msm +++| UJN CUAX RETURN
12880 M00S10017.msm +++| GCD SPACE 4,15
12881 M00S10018.msm +++|** GCD - GET CHECKPOINT DEVICE.
12882 M00S10019.msm +++|*
12883 M00S10020.msm +++|* ENTRY (CD) = CURRENT EST ORDINAL.
12884 M00S10021.msm +++|* (LO) = LAST MASS STORAGE ORDINAL + 1.
12885 M00S10022.msm +++|*
12886 M00S10023.msm +++|* EXIT (A) = 0 IF END OF MASS STORAGE DEVICES.
12887 M00S10024.msm +++|* (T5) = (CD) = CHECKPOINT DEVICE ORDINAL.
12888 M00S10025.msm +++|* (T6) = TRACK POINTER TO UEM PORTION OF CHECKPOINT
12889 M00S10026.msm +++|* FILE.
12890 M00S10027.msm +++|* (FN - FN+4) = EST ENTRY.
12891 M00S10028.msm +++|*
12892 M00S10029.msm +++|* USES CD, RI, RI+1, T5, T6, FN - FN+4.
12893 M00S10030.msm +++|*
12894 M00S10031.msm +++|* CALLS CRA, GSP.
12895 M00S10032.msm +++|*
12896 M00S10033.msm +++|* MACROS SETMS, SFA.
12897 M00S10034.msm +++|
12898 M00S10035.msm +++|
12899 M00S10036.msm +++| GCD SUBR ENTRY/EXIT
12900 M00S10037.msm +++| GCD1 AOD CD ADVANCE EST ORDINAL
12901 M00S10038.msm +++| STD T5
12902 M00S10039.msm +++| LMD LO
12903 M00S10040.msm +++| ZJN GCDX IF END OF DEVICES
12904 M00S10041.msm +++| SFA EST,T5 READ EST ENTRY
12905 M00S10042.msm +++| ADK EQDE
12906 M00S10043.msm +++| CRD FN
12907 M00S10044.msm +++| LDD FN
12908 M00S10045.msm +++| SHN 21-13
12909 M00S10046.msm +++| PJN GCD1 IF NOT MASS STORAGE DEVICE
12910 M00S10047.msm +++| SHN 13-2
12911 M00S10048.msm +++| PJN GCD1 IF NOT CHECKPOINT DEVICE
12912 M00S10049.msm +++| LDD FN+4
12913 M00S10050.msm +++| SHN 3
12914 M00S10051.msm +++| ADN DULL
12915 M00S10052.msm +++| CRD CM
12916 M00S10053.msm +++| LDD CM+3 CHECKPOINT FILE POINTER
12917 M00S10054.msm +++| STD P1
12918 M00S10055.msm +++| SHN 21-13
12919 M00S10056.msm +++| PJN GCD1 IF NOT A VALID FILE
12920 M00S10057.msm +++| RJM GSP GET SECTOR POINTER
12921 M00S10058.msm +++| ZJN GCD1 IF ERROR
12922 M00S10059.msm +++| STD RI+1 SET RANDOM ADDRESS
12923 M00S10060.msm +++| LDN 0
12924 M00S10061.msm +++| STD RI
12925 M00S10062.msm +++| LDD P1 SET CHECKPOINT FILE TRACK
12926 M00S10063.msm +++| STD T6
12927 M00S10064.msm +++| RJM CRA CONVERT RANDOM ADDRESS
12928 M00S10065.msm +++| MJN GCD1 IF ADDRESS NOT ON TRT CHAIN
| Line S10066 Modification History |
M01 (Removed by) | msm47 |
Seq # *Modification Id* Act
----------------------------+
12929 M01S10066.msm47 ---| SETMS IO
| Line S00005 Modification History |
M01 (Added by) | msm47 |
Seq # *Modification Id* Act
----------------------------+
12930 M01S00005.msm47 +++| SETMS READSTR
12931 M00S10067.msm +++| LDN 1 INDICATE CHECKPOINT DEVICE FOUND
12932 M00S10068.msm +++| LJM GCDX RETURN
12933 M00S10069.msm +++| GSP SPACE 4,15
12934 M00S10070.msm +++|** GSP - GET UEM SECTOR POINTER.
12935 M00S10071.msm +++|*
12936 M00S10072.msm +++|* THIS ROUTINE RETURNS THE UEM SECTOR OFFSET.
12937 M00S10073.msm +++|*
12938 M00S10074.msm +++|* ENTRY (FN - FN+4) = DEVICE EST ENTRY.
12939 M00S10075.msm +++|* (T5) = DEVICE EST ORDINAL.
12940 M00S10076.msm +++|*
12941 M00S10077.msm +++|* EXIT (A) = 0, IF ERROR.
12942 M00S10078.msm +++|* = SECTOR OFFSET IF NO ERROR.
12943 M00S10079.msm +++|*
12944 M00S10080.msm +++|* USES CM - CM+4.
12945 M00S10081.msm +++|
12946 M00S10082.msm +++|
12947 M00S10083.msm +++| GSP SUBR ENTRY/EXIT
12948 M00S10084.msm +++| LDD RA
12949 M00S10085.msm +++| SHN 6
12950 M00S10086.msm +++| ADD T5
12951 M00S10087.msm +++| CRD CM
12952 M00S10088.msm +++| SBD T5
12953 M00S10089.msm +++| ADD AL-RD+CM
12954 M00S10090.msm +++| ADN DALL
12955 M00S10091.msm +++| CRD CM
12956 M00S10092.msm +++| LDD CM+4
12957 M00S10093.msm +++| UJN GSPX RETURN
12958 M00S10094.msm +++| RUE SPACE 4,15
12959 M00S10095.msm +++|** RUE - RECOVER UEM.
12960 M00S10096.msm +++|*
12961 M00S10097.msm +++|* USES T8, T9, FS+4, CM - CM+4.
12962 M00S10098.msm +++|*
| Line S10099 Modification History |
M01 (Removed by) | msm47 |
Seq # *Modification Id* Act
----------------------------+
12963 M01S10099.msm47 ---|* CALLS CUA, GCD, RNS.
| Line S00006 Modification History |
M01 (Added by) | msm47 |
Seq # *Modification Id* Act
----------------------------+
12964 M01S00006.msm47 +++|* CALLS CUA, C2D, GCD, RNS.
12965 M00S10100.msm +++|*
12966 M00S10101.msm +++|* MACROS ENDMS.
12967 M00S10102.msm +++|
12968 M00S10103.msm +++|
12969 M00S10104.msm +++| RUE5 ENDMS
12970 M00S10105.msm +++| LDC RUEA *CHECKPOINT DEVICE NOT FOUND.*
12971 M00S10106.msm +++| LJM /RMS/HNG ISSUE ERROR MESSAGE AND HANG
12972 M00S10107.msm +++|
12973 M00S10108.msm +++| RUE6 ENDMS
12974 M00S10109.msm +++| LDK NJNI-ZJNI SET TO PROCESS ONLY UEM
12975 M00S10110.msm +++| STM RMSH
12976 M00S10111.msm +++|
12977 M00S10112.msm +++| RUE SUBR ENTRY/EXIT
12978 M00S10113.msm +++| LDK NOPE-1 SET EST ORDINAL
12979 M00S10114.msm +++| STD CD
12980 M00S10115.msm +++| LDK UEML PRESET UEM BASE ADDRESS
12981 M00S10116.msm +++| CRD CM
12982 M00S10117.msm +++| LDD CM
12983 M00S10118.msm +++| SHN 21-2
12984 M00S10119.msm +++| STD FS
12985 M00S10120.msm +++| SHN -6
12986 M00S10121.msm +++| SCN 7
12987 M00S10122.msm +++| STD FS+1
12988 M00S10123.msm +++| MSR CON PSNI *RNS* ERROR RETURN
12989 M00S10124.msm +++| RUE1 RJM GCD GET CHECKPOINT DEVICE
12990 M00S10125.msm +++| ZJN RUE5 IF END OF CHECKPOINT DEVICES
12991 M00S10126.msm +++| RUE2 LDC BFMS READ LINKAGE SECTOR
12992 M00S10127.msm +++| RJM /4DK/RNS
12993 M01S00007.msm47 +++| ADI T3
12994 M00S10128.msm +++| ZJN RUE6 IF EOI REACHED
12995 M00S10129.msm +++| LDM BFMS+2 SET TRACK NUMBER
12996 M00S10130.msm +++| STD T8
12997 M00S10131.msm +++| LDM BFMS+3 SET SECTOR COUNT
12998 M00S10132.msm +++| STD T9
12999 M01S00008.msm47 +++| LDD T8
13000 M01S00009.msm47 +++| SHN -6
13001 M01S00010.msm47 +++| RJM C2D CONVERT UPPER 2 DIGITS OF TRACK TO DISPLAY
13002 M01S00011.msm47 +++| STM RUEB+12
13003 M01S00012.msm47 +++| LDD T8
13004 M01S00013.msm47 +++| RJM C2D CONVERT LOWER 2 DIGITS OF TRACK TO DISPLAY
13005 M01S00014.msm47 +++| STM RUEB+13
13006 M01S00015.msm47 +++| LDC CPAS+MS2W ISSUE *RESTORING UEM TRACK XXXX* MESSAGE
13007 M01S00016.msm47 +++| CWM RUEB,TR
13008 M00S10133.msm +++| RJM CUA CALCULATE UEM ADDRESS
13009 M00S10134.msm +++| LDM BFMS+1
13010 M00S10135.msm +++| ZJN RUE3 IF LINKAGE WORDS NOT IN THIS SECTOR
13011 M00S10136.msm +++| STD T3
13012 M00S10137.msm +++| RAD FS+4 ADVANCE UEM ADDRESS FOR LATER
13013 M00S10138.msm +++| SBD T3
13014 M00S10139.msm +++| ADC 400000
13015 M00S10140.msm +++| LRD FS+2
13016 M00S10141.msm +++| CWM BFMS+4,T3 WRITE LINKAGE WORDS TO UEM
13017 M00S10142.msm +++| RUE3 LDC BFMS
13018 M00S10143.msm +++| RJM /4DK/RNS
13019 M00S10144.msm +++| LDD FS+4
13020 M00S10145.msm +++| ADC 400000
13021 M00S10146.msm +++| LRD FS+2 WRITE SECTOR TO UEM
13022 M00S10147.msm +++| CWM BFMS+2,HN
13023 M00S10148.msm +++| AOD FS+3 ADVANCE UEM ADDRESS
13024 M00S10149.msm +++| SHN -14
13025 M00S10150.msm +++| RAD FS+2
13026 M00S10151.msm +++| SOD T9 DECREMENT SECTOR COUNT
13027 M00S10152.msm +++| NJN RUE3 IF NOT FINISHED WITH TRACK
13028 M00S10153.msm +++| LJM RUE2 IF FINISHED WITH TRACK
13029 M00S10154.msm +++|
13030 M00S10155.msm +++|
13031 M00S10156.msm +++| RUEA DATA C*CHECKPOINT DEVICE NOT FOUND.*
13032 M01S00017.msm47 +++| RUEB DATA C*RESTORING UEM TRACK XXXX.*
13033 M00S10157.msm +++| SPACE 4,15
13034 M00S10158.msm +++|** COMMON DECKS.
13035 M00S10159.msm +++|
13036 M00S10160.msm +++|*CALL COMPCRA
13037 M00S10161.msm +++|
13038 M00S10162.msm +++| QUAL 4DK
13039 M00S10163.msm +++|
13040 M00S10164.msm +++| MSR EQU /RMS/MSR
13041 M00S10165.msm +++| MSR$ SET 1 SELECT ERROR PROCESSING IN *COMPRNS*
13042 M00S10166.msm +++|*CALL COMPRNS
13043 M00S10167.msm +++|
13044 M00S10168.msm +++| QUAL *
13045 M00S10169.msm +++| SPACE 4,10
| Line S10170 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
13046 M01S10170.272l774 ---| ERRPL *-BFMS DATA BUFFER OVERLAYS CODE
13047 M01S10171.272l774 ---| OVERFLOW O4DB CHECK FOR OVERFLOW
13048 M01S10172.272l774 ---| TTL
| Line S00080 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
13049 M01S00080.272l774 +++| ERRNG BFMS-* DATA BUFFER OVERLAYS CODE
13050 M01S00081.272l774 +++| SPACE 4,10
| Line S00082 Modification History |
M01 (Added by) | 272l774 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
13051 M02S00082.283l840 ---| OVERFLOW O4DB,EPFW CHECK FOR OVERFLOW
| Line S01724 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
13052 M01S01724.283l840 +++| OVERFLOW ORDK,EPFW CHECK FOR OVERFLOW
| Line S00083 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
13053 M01S00083.272l774 +++| SPACE 4
13054 M01S00084.272l774 +++| TTL MSM - MASS STORAGE MANAGER.
13055 M00S10173.msm +++| END