Seq # *Modification Id* Act
----------------------------+
00001 M01S00001.compmsv +++| CTEXT COMPMSV - MASS STORAGE DEVICE VERIFICATION.
00002 M01S00002.compmsv +++| IF -DEF,QUAL$,1
00003 M01S00003.compmsv +++| QUAL COMPMSV
00004 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00005 M01S00004.compmsv +++| SPACE 4
00006 M01S00005.compmsv +++|*** MSV - MASS STORAGE DEVICE WRITE/READ VERIFICATION.
00007 M01S00006.compmsv +++|*
00008 M01S00007.compmsv +++|* W. E. GOEBEL. 80/02/25.
00009 M01S00008.compmsv +++| SPACE 4
00010 M01S00009.compmsv +++|*** *MSV* VALIDATES THAT A FIXED DATA PATTERN CAN
00011 M01S00010.compmsv +++|* BE WRITTEN AND READ SUCCESSFULLY. THE SECTOR IS WRITTEN
00012 M01S00011.compmsv +++|* TO SECTOR 54 OF THE CURRENT UNIT OF THE LABEL TRACK.
00013 M01S00012.compmsv +++|* IF NO SECTOR 54 EXISTS, *MSV* EXITS WITH NO ERROR STATUS.
00014 M01S00013.compmsv +++|*
00015 M01S00014.compmsv +++|* DATA PATTERN WRITTEN.
00016 M01S00015.compmsv +++|*
00017 M01S00016.compmsv +++|* 3777 BYTE 0
00018 M01S00017.compmsv +++|* 0077 BYTE 1
00019 M01S00018.compmsv +++|* 0000 BYTES 2 - 101
00020 M01S00019.compmsv +++|* 0001 BYTES 102 - 201
00021 M01S00020.compmsv +++|* 0077 BYTES 202 - 301
00022 M01S00021.compmsv +++|* 7777 BYTES 302 - 401
00023 M01S00022.compmsv +++|* 7700 BYTES 402 - 501
00024 M01S00023.compmsv +++|*
| Line S00024 Modification History |
M01 (Added by) | compmsv |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00025 M02S00024.ns22000 ---|* ENTRY (T5) = EQUIPMENT NUMBER.
00026 M01S00001.ns22000 +++|* ENTRY (T5) = EST ORDINAL.
00027 M01S00025.compmsv +++|* (T6) = LABEL TRACK.
00028 M01S00026.compmsv +++|* (T7) = LOGICAL UNIT NUMBER * SINGLE UNIT SECTOR LIMIT.
00029 M01S00027.compmsv +++|* CHANNEL MAY BE RESERVED.
00030 M01S00028.compmsv +++|*
00031 M01S00029.compmsv +++|* EXIT (A) .LT. 0 IF MASS STORAGE ERROR.
00032 M01S00030.compmsv +++|* (A) = 0 IF VERIFY GOOD.
00033 M01S00031.compmsv +++|* (A) .GT. 0 IF VERIFY ERROR.
00034 M01S00032.compmsv +++|*
00035 M01S00033.compmsv +++|* USES T1 - T7, CM - CM+4.
00036 M01S00034.compmsv +++|*
00037 M01S00035.compmsv +++|* CALLS RDS, WDS.
00038 M01S00036.compmsv +++|*
00039 M01S00037.compmsv +++|* MACROS ENDMS, SETMS.
00040 M01S00038.compmsv +++|
00041 M01S00039.compmsv +++|
00042 M01S00040.compmsv +++| SPACE 4
00043 M01S00041.compmsv +++| MSV8 LCN 54 RESET SECTOR NUMBER
00044 M01S00042.compmsv +++| RAD T7
00045 M01S00043.compmsv +++| ENDMS INSURE CHANNEL RETURNED
00046 M01S00044.compmsv +++| SOD T3 RETURN STATUS
00047 M01S00045.compmsv +++|
00048 M01S00046.compmsv +++| MSV SUBR ENTRY/EXIT
00049 M01S00047.compmsv +++| LDN 1 PRESET STATUS RETURNED
00050 M01S00048.compmsv +++| STD T3
| Line S00049 Modification History |
M01 (Added by) | compmsv |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
00051 M02S00049.242l642 ---| SETMS WRITE,NR
| Line S00001 Modification History |
M01 (Added by) | 242l642 |
M02 (Updated by) | pmsv1 |
Seq # *Modification Id* Act
----------------------------+
00052 M02S00001.pmsv1 ---| SETMS IO
00053 M01S00001.pmsv1 +++| SETMS IO,(AD,DF,NR)
00054 M01S00050.compmsv +++| LDN 54 SET SECTOR
00055 M01S00051.compmsv +++| RAD T7
00056 M01S00052.compmsv +++| SBM SLM
00057 M01S00053.compmsv +++| PJN MSV8 IF SECTOR NON-EXISTENT
00058 M01S00054.compmsv +++|
00059 M01S00055.compmsv +++|* PRESET DATA PATTERN.
00060 M01S00056.compmsv +++|
00061 M01S00057.compmsv +++| LDN 4 LOOP COUNTER
00062 M01S00058.compmsv +++| STD T2
00063 M01S00059.compmsv +++| LDC BFMS+501 BUFFER INDEX
00064 M01S00060.compmsv +++| STD T1
00065 M01S00061.compmsv +++| MSV1 LDD T1 SET LOOP TERMINATION
00066 M01S00062.compmsv +++| SBD HN
00067 M01S00063.compmsv +++| STD T0
00068 M01S00064.compmsv +++| MSV2 LDM TMSV,T2 SET BYTE OF PATTERN
00069 M01S00065.compmsv +++| STI T1
00070 M01S00066.compmsv +++| SOD T1
00071 M01S00067.compmsv +++| LMD T0
00072 M01S00068.compmsv +++| NJN MSV2 IF NOT END OF BLOCK
00073 M01S00069.compmsv +++| SOD T2
00074 M01S00070.compmsv +++| PJN MSV1 IF NOT END OF BLOCKS
00075 M01S00071.compmsv +++| LDC 3777 SET LINKAGE BYTES
00076 M01S00072.compmsv +++| STM BFMS
00077 M01S00073.compmsv +++| LDN 77
00078 M01S00074.compmsv +++| STI T1
00079 M01S00075.compmsv +++| SOD T3 PRESET MASS STORAGE ERROR
00080 M01S00076.compmsv +++|
00081 M01S00077.compmsv +++|* WRITE DATA PATTERN.
00082 M01S00078.compmsv +++|
00083 M01S00079.compmsv +++| LDC BFMS+WLSF
00084 M01S00080.compmsv +++| RJM WDS
00085 M01S00081.compmsv +++| MJN MSV3 IF MASS STORAGE ERROR
00086 M01S00082.compmsv +++|
00087 M01S00083.compmsv +++|* READ DATA PATTERN.
00088 M01S00084.compmsv +++|
| Line S00085 Modification History |
M01 (Added by) | compmsv |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
00089 M02S00085.242l642 ---| SETMS READ,NR
00090 M01S00086.compmsv +++| LDC BFMS
00091 M01S00087.compmsv +++| RJM RDS
00092 M01S00088.compmsv +++| MSV3 MJN MSV7 IF MASS STORAGE ERROR
00093 M01S00089.compmsv +++|
00094 M01S00090.compmsv +++|* VERIFY DATA PATTERN.
00095 M01S00091.compmsv +++|
00096 M01S00092.compmsv +++| LDN 4 PRESET VERIFY LOOP
00097 M01S00093.compmsv +++| STD T2
00098 M01S00094.compmsv +++| AOD T3
00099 M01S00095.compmsv +++| LDC BFMS+501
00100 M01S00096.compmsv +++| STD T1
00101 M01S00097.compmsv +++| MSV4 LDD T1
00102 M01S00098.compmsv +++| SBD HN
00103 M01S00099.compmsv +++| STD T0
00104 M01S00100.compmsv +++| MSV5 LDM TMSV,T2 GET DATA PATTERN FROM TABLE
00105 M01S00101.compmsv +++| LMI T1
00106 M01S00102.compmsv +++| NJN MSV6 IF ERROR
00107 M01S00103.compmsv +++| SOD T1
00108 M01S00104.compmsv +++| LMD T0
00109 M01S00105.compmsv +++| NJN MSV5 IF NOT END OF BLOCK
00110 M01S00106.compmsv +++| SOD T2
00111 M01S00107.compmsv +++| PJN MSV4 IF NOT END OF BLOCKS
00112 M01S00108.compmsv +++| LDI T1 CHECK HEADER BYTES
00113 M01S00109.compmsv +++| LMN 77
00114 M01S00110.compmsv +++| NJN MSV6 IF ERROR
00115 M01S00111.compmsv +++| LDM BFMS
00116 M01S00112.compmsv +++| LMC 3777
00117 M01S00113.compmsv +++| NJN MSV6 IF ERROR
00118 M01S00114.compmsv +++| SOD T3
00119 M01S00115.compmsv +++| MSV6 AOD T3
00120 M01S00116.compmsv +++| MSV7 LJM MSV8 RETURN
00121 M01S00117.compmsv +++|
00122 M01S00118.compmsv +++| TMSV BSS 0 TABLE OF DATA PATTERNS
00123 M01S00119.compmsv +++| CON 0000
00124 M01S00120.compmsv +++| CON 0001
00125 M01S00121.compmsv +++| CON 0077
00126 M01S00122.compmsv +++| CON 7777
00127 M01S00123.compmsv +++| CON 7700
00128 M01S00124.compmsv +++|
00129 M01S00125.compmsv +++| QUAL$ IF -DEF,QUAL$
00130 M01S00126.compmsv +++| QUAL *
00131 M01S00127.compmsv +++| MSV EQU /COMPMSV/MSV
00132 M01S00128.compmsv +++| QUAL$ ENDIF
00133 M01S00129.compmsv +++| ENDX
00134 M01S00014.compmsv +++|COMPNFL
00135 M01S00005.compmsv +++| BASE MIXED
| Line S00006 Modification History |
M01 (Added by) | compmsv |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00136 M02S00006.ns22000 ---|* COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1979.
00137 M01S00001.ns22000 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00138 M01S00007.compmsv +++| SPACE 4,10
00139 M01S00008.compmsv +++|*** NFL - REQUEST NEGATIVE FL.
00140 M01S00009.compmsv +++|*
00141 M01S00010.compmsv +++|* R. J. PRIEVE. 79/09/12.
00142 M01S00011.compmsv +++| NFL SPACE 4,15
00143 M01S00012.compmsv +++|*** *NFL* PROCESSES STORAGE CHANGES FOR NEGATIVE FL.
00144 M01S00013.compmsv +++|* FOR INCREASES OF NEGATIVE FL, THE ADDITIONAL FL IS
00145 M01S00014.compmsv +++|* ALSO CLEARED. *FLIW* IS USED IN THE CASE OF A REJECTED
00146 M01S00015.compmsv +++|* NEGATIVE FL INCREASE.
00147 M01S00016.compmsv +++|*
00148 M01S00017.compmsv +++|* ENTRY (A) = DESIRED NEGATIVE FL/100B.
00149 M01S00018.compmsv +++|*
00150 M01S00019.compmsv +++|* EXIT (A) = 0 IF STORAGE OBTAINED.
00151 M01S00020.compmsv +++|* (A) .LT. 0 IF INCREASE NOT AVAILABLE.
00152 M01S00021.compmsv +++|* (A) = 1 IF NFL INCREASE PENDING.
00153 M01S00022.compmsv +++|*
00154 M01S00023.compmsv +++|* USES T1, T2, CM - CM+4.
00155 M01S00024.compmsv +++|*
00156 M01S00025.compmsv +++|* MACROS MONITOR.
00157 M01S00026.compmsv +++|
00158 M01S00027.compmsv +++|
00159 M01S00028.compmsv +++| NFL2 LDD CP READ FL INCREASE CONTROL WORD
00160 M01S00029.compmsv +++| ADN FLIW
00161 M01S00030.compmsv +++| CRD CM
00162 M01S00031.compmsv +++| LDD CM+1
00163 M01S00032.compmsv +++| SHN 21-0
00164 M01S00033.compmsv +++| MJN NFLX IF INCREASE REJECTED BY SCHEDULER
00165 M01S00034.compmsv +++| LDN 1 SET INCREASE PENDING
00166 M01S00035.compmsv +++|
00167 M01S00036.compmsv +++| NFL SUBR ENTRY/EXIT
00168 M01S00037.compmsv +++| STD T1 SAVE NEGATIVE FL REQUEST
00169 M01S00038.compmsv +++| LDD CP READ FL STATUS WORD
00170 M01S00039.compmsv +++| ADN FLSW
00171 M01S00040.compmsv +++| CRD CM
00172 M01S00041.compmsv +++| LDD T1
00173 M01S00042.compmsv +++| STD CM+1
00174 M01S00043.compmsv +++| SBD CM
00175 M01S00044.compmsv +++| ZJN NFLX IF NEGATIVE FL ALREADY ASSIGNED
00176 M01S00045.compmsv +++| STD T2
00177 M01S00046.compmsv +++| LDC 500 INDICATE TO SET *FLIW* ON REJECT
00178 M01S00047.compmsv +++| STD CM+2
00179 M01S00048.compmsv +++| MONITOR RSTM REQUEST STORAGE
00180 M01S00049.compmsv +++| LDD CM+1
00181 M01S00050.compmsv +++| NJN NFL2 IF STORAGE NOT OBTAINED
00182 M01S00051.compmsv +++|* LDN 0 SET *NFL* OBTAINED
00183 M01S00052.compmsv +++| UJN NFLX RETURN
00184 M01S00053.compmsv +++| SPACE 4,10
00185 M01S00054.compmsv +++| BASE *
00186 M01S00055.compmsv +++| QUAL$ IF -DEF,QUAL$
00187 M01S00056.compmsv +++| QUAL *
00188 M01S00057.compmsv +++| NFL EQU /COMPNFL/NFL
00189 M01S00058.compmsv +++| QUAL$ ENDIF
00190 M01S00059.compmsv +++| ENDX