Seq # *Modification Id* Act
----------------------------+
06905 M00S06027.msm +++|*
06906 M00S06028.msm +++|* MACROS SFA.
06907 M00S06029.msm +++|
06908 M00S06030.msm +++|
06909 M00S06031.msm +++| VAL7 LDN 0 CLEAR ERROR RETURN STATUS
06910 M00S06032.msm +++|
06911 M00S06033.msm +++| VAL SUBR ENTRY/EXIT
06912 M00S06034.msm +++| SFA EST,T5 GET ACCESS LEVELS FROM EST
06913 M00S06035.msm +++| ADK EQAE
06914 M00S06036.msm +++| CRD CN
06915 M00S06037.msm +++| LDM N4SS+5*PFGL+4 GET ACCESS LEVELS CONTAINED IN MST
06916 M00S06038.msm +++| SHN -6
06917 M00S06039.msm +++| STD CM
06918 M00S06040.msm +++| LDD CN+3 COMPARE LOWER LEVELS
06919 M00S06041.msm +++| LPN 70
06920 M00S06042.msm +++| STD CN
06921 M00S06043.msm +++| LDD CM
06922 M00S06044.msm +++| SCN 7
06923 M00S06045.msm +++| SBD CN
06924 M00S06046.msm +++| MJN VAL2 IF LOWER LEVEL NOT WITHIN LIMITS
06925 M00S06047.msm +++| LDD CM COMPARE UPPER LEVELS
06926 M00S06048.msm +++| LPN 7
06927 M00S06049.msm +++| STD CM
06928 M00S06050.msm +++| LDD CN+3
06929 M00S06051.msm +++| LPN 7
06930 M00S06052.msm +++| SBD CM
06931 M00S06053.msm +++| VAL1 PJN VAL7 IF ACCESS LEVELS WITHIN LIMITS
06932 M00S06054.msm +++| VAL2 LDD RE PROCESS *RMS* ERROR
06933 M00S06055.msm +++|* UJN VAL5 (PROCESS *CMS* ERROR)
06934 M00S06056.msm +++| SHN 21-10
06935 M00S06057.msm +++| PJN VAL6 IF NON-RECOVERABLE DEVICE
06936 M00S06058.msm +++| VAL3 LDN STSV SET ERROR STATUS
06937 M00S06059.msm +++| STD EC
06938 M00S06060.msm +++| VAL4 UJN VALX RETURN
06939 M00S06061.msm +++|
06940 M00S06062.msm +++| VAL5 LDD FN PROCESS *CMS* ERROR
06941 M00S06063.msm +++| SHN 21-6
06942 M00S06064.msm +++| PJN VAL1 IF DEVICE ALREADY AVAILABLE
| Line S06065 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
06943 M01S06065.272l774 ---| LDN SSML DETERMINE IF SECURED SYSTEM
06944 M01S06066.272l774 ---| CRD CM
06945 M01S06067.272l774 ---| LDD CM
06946 M01S06068.272l774 ---| LPN 77
06947 M01S06069.272l774 ---| NJN VAL3 IF SECURED SYSTEM
06948 M01S06070.272l774 ---| RJM PUE PROCESS UNSECURED ERROR
| Line S00040 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
06949 M01S00040.272l774 +++| VALB RJM PUE PROCESS UNSECURED ERROR
06950 M01S00041.272l774 +++|* UJN VAL3 (SECURED SYSTEM)
06951 M00S06071.msm +++| NJN VAL3 IF OPERATOR ENTERED *PAUSE*
06952 M00S06072.msm +++| UJN VAL4 RETURN
06953 M00S06073.msm +++|
| Line S06074 Modification History |
M01 (Removed by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
06954 M01S06074.ns2547 ---| VAL6 LDD EQ SET EST ORDINAL IN MESSAGE
06955 M01S06075.ns2547 ---| SHN -3
06956 M01S06076.ns2547 ---| RJM C2D
06957 M01S06077.ns2547 ---| STM VALA+1
06958 M01S06078.ns2547 ---| LDD EQ
06959 M01S06079.ns2547 ---| LPN 7
06960 M01S06080.ns2547 ---| SHN 6
06961 M01S06081.ns2547 ---| ADC 2R0,
06962 M01S06082.ns2547 ---| STM VALA+2
06963 M01S06083.ns2547 ---| LDC VALA
| Line S00197 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
06964 M01S00197.ns2547 +++| VAL6 LDC VALA SET EST ORDINAL IN MESSAGE
06965 M01S00198.ns2547 +++| RJM SOM
06966 M00S06084.msm +++| LJM /RMS/HNG HANG PP
06967 M01S00199.ns2547 +++|
06968 M00S06085.msm +++|
06969 M00S06086.msm +++| VALA DATA C*EQXXX, DEVICE ACCESS ERROR.*
| Line S06087 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
06970 M01S06087.272l774 ---| WMT SPACE 4
| Line S00042 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
06971 M01S00042.272l774 +++| WMT SPACE 4,20
06972 M00S06088.msm +++|** WMT - ENTER MST TO CM TABLE.
06973 M00S06089.msm +++|*
06974 M00S06090.msm +++|* ENTRY (A) = STATUS OF LABEL READ ATTEMPT.
06975 M00S06091.msm +++|* (CA) = ADDRESS FOR MST.
06976 M00S06092.msm +++|* (T5) = EST ORDINAL.
06977 M00S06093.msm +++|* (FN - FN+4) = EST ENTRY.
06978 M00S06094.msm +++|* (FS - FS+4) = STLL WORD FROM MST.
06979 M00S06095.msm +++|* (T7) = SECTOR READ.
06980 M00S06096.msm +++|* (T6) = LABEL TRACK READ.
06981 M00S06097.msm +++|* (SN) = LABEL SECTOR NUMBER.
06982 M00S06098.msm +++|*
| Line S06099 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
06983 M01S06099.283l840 ---|* EXIT (A) = SECTOR NUMBER.
06984 M01S06100.283l840 ---|* (A) .GE. 0 TO ENSURE UPDATE OF RECOVERY TABLES
06985 M01S06101.283l840 ---|* UPON RETURN TO *MRL*.
06986 M01S06102.283l840 ---|* (CA) = ADDRESS FOR MST OF NEXT UNIT.
| Line S00168 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
06987 M01S00168.283l840 +++|* EXIT (CA) = ADDRESS FOR MST OF NEXT UNIT.
| Line S00029 Modification History |
M01 (Added by) | msm49 |
Seq # *Modification Id* Act
----------------------------+
06988 M01S00029.msm49 +++|* TO */RMS/HNG* IF LINK DEVICE SIZE ERROR.
06989 M00S06103.msm +++|*
06990 M00S06104.msm +++|* USES T1, CA, EC, CM - CM+4, FS - FS+4.
06991 M00S06105.msm +++|*
06992 M00S06106.msm +++|* CALLS GAS, LRA, SES, VAL.
06993 M00S06107.msm +++|
06994 M00S06108.msm +++|
06995 M00S06109.msm +++| WMT SUBR ENTRY/EXIT
06996 M00S06110.msm +++| STD EC SAVE STATUS
06997 M00S06111.msm +++| ZJN WMT3 IF NO ERROR
06998 M01S00030.msm49 +++|
06999 M01S00031.msm49 +++|* ERROR ENCOUNTERED ON LABEL READ.
07000 M01S00032.msm49 +++|
07001 M00S06112.msm +++| WMTA LMN STNR
07002 M00S06113.msm +++|* PSN (CMS CALL)
07003 M00S06114.msm +++| NJN WMT1 IF NOT *NOT READY*
07004 M00S06115.msm +++| STD EC CLEAR ERROR CODE (RMS ONLY)
07005 M00S06116.msm +++| WMT1 LDC MSTL*5
07006 M00S06117.msm +++| STD T1
07007 M00S06118.msm +++| WMT2 LDN 0 CLEAR MST AREA
07008 M00S06119.msm +++| STM N4SS-1,T1
07009 M00S06120.msm +++| SOD T1
07010 M00S06121.msm +++| NJN WMT2
07011 M00S06122.msm +++| AOD RE SET NO LABEL PRESENT
| Line S00200 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07012 M01S00200.ns2547 +++| LDD FN+4
07013 M01S00201.ns2547 +++| SHN 3
07014 M01S00202.ns2547 +++| ADN PFGL RETAIN PF DESCRIPTION
07015 M01S00203.ns2547 +++| CRM N4SS+5*PFGL,TW
07016 M00S06123.msm +++| LDD EC SET ERROR STATUS IN MST IMAGE
07017 M00S06124.msm +++| STM N4SS+5*STLL+1
| Line S06125 Modification History |
M01 (Removed by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07018 M01S06125.ns2547 ---| LDD FN+4 RETAIN PF DESCRIPTION
07019 M01S06126.ns2547 ---| SHN 3
07020 M01S06127.ns2547 ---| ADN PFGL
07021 M01S06128.ns2547 ---| CRM N4SS+5*PFGL,TW
| Line S00204 Modification History |
M01 (Added by) | ns2547 |
M02 (Removed by) | msm49 |
Seq # *Modification Id* Act
----------------------------+
07022 M02S00204.msm49 ---| NJN WMT4 IF ERROR STATUS PRESENT
| Line S00033 Modification History |
M01 (Added by) | msm49 |
Seq # *Modification Id* Act
----------------------------+
07023 M01S00033.msm49 +++| NJN WMT2.1 IF ERROR STATUS PRESENT
| Line S00205 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07024 M01S00205.ns2547 +++| LDD FS+1
07025 M01S00206.ns2547 +++| LPN 77 PRESERVE EXISTING ERROR STATUS
07026 M01S00207.ns2547 +++| STD EC
| Line S06129 Modification History |
M01 (Removed by) | msm49 |
Seq # *Modification Id* Act
----------------------------+
07027 M01S06129.msm49 ---| UJN WMT4 CONTINUE
| Line S00034 Modification History |
M01 (Added by) | msm49 |
Seq # *Modification Id* Act
----------------------------+
07028 M01S00034.msm49 +++| WMT2.1 LJM WMT4 CONTINUE
07029 M01S00035.msm49 +++|
07030 M01S00036.msm49 +++|* LABEL READ SUCCESSFUL.
07031 M00S06130.msm +++|
07032 M00S06131.msm +++| WMT3 RJM VAL VERIFY ACCESS LEVELS
07033 M00S06132.msm +++| NJN WMT1 IF LEVELS NOT WITHIN LIMITS
07034 M00S06133.msm +++| LDD T6 SET LABEL TRACK
07035 M00S06134.msm +++| STM N4SS+5*ALGL+1
07036 M00S06135.msm +++| LDD T7 SET SECTOR READ
07037 M00S06136.msm +++| STM N4SS+5*DILL
07038 M00S06137.msm +++| LDM N4SS+5*ACGL+4 CLEAR PF UTILITY INTERLOCK
07039 M00S06138.msm +++| LPC MGLAP
07040 M00S06139.msm +++| STM N4SS+5*ACGL+4
07041 M00S06140.msm +++| LDM N4SS+STLL*5+1 CLEAR ERROR STATUS
07042 M00S06141.msm +++| SCN 77
07043 M00S06142.msm +++| STM N4SS+STLL*5+1
07044 M00S06143.msm +++| RJM GAS SET ALTERNATE LABEL SECTOR
07045 M00S06144.msm +++| STM N4SS+5*DULL
07046 M01S00037.msm49 +++| WMTC UJN WMT4 WRITE LABEL DATA TO CM
07047 M01S00038.msm49 +++|* PSN (IF LINK DEVICE RECOVERY)
07048 M01S00039.msm49 +++|
07049 M01S00040.msm49 +++|* VERIFY TRT LENGTH FOR LINK DEVICE.
07050 M01S00041.msm49 +++|
07051 M01S00042.msm49 +++| LDD FN+4 GET TRT LENGTH DEFINED AT DEADSTART
07052 M01S00043.msm49 +++| SHN 3
07053 M01S00044.msm49 +++| ADK TDGL
07054 M01S00045.msm49 +++| CRD CM
07055 M01S00046.msm49 +++| LDD CM+2
07056 M01S00047.msm49 +++| LMM N4SS+TDGL*5+2 TRT LENGTH RECOVERED FROM DEVICE
07057 M01S00048.msm49 +++| ZJN WMT4 IF CORRECT TRT LENGTH
07058 M01S00049.msm49 +++| LDC WMTD *LINK DEVICE SIZE ERROR.*
07059 M01S00050.msm49 +++| LJM /RMS/HNG HANG PP
07060 M01S00051.msm49 +++|
07061 M01S00052.msm49 +++|* ENTER LABEL DATA INTO CM TABLE.
07062 M01S00053.msm49 +++|
07063 M00S06145.msm +++| WMT4 LDN MSTL SET MST LENGTH
07064 M00S06146.msm +++| STD T1
| Line S06147 Modification History |
M01 (Removed by) | msm49 |
Seq # *Modification Id* Act
----------------------------+
07065 M01S06147.msm49 ---|
07066 M01S06148.msm49 ---|* ENTER LABEL DATA IN CM TABLE.
07067 M01S06149.msm49 ---|
07068 M00S06150.msm ---| RJM LRA LOAD REFERENCE ADDRESS
07069 M00S06151.msm ---| ADD CA
07070 M00S06152.msm ---| CWM N4SS,T1
07071 M00S06153.msm ---| LDN MSTL ADVANCE TABLE ADDRESS
07072 M00S06154.msm ---| RAD CA
07073 M00S06155.msm ---|
07074 M00S06156.msm ---|* ENTER APPROPRIATE STATUS TO MST.
07075 M00S06157.msm ---|
07076 M00S06158.msm ---| LDD SN
| Line S06159 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07077 M01S06159.283l840 ---| NJN WMT7 IF NOT FIRST UNIT OF EQUIPMENT
| Line S00169 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07078 M01S00169.283l840 +++| NJN WMT6 IF NOT FIRST UNIT OF EQUIPMENT
07079 M00S06160.msm +++| LDD FN
07080 M00S06161.msm +++| SHN 21-6
07081 M00S06162.msm +++| PJN WMT5 IF DEVICE AVAILABLE
07082 M00S06163.msm +++| LDD FN+4 STORE PF DESCRIPTION
07083 M00S06164.msm +++| SHN 3
07084 M00S06165.msm +++| ADN PFGL
07085 M00S06166.msm +++| CWM N4SS+5*PFGL,TW
07086 M00S06167.msm +++| ERRNZ PUGL-PFGL-1 ADJUST IF *PFGL* POSITION CHANGES
07087 M00S06168.msm +++| WMTB UJN WMT5 CHECK PREVIOUS ERROR STATUS
07088 M00S06169.msm +++|* PSN (RECOVERING MMF LINK DEVICE)
07089 M00S06170.msm +++| SBN PFGL+2-ALGL STORE LINK DEVICE ALLOCATION WORD
07090 M00S06171.msm +++| CWM N4SS+5*ALGL,ON
07091 M00S06172.msm +++| LDM N4SS+5*ALGL+4 SET DAT TRACK
| Line S06173 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07092 M01S06173.283l840 ---| STM /MMF/RDEA
07093 M01S06174.283l840 ---| STM /MMF/WDEA
| Line S00170 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07094 M01S00170.283l840 +++| STM ADEA
07095 M00S06175.msm +++| WMT5 LDD FS+1
07096 M00S06176.msm +++| LPN 77 CHECK CURRENT ERROR STATUS
07097 M00S06177.msm +++| SBN MNEC
07098 M00S06178.msm +++| PJN WMT6 IF STATUS NOT TO BE CLEARED
07099 M00S06179.msm +++| LDD EC
07100 M00S06180.msm +++| RJM SES SET/CLEAR ERROR STATUS
| Line S06181 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07101 M01S06181.283l840 ---| WMT6 LDN 0
07102 M01S06182.283l840 ---| WMT7 LJM WMTX RETURN
| Line S00171 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07103 M01S00171.283l840 +++| WMT6 LJM WMTX RETURN
| Line S00054 Modification History |
M01 (Added by) | msm49 |
Seq # *Modification Id* Act
----------------------------+
07104 M01S00054.msm49 +++|
07105 M01S00055.msm49 +++|
07106 M01S00056.msm49 +++| WMTD DATA C*LINK DEVICE SIZE ERROR.*
| Line S00208 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07107 M01S00208.ns2547 +++| WOC SPACE 4,10
07108 M01S00209.ns2547 +++|** WOC - WAIT ON OPERATOR COMMAND.
07109 M01S00210.ns2547 +++|*
07110 M01S00211.ns2547 +++|* ENTRY (A) = ADDRESS OF PROMPT MESSAGE.
07111 M01S00212.ns2547 +++|*
07112 M01S00213.ns2547 +++|* EXIT (A) = 0 IF OPERATOR ENTERED *GO*.
07113 M01S00214.ns2547 +++|* = 1 IF OPERATOR ENTERED *PAUSE*.
07114 M01S00215.ns2547 +++|*
07115 M01S00216.ns2547 +++|* USES T8, CM - CM+4.
07116 M01S00217.ns2547 +++|*
07117 M01S00218.ns2547 +++|* MACROS PAUSE.
07118 M01S00219.ns2547 +++|
07119 M01S00220.ns2547 +++|
07120 M01S00221.ns2547 +++| WOC SUBR ENTRY/EXIT
07121 M01S00222.ns2547 +++| STM WOCC
| Line S00223 Modification History |
M01 (Added by) | ns2547 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07122 M02S00223.272l774 ---| WOCA LDN 0 READ SENSE SWITCH WORD
07123 M02S00224.272l774 ---|* LDN NC+1 (*RMS* CALL - USE SYSTEM CP)
07124 M02S00225.272l774 ---| WOCB LDD CP READ SENSE SWITCH WORD
07125 M02S00226.272l774 ---|* SHN 7 (*RMS* CALL - USE SYSTEM CP)
07126 M02S00227.272l774 ---| ADN SNSW
| Line S00043 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07127 M01S00043.272l774 +++| WOCA LDC **+SNSW ADDRESS OF *SNSW* IN CP (*RMS* - SYSTEM CP)
| Line S00228 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07128 M01S00228.ns2547 +++| CRD CM GET SENSE SWITCH WORD
07129 M01S00229.ns2547 +++| STD T8
07130 M01S00230.ns2547 +++| LDN 3 SET PAUSE FLAGS
07131 M01S00231.ns2547 +++| STD CM+3
07132 M01S00232.ns2547 +++| LDD T8 STORE PAUSE FLAGS
07133 M01S00233.ns2547 +++| CWD CM
07134 M01S00234.ns2547 +++| ADN MS2W-SNSW STORE CONTROL POINT MESSAGE
07135 M01S00235.ns2547 +++| CWM *,TR
07136 M01S00236.ns2547 +++| WOCC EQU *-1
07137 M01S00237.ns2547 +++| WOC1 LCN 0 PAUSE FOR OPERATOR ACTION
07138 M01S00238.ns2547 +++| SBN 1
07139 M01S00239.ns2547 +++| NJN *-1 IF DELAY NOT COMPLETE
07140 M01S00240.ns2547 +++| PAUSE NE
07141 M01S00241.ns2547 +++| LDD T8 READ SENSE SWITCH WORD
07142 M01S00242.ns2547 +++| CRD CM
07143 M01S00243.ns2547 +++| LDD CM+3 CHECK FOR OPERATOR INPUT
07144 M01S00244.ns2547 +++| LPN 2
07145 M01S00245.ns2547 +++| NJN WOC1 IF OPERATOR HAS NOT RESPONDED
07146 M01S00246.ns2547 +++| LMD CM+3
07147 M01S00247.ns2547 +++| UJP WOCX RETURN
07148 M00S06183.msm +++|
07149 M00S06184.msm +++|
| Line S06185 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07150 M01S06185.272l774 ---| ERRPL *-BFMS OVERFLOW INTO BUFFER
| Line S00044 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07151 M01S00044.272l774 +++| ERRNG BFMS-* OVERFLOW INTO BUFFER
07152 M00S06186.msm +++| TITLE PRESET.
07153 M00S06187.msm +++| PRS SPACE 4,10
07154 M00S06188.msm +++|** PRS - PRESET.
07155 M00S06189.msm +++|
07156 M00S06190.msm +++|
| Line S06191 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07157 M01S06191.272l774 ---| PRS LDD RS CHECK RECOVERY STATUS
| Line S00045 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07158 M01S00045.272l774 +++| PRS BSS 0 ENTRY
07159 M01S00046.272l774 +++| LDD RS CHECK RECOVERY STATUS
07160 M00S06192.msm +++| LPN FLMK
07161 M00S06193.msm +++| LMN FLCM
07162 M00S06194.msm +++| NJN PRS1 IF NOT LEVEL 3 RECOVERY
| Line S06195 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07163 M01S06195.272l774 ---| LDC UJNI+2
07164 M01S06196.272l774 ---| STM RDLA
07165 M01S06197.272l774 ---| STM RDLC
| Line S00047 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07166 M01S00047.272l774 +++| ISTORE RDLC,(UJN RDL15) BYPASS *RLM* CALL
07167 M00S06198.msm +++| PRS1 LDM DLYA CHECK PP SPEED
07168 M00S06199.msm +++| LPN 14
07169 M00S06200.msm +++| RAM SFTA
07170 M00S06201.msm +++| LDC MMFL READ MMF STATUS WORD
07171 M00S06202.msm +++| CRD CM
07172 M00S06203.msm +++| LDD CM SAVE MACHINE ID
07173 M00S06204.msm +++| STM CDIA
| Line S00248 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07174 M01S00248.ns2547 +++| STM /ISD/RLSF+5
07175 M00S06205.msm +++| LDD CM+4
| Line S06206 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07176 M01S06206.283l840 ---| ZJN PRS4 IF STAND ALONE SYSTEM
| Line S00172 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07177 M01S00172.283l840 +++| ZJP PRS4 IF STAND ALONE SYSTEM
| Line S00014 Modification History |
M01 (Added by) | ns2768 |
Seq # *Modification Id* Act
----------------------------+
07178 M01S00014.ns2768 +++| LDK STDI+T1 ACTIVATE *EMF* SUBROUTINE
07179 M01S00015.ns2768 +++| STM EMFA
| Line S06207 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07180 M01S06207.283l840 ---| LDC TMMF SET TABLE ADDRESS
07181 M01S06208.283l840 ---| STD T1
07182 M01S06209.283l840 ---| UJN PRS3 MODIFY INSTRUCTIONS WITH MACHINE MASK
07183 M01S06210.283l840 ---|
07184 M01S06211.283l840 ---| PRS2 STD T0 SET INSTRUCTION ADDRESS
07185 M01S06212.283l840 ---| LDD CM+3 ADD MACHINE MASK TO INSTRUCTION
07186 M01S06213.283l840 ---| LMI T0
07187 M01S06214.283l840 ---| STI T0
07188 M01S06215.283l840 ---| AOD T1 ADVANCE TABLE ADDRESS
07189 M01S06216.283l840 ---| PRS3 LDI T1
07190 M01S06217.283l840 ---| NJN PRS2 IF NOT END OF TABLE
07191 M00S06218.msm ---| LDM LDMP READ LINK DEVICE ALLOCATION WORD
07192 M00S06219.msm ---| SHN 3
07193 M00S06220.msm ---| ADN ALGL
07194 M00S06221.msm ---| CRD CM
07195 M00S06222.msm ---| LDD CM+4 SET DAT TRACK
07196 M01S06223.283l840 ---| STM /MMF/RDEA
07197 M01S06224.283l840 ---| STM /MMF/WDEA
| Line S00173 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07198 M01S00173.283l840 +++| STM ADEA
07199 M00S06225.msm +++| RJM CEI INITIALIZE *CEA* SUBROUTINE
| Line S06226 Modification History |
M01 (Removed by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07200 M01S06226.ns2547 ---| PRS4 LDD IR
| Line S00249 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07201 M01S00249.ns2547 +++| PRS4 LDD RS
07202 M01S00250.ns2547 +++| ZJN PRS5 IF NOT RECOVERY DEADSTART
07203 M01S00251.ns2547 +++| LCN 1RW-1RT
07204 M01S00252.ns2547 +++| RAM /ISD/RLSF+7 MODIFY ERROR MESSAGE
| Line S00253 Modification History |
M01 (Added by) | ns2547 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07205 M02S00253.272l774 ---| LDC *
07206 M02S00254.272l774 ---| ORG *-1
07207 M02S00255.272l774 ---| LOC /ISD/RLSB
07208 M02S00256.272l774 ---| NJN /ISD/RLS17 IF MACHINE ID IN DIT
07209 M02S00257.272l774 ---| LOC *O
07210 M02S00258.272l774 ---| STM /ISD/RLSB MODIFY DIT CHECK
| Line S00048 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07211 M01S00048.272l774 +++| ISTORE /ISD/RLSB,(NJN /ISD/RLS17) MODIFY DIT CHECK
| Line S00259 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07212 M01S00259.ns2547 +++| PRS5 LDD IR
07213 M00S06227.msm +++| LMC 2RCM
| Line S06228 Modification History |
M01 (Removed by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07214 M01S06228.ns2547 ---| ZJN PRS5 IF *CMS* CALL
| Line S00260 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07215 M01S00260.ns2547 +++| ZJN PRS6 IF *CMS* CALL
| Line S00049 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07216 M01S00049.272l774 +++| ISTORE RLSA,(UJN RLS11) SET RECOVERY LEVEL CHECK
07217 M00S06229.msm +++| LDN NCPL
07218 M00S06230.msm +++| CRD CM
| Line S06231 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07219 M01S06231.272l774 ---| AOD CM+1 SET SYSTEM CP NUMBER
| Line S06232 Modification History |
M01 (Removed by) | ns2547 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07220 M02S06232.272l774 ---| RAM PUEC
| Line S00261 Modification History |
M01 (Added by) | ns2547 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07221 M02S00261.272l774 ---| RAM WOCA
| Line S06233 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07222 M01S06233.272l774 ---| LDC SHNI+7
| Line S06234 Modification History |
M01 (Removed by) | ns2547 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07223 M02S06234.272l774 ---| STM PUED
| Line S00262 Modification History |
M01 (Added by) | ns2547 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07224 M02S00262.272l774 ---| STM WOCB
| Line S06235 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07225 M01S06235.272l774 ---| LDC *
07226 M01S06236.272l774 ---| ORG *-1
07227 M01S06237.272l774 ---| LOC RLSA
07228 M01S06238.272l774 ---| UJN RLS11 CHECK RECOVERY LEVEL
07229 M01S06239.272l774 ---| LOC *O
07230 M01S06240.272l774 ---| STM RLSA
07231 M01S06241.272l774 ---| LJM RDBX EXIT
| Line S00050 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07232 M01S00050.272l774 +++| AOD CM+1 GET SYSTEM CPA ADDRESS
07233 M01S00051.272l774 +++| SHN 7
07234 M01S00052.272l774 +++| LJM PRS8 SET *SNSW* ADDRESS
07235 M00S06242.msm +++|
| Line S06243 Modification History |
M01 (Removed by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07236 M01S06243.ns2547 ---| PRS5 LDC UJNI+2 DISABLE CALLS TO DEADSTART ROUTINES
| Line S00263 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07237 M01S00263.ns2547 +++| PRS6 LDC UJNI+2 DISABLE CALLS TO DEADSTART ROUTINES
07238 M00S06244.msm +++| STM MRLB
07239 M00S06245.msm +++| STM RDLA
| Line S06246 Modification History |
M01 (Removed by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07240 M01S06246.ns2547 ---| STM /ISD/RLSB
| Line S00264 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07241 M01S00264.ns2547 +++| STM /ISD/RLSD
| Line S06247 Modification History |
M01 (Removed by) | msm45 |
Seq # *Modification Id* Act
----------------------------+
07242 M01S06247.msm45 ---| LDC *
07243 M01S06248.msm45 ---| ORG *-1
07244 M01S06249.msm45 ---| LOC VAL2
07245 M01S06250.msm45 ---| UJN VAL5 PROCESS *CMS* ERROR
07246 M01S06251.msm45 ---| LOC *O
07247 M01S06252.msm45 ---| STM VAL2
07248 M01S06253.msm45 ---| LDC *
07249 M01S06254.msm45 ---| ORG *-1
07250 M01S06255.msm45 ---| LOC CMEA
07251 M01S06256.msm45 ---| UJN CME8 DO NOT SET UNLOAD FOR NOT READY
07252 M01S06257.msm45 ---| LOC *O
07253 M01S06258.msm45 ---| STM CMEA
| Line S00003 Modification History |
M01 (Added by) | msm45 |
Seq # *Modification Id* Act
----------------------------+
07254 M01S00003.msm45 +++| ISTORE VAL2,(UJN VAL5)
07255 M01S00004.msm45 +++| ISTORE CMEA,(UJN CME8)
07256 M01S00005.msm45 +++| ISTORE CMEB,(UJN CME8)
07257 M00S06259.msm +++| LDC RLM6 SET ERROR RETURN FROM *RLM*
07258 M00S06260.msm +++| STM RLMA
07259 M00S06261.msm +++| LDN PSNI
07260 M00S06262.msm +++| STM WMTA
07261 M00S06263.msm +++| LDD CP
07262 M00S06264.msm +++| ADN MS2W
07263 M00S06265.msm +++| STM /ISD/RLSC
| Line S06266 Modification History |
M01 (Removed by) | ns2768 |
Seq # *Modification Id* Act
----------------------------+
07264 M01S06266.ns2768 ---| LDM /CMS/DPPA
07265 M01S06267.ns2768 ---| LPN 77
| Line S00016 Modification History |
M01 (Added by) | ns2768 |
Seq # *Modification Id* Act
----------------------------+
07266 M01S00016.ns2768 +++| LDM /CMS/DPPB
07267 M01S00017.ns2768 +++| SHN -6
07268 M01S00018.ns2768 +++| LMN UJNI/100
| Line S06268 Modification History |
M01 (Removed by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07269 M01S06268.ns2547 ---| NJN PRS6 IF DEADSTART SEQUENCING
| Line S00265 Modification History |
M01 (Added by) | ns2547 |
Seq # *Modification Id* Act
----------------------------+
07270 M01S00265.ns2547 +++| NJN PRS7 IF DEADSTART SEQUENCING
| Line S06269 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07271 M01S06269.272l774 ---| LDC UJNI+2
07272 M01S06270.272l774 ---| STM RDLC
| Line S06271 Modification History |
M01 (Removed by) | ns2547 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07273 M02S06271.272l774 ---| PRS6 LJM RDBX EXIT
| Line S00266 Modification History |
M01 (Added by) | ns2547 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07274 M02S00266.272l774 ---| PRS7 LJM RDBX EXIT
| Line S06272 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07275 M01S06272.272l774 ---| EMF SPACE 4
| Line S00053 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07276 M01S00053.272l774 +++| ISTORE RDLC,(UJN RDL15) BYPASS *RLM* CALL
07277 M01S00054.272l774 +++| PRS7 LDD CP GET CPA ADDRESS
07278 M01S00055.272l774 +++| PRS8 ADN SNSW SET *SNSW* ADDRESS
07279 M01S00056.272l774 +++| STM WOCA+1
07280 M01S00057.272l774 +++| LDN SSML DETERMINE IF SECURED SYSTEM
07281 M01S00058.272l774 +++| CRD CM
07282 M01S00059.272l774 +++| LDD CM
07283 M01S00060.272l774 +++| LPN 77
07284 M01S00061.272l774 +++| ZJN PRS9 IF UNSECURED SYSTEM
07285 M01S00062.272l774 +++| ISTORE VALB,(UJN VAL3) DISABLE CALL TO *PUE*
07286 M01S00063.272l774 +++| PRS9 LJM RDBX EXIT
07287 M01S00064.272l774 +++| EMF SPACE 4,10
07288 M00S06273.msm +++|** EMF - ENABLE MMF RECOVERY.
07289 M00S06274.msm +++|*
07290 M00S06275.msm +++|* ENTRY (A) = ADDRESS OF INSTRUCTION LIST.
07291 M00S06276.msm +++|*
| Line S00174 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07292 M01S00174.283l840 +++|* EXIT (A) = 0.
07293 M01S00175.283l840 +++|*
07294 M00S06277.msm +++|* USES T1, T2.
07295 M00S06278.msm +++|
07296 M00S06279.msm +++|
07297 M00S06280.msm +++| EMF1 STD T2 SET INSTRUCTION ADDRESS
07298 M00S06281.msm +++| LDN PSNI REPLACE INSTRUCTION WITH *PSN*
07299 M00S06282.msm +++| STI T2
07300 M00S06283.msm +++| AOD T1 ADVANCE LIST ADDRESS
07301 M00S06284.msm +++| EMF2 LDI T1
07302 M00S06285.msm +++| NJN EMF1 LOOP TO END OF LIST
07303 M01S00176.283l840 +++| EMF3 LDN 0
07304 M00S06286.msm +++|
07305 M00S06287.msm +++| EMF SUBR ENTRY/EXIT
| Line S06288 Modification History |
M01 (Removed by) | ns2768 |
Seq # *Modification Id* Act
----------------------------+
07306 M01S06288.ns2768 ---| STD T1 SET LIST ADDRESS
| Line S00019 Modification History |
M01 (Added by) | ns2768 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07307 M02S00019.283l840 ---| EMFA UJN EMFX EXIT (STAND-ALONE SYSTEM)
| Line S00177 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07308 M01S00177.283l840 +++| EMFA UJN EMF3 EXIT (STAND-ALONE SYSTEM)
| Line S00020 Modification History |
M01 (Added by) | ns2768 |
Seq # *Modification Id* Act
----------------------------+
07309 M01S00020.ns2768 +++|* STD T1 SET LIST ADDRESS (MULTI-MAINFRAME SYSTEM)
07310 M00S06289.msm +++| STM MMFP SET MMF PRESENT
07311 M00S06290.msm +++| UJN EMF2 ENTER LOOP
07312 M00S06291.msm +++| SPACE 4,10
07313 M00S06292.msm +++|
07314 M00S06293.msm +++| CEI HERE
07315 M00S06294.msm +++| SPACE 4,10
| Line S06295 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07316 M01S06295.283l840 ---|* TABLE OF INSTRUCTIONS TO BE PRESET WITH MACHINE MASK.
07317 M01S06296.283l840 ---|
07318 M01S06297.283l840 ---| TMMF BSS 0
07319 M01S06298.283l840 ---| QUAL MMF
07320 M01S06299.283l840 ---| TMMF HERE
07321 M01S06300.283l840 ---| CON 0 TERMINATE TABLE
07322 M01S06301.283l840 ---|
07323 M00S06302.msm ---|* LIST OF *CMS* INSTRUCTIONS MODIFIED FOR MMF SYSTEM.
07324 M00S06303.msm ---|
07325 M00S06304.msm ---| QUAL CMS
07326 M00S06305.msm ---| LCMS BSS 0
07327 M00S06306.msm ---| LCMS HERE
| Line S00178 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07328 M01S00178.283l840 +++| ERRZR LCMS-* TABLE EMPTY - REMOVE PRESET CODE
07329 M00S06307.msm +++| CON 0 TERMINATE LIST
07330 M00S06308.msm +++|
07331 M00S06309.msm +++|* LIST OF *RMS* INSTRUCTIONS MODIFIED FOR MMF RECOVERY.
07332 M00S06310.msm +++|
07333 M00S06311.msm +++| QUAL RMS
07334 M00S06312.msm +++| LRMS BSS 0
07335 M00S06313.msm +++| LRMS HERE
07336 M01S00179.283l840 +++| ERRZR LRMS-* TABLE EMPTY - REMOVE PRESET CODE
07337 M00S06314.msm +++| CON 0 TERMINATE LIST
07338 M00S06315.msm +++|
07339 M00S06316.msm +++| QUAL
07340 M00S06317.msm +++| SPACE 4,10
| Line S06318 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07341 M01S06318.272l774 ---| OVERFLOW O4DB CHECK FOR OVERFLOW
07342 M01S06319.272l774 ---| TTL MSM/4DC - VALIDATE PF SYSTEM.
| Line S00065 Modification History |
M01 (Added by) | 272l774 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07343 M02S00065.283l840 ---| OVERFLOW O4DB,EPFW CHECK FOR OVERFLOW
| Line S00180 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07344 M01S00180.283l840 +++| OVERFLOW ORDB,EPFW CHECK FOR OVERFLOW
| Line S00066 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07345 M01S00066.272l774 +++| TTL MSM/4DC - VALIDATE PF SYSTEM.
07346 M00S06320.msm +++| TITLE
| Line S06321 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07347 M01S06321.ns2552 ---| IDENT 4DC,RDCX
| Line S00021 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07348 M01S00021.ns2552 +++| IDENT 4DC,/RDC/RDCX
07349 M00S06322.msm +++|*COMMENT MSM - VALIDATE PF SYSTEM.
| Line S06323 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
07350 M01S06323.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1973.
| Line S00006 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
07351 M01S00006.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
07352 M00S06324.msm +++| SPACE 4
07353 M00S06325.msm +++|*** *VPF* VALIDATES THAT THE PERMANENT FILE SYSTEM
07354 M00S06326.msm +++|* CONTAINS NO DUPLICATE PACKNAMES, DEVICE NUMBERS OR USER
07355 M00S06327.msm +++|* MASKS WITHIN A FAMILY. THE MST TABLES FOR ALL ACTIVE
07356 M00S06328.msm +++|* DEVICES ARE VERIFIED TO BE UNIQUE.
07357 M00S06329.msm +++| SPACE 4
07358 M00S06330.msm +++|*** DAYFILE MESSAGES.
07359 M00S06331.msm +++|*
07360 M00S06332.msm +++|* *EQXXX EQYYY CONFLICTING DN.* = TWO EST ORDINALS HAVE THE
07361 M00S06333.msm +++|* SAME FAMILY NAME AND DEVICE NUMBER, AND ONE DEVICE IS A
07362 M00S06334.msm +++|* SYSTEM DEVICE. ACTION - REMOVE ONE OF THE DEVICES.
07363 M00S06335.msm +++|*
07364 M00S06336.msm +++|* *EQXXX EQYYY CONFLICTING PN.* = TWO AUXILIARY DEVICES HAVE
07365 M00S06337.msm +++|* THE SAME PACKNAME. ACTION - REMOVE ONE OF THE DEVICES.
07366 M00S06338.msm +++|*
07367 M00S06339.msm +++|* *EQXXX EQYYY CONFLICTING UM.* = TWO EST ORDINALS IN THE SAME
07368 M00S06340.msm +++|* FAMILY HAVE ONE OR MORE DUPLICATED BITS IN THE *DM* MASK, AND
07369 M00S06341.msm +++|* ONE DEVICE IS A SYSTEM DEVICE. ACTION - REMOVE ONE OF THE
07370 M00S06342.msm +++|* DEVICES.
07371 M00S06343.msm +++| SPACE 4
07372 M00S06344.msm +++|** ENTRY CONDITIONS.
07373 M00S06345.msm +++|*
07374 M00S06346.msm +++|* (RS) = RECOVERY STATUS.
| Line S06347 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07375 M01S06347.ns2552 ---|* (P1) = 0 IF *RMS* CALL.
07376 M01S06348.ns2552 ---| SPACE 4,10
07377 M01S06349.ns2552 ---|** EXIT CONDITIONS.
07378 M01S06350.ns2552 ---|*
07379 M01S06351.ns2552 ---|* (A) = 0 IF NO ERROR.
07380 M01S06352.ns2552 ---|* (A) .GT. 0 IF ERROR ON SYSTEM DEVICE.
07381 M01S06353.ns2552 ---|* (A) .LT. IF ERROR ENCOUNTERED.
07382 M01S06354.ns2552 ---| RDC SPACE 4,10
| Line S00022 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07383 M01S00022.ns2552 +++| TITLE MAIN ROUTINE.
07384 M01S00023.ns2552 +++| SPACE 4,10
07385 M01S00024.ns2552 +++| QUAL RDC
| Line S06355 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07386 M01S06355.283l840 ---| ORG OSOV
| Line S00181 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07387 M01S00181.283l840 +++| ORG ORDC
07388 M00S06356.msm +++|
07389 M00S06357.msm +++| RDC SUBR ENTRY/EXIT
| Line S06358 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07390 M01S06358.ns2552 ---| LDD RS
07391 M01S06359.ns2552 ---| ADD P1
07392 M01S06360.ns2552 ---| NJN RDCX IF NOT LEVEL 0 DEADSTART
07393 M01S06361.ns2552 ---| RJM SDF FETCH DEFAULT FAMILY NAME
07394 M01S06362.ns2552 ---| LDN 0 ENTER DEFAULT FAMILY IN FOT
07395 M01S06363.ns2552 ---| RJM GFO
07396 M01S06364.ns2552 ---| UJN RDCX RETURN
| Line S00025 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07397 M01S00025.ns2552 +++| LDD IR
07398 M01S00026.ns2552 +++| LMC 2RRM
07399 M01S00027.ns2552 +++| ZJN RDC3 IF *RMS* CALL
07400 M01S00028.ns2552 +++|
07401 M01S00029.ns2552 +++|* VERIFY RUNNING SYSTEM.
07402 M01S00030.ns2552 +++|
07403 M01S00031.ns2552 +++| RDC1 RJM VPF VERIFY PF SYSTEM
07404 M01S00032.ns2552 +++| ZJN RDCX IF NO ERRORS
07405 M01S00033.ns2552 +++| LDD EF
07406 M01S00034.ns2552 +++| NJN RDC1 IF EITHER DEVICE SET UNAVAILABLE
07407 M01S00035.ns2552 +++| LDD P1
07408 M01S00036.ns2552 +++| STD T5
07409 M01S00037.ns2552 +++| LDD EC SET ERROR STATUS ON FIRST DEVICE
07410 M01S00038.ns2552 +++| RJM SES
07411 M01S00039.ns2552 +++| LDD P2
07412 M01S00040.ns2552 +++| STD T5
07413 M01S00041.ns2552 +++| LDD EC SET ERROR STATUS FOR SECOND DEVICE
07414 M01S00042.ns2552 +++| RJM SES
07415 M01S00043.ns2552 +++| RDC2 UJP RDCX RETURN
07416 M01S00044.ns2552 +++|
07417 M01S00045.ns2552 +++|* VERIFY DEADSTART SYSTEM.
07418 M01S00046.ns2552 +++|
07419 M01S00047.ns2552 +++| RDC3 LDD RS
07420 M01S00048.ns2552 +++| NJN RDC4 IF RECOVERY DEADSTART
07421 M01S00049.ns2552 +++| RJM SDF SET DEFAULT FAMILY NAME
07422 M01S00050.ns2552 +++| LDN 0
07423 M01S00051.ns2552 +++| RJM GFO ENTER DEFAULT FAMILY IN FOT
07424 M01S00052.ns2552 +++| RDC4 LDD RC
07425 M01S00053.ns2552 +++| ZJN RDC6 IF NO EQUIPMENT RECOVERED
07426 M01S00054.ns2552 +++| RDC5 RJM VPF VERIFY PF SYSTEM FOR CONFLICTS
07427 M01S00055.ns2552 +++| ZJN RDC6 IF NO CONFLICTS
07428 M01S00056.ns2552 +++| MJN RDC5 IF ERROR ON NON-SYSTEM DEVICE
07429 M01S00057.ns2552 +++| LJM /RMS/HNG DISPLAY ERROR AND HANG
07430 M01S00058.ns2552 +++|
07431 M01S00059.ns2552 +++|* RESET DEFAULT FAMILY EQUIPMENT TO FAMILY MASTER EQUIPMENT.
07432 M01S00060.ns2552 +++|
07433 M01S00061.ns2552 +++| RDC6 RJM SDF SET DEFAULT FAMILY NAME
07434 M01S00062.ns2552 +++| RJM SFE SET FAMILY EQUIPMENT
07435 M01S00063.ns2552 +++| NJN RDC2 IF MASTER EQUIPMENT NOT FOUND
07436 M01S00064.ns2552 +++| LDD T2
07437 M01S00065.ns2552 +++| STD CN+3
07438 M01S00066.ns2552 +++| LDC PFNL SET FAMILY EST ORDINAL IN *PFNL*
07439 M01S00067.ns2552 +++| CWD CN
07440 M01S00068.ns2552 +++| UJN RDC2 RETURN
07441 M01S00069.ns2552 +++| TITLE PRIMARY SUBROUTINES.
07442 M00S06365.msm +++| SDF SPACE 4,10
07443 M00S06366.msm +++|** SDF - SET DEFAULT FAMILY NAME.
07444 M00S06367.msm +++|*
07445 M00S06368.msm +++|* EXIT (CN - CN+4) = *PFNL* WORD.
07446 M00S06369.msm +++|* (FN - FN+4) = *PFGL* WORD FROM DEFAULT FAMILY MST.
07447 M00S06370.msm +++|*
07448 M00S06371.msm +++|* USES CN - CN+4, FN - FN+4.
07449 M00S06372.msm +++|*
07450 M00S06373.msm +++|* MACROS SFA.
07451 M00S06374.msm +++|
07452 M00S06375.msm +++|
07453 M00S06376.msm +++| SDF SUBR ENTRY/EXIT
07454 M00S06377.msm +++| LDC PFNL
07455 M00S06378.msm +++| CRD CN
07456 M00S06379.msm +++| SFA EST,CN+3 READ FAMILY EST ENTRY
07457 M00S06380.msm +++| ADK EQDE
07458 M00S06381.msm +++| CRD FN
07459 M00S06382.msm +++| LDD FN+4 READ FAMILY NAME
07460 M00S06383.msm +++| SHN 3
07461 M00S06384.msm +++| ADN PFGL
07462 M00S06385.msm +++| CRD FN
07463 M00S06386.msm +++| UJN SDFX RETURN
| Line S06387 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07464 M01S06387.ns2552 ---| SPACE 4,10
07465 M01S06388.ns2552 ---|** COMMON DECKS.
07466 M01S06389.ns2552 ---|
07467 M01S06390.ns2552 ---|
07468 M01S06391.ns2552 ---|*CALL COMPSFE
07469 M01S06392.ns2552 ---| GFO$ EQU 0 DEFINE FOT ACCESS ROUTINE
07470 M01S06393.ns2552 ---|*CALL COMPUFT
07471 M01S06394.ns2552 ---| TITLE MAIN LOOP.
07472 M01S06395.ns2552 ---| QUAL 4DC
07473 M01S06396.ns2552 ---|** VPF - MAIN ROUTINE.
| Line S00070 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07474 M01S00070.ns2552 +++| VPF SPACE 4,10
07475 M01S00071.ns2552 +++|** VPF - VERIFY PF SYSTEM FOR CONFLICTS IN -
07476 M01S00072.ns2552 +++|* DEVICE NUMBERS.
07477 M01S00073.ns2552 +++|* DEVICE MASKS.
07478 M01S00074.ns2552 +++|* PACKNAMES.
07479 M01S00075.ns2552 +++|*
07480 M01S00076.ns2552 +++|* USES EF, EQ, T2, T5, T7, CM - CM+4, FN - FN+7, FS - FS+4.
07481 M01S00077.ns2552 +++|*
07482 M01S00078.ns2552 +++|* CALLS CFN, CFR, ERR, GNE, LRA.
07483 M01S00079.ns2552 +++|*
07484 M01S00080.ns2552 +++|* MACROS SFA.
07485 M00S06397.msm +++|
07486 M00S06398.msm +++|
07487 M00S06399.msm +++| VPF SUBR ENTRY/EXIT
07488 M00S06400.msm +++| LDN 0 CLEAR FAMILY COUNT
07489 M00S06401.msm +++| STD EF
07490 M00S06402.msm +++| LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH
07491 M00S06403.msm +++| STD EQ
07492 M00S06404.msm +++| VPF1 AOD EQ READ EST ENTRY
07493 M00S06405.msm +++| STD T5
07494 M00S06406.msm +++| LMD LO
07495 M00S06407.msm +++| ZJN VPFX IF END OF EST
07496 M00S06408.msm +++| RJM LRA LOAD REFERENCE ADDRESS
07497 M00S06409.msm +++| ADD EQ
07498 M00S06410.msm +++| CRD RD
07499 M00S06411.msm +++| SFA EST,EQ GET EST ENTRY
07500 M00S06412.msm +++| ADK EQDE
07501 M00S06413.msm +++| CRD FN
07502 M00S06414.msm +++| LDD RE
07503 M00S06415.msm +++| ZJN VPF1 IF DEVICE NOT BEING RECOVERED
07504 M00S06416.msm +++| LPC 300
07505 M00S06417.msm +++| LMD HN
07506 M00S06418.msm +++| ZJN VPF1 IF UNAVAILABLE DEVICE
07507 M00S06419.msm +++| LDD FN+4
07508 M00S06420.msm +++| SHN 3
07509 M00S06421.msm +++| ADN PFGL READ FAMILY/PACK NAME
07510 M00S06422.msm +++| CRD FN
07511 M00S06423.msm +++| ADN STLL-PFGL GET DEVICE STATUS
07512 M00S06424.msm +++| CRD T7
07513 M00S06425.msm +++| SBN STLL-PUGL READ DEVICE MASK
07514 M00S06426.msm +++| CRD CM
07515 M00S06427.msm +++| ADN MDGL-PUGL CHECK AUXILIARY STATUS
07516 M00S06428.msm +++| CRD FS
07517 M00S06429.msm +++| LDD T7 CHECK DEVICE STATUS
07518 M00S06430.msm +++| LPC MLIAL+MLIHD+MLIFD+MLUNL
07519 M00S06431.msm +++| NJN VPF1 IF UNLOAD/INITIALIZE PENDING
07520 M00S06432.msm +++| LDD FS
07521 M00S06433.msm +++| SHN -12
07522 M00S06434.msm +++| LPN 1
07523 M00S06435.msm +++| STD T2
07524 M00S06436.msm +++| VPF2 RJM GNE GET NEXT ENTRY
07525 M00S06437.msm +++| ZJN VPF7 IF NOT FOUND
07526 M00S06438.msm +++| RJM CFN COMPARE DEVICE NAMES
07527 M00S06439.msm +++| NJN VPF2 IF NOT SAME FAMILY
07528 M00S06440.msm +++| LDD T2
07529 M00S06441.msm +++| LMN 1
07530 M00S06442.msm +++| ZJN VPF3 IF AUXILIARY DEVICE
07531 M00S06443.msm +++| LDD T7
07532 M00S06444.msm +++| LMN 1
07533 M00S06445.msm +++| ZJN VPF3 IF NEW DEVICE IS AN AUXILIARY DEVICE
07534 M00S06446.msm +++|
07535 M00S06447.msm +++|* CHECK DEVICE NUMBERS.
07536 M00S06448.msm +++|
07537 M00S06449.msm +++| LDD FS+3
07538 M00S06450.msm +++| LMD FN+3
07539 M00S06451.msm +++| ZJN VPF4 IF SAME DEVICE NUMBERS
07540 M00S06452.msm +++|
07541 M00S06453.msm +++|* CHECK USER MASKS.
07542 M00S06454.msm +++|
07543 M00S06455.msm +++| LDD CN+4
07544 M00S06456.msm +++| STM VPFA
07545 M00S06457.msm +++| LDD CM+4
07546 M00S06458.msm +++| LPC *
07547 M00S06459.msm +++| VPFA EQU *-1
07548 M00S06460.msm +++| LPC 377
07549 M00S06461.msm +++| ZJN VPF2 IF NOT DUPLICATE MASKS
07550 M00S06462.msm +++| LDN STUM-STPN SET USER MASK ERROR
07551 M00S06463.msm +++| VPF3 ADN STPN-STDN SET PACKNAME ERROR
07552 M00S06464.msm +++| VPF4 ADN STDN SET DEVICE NUMBER ERROR
07553 M00S06465.msm +++| LJM ERR
07554 M00S06466.msm +++|
07555 M00S06467.msm +++| VPF7 LDD T2
07556 M00S06468.msm +++| NJN VPF8 IF AUXILIARY DEVICE
07557 M00S06469.msm +++| RJM CFR CHECK FAMILY DEVICE RECOVERED
07558 M00S06470.msm +++| VPF8 LJM VPF1 LOOP FOR NEXT EQUIPMENT
07559 M00S06471.msm +++| TITLE SUBROUTINES.
07560 M00S06472.msm +++| CFN SPACE 4
07561 M00S06473.msm +++|** CFN - COMPARE FAMILY/PACK NAMES.
07562 M00S06474.msm +++|*
07563 M00S06475.msm +++|* ENTRY (FN - FN+4) = FAMILY/PACK NAME1.
07564 M00S06476.msm +++|* (FS - FS+4) = FAMILY/PACK NAME2.
07565 M00S06477.msm +++|*
07566 M00S06478.msm +++|* EXIT (A) = 0 IF NAMES EQUAL.
07567 M00S06479.msm +++|
07568 M00S06480.msm +++|
07569 M00S06481.msm +++| CFN SUBR ENTRY/EXIT
07570 M00S06482.msm +++| LDD FN
07571 M00S06483.msm +++| LMD FS
07572 M00S06484.msm +++| NJN CFNX IF NOT EQUAL
07573 M00S06485.msm +++| LDD FN+1
07574 M00S06486.msm +++| LMD FS+1
07575 M00S06487.msm +++| NJN CFNX IF NOT EQUAL
07576 M00S06488.msm +++| LDD FN+2
07577 M00S06489.msm +++| LMD FS+2
07578 M00S06490.msm +++| NJN CFNX IF NOT EQUAL
07579 M00S06491.msm +++| LDD FN+3
07580 M00S06492.msm +++| LMD FS+3
07581 M00S06493.msm +++| SCN 77
07582 M00S06494.msm +++| UJN CFNX EXIT
07583 M00S06495.msm +++| CFR SPACE 4,10
07584 M00S06496.msm +++|** CFR - CHECK FAMILY DEVICE RECOVERED.
07585 M00S06497.msm +++|*
07586 M00S06498.msm +++|* ENTRY (EQ) = EST ORDINAL.
07587 M00S06499.msm +++|*
07588 M00S06500.msm +++|* ERROR TO *ERR* IF FOT FULL.
| Line S06501 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07589 M01S06501.ns2552 ---|* TO */CMS/VPFX* IF ERROR FLAG SET.
| Line S00081 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07590 M01S00081.ns2552 +++|* TO *RDCX* IF ERROR FLAG SET.
07591 M00S06502.msm +++|
07592 M00S06503.msm +++|
07593 M00S06504.msm +++| CFR SUBR ENTRY/EXIT
07594 M00S06505.msm +++| LDD RS
07595 M00S06506.msm +++| NJN CFRX IF RECOVERY DEADSTART
07596 M00S06507.msm +++| LDD RE
07597 M00S06508.msm +++| SHN 21-7
07598 M00S06509.msm +++| PJN CFRX IF DEVICE NOT RECOVERED
07599 M00S06510.msm +++| LDN 0 SEARCH FOR/CREATE FOT ENTRY
07600 M00S06511.msm +++| RJM GFO
07601 M00S06512.msm +++| SCN 1
07602 M00S06513.msm +++| ZJN CFRX IF ENTRY FOUND/CREATED
07603 M00S06514.msm +++| LPC 400000
07604 M00S06515.msm +++| LMN STFF
07605 M00S06516.msm +++| PJN ERR IF FOT FULL
| Line S06517 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07606 M01S06517.ns2552 ---| LJM /CMS/VPFX EXIT
| Line S00082 Modification History |
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07607 M01S00082.ns2552 +++| LJM RDCX EXIT
07608 M00S06518.msm +++| ERR SPACE 4
07609 M00S06519.msm +++|** ERR - PROCESS ERROR CONDITIONS.
07610 M00S06520.msm +++|*
07611 M00S06521.msm +++|* ENTRY (A) = ERROR STATUS.
07612 M00S06522.msm +++|* (EQ) = EST ORDINAL OF FIRST DEVICE.
07613 M00S06523.msm +++|* (T5) = EST ORDINAL OF SECOND DEVICE.
07614 M00S06524.msm +++|*
07615 M00S06525.msm +++|* USES FN - FN+4, P1, P2, T1, T5, EC, EQ.
07616 M00S06526.msm +++|*
07617 M00S06527.msm +++|* CALLS C2D, IES, LRA.
07618 M00S06528.msm +++|*
07619 M00S06529.msm +++|* MACROS SFA.
07620 M00S06530.msm +++|
07621 M00S06531.msm +++|
07622 M00S06532.msm +++| ERR STD EC SAVE ERROR CODE
07623 M00S06533.msm +++| LDD T5 SAVE EST ORDINAL OF SECOND DEVICE
07624 M00S06534.msm +++| STD P2
07625 M00S06535.msm +++| LDD EQ SAVE EST ORDINAL OF FIRST DEVICE
07626 M00S06536.msm +++| STD P1
07627 M00S06537.msm +++| STD T5 PROCESS FIRST EST ORDINAL
07628 M00S06538.msm +++| RJM LRA LOAD REFERENCE ADDRESS
07629 M00S06539.msm +++| ADD EQ
07630 M00S06540.msm +++| CRD RD
07631 M00S06541.msm +++| SFA EST,T5
07632 M00S06542.msm +++| ADK EQDE
07633 M00S06543.msm +++| CRD FN
07634 M00S06544.msm +++| LDD RE
07635 M00S06545.msm +++| SHN -6
07636 M00S06546.msm +++| LPN 62
07637 M00S06547.msm +++| LMN 62
07638 M00S06548.msm +++| ZJN ERR3 IF RECOVERED SYSTEM DEVICE
07639 M00S06549.msm +++| SCN 20
07640 M00S06550.msm +++| NJN ERR1 IF EQUIPMENT NOT RECOVERED
07641 M00S06551.msm +++| AOD EF FLAG *IES* CALL
07642 M00S06552.msm +++| RJM IES INITIALIZE EQUIPMENT STATUS
07643 M00S06553.msm +++| ERR1 LDD P2 PROCESS SECOND EQUIPMENT
07644 M00S06554.msm +++| STD EQ
07645 M00S06555.msm +++| STD T5
07646 M00S06556.msm +++| RJM LRA LOAD REFERENCE ADDRESS
07647 M00S06557.msm +++| ADD EQ
07648 M00S06558.msm +++| CRD RD
07649 M00S06559.msm +++| SFA EST,T5 READ EST ENTRY
07650 M00S06560.msm +++| ADK EQDE
07651 M00S06561.msm +++| CRD FN
07652 M00S06562.msm +++| LDD RE
07653 M00S06563.msm +++| SHN -6
07654 M00S06564.msm +++| LPN 62
07655 M00S06565.msm +++| LMN 62
07656 M00S06566.msm +++| ZJN ERR3 IF RECOVERED SYSTEM DEVICE
07657 M00S06567.msm +++| SCN 20
07658 M00S06568.msm +++| NJN ERR2 IF EQUIPMENT NOT RECOVERED
07659 M00S06569.msm +++| AOD EF FLAG *IES* CALL
07660 M00S06570.msm +++| RJM IES INITIALIZE EQUIPMENT STATUS
07661 M00S06571.msm +++| ERR2 LCN 0 SET NON SYSTEM DEVICE ERROR
07662 M00S06572.msm +++| LJM VPFX
07663 M00S06573.msm +++|
07664 M00S06574.msm +++|* PROCESS ERROR ON SYSTEM DEVICE.
07665 M00S06575.msm +++|
07666 M00S06576.msm +++| ERR3 SFA EST,P1
07667 M00S06577.msm +++| ADK EQDE
07668 M00S06578.msm +++| CRD FN
07669 M00S06579.msm +++| LDD FN+3 SET DEVICE TYPE
07670 M00S06580.msm +++| STM ERRA
07671 M00S06581.msm +++| LDD P1 CONVERT UPPER TWO DIGITS OF FIRST DEVICE
07672 M00S06582.msm +++| SHN -3
07673 M00S06583.msm +++| RJM C2D
07674 M00S06584.msm +++| STM ERRA+1
07675 M00S06585.msm +++| LDD P1 CONVERT LOWER DIGIT OF FIRST DEVICE
07676 M00S06586.msm +++| LPN 7
07677 M00S06587.msm +++| SHN 6
07678 M00S06588.msm +++| ADC 2R0
07679 M00S06589.msm +++| STM ERRA+2
07680 M00S06590.msm +++| SFA EST,P2
07681 M00S06591.msm +++| ADK EQDE
07682 M00S06592.msm +++| CRD FN
07683 M00S06593.msm +++| LDD FN+3 SET DEVICE TYPE
07684 M00S06594.msm +++| STM ERRA+3
07685 M00S06595.msm +++| LDD P2 CONVERT UPPER TWO DIGITS OF SECOND DEVICE
07686 M00S06596.msm +++| SHN -3
07687 M00S06597.msm +++| RJM C2D
07688 M00S06598.msm +++| STM ERRA+4
07689 M00S06599.msm +++| LDD P2 CONVERT LOWER DIGIT OF SECOND DEVICE
07690 M00S06600.msm +++| LPN 7
07691 M00S06601.msm +++| SHN 6
07692 M00S06602.msm +++| ADC 2R0
07693 M00S06603.msm +++| STM ERRA+5
07694 M00S06604.msm +++| LDD EC SET PROPER ERROR
07695 M00S06605.msm +++| SBN STFF
07696 M00S06606.msm +++| ZJN ERR4 IF FOT FULL
07697 M00S06607.msm +++| ADN STFF-STDN
07698 M00S06608.msm +++| STD T1
07699 M00S06609.msm +++| LDM ERRC,T1
07700 M00S06610.msm +++| STM ERRB
07701 M00S06611.msm +++| LCN ERRD-ERRA
07702 M00S06612.msm +++| ERR4 ADC ERRD
07703 M00S06613.msm +++| LJM VPFX
07704 M00S06614.msm +++|
07705 M00S06615.msm +++|
07706 M00S06616.msm +++| ERRA DATA H*EQXXX EQYYY CONFLICTING *
07707 M00S06617.msm +++| ERRB DATA C*ET. *
07708 M00S06618.msm +++| ERRC VFD 12/0LDN
07709 M00S06619.msm +++| VFD 12/0LPN
07710 M00S06620.msm +++| VFD 12/0LUM
07711 M00S06621.msm +++| ERRD DATA C*FOT FULL.*
07712 M00S06622.msm +++| GNE SPACE 4
07713 M00S06623.msm +++|** GNE - GET NEXT ENTRY.
07714 M00S06624.msm +++|*
07715 M00S06625.msm +++|* ENTRY (T5) = ADDRESS OF LAST ENTRY CHECKED.
07716 M00S06626.msm +++|*
07717 M00S06627.msm +++|* EXIT (FS - FS+4) = PF DESCRIPTION WORD.
07718 M00S06628.msm +++|* (CN+4) = DEVICE MASK.
07719 M00S06629.msm +++|* (A) = 0 IF ENTRY NOT FOUND.
07720 M00S06630.msm +++|* (T7) = 1, IF AUXILIARY DEVICE.
07721 M00S06631.msm +++|*
07722 M00S06632.msm +++|* USES T1, T5, T7, CM - CM+3, FS - FS+4.
07723 M00S06633.msm +++|*
07724 M00S06634.msm +++|* CALLS LRA.
07725 M00S06635.msm +++|
07726 M00S06636.msm +++|
07727 M00S06637.msm +++| GNE SUBR ENTRY/EXIT
07728 M00S06638.msm +++| GNE1 AOD T5
07729 M00S06639.msm +++| LMD LO
07730 M00S06640.msm +++| ZJN GNEX IF END OF MASS STORAGE DEVICES
07731 M00S06641.msm +++| RJM LRA LOAD REFERENCE ADDRESS
07732 M00S06642.msm +++| ADD T5
07733 M00S06643.msm +++| CRD T7
07734 M00S06644.msm +++| SFA EST,T5 READ NEXT EST ENTRY
07735 M00S06645.msm +++| ADK EQDE
07736 M00S06646.msm +++| CRD FS READ NEXT ENTRY
07737 M00S06647.msm +++|* LDD RE CHECK DEVICE CHARACTERISTICS
07738 M00S06648.msm +++| LDD CM+2
07739 M00S06649.msm +++| SHN 21-13
07740 M00S06650.msm +++| PJN GNE1 IF NOT MASS STORAGE
07741 M00S06651.msm +++| SHN 21-6-21+13
07742 M00S06652.msm +++| PJN GNE2 IF AVAILABLE
07743 M00S06653.msm +++| SHN 21-7-21+6+22
07744 M00S06654.msm +++| PJN GNE1 IF DEVICE NOT BEING RECOVERED
07745 M00S06655.msm +++| GNE2 LDD FS+4 READ MST
07746 M00S06656.msm +++| STD T1 SAVE MST ADDRESS
07747 M00S06657.msm +++| SHN 3
07748 M00S06658.msm +++| ADN MDGL
07749 M00S06659.msm +++| CRD FS
07750 M00S06660.msm +++| ADN STLL-MDGL GET DEVICE STATUS
07751 M00S06661.msm +++| CRD T7
07752 M00S06662.msm +++| LDD T7 CHECK INITIALIZE REQUESTED
07753 M00S06663.msm +++| LPC MLIAL+MLIHD+MLIFD
07754 M00S06664.msm +++| NJN GNE1 IF FULL INITIALIZE PENDING
07755 M00S06665.msm +++| LDD FS
07756 M00S06666.msm +++| SHN -12
07757 M00S06667.msm +++| LPN 1
07758 M00S06668.msm +++| STD T7
07759 M00S06669.msm +++| LDD T1 GET FAMILY NAME
07760 M00S06670.msm +++| SHN 3
07761 M00S06671.msm +++| ADN PFGL
07762 M00S06672.msm +++| CRD FS
07763 M00S06673.msm +++| ADN PUGL-PFGL READ DEVICE MASK
07764 M00S06674.msm +++| CRD CN
07765 M00S06675.msm +++| LJM GNEX RETURN
07766 M00S06676.msm +++| SPACE 4,10
07767 M00S06677.msm +++|** COMMON DECKS.
07768 M00S06678.msm +++|
07769 M00S06679.msm +++|
07770 M00S06680.msm +++|*CALL COMPSFE
07771 M01S00083.ns2552 +++| GFO$ EQU 0 DEFINE FOT ACCESS ROUTINE
07772 M01S00084.ns2552 +++|*CALL COMPUFT
| Line S06681 Modification History |
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07773 M01S06681.272l774 ---| SPACE 4
07774 M01S06682.272l774 ---| OVERFLOW OSOV CHECK FOR OVERFLOW
| Line S00067 Modification History |
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act
----------------------------+
07775 M01S00067.272l774 +++| SPACE 4,10
| Line S00068 Modification History |
M01 (Added by) | 272l774 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07776 M02S00068.283l840 ---| OVERFLOW OSOV,EPFW CHECK FOR OVERFLOW
| Line S00182 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07777 M01S00182.283l840 +++| OVERFLOW ORDC,EPFW CHECK FOR OVERFLOW
| Line S06683 Modification History |
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act
----------------------------+
07778 M01S06683.ns2552 ---|
07779 M01S06684.ns2552 ---| QUAL
07780 M01S06685.ns2552 ---|
07781 M01S06686.ns2552 ---| VMS EQU /4DC/VPF
07782 M00S06687.msm ---| TTL MSM/4DD - DEVICE VERIFICATION ROUTINES.
07783 M00S06688.msm ---| TITLE
07784 M00S06689.msm ---| IDENT 4DD,/RDD/RDDX
07785 M00S06690.msm ---|*COMMENT MSM - DEVICE VERIFICATION ROUTINES.
| Line S06691 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
07786 M01S06691.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1981.
| Line S00007 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
07787 M01S00007.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
07788 M00S06692.msm +++|
07789 M00S06693.msm +++|
07790 M00S06694.msm +++|*** *4DD* CONTAINS LABEL VERIFICATION ROUTINES.
07791 M00S06695.msm +++|
07792 M00S06696.msm +++|
07793 M00S06697.msm +++| QUAL RDD
| Line S06698 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07794 M01S06698.283l840 ---| ORG OSOV
| Line S00183 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07795 M01S00183.283l840 +++| ORG ORDD
07796 M00S06699.msm +++|
07797 M00S06700.msm +++| RDD SUBR ENTRY/EXIT
07798 M00S06701.msm +++| LJM POV PROCESS OVERLAY PRESET
| Line S06702 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07799 M01S06702.283l840 ---| CTD TITLE COPY MST/TRT TO DISK.
07800 M01S06703.283l840 ---| CTD SPACE 4,10
07801 M01S06704.283l840 ---|** CTD - COPY TABLES TO DISK.
07802 M01S06705.283l840 ---|*
07803 M01S06706.283l840 ---|* ENTRY (FN - FN+4) = EST ENTRY.
| Line S06707 Modification History |
M01 (Removed by) | ns2547 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07804 M02S06707.283l840 ---|* (A) = 0 TO ENSURE REWRITE OF RECOVERY TABLES
07805 M02S06708.283l840 ---|* UPON RETURN TO *MRL*.
| Line S00267 Modification History |
M01 (Added by) | ns2547 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07806 M02S00267.283l840 ---|*
07807 M02S00268.283l840 ---|* EXIT (A) .GE. 0.
| Line S06709 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07808 M01S06709.283l840 ---|*
07809 M01S06710.283l840 ---|* USES P1, T3, T6, T7, CM - CM+4, CN - CN+4.
07810 M01S06711.283l840 ---|*
07811 M01S06712.283l840 ---|* CALLS CLC, PTA, RDS, STA, WDS.
07812 M01S06713.283l840 ---|*
07813 M01S06714.283l840 ---|* MACROS CMSTF, ENDMS, MONITOR, SETMS.
07814 M01S06715.283l840 ---|
07815 M01S06716.283l840 ---|
07816 M01S06717.283l840 ---| CTD5 LDD RE CHECK ACCESS STATUS
07817 M01S06718.283l840 ---| LPC 1002
07818 M01S06719.283l840 ---| LMC 1002
07819 M01S06720.283l840 ---| CTD6 NJN CTDX IF NOT SHARED DEVICE ACCESSED PREVIOUSLY
07820 M01S06721.283l840 ---| LDD T5
07821 M01S06722.283l840 ---| STD CM+1
| Line S06723 Modification History |
M01 (Removed by) | ns2547 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07822 M02S06723.283l840 ---| LDN UTRS GET CURRENT COPY OF TRT
| Line S00269 Modification History |
M01 (Added by) | ns2547 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07823 M02S00269.283l840 ---| LDN UITS GET CURRENT COPY OF TRT / UPDATE MRT
| Line S06724 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07824 M01S06724.283l840 ---| STD CM+3
07825 M01S06725.283l840 ---| MONITOR STBM
07826 M01S06726.283l840 ---|
07827 M01S06727.283l840 ---| CTD SUBR ENTRY/EXIT
07828 M01S06728.283l840 ---| RJM PTA PRESET FWA OF TRT
07829 M01S06729.283l840 ---| CMSTF LPTU ENABLE TRT UPDATE BY *1RU*
07830 M01S06730.283l840 ---|* LDN 0
07831 M01S06731.283l840 ---| STD T7
07832 M01S06732.283l840 ---| LDD FN
07833 M01S06733.283l840 ---| SHN 21-4
07834 M01S06734.283l840 ---| PJN CTD5 IF NOT INDEPENDENT SHARED DEVICE
07835 M01S06735.283l840 ---| LDD FN+4
07836 M01S06736.283l840 ---| SHN 3
07837 M01S06737.283l840 ---| ADN ALGL FETCH ALLOCATION WORD FROM MST
07838 M01S06738.283l840 ---| CRD CM
07839 M01S06739.283l840 ---| LDD CM+1 SET LABEL TRACK
07840 M01S06740.283l840 ---| STD T6
07841 M01S06741.283l840 ---| SETMS IO,(DE,DF)
07842 M01S06742.283l840 ---| LDC BFMS REREAD LABEL SECTOR
07843 M01S06743.283l840 ---| RJM RDS
07844 M01S06744.283l840 ---| LDD RE
07845 M01S06745.283l840 ---| SHN 21-1
07846 M01S06746.283l840 ---| MJN CTD1 IF ACCESSED PREVIOUSLY BY OTHER MF
07847 M01S06747.283l840 ---| LDM N4SS+5*SDGL+4
07848 M01S06748.283l840 ---| LPN 77 SAVE DIT INDEX
07849 M01S06749.283l840 ---| STD P1
07850 M01S06750.283l840 ---| LDN MSTL SET CHECKPOINTED MST LENGTH
07851 M01S06751.283l840 ---| STD T3
07852 M01S06752.283l840 ---| LDD FN+4 SET MST ADDRESS
07853 M01S06753.283l840 ---| SHN 3
07854 M01S06754.283l840 ---| ADK TDGL GET TRT LENGTH
07855 M01S06755.283l840 ---| CRD CN
07856 M01S06756.283l840 ---| SBK TDGL UPDATE MST IN LABEL SECTOR
07857 M01S06757.283l840 ---| CRM N4SS,T3
07858 M01S06758.283l840 ---| LDD P1 SET SOFTWARE RESERVE IN LABEL
07859 M01S06759.283l840 ---| LMD HN
07860 M01S06760.283l840 ---| STM N4SS+5*SDGL+4
07861 M01S06761.283l840 ---| LDD CN+2 SET MRT LENGTH
07862 M01S06762.283l840 ---| ADN 7
07863 M01S06763.283l840 ---| SHN -3 CALCULATE DIT OFFSET
07864 M01S06764.283l840 ---| RAD CN+2
07865 M01S06765.283l840 ---| UJN CTD2 GENERATE CHECKSUM
07866 M01S06766.283l840 ---|
07867 M01S06767.283l840 ---| CTD1 LDN 0 CLEAR MACHINE ID TO FORCE TRT UPDATE IN CM
07868 M01S06768.283l840 ---| STM N4SS+5*STLL+2
07869 M01S06769.283l840 ---| LDM N4SS+5*SDGL+4 CLEAR MST INTERLOCK
07870 M01S06770.283l840 ---| SCN 77
07871 M01S06771.283l840 ---| STM N4SS+5*SDGL+4
07872 M01S06772.283l840 ---| CTD2 RJM CLC COMPUTE LABEL CHECKSUM
07873 M01S06773.283l840 ---| STM CKSS
07874 M01S06774.283l840 ---| LDC BFMS+WLSF
07875 M01S06775.283l840 ---| RJM WDS
07876 M01S06776.283l840 ---| ENDMS RELEASE HARDWARE RESERVE
07877 M01S06777.283l840 ---| LDD RE
07878 M01S06778.283l840 ---| LPN 2
07879 M01S06779.283l840 ---| NJN CTD3 IF DEVICE ACCESSED PREVIOUSLY
07880 M01S06780.283l840 ---| AOM N4SS+5*SDGL+4
07881 M01S06781.283l840 ---| LDD FN+4 SET MST ADDRESS
07882 M01S06782.283l840 ---| SHN 3
07883 M01S06783.283l840 ---| ADN SDGL STORE DEVICE INTERLOCK IN CM
07884 M01S06784.283l840 ---| CWM N4SS+5*SDGL,ON
07885 M01S06785.283l840 ---| RJM STA STORE DIT IN CM
07886 M01S06786.283l840 ---| ADD CN+2
07887 M01S06787.283l840 ---| ERRNZ MISD-MSTL CODE DEPENDS ON VALUE
07888 M01S06788.283l840 ---| CWM DISS,T3
07889 M01S06789.283l840 ---| LDD T5
07890 M01S06790.283l840 ---| STD CM+1 SET EST ORDINAL
07891 M01S06791.283l840 ---| LDN CDIS
07892 M01S06792.283l840 ---| STD CM+3 UPDATE TABLES ON DISK
07893 M01S06793.283l840 ---| MONITOR STBM
07894 M01S06794.283l840 ---|* LDN 0 SET IMMEDIATE RETURN
07895 M01S06795.283l840 ---| CTD3 LMN 2
07896 M01S06796.283l840 ---| LJM CTD6 RETURN
07897 M01S06797.283l840 ---| RMR SPACE 4,10
07898 M01S06798.283l840 ---|** RMR - READ MRT.
07899 M01S06799.283l840 ---|*
07900 M01S06800.283l840 ---|* ENTRY (T5) = (EQ) = EST ORDINAL.
07901 M01S06801.283l840 ---|* (FN - FN+4) = EST ENTRY.
07902 M01S06802.283l840 ---|*
07903 M01S06803.283l840 ---|* USES T5 - T7, CM - CM+4, CN - CN+4.
07904 M01S06804.283l840 ---|*
07905 M01S06805.283l840 ---|* CALLS PTA, RDS, STA.
07906 M01S06806.283l840 ---|*
07907 M01S06807.283l840 ---|* MACROS ENDMS, SETMS.
07908 M01S06808.283l840 ---|
07909 M01S06809.283l840 ---|
07910 M01S06810.283l840 ---| RMR SUBR ENTRY/EXIT
07911 M01S06811.283l840 ---| LDD FN
07912 M01S06812.283l840 ---| SHN 21-11
07913 M01S06813.283l840 ---| PJN RMRX IF DEVICE NOT SHARED
07914 M01S06814.283l840 ---| SHN 21-4-21+11
07915 M01S06815.283l840 ---| PJN RMR1 IF NOT ISD
07916 M01S06816.283l840 ---| LDD RS
07917 M01S06817.283l840 ---| LPN FLMK
| Line S06818 Modification History |
M01 (Removed by) | ns2552 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07918 M02S06818.283l840 ---| LMN FLCM
07919 M02S06819.283l840 ---| ZJN RMRX IF FILES RECOVERED FROM CM
| Line S00085 Modification History |
M01 (Added by) | ns2552 |
M02 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07920 M02S00085.283l840 ---| LMN FLTB
07921 M02S00086.283l840 ---| NJN RMRX IF FILES NOT RECOVERED FROM MS TABLES
| Line S06820 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07922 M01S06820.283l840 ---| LDD RA
07923 M01S06821.283l840 ---| SHN 6
07924 M01S06822.283l840 ---| ADD AL FETCH LABEL SECTOR
07925 M01S06823.283l840 ---| ADN DILL
07926 M01S06824.283l840 ---| CRD T7
07927 M01S06825.283l840 ---| LDD FN+4 GET LABEL TRACK
07928 M01S06826.283l840 ---| SHN 3
07929 M01S06827.283l840 ---| ADN ALGL
07930 M01S06828.283l840 ---| CRD CM
07931 M01S06829.283l840 ---| ADN DULL-ALGL GET MACHINE INDEX
07932 M01S06830.283l840 ---| CRD CN
07933 M01S06831.283l840 ---| LDD CM+1 SET LABEL TRACK
07934 M01S06832.283l840 ---| STD T6
07935 M01S06833.283l840 ---| LDD CN+2 SET MRT SECTOR
07936 M01S06834.283l840 ---| LPN 17
07937 M01S06835.283l840 ---| ADN MRTL
07938 M01S06836.283l840 ---| RAD T7
07939 M01S06837.283l840 ---| UJN RMR2 READ MRT
07940 M01S06838.283l840 ---|
07941 M01S06839.283l840 ---| RMR1 LDK MMFL GET LINK DEVICE EST ORDINAL
07942 M01S06840.283l840 ---| CRD CN
07943 M01S06841.283l840 ---| LDD CN+1
07944 M01S06842.283l840 ---| LPC 777
07945 M01S06843.283l840 ---| STD T5
07946 M01S06844.283l840 ---| LDD TS SET MST/TRT TRACK FOR DEVICE
07947 M01S06845.283l840 ---| STD T6
07948 M01S06846.283l840 ---| LDD CN+4 SET MRT SECTOR FOR THIS MACHINE
07949 M01S06847.283l840 ---| ADN MRST-1
07950 M01S06848.283l840 ---| STD T7
07951 M01S06849.283l840 ---| RMR2 SETMS IO,DF
07952 M01S06850.283l840 ---| LDC BFMS
07953 M01S06851.283l840 ---| RJM RDS
07954 M01S06852.283l840 ---| ENDMS
07955 M01S06853.283l840 ---| LDD EQ RESTORE (T5)
07956 M01S06854.283l840 ---| STD T5
07957 M01S06855.283l840 ---|
07958 M01S06856.283l840 ---|* COPY MRT TO CM AT THE END OF THE TRT.
07959 M01S06857.283l840 ---|
07960 M01S06858.283l840 ---| RJM PTA PRESET TRT ADDRESS
07961 M01S06859.283l840 ---| LDD FN+4 GET TRT LENGTH
07962 M01S06860.283l840 ---| SHN 3
07963 M01S06861.283l840 ---| ADK TDGL
07964 M01S06862.283l840 ---| CRD CM
07965 M01S06863.283l840 ---| LDD CM+2 SET MRT LENGTH
07966 M01S06864.283l840 ---| STD T0 SAVE TRT LENGTH
07967 M01S06865.283l840 ---| ADN 7
07968 M01S06866.283l840 ---| SHN -3
07969 M01S06867.283l840 ---| STD CM+2
07970 M01S06868.283l840 ---| RJM STA SET TRT FWA
07971 M01S06869.283l840 ---| ADD T0
07972 M01S06870.283l840 ---| CWM BFMS+2,CM+2 COPY MRT TO CM
07973 M01S06871.283l840 ---| LJM RMRX RETURN
07974 M01S06872.283l840 ---| SPACE 4,10
07975 M01S06873.283l840 ---| ORDG EQU *+5 LOAD ADDRESS FOR *4DG*
| Line S00184 Modification History |
M01 (Added by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
07976 M01S00184.283l840 +++| TITLE MMF ROUTINES.
07977 M01S00185.283l840 +++| ABD SPACE 4,15
07978 M01S00186.283l840 +++|** ABD - ALLOCATE BAT FOR DEVICE.
07979 M01S00187.283l840 +++|*
07980 M01S00188.283l840 +++|* ENTRY (FN - FN+4) = EST ENTRY.
07981 M01S00189.283l840 +++|* (BAEI+4) = NEXT AVAILABLE BAT TRACK.
07982 M01S00190.283l840 +++|*
07983 M01S00191.283l840 +++|* EXIT (A) = 0 IF BAT ALLOCATED, OR IF BAT NOT REQUIRED.
07984 M01S00192.283l840 +++|* (A) = MESSAGE ADDRESS, IF NO BAT TRACK AVAILABLE.
07985 M01S00193.283l840 +++|*
07986 M01S00194.283l840 +++|* USES T6, T7, CM - CM+4, CN - CN+4.
07987 M01S00195.283l840 +++|*
07988 M01S00196.283l840 +++|* CALLS CEA, SNT.
07989 M01S00197.283l840 +++|*
07990 M01S00198.283l840 +++|* MACROS MONITOR.
07991 M01S00199.283l840 +++|
07992 M01S00200.283l840 +++|
07993 M01S00201.283l840 +++| ABD1 LDC ABDA EXIT WITH (A) = MESSAGE ADDRESS
07994 M01S00202.283l840 +++|
07995 M01S00203.283l840 +++|
07996 M01S00204.283l840 +++| ABD SUBR ENTRY/EXIT
07997 M01S00205.283l840 +++| LDD FN
07998 M01S00206.283l840 +++| LPN 40
07999 M01S00207.283l840 +++| ZJN ABDX IF NOT SHARED BUFFERED DEVICE
08000 M01S00208.283l840 +++| LDM BAEI+4 NEXT AVAILABLE BAT TRACK
08001 M01S00209.283l840 +++| ZJN ABD1 IF NO TRACK AVAILABLE
08002 M01S00210.283l840 +++| STD T6
08003 M01S00211.283l840 +++| RJM SNT SET NEXT TRACK
08004 M01S00212.283l840 +++| STM BAEI+4
08005 M01S00213.283l840 +++|
08006 M01S00214.283l840 +++|* SET EXTENDED MEMORY ADDRESS OF BAT INTO DAT.
08007 M01S00215.283l840 +++|
08008 M01S00216.283l840 +++| LDN 0
08009 M01S00217.283l840 +++| STD T7
08010 M01S00218.283l840 +++| RJM CEA GET ADDRESS OF BAT TRACK
08011 M01S00219.283l840 +++| LDD CM+3 SET EXTENDED MEMORY ADDRESS OF BAT
08012 M01S00220.283l840 +++| STM DATB+5
08013 M01S00221.283l840 +++| LDD CM+4
08014 M01S00222.283l840 +++| STM DATB+6
08015 M01S00223.283l840 +++|
08016 M01S00224.283l840 +++|* CLEAR BAT.
08017 M01S00225.283l840 +++|
08018 M01S00226.283l840 +++| LDN ZERL
08019 M01S00227.283l840 +++| CRD CM
08020 M01S00228.283l840 +++| LDD T6 SET TRACK TO CLEAR
08021 M01S00229.283l840 +++| STD CM+4
08022 M01S00230.283l840 +++| LDN BATL/100 SET NUMBER OF SECTORS TO CLEAR
08023 M01S00231.283l840 +++| STD CM+3
08024 M01S00232.283l840 +++| LDN CEMS CLEAR EXTENDED MEMORY TRACK
08025 M01S00233.283l840 +++| STD CM+1
08026 M01S00234.283l840 +++| MONITOR MTEM
08027 M01S00235.283l840 +++| UJP ABDX RETURN
08028 M01S00236.283l840 +++|
08029 M01S00237.283l840 +++|
08030 M01S00238.283l840 +++| ABDA DATA C* END OF BAT TRACK CHAIN.*
08031 M01S00239.283l840 +++| CDE SPACE 4,15
08032 M01S00240.283l840 +++|** CDE - CHECK DAT ENTRY.
08033 M01S00241.283l840 +++|*
08034 M01S00242.283l840 +++|* ENTRY (DI) = DAT INDEX FROM MST.
08035 M01S00243.283l840 +++|* (QS) = INDEX INTO DEVICE ACCESS TABLE.
08036 M01S00244.283l840 +++|* (T2) = ADDRESS OF DATB+11.
08037 M01S00245.283l840 +++|* (FN - FN+4) = EST ENTRY.
08038 M01S00246.283l840 +++|* (DATB) = DAT ENTRY.
08039 M01S00247.283l840 +++|*
08040 M01S00248.283l840 +++|* EXIT (A) = 0 IF NO DAT CONFLICTS.
08041 M01S00249.283l840 +++|* (A) = ADDRESS OF ERROR MESSAGE, IF DAT CONFLICT.
08042 M01S00250.283l840 +++|* (T6) = 0, IF DAT ENTRY FOR NON-SHARED DEVICE.
08043 M01S00251.283l840 +++|* (T6) = EXTENDED MEMORY TRACK, IF SHARED DEVICE ENTRY.
08044 M01S00252.283l840 +++|*
08045 M01S00253.283l840 +++|* USES T6.
08046 M01S00254.283l840 +++|
08047 M01S00255.283l840 +++|
08048 M01S00256.283l840 +++| CDE2 LDI T2 CHECK MACHINE ACCESS BYTE
08049 M01S00257.283l840 +++| SHN 21-13
08050 M01S00258.283l840 +++| MJN CDE3 IF RECOVERY IN PROGRESS
08051 M01S00259.283l840 +++| LDD DI CHECK DAT INDEX
08052 M01S00260.283l840 +++| LMD QS
08053 M01S00261.283l840 +++| ZJN CDEX IF VALID INDEX
08054 M01S00262.283l840 +++| LMD QS
08055 M01S00263.283l840 +++| ZJN CDEX IF NO DAT INDEX IN MST
08056 M01S00264.283l840 +++| CDE3 LDC CSDC+3
08057 M01S00265.283l840 +++|
08058 M01S00266.283l840 +++| CDE SUBR ENTRY/EXIT
08059 M01S00267.283l840 +++| LDM DATB+4 SET ECS POINTER FOR SHARED DEVICE
08060 M01S00268.283l840 +++| STD T6
08061 M01S00269.283l840 +++| SHN 11-13
08062 M01S00270.283l840 +++| LMD FN MAP TRACK BIT WITH SHARE FLAG
08063 M01S00271.283l840 +++| SHN 21-11
08064 M01S00272.283l840 +++| PJN CDE2 IF COMPARE
08065 M01S00273.283l840 +++| LDD T6
08066 M01S00274.283l840 +++| ZJN CDE1 IF DAT ENTRY FOR NON-SHARED DEVICE
08067 M01S00275.283l840 +++| LDN CSDC-CSDB
08068 M01S00276.283l840 +++| CDE1 ADC CSDB SET ADDRESS OF ERROR MESSAGE
08069 M01S00277.283l840 +++| UJN CDEX RETURN
08070 M01S00278.283l840 +++| CSD SPACE 4,20
08071 M01S00279.283l840 +++|** CSD - CHECK SHARED DEVICE STATUS.
08072 M01S00280.283l840 +++|*
08073 M01S00281.283l840 +++|* ENTRY (EQ) = DEVICE EST ORDINAL.
08074 M01S00282.283l840 +++|* (RS) = RECOVERY STATUS.
08075 M01S00283.283l840 +++|* (CN - CN+4) = PF DESCRIPTOR WORD (PFGL).
08076 M01S00284.283l840 +++|* (FN - FN+4) = EST ENTRY.
08077 M01S00285.283l840 +++|*
08078 M01S00286.283l840 +++|* EXIT (A) = 0 IF NO DAT CONFLICT.
08079 M01S00287.283l840 +++|* (A) = ADDRESS OF ERROR MESSAGE, IF DAT CONFLICT.
08080 M01S00288.283l840 +++|* (T2) = 0 IF DEVICE NOT DESCRIBED IN DAT.
08081 M01S00289.283l840 +++|*
08082 M01S00290.283l840 +++|* USES QS, RE, T7, CM - CM+4.
08083 M01S00291.283l840 +++|*
08084 M01S00292.283l840 +++|* CALLS SDT, CDE, CEA.
08085 M01S00293.283l840 +++|*
08086 M01S00294.283l840 +++|* MACROS MONITOR.
08087 M01S00295.283l840 +++|
08088 M01S00296.283l840 +++|
08089 M01S00297.283l840 +++| CSD6 LDD MA MOVE ENTRY TO DAT BUFFER
08090 M01S00298.283l840 +++| CWD CN
08091 M01S00299.283l840 +++| CRM DATB,ON
08092 M01S00300.283l840 +++| LDD DI CHECK DAT INDEX
08093 M01S00301.283l840 +++| ZJN CSD7 IF NO DAT ENTRY FOR DEVICE
08094 M01S00302.283l840 +++| STD QS
08095 M01S00303.283l840 +++| UJN CSD8 DAT SLOT ASSIGNED
08096 M01S00304.283l840 +++|
08097 M01S00305.283l840 +++| CSD7 LDD FN
08098 M01S00306.283l840 +++| SHN 2-11
08099 M01S00307.283l840 +++| LPN 4 MAP SHARE FLAG AS ECS TRACK REQUIRED
08100 M01S00308.283l840 +++| RAD RE
08101 M01S00309.283l840 +++| CSD8 LDN 0 CLEAR MACHINE ACCESS BYTE
08102 M01S00310.283l840 +++| CSD9 STM DATB+11
08103 M01S00311.283l840 +++|
08104 M01S00312.283l840 +++| CSD SUBR ENTRY/EXIT
08105 M01S00313.283l840 +++| RJM SDT SEARCH DEVICE ACCESS TABLE
08106 M01S00314.283l840 +++| STD T2
08107 M01S00315.283l840 +++| ZJN CSD6 IF NO ENTRY FOR NAMED DEVICE
08108 M01S00316.283l840 +++| RJM CDE CHECK DAT ENTRY
08109 M01S00317.283l840 +++| NJN CSDX IF DAT CONFLICT/ERROR
08110 M01S00318.283l840 +++| STD T7
08111 M01S00319.283l840 +++| LDD T6
08112 M01S00320.283l840 +++| NJN CSD1 IF SHARED DEVICE
08113 M01S00321.283l840 +++| LDI T2
08114 M01S00322.283l840 +++| LPC -0
08115 M01S00323.283l840 +++| MMTE *-1
08116 M01S00324.283l840 +++| ZJN CSDX IF ACCESS BY THIS MACHINE ONLY
08117 M01S00325.283l840 +++| LDC CSDB
08118 M01S00326.283l840 +++| UJN CSDX RETURN
08119 M01S00327.283l840 +++|
08120 M01S00328.283l840 +++| CSD1 LDI T2 CHECK MACHINES ACCESSING DEVICE
08121 M01S00329.283l840 +++| ZJN CSD9 IF NO MACHINE ACCESS
08122 M01S00330.283l840 +++| LPC -0
08123 M01S00331.283l840 +++| MMTE *-1
08124 M01S00332.283l840 +++| ADD RS
08125 M01S00333.283l840 +++| ZJN CSD9 IF ACCESS BY THIS MACHINE ONLY
08126 M01S00334.283l840 +++| SBD RS
08127 M01S00335.283l840 +++| LMI T2
08128 M01S00336.283l840 +++| ZJN CSD2 IF NOT ACCESSED BY THIS MACHINE
08129 M01S00337.283l840 +++| LDN 10
08130 M01S00338.283l840 +++| CSD2 ADN 2 FLAG TRT RECOVERY FROM EXTENDED MEMORY
08131 M01S00339.283l840 +++| RAD RE
08132 M01S00340.283l840 +++| RJM CEA CONVERT EXTENDED MEMORY ADDRESS
08133 M01S00341.283l840 +++| LDD AL SET CM TABLE ADDRESS
08134 M01S00342.283l840 +++| ADK TDGL
08135 M01S00343.283l840 +++| STD CM+2
08136 M01S00344.283l840 +++| LDC GLGL*100-100+40 SET WORD COUNT
08137 M01S00345.283l840 +++| STD CM+1
08138 M01S00346.283l840 +++| LDC RECS*1000 SUBFUNCTION = READ ECS
08139 M01S00347.283l840 +++| RAD CM+3
08140 M01S00348.283l840 +++| MONITOR ECSM ISSUE MONITOR REQUEST
08141 M01S00349.283l840 +++| LDD RA READ DRIVER WORD FROM GLOBAL MST
08142 M01S00350.283l840 +++| SHN 6
08143 M01S00351.283l840 +++| ADD AL
08144 M01S00352.283l840 +++| ADN MDGL
08145 M01S00353.283l840 +++| CRD CM
08146 M01S00354.283l840 +++| LDD DI
08147 M01S00355.283l840 +++| ZJN CSD3 IF DNAP BY THIS MACHINE
08148 M01S00356.283l840 +++| LMD QS
08149 M01S00357.283l840 +++| NJN CSD4 IF DAT CONFLICT
08150 M01S00358.283l840 +++| CSD3 LDD FN
08151 M01S00359.283l840 +++| SCN 77
08152 M01S00360.283l840 +++| SHN 14-10
08153 M01S00361.283l840 +++| LMD QS
08154 M01S00362.283l840 +++| SHN -1 COMPARE REMOVABLE STATUS + DAT INDEX
08155 M01S00363.283l840 +++| LMD CM
08156 M01S00364.283l840 +++| LPC 4377
08157 M01S00365.283l840 +++| ZJN CSD5 IF NO CONFLICT
08158 M01S00366.283l840 +++| CSD4 LDC CSDD
08159 M01S00367.283l840 +++| CSD5 LJM CSDX RETURN
08160 M01S00368.283l840 +++|
08161 M01S00369.283l840 +++| CSDB DATA 4HNON-
08162 M01S00370.283l840 +++| CSDC DATA C*SHARED DEVICE ACTIVE IN DAT.*
08163 M01S00371.283l840 +++|
08164 M01S00372.283l840 +++| CSDD DATA C*REMOVABLE DEVICE CONFLICT.*
08165 M01S00373.283l840 +++| EBP SPACE 4,10
08166 M01S00374.283l840 +++|** EBP - ENABLE BST/BAT PROCESSING FOR SHARED BUFFERED DEVICE.
08167 M01S00375.283l840 +++|*
08168 M01S00376.283l840 +++|* ENTRY (EQ) = EST ORDINAL.
08169 M01S00377.283l840 +++|* (FN - FN+4) = EST ENTRY.
08170 M01S00378.283l840 +++|*
08171 M01S00379.283l840 +++|* USES T5, T6, T7, CM - CM+4.
08172 M01S00380.283l840 +++|*
08173 M01S00381.283l840 +++|* MACROS MONITOR.
08174 M01S00382.283l840 +++|
08175 M01S00383.283l840 +++|
08176 M01S00384.283l840 +++| EBP SUBR ENTRY/EXIT
08177 M01S00385.283l840 +++| LDD FN
08178 M01S00386.283l840 +++| SHN 21-11
08179 M01S00387.283l840 +++| PJN EBPX IF NOT SHARED DEVICE
08180 M01S00388.283l840 +++| SHN 21-5-21+11
08181 M01S00389.283l840 +++| PJN EBPX IF NOT BUFFERED DEVICE
08182 M01S00390.283l840 +++|
08183 M01S00391.283l840 +++|* FLUSH WRITE BUFFERS / DROP ALL BUFFERS.
08184 M01S00392.283l840 +++|
08185 M01S00393.283l840 +++| EBP1 LDN ZERL CLEAR ASSEMBLY AREA
08186 M01S00394.283l840 +++| CRD CM
08187 M01S00395.283l840 +++| LDD EQ SET EST ORDINAL
08188 M01S00396.283l840 +++| STD CM+3
08189 M01S00397.283l840 +++| LDC BMFW*100 FLUSH ALL WRITE BUFFERS
08190 M01S00398.283l840 +++| STD CM+4
08191 M01S00399.283l840 +++| MONITOR BFMM
08192 M01S00400.283l840 +++| LDN ZERL CLEAR ASSEMBLY AREA
08193 M01S00401.283l840 +++| CRD CM
08194 M01S00402.283l840 +++| LDD EQ SET EST ORDINAL
08195 M01S00403.283l840 +++| STD CM+3
08196 M01S00404.283l840 +++| LDC BMDD*100 DROP ALL BUFFERS ON DEVICE
08197 M01S00405.283l840 +++| STD CM+4
08198 M01S00406.283l840 +++| MONITOR BFMM
08199 M01S00407.283l840 +++| LDD CM+4
08200 M01S00408.283l840 +++| ZJN EBP2 IF COMPLETE
08201 M01S00409.283l840 +++| DELAY 20B DELAY TWO MILLISECONDS
08202 M01S00410.283l840 +++| PAUSE
08203 M01S00411.283l840 +++| UJP EBP1 REISSUE REQUEST
08204 M01S00412.283l840 +++|
08205 M01S00413.283l840 +++|* CLEAR ACCESS PERMISSIONS IN *BAT*.
08206 M01S00414.283l840 +++|
08207 M01S00415.283l840 +++| EBP2 LDN ZERL
08208 M01S00416.283l840 +++|* UJN EBP3 (*CMS* CALL)
08209 M01S00417.283l840 +++| EBPA EQU *-1
08210 M01S00418.283l840 +++| CRD CM
08211 M01S00419.283l840 +++| EBPB LDN CBWS CLEAR READ/WRITE PERMISSIONS IN *BAT*
08212 M01S00420.283l840 +++|* LDN CBRS (LVL3 - CLEAR READ PERMISSIONS IN *BAT*)
08213 M01S00421.283l840 +++| STD CM+1
08214 M01S00422.283l840 +++| EBPC LDN ** SET MACHINE INDEX
08215 M01S00423.283l840 +++| STD CM+2
08216 M01S00424.283l840 +++| LDD EQ
08217 M01S00425.283l840 +++| STD CM+4
08218 M01S00426.283l840 +++| MONITOR MTEM
08219 M01S00427.283l840 +++|
08220 M01S00428.283l840 +++|* ENABLE BST/BAT PROCESSING.
08221 M01S00429.283l840 +++|
08222 M01S00430.283l840 +++| EBP3 LDD MA WRITE REQUEST
08223 M01S00431.283l840 +++| CWM EBPD,ON
08224 M01S00432.283l840 +++| LDD FN+4
08225 M01S00433.283l840 +++| SHN 3
08226 M01S00434.283l840 +++| STD CM+4 SET MST ADDRESS
08227 M01S00435.283l840 +++| SHN -14
08228 M01S00436.283l840 +++| STD CM+3
08229 M01S00437.283l840 +++| LDN 1 SET WORD COUNT
08230 M01S00438.283l840 +++| STD CM+1
08231 M01S00439.283l840 +++| MONITOR UTEM
08232 M01S00440.283l840 +++| UJP EBPX RETURN
08233 M01S00441.283l840 +++|
08234 M01S00442.283l840 +++|
08235 M01S00443.283l840 +++| EBPD VFD 6/BDLL,6/1,6/27,42/0
08236 M01S00444.283l840 +++| LDT SPACE 4,15
08237 M01S00445.283l840 +++|** LDT - LOAD DEVICE ACCESS TABLE.
08238 M01S00446.283l840 +++|*
08239 M01S00447.283l840 +++|* ENTRY (EL) = EXTENDED MEMORY LABEL TRACK.
08240 M01S00448.283l840 +++|*
08241 M01S00449.283l840 +++|* EXIT (QI) = CURRENT DAT INDEX.
08242 M01S00450.283l840 +++|* (QT) = LAST MST/TRT TRACK ASSIGNED.
08243 M01S00451.283l840 +++|* DEVICE ACCESS TABLE LOADED TO CM.
08244 M01S00452.283l840 +++|*
08245 M01S00453.283l840 +++|* USES CA+1, CM - CM+4, CN - CN+4, T2 - T7.
08246 M01S00454.283l840 +++|*
08247 M01S00455.283l840 +++|* CALLS CEA.
08248 M01S00456.283l840 +++|*
08249 M01S00457.283l840 +++|* MACROS MONITOR.
08250 M01S00458.283l840 +++|
08251 M01S00459.283l840 +++|
08252 M01S00460.283l840 +++| LDT1 LDD HN ADVANCE EXTENDED MEMORY ADDRESS
08253 M01S00461.283l840 +++| RAD CN+4
08254 M01S00462.283l840 +++| SHN -14
08255 M01S00463.283l840 +++| RAD CN+3
08256 M01S00464.283l840 +++| LDD HN ADVANCE CM ADDRESS
08257 M01S00465.283l840 +++| RAD CN+2
08258 M01S00466.283l840 +++| SHN -14
08259 M01S00467.283l840 +++| RAD CN+1
08260 M01S00468.283l840 +++| LDT2 LDD MA MOVE REQUEST
08261 M01S00469.283l840 +++| CWD CN
08262 M01S00470.283l840 +++| CRD CM
08263 M01S00471.283l840 +++| MONITOR ECSM ISSUE REQUEST
08264 M01S00472.283l840 +++| SOD T5 DECREMENT BLOCK COUNT
08265 M01S00473.283l840 +++| PJN LDT1 IF NOT END OF DAT
08266 M01S00474.283l840 +++|
08267 M01S00475.283l840 +++| LDT SUBR ENTRY/EXIT
08268 M01S00476.283l840 +++|
08269 M01S00477.283l840 +++|* RETRIEVE BAT POINTER WORD *BAET*, IF REQUIRED.
08270 M01S00478.283l840 +++|
08271 M01S00479.283l840 +++| LDM ECLT SET LABEL TRACK
08272 M01S00480.283l840 +++| STD T6
08273 M01S00481.283l840 +++| LDN ETLT SET ENVIRONMENT TABLE SECTOR
08274 M01S00482.283l840 +++| STD T7
08275 M01S00483.283l840 +++| LDTA RJM CEA GET ADDRESS OF ENVIRONMENT TABLE SECTOR
08276 M01S00484.283l840 +++|* UJN LDT0 (NO SHARED BUFFERED DEVICES CONFIGURED)
08277 M01S00485.283l840 +++| LDN BAET ADJUST ADDRESS TO BAT POINTER
08278 M01S00486.283l840 +++| RAD CM+4
08279 M01S00487.283l840 +++| SHN -14
08280 M01S00488.283l840 +++| LMC RECS*1000 SET SUBFUNCTION
08281 M01S00489.283l840 +++| RAD CM+3
08282 M01S00490.283l840 +++| LDD MA SET CM ADDRESS
08283 M01S00491.283l840 +++| STD CM+2
08284 M01S00492.283l840 +++| LDN 0
08285 M01S00493.283l840 +++| STD CM+1
08286 M01S00494.283l840 +++| MONITOR ECSM ISSUE REQUEST
08287 M01S00495.283l840 +++| LDD MA READ *BAET*
08288 M01S00496.283l840 +++| CRM BAEI,ON
08289 M01S00497.283l840 +++|
08290 M01S00498.283l840 +++|* RETRIEVE DAT POINTER WORD *DAET*.
08291 M01S00499.283l840 +++|
08292 M01S00500.283l840 +++| LDT0 RJM CEA GET ADDRESS OF ENVIRONMENT TABLE SECTOR
08293 M01S00501.283l840 +++| LDN DAET ADJUST ADDRESS TO DAT POINTER
08294 M01S00502.283l840 +++| RAD CM+4
08295 M01S00503.283l840 +++| SHN -14
08296 M01S00504.283l840 +++| LMC RECS*1000 SET SUBFUNCTION
08297 M01S00505.283l840 +++| RAD CM+3
08298 M01S00506.283l840 +++| LDD MA SET CM ADDRESS
08299 M01S00507.283l840 +++| STD CM+2
08300 M01S00508.283l840 +++| LDN 0
08301 M01S00509.283l840 +++| STD CM+1
08302 M01S00510.283l840 +++| MONITOR ECSM ISSUE REQUEST
08303 M01S00511.283l840 +++|* LDN 0
08304 M01S00512.283l840 +++| STD T7
08305 M01S00513.283l840 +++| LDD MA READ *DAET*
08306 M01S00514.283l840 +++| CRD CM
08307 M01S00515.283l840 +++| LDD CM SET CURRENT DAT TRACK
08308 M01S00516.283l840 +++| STD QT
08309 M01S00517.283l840 +++| LDM LDMP GET DEVICE ALLOCATION WORD FROM MST
08310 M01S00518.283l840 +++| SHN 3
08311 M01S00519.283l840 +++| ADN ALGL DAT TRACK TO (T6)
08312 M01S00520.283l840 +++| CRD T6-4
08313 M01S00521.283l840 +++| LDD CM+4 SET DAT INDEX
08314 M01S00522.283l840 +++| STD QI
08315 M01S00523.283l840 +++| SHN -6 SET BLOCK COUNT
08316 M01S00524.283l840 +++| STD T5
08317 M01S00525.283l840 +++| RJM CEA
08318 M01S00526.283l840 +++| LDD CM+4 MOVE ADDRESS TO REQUEST IMAGE
08319 M01S00527.283l840 +++| STD CN+4
08320 M01S00528.283l840 +++| LDD CM+3
08321 M01S00529.283l840 +++| LMC RECS*1000
08322 M01S00530.283l840 +++| STD CN+3
08323 M01S00531.283l840 +++| LDD CA+1 SET CM ADDRESS
08324 M01S00532.283l840 +++| STD CN+2
08325 M01S00533.283l840 +++| ADD TH
08326 M01S00534.283l840 +++| STD CA+1 ADVANCE ADDRESS FOR TRT RECOVERY
08327 M01S00535.283l840 +++| LDC 77S6+40 SET WORD COUNT FOR TRANSFER
08328 M01S00536.283l840 +++| STD CN+1
08329 M01S00537.283l840 +++| LJM LDT2 ENTER LOOP
08330 M01S00538.283l840 +++| RDE SPACE 4,15
08331 M01S00539.283l840 +++|** RDE - READ DAT ENTRY.
08332 M01S00540.283l840 +++|*
08333 M01S00541.283l840 +++|* ENTRY (EQ) = EST ORDINAL.
08334 M01S00542.283l840 +++|* (FN - FN+4) = EST ENTRY FOR DEVICE.
08335 M01S00543.283l840 +++|*
08336 M01S00544.283l840 +++|* EXIT (QS) = DAT INDEX.
08337 M01S00545.283l840 +++|* (T6) = DAT TRACK.
08338 M01S00546.283l840 +++|* (DATB) = DAT ENTRY.
08339 M01S00547.283l840 +++|*
08340 M01S00548.283l840 +++|* USES QS, RE, TS, CM - CM+4.
08341 M01S00549.283l840 +++|*
08342 M01S00550.283l840 +++|* CALLS ADE.
08343 M01S00551.283l840 +++|
08344 M01S00552.283l840 +++|
08345 M01S00553.283l840 +++| RDE SUBR ENTRY/EXIT
08346 M01S00554.283l840 +++| LDD FN+4 READ DRIVER WORD
08347 M01S00555.283l840 +++| SHN 3
08348 M01S00556.283l840 +++| ADN MDGL DAT INDEX TO (CM)
08349 M01S00557.283l840 +++| CRD CM
08350 M01S00558.283l840 +++| LDD CM SET DAT ORDINAL FROM INDEX
08351 M01S00559.283l840 +++| LPC 377
08352 M01S00560.283l840 +++| SHN 1
08353 M01S00561.283l840 +++| STD QS
08354 M01S00562.283l840 +++| LDN RECS SET READ SUBFUNCTION
08355 M01S00563.283l840 +++| RJM ADE ACCESS *DAT* ENTRY
08356 M01S00564.283l840 +++| LDD MA READ DAT ENTRY TO PP BUFFER
08357 M01S00565.283l840 +++| CRM DATB,TW
08358 M01S00566.283l840 +++| LDM DATB+4 SET MST/TRT TRACK IN TABLE
08359 M01S00567.283l840 +++| STD TS
08360 M01S00568.283l840 +++| SHN 1-13 ADD DAP STATUS IF SHARED DEVICE
08361 M01S00569.283l840 +++| LPN 2
08362 M01S00570.283l840 +++| RAD RE
08363 M01S00571.283l840 +++| LJM RDEX RETURN
08364 M01S00572.283l840 +++| SDT SPACE 4,15
08365 M01S00573.283l840 +++|** SDT - SEARCH DEVICE ACCESS TABLE.
08366 M01S00574.283l840 +++|*
08367 M01S00575.283l840 +++|* ENTRY (FN - FN+4) = EST ENTRY.
08368 M01S00576.283l840 +++|* (CA+1) = CM ADDRESS (+1000) OF DAT.
08369 M01S00577.283l840 +++|* (CN - CN+3) = DEVICE DESCRIPTION.
08370 M01S00578.283l840 +++|* (QI) = CURRENT DAT INDEX.
08371 M01S00579.283l840 +++|*
08372 M01S00580.283l840 +++|* EXIT (A) = 0 IF ENTRY NOT FOUND.
08373 M01S00581.283l840 +++|* (A) = ADDRESS OF DATB+11 IF ENTRY FOUND.
08374 M01S00582.283l840 +++|* (QS) = INDEX INTO DEVICE ACCESS TABLE.
08375 M01S00583.283l840 +++|* (DI) = DAT INDEX.
08376 M01S00584.283l840 +++|*
08377 M01S00585.283l840 +++|* USES T1, T2, DI, QS, CM - CM+4, CN+4.
08378 M01S00586.283l840 +++|
08379 M01S00587.283l840 +++|
08380 M01S00588.283l840 +++| SDT1 LDM DATB+4
08381 M01S00589.283l840 +++| NJN SDT2 IF SHARED DEVICE SLOT
08382 M01S00590.283l840 +++| LDD T2 SAVE INDEX OF HOLE
08383 M01S00591.283l840 +++| STD QS
08384 M01S00592.283l840 +++| SDT2 LDD DI
08385 M01S00593.283l840 +++| ZJN SDT3 IF DNAP BY THIS MACHINE
08386 M01S00594.283l840 +++| LMD T2
08387 M01S00595.283l840 +++| NJN SDT3 IF NOT AT DAT SLOT FOR DEVICE
08388 M01S00596.283l840 +++| LDM DATB+4 SET MST POINTER
08389 M01S00597.283l840 +++| STD CN+4
08390 M01S00598.283l840 +++| SDT3 LDN 2 ADVANCE INDEX
08391 M01S00599.283l840 +++| RAD T2
08392 M01S00600.283l840 +++| LMD QI
08393 M01S00601.283l840 +++| ZJN SDTX IF END OF DAT ENTRIES
08394 M01S00602.283l840 +++| SDT4 LDD RA READ NEXT ENTRY
08395 M01S00603.283l840 +++| SBN 10
08396 M01S00604.283l840 +++| SHN 6
08397 M01S00605.283l840 +++| ADD CA+1
08398 M01S00606.283l840 +++| ADD T2
08399 M01S00607.283l840 +++| CRM DATB,TW
08400 M01S00608.283l840 +++| LDM DATB
08401 M01S00609.283l840 +++| ZJN SDT1 IF POSSIBLE HOLE
08402 M01S00610.283l840 +++| LDN CN
08403 M01S00611.283l840 +++| STD T1
08404 M01S00612.283l840 +++|
08405 M01S00613.283l840 +++|* COMPARE ENTRY FOR MATCHING FAMILY/PACK NAME + DEVICE NUMBER.
08406 M01S00614.283l840 +++|
08407 M01S00615.283l840 +++| SDT5 LDM DATB-CN,T1
08408 M01S00616.283l840 +++| LMI T1
08409 M01S00617.283l840 +++| NJN SDT2 IF NO MATCH
08410 M01S00618.283l840 +++| AOD T1
08411 M01S00619.283l840 +++| LMN CN+4
08412 M01S00620.283l840 +++| NJN SDT5 IF NOT 4 BYTES
08413 M01S00621.283l840 +++| LDD T2 SET INDEX TO MATCHING ENTRY
08414 M01S00622.283l840 +++| STD QS
08415 M01S00623.283l840 +++| LDC DATB+11
08416 M01S00624.283l840 +++|
08417 M01S00625.283l840 +++| SDT SUBR ENTRY/EXIT
08418 M01S00626.283l840 +++| LDD FN+4 READ MST FOR DAT INDEX
08419 M01S00627.283l840 +++| SHN 3
08420 M01S00628.283l840 +++| ADN MDGL
08421 M01S00629.283l840 +++| CRD CM
08422 M01S00630.283l840 +++| LDD CM
08423 M01S00631.283l840 +++| LPC 377 EXPAND DAT INDEX
08424 M01S00632.283l840 +++| SHN 1
08425 M01S00633.283l840 +++| STD DI
08426 M01S00634.283l840 +++| LDN 0 CLEAR SEARCH INDEX
08427 M01S00635.283l840 +++| STD T2
08428 M01S00636.283l840 +++| STD CN+4
08429 M01S00637.283l840 +++| STD QS
08430 M01S00638.283l840 +++| LJM SDT4 ENTER LOOP
08431 M01S00639.283l840 +++| SNT SPACE 4,10
08432 M01S00640.283l840 +++|** SNT - SET NEXT TRACK IN EXTENDED MEMORY TRACK CHAIN.
08433 M01S00641.283l840 +++|*
08434 M01S00642.283l840 +++|* ENTRY (A) = CURRENT TRACK.
08435 M01S00643.283l840 +++|* (LDMP) = EXTENDED MEMORY MST POINTER.
08436 M01S00644.283l840 +++|*
08437 M01S00645.283l840 +++|* EXIT (A) = NEXT TRACK.
08438 M01S00646.283l840 +++|*
08439 M01S00647.283l840 +++|* USES T0, T1, CM - CM+4.
08440 M01S00648.283l840 +++|
08441 M01S00649.283l840 +++|
08442 M01S00650.283l840 +++| SNT SUBR ENTRY/EXIT
08443 M01S00651.283l840 +++| SHN 21-1 REMOVE TRACK BIT
08444 M01S00652.283l840 +++| LMD TH
08445 M01S00653.283l840 +++| STD T0 SET WORD INDEX
08446 M01S00654.283l840 +++| SHN 1-21
08447 M01S00655.283l840 +++| STD T1 SET BYTE INDEX
08448 M01S00656.283l840 +++| LDM LDMP GET FWA OF TRT
08449 M01S00657.283l840 +++| SHN 3
08450 M01S00658.283l840 +++| ADN TRLL
08451 M01S00659.283l840 +++| CRD CM
08452 M01S00660.283l840 +++| LDD CM+3 READ TRT WORD
08453 M01S00661.283l840 +++| LPN 77
08454 M01S00662.283l840 +++| SHN 14
08455 M01S00663.283l840 +++| LMD CM+4
08456 M01S00664.283l840 +++| ADD T0
08457 M01S00665.283l840 +++| CRD CM
08458 M01S00666.283l840 +++| LDM CM,T1 EXTRACT NEXT TRACK
08459 M01S00667.283l840 +++| UJN SNTX RETURN
08460 M01S00668.283l840 +++| UDT SPACE 4,15
08461 M01S00669.283l840 +++|** UDT - UPDATE DEVICE ACCESS TABLE.
08462 M01S00670.283l840 +++|*
08463 M01S00671.283l840 +++|* ENTRY (RS) = RECOVERY STATUS.
08464 M01S00672.283l840 +++|* (EQ) = EST ORDINAL.
08465 M01S00673.283l840 +++|* (FN - FN+4) = EST ENTRY.
08466 M01S00674.283l840 +++|* DAT ENTRY IN (DATB).
08467 M01S00675.283l840 +++|*
08468 M01S00676.283l840 +++|* EXIT (A) = 0 IF MST/TRT TRACK AVAILABLE.
08469 M01S00677.283l840 +++|* (A) = MESSAGE ADDRESS, IF ERROR.
08470 M01S00678.283l840 +++|*
08471 M01S00679.283l840 +++|* USES QI, QS, QT, TS, T6, T7, CM+3 - CM+7, CN - CN+4.
08472 M01S00680.283l840 +++|*
08473 M01S00681.283l840 +++|* CALLS ABD, CEA, EBP, SNT, WDE.
08474 M01S00682.283l840 +++|
08475 M01S00683.283l840 +++|
08476 M01S00684.283l840 +++| UDT5 LDC UDTA EXIT WITH (A) = MESSAGE ADDRESS
08477 M01S00685.283l840 +++|
08478 M01S00686.283l840 +++| UDT SUBR ENTRY/EXIT
08479 M01S00687.283l840 +++| LDD RS
08480 M01S00688.283l840 +++| ZJN UDT1 IF LEVEL 0 DS/ON LINE RECOVERY
08481 M01S00689.283l840 +++| LDM DATB+11 SET MACHINE ACCESS
08482 M01S00690.283l840 +++| LPC -0
08483 M01S00691.283l840 +++| MMTE *-1
08484 M01S00692.283l840 +++| LMC 0
08485 M01S00693.283l840 +++| MMTE *-1
08486 M01S00694.283l840 +++| STM DATB+11
08487 M01S00695.283l840 +++| UDT1 LDD RE
08488 M01S00696.283l840 +++| LPN 2
08489 M01S00697.283l840 +++| NJN UDT3 IF DEVICE ACCESSED PREVIOUSLY
08490 M01S00698.283l840 +++| LDD QS
08491 M01S00699.283l840 +++| NJN UDT2 IF EMPTY SLOT IN *DAT*
08492 M01S00700.283l840 +++| LDD QI SET INDEX OF ENTRY
08493 M01S00701.283l840 +++| STD QS
08494 M01S00702.283l840 +++| ADN 2 ADVANCE INDEX
08495 M01S00703.283l840 +++| STD QI
08496 M01S00704.283l840 +++| UDT2 LDD RE CHECK MST/TRT TRACK REQUIRED
08497 M01S00705.283l840 +++| LPN 4
08498 M01S00706.283l840 +++| ZJN UDT3 IF NOT REQUIRED
08499 M01S00707.283l840 +++| LDD QT ASSIGN MST/TRT TRACK
08500 M01S00708.283l840 +++| RJM SNT ADVANCE CURRENT TRACK
08501 M01S00709.283l840 +++| ZJN UDT5 IF END OF TRACK CHAIN
08502 M01S00710.283l840 +++| STM DATB+4 SET TRACK IN *DAT* ENTRY
08503 M01S00711.283l840 +++| STD QT
08504 M01S00712.283l840 +++| RJM ABD ALLOCATE BAT FOR DEVICE, IF REQUIRED
08505 M01S00713.283l840 +++| NJP UDTX IF BAT TRACK NOT AVAILABLE
08506 M01S00714.283l840 +++| UDT3 RJM WDE WRITE DAT ENTRY TO ECS
08507 M01S00715.283l840 +++| LDC 4000 FLAG RECOVERY IN PROGRESS
08508 M01S00716.283l840 +++| RAM DATB+11
08509 M01S00717.283l840 +++| LDD RA UPDATE CM COPY OF DAT
08510 M01S00718.283l840 +++| SBN 10
08511 M01S00719.283l840 +++| SHN 6
08512 M01S00720.283l840 +++| ADD CA+1
08513 M01S00721.283l840 +++| ADD QS
08514 M01S00722.283l840 +++| CWM DATB,TW
08515 M01S00723.283l840 +++|
08516 M01S00724.283l840 +++|* UPDATE MST.
08517 M01S00725.283l840 +++|
08518 M01S00726.283l840 +++| LDD FN+4 READ DRIVER WORD
08519 M01S00727.283l840 +++| SHN 3
08520 M01S00728.283l840 +++| ADN MDGL
08521 M01S00729.283l840 +++| CRD CN
08522 M01S00730.283l840 +++| LDN ZERL
08523 M01S00731.283l840 +++| CRD CM+3
08524 M01S00732.283l840 +++| LDM DATB+4
08525 M01S00733.283l840 +++| STD TS
08526 M01S00734.283l840 +++| STD T6
08527 M01S00735.283l840 +++| LDD RE
08528 M01S00736.283l840 +++| LPN 2
08529 M01S00737.283l840 +++| ZJN UDT4 IF DEVICE NOT ACCESSED PREVIOUSLY
08530 M01S00738.283l840 +++| LDN 0
08531 M01S00739.283l840 +++| STD T7
08532 M01S00740.283l840 +++| RJM CEA CONVERT EXTENDED MEMORY ADDRESS
08533 M01S00741.283l840 +++| UDT4 LDD CN SET *DAT* INDEX IN DRIVER WORD
08534 M01S00742.283l840 +++| LPC 6000
08535 M01S00743.283l840 +++| SHN 1
08536 M01S00744.283l840 +++| LMD QS
08537 M01S00745.283l840 +++| SHN -1
08538 M01S00746.283l840 +++| STD CN
08539 M01S00747.283l840 +++| LDD FN+4 STORE MST INFORMATION
08540 M01S00748.283l840 +++| SHN 3
08541 M01S00749.283l840 +++| ADN MDGL
08542 M01S00750.283l840 +++| CWD CN
08543 M01S00751.283l840 +++| SBN MDGL-SDGL
08544 M01S00752.283l840 +++| CWD CM+3
08545 M01S00753.283l840 +++| ADN NVGL-SDGL READ *NVGL*
08546 M01S00754.283l840 +++| CRD CN
08547 M01S00755.283l840 +++| LDM DATB+5 SET BAT EM ADDRESS
08548 M01S00756.283l840 +++| STD CN+1
08549 M01S00757.283l840 +++| LDM DATB+6
08550 M01S00758.283l840 +++| STD CN+2
08551 M01S00759.283l840 +++| LDD FN+4 REWRITE *NVGL*
08552 M01S00760.283l840 +++| SHN 3
08553 M01S00761.283l840 +++| ADN NVGL
08554 M01S00762.283l840 +++| CWD CN
08555 M01S00763.283l840 +++| RJM EBP ENABLE BST/BAT PROCESSING IF REQUIRED
08556 M01S00764.283l840 +++| LDN 0
08557 M01S00765.283l840 +++| LJM UDTX RETURN
08558 M01S00766.283l840 +++|
08559 M01S00767.283l840 +++| UDTA DATA C* END OF DAT TRACK CHAIN.*
08560 M01S00768.283l840 +++| WDE SPACE 4,15
08561 M01S00769.283l840 +++|** WDE - WRITE DAT ENTRY TO EXTENDED MEMORY.
08562 M01S00770.283l840 +++|*
08563 M01S00771.283l840 +++|* ENTRY (QS) = DAT INDEX.
08564 M01S00772.283l840 +++|* DAT ENTRY IN (DATB).
08565 M01S00773.283l840 +++|*
08566 M01S00774.283l840 +++|* EXIT (A) = 0.
08567 M01S00775.283l840 +++|* (T6) = DAT TRACK.
08568 M01S00776.283l840 +++|*
08569 M01S00777.283l840 +++|* USES T6, T7, CM - CM+4.
08570 M01S00778.283l840 +++|*
08571 M01S00779.283l840 +++|* CALLS ADE.
08572 M01S00780.283l840 +++|
08573 M01S00781.283l840 +++|
08574 M01S00782.283l840 +++| WDE SUBR ENTRY/EXIT
08575 M01S00783.283l840 +++| LDD MA MOVE DAT ENTRY TO MESSAGE BUFFER
08576 M01S00784.283l840 +++| CWM DATB,TW
08577 M01S00785.283l840 +++| LDN WECS SET WRITE SUBFUNCTION
08578 M01S00786.283l840 +++| RJM ADE ACCESS *DAT* ENTRY
08579 M01S00787.283l840 +++| UJN WDEX RETURN
08580 M01S00788.283l840 +++| SPACE 4,10
08581 M01S00789.283l840 +++| ORDH EQU *+5 LOAD ADDRESS FOR *4DH*
08582 M01S00790.283l840 +++| TITLE VERIFY LABEL PARAMETERS.
08583 M00S06874.msm +++| CCE SPACE 4,15
| Line S06875 Modification History |
M01 (Removed by) | 283l840 |
Seq # *Modification Id* Act
----------------------------+
08584 M01S06875.283l840 ---| CCE TITLE VERIFY LABEL PARAMETERS.
08585 M00S06876.msm ---|** CCE - CHECK CHAINED EQUIPMENT.
08586 M00S06877.msm ---|*
08587 M00S06878.msm ---|* ENTRY (T5) = EST ORDINAL.
08588 M00S06879.msm ---|* (FN - FN+4) = EST ENTRY.
08589 M00S06880.msm ---|*
08590 M00S06881.msm ---|* EXIT (A) .LT. 0 IF FIRST EQUIPMENT IN CHAIN FOUND.
08591 M00S06882.msm ---|* (EC) = *STCE* IF FIRST EQUIPMENT NOT FOUND.
08592 M00S06883.msm ---|*
08593 M00S06884.msm ---|* USES T3, T6, CM - CM+6, CN - CN+4.
08594 M00S06885.msm ---|*
08595 M00S06886.msm ---|* CALLS CEP, CLP, LRA.
08596 M00S06887.msm ---|*
08597 M00S06888.msm ---|* MACROS SFA.
08598 M00S06889.msm ---|
08599 M00S06890.msm ---|
08600 M00S06891.msm ---| CCE1 RJM LRA LOAD REFERENCE ADDRESS
08601 M00S06892.msm ---| ADD T6
08602 M00S06893.msm ---| CRD RD
08603 M00S06894.msm ---| LDD RE CHECK EQUIPMENT STATUS
08604 M00S06895.msm ---| SHN 21-10
08605 M00S06896.msm ---| PJN CCE2 IF NOT REMOVABLE DEVICE
08606 M00S06897.msm ---| LDD T6
08607 M00S06898.msm ---| LMD EQ
08608 M00S06899.msm ---| ZJN CCE2 IF INITIAL EQUIPMENT
08609 M00S06900.msm ---| SFA EST,T6 READ EST ENTRY
08610 M00S06901.msm ---| ADK EQDE
08611 M00S06902.msm ---| CRD CM
08612 M00S06903.msm ---| RJM CEP COMPARE EQUIPMENT PARAMETERS
08613 M00S06904.msm ---| NJN CCE2 IF NO MATCH
08614 M00S06905.msm ---| RJM LRA LOAD REFERENCE ADDRESS
08615 M00S06906.msm ---| ADD AL
08616 M00S06907.msm ---| ADN PFGL
08617 M00S06908.msm ---| CRD CM+2
08618 M00S06909.msm ---| ADN PUGL-PFGL GET USER NAME
08619 M00S06910.msm ---| CRD CN
08620 M00S06911.msm ---| RJM CLP CHECK LABEL PARAMETERS
08621 M00S06912.msm ---| ZJN CCE3 IF CORRECT UNIT FOUND
08622 M00S06913.msm ---| CCE2 AOD T6 READ EST ENTRY
08623 M00S06914.msm ---| LMD LO
08624 M00S06915.msm ---| NJN CCE1 IF NOT END OF MASS STORAGE EST
08625 M00S06916.msm ---| LDN STCE SET CONFIGURATION ERROR
08626 M00S06917.msm ---| CCE3 STD EC
08627 M00S06918.msm ---| SBN 1
08628 M00S06919.msm ---|
08629 M00S06920.msm ---| CCE SUBR ENTRY/EXIT
08630 M00S06921.msm ---| LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH
08631 M00S06922.msm ---| STD T6 SET START OF EST SCAN
08632 M00S06923.msm ---| LDD FN+3
08633 M00S06924.msm ---| STM CEFA
08634 M00S06925.msm ---| UJN CCE2 ENTER LOOP
08635 M00S06926.msm ---| CEP SPACE 4,10
08636 M00S06927.msm ---|** CEP - COMPARE EQUIPMENT PARAMETERS.
08637 M00S06928.msm ---|*
08638 M00S06929.msm ---|* ENTRY (FN - FN+4) = EST ENTRY OF PRIMARY EQUIPMENT.
08639 M00S06930.msm ---|* (CM - CM+4) = EST ENTRY OF DEVICE BEING CHECKED.
08640 M00S06931.msm ---|*
08641 M00S06932.msm ---|* EXIT (A) = 0 IF MATCHING EQUIPMENTS.
08642 M00S06933.msm ---|
08643 M00S06934.msm ---|
08644 M00S06935.msm ---| CEP1 LDD CM+2 TEST FOR SECONDARY CHANNEL
08645 M00S06936.msm ---| CEP2 LMD FN+2
08646 M00S06937.msm ---| LPC 4677 CHECK CHANNEL ACTIVE, MODE AND PORT