Seq # *Modification Id* Act
----------------------------+
10485 M00S08256.msm ---| LDC 4000
10486 M00S08257.msm ---| STD CM+2
10487 M00S08258.msm ---| LDN CTIS
10488 M00S08259.msm ---| STD CM+3
10489 M00S08260.msm ---| LDD MA STORE REQUEST IMAGE IN MESSAGE BUFFER
10490 M00S08261.msm ---| CWD CM
10491 M00S08262.msm ---| LJM ERT5 ENTER LOOP
10492 M00S08263.msm ---| SMT TITLE STORE MST/TRT IN EXTENDED MEMORY.
10493 M00S08264.msm ---|** SMT - STORE MST + TRT IN EXTENDED MEMORY.
10494 M00S08265.msm ---|*
10495 M00S08266.msm ---|* ENTRY (EQ) = EST ORDINAL.
10496 M00S08267.msm ---|* (FN - FN+4) = EST ENTRY.
10497 M00S08268.msm ---|*
10498 M00S08269.msm ---|* USES P1, T1, CM+3 - CM+7, CN - CN+4, T5 - T7.
10499 M00S08270.msm ---|*
10500 M00S08271.msm ---|* CALLS CEA, PTA, STA, WDS.
10501 M00S08272.msm ---|*
10502 M00S08273.msm ---|* MACROS ENDMS, SETMS.
10503 M00S08274.msm ---|
10504 M00S08275.msm ---|
10505 M00S08276.msm ---|
10506 M00S08277.msm ---| SMT SUBR ENTRY/EXIT
10507 M00S08278.msm ---| RJM PTA PRESET FWA OF TRT
10508 M00S08279.msm ---| LDC 500-5*GLGL
10509 M00S08280.msm ---| STD T7
10510 M00S08281.msm ---| SMT1 LDN 0 CLEAR BUFFER
10511 M00S08282.msm ---| STM BFMS+1+5*GLGL,T7
10512 M00S08283.msm ---| SOD T7
10513 M00S08284.msm ---| NJN SMT1
10514 M00S08285.msm ---| STD P1
10515 M00S08286.msm ---| LDC MMFL READ MMF STATUS WORD
10516 M00S08287.msm ---| CRD CN
10517 M00S08288.msm ---| LDD CN+1 SET LINK DEVICE EST ORDINAL
10518 M00S08289.msm ---| LPC 777
10519 M00S08290.msm ---| STD T5
10520 M00S08291.msm ---| SETMS IO,DF
10521 M00S08292.msm ---|
10522 M00S08293.msm ---|* SET UNLOAD STATUS IN EACH LOCAL MST BLOCK.
10523 M00S08294.msm ---|
10524 M00S08295.msm ---| SMT2 LDN MLUNL+MLDUL
10525 M00S08296.msm ---| STM BFMS+2+5*STLL,P1
10526 M00S08297.msm ---| LDN 5*LLLL ADVANCE INDEX
10527 M00S08298.msm ---| RAD P1
10528 M00S08299.msm ---| LMC MXMF*5*LLLL
10529 M00S08300.msm ---| NJN SMT2 LOOP FOR *MXMF* MSTS
10530 M00S08301.msm ---| LDD TS SET MST/TRT TRACK
10531 M00S08302.msm ---| STD T6
10532 M00S08303.msm ---| LDD HN SET FULL SECTOR WORD COUNT
10533 M00S08304.msm ---| STM BFMS+1
10534 M00S08305.msm ---| LDN ZERL
10535 M00S08306.msm ---| CRD CM+3
10536 M00S08307.msm ---| RJM CEA
10537 M00S08308.msm ---| LDN GLGL SET LENGTH OF GLOBAL MST
10538 M00S08309.msm ---| STD T1
10539 M00S08310.msm ---| LDN 1 SET INITIAL TRT ACCESS COUNT
10540 M00S08311.msm ---| STD CM+6
10541 M00S08312.msm ---| LDD FN+4
10542 M00S08313.msm ---| SHN 3
10543 M00S08314.msm ---| ADN SDGL
10544 M00S08315.msm ---| CWD CM+3
10545 M00S08316.msm ---| SBN SDGL-TDGL
10546 M00S08317.msm ---| CRD CN
10547 M00S08318.msm ---| CRM BFMS+2,T1
10548 M00S08319.msm ---| LCN 100-1 INITIALIZE TRT INDEX
10549 M00S08320.msm ---| STD CN+4
10550 M00S08321.msm ---| LDN 0
10551 M00S08322.msm ---| UJN SMT5 ENTER LOOP WITH (A) = 0
10552 M00S08323.msm ---|
10553 M00S08324.msm ---| SMT3 SBD HN DECREMENT BLOCK COUNT
10554 M00S08325.msm ---| PJN SMT4 IF ANOTHER FULL SECTOR
10555 M00S08326.msm ---| ADD HN
10556 M00S08327.msm ---| STM BFMS+1 SET SHORT SECTOR
10557 M00S08328.msm ---| LDN 0
10558 M00S08329.msm ---| SMT4 STD CN+2
10559 M00S08330.msm ---| LDD HN ADVANCE TRT ADDRESS
10560 M00S08331.msm ---| RAD CN+4
10561 M00S08332.msm ---| RJM STA SET FWA OF TRT
10562 M00S08333.msm ---| ADD CN+4
10563 M00S08334.msm ---| CRM BFMS+2,HN
10564 M00S08335.msm ---| AOD T7 ADVANCE SECTOR
10565 M00S08336.msm ---| SMT5 ADN 1
10566 M00S08337.msm ---| STM BFMS
10567 M00S08338.msm ---| LDC BFMS WRITE NEXT SECTOR
10568 M00S08339.msm ---| RJM WDS
10569 M00S08340.msm ---| LDD CN+2
10570 M00S08341.msm ---| NJN SMT3 LOOP TO END OF TRT
10571 M00S08342.msm ---| ENDMS
10572 M00S08343.msm ---| LJM SMTX EXIT
| Line S08344 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
10573 M01S08344.272l774 ---|
10574 M01S08345.272l774 ---| ERRPL *-BFMS OVERFLOW INTO BUFFER
| Line S00071 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
10575 M01S00071.272l774 +++| SPACE 4,10
10576 M01S00072.272l774 +++| ERRNG BFMS-* OVERFLOW INTO BUFFER
10577 M01S00073.272l774 +++| SPACE 4,10
| Line S00074 Modification History |
M01 (Added by) | 272l774 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10578 M02S00074.283l840 ---| OVERFLOW OSOV,EPFW CHECK FOR OVERFLOW
| Line S01224 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10579 M01S01224.283l840 +++| OVERFLOW ORDF,EPFW CHECK FOR OVERFLOW
10580 M00S08346.msm +++| TTL MSM/4DG - DEVICE RECOVERY ROUTINES.
10581 M00S08347.msm +++| TITLE
10582 M00S08348.msm +++| IDENT 4DG,/RDG/RDGX
10583 M00S08349.msm +++|*COMMENT MSM - DEVICE RECOVERY ROUTINES.
| Line S08350 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
10584 M01S08350.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1973.
| Line S00009 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
10585 M01S00009.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
10586 M00S08351.msm +++| SPACE 4
| Line S08352 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10587 M01S08352.283l840 ---|*** *4DG* CONTAINS ROUTINES FOR RECOVERING TRT-S.
| Line S01225 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10588 M01S01225.283l840 +++|*** *4DG* CONTAINS ADDITIONAL DEVICE RECOVERY ROUTINES.
10589 M00S08353.msm +++| SPACE 4
10590 M00S08354.msm +++| QUAL RDG
10591 M00S08355.msm +++| ORG ORDG
10592 M00S08356.msm +++|
10593 M00S08357.msm +++| RDG SUBR ENTRY/EXIT
| Line S08358 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10594 M01S08358.ns2552 ---| LJM POV
| Line S08359 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10595 M01S08359.283l840 ---| EJECT
| Line S01226 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10596 M01S01226.283l840 +++| RJM PRS PRESET OVERLAY
10597 M01S01227.283l840 +++| UJN RDGX RETURN
10598 M01S01228.283l840 +++| TITLE COPY MST/TRT TO DISK.
10599 M01S01229.283l840 +++| CTD SPACE 4,15
10600 M01S01230.283l840 +++|** CTD - COPY TABLES TO DISK.
10601 M01S01231.283l840 +++|*
10602 M01S01232.283l840 +++|* ENTRY (FN - FN+4) = EST ENTRY.
10603 M01S01233.283l840 +++|*
10604 M01S01234.283l840 +++|* EXIT (A) .GE. 0.
10605 M01S01235.283l840 +++|*
10606 M01S01236.283l840 +++|* USES P1, T3, T6, T7, CM - CM+4, CN - CN+4.
10607 M01S01237.283l840 +++|*
10608 M01S01238.283l840 +++|* CALLS CLC, PTA, RDS, STA, WDS.
10609 M01S01239.283l840 +++|*
10610 M01S01240.283l840 +++|* MACROS CMSTF, ENDMS, MONITOR, SETMS.
10611 M01S01241.283l840 +++|
10612 M01S01242.283l840 +++|
10613 M01S01243.283l840 +++| CTD5 LDD RE CHECK ACCESS STATUS
10614 M01S01244.283l840 +++| LPC 1002
10615 M01S01245.283l840 +++| LMC 1002
10616 M01S01246.283l840 +++| CTD6 NJN CTDX IF NOT SHARED DEVICE ACCESSED PREVIOUSLY
10617 M01S01247.283l840 +++| LDD T5
10618 M01S01248.283l840 +++| STD CM+1
10619 M01S01249.283l840 +++| LDN UITS GET CURRENT COPY OF TRT / UPDATE MRT
10620 M01S01250.283l840 +++| STD CM+3
10621 M01S01251.283l840 +++| MONITOR STBM
10622 M01S01252.283l840 +++|
10623 M01S01253.283l840 +++| CTD SUBR ENTRY/EXIT
10624 M01S01254.283l840 +++| RJM PTA PRESET FWA OF TRT
10625 M01S01255.283l840 +++| CMSTF LPTU ENABLE TRT UPDATE BY *1RU*
10626 M01S01256.283l840 +++|* LDN 0
10627 M01S01257.283l840 +++| STD T7
10628 M01S01258.283l840 +++| LDD FN
10629 M01S01259.283l840 +++| SHN 21-4
10630 M01S01260.283l840 +++| PJN CTD5 IF NOT INDEPENDENT SHARED DEVICE
10631 M01S01261.283l840 +++| LDD FN+4
10632 M01S01262.283l840 +++| SHN 3
10633 M01S01263.283l840 +++| ADN ALGL FETCH ALLOCATION WORD FROM MST
10634 M01S01264.283l840 +++| CRD CM
10635 M01S01265.283l840 +++| LDD CM+1 SET LABEL TRACK
10636 M01S01266.283l840 +++| STD T6
10637 M01S01267.283l840 +++| SETMS IO,(DE,DF)
10638 M01S01268.283l840 +++| LDC BFMS REREAD LABEL SECTOR
10639 M01S01269.283l840 +++| RJM RDS
10640 M01S01270.283l840 +++| LDD RE
10641 M01S01271.283l840 +++| SHN 21-1
10642 M01S01272.283l840 +++| MJN CTD1 IF ACCESSED PREVIOUSLY BY OTHER MF
10643 M01S01273.283l840 +++| LDM N4SS+5*SDGL+4
10644 M01S01274.283l840 +++| LPN 77 SAVE DIT INDEX
10645 M01S01275.283l840 +++| STD P1
10646 M01S01276.283l840 +++| LDN MSTL SET CHECKPOINTED MST LENGTH
10647 M01S01277.283l840 +++| STD T3
10648 M01S01278.283l840 +++| LDD FN+4 SET MST ADDRESS
10649 M01S01279.283l840 +++| SHN 3
10650 M01S01280.283l840 +++| ADK TDGL GET TRT LENGTH
10651 M01S01281.283l840 +++| CRD CN
10652 M01S01282.283l840 +++| SBK TDGL UPDATE MST IN LABEL SECTOR
10653 M01S01283.283l840 +++| CRM N4SS,T3
10654 M01S01284.283l840 +++| LDD P1 SET SOFTWARE RESERVE IN LABEL
10655 M01S01285.283l840 +++| LMD HN
10656 M01S01286.283l840 +++| STM N4SS+5*SDGL+4
10657 M01S01287.283l840 +++| LDD CN+2 SET MRT LENGTH
10658 M01S01288.283l840 +++| ADN 7
10659 M01S01289.283l840 +++| SHN -3 CALCULATE DIT OFFSET
10660 M01S01290.283l840 +++| RAD CN+2
10661 M01S01291.283l840 +++| UJN CTD2 GENERATE CHECKSUM
10662 M01S01292.283l840 +++|
10663 M01S01293.283l840 +++| CTD1 LDN 0 CLEAR MACHINE ID TO FORCE TRT UPDATE IN CM
10664 M01S01294.283l840 +++| STM N4SS+5*STLL+2
10665 M01S01295.283l840 +++| LDM N4SS+5*SDGL+4 CLEAR MST INTERLOCK
10666 M01S01296.283l840 +++| SCN 77
10667 M01S01297.283l840 +++| STM N4SS+5*SDGL+4
10668 M01S01298.283l840 +++| CTD2 RJM CLC COMPUTE LABEL CHECKSUM
10669 M01S01299.283l840 +++| STM CKSS
10670 M01S01300.283l840 +++| LDC BFMS+WLSF
10671 M01S01301.283l840 +++| RJM WDS
10672 M01S01302.283l840 +++| ENDMS RELEASE HARDWARE RESERVE
10673 M01S01303.283l840 +++| LDD RE
10674 M01S01304.283l840 +++| LPN 2
10675 M01S01305.283l840 +++| NJN CTD3 IF DEVICE ACCESSED PREVIOUSLY
10676 M01S01306.283l840 +++| AOM N4SS+5*SDGL+4
10677 M01S01307.283l840 +++| LDD FN+4 SET MST ADDRESS
10678 M01S01308.283l840 +++| SHN 3
10679 M01S01309.283l840 +++| ADN SDGL STORE DEVICE INTERLOCK IN CM
10680 M01S01310.283l840 +++| CWM N4SS+5*SDGL,ON
10681 M01S01311.283l840 +++| RJM STA STORE DIT IN CM
10682 M01S01312.283l840 +++| ADD CN+2
10683 M01S01313.283l840 +++| ERRNZ MISD-MSTL CODE DEPENDS ON VALUE
10684 M01S01314.283l840 +++| CWM DISS,T3
10685 M01S01315.283l840 +++| LDD T5
10686 M01S01316.283l840 +++| STD CM+1 SET EST ORDINAL
10687 M01S01317.283l840 +++| LDN CDIS
10688 M01S01318.283l840 +++| STD CM+3 UPDATE TABLES ON DISK
10689 M01S01319.283l840 +++| MONITOR STBM
10690 M01S01320.283l840 +++|* LDN 0 SET IMMEDIATE RETURN
10691 M01S01321.283l840 +++| CTD3 LMN 2
10692 M01S01322.283l840 +++| LJM CTD6 RETURN
10693 M01S01323.283l840 +++| RMR SPACE 4,15
10694 M01S01324.283l840 +++|** RMR - READ MRT.
10695 M01S01325.283l840 +++|*
10696 M01S01326.283l840 +++|* ENTRY (T5) = (EQ) = EST ORDINAL.
10697 M01S01327.283l840 +++|* (FN - FN+4) = EST ENTRY.
10698 M01S01328.283l840 +++|*
10699 M01S01329.283l840 +++|* USES T5 - T7, CM - CM+4, CN - CN+4.
10700 M01S01330.283l840 +++|*
10701 M01S01331.283l840 +++|* CALLS PTA, RDS, STA.
10702 M01S01332.283l840 +++|*
10703 M01S01333.283l840 +++|* MACROS ENDMS, SETMS.
10704 M01S01334.283l840 +++|
10705 M01S01335.283l840 +++|
10706 M01S01336.283l840 +++| RMR SUBR ENTRY/EXIT
10707 M01S01337.283l840 +++| LDD FN
10708 M01S01338.283l840 +++| SHN 21-11
10709 M01S01339.283l840 +++| PJN RMRX IF DEVICE NOT SHARED
10710 M01S01340.283l840 +++| SHN 21-4-21+11
10711 M01S01341.283l840 +++| PJN RMR1 IF NOT ISD
10712 M01S01342.283l840 +++| LDD RS
10713 M01S01343.283l840 +++| LPN FLMK
10714 M01S01344.283l840 +++| LMN FLTB
10715 M01S01345.283l840 +++| NJN RMRX IF FILES NOT RECOVERED FROM MS TABLES
10716 M01S01346.283l840 +++| LDD RA
10717 M01S01347.283l840 +++| SHN 6
10718 M01S01348.283l840 +++| ADD AL FETCH LABEL SECTOR
10719 M01S01349.283l840 +++| ADN DILL
10720 M01S01350.283l840 +++| CRD T7
10721 M01S01351.283l840 +++| LDD FN+4 GET LABEL TRACK
10722 M01S01352.283l840 +++| SHN 3
10723 M01S01353.283l840 +++| ADN ALGL
10724 M01S01354.283l840 +++| CRD CM
10725 M01S01355.283l840 +++| ADN DULL-ALGL GET MACHINE INDEX
10726 M01S01356.283l840 +++| CRD CN
10727 M01S01357.283l840 +++| LDD CM+1 SET LABEL TRACK
10728 M01S01358.283l840 +++| STD T6
10729 M01S01359.283l840 +++| LDD CN+2 SET MRT SECTOR
10730 M01S01360.283l840 +++| LPN 17
10731 M01S01361.283l840 +++| ADN MRTL
10732 M01S01362.283l840 +++| RAD T7
10733 M01S01363.283l840 +++| UJN RMR2 READ MRT
10734 M01S01364.283l840 +++|
10735 M01S01365.283l840 +++| RMR1 LDK MMFL GET LINK DEVICE EST ORDINAL
10736 M01S01366.283l840 +++| CRD CN
10737 M01S01367.283l840 +++| LDD CN+1
10738 M01S01368.283l840 +++| LPC 777
10739 M01S01369.283l840 +++| STD T5
10740 M01S01370.283l840 +++| LDD TS SET MST/TRT TRACK FOR DEVICE
10741 M01S01371.283l840 +++| STD T6
10742 M01S01372.283l840 +++| LDD CN+4 SET MRT SECTOR FOR THIS MACHINE
10743 M01S01373.283l840 +++| ADN MRST-1
10744 M01S01374.283l840 +++| STD T7
10745 M01S01375.283l840 +++| RMR2 SETMS IO,DF
10746 M01S01376.283l840 +++| LDC BFMS
10747 M01S01377.283l840 +++| RJM RDS
10748 M01S01378.283l840 +++| ENDMS
10749 M01S01379.283l840 +++| LDD EQ RESTORE (T5)
10750 M01S01380.283l840 +++| STD T5
10751 M01S01381.283l840 +++|
10752 M01S01382.283l840 +++|* COPY MRT TO CM AT THE END OF THE TRT.
10753 M01S01383.283l840 +++|
10754 M01S01384.283l840 +++| RJM PTA PRESET TRT ADDRESS
10755 M01S01385.283l840 +++| LDD FN+4 GET TRT LENGTH
10756 M01S01386.283l840 +++| SHN 3
10757 M01S01387.283l840 +++| ADK TDGL
10758 M01S01388.283l840 +++| CRD CM
10759 M01S01389.283l840 +++| LDD CM+2 SET MRT LENGTH
10760 M01S01390.283l840 +++| STD T0 SAVE TRT LENGTH
10761 M01S01391.283l840 +++| ADN 7
10762 M01S01392.283l840 +++| SHN -3
10763 M01S01393.283l840 +++| STD CM+2
10764 M01S01394.283l840 +++| RJM STA SET TRT FWA
10765 M01S01395.283l840 +++| ADD T0
10766 M01S01396.283l840 +++| CWM BFMS+2,CM+2 COPY MRT TO CM
10767 M01S01397.283l840 +++| LJM RMRX RETURN
10768 M00S08360.msm +++| TITLE COPY TRT.
10769 M00S08361.msm +++| CTT SPACE 4,10
10770 M00S08362.msm +++|** CTT - COPY TRT.
10771 M00S08363.msm +++|*
10772 M00S08364.msm +++|* ENTRY (CA) = CM ADDRESS OF TRT.
10773 M00S08365.msm +++|* (FN - FN+4) = EST ENTRY.
| Line S00092 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10774 M01S00092.ns2552 +++|*
10775 M01S00093.ns2552 +++|* EXIT (A) = 0.
10776 M00S08366.msm +++|*
10777 M00S08367.msm +++|* USES T6, CM - CM+4, CN - CN+4.
10778 M00S08368.msm +++|*
| Line S08369 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10779 M01S08369.ns2552 ---|* CALLS PTA, RMR, STA.
| Line S00094 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10780 M01S00094.ns2552 +++|* CALLS PTA, STA.
10781 M00S08370.msm +++|
10782 M00S08371.msm +++|
10783 M00S08372.msm +++|
| Line S08373 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10784 M01S08373.ns2552 ---| CTT SUBR ENTRY/EXIT
10785 M01S08374.ns2552 ---| RJM PTA PRESET FWA OF TRT
10786 M01S08375.ns2552 ---| LDD RE CHECK SHARED DEVICE STATUS
10787 M01S08376.ns2552 ---| LPC 1002
10788 M01S08377.ns2552 ---| LMC 1002
10789 M01S08378.ns2552 ---| ZJN CTT2 IF DEVICE ACCESSED PREVIOUSLY
| Line S00095 Modification History |
M01 (Added by) | ns2552 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10790 M02S00095.283l840 ---| CTT SUBR POV ENTRY/EXIT
10791 M02S00096.283l840 ---| ERRNZ RDG+1-CTTX CODE DEPENDS ON VALUE
| Line S01398 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10792 M01S01398.283l840 +++| CTT SUBR ENTRY/EXIT
| Line S00097 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10793 M01S00097.ns2552 +++| RJM PTA
10794 M00S08379.msm +++| LDN 0 SET TRT WORD INDEX
10795 M00S08380.msm +++| STD T6
10796 M00S08381.msm +++| LDD FN+4 READ *TDGL*
10797 M00S08382.msm +++| SHN 3
10798 M00S08383.msm +++| ADK TDGL
10799 M00S08384.msm +++| CRD CN
10800 M00S08385.msm +++| CTT1 LDD RA READ BUFFER WORD
10801 M00S08386.msm +++| SHN 6
10802 M00S08387.msm +++| ADD CA
10803 M00S08388.msm +++| ADD T6
10804 M00S08389.msm +++| CRD CM
10805 M00S08390.msm +++| RJM STA SET FWA OF TRT
10806 M00S08391.msm +++| ADD T6
10807 M00S08392.msm +++| CWD CM
10808 M00S08393.msm +++| AOD T6 ADVANCE WORD
10809 M00S08394.msm +++| LMD CN+2
10810 M00S08395.msm +++| NJN CTT1 LOOP TO END OF TRT
| Line S08396 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10811 M01S08396.ns2552 ---| CTT2 RJM RMR READ MRT AND COPY TO CM
10812 M01S08397.ns2552 ---| UJN CTTX
| Line S00098 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10813 M01S00098.ns2552 +++|* LDN 0
10814 M01S00099.ns2552 +++| UJN CTTX RETURN
10815 M00S08398.msm +++| EMT TITLE ENTER MST PARAMETERS FROM LABEL.
10816 M00S08399.msm +++|** EMT - ENTER MST PARAMETERS FROM LABEL.
10817 M00S08400.msm +++|*
10818 M00S08401.msm +++|* ENTRY (FN - FN+4) = EST ENTRY.
10819 M00S08402.msm +++|* (FS - FS+4) = STLL WORD.
10820 M00S08403.msm +++|* (T5) = EST ORDINAL.
10821 M00S08404.msm +++|* (RS) = RECOVERY STATUS.
10822 M00S08405.msm +++|* (MBUF) = LABEL MST.
10823 M00S08406.msm +++|*
10824 M00S08407.msm +++|* EXIT MST UPDATED TO REFLECT DEVICE LOADED.
10825 M00S08408.msm +++|* EST UPDATED TO REFLECT DEVICE LOADED.
10826 M00S08409.msm +++|* DEVICE SET AVAILABLE.
10827 M00S08410.msm +++|*
10828 M00S08411.msm +++|* USES T1, T2, CM - CM+4, CN - CN+4.
10829 M00S08412.msm +++|*
10830 M00S08413.msm +++|* MACROS MONITOR, SFA.
10831 M00S08414.msm +++|
10832 M00S08415.msm +++|
10833 M00S08416.msm +++| EMT SUBR ENTRY/EXIT
10834 M00S08417.msm +++| LDD FN
10835 M00S08418.msm +++| LPC 7667
10836 M00S08419.msm +++| EMTB EQU *-1
10837 M00S08420.msm +++|* LPC 7767 (*CMS* CALL)
10838 M00S08421.msm +++| STD FN
10839 M00S08422.msm +++| LDD FN+4 FETCH MST DRIVER WORD
10840 M00S08423.msm +++| SHN 3
10841 M00S08424.msm +++| ADN MDGL
10842 M00S08425.msm +++| CRD CM
10843 M00S08426.msm +++| LDD CM RETAIN *R* STATUS AND DAT INDEX
10844 M00S08427.msm +++| LPC 4377
10845 M00S08428.msm +++| STD CM
10846 M00S08429.msm +++| LDN 0
10847 M00S08430.msm +++| STD T2
10848 M00S08431.msm +++| STM MBUF+5*NVGL+4 CLEAR UNITS RESERVED TO *NVE*
10849 M00S08432.msm +++| LDD RS
10850 M00S08433.msm +++| NJN EMT1 IF RECOVERY SELECTED
10851 M00S08434.msm +++| STM MBUF+5*STLL+3 CLEAR ACTIVE USER COUNT
10852 M00S08435.msm +++| STM MBUF+5*DULL+1 CLEAR PF INTERLOCK AND COUNT
10853 M00S08436.msm +++| STM MBUF+5*DULL+3 CLEAR SYSTEM TABLE TRACK
10854 M00S08437.msm +++| STM MBUF+5*DULL+4 CLEAR ACTIVE USER COUNT
10855 M00S08438.msm +++| EMT1 LDD RE CLEAR UNAVAILABLE STATUS
10856 M00S08439.msm +++| LPC 7677
10857 M00S08440.msm +++| STD RE
10858 M00S08441.msm +++| LPN 2
10859 M00S08442.msm +++| NJN EMT3 IF DEVICE ACCESSED PREVIOUSLY
10860 M00S08443.msm +++| LDD RS
10861 M00S08444.msm +++| NJN EMT2 IF RECOVERY DEADSTART
10862 M00S08445.msm +++| LDM MBUF+5*ACGL+3 SAVE *IQFT* TRACK
10863 M00S08446.msm +++| STD T2
10864 M00S08447.msm +++| LDN 0 CLEAR *IQFT* POINTER
10865 M00S08448.msm +++| STM MBUF+5*ACGL+3
| Line S00001 Modification History |
M01 (Added by) | ns2783 |
Seq # *Modification Id* Act
----------------------------+
10866 M01S00001.ns2783 +++| LDM MBUF+5*ACGL+0 CLEAR *DAS* PARITY DEVICE ACCESS FLAGS
10867 M01S00002.ns2783 +++| SCN 17
10868 M01S00003.ns2783 +++| STM MBUF+5*ACGL+0
10869 M01S00004.ns2783 +++| LDD FN+3 CHECK DEVICE TYPE
10870 M01S00005.ns2783 +++| LMC 2RDE
10871 M01S00006.ns2783 +++| ZJN EMT2 IF *DE* DEVICE
10872 M01S00007.ns2783 +++| LMN 2RDP&2RDE
10873 M01S00008.ns2783 +++| ZJN EMT2 IF *DP* DEVICE
10874 M01S00009.ns2783 +++| LDN 0 CLEAR *DAS* PARITY DEVICE FIELDS
10875 M01S00010.ns2783 +++| STM MBUF+5*ACGL+1
10876 M00S08449.msm +++| EMT2 LDD FN+4 STORE DEVICE ACTIVITY WORD
10877 M00S08450.msm +++| SHN 3
10878 M00S08451.msm +++| ADN ACGL
10879 M00S08452.msm +++| CWM MBUF+5*ACGL,ON
10880 M00S08453.msm +++| EMT3 LDM MBUF+5*STLL+3 RETAIN ACTIVE USER COUNT
10881 M00S08454.msm +++| STD FS+3
10882 M00S08455.msm +++| LDM MBUF+5*MDGL SET *X* AND 16-WORD PFC STATUS FROM LABEL
10883 M00S08456.msm +++| LPC 3000
10884 M00S08457.msm +++| RAD CM
10885 M00S08458.msm +++| LDD FN SET MACHINE INDEX FOR DEVICE
10886 M00S08459.msm +++| SHN 21-4
10887 M00S08460.msm +++| MJN EMT4 IF ISD
10888 M00S08461.msm +++| EMTA LDN 0 (MACHINE INDEX - 1)
10889 M00S08462.msm +++| STM MBUF+5*DULL+2
10890 M00S08463.msm +++| EMT4 LDD FN+4 STORE ALLOCATION AND DEVICE DESCRIPTION
10891 M00S08464.msm +++| SHN 3
10892 M00S08465.msm +++| ADN ALGL
10893 M00S08466.msm +++| ERRNZ PFGL-ALGL-1 ADJUST IF *PFGL* POSITION CHANGES
10894 M00S08467.msm +++| ERRNZ PUGL-ALGL-2 ADJUST IF *PUGL* POSITION CHANGES
10895 M00S08468.msm +++| CWM MBUF+5*ALGL,TR
10896 M00S08469.msm +++| ADK MDGL-ALGL-3 STORE DRIVER WORD
10897 M00S08470.msm +++| CWD CM
| Line S08471 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10898 M01S08471.283l840 ---| ADN NVGL-MDGL
| Line S01399 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
10899 M01S01399.283l840 +++| LDD FN+4 PRESERVE BAT ADDRESS
10900 M01S01400.283l840 +++| SHN 3
10901 M01S01401.283l840 +++| ADN NVGL
10902 M01S01402.283l840 +++| CRD CM
10903 M01S01403.283l840 +++| LDD CM+1
10904 M01S01404.283l840 +++| STM MBUF+5*NVGL+1
10905 M01S01405.283l840 +++| LDD CM+2
10906 M01S01406.283l840 +++| STM MBUF+5*NVGL+2
10907 M01S01407.283l840 +++| LDD FN+4 STORE BAT PARAMETERS
10908 M01S01408.283l840 +++| SHN 3
10909 M01S01409.283l840 +++| ADN NVGL
10910 M00S08472.msm +++| ERRNZ NVGL+1-ISGL CODE DEPENDS ON VALUE
10911 M00S08473.msm +++| ERRNZ ISGL+1-I2GL CODE DEPENDS ON VALUE
10912 M00S08474.msm +++| CWM MBUF+5*NVGL,TR
10913 M00S08475.msm +++| ADN DULL-NVGL-3 STORE DEVICE USAGE INFORMATION
10914 M00S08476.msm +++| CWM MBUF+5*DULL,ON
10915 M00S08477.msm +++| CWD FS STORE DEVICE STATUS
10916 M00S08478.msm +++| SFA EST,T5 SET EQUIPMENT AVAILABLE IN EST
10917 M00S08479.msm +++| ADK EQDE
10918 M00S08480.msm +++| CWD FN
10919 M00S08481.msm +++| LDD T2
10920 M00S08482.msm +++| ZJN EMT5 IF NO *IQFT*
10921 M00S08483.msm +++| STD CM+2
10922 M00S08484.msm +++| LDD T5 RELEASE *IQFT* TRACK CHAIN
10923 M00S08485.msm +++| STD CM+1
10924 M00S08486.msm +++| MONITOR DTKM
10925 M00S08487.msm +++| EMT5 LJM EMTX RETURN
10926 M00S08488.msm +++| ETT TITLE EDIT TRT.
10927 M00S08489.msm +++|** ETT - EDIT TRACK TABLE.
10928 M00S08490.msm +++|*
10929 M00S08491.msm +++|* ENTRY (CA) = ADDRESS OF CM BUFFER CONTAINING TRT.
10930 M00S08492.msm +++|* (FN - FN+4) = EST ENTRY.
10931 M00S08493.msm +++|* (MBUF) = LABEL MST.
10932 M00S08494.msm +++|*
10933 M00S08495.msm +++|* EXIT (A) = 0 IF COPY SUCCESSFUL.
10934 M00S08496.msm +++|* (A) .LT. 0 IF ERROR IN EDITING.
10935 M00S08497.msm +++|* ALL NON-PRESERVED FILE CHAINS RELEASED.
10936 M00S08498.msm +++|*
10937 M00S08499.msm +++|* USES T1, T2, T6, T7, P1, CM - CM+4.
10938 M00S08500.msm +++|*
10939 M00S08501.msm +++|* CALLS PTA, RTC, STF.
10940 M00S08502.msm +++|
10941 M00S08503.msm +++|
10942 M00S08504.msm +++| ETT SUBR ENTRY/EXIT
| Line S08505 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
10943 M01S08505.ns2552 ---| LDD RE CHECK SHARED DEVICE STATUS
10944 M01S08506.ns2552 ---| LPC 1002
10945 M01S08507.ns2552 ---| LMC 1002
10946 M01S08508.ns2552 ---| ZJN ETTX IF SHARED DEVICE ACCESSED PREVIOUSLY
10947 M00S08509.msm ---| LDD FN+4 GET TRT LENGTH
10948 M00S08510.msm ---| SHN 3
10949 M00S08511.msm ---| ADK TDGL
10950 M00S08512.msm ---| CRD CM
10951 M00S08513.msm ---| LDD CM+2 SET TRT LENGTH
10952 M00S08514.msm ---| STD P1
10953 M00S08515.msm ---| RJM PTA PRESET FWA OF TRT
10954 M00S08516.msm ---| LDN 0 CLEAR WORD AND BYTE INDEX
10955 M00S08517.msm ---| STD T6
10956 M00S08518.msm ---| STD T7
10957 M00S08519.msm ---| STM MBUF+5*ACGL+2 CLEAR PRESERVED FILE COUNT
10958 M00S08520.msm ---| ETT1 LDD RA READ BUFFER WORD
10959 M00S08521.msm ---| SHN 6
10960 M00S08522.msm ---| ADD CA
10961 M00S08523.msm ---| ADD T6
10962 M00S08524.msm ---| CRD CM
10963 M00S08525.msm ---| LDD CM+4 SET PRESERVED FILE IDENTIFIERS
10964 M00S08526.msm ---| LPC 7400
10965 M00S08527.msm ---| STM ETTB SET BIT MASK
10966 M00S08528.msm ---| LDM CM,T7 CHECK FOR RESERVED TRACK
10967 M00S08529.msm ---| LMC 3777
10968 M00S08530.msm ---| NJN ETT2 IF NOT FLAWED TRACK
10969 M00S08531.msm ---| RJM STF SET TRACK FLAW
10970 M00S08532.msm ---| UJN ETT3 ADVANCE BYTE INDEX
10971 M00S08533.msm ---|
10972 M00S08534.msm ---| ETT2 LDM ETTC,T7 CHECK PRESERVED FILE BIT
10973 M00S08535.msm ---| LPC *
10974 M00S08536.msm ---| ETTB EQU *-1
10975 M00S08537.msm ---| ZJN ETT3 IF NOT PRESERVED FILE
10976 M00S08538.msm ---| RJM RTC RESERVE TRACK CHAIN
10977 M00S08539.msm ---| AOM MBUF+5*ACGL+2 ADVANCE PRESERVED FILE COUNT
10978 M00S08540.msm ---| ETT3 AOD T7 ADVANCE BYTE INDEX
10979 M00S08541.msm ---| LMN 4
10980 M00S08542.msm ---| NJN ETT4 IF NOT END OF TRT WORD
10981 M00S08543.msm ---| STD T7
10982 M00S08544.msm ---| AOD T6 ADVANCE WORD INDEX
10983 M00S08545.msm ---| LMD P1
10984 M00S08546.msm ---| ZJN ETT5 IF END OF BUFFER
10985 M00S08547.msm ---| ETT4 LJM ETT1 LOOP
10986 M00S08548.msm ---|
10987 M00S08549.msm ---| ETT5 LDM MBUF+5*NVGL
10988 M00S08550.msm ---| ZJN ETT7 IF NO MEDIA ERRORS RECORDED
10989 M00S08551.msm ---| SHN 21-1
10990 M00S08552.msm ---| LMD TH EXTRACT TRT WORD INDEX
10991 M00S08553.msm ---| STD T6
10992 M00S08554.msm ---| SHN 1-21 FORM BYTE INDEX FROM TRACK NUMBER
10993 M00S08555.msm ---| STD T7
10994 M00S08556.msm ---| RJM STF SET TRACK FLAW
10995 M00S08557.msm ---| NJN ETT6 IF TRACK RESERVED
10996 M00S08558.msm ---| STM MBUF+5*NVGL
10997 M00S08559.msm ---| ETT6 LDN 0
10998 M00S08560.msm ---| ETT7 LJM ETTX RETURN
10999 M00S08561.msm ---|
11000 M00S08562.msm ---|
11001 M00S08563.msm ---|* TRACK RESERVATION BITS.
11002 M00S08564.msm ---|
11003 M00S08565.msm ---| ETTC BSS 0
11004 M00S08566.msm ---| CON 4010
11005 M00S08567.msm ---| CON 2004
11006 M00S08568.msm ---| CON 1002
11007 M00S08569.msm ---| CON 0401
11008 M00S08570.msm ---| RTC TITLE RESERVE TRACK CHAIN.
11009 M00S08571.msm ---|** RTC - RESERVE TRACK CHAIN.
11010 M00S08572.msm ---|*
11011 M00S08573.msm ---|* ENTRY (CA) = BUFFER ADDRESS.
11012 M00S08574.msm ---|* (P1) = TRT LENGTH.
11013 M00S08575.msm ---|* (FN - FN+4) = EST ENTRY.
11014 M00S08576.msm ---|* (T6) = WORD INDEX.
11015 M00S08577.msm ---|* (T7) = BYTE INDEX.
11016 M00S08578.msm ---|*
11017 M01S08579.ns2552 ---|* EXIT (A) .LT. 0 IF ERROR.
| Line S00100 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11018 M01S00100.ns2552 +++|* EXIT (A) = *STLK* IF LINKAGE ERROR.
11019 M00S08580.msm +++|* TO *ETTX* IF LINKAGE ERROR.
11020 M00S08581.msm +++|*
11021 M00S08582.msm +++|* USES T1, T2, CM - CM+4, CN - CN+4.
11022 M00S08583.msm +++|*
11023 M00S08584.msm +++|* CALLS STA.
11024 M00S08585.msm +++|
11025 M00S08586.msm +++|
11026 M00S08587.msm +++| RTC SUBR ENTRY/EXIT
11027 M00S08588.msm +++| LDD T6 SET WORD INDEX
11028 M00S08589.msm +++| STD T1
11029 M00S08590.msm +++| LDD T7 SET BYTE INDEX
11030 M00S08591.msm +++| STD T2
11031 M00S08592.msm +++| RTC1 LDD T1 CHECK WORD INDEX
11032 M00S08593.msm +++| SBD P1
11033 M00S08594.msm +++| PJN RTC2 IF OUT OF TRT
11034 M00S08595.msm +++| RJM STA SET FWA OF TRT
11035 M00S08596.msm +++| ADD T1
11036 M00S08597.msm +++| CRD CN
11037 M00S08598.msm +++| LDM CN,T2 CHECK TRACK LINK
11038 M00S08599.msm +++| ZJN RTC3 IF CLEAR
| Line S08600 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11039 M01S08600.ns2552 ---| RTC2 LCN 0 SET ERROR RETURN
| Line S00101 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11040 M01S00101.ns2552 +++| RTC2 LDN STLK
11041 M00S08601.msm +++| LJM ETTX EXIT
11042 M00S08602.msm +++|
11043 M00S08603.msm +++| RTC3 LDM CM,T2 SET NEXT LINK
11044 M00S08604.msm +++| STM CN,T2
11045 M00S08605.msm +++| LDM ETTC,T2 SET PROPAGATION MASK
11046 M00S08606.msm +++| STM RTCB
11047 M00S08607.msm +++| LMC -0 SET RESERVATION MASK
11048 M00S08608.msm +++| STM RTCA
11049 M00S08609.msm +++| LDD CN+4 SAVE PREVIOUS BITS
11050 M00S08610.msm +++| LPC *
11051 M00S08611.msm +++| RTCA EQU *-1
11052 M00S08612.msm +++| STD CN+4
11053 M00S08613.msm +++| LDD CM+4
11054 M00S08614.msm +++| LPC *
11055 M00S08615.msm +++| RTCB EQU *-1
11056 M00S08616.msm +++| RAD CN+4
11057 M00S08617.msm +++| RJM STA SET FWA OF TRT
11058 M00S08618.msm +++| ADD T1
11059 M00S08619.msm +++| CWD CN
11060 M00S08620.msm +++| LDM CN,T2 CHECK NEXT LINK
11061 M00S08621.msm +++| SHN 6
11062 M00S08622.msm +++| MJN RTC4 IF NOT END OF TRACK CHAIN
11063 M00S08623.msm +++| LJM RTCX RETURN
11064 M00S08624.msm +++|
11065 M00S08625.msm +++| RTC4 SHN 12 SET WORD INDEX
11066 M00S08626.msm +++| LMD TH
11067 M00S08627.msm +++| STD T1
11068 M00S08628.msm +++| SHN -20 SET BYTE INDEX
11069 M00S08629.msm +++| STD T2
11070 M00S08630.msm +++| LDD RA READ BUFFER WORD
11071 M00S08631.msm +++| SHN 6
11072 M00S08632.msm +++| ADD CA
11073 M00S08633.msm +++| ADD T1
11074 M00S08634.msm +++| CRD CM
11075 M00S08635.msm +++| LJM RTC1 LOOP TO END OF CHAIN
11076 M00S08636.msm +++| RTT TITLE READ TRT.
| Line S08637 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11077 M01S08637.ns2552 ---|** RTT - READ TRT INTO CM BUFFER.
| Line S00102 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11078 M01S00102.ns2552 +++|** RTT - RECOVER TRACK RESERVATION TABLE.
11079 M00S08638.msm +++|*
11080 M00S08639.msm +++|* ENTRY (T5) = EST ORDINAL.
11081 M00S08640.msm +++|* (CA+1) = CM BUFFER ADDRESS FOR TRT.
11082 M00S08641.msm +++|* (FN - FN+4) = EST ENTRY.
11083 M00S08642.msm +++|*
| Line S08643 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11084 M01S08643.ns2552 ---|* EXIT (A) = 0 IF TRT LENGTH CORRECT.
| Line S00103 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11085 M01S00103.ns2552 +++|* EXIT (A) = 0 IF SUCCESSFUL RECOVERY.
11086 M01S00104.ns2552 +++|* = *STTL* IF TRT LENGTH ERROR.
11087 M01S00105.ns2552 +++|* = *STLK* IF TRT LINKAGE ERROR.
11088 M00S08644.msm +++|* (CA) = FWA OF TRT IN CM.
11089 M00S08645.msm +++|* (MBUF) = LABEL MST.
11090 M00S08646.msm +++|*
11091 M00S08647.msm +++|* USES P1, T1, T3, T6, T7, CN - CN+4.
11092 M00S08648.msm +++|*
| Line S08649 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11093 M01S08649.ns2552 ---|* CALLS RDS.
| Line S00106 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11094 M01S00106.ns2552 +++|* CALLS ATC, CTD, CTT, EMT, ETT, RMR, RDS.
11095 M00S08650.msm +++|*
11096 M00S08651.msm +++|* MACROS ENDMS, MONITOR, SETMS.
11097 M00S08652.msm +++|
11098 M00S08653.msm +++|
11099 M01S00107.ns2552 +++| RTT4 NJN RTTX IF LENGTH ERROR
11100 M01S00108.ns2552 +++| RJM ETT EDIT TRACK TABLE
11101 M01S00109.ns2552 +++| RTTA EQU *-1
11102 M01S00110.ns2552 +++|* RJM CTT (RECOVERY DEADSTART)
11103 M01S00111.ns2552 +++| NJN RTTX IF LINKAGE ERROR
11104 M01S00112.ns2552 +++| RTT5 RJM EMT ENTER MST PARAMETERS
11105 M01S00113.ns2552 +++| RJM ATC ADJUST TRACK COUNT
11106 M01S00114.ns2552 +++| RTTB UJN *+2 SKIP MRT UPDATE
11107 M01S00115.ns2552 +++| CON RMR
11108 M01S00116.ns2552 +++|* RJM RMR (RECOVERY DEADSTART)
11109 M01S00117.ns2552 +++| RJM CTD COPY SHARED TABLES
11110 M01S00118.ns2552 +++| LDN 0
11111 M01S00119.ns2552 +++|
11112 M00S08654.msm +++| RTT SUBR ENTRY/EXIT
11113 M00S08655.msm +++| LDN MSTL
11114 M00S08656.msm +++| STD T1
11115 M00S08657.msm +++| LDD RA READ LABEL INTO MST BUFFER
11116 M00S08658.msm +++| SHN 6
11117 M00S08659.msm +++| ADD AL
11118 M00S08660.msm +++| CRM MBUF,T1
11119 M00S08661.msm +++| LDD RE CHECK ESM RESIDENT TRT
11120 M00S08662.msm +++| LPC 1002
11121 M00S08663.msm +++| LMC 1002
| Line S08664 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11122 M01S08664.ns2552 ---| ZJN RTTX IF DEVICE ACCESSED PREVIOUSLY
| Line S00120 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11123 M01S00120.ns2552 +++| ZJN RTT5 IF DEVICE ACCESSED PREVIOUSLY
11124 M00S08665.msm +++| SETMS IO,DF
11125 M00S08666.msm +++| LDD CA+1 SET FWA FOR TRT IN CM
11126 M00S08667.msm +++| STD CA
11127 M00S08668.msm +++| LDM MBUF+5*ALGL+1 SET LABEL TRACK
11128 M00S08669.msm +++| STD T6
11129 M00S08670.msm +++| LDM MBUF+5*DILL SET SECTOR NUMBER
11130 M00S08671.msm +++| ADN FSMS
11131 M00S08672.msm +++| STD T7
11132 M00S08673.msm +++| LDD FN+4 SET LENGTH OF TRT
11133 M00S08674.msm +++| SHN 3
11134 M00S08675.msm +++| ADK TDGL
11135 M00S08676.msm +++| CRD CN
11136 M00S08677.msm +++| LDD CN+2
11137 M00S08678.msm +++| STD P1
11138 M00S08679.msm +++| RTT1 LDC BFMS READ SECTOR
11139 M00S08680.msm +++| RJM RDS
11140 M00S08681.msm +++| MJN RTT2 IF MS ERROR
11141 M00S08682.msm +++| LDM BFMS
11142 M00S08683.msm +++| ZJN RTT2 IF EOF/EOI
11143 M00S08684.msm +++| STD T7
11144 M00S08685.msm +++| LDM BFMS+1
11145 M00S08686.msm +++| ZJN RTT2 IF END OF TRT
11146 M00S08687.msm +++| STD T1
11147 M00S08688.msm +++| LDD P1
11148 M00S08689.msm +++| SBD T1
11149 M00S08690.msm +++| MJN RTT2 IF WORD COUNT > TRT SIZE
11150 M00S08691.msm +++| STD P1
11151 M00S08692.msm +++| LDD RA WRITE SECTOR TO CM
11152 M00S08693.msm +++| SHN 6
11153 M00S08694.msm +++| ADD CA
11154 M00S08695.msm +++| CWM BFMS+2,T1
11155 M00S08696.msm +++| LDD T1
11156 M00S08697.msm +++| RAD CA
11157 M00S08698.msm +++| LDD T1
11158 M00S08699.msm +++| SHN -6
11159 M00S08700.msm +++| NJN RTT1 IF NOT EOR
11160 M00S08701.msm +++| RTT2 ENDMS RELEASE CHANNEL
11161 M00S08702.msm +++| LDD CA+1
11162 M00S08703.msm +++| STD CA SET FWA OF TRT IN CM
11163 M00S08704.msm +++| LDD P1
| Line S08705 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11164 M01S08705.ns2552 ---| LJM RTTX RETURN
| Line S00121 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11165 M01S00121.ns2552 +++| ZJN RTT3 IF CORRECT TRT LENGTH
11166 M01S00122.ns2552 +++| LDN STTL
11167 M01S00123.ns2552 +++| RTT3 LJM RTT4 COMPLETE RECOVERY
11168 M00S08706.msm +++| STF TITLE SET TRACK FLAW.
11169 M00S08707.msm +++|** STF - SET TRACK FLAW IN TRT.
11170 M00S08708.msm +++|*
11171 M00S08709.msm +++|* ENTRY (T6) = TRT WORD INDEX.
11172 M00S08710.msm +++|* (T7) = BYTE INDEX.
11173 M00S08711.msm +++|* (P1) = TRT LENGTH.
11174 M00S08712.msm +++|*
11175 M00S08713.msm +++|* EXIT (A) = 0 IF INVALID TRACK.
11176 M00S08714.msm +++|*
11177 M00S08715.msm +++|* USES CM - CM+4.
11178 M00S08716.msm +++|*
11179 M00S08717.msm +++|* CALLS STA.
11180 M00S08718.msm +++|
11181 M00S08719.msm +++|
11182 M00S08720.msm +++| STF1 LDN 0 INDICATE INVALID TRACK
11183 M00S08721.msm +++|
11184 M00S08722.msm +++| STF SUBR ENTRY/EXIT
11185 M00S08723.msm +++| LDD T6
11186 M00S08724.msm +++| SBD P1
11187 M00S08725.msm +++| PJN STF1 IF TRACK OUT OF TRT
11188 M00S08726.msm +++| RJM STA
11189 M00S08727.msm +++| ADD T6 READ TRT WORD
11190 M00S08728.msm +++| CRD CM
11191 M00S08729.msm +++| LDM ETTC,T7 SET TRACK RESERVATION MASK
11192 M00S08730.msm +++| LPN 17
11193 M00S08731.msm +++| STD T0
11194 M00S08732.msm +++| LMD CM+4 CHECK TRACK ASSIGNMENT
11195 M00S08733.msm +++| SBD T0
11196 M00S08734.msm +++| LMD CM+4
11197 M00S08735.msm +++| NJN STFX IF RESERVED
11198 M00S08736.msm +++| LDD T0
11199 M00S08737.msm +++| RAD CM+4 SET TRACK RESERVED
11200 M00S08738.msm +++| LDC 3777
11201 M00S08739.msm +++| STM CM,T7 SET TRACK FLAWED
11202 M00S08740.msm +++| RJM STA
11203 M00S08741.msm +++| ADD T6 STORE TRT WORD
11204 M00S08742.msm +++| CWD CM
11205 M00S08743.msm +++| UJN STFX RETURN
11206 M00S08744.msm +++| TITLE SET EQUIPMENT CONFIGURATION.
11207 M00S08745.msm +++| AUL SPACE 4,15
11208 M00S08746.msm +++|** AUL - ASSEMBLE UNIT LIST.
11209 M00S08747.msm +++|*
11210 M00S08748.msm +++|* ENTRY (UC) = REQUIRED UNIT COUNT.
11211 M00S08749.msm +++|* (FN - FN+4) = EST ENTRY.
11212 M00S08750.msm +++|* (CN - CN+4) = UNIT DESCRIPTOR WORD (DDLL).
11213 M00S08751.msm +++|*
11214 M00S08752.msm +++|* EXIT (A) = 0 IF REQUIRED UNIT COUNT SATISFIED.
11215 M00S08753.msm +++|* (CN - CN+4) = NEW UNIT LIST.
11216 M00S08754.msm +++|* (FS - FS+4) = DEVICE STATUS WORD (STLL).
11217 M00S08755.msm +++|*
11218 M00S08756.msm +++|* USES T0 - T3, CM - CM+4, FS - FS+4.
11219 M00S08757.msm +++|
11220 M00S08758.msm +++|
11221 M00S08759.msm +++| AUL2 AOD T1 ADVANCE UNITS TRANSFERED COUNT
11222 M00S08760.msm +++| SHN 21-0
11223 M00S08761.msm +++| MJN AUL3 IF NOT CROSSING BYTE BOUNDARY
11224 M00S08762.msm +++| SOD T2 DECREMENT SOURCE ADDRESS
11225 M00S08763.msm +++| AUL3 AOD CN ADVANCE TOTAL UNIT COUNT
11226 M00S08764.msm +++| LPN 7
11227 M00S08765.msm +++| SHN -1
11228 M00S08766.msm +++| STD T0
11229 M00S08767.msm +++| LDN CN+4 FORM DESTINATION BYTE ADDRESS
11230 M00S08768.msm +++| SBD T0
11231 M00S08769.msm +++| STD T3
11232 M00S08770.msm +++| LDI T2 EXTRACT NEXT UNIT
11233 M00S08771.msm +++| SHN 14
11234 M00S08772.msm +++| STI T2
11235 M00S08773.msm +++| SHN -14
11236 M00S08774.msm +++| AULA PJN AUL4 IF PACKING UNIT LOW
11237 M00S08775.msm +++|* MJN AUL4 FALL THRU IF PACKING UNIT HIGH
11238 M00S08776.msm +++| SHN 6
11239 M00S08777.msm +++| LMI T3 ASSEMBLE UNIT DESCRIPTOR WORD
11240 M00S08778.msm +++| SCN 77
11241 M00S08779.msm +++| LMI T3
11242 M00S08780.msm +++| AUL4 STI T3
11243 M00S08781.msm +++| LDD UC
11244 M00S08782.msm +++| LMD CN
11245 M00S08783.msm +++| LPN 7
11246 M00S08784.msm +++| ZJN AULX IF REQUIRED UNIT COUNT SATISFIED
11247 M00S08785.msm +++| LDM AULA TOGGLE UNIT PACKING TRANSFER
11248 M00S08786.msm +++| LMD HN
11249 M00S08787.msm +++| STM AULA
11250 M00S08788.msm +++| SOD CM
11251 M00S08789.msm +++| PJN AUL2 IF MORE UNITS THIS EQUIPMENT
11252 M00S08790.msm +++|
11253 M00S08791.msm +++| AUL SUBR ENTRY/EXIT
11254 M00S08792.msm +++| LDD FN+4
11255 M00S08793.msm +++| SHN 3
11256 M00S08794.msm +++| ADN STLL
11257 M00S08795.msm +++| CRD FS
11258 M00S08796.msm +++| ADN DDLL-STLL GET UNIT DESCRIPTOR WORD
11259 M00S08797.msm +++| CRD CM
11260 M00S08798.msm +++| LDD CM
11261 M00S08799.msm +++| LPN 7
11262 M00S08800.msm +++| STD CM
11263 M00S08801.msm +++| LDD CN CHECK CURRENT UNIT COUNT
11264 M00S08802.msm +++| LPN 1
11265 M00S08803.msm +++| ZJN AUL1 IF NEXT UNIT PACKS LOW
11266 M00S08804.msm +++| LDD HN PJNI .NOT. MJNI
11267 M00S08805.msm +++| AUL1 LMC MJNI+AUL4-AULA
11268 M00S08806.msm +++| STM AULA SET INITIAL PACKING TRANSFER
11269 M00S08807.msm +++| LDN 0 CLEAR UNITS UNPACKED
11270 M00S08808.msm +++| STD T1
11271 M00S08809.msm +++| LDN CM+4 SET INITIAL SOURCE ADDRESS
11272 M00S08810.msm +++| STD T2
11273 M00S08811.msm +++| LJM AUL3 ENTER LOOP
11274 M00S08812.msm +++| SEC SPACE 4,15
11275 M00S08813.msm +++|** SEC - SET EQUIPMENT CONFIGURATION.
11276 M00S08814.msm +++|*
11277 M00S08815.msm +++|* ENTRY (T5) = EST ORDINAL.
11278 M00S08816.msm +++|* (EQ) = EST ORDINAL.
11279 M00S08817.msm +++|* (FN - FN+4) = EST ENTRY.
11280 M00S08818.msm +++|*
11281 M00S08819.msm +++|* EXIT EST/MST SET TO ACCOMMODATE NEW CONFIGURATION.
11282 M00S08820.msm +++|* ALL EXCEPT FIRST EQUIPMENT IN CHAIN SET IN USE.
11283 M00S08821.msm +++|* (FS - FS+4) = STLL WORD FOR EQUIPMENT.
11284 M00S08822.msm +++|* (FN - FN+4) = EST ENTRY.
11285 M00S08823.msm +++|*
11286 M00S08824.msm +++|* USES EC, UC, CM - CM+7, CN - CN+4.
11287 M00S08825.msm +++|*
11288 M00S08826.msm +++|* CALLS AUL, SES, SSL.
11289 M00S08827.msm +++|*
11290 M00S08828.msm +++|* MACROS SFA, SMSTF.
11291 M00S08829.msm +++|
11292 M00S08830.msm +++|
11293 M00S08831.msm +++| SEC5 RJM SSL SET SECTOR LIMITS
11294 M00S08832.msm +++|
11295 M00S08833.msm +++| SEC SUBR ENTRY/EXIT
11296 M00S08834.msm +++| LDN 0 CLEAR MST ERROR STATUS
11297 M00S08835.msm +++| STD EC
11298 M00S08836.msm +++| RJM SES
11299 M00S08837.msm +++| LDD FN+4 READ CONFIGURATION PARAMETERS
11300 M00S08838.msm +++| SHN 3
11301 M00S08839.msm +++| ADN MDGL
11302 M00S08840.msm +++| CRD CM+3
11303 M00S08841.msm +++| SBN MDGL-PFGL
11304 M00S08842.msm +++| CRD CM
11305 M00S08843.msm +++| ADN STLL-PFGL
11306 M00S08844.msm +++| CRD FS
11307 M00S08845.msm +++| ADN DDLL-STLL
11308 M00S08846.msm +++| CRD CN
11309 M00S08847.msm +++| LDD CN SAVE CURRENT UNIT COUNT
11310 M00S08848.msm +++| LPN 7
11311 M00S08849.msm +++| STD T0
11312 M00S08850.msm +++| LDD FN CHECK EQUIPMENT STATUS
11313 M00S08851.msm +++| SHN 21-10
11314 M00S08852.msm +++| PJN SEC5 IF NOT REMOVABLE DEVICE
11315 M00S08853.msm +++| LDD CM+5
11316 M00S08854.msm +++| LMC 2RDI
11317 M00S08855.msm +++| ZJN SEC1 IF *6DI* DRIVER
11318 M00S08856.msm +++| LMN 2RDJ&2RDI
11319 M00S08857.msm +++| ZJN SEC1 IF *6DJ* DRIVER
11320 M00S08858.msm +++| LDD CM+4 SET REQUIRED = CURRENT UNIT COUNT
11321 M00S08859.msm +++| LPN 7
11322 M00S08860.msm +++| STD CM+4
11323 M00S08861.msm +++| LDD CN
11324 M00S08862.msm +++| SCN 7
11325 M00S08863.msm +++| LMD CM+4
11326 M00S08864.msm +++| STD CN
11327 M00S08865.msm +++| SEC1 LDD CM+4 SET REQUIRED UNIT COUNT
11328 M00S08866.msm +++| LPN 7
11329 M00S08867.msm +++| STD UC
11330 M00S08868.msm +++| SBD T0
11331 M00S08869.msm +++| ZJN SEC4 IF REQUIRED = CURRENT UNIT COUNT
11332 M00S08870.msm +++| MJN SEC3 IF REQUIRED COUNT .LT. CURRENT
11333 M00S08871.msm +++| SEC2 LDD FS+4 SET NEXT EQUIPMENT IN CHAIN
11334 M00S08872.msm +++| SHN -3
11335 M00S08873.msm +++| STD T5
11336 M00S08874.msm +++| SFA EST READ NEXT EQUIPMENT EST
11337 M00S08875.msm +++| ADK EQDE
11338 M00S08876.msm +++| CRD FN
11339 M00S08877.msm +++| SMSTF LDIU SET DEVICE IN USE
11340 M00S08878.msm +++| RJM AUL ASSEMBLE UNIT LIST
11341 M00S08879.msm +++| NJN SEC2 IF REQUIRED UNITS NOT ASSEMBLED
11342 M00S08880.msm +++| SEC3 RAD CN
11343 M00S08881.msm +++| LDD EQ RESTORE FIRST EQUIPMENT PARAMETERS
11344 M00S08882.msm +++| STD T5
11345 M00S08883.msm +++| SFA EST
11346 M00S08884.msm +++| ADK EQDE
11347 M00S08885.msm +++| CRD FN
11348 M00S08886.msm +++| SEC4 LDD FN+4
11349 M00S08887.msm +++| SHN 3
11350 M00S08888.msm +++| ADN STLL
11351 M00S08889.msm +++| CRD FS
11352 M00S08890.msm +++| ADN DDLL-STLL UPDATE UNIT DESCRIPTOR WORD
11353 M00S08891.msm +++| CWD CN
11354 M00S08892.msm +++| LJM SEC5 COMPLETE PROCESSING AND EXIT
| Line S01410 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11355 M01S01410.283l840 +++| SPACE 4
11356 M01S01411.283l840 +++| ERRNG BFMS-* OVERFLOW INTO BUFFER
11357 M01S01412.283l840 +++| TITLE PRESET.
11358 M01S01413.283l840 +++| PRS SPACE 4,10
11359 M01S01414.283l840 +++|** PRS - PRESET OVERLAY.
11360 M00S08893.msm +++|
| Line S08894 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11361 M01S08894.283l840 ---| MBUF EQU * MST BUFFER
11362 M01S08895.283l840 ---| OVL EQU MBUF+5*MSTL OVERLAY ORIGIN
11363 M01S08896.283l840 ---| POV SPACE 4,10
11364 M01S08897.283l840 ---|** POV - MODIFY INSTRUCTIONS AS REQUIRED FOR CM/MMF RECOVERY.
11365 M00S08898.msm ---|
| Line S01415 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11366 M01S01415.283l840 +++| PRS SUBR ENTRY/EXIT
11367 M00S08899.msm +++|
| Line S08900 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11368 M01S08900.283l840 ---| POV LDM MMFP
11369 M01S08901.283l840 ---| ZJN POV1 IF DO NOT PRESET FOR MMF
| Line S01416 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11370 M01S01416.283l840 +++|* PRESET FOR MMF PROCESSING.
11371 M01S01417.283l840 +++|
11372 M01S01418.283l840 +++| LDM MMFP
11373 M01S01419.283l840 +++| ZJN PRS1 IF DO NOT PRESET FOR MMF
11374 M00S08902.msm +++| LDC MMFL GET MMF STATUS
11375 M00S08903.msm +++| CRD CM
11376 M00S08904.msm +++| SOD CM+4
11377 M00S08905.msm +++| RAM EMTA
| Line S08906 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11378 M01S08906.ns2552 ---| POV1 LJM RDGX RETURN
| Line S00124 Modification History |
M01 (Added by) | ns2552 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11379 M02S00124.283l840 ---| POV1 LDD RS
11380 M02S00125.283l840 ---| ZJN POV2 IF NOT RECOVERY DEADSTART
| Line S01420 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11381 M01S01420.283l840 +++|
11382 M01S01421.283l840 +++|* PRESET FOR RECOVERY PROCESSING.
11383 M01S01422.283l840 +++|
11384 M01S01423.283l840 +++| PRS1 LDD RS
11385 M01S01424.283l840 +++| ZJN PRSX IF NOT RECOVERY DEADSTART
| Line S00126 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11386 M01S00126.ns2552 +++| LDC CTT
11387 M01S00127.ns2552 +++| STM RTTA ENABLE RECOVERY PROCESSING
11388 M01S00128.ns2552 +++| LDC RJMI
11389 M01S00129.ns2552 +++| STM RTTB
| Line S00130 Modification History |
M01 (Added by) | ns2552 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11390 M02S00130.283l840 ---| POV2 LJM RDGX EXIT
| Line S01425 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11391 M01S01425.283l840 +++| UJP PRSX EXIT
11392 M01S01426.283l840 +++| SPACE 4,10
11393 M01S01427.283l840 +++| QUAL
| Line S00131 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11394 M01S00131.ns2552 +++|
| Line S08907 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11395 M01S08907.283l840 ---|
11396 M01S08908.283l840 ---| QUAL
11397 M01S08909.283l840 ---|
| Line S01428 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11398 M01S01428.283l840 +++| CTD EQU /RDG/CTD
11399 M01S01429.283l840 +++| RMR EQU /RDG/RMR
| Line S08910 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
11400 M01S08910.ns2552 ---| CTT EQU /RDG/CTT
11401 M01S08911.ns2552 ---| EMT EQU /RDG/EMT
11402 M01S08912.ns2552 ---| ETT EQU /RDG/ETT
11403 M00S08913.msm ---| RTT EQU /RDG/RTT
11404 M00S08914.msm ---| SEC EQU /RDG/SEC
| Line S08915 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11405 M01S08915.283l840 ---| MBUF EQU /RDG/MBUF
11406 M00S08916.msm ---| SPACE 4,10
| Line S08917 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
11407 M01S08917.272l774 ---| OVERFLOW ORDG CHECK FOR OVERFLOW
| Line S00075 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
11408 M01S00075.272l774 +++| OVERFLOW ORDG,EPFW CHECK FOR OVERFLOW
| Line S08918 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11409 M01S08918.283l840 ---| TTL MSM/4DI - DEVICE INITIALIZATION ROUTINES.
| Line S01430 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11410 M01S01430.283l840 +++| TTL MSM/4DH - DEVICE INITIALIZATION ROUTINES.
11411 M00S08919.msm +++| TITLE
| Line S08920 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11412 M01S08920.283l840 ---| QUAL RDI
11413 M01S08921.283l840 ---| IDENT 4DI,/RDI/RDIX
| Line S01431 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11414 M01S01431.283l840 +++| QUAL RDH
11415 M01S01432.283l840 +++| IDENT 4DH,/RDH/RDHX
11416 M00S08922.msm +++|*COMMENT MSM - DEVICE INITIALIZATION ROUTINES.
| Line S08923 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
11417 M01S08923.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978.
| Line S00010 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
11418 M01S00010.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
11419 M00S08924.msm +++| RDH SPACE 4,10
| Line S08925 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11420 M01S08925.283l840 ---|*** *4DI* CONTAINS ROUTINES UTILIZED BY *RMS*
| Line S01433 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11421 M01S01433.283l840 +++|*** *4DH* CONTAINS ROUTINES UTILIZED BY *RMS*
11422 M00S08926.msm +++|* IN INITIALIZING MASS STORAGE EQUIPMENTS.
11423 M00S08927.msm +++| RDH SPACE 4,10
11424 M00S08928.msm +++|** ROUTINES CALLED.
11425 M00S08929.msm +++|*
11426 M00S08930.msm +++|* 0PI - PRESET DRIVER TO READ/WRITE DEADSTART SECTOR.
11427 M00S08931.msm +++|* 0TI - SET TRACK FLAWS IN TRT.
| Line S08932 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11428 M01S08932.283l840 ---| SPACE 4,10
11429 M01S08933.283l840 ---|*CALL COMPCHM
11430 M00S08934.msm ---| SPACE 4,10
11431 M00S08935.msm ---|**** DIRECT LOCATION ASSIGNMENTS.
11432 M00S08936.msm ---|
11433 M00S08937.msm ---|
11434 M00S08938.msm ---| PB EQU RG - RI+1 FORMAT PARAMETER BLOCK (3 LOCATIONS)
11435 M00S08939.msm ---| CS EQU ET CHANNEL STATUS
11436 M00S08940.msm ---| FR EQU P1 FORMAT REQUIRED FLAG
11437 M00S08941.msm ---| LC EQU P2 LAST CYLINDER + 1
11438 M00S08942.msm ---|
11439 M00S08943.msm ---|****
11440 M00S08944.msm ---| SPACE 4,10
11441 M00S08945.msm ---|** ASSEMBLY CONSTANTS.
11442 M00S08946.msm ---|
11443 M00S08947.msm ---|
11444 M00S08948.msm ---| DC EQU 11 DISK CHANNEL
11445 M00S08949.msm ---|
11446 M00S08950.msm ---| FCGS EQU 12 GENERAL STATUS FUNCTION CODE
11447 M00S08951.msm ---| FCFP EQU 16 FORMAT PACK FUNCTION CODE
11448 M00S08952.msm ---|
11449 M00S08953.msm ---| FPBL EQU 22 FORMAT PACK PARAMETER BLOCK LENGTH
11450 M00S08954.msm ---| RDH SPACE 4,10
11451 M01S08955.283l840 ---| ORG OSOV
| Line S01434 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11452 M01S01434.283l840 +++| ORG ORDH
11453 M00S08956.msm +++|
| Line S08957 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11454 M01S08957.283l840 ---| RDI SUBR ENTRY/EXIT
| Line S01435 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11455 M01S01435.283l840 +++| RDH SUBR ENTRY/EXIT
11456 M00S08958.msm +++| LJM POV PRESET OVERLAY
11457 M00S08959.msm +++| TITLE MAIN INITIALIZATION ROUTINE.
11458 M00S08960.msm +++| IMS SPACE 4,15
11459 M00S08961.msm +++|** IMS - INITIALIZE MASS STORAGE.
11460 M00S08962.msm +++|*
11461 M00S08963.msm +++|* ENTRY (EQ) = EST ORDINAL.
11462 M00S08964.msm +++|* (FN - FN+4) = EST ENTRY.
11463 M00S08965.msm +++|*
11464 M00S08966.msm +++|* EXIT (A) .LT. 0 IF RECOVERY INFORMATION NOT TO
11465 M00S08967.msm +++|* BE REWRITTEN TO CM UPON RETURN TO *MRL*.
11466 M00S08968.msm +++|*
11467 M00S08969.msm +++|* ERROR TO *HNG* IF SHARED DEVICE CONFLICT.
11468 M00S08970.msm +++|*
11469 M00S08971.msm +++|* USES CM+3 - CM+7, CN - CN+4, FS - FS+4.
11470 M00S08972.msm +++|*
11471 M00S08973.msm +++|* CALLS CSD, /RMS/CSE, IDS, UDT.
11472 M00S08974.msm +++|*
11473 M00S08975.msm +++|* MACROS UJMF.
11474 M00S08976.msm +++|
11475 M00S08977.msm +++|
11476 M00S08978.msm +++| IMS5 RJM IDS INITIALIZE DEVICE STATUS
11477 M00S08979.msm +++| NJN IMSX IF DEVICE NOT READY
11478 M00S08980.msm +++| UJMF IMSX NON MMF TRANSFER
11479 M00S08981.msm +++| RJM UDT UPDATE DAT
11480 M00S08982.msm +++| NJN IMS1 IF EXTENDED MEMORY TRACK UNAVAILABLE
11481 M00S08983.msm +++|
11482 M00S08984.msm +++| IMS SUBR ENTRY/EXIT
11483 M00S08985.msm +++| SHN 21-4
11484 M00S08986.msm +++| PJN IMSX IF INITIALIZE NOT SELECTED
11485 M00S08987.msm +++| LDD FN+4 GET FAMILY NAME/DEVICE NUMBER
11486 M00S08988.msm +++| SHN 3
11487 M00S08989.msm +++| ADN PFGL
11488 M00S08990.msm +++| CRD CN
11489 M00S08991.msm +++| ADN MDGL-PFGL GET SECTOR LIMITS
11490 M00S08992.msm +++| CRD CM+3
11491 M00S08993.msm +++| ADN STLL-MDGL FETCH DEVICE STATUS
11492 M00S08994.msm +++| CRD FS
11493 M00S08995.msm +++| RJM /RMS/CSE CHECK SYSTEM EQUIPMENT
11494 M00S08996.msm +++| UJMF IMS5 NON MMF TRANSFER
11495 M00S08997.msm +++| RJM CSD CHECK SHARED DEVICE STATUS
11496 M00S08998.msm +++| IMS1 NJN IMS4 IF DAT CONFLICT
11497 M00S08999.msm +++| LDD T2
11498 M00S09000.msm +++| IMS2 ZJN IMS5 IF DEVICE NOT DESCRIBED IN DAT
11499 M00S09001.msm +++| LDI T2
11500 M00S09002.msm +++| LPC -0
11501 M00S09003.msm +++| IMSA EQU *-1
11502 M00S09004.msm +++| STI T2
11503 M00S09005.msm +++| ZJN IMS5 IF DEVICE NOT ACTIVE IN DAT
11504 M00S09006.msm +++| LDM DATB+4
11505 M00S09007.msm +++| ZJN IMS3 IF NON-SHARED DEVICE
11506 M00S09008.msm +++| LDN CSDC-CSDB
11507 M00S09009.msm +++| IMS3 ADC CSDB
11508 M00S09010.msm +++| IMS4 LJM /RMS/HNG DISPLAY ERROR AND HANG PP
11509 M00S09011.msm +++| TITLE SUBROUTINES.
11510 M01S01436.283l840 +++| CFR SPACE 4,20
11511 M01S01437.283l840 +++|** CFR - CHECK FOR FORMAT REQUEST.
11512 M01S01438.283l840 +++|*
11513 M01S01439.283l840 +++|* ENTRY (A) = 0 IF DEADSTART SECTOR READ BY *RCS*.
11514 M01S01440.283l840 +++|* (AM) = ALGORITHM INDEX.
11515 M01S01441.283l840 +++|* (CS) = CHANNEL STATUS.
11516 M01S01442.283l840 +++|* (FR) = FORMAT REQUIRED FLAG.
11517 M01S01443.283l840 +++|* (LC) = FIRST CYLINDER OF *CTI* SPACE.
11518 M01S01444.283l840 +++|* (T5) = EST ORDINAL.
11519 M01S01445.283l840 +++|* (T6) = TRACK CONTAINING DEADSTART SECTOR.
11520 M01S01446.283l840 +++|* (T7) = DEADSTART SECTOR.
11521 M01S01447.283l840 +++|* (FN - FN+4) = EST ENTRY.
11522 M01S01448.283l840 +++|* (FS - FS+4) = *STLL* WORD OF MST.
11523 M01S01449.283l840 +++|*
11524 M01S01450.283l840 +++|* USES T3.
11525 M01S01451.283l840 +++|*
11526 M01S01452.283l840 +++|* CALLS *4DI*.
11527 M01S01453.283l840 +++|*
11528 M01S01454.283l840 +++|* MACROS EXECUTE.
11529 M01S01455.283l840 +++|
11530 M01S01456.283l840 +++|
11531 M01S01457.283l840 +++| CFR SUBR ENTRY/EXIT
11532 M01S01458.283l840 +++| STD T3
11533 M01S01459.283l840 +++| LDD FR
11534 M01S01460.283l840 +++| NJN CFR1 IF FORMAT REQUIRED
11535 M01S01461.283l840 +++| LDD FS
11536 M01S01462.283l840 +++| SHN 21-LFPR+LFPR/12D*12D
11537 M01S01463.283l840 +++| PJN CFRX IF DEVICE NOT BEING FORMATTED
11538 M01S01464.283l840 +++| CFR1 LDD AM
11539 M01S01465.283l840 +++| LMN AIDC
11540 M01S01466.283l840 +++| NJN CFRX IF NOT 895 DEVICE
11541 M01S01467.283l840 +++| LDD CS
11542 M01S01468.283l840 +++| ZJN CFRX IF ALL CONCURRENT CHANNELS
11543 M01S01469.283l840 +++| EXECUTE 4DI FORMAT 895 DEVICE
11544 M01S01470.283l840 +++| UJN CFRX RETURN
11545 M00S09012.msm +++| CTF SPACE 4,10
11546 M00S09013.msm +++|** CTF - CHECK TRACK FLAWED IN TRT.
11547 M00S09014.msm +++|*
11548 M00S09015.msm +++|* ENTRY (A) = TRACK NUMBER.
| Line S09016 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11549 M01S09016.ns2776 ---|* (FN+4) = MST POINTER.
11550 M00S09017.msm ---|*
11551 M00S09018.msm ---|* EXIT (A) = 0 IF TRACK FLAWED.
11552 M00S09019.msm ---|*
11553 M00S09020.msm ---|* USES T0, T1, CM - CM+4.
11554 M00S09021.msm ---|*
11555 M00S09022.msm ---|* CALLS STA.
11556 M00S09023.msm ---|
11557 M00S09024.msm ---|
11558 M00S09025.msm ---| CTF SUBR ENTRY/EXIT
11559 M00S09026.msm ---| LPC 3777 UNPACK TRACK
11560 M00S09027.msm ---| SHN 21-1 SET TRT WORD INDEX
11561 M00S09028.msm ---| STD T0
11562 M00S09029.msm ---| SHN 1-21 SET BYTE INDEX
11563 M00S09030.msm ---| STD T1
11564 M00S09031.msm ---| RJM STA SET FWA OF TRT
11565 M00S09032.msm ---| ADD T0
11566 M00S09033.msm ---| CRD CM
11567 M00S09034.msm ---| LDM CM,T1 CHECK TRACK
11568 M00S09035.msm ---| LMC 3777
11569 M00S09036.msm ---| UJN CTFX RETURN
| Line S00007 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11570 M01S00007.ns2776 +++| FBT SPACE 4,10
11571 M01S00008.ns2776 +++|** FBT - FLAW BLOCK OF TRACKS IN TRT.
11572 M01S00009.ns2776 +++|*
11573 M01S00010.ns2776 +++|* ENTRY (T3) = FIRST TRACK NUMBER.
11574 M01S00011.ns2776 +++|* (CN) = LAST TRACK NUMBER + 1.
11575 M01S00012.ns2776 +++|* (T5) = EST ORDINAL.
11576 M01S00013.ns2776 +++|*
11577 M01S00014.ns2776 +++|* EXIT ALL TRACKS FLAWED IN SPECIFIED BLOCK.
11578 M01S00015.ns2776 +++|*
11579 M01S00016.ns2776 +++|* USES T3, CM - CM+4.
11580 M01S00017.ns2776 +++|*
11581 M01S00018.ns2776 +++|* CALLS CTF.
11582 M01S00019.ns2776 +++|*
11583 M01S00020.ns2776 +++|* MACROS MONITOR.
11584 M01S00021.ns2776 +++|
11585 M01S00022.ns2776 +++|
11586 M01S00023.ns2776 +++| FBT SUBR ENTRY/EXIT
11587 M01S00024.ns2776 +++| FBT1 LDD T3 CHECK TRACK FLAWED
11588 M01S00025.ns2776 +++| RJM CTF
11589 M01S00026.ns2776 +++| ZJN FBT2 IF TRACK ALREADY FLAWED
11590 M01S00027.ns2776 +++| LDD T5
11591 M01S00028.ns2776 +++| STD CM+1
11592 M01S00029.ns2776 +++| LDD T3
11593 M01S00030.ns2776 +++| STD CM+2
11594 M01S00031.ns2776 +++| LDN STFS FLAW TRACK IN TRT
11595 M01S00032.ns2776 +++| STD CM+3
11596 M01S00033.ns2776 +++| MONITOR STBM
11597 M01S00034.ns2776 +++| FBT2 AOD T3 ADVANCE TRACK NUMBER
11598 M01S00035.ns2776 +++| LMD CN
11599 M01S00036.ns2776 +++| NJN FBT1 IF NOT END OF TRACKS TO FLAW
11600 M01S00037.ns2776 +++| UJN FBTX RETURN
| Line S09037 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11601 M01S09037.283l840 ---| F8D SPACE 4,10
11602 M01S09038.283l840 ---|** F8D - FORMAT 895 DEVICE.
11603 M01S09039.283l840 ---|*
11604 M01S09040.283l840 ---|* ENTRY (LC) = LAST CYLINDER + 1 TO FORMAT.
11605 M01S09041.283l840 ---|* (PB - PB+2) = FORMAT PARAMETER BLOCK.
11606 M01S09042.283l840 ---|*
11607 M01S09043.283l840 ---|* USES PB, CM - CM+4.
11608 M01S09044.283l840 ---|*
11609 M01S09045.283l840 ---|* CALLS C2D, /RMS/SEM, WNB.
11610 M01S09046.283l840 ---|
11611 M01S09047.283l840 ---|
11612 M01S09048.283l840 ---| F8D2 LDC DSCP*200+MS1W+2 UPDATE CYLINDER NUMBER IN MESSAGE
11613 M01S09049.283l840 ---| CWD CM
11614 M01S09050.283l840 ---| FNC FCFP,DC ISSUE FORMAT FUNCTION
11615 M01S09051.283l840 ---| ACN DC
11616 M01S09052.283l840 ---| LDN FPBL OUTPUT PARAMETER BLOCK
11617 M01S09053.283l840 ---| OAM PB,DC
11618 M01S09054.283l840 ---| FJM *,DC WAIT TRANSMISSION COMPLETE
11619 M01S09055.283l840 ---| DCN DC
11620 M01S09056.283l840 ---| AOD PB ADVANCE CYLINDER NUMBER
11621 M01S09057.283l840 ---| F8D3 RJM C2D
11622 M01S09058.283l840 ---| STD CM+3
11623 M01S09059.283l840 ---| LDD PB CONVERT VALUE FOR MESSAGE
11624 M01S09060.283l840 ---| SHN -6
11625 M01S09061.283l840 ---| RJM C2D
11626 M01S09062.283l840 ---| STD CM+2
11627 M01S09063.283l840 ---| RJM WNB WAIT NOT BUSY
11628 M01S09064.283l840 ---| LDD PB
11629 M01S09065.283l840 ---| LMD LC
11630 M01S09066.283l840 ---| NJN F8D2 IF MORE CYLINDERS TO FORMAT
11631 M01S09067.283l840 ---|
11632 M01S09068.283l840 ---| F8D SUBR ENTRY/EXIT
11633 M01S09069.283l840 ---| LDD PB+1
11634 M01S09070.283l840 ---| RJM C2D CONVERT UNIT NUMBER
11635 M01S09071.283l840 ---| STM F8DA
11636 M01S09072.283l840 ---| RJM /RMS/SEM SET EQUIPMENT MESSAGE
11637 M01S09073.283l840 ---| LDN 1RU
11638 M01S09074.283l840 ---| STD CM+4 INSERT UNIT DESIGNATOR
11639 M01S09075.283l840 ---| LDC DSCP*200+MS1W+1
11640 M01S09076.283l840 ---| CWD CM
11641 M01S09077.283l840 ---| ADN 1
11642 M01S09078.283l840 ---| CWM F8DA,TW CHANGE MESSAGE
11643 M01S09079.283l840 ---| SBN 2
11644 M01S09080.283l840 ---| CRD CM
11645 M01S09081.283l840 ---| LDD LC
11646 M01S09082.283l840 ---| NJN F8D1 IF *CTI* COMPONENT FOUND
11647 M01S09083.283l840 ---| LDC NTDC/2
11648 M01S09084.283l840 ---| ERRNZ TTDC CODE DEPENDS ON VALUE
11649 M01S09085.283l840 ---| STD LC
11650 M01S09086.283l840 ---| F8D1 LDD PB
11651 M01S09087.283l840 ---| LJM F8D3 FORMAT DEVICE
11652 M01S09088.283l840 ---|
11653 M01S09089.283l840 ---|
11654 M01S09090.283l840 ---| F8DA DATA C*XX C0000.*
11655 M00S09091.msm ---| IDS SPACE 4,15
11656 M00S09092.msm ---|** IDS - INITIALIZE DEVICE.
11657 M00S09093.msm ---|*
11658 M00S09094.msm ---|* ENTRY (EQ) = (T5) = EST ORDINAL.
11659 M00S09095.msm ---|* (FN - FN+4) = EST ENTRY.
11660 M00S09096.msm ---|* (FS - FS+4) = STLL WORD.
11661 M00S09097.msm ---|*
11662 M00S09098.msm ---|* EXIT (A) = 0 IF DEVICE SET TO INITIALIZE.
11663 M00S09099.msm ---|* LABEL TRACK ASSIGNED.
11664 M00S09100.msm ---|*
11665 M00S09101.msm ---|* USES CS, T1, T3, T6, CM - CM+4, CN - CN+4.
11666 M00S09102.msm ---|*
11667 M01S09103.283l840 ---|* CALLS CTF, IFM, PFR, PTA, PTF, RCS, SNC.
| Line S01471 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11668 M01S01471.283l840 +++|* CALLS CFR, CTF, IFM, PTA, PTF, RCS, SNC.
11669 M00S09104.msm +++|*
11670 M00S09105.msm +++|* MACROS ENDMS, MONITOR, SETMS, SFA, SMSTF.
11671 M00S09106.msm +++|
11672 M00S09107.msm +++|
11673 M00S09108.msm +++| IDS7 LDN 0 INHIBIT FURTHER PROCESSING OF DEVICE
11674 M00S09109.msm +++| STD RE
11675 M00S09110.msm +++| LDN 1 INDICATE DEVICE NOT INITIALIZED
11676 M00S09111.msm +++|
11677 M00S09112.msm +++| IDS SUBR ENTRY/EXIT
11678 M00S09113.msm +++| LDD FN
11679 M00S09114.msm +++| LPN 2
11680 M00S09115.msm +++| NJN IDS7 IF DEVICE OFF OR DOWN
11681 M00S09116.msm +++| SMSTF LPTU PROHIBIT TRT UPDATE BY *1RU*
11682 M00S09117.msm +++| RJM PTA PRESET FWA OF TRT
11683 M00S09118.msm +++| LDD FN CHECK EQUIPMENT TYPE
11684 M00S09119.msm +++| LPC 200
11685 M00S09120.msm +++| STM PFTA SET LDAM FLAG FOR *PFT* ROUTINE
11686 M00S09121.msm +++| ZJN IDS1 IF NOT *LDAM* DEVICE
11687 M00S09122.msm +++| RJM SNC SELECT NIO CHANNEL
11688 M00S09123.msm +++| STD CS
11689 M00S09124.msm +++| RJM IFM INTERPRET FLAW MAP
11690 M00S09125.msm +++| RJM RCS RESERVE *CTI* SPACE
| Line S09126 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11691 M01S09126.283l840 ---| RJM PFR PROCESS FORMAT REQUEST
| Line S01472 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11692 M01S01472.283l840 +++| RJM CFR CHECK FOR FORMAT REQUEST
11693 M00S09127.msm +++| IDS1 LDN ZERL REQUEST LABEL TRACK
11694 M00S09128.msm +++| CRD CM
11695 M00S09129.msm +++| LDD T5
11696 M00S09130.msm +++| STD CM+1
11697 M00S09131.msm +++| MONITOR RTCM
11698 M00S09132.msm +++|* LDN 0 SET SECTOR
11699 M00S09133.msm +++| STD T7
11700 M00S09134.msm +++| LDD CM+4 SET LABEL TRACK
11701 M00S09135.msm +++| STD T6
11702 M00S09136.msm +++| ZJP IDS2 IF NO TRACK ASSIGNED
11703 M00S09137.msm +++| STD CM+2
11704 M00S09138.msm +++| LDN SPFS SET PRESERVED FILE STATUS
11705 M00S09139.msm +++| STD CM+3
11706 M00S09140.msm +++| MONITOR STBM
11707 M00S09141.msm +++| LDD FN+4 READ *ALGL*
11708 M00S09142.msm +++| SHN 3
11709 M00S09143.msm +++| ADK TDGL
11710 M00S09144.msm +++| CRD CM
11711 M00S09145.msm +++| ADN ALGL-TDGL
11712 M00S09146.msm +++| CRD CN
11713 M00S09147.msm +++| LDD CM SET TRACK COUNT
11714 M00S09148.msm +++| STD T3
11715 M00S09149.msm +++| LDD T6 SET LABEL TRACK
11716 M00S09150.msm +++| STD CN+1
11717 M00S09151.msm +++| LDD FN+4 STORE *ALGL*
11718 M00S09152.msm +++| SHN 3
11719 M00S09153.msm +++| ADN ALGL
11720 M00S09154.msm +++| CWD CN
11721 M00S09155.msm +++| LDD FN SET DEVICE AS AVAILABLE
11722 M00S09156.msm +++| LPC 7667
11723 M00S09157.msm +++| LMN 10 SET DEVICE ACTIVE
11724 M00S09158.msm +++| STD FN
11725 M00S09159.msm +++| LDD RE
11726 M00S09160.msm +++| LPC 7677
11727 M00S09161.msm +++| STD RE
11728 M00S09162.msm +++| SFA EST,T5 WRITE EST ENTRY
11729 M00S09163.msm +++| ADK EQDE
11730 M00S09164.msm +++| CWD FN
11731 M00S09165.msm +++| LDC 501 BUFFER INDEX
11732 M00S09166.msm +++| STD T1
11733 M00S09167.msm +++| LDC LTKL-1
11734 M00S09168.msm +++| SBD T6
11735 M00S09169.msm +++| PJN IDS3 IF LABEL TRACK WITHIN RANGE
11736 M00S09170.msm +++| IDS2 LDC IDSA
11737 M00S09171.msm +++| LJM /RMS/HNG ISSUE ERROR MESSAGE AND HANG
11738 M00S09172.msm +++|
11739 M00S09173.msm +++|* PREWRITE ALL POTENTIAL LABEL TRACKS THAT ARE FLAWED.
11740 M00S09174.msm +++|
11741 M00S09175.msm +++| IDS3 LDN 0 CLEAR SECTOR BUFFER
11742 M00S09176.msm +++| STM BFMS,T1
11743 M00S09177.msm +++| SOD T1
11744 M00S09178.msm +++| PJN IDS3 IF MORE TO CLEAR
11745 M00S09179.msm +++| SHN -7
11746 M00S09180.msm +++| STM FNSS SET FLAW INDICATOR
11747 M00S09181.msm +++| SETMS IO,(SM,AR,DF)
11748 M00S09182.msm +++| RJM PFT PREWRITE LABEL TRACK
11749 M00S09183.msm +++| LDC FLTK
11750 M00S09184.msm +++| STD T6
11751 M00S09185.msm +++| IDS4 LDD T6 CHECK TRACK FLAWED
11752 M00S09186.msm +++| RJM CTF
11753 M00S09187.msm +++| NJN IDS5 IF NOT FLAWED
11754 M00S09188.msm +++| STD T7
11755 M00S09189.msm +++| RJM PFT PREWRITE FLAWED TRACK
11756 M00S09190.msm +++| IDS5 SOD T3
11757 M00S09191.msm +++| ZJN IDS6 IF END OF TRACKS ON DEVICE
11758 M00S09192.msm +++| AOD T6
11759 M00S09193.msm +++| LMC LTKL
11760 M00S09194.msm +++| NJN IDS4 IF NOT ALL POSSIBLE LABEL TRACKS
11761 M00S09195.msm +++| IDS6 ENDMS
11762 M00S09196.msm +++|* LDN 0
11763 M00S09197.msm +++| LJM IDSX RETURN
11764 M00S09198.msm +++|
11765 M00S09199.msm +++|
11766 M00S09200.msm +++| IDSA DATA C*LABEL TRACK CONFLICT.*
11767 M00S09201.msm +++| IFM SPACE 4,15
11768 M00S09202.msm +++|** IFM - INTERPRET FLAW MAP.
11769 M00S09203.msm +++|*
11770 M00S09204.msm +++|* ENTRY (EQ) = (T5) = EST ORDINAL.
11771 M00S09205.msm +++|* (FS - FS+4) = MST STATUS WORD (STLL).
11772 M00S09206.msm +++|* (FN - FN+4) = EST ENTRY FOR EQUIPMENT.
11773 M00S09207.msm +++|* (CS) = CHANNEL STATUS.
11774 M00S09208.msm +++|*
11775 M00S09209.msm +++|* EXIT (T5) = EQUIPMENT.
11776 M00S09210.msm +++|* (AM) = ALGORITHM INDEX.
11777 M00S09211.msm +++|* FLAWS SET IN TRT FOR *LDAM* TYPE EQUIPMENT.
11778 M00S09212.msm +++|*
11779 M00S09213.msm +++|* EREXIT (A) .NE. 0 IF REMOVABLE *LDAM* DEVICE NOT READY.
11780 M00S09214.msm +++|* TO *IDSX* IF REMOVABLE *LDAM* DEVICE NOT READY.
11781 M00S09215.msm +++|*
11782 M00S09216.msm +++|* USES T3, CM - CM+4, FS - FS+1.
11783 M00S09217.msm +++|*
11784 M00S09218.msm +++|* CALLS EXR, SDR, *0TI*, *0TJ*.
11785 M00S09219.msm +++|*
11786 M00S09220.msm +++|* MACROS EXECUTE.
11787 M00S09221.msm +++|
11788 M00S09222.msm +++|
11789 M00S09223.msm +++| IFM2 LDD FN+3 GET UNIT COUNT
11790 M00S09224.msm +++| SHN 3
11791 M00S09225.msm +++| ADN DDLL
11792 M00S09226.msm +++| CRD CM
11793 M00S09227.msm +++| LDD CM SET UNIT COUNT
11794 M00S09228.msm +++| LPN 7
11795 M00S09229.msm +++| STD T2
11796 M00S09230.msm +++| LDN PRFM REQUEST FLAW MAP PROCESSING
11797 M00S09231.msm +++| RJM SDR SET BUFFERED DEVICE REQUEST
11798 M00S09232.msm +++|
11799 M00S09233.msm +++| IFM SUBR ENTRY/EXIT
11800 M00S09234.msm +++| LDD CS
11801 M00S09235.msm +++| ZJN IFM2 IF ALL CONCURRENT CHANNELS
11802 M00S09236.msm +++| LDD T5 SET EQUIPMENT PARAMETER
11803 M00S09237.msm +++| STM MIPA
11804 M00S09238.msm +++| IFM1 LDD FN+4
11805 M00S09239.msm +++| SHN 3
11806 M00S09240.msm +++| ADN DILL READ ALGORITHM INDEX FROM LIST
11807 M00S09241.msm +++| CRD CM
11808 M00S09242.msm +++| LDD CM+4 LOAD ALGORITHM INDEX
11809 M00S09243.msm +++| LPN 77
11810 M00S09244.msm +++| STD AM
11811 M00S09245.msm +++| EXECUTE 0TI,MILA EXECUTE FLAW PROCESSOR
11812 M00S09246.msm +++| ZJN IFMX IF NO FLAWING ERRORS
11813 M00S09247.msm +++| LDM RDCT
11814 M00S09248.msm +++| LPN 77
11815 M00S09249.msm +++| LMN NRDE
11816 M00S09250.msm +++| NJN IFMX IF DEVICE READY
11817 M00S09251.msm +++| LDD FN
11818 M00S09252.msm +++| SHN 21-10
11819 M00S09253.msm +++| PJN IFM1 IF NON-REMOVABLE DEVICE
11820 M00S09254.msm +++| LDN ZERL
11821 M00S09255.msm +++| CRD CM
11822 M00S09256.msm +++| LDN 0 CLEAR INITIALIZATION REQUEST
11823 M00S09257.msm +++| STD RE
11824 M00S09258.msm +++| STD FS
11825 M00S09259.msm +++| LMN STNR SET NOT READY STATUS
11826 M00S09260.msm +++| STD FS+1
11827 M00S09261.msm +++| LDD FN+4
11828 M00S09262.msm +++| SHN 3
11829 M00S09263.msm +++| ADN PFGL CLEAR DEVICE DESCRIPTION
11830 M00S09264.msm +++| CWD CM
11831 M00S09265.msm +++| ADN PUGL-PFGL
11832 M00S09266.msm +++| CWD CM
11833 M00S09267.msm +++| ADN STLL-PUGL STORE MST STATUS WORD
11834 M00S09268.msm +++| CWD FS
11835 M00S09269.msm +++| LJM IDSX EXIT
| Line S09270 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11836 M01S09270.283l840 ---| PFR SPACE 4,20
11837 M01S09271.283l840 ---|** PFR - PROCESS FORMAT REQUEST.
11838 M01S09272.283l840 ---|*
11839 M01S09273.283l840 ---|* ENTRY (A) = 0 IF DEADSTART SECTOR READ BY *RCS*.
11840 M01S09274.283l840 ---|* (AM) = ALGORITHM INDEX.
11841 M01S09275.283l840 ---|* (CS) = CHANNEL STATUS.
11842 M01S09276.283l840 ---|* (FR) = FORMAT REQUIRED FLAG.
11843 M01S09277.283l840 ---|* (LC) = FIRST CYLINDER OF *CTI* SPACE.
11844 M01S09278.283l840 ---|* (T5) = EST ORDINAL.
11845 M01S09279.283l840 ---|* (T6) = TRACK CONTAINING DEADSTART SECTOR.
11846 M01S09280.283l840 ---|* (T7) = DEADSTART SECTOR.
11847 M01S09281.283l840 ---|* (FN - FN+4) = EST ENTRY.
11848 M01S09282.283l840 ---|* (FS - FS+4) = *STLL* WORD OF MST.
11849 M01S09283.283l840 ---|*
11850 M01S09284.283l840 ---|* USES T1, T2, T3, T4, CM - CM+4, CN - CN+4.
11851 M01S09285.283l840 ---|*
11852 M01S09286.283l840 ---|* CALLS F8D.
11853 M01S09287.283l840 ---|*
11854 M01S09288.283l840 ---|* MACROS CMSTF, ENDMS, RCHAN.
11855 M01S09289.283l840 ---|
11856 M01S09290.283l840 ---|
11857 M01S09291.283l840 ---| PFR2 STD T2 SET INSTRUCTION ADDRESS
11858 M01S09292.283l840 ---| LDI T2
11859 M01S09293.283l840 ---| SCN 37
11860 M01S09294.283l840 ---| LMD T4 MODIFY INSTRUCTION
11861 M01S09295.283l840 ---| STI T2
11862 M01S09296.283l840 ---| AOD T1 ADVANCE LIST ADDRESS
11863 M01S09297.283l840 ---| PFR3 LDI T1
11864 M01S09298.283l840 ---| NJN PFR2 IF NOT END OF LIST
11865 M01S09299.283l840 ---| LDD FN+4
11866 M01S09300.283l840 ---| SHN 3
11867 M01S09301.283l840 ---| ADN DDLL FETCH UNIT LIST FROM MST
11868 M01S09302.283l840 ---| CRD CN
11869 M01S09303.283l840 ---| LDC DSCP*200+MS1W STORE FORMATTING MESSAGE
11870 M01S09304.283l840 ---| CWM PFRA,ON
11871 M01S09305.283l840 ---|
11872 M01S09306.283l840 ---|* GENERATE PARAMETER BLOCK TO FORMAT DEVICE.
11873 M01S09307.283l840 ---|
11874 M01S09308.283l840 ---| PFR4 LDN 0 SET FIRST CYLINDER
11875 M01S09309.283l840 ---| STD PB
11876 M01S09310.283l840 ---| LDD TH SET LARGE RECORD SIZE
11877 M01S09311.283l840 ---| STD PB+2
11878 M01S09312.283l840 ---| LDD CN+4 EXTRACT NEXT UNIT
11879 M01S09313.283l840 ---| SHN 14
11880 M01S09314.283l840 ---| STD CN+4
11881 M01S09315.283l840 ---| ERRPL 4000-3*SLDC CODE DEPENDS ON VALUE
11882 M01S09316.283l840 ---| SHN -14
11883 M01S09317.283l840 ---| LMC 1S10+3S6 APPEND MODE / OPERATION DECODE
11884 M01S09318.283l840 ---| STD PB+1
11885 M01S09319.283l840 ---| RJM F8D FORMAT DEVICE
11886 M01S09320.283l840 ---| LDD T3
11887 M01S09321.283l840 ---| ZJN PFR7 IF DEADSTART SECTOR READ WITHOUT ERROR
11888 M01S09322.283l840 ---| LDC 885D
11889 M01S09323.283l840 ---| STD PB SET CYLINDER FOR DEADSTART SECTOR
11890 M01S09324.283l840 ---| ADN 1
11891 M01S09325.283l840 ---| STD LC
11892 M01S09326.283l840 ---| LDC 502 SECTOR BUFFER INDEX
11893 M01S09327.283l840 ---| STD PB+2
11894 M01S09328.283l840 ---| PFR5 LDN 0 CLEAR SECTOR BUFFER
11895 M01S09329.283l840 ---| STM BFMS-1,PB+2
11896 M01S09330.283l840 ---| SOD PB+2
11897 M01S09331.283l840 ---| NJN PFR5 IF BUFFER NOT CLEARED
11898 M01S09332.283l840 ---|* LDN 0
11899 M01S09333.283l840 ---|* STD PB+2
11900 M01S09334.283l840 ---| RJM F8D FORMAT DEADSTART CYLINDER
11901 M01S09335.283l840 ---| LDC -1S10
11902 M01S09336.283l840 ---| RAD PB+1
11903 M01S09337.283l840 ---| PFR6 SOD PB FORMAT PROTECTED AREA
11904 M01S09338.283l840 ---| RJM F8D
11905 M01S09339.283l840 ---| AOD PB+2 ADVANCE TRACK NUMBER
11906 M01S09340.283l840 ---| LMN 2
11907 M01S09341.283l840 ---| NJN PFR6 IF MORE TRACKS TO FORMAT
11908 M01S09342.283l840 ---| LDC BFMS+WLSF
11909 M01S09343.283l840 ---| RJM WDS CLEAR DEADSTART SECTOR
11910 M01S09344.283l840 ---| PFR7 LDD CN
11911 M01S09345.283l840 ---| LPN 7
11912 M01S09346.283l840 ---| SBN 1 DECREMENT UNIT COUNT
11913 M01S09347.283l840 ---| STD CN
11914 M01S09348.283l840 ---| PJP PFR4 IF MULTI-UNIT DEVICE
11915 M01S09349.283l840 ---| ENDMS
11916 M01S09350.283l840 ---| LDC DSCP*200+MS1W RESTORE RECOVERY MESSAGE
11917 M01S09351.283l840 ---| CWM PFRB,ON
11918 M01S09352.283l840 ---| CMSTF LFPR CLEAR FORMAT REQUEST
11919 M01S09353.283l840 ---|
11920 M01S09354.283l840 ---| PFR SUBR ENTRY/EXIT
11921 M01S09355.283l840 ---| STD T3
11922 M01S09356.283l840 ---| LDD FR
11923 M01S09357.283l840 ---| NJN PFR1 IF FORMAT REQUIRED
11924 M01S09358.283l840 ---| LDD FS
11925 M01S09359.283l840 ---| SHN 21-LFPR+LFPR/12D*12D
11926 M01S09360.283l840 ---| PJN PFRX IF DEVICE NOT BEING FORMATTED
11927 M01S09361.283l840 ---| PFR1 LDD AM
11928 M01S09362.283l840 ---| LMN AIDC
11929 M01S09363.283l840 ---| NJN PFRX IF NOT 895 DEVICE
11930 M01S09364.283l840 ---| STD CM+2
11931 M01S09365.283l840 ---| LDD CS
11932 M01S09366.283l840 ---| ZJN PFRX IF ALL CONCURRENT CHANNELS
| Line S09367 Modification History |
M01 (Removed by) | msm44 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11933 M02S09367.283l840 ---| LDD FN+1 RESERVE CHANNEL
| Line S00001 Modification History |
M01 (Added by) | msm44 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11934 M02S00001.283l840 ---| LPN 77 CLEAR IMMEDIATE RETURN AND RESERVE CHANNEL
| Line S09368 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
11935 M01S09368.283l840 ---| RCHAN
11936 M01S09369.283l840 ---| LDD CM+1 SAVE CHANNEL FOR *ENDMS*
11937 M01S09370.283l840 ---| STD T4
11938 M01S09371.283l840 ---| AOM CHRV
11939 M01S09372.283l840 ---| LDC CTDC SET ADDRESS OF INSTRUCTION LIST
11940 M01S09373.283l840 ---| STD T1
11941 M01S09374.283l840 ---| LJM PFR3 MODIFY CHANNEL INSTRUCTIONS
11942 M01S09375.283l840 ---|
11943 M01S09376.283l840 ---|
11944 M01S09377.283l840 ---| PFRA DATA 10HFORMATTING
11945 M01S09378.283l840 ---| PFRB DATA 10HRECOVERING
11946 M00S09379.msm ---| PFT SPACE 4,15
11947 M00S09380.msm ---|** PFT - PREWRITE FLAWED TRACK.
11948 M00S09381.msm ---|*
11949 M00S09382.msm ---|* ENTRY (T4 - T7) = MASS STORAGE PARAMETERS.
11950 M00S09383.msm ---|* (PFTA) .NE. 0 IF *LDAM* DEVICE.
11951 M00S09384.msm ---|* DRIVER PRESET.
11952 M00S09385.msm ---|*
11953 M00S09386.msm ---|* CALLS WDS.
11954 M00S09387.msm ---|
11955 M00S09388.msm ---|
11956 M00S09389.msm ---| PFT SUBR ENTRY/EXIT
11957 M00S09390.msm ---| PFT2 LDC BFMS+WCSF WRITE SECTOR
11958 M00S09391.msm ---| RJM WDS
11959 M00S09392.msm ---| LDC 0
11960 M00S09393.msm ---| PFTA EQU *-1
11961 M00S09394.msm ---| ZJN PFTX IF NOT *LDAM* DEVICE
11962 M00S09395.msm ---| AOD T7
11963 M00S09396.msm ---| LMM SLM
11964 M00S09397.msm ---| NJN PFT2 IF NOT END OF TRACK
11965 M00S09398.msm ---| UJN PFTX RETURN
11966 M00S09399.msm ---| RCS SPACE 4,15
11967 M00S09400.msm ---|** RCS - RESERVE *CTI* SPACE.
11968 M00S09401.msm ---|*
11969 M00S09402.msm ---|* ENTRY (EQ) = EST ORDINAL.
11970 M00S09403.msm ---|* (AM) = ALGORITHM INDEX.
11971 M00S09404.msm ---|* (FN+4) = MST POINTER.
11972 M00S09405.msm ---|* (CS) = CHANNELS STATUS.
11973 M00S09406.msm ---|*
11974 M00S09407.msm ---|* EXIT (A) = 0 IF DEADSTART SECTOR READ WITHOUT ERROR.
11975 M00S09408.msm ---|* (FR) = 0 IF FORMAT UNREQUIRED (*CIP* SPACE INTACT).
11976 M00S09409.msm ---|* (LC) = FIRST CYLINDER OF *CTI* SPACE.
11977 M00S09410.msm ---|* (T5) = EST ORDINAL.
11978 M00S09411.msm ---|* (T6) = TRACK CONTAINING DEADSTART SECTOR.
11979 M00S09412.msm ---|* (T7) = DEADSTART SECTOR.
11980 M00S09413.msm ---|* *CTI* SPACE FLAWED IN TRT.
11981 M00S09414.msm ---|*
| Line S09415 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11982 M01S09415.ns2776 ---|* USES T3, CM - CM+4, CN - CN+4.
| Line S00038 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11983 M01S00038.ns2776 +++|* USES T3, T9, CM - CM+4, CN - CN+4.
11984 M00S09416.msm +++|*
| Line S09417 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11985 M01S09417.ns2776 ---|* CALLS CTF, RDS, WDS, *0PI*.
| Line S00039 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11986 M01S00039.ns2776 +++|* CALLS FBT, RDS, WDS, *0PI*.
11987 M00S09418.msm +++|*
| Line S09419 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11988 M01S09419.ns2776 ---|* MACROS ENDMS, EXECUTE, MONITOR, SMSTF.
| Line S00040 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11989 M01S00040.ns2776 +++|* MACROS ENDMS, EXECUTE, SMSTF.
11990 M00S09420.msm +++|
11991 M00S09421.msm +++|
| Line S09422 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11992 M01S09422.ns2776 ---| RCS8 LDD FR FORMAT REQUIRED STATUS
| Line S00041 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
11993 M01S00041.ns2776 +++| RCS8 LDC ** CHECK DEADSTART SECTOR
11994 M01S00042.ns2776 +++| RCSA EQU *-1
11995 M01S00043.ns2776 +++| NJN RCSX IF NO VALID DEADSTART SECTOR
11996 M01S00044.ns2776 +++| LDD FR FORMAT REQUIRED STATUS
11997 M00S09423.msm +++|
11998 M00S09424.msm +++| RCS SUBR ENTRY/EXIT
11999 M00S09425.msm +++| LDN 0
12000 M00S09426.msm +++| STD FR CLEAR FORMAT REQUIRED
12001 M00S09427.msm +++| STD LC
12002 M00S09428.msm +++| LDD CS
12003 M00S09429.msm +++| ZJN RCSX IF ALL CONCURRENT CHANNELS
12004 M00S09430.msm +++| LDD EQ SET PARAMETER WORD
12005 M00S09431.msm +++| LMC 4000
12006 M00S09432.msm +++| STM MIPA
12007 M00S09433.msm +++| EXECUTE 0PI,MILA READ DEADSTART SECTOR
| Line S09434 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
12008 M01S09434.ns2776 ---| NJN RCSX IF NOT A VALID DEADSTART SECTOR
| Line S00045 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
12009 M01S00045.ns2776 +++| STM RCSA
12010 M01S00046.ns2776 +++| NJN RCS1.1 IF NOT A VALID DEADSTART SECTOR
12011 M00S09435.msm +++| ENDMS
12012 M00S09436.msm +++| LDM BFMS+CFBP EXTRACT FORMAT REQUIRED FLAG
12013 M00S09437.msm +++| LPN 40
12014 M00S09438.msm +++| STD FR
12015 M00S09439.msm +++| LMM BFMS+CFBP CLEAR FORMAT REQUIRED FLAG
12016 M00S09440.msm +++| STM BFMS+CFBP
12017 M00S09441.msm +++| LDM BFMS+MSLP
12018 M00S09442.msm +++| NJN RCS1 IF *MSL* INSTALLED
12019 M00S09443.msm +++| LDM BFMS+CDAP
12020 M00S09444.msm +++| NJN RCS1 IF COMMON DISK AREA INSTALLED
12021 M00S09445.msm +++| LDM BFMS+CTIP
12022 M00S09446.msm +++| RCS1 STD LC
| Line S09447 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
12023 M01S09447.ns2776 ---| ZJP RCS8 IF *CTI* NOT INSTALLED
12024 M01S09448.ns2776 ---| SHN 1
| Line S00047 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
12025 M01S00047.ns2776 +++| NJN RCS1.2 IF *CTI* INSTALLED
12026 M01S00048.ns2776 +++| RCS1.1 LDD AM
12027 M01S00049.ns2776 +++| LMN AIDR
12028 M01S00050.ns2776 +++| NJP RCS8 IF NOT CDSS II
12029 M01S00051.ns2776 +++| LDC 840D FIRST CYLINDER OF AREA TO BE FLAWED
12030 M01S00052.ns2776 +++| RCS1.2 SHN 1
12031 M00S09449.msm +++| STD T3
12032 M00S09450.msm +++| LDD FN+4 GET DEVICE LENGTH FROM MST
12033 M00S09451.msm +++| SHN 3
12034 M00S09452.msm +++| ADK TDGL
12035 M00S09453.msm +++| CRD CN
12036 M00S09454.msm +++| LDD AM
12037 M00S09455.msm +++| LMN AIDA
12038 M00S09456.msm +++| NJN RCS2 IF NOT 33502
12039 M00S09457.msm +++| LDD T3
12040 M00S09458.msm +++| SHN -1
12041 M00S09459.msm +++| ADC NTDA/2 COMPLETE CYLINDER TO TRACK CONVERSION
12042 M00S09460.msm +++| STD T3
12043 M00S09461.msm +++| UJN RCS4 FLAW TRACKS
12044 M00S09462.msm +++|
12045 M00S09463.msm +++| RCS2 LMN AIDI&AIDA
12046 M00S09464.msm +++| ZJN RCS3 IF 7X54/844-21
12047 M00S09465.msm +++| LMN AIDK&AIDI
12048 M00S09466.msm +++| ZJN RCS3 IF 7154/844-21
12049 M00S09467.msm +++| LMN AIDX&AIDK
| Line S09468 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
12050 M01S09468.ns2776 ---| NJN RCS4 IF NOT FSC 3330-1
| Line S00053 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
12051 M01S00053.ns2776 +++| ZJN RCS3 IF FSC 3330-1
12052 M01S00054.ns2776 +++| LMN AIDR&AIDX
12053 M01S00055.ns2776 +++| NJN RCS4 IF NOT CDSS II
12054 M01S00056.ns2776 +++| LDD T3 INITIALIZE TRACK CALCULATION
12055 M01S00057.ns2776 +++| STD T9
12056 M01S00058.ns2776 +++| LDN 0
12057 M01S00059.ns2776 +++| STD T3
12058 M01S00060.ns2776 +++| LDC 1062 SET FLAW LIMIT FOR CDSS II
12059 M01S00061.ns2776 +++| STD CN
12060 M01S00062.ns2776 +++| RCS2.1 LCN 3 FOR THIS PURPOSE, TRACK = CYLINDER*2/3
12061 M01S00063.ns2776 +++| RAD T9
12062 M01S00064.ns2776 +++| MJN RCS5 IF CONVERSION COMPLETE
12063 M01S00065.ns2776 +++| AOD T3 INCREMENT TRACK NUMBER
12064 M01S00066.ns2776 +++| UJN RCS2.1 CONTINUE DIVISION
12065 M01S00067.ns2776 +++|
12066 M00S09469.msm +++| RCS3 LDD T3
12067 M00S09470.msm +++| RAD T3 COMPLETE CYLINDER CONVERSION
12068 M00S09471.msm +++| RCS4 LDD T3
12069 M00S09472.msm +++| SBD CN
12070 M00S09473.msm +++| PJN RCS7 IF *CTI* BEYOND LOGICAL END OF DEVICE
| Line S09474 Modification History |
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
12071 M01S09474.ns2776 ---| RCS5 LDD T3 CHECK TRACK FLAWED
12072 M01S09475.ns2776 ---| RJM CTF
12073 M01S09476.ns2776 ---| ZJN RCS6 IF TRACK FLAWED
12074 M01S09477.ns2776 ---| LDD T5
12075 M01S09478.ns2776 ---| STD CM+1
12076 M01S09479.ns2776 ---| LDD T3
12077 M01S09480.ns2776 ---| STD CM+2
12078 M01S09481.ns2776 ---| LDN STFS FLAW TRACK IN TRT
12079 M01S09482.ns2776 ---| STD CM+3
12080 M01S09483.ns2776 ---| MONITOR STBM
12081 M01S09484.ns2776 ---| RCS6 AOD T3 ADVANCE TRACK NUMBER
12082 M01S09485.ns2776 ---| LMD CN
12083 M01S09486.ns2776 ---| NJN RCS5 IF NOT END OF LOGICAL DEVICE
| Line S00068 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
12084 M01S00068.ns2776 +++| RCS5 RJM FBT FLAW BLOCK OF TRACKS
12085 M01S00069.ns2776 +++| LDD LC
12086 M01S00070.ns2776 +++| ZJP RCS8 IF *CTI* NOT PRESENT (CDSS II ONLY)
12087 M00S09487.msm +++| RCS7 SMSTF GCTI SET *CTI* PRESENT FLAG
12088 M00S09488.msm +++| LDN ZERL CLEAR DEADSTART FILE INDICATOR
12089 M00S09489.msm +++| CRM BFMS+OSBP,ON
12090 M00S09490.msm +++| LDC BFMS+WLSF REWRITE DEADSTART SECTOR
12091 M00S09491.msm +++| RJM WDS
12092 M00S09492.msm +++| ENDMS RELEASE CHANNEL
12093 M00S09493.msm +++|* LDN 0
12094 M00S09494.msm +++| LJM RCSX RETURN
12095 M00S09495.msm +++| SNC SPACE 4,10
12096 M00S09496.msm +++|** SNC - SELECT AVAILABLE NIO CHANNEL.
12097 M00S09497.msm +++|*
12098 M00S09498.msm +++|* ENTRY (FN - FN+4) = EST ENTRY.
12099 M00S09499.msm +++|*
12100 M00S09500.msm +++|* EXIT (A) = 0, IF NO NIO CHANNEL AVAILABLE
12101 M00S09501.msm +++|* = NON-CONCURRENT CHANNEL BYTE.
12102 M00S09502.msm +++|
12103 M00S09503.msm +++|
12104 M00S09504.msm +++| SNC2 AOD T0 ADVANCE ADDRESS
12105 M00S09505.msm +++| LMN FN+3
12106 M00S09506.msm +++| NJN SNC1 IF POSSIBLE SECOND CHANNEL
12107 M00S09507.msm +++|
12108 M00S09508.msm +++| SNC SUBR ENTRY/EXIT
12109 M00S09509.msm +++| LDN FN+1
12110 M00S09510.msm +++| STD T0 INITIALIZE CHANNEL BYTE ADDRESS
12111 M00S09511.msm +++| SNC1 LDI T0
12112 M00S09512.msm +++| LPC 7040 CHECK CHANNEL STATUS
12113 M00S09513.msm +++| LMC 4000
12114 M00S09514.msm +++| NJN SNC2 IF NOT AN AVAILABLE CHANNEL
12115 M00S09515.msm +++| LDI T0
12116 M00S09516.msm +++| UJN SNCX RETURN
| Line S09517 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12117 M01S09517.283l840 ---| WNB SPACE 4,10
12118 M01S09518.283l840 ---|** WNB - WAIT NOT BUSY.
12119 M01S09519.283l840 ---|*
12120 M01S09520.283l840 ---|* ERROR TO */RMS/HNG* IF CONTROLLER HUNG BUSY.
12121 M01S09521.283l840 ---|*
12122 M01S09522.283l840 ---|* USES T1, T2.
12123 M01S09523.283l840 ---|*
12124 M01S09524.283l840 ---|* CALLS C2D.
12125 M01S09525.283l840 ---|
12126 M01S09526.283l840 ---|
12127 M01S09527.283l840 ---| WNB SUBR ENTRY/EXIT
12128 M01S09528.283l840 ---| LDC 400D
12129 M01S09529.283l840 ---| STD T2 SET 400 MILLISECOND DELAY
12130 M01S09530.283l840 ---| WNB1 DELAY 10
12131 M01S09531.283l840 ---| FNC FCGS,DC REQUEST GENERAL STATUS
12132 M01S09532.283l840 ---| ACN DC
12133 M01S09533.283l840 ---| IAN DC INPUT STATUS
12134 M01S09534.283l840 ---| DCN DC
12135 M01S09535.283l840 ---| STD T1 SAVE GENERAL STATUS
12136 M01S09536.283l840 ---| LPN 2
12137 M01S09537.283l840 ---| ZJN WNBX IF NOT BUSY
12138 M01S09538.283l840 ---| SOD T2
12139 M01S09539.283l840 ---| NJN WNB1 IF NOT TIMEOUT
12140 M01S09540.283l840 ---| LDD T1
12141 M01S09541.283l840 ---| SHN -6
12142 M01S09542.283l840 ---| RJM C2D CONVERT GENERAL STATUS
12143 M01S09543.283l840 ---| STM WNBA+11
12144 M01S09544.283l840 ---| LDD T1
12145 M01S09545.283l840 ---| RJM C2D
12146 M01S09546.283l840 ---| STM WNBA+12 STORE IN MESSAGE
12147 M01S09547.283l840 ---| LDC WNBA
12148 M01S09548.283l840 ---| LJM /RMS/HNG DISPLAY MESSAGE AND HANG PP
12149 M01S09549.283l840 ---|
12150 M01S09550.283l840 ---|
12151 M01S09551.283l840 ---| WNBA DATA C* HUNG BUSY - GS = XXXX.*
12152 M01S09552.283l840 ---|
12153 M01S09553.283l840 ---|
| Line S01473 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12154 M01S01473.283l840 +++| SPACE 4,10
12155 M00S09554.msm +++|** COMMON DECKS.
12156 M00S09555.msm +++|
12157 M00S09556.msm +++|
12158 M00S09557.msm +++|*CALL COMPSDR
12159 M00S09558.msm +++| SPACE 4,10
| Line S09559 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12160 M01S09559.283l840 ---|** CHANNEL TABLE.
| Line S01474 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12161 M01S01474.283l840 +++| ORDI EQU *+5 LOAD ADDRESS FOR *4DI*
12162 M00S09560.msm +++|
| Line S09561 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12163 M01S09561.283l840 ---|
12164 M01S09562.283l840 ---| CHTB DC
12165 M01S09563.283l840 ---| SPACE 4,10
12166 M00S09564.msm ---| MIPA EQU * *0TI* PARAMETER ADDRESS
12167 M00S09565.msm ---| MILA EQU MIPA+1 *0TI* LOAD ADDRESS
| Line S09566 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
12168 M01S09566.272l774 ---|
| Line S00076 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
12169 M01S00076.272l774 +++| SPACE 4,10
12170 M00S09567.msm +++| ERRNG BFMS-MILA-ZPXL OVERFLOW INTO BUFFER
12171 M00S09568.msm +++| ERRNG BFMS-MILA-ZTXL OVERFLOW INTO BUFFER
12172 M00S09569.msm +++| POV SPACE 4,10
12173 M00S09570.msm +++|** POV - PRESET OVERLAY.
12174 M00S09571.msm +++|
12175 M00S09572.msm +++|
12176 M00S09573.msm +++| POV LDM MMFP
12177 M00S09574.msm +++| ZJN POV3 IF DO NOT PRESET FOR MMF
12178 M00S09575.msm +++| LDC MMFL
12179 M00S09576.msm +++| CRD CM
12180 M00S09577.msm +++| LDD CM+3 SET MACHINE MASK
12181 M00S09578.msm +++| LMM IMSA
12182 M00S09579.msm +++| STM IMSA
12183 M00S09580.msm +++| LDC L"QUAL" SET LIST ADDRESS
12184 M00S09581.msm +++| STD T1
12185 M00S09582.msm +++| UJN POV2 ENTER LOOP
12186 M00S09583.msm +++|
12187 M00S09584.msm +++| POV1 STD T0
12188 M00S09585.msm +++| LDN PSNI REPLACE INSTRUCTION WITH *PSN*
12189 M00S09586.msm +++| STI T0
12190 M00S09587.msm +++| AOD T1 ADVANCE ADDRESS
12191 M00S09588.msm +++| POV2 LDI T1
12192 M00S09589.msm +++| NJN POV1 IF MORE TO PRESET
| Line S09590 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12193 M01S09590.283l840 ---| POV3 LJM RDIX RETURN
| Line S01475 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12194 M01S01475.283l840 +++| POV3 LJM RDHX RETURN
12195 M00S09591.msm +++|
12196 M00S09592.msm +++|* LIST OF INSTRUCTIONS TO BE PRESET.
12197 M00S09593.msm +++|
12198 M00S09594.msm +++| L"QUAL" BSS 0
12199 M00S09595.msm +++| L"QUAL" HERE
12200 M01S01476.283l840 +++| ERRZR L"QUAL"-* TABLE EMPTY - REMOVE PRESET CODE
12201 M00S09596.msm +++| CON 0 TERMINATE LIST
12202 M00S09597.msm +++|
12203 M00S09598.msm +++| QUAL
12204 M00S09599.msm +++|
| Line S09600 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12205 M01S09600.283l840 ---| IMS EQU /RDI/IMS
| Line S01477 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12206 M01S01477.283l840 +++| IMS EQU /RDH/IMS
12207 M01S01478.283l840 +++| ORDI EQU /RDH/ORDI
12208 M00S09601.msm +++| SPACE 4,10
| Line S09602 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
12209 M01S09602.272l774 ---| OVERFLOW OSOV CHECK FOR OVERFLOW
| Line S00077 Modification History |
M01 (Added by) | 272l774 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12210 M02S00077.283l840 ---| OVERFLOW OSOV,EPFW CHECK FOR OVERFLOW
| Line S01479 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
12211 M01S01479.283l840 +++| OVERFLOW ORDH,EPFW CHECK FOR OVERFLOW
12212 M01S01480.283l840 +++| TTL MSM/4DI - PROCESS FORMAT REQUEST.
12213 M01S01481.283l840 +++| TITLE
12214 M01S01482.283l840 +++| QUAL RDI
12215 M01S01483.283l840 +++| IDENT 4DI,/RDI/PFRX
12216 M01S01484.283l840 +++|*COMMENT MSM - PROCESS FORMAT REQUEST.
12217 M01S01485.283l840 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1994.
12218 M01S01486.283l840 +++| RDI SPACE 4,10
12219 M01S01487.283l840 +++|*** *4DI* CONTAINS ROUTINES UTILIZED BY *RMS* IN
12220 M01S01488.283l840 +++|* FORMATTING 895 DEVICES.
12221 M01S01489.283l840 +++| SPACE 4,10
12222 M01S01490.283l840 +++|*CALL COMPCHM
12223 M01S01491.283l840 +++| SPACE 4,10
12224 M01S01492.283l840 +++|**** DIRECT LOCATION ASSIGNMENTS.
12225 M01S01493.283l840 +++|
12226 M01S01494.283l840 +++|
12227 M01S01495.283l840 +++| PB EQU RG - RI+1 FORMAT PARAMETER BLOCK (3 LOCATIONS)
12228 M01S01496.283l840 +++| CS EQU ET CHANNEL STATUS
12229 M01S01497.283l840 +++| FR EQU P1 FORMAT REQUIRED FLAG
12230 M01S01498.283l840 +++| LC EQU P2 LAST CYLINDER + 1
12231 M01S01499.283l840 +++|
12232 M01S01500.283l840 +++|****
12233 M01S01501.283l840 +++| SPACE 4,10
12234 M01S01502.283l840 +++|** ASSEMBLY CONSTANTS.
12235 M01S01503.283l840 +++|
12236 M01S01504.283l840 +++|
12237 M01S01505.283l840 +++| DC EQU 11 DISK CHANNEL
12238 M01S01506.283l840 +++|
12239 M01S01507.283l840 +++| FCGS EQU 12 GENERAL STATUS FUNCTION CODE
12240 M01S01508.283l840 +++| FCFP EQU 16 FORMAT PACK FUNCTION CODE
12241 M01S01509.283l840 +++|
12242 M01S01510.283l840 +++| FPBL EQU 22 FORMAT PACK PARAMETER BLOCK LENGTH
12243 M01S01511.283l840 +++| RDH SPACE 4,10
12244 M01S01512.283l840 +++| ORG ORDH
12245 M01S01513.283l840 +++| TITLE PROCESS FORMAT REQUEST.
12246 M01S01514.283l840 +++| PFR SPACE 4,20
12247 M01S01515.283l840 +++|** PFR - PROCESS FORMAT REQUEST.
12248 M01S01516.283l840 +++|*
12249 M01S01517.283l840 +++|* ENTRY (T3) = 0 IF DEADSTART SECTOR READ BY *RCS*.
12250 M01S01518.283l840 +++|* (AM) = ALGORITHM INDEX.
12251 M01S01519.283l840 +++|* (CS) = CHANNEL STATUS.
12252 M01S01520.283l840 +++|* (FR) = FORMAT REQUIRED FLAG.
12253 M01S01521.283l840 +++|* (LC) = FIRST CYLINDER OF *CTI* SPACE.
12254 M01S01522.283l840 +++|* (T5) = EST ORDINAL.
12255 M01S01523.283l840 +++|* (T6) = TRACK CONTAINING DEADSTART SECTOR.
12256 M01S01524.283l840 +++|* (T7) = DEADSTART SECTOR.
12257 M01S01525.283l840 +++|* (FN - FN+4) = EST ENTRY.
12258 M01S01526.283l840 +++|* (FS - FS+4) = *STLL* WORD OF MST.
12259 M01S01527.283l840 +++|*
12260 M01S01528.283l840 +++|* USES T1, T2, T3, T4, CM - CM+4, CN - CN+4.
12261 M01S01529.283l840 +++|*
12262 M01S01530.283l840 +++|* CALLS F8D.
12263 M01S01531.283l840 +++|*
12264 M01S01532.283l840 +++|* MACROS CMSTF, ENDMS, RCHAN.
12265 M01S01533.283l840 +++|
12266 M01S01534.283l840 +++|
12267 M01S01535.283l840 +++| PFR SUBR ENTRY/EXIT
12268 M01S01536.283l840 +++| LDN 0
12269 M01S01537.283l840 +++| STD CM+2
12270 M01S01538.283l840 +++| LDD CS
12271 M01S01539.283l840 +++| LPN 77 CLEAR IMMEDIATE RETURN AND RESERVE CHANNEL
12272 M01S01540.283l840 +++| RCHAN
12273 M01S01541.283l840 +++| LDD CM+1 SAVE CHANNEL FOR *ENDMS*