Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:1mt.025
Deck 1MT Part 025
92 Modifications
Listing Sections
- Deck 1MT Start
- Deck 1MT Part 1 (Line 1462)
- Deck 1MT Part 2 (Line 2674)
- Deck 1MT Part 3 (Line 4017)
- Deck 1MT Part 4 (Line 5073)
- Deck 1MT Part 5 (Line 6369)
- Deck 1MT Part 6 (Line 7796)
- Deck 1MT Part 7 (Line 9269)
- Deck 1MT Part 8 (Line 10478)
- Deck 1MT Part 9 (Line 11579)
- Deck 1MT Part 10 (Line 12640)
- Deck 1MT Part 11 (Line 13801)
- Deck 1MT Part 12 (Line 15216)
- Deck 1MT Part 13 (Line 16607)
- Deck 1MT Part 14 (Line 18062)
- Deck 1MT Part 15 (Line 19541)
- Deck 1MT Part 16 (Line 20933)
- Deck 1MT Part 17 (Line 22793)
- Deck 1MT Part 18 (Line 24082)
- Deck 1MT Part 19 (Line 25232)
- Deck 1MT Part 20 (Line 26664)
- Deck 1MT Part 21 (Line 28010)
- Deck 1MT Part 22 (Line 28907)
- Deck 1MT Part 23 (Line 30276)
- Deck 1MT Part 24 (Line 31850)
- Deck 1MT Part 25 (Line 33112)
- Deck 1MT Part 26 (Line 34430)
- Deck 1MT Part 27 (Line 35774)
- Deck 1MT Part 28 (Line 37108)
Source
Seq # *Modification Id* Act ----------------------------+ 33112 M00S19209.1mt +++| ADN 1 33113 M00S19210.1mt +++| CRD CM 33114 M00S19211.1mt +++| LDD CN+4 33115 M00S19212.1mt +++| ZJN PSL4 IF END OF LABELS IN BUFFER 33116 M00S19213.1mt +++| LMC 80D 33117 M00S19214.1mt +++| NJN PSL3 IF NOT CORRECT LENGTH 33118 M00S19215.1mt +++| LDD CM 33119 M00S19216.1mt +++| LMC * 33120 M00S19217.1mt +++| PSLC EQU *-1 33121 M00S19218.1mt +++| NJN PSL2 IF NOT CORRECT LABEL 33122 M00S19219.1mt +++| LDD CM+1 33123 M00S19220.1mt +++| LMC * 33124 M00S19221.1mt +++| PSLD EQU *-1 33125 M00S19222.1mt +++| NJN PSL2 IF NOT CORRECT LABEL 33126 M00S19223.1mt +++| LDN 10 READ LABEL 33127 M00S19224.1mt +++| STD T5 33128 M00S19225.1mt +++| RJM ELA 33129 M00S19226.1mt +++| ADN 1 33130 M00S19227.1mt +++| CRM BUF,T5 33131 M00S19228.1mt +++| LCN 1 SET WRITE LABEL 33132 M00S19229.1mt +++| LJM PSLX RETURN 33133 M00S19230.1mt +++| 33134 M00S19231.1mt +++| PSL2 LDN 11 INCREMENT TO NEXT LABEL BLOCK 33135 M00S19232.1mt +++| RAD T7 33136 M00S19233.1mt +++| SHN -14 33137 M00S19234.1mt +++| RAD T6 33138 M00S19235.1mt +++| LJM PSL1 LOOP FOR NEXT LABEL 33139 M00S19236.1mt +++|
| Line S19237 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 33140 M01S19237.v23l617 ---| PSL3 LDN /MTX/IXL ILLEGAL CHARACTER COUNT IN HEADER
| Line S00529 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 33141 M01S00529.v23l617 +++| PSL3 LDN /MTX/IXL INCORRECT CHARACTER COUNT IN HEADER 33142 M00S19238.1mt +++| LJM RET3 RETURN ERROR CODE 33143 M00S19239.1mt +++| PUL SPACE 4,10 33144 M00S19240.1mt +++|** PUL - PROCESS USER LABELS. 33145 M00S19241.1mt +++|* 33146 M00S19242.1mt +++|* ENTRY (A) = 3 CHARACTER LABEL NAME TO SEARCH FOR. 33147 M00S19243.1mt +++|* (PA) = PARTICULAR LABEL OF TYPE TO TAKE. 33148 M00S19244.1mt +++|* 33149 M00S19245.1mt +++|* EXIT (PA) = (A) = 0, IF NO LABEL. 33150 M00S19246.1mt +++|* 33151 M00S19247.1mt +++|* CALLS ELA. 33152 M00S19248.1mt +++| 33153 M00S19249.1mt +++| 33154 M00S19250.1mt +++| PUL4 STD PA 33155 M00S19251.1mt +++| 33156 M00S19252.1mt +++| PUL SUBR ENTRY/EXIT 33157 M00S19253.1mt +++| SHN 14 33158 M00S19254.1mt +++| STM PULA 33159 M00S19255.1mt +++| SHN -14 33160 M00S19256.1mt +++| STM PULB 33161 M00S19257.1mt +++| LDN ZERL 33162 M00S19258.1mt +++| CRD T5 33163 M00S19259.1mt +++| LDD PA 33164 M00S19260.1mt +++| LMD HN 33165 M00S19261.1mt +++| ZJN PUL4 IF MAXIMUM NUMBER OF USER LABELS 33166 M00S19262.1mt +++| PUL1 RJM ELA 33167 M00S19263.1mt +++| ZJN PUL4 IF NO EXTENDED LABELS OR END OF BUFFER 33168 M00S19264.1mt +++| CRD CN 33169 M00S19265.1mt +++| ADN 1 33170 M00S19266.1mt +++| CRD CM 33171 M00S19267.1mt +++| LDD CN+4 33172 M00S19268.1mt +++| ZJN PUL4 IF END OF LABELS IN BUFFER 33173 M00S19269.1mt +++| LMC 80D 33174 M00S19270.1mt +++| NJN PUL3 IF NOT CORRECT LENGTH 33175 M00S19271.1mt +++| LDD CM 33176 M00S19272.1mt +++| LMC * 33177 M00S19273.1mt +++| PULA EQU *-1 33178 M00S19274.1mt +++| NJN PUL2 IF NOT CORRECT LABEL 33179 M00S19275.1mt +++| LDD CM+1 33180 M00S19276.1mt +++| SHN -6 33181 M00S19277.1mt +++| LMC * 33182 M00S19278.1mt +++| PULB EQU *-1 33183 M00S19279.1mt +++| NJN PUL2 IF NOT CORRECT LABEL 33184 M00S19280.1mt +++| AOD T5 33185 M00S19281.1mt +++| SBN 1 33186 M00S19282.1mt +++| LMD PA 33187 M00S19283.1mt +++| NJN PUL2 IF NOT CORRECT LABEL BLOCK 33188 M00S19284.1mt +++| LDN 10 READ LABEL 33189 M00S19285.1mt +++| STD T5 33190 M00S19286.1mt +++| RJM ELA 33191 M00S19287.1mt +++| ADN 1 33192 M00S19288.1mt +++| CRM BUF,T5 33193 M00S19289.1mt +++| LCN 1 33194 M00S19290.1mt +++| LJM PULX RETURN 33195 M00S19291.1mt +++| 33196 M00S19292.1mt +++| PUL2 LDN 11 INCREMENT TO NEXT BLOCK 33197 M00S19293.1mt +++| RAD T7 33198 M00S19294.1mt +++| SHN -14 33199 M00S19295.1mt +++| RAD T6 33200 M00S19296.1mt +++| LJM PUL1 LOOP 33201 M00S19297.1mt +++|
| Line S19298 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 33202 M01S19298.v23l617 ---| PUL3 LDN /MTX/IXL ILLEGAL CHARACTER COUNT IN HEADER
| Line S00530 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 33203 M01S00530.v23l617 +++| PUL3 LDN /MTX/IXL INCORRECT CHARACTER COUNT IN HEADER 33204 M00S19299.1mt +++| LJM RET3 RETURN ERROR CODE 33205 M00S19300.1mt +++| RUD SPACE 4,10
| Line S19301 Modification History | |
|---|---|
M01 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33206 M01S19301.1mt50 ---|** RUD - READ UNIT DESCRIPTOR TABLE LABEL INFORMATION.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33207 M01S00006.1mt50 +++|** RUD - READ UDT VSN AND LABEL INFORMATION.
| Line S19302 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33208 M01S19302.282l826 ---|* PERFORMED ONLY AT MAGNET CP. 33209 M00S19303.1mt +++|*
| Line S19304 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33210 M01S19304.282l826 ---|* CALLS UAD.
| Line S01487 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33211 M01S01487.282l826 +++|* EXIT (A) = 0 IF NOT AT MAGNET CP.
| Line S01488 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
M02 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33212 M02S01488.1mt50 ---|* LABEL INFORMATION READ TO *UDTB* IF AT MAGNET CP.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33213 M01S00007.1mt50 +++|* UDT INFORMATION READ IF AT MAGNET CP.
| Line S01489 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33214 M01S01489.282l826 +++|* 33215 M01S01490.282l826 +++|* CALLS UDA. 33216 M00S19305.1mt +++| 33217 M00S19306.1mt +++| 33218 M00S19307.1mt +++| RUD SUBR ENTRY/EXIT
| Line S19308 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33219 M01S19308.274l797 ---| LDM //CECB 33220 M01S19309.274l797 ---| LPN 77 33221 M01S19310.274l797 ---| NJN RUDX IF NOT AT MAGNET CONTROL POINT
| Line S07788 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33222 M02S07788.282l826 ---|* LDM //CECB 33223 M02S07789.282l826 ---|* LPN 77 33224 M02S07790.282l826 ---|* NJN RUDX IF NOT AT MAGNET CONTROL POINT
| Line S19311 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33225 M01S19311.282l826 ---| LDN /MTX/UUDTL 33226 M01S19312.282l826 ---| STD T1 33227 M01S19313.282l826 ---| RJM UAD 33228 M01S19314.282l826 ---| ADN /MTX/UUFN 33229 M01S19315.282l826 ---| CRM UDTB,T1
| Line S01491 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33230 M01S01491.282l826 +++| RJM UDA 33231 M01S01492.282l826 +++| ZJN RUDX IF NOT AT MAGNET CP
| Line S01493 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
M02 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33232 M02S01493.1mt50 ---| CRM UDTB,T1 READ LABEL INFORMATION
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33233 M01S00008.1mt50 +++| CRM EVSN,T1 READ VSN AND LABEL INFORMATION 33234 M00S19316.1mt +++| UJN RUDX RETURN
| Line S01221 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | ns2770 |
Seq # *Modification Id* Act ----------------------------+ 33235 M02S01221.ns2770 ---| SBL SPACE 4,10 33236 M02S01222.ns2770 ---|** SBL - SETUP BLANK LABEL DATA AND ROUTINES. 33237 M02S01223.ns2770 ---|* PERFORM SETUP FOR AUTO BLANK LABELING. 33238 M02S01224.ns2770 ---|* 33239 M02S01225.ns2770 ---|* ENTRY UDT LABEL IN *UDTB*. 33240 M02S01226.ns2770 ---|* 33241 M02S01227.ns2770 ---|* EXIT (A) = 0. 33242 M02S01228.ns2770 ---|* VAC AND FAC FIELDS IN LABEL SET TO 0. 33243 M02S01229.ns2770 ---|* FORCED LABEL WRITE FOR EOF1 LABEL. 33244 M02S01230.ns2770 ---|* 33245 M02S01231.ns2770 ---|* CALLS WUD. 33246 M02S01232.ns2770 ---| 33247 M02S01233.ns2770 ---| 33248 M02S01234.ns2770 ---| SBL1 LDN 0 33249 M02S01235.ns2770 ---| 33250 M02S01236.ns2770 ---| SBL SUBR ENTRY/EXIT 33251 M02S01237.ns2770 ---| LDC UJNI+EOF1-EOFA 33252 M02S01238.ns2770 ---| STM EOFA
| Line S01239 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 282l826 |
M03 (Removed by) | ns2770 |
Seq # *Modification Id* Act ----------------------------+ 33253 M03S01239.ns2770 ---| LDM UDTB+5+4 REEL NUMBER 33254 M03S01240.ns2770 ---| NJN SBL1 IF NOT FIRST REEL
| Line S01494 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
M02 (Removed by) | ns2770 |
Seq # *Modification Id* Act ----------------------------+ 33255 M02S01494.ns2770 ---| LDD UP 33256 M02S01495.ns2770 ---| SHN 21-11 33257 M02S01496.ns2770 ---| MJN SBL1 IF NOT INITIAL REEL ASSIGNMENT
| Line S01241 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | ns2770 |
Seq # *Modification Id* Act ----------------------------+ 33258 M02S01241.ns2770 ---| LDM UDTB+5*5+2 CLEAR VAC IN LABEL 33259 M02S01242.ns2770 ---| LPN 77 33260 M02S01243.ns2770 ---| LMC 5500 FORCE TO SPACE 33261 M02S01244.ns2770 ---| STM UDTB+5*5+2 33262 M02S01245.ns2770 ---| LDN 0 CLEAR FILE IDENTIFIER FIELD 33263 M02S01246.ns2770 ---| STM UDTB+10D 33264 M02S01247.ns2770 ---| STM UDTB+3*5+3 CLEAR SECTION NUMBER 33265 M02S01248.ns2770 ---| STM UDTB+4*5+3 CLEAR SEQUENCE NUMBER 33266 M02S01249.ns2770 ---| LDN 1 33267 M02S01250.ns2770 ---| STM UDTB+3*5+4 33268 M02S01251.ns2770 ---| STM UDTB+4*5+4 33269 M02S01252.ns2770 ---| LDM UDTB+23D CLEAR FAC IN LABEL 33270 M02S01253.ns2770 ---| LPN 77 33271 M02S01254.ns2770 ---| LMC 5500 FORCE TO SPACE 33272 M02S01255.ns2770 ---| STM UDTB+23D 33273 M02S01256.ns2770 ---| LDM UDTB+8D SET LABEL EXPIRED 33274 M02S01257.ns2770 ---| SCN 2 33275 M02S01258.ns2770 ---| LMN 2 33276 M02S01259.ns2770 ---| STM UDTB+8D 33277 M02S01260.ns2770 ---| RJM WUD COPY THE UDT BACK TO MAGNET-S FL 33278 M02S01261.ns2770 ---| LJM SBL1 RETURN
| Line S01262 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33279 M01S01262.252l678 +++| UDA SPACE 4,10
| Line S01263 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33280 M02S01263.1mt50 ---|** UDA - UDT ADDRESS OF LABEL PARAMETERS (UUFN). 33281 M02S01264.1mt50 ---|* COMPUTE BEGINNING ADDRESS OF LABEL INFORMATION IN UDT.
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33282 M01S00009.1mt50 +++|** UDA - SET UDT ADDRESS OF VSN AND LABEL PARAMETERS.
| Line S01265 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33283 M01S01265.252l678 +++|*
| Line S01266 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33284 M02S01266.1mt50 ---|* EXIT (A) = BEGINNING ADDRESS OF LABEL INFORMATION IN UDT. 33285 M02S01267.1mt50 ---|* (T1) = WORD COUNT TO WRITE.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33286 M01S00010.1mt50 +++|* EXIT (A) = ADDRESS OF *UESN*. 33287 M01S00011.1mt50 +++|* (T1) = NUMBER OF UDT WORDS IN BLOCK.
| Line S01268 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33288 M01S01268.252l678 +++|* 33289 M01S01269.252l678 +++|* CALLS UAD. 33290 M01S01270.252l678 +++| 33291 M01S01271.252l678 +++| 33292 M01S01272.252l678 +++| UDA1 LDN 0 33293 M01S01273.252l678 +++| 33294 M01S01274.252l678 +++| UDA SUBR ENTRY/EXIT 33295 M01S01275.252l678 +++| LDM CECB 33296 M01S01276.252l678 +++| LPN 77 33297 M01S01277.252l678 +++| NJN UDA1 IF NOT AT MAGNET CP
| Line S01278 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33298 M02S01278.1mt50 ---| LDN /MTX/UUDTL
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33299 M01S00012.1mt50 +++| LDN /MTX/UUDTL+2
| Line S01279 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33300 M01S01279.252l678 +++| STD T1 33301 M01S01280.252l678 +++| RJM UAD
| Line S01281 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33302 M02S01281.1mt50 ---| ADN /MTX/UUFN
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33303 M01S00013.1mt50 +++| ADK /MTX/UESN 33304 M01S00014.1mt50 +++| ERRNZ /MTX/UISN-/MTX/UESN-1 33305 M01S00015.1mt50 +++| ERRNZ /MTX/UUFN-/MTX/UISN-1
| Line S01282 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33306 M01S01282.252l678 +++| UJN UDAX RETURN 33307 M01S01283.252l678 +++| WUC SPACE 4,15 33308 M01S01284.252l678 +++|** WUC - WRITE UNIT DESCRIPTOR TABLE CONDITIONALLY. 33309 M01S01285.252l678 +++|* UPDATE UDT CREATION DATE FOR SYMBOLIC ACCESS TMS TAPES. 33310 M01S01286.252l678 +++|* 33311 M01S01287.252l678 +++|* EXIT CREATION DATE FROM LABEL WRITTEN INTO *UDT* IF TAPE IS 33312 M01S01288.252l678 +++|* SYMBOLIC ACCESS. 33313 M01S01289.252l678 +++|* 33314 M01S01290.252l678 +++|* NOTE (A) IS PRESERVED. 33315 M01S01291.252l678 +++|* 33316 M01S01292.252l678 +++|* USES CM - CM+4. 33317 M01S01293.252l678 +++|* 33318 M01S01294.252l678 +++|* CALLS UAD, WUD. 33319 M01S01295.252l678 +++| 33320 M01S01296.252l678 +++| 33321 M01S01297.252l678 +++| WUC SUBR ENTRY/EXIT 33322 M01S01298.252l678 +++| STM WUCA+1 SAVE (A) 33323 M01S01299.252l678 +++| SHN -14 33324 M01S01300.252l678 +++| ADC LDCI 33325 M01S01301.252l678 +++| STM WUCA 33326 M01S01302.252l678 +++| LDM CECB CHECK CONTROL POINT 33327 M01S01303.252l678 +++| LPN 77 33328 M01S01304.252l678 +++| NJN WUC1 IF NOT AT MAGNET CP 33329 M01S01305.252l678 +++| RJM UAD GET UDT ADDRESS 33330 M01S01306.252l678 +++| ADN /MTX/UTMS 33331 M01S01307.252l678 +++| CRD CM CHECK FOR TMS TAPE, SYMBOLIC ACCESS 33332 M01S01308.252l678 +++| LDD CM+4 33333 M01S01309.252l678 +++| SHN 21-10 33334 M01S01310.252l678 +++| PJN WUC1 IF NOT SYMBOLIC ACCESS 33335 M01S01311.252l678 +++| LDM WUCB+0 SET CREATION DATE 33336 M01S01312.252l678 +++| STM WUCC+0 33337 M01S01313.252l678 +++| LDM WUCB+1 33338 M01S01314.252l678 +++| STM WUCC+1 33339 M01S01315.252l678 +++| LDM WUCC+2 33340 M01S01316.252l678 +++| LPN 77 33341 M01S01317.252l678 +++| STM WUCC+2 33342 M01S01318.252l678 +++| LDM WUCB+2 33343 M01S01319.252l678 +++| SCN 77 33344 M01S01320.252l678 +++| RAM WUCC+2 33345 M01S01321.252l678 +++| RJM WUD WRITE UNIT DESCRIPTOR TABLE 33346 M01S01322.252l678 +++| WUC1 BSS 0 33347 M01S01323.252l678 +++| WUCA LDC * RESTORE (A) 33348 M01S01324.252l678 +++| LJM WUCX RETURN 33349 M01S01325.252l678 +++| 33350 M01S01326.252l678 +++| WUCB EQU BUF+42D/2 CREATION DATE IN LABEL BUFFER 33351 M01S01327.252l678 +++|*WUCC EQU UDTB+/MTX/UDAT*5-/MTX/UUFN*5 CREATION DATE IN UDT 33352 M01S01328.252l678 +++| WUD SPACE 4,10
| Line S01329 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33353 M02S01329.1mt50 ---|** WUD - WRITE UNIT DESCRIPTOR TABLE. 33354 M02S01330.1mt50 ---|* OPERATION ONLY PERFORMED IF AT MAGNET CP.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33355 M01S00016.1mt50 +++|** WUD - WRITE UDT VSN AND LABEL INFORMATION.
| Line S01331 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33356 M01S01331.252l678 +++|* 33357 M01S01332.252l678 +++|* CALLS UDA. 33358 M01S01333.252l678 +++| 33359 M01S01334.252l678 +++| 33360 M01S01335.252l678 +++| WUD SUBR ENTRY/EXIT 33361 M01S01336.252l678 +++| RJM UDA GET UDT LABEL ADDRESS ADDRESS 33362 M01S01337.252l678 +++| ZJN WUDX IF NOT AT MAGNET CP
| Line S01338 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33363 M02S01338.1mt50 ---| CWM UDTB,T1
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33364 M01S00017.1mt50 +++| CWM EVSN,T1
| Line S01339 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33365 M01S01339.252l678 +++| UJN WUDX RETURN
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 33366 M01S00106.ns2786 +++| SCL SPACE 4,10 33367 M01S00107.ns2786 +++|** SCL - SET CENTURY IN LABEL. 33368 M01S00108.ns2786 +++|* GENERATES THE *ISO* STANDARD CENTURY CHARACTER, BASED ON THE 33369 M01S00109.ns2786 +++|* YEAR IN THE *UDT*, AND PLACES IT IN THE OUTPUT BUFFER. 33370 M01S00110.ns2786 +++|* 33371 M01S00111.ns2786 +++|* ENTRY (T7) = CHARACTER POSITION OF YEAR IN *UDT*. 33372 M01S00112.ns2786 +++|* (T6) = CHARACTER POSITION IN OUTPUT BUFFER. 33373 M01S00113.ns2786 +++|* 33374 M01S00114.ns2786 +++|* EXIT FILL CHARACTER PLACED IN OUTPUT BUFFER, 33375 M01S00115.ns2786 +++|* (* * FOR 19XX YEARS, *0* FOR 20XX YEARS). 33376 M01S00116.ns2786 +++|* (T7) = (A) = ORIGINAL (T7). 33377 M01S00117.ns2786 +++|* (T6) INCREMENTED. 33378 M01S00118.ns2786 +++|* 33379 M01S00119.ns2786 +++|* CALLS GUD, SLC. 33380 M01S00120.ns2786 +++|* 33381 M01S00121.ns2786 +++|* USES T7. 33382 M01S00122.ns2786 +++| 33383 M01S00123.ns2786 +++| 33384 M01S00124.ns2786 +++| SCL1 LDN 1R SPACE FILL 33385 M01S00125.ns2786 +++| SCL2 RJM SLC STORE LABEL CHARACTER 33386 M01S00126.ns2786 +++| SOD T7 33387 M01S00127.ns2786 +++| 33388 M01S00128.ns2786 +++| SCL SUBR ENTRY/EXIT 33389 M01S00129.ns2786 +++| RJM GUD GET TENS DIGIT OF YEAR 33390 M01S00130.ns2786 +++| SBN 1R7 33391 M01S00131.ns2786 +++| PJN SCL1 IF YEAR .LE. 1999 33392 M01S00132.ns2786 +++| LDN 1R0 ZERO FILL FOR NEXT CENTURY 33393 M01S00133.ns2786 +++| UJN SCL2 STORE CHARACTER AND RETURN 33394 M00S19317.1mt +++| SLC SPACE 4,10 33395 M00S19318.1mt +++|** SLC - STORE LABEL CHARACTER. 33396 M00S19319.1mt +++|* 33397 M00S19320.1mt +++|* ENTRY (T6) = CHARACTER POSITION IN *BUF*. 33398 M00S19321.1mt +++|* (A) = CHARACTER. 33399 M00S19322.1mt +++|* 33400 M00S19323.1mt +++|* EXIT (T6) = INCREMENTED. 33401 M00S19324.1mt +++|* 33402 M00S19325.1mt +++|* USES T1. 33403 M00S19326.1mt +++| 33404 M00S19327.1mt +++| 33405 M00S19328.1mt +++| SLC1 LDM BUF-1,T1 33406 M00S19329.1mt +++| SCN 77 33407 M00S19330.1mt +++| LMD T0 33408 M00S19331.1mt +++| SLC2 STM BUF-1,T1 33409 M00S19332.1mt +++| 33410 M00S19333.1mt +++| SLC SUBR ENTRY/EXIT 33411 M00S19334.1mt +++| STD T0 SAVE CHARACTER 33412 M00S19335.1mt +++| AOD T6 INCREMENT POSITION 33413 M00S19336.1mt +++| SHN 21 33414 M00S19337.1mt +++| STD T1 33415 M00S19338.1mt +++| SHN -21 33416 M00S19339.1mt +++| NJN SLC1 IF EVEN CHARACTER 33417 M00S19340.1mt +++| LDM BUF-1,T1 33418 M00S19341.1mt +++| LPN 77 33419 M00S19342.1mt +++| SHN 14 33420 M00S19343.1mt +++| LMD T0 33421 M00S19344.1mt +++| SHN 6 33422 M00S19345.1mt +++| UJN SLC2 STORE CHARACTER 33423 M00S19346.1mt +++| SFL SPACE 4,10 33424 M00S19347.1mt +++|** SFL - SPACE FILL LABEL. 33425 M00S19348.1mt +++|* 33426 M00S19349.1mt +++|* (A) = NUMBER OF SPACES. 33427 M00S19350.1mt +++|* (T6) = FIRST CHARACTER OF LABEL FIELD. 33428 M00S19351.1mt +++|* 33429 M00S19352.1mt +++|* CALLS SLC. 33430 M00S19353.1mt +++| 33431 M00S19354.1mt +++| 33432 M00S19355.1mt +++| SFL SUBR ENTRY/EXIT 33433 M00S19356.1mt +++| STD T5 33434 M00S19357.1mt +++| SFL1 LDN 1R 33435 M00S19358.1mt +++| RJM SLC STORE LABEL CHARACTER 33436 M00S19359.1mt +++| SOD T5 33437 M00S19360.1mt +++| NJN SFL1 IF STILL MORE CHARACTERS TO FILL 33438 M00S19361.1mt +++| UJN SFLX RETURN 33439 M00S19362.1mt +++| SPACE 4,10 33440 M00S19363.1mt +++|** COMMON DECKS. 33441 M00S19364.1mt +++| 33442 M00S19365.1mt +++| 33443 M00S19366.1mt +++|*CALL COMPC2D 33444 M00S19367.1mt +++| TITLE HARDWARE PROCESSING SUBROUTINES. 33445 M00S19368.1mt +++| WTM SPACE 4,10 33446 M00S19369.1mt +++|** WTM - WRITE TAPE MARKS. 33447 M00S19370.1mt +++|*
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | 1mt27 |
M02 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33448 M02S00042.1mt27a ---|* EXIT TO *WTE0* IF NOT READY OR NO WRITE ENABLE. 33449 M02S00043.1mt27a ---|* 33450 M00S19371.1mt +++|* CALLS FCN, STW, WTE. 33451 M00S19372.1mt +++| 33452 M00S19373.1mt +++|
| Line S19374 Modification History | |
|---|---|
M01 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33453 M01S19374.1mt27a ---|* MTS WRITE TAPE MARK. 33454 M01S19375.1mt27a ---|
| Line S19376 Modification History | |
|---|---|
M01 (Removed by) | 1mt27 |
M02 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33455 M02S19376.1mt27a ---| WTM1 LDN 51
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | 1mt27 |
M02 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33456 M02S00044.1mt27a ---| WTM1 AOM WTEB INCREMENT ERROR REPOSITIONING COUNTER 33457 M02S00045.1mt27a ---| LDN 51
| Line S19377 Modification History | |
|---|---|
M01 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33458 M01S19377.1mt27a ---| RJM FCN 33459 M01S19378.1mt27a ---| RJM WTE CHECK AND PROCESS ERRORS
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | 1mt27 |
M02 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33460 M02S00046.1mt27a ---| LDN 0 CLEAR ERROR REPOSITIONING COUNTER 33461 M02S00047.1mt27a ---| STM WTEB
| Line S19379 Modification History | |
|---|---|
M01 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33462 M01S19379.1mt27a ---| 33463 M00S19380.1mt +++| WTM SUBR ENTRY/EXIT
| Line S19381 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33464 M01S19381.274l797 ---| LDN 2 WAIT NOT BUSY
| Line S07791 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33465 M01S07791.274l797 +++| WTM0 LDN 2 WAIT NOT BUSY 33466 M00S19382.1mt +++| RJM STW
| Line S19383 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33467 M01S19383.274l797 ---| LDD DS CHECK FOR READY AND WRITE ENABLE
| Line S07792 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33468 M01S07792.274l797 +++| WTMA EQU *-1
| Line S07793 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33469 M02S07793.1mt44 ---|* RJM /PRESET/GPS 33470 M02S07794.1mt44 ---| PSN 33471 M02S07795.1mt44 ---| WTMB EQU *-1
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33472 M01S00043.1mt44 +++|* RJM /PRESET/GPS (IF CTS) 33473 M01S00044.1mt44 +++| WTMB PSN
| Line S07796 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33474 M01S07796.274l797 +++|* MJN WTM2 IF COMMAND RETRY (CTS) 33475 M01S07797.274l797 +++|* LDD DS CHECK FOR READY AND WRITE ENABLE 33476 M00S19384.1mt +++| LPC 201 33477 M00S19385.1mt +++| LMC 201
| Line S19386 Modification History | |
|---|---|
M01 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33478 M01S19386.1mt27a ---| ZJN WTM1 IF READY AND WRITE ENABLE
| Line S19387 Modification History | |
|---|---|
M01 (Removed by) | 1mt27 |
M02 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33479 M02S19387.1mt27a ---| RJM WTE WRITE TAPE MARK ERROR 33480 M02S19388.1mt27a ---| UJN WTM1 WRITE TAPE MARK
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 1mt27 |
M02 (Removed by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33481 M02S00048.1mt27a ---| LJM WTE0 WRITE TAPE MARK ERROR
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33482 M01S00077.1mt27a +++| NJN WTM1 IF NOT READY OR NO WRITE ENABLE 33483 M01S00078.1mt27a +++| 33484 M01S00079.1mt27a +++|* WRITE TAPE MARK. 33485 M01S00080.1mt27a +++|
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | 1mt27a |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33486 M02S00081.274l797 ---| LDN 51
| Line S07798 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33487 M01S07798.274l797 +++| LDN F0051
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33488 M01S00082.1mt27a +++| RJM FCN
| Line S07799 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33489 M01S07799.274l797 +++|* LDN 0
| Line S00083 Modification History | |
|---|---|
M01 (Added by) | 1mt27a |
Seq # *Modification Id* Act ----------------------------+ 33490 M01S00083.1mt27a +++| WTM1 RJM WTE CHECK AND PROCESS ERRORS 33491 M01S00084.1mt27a +++| UJN WTMX RETURN
| Line S07800 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33492 M01S07800.274l797 +++| 33493 M01S07801.274l797 +++| WTM2 LDN F0002 33494 M01S07802.274l797 +++| RJM /PRESET/ICF ISSUE CONTINUE FUNCTION 33495 M01S07803.274l797 +++| UJP WTM0 WAIT FOR END OF OPERATION 33496 M00S19389.1mt +++| SPACE 4,10 33497 M00S19390.1mt +++| TADD TSAD ADDRESS RELOCATION TABLE 33498 M00S19391.1mt +++| 33499 M00S19392.1mt +++| USE BUFFERS 33500 M00S19393.1mt +++| 33501 M00S19394.1mt +++| ERROVL
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33502 M01S00045.1mt44 +++|
| Line S19395 Modification History | |
|---|---|
M01 (Removed by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33503 M01S19395.1mt50 ---| UDTB EQU * UNIT DESCRIPTOR BUFFER
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 1mt50 |
Seq # *Modification Id* Act ----------------------------+ 33504 M01S00018.1mt50 +++| EVSN EQU * *UESN* 33505 M01S00019.1mt50 +++| IVSN EQU EVSN+5 *UISN* 33506 M01S00020.1mt50 +++| UDTB EQU IVSN+5 UDT LABEL PARAMETERS (*UUFN* - *UDAT*)
| Line S19396 Modification History | |
|---|---|
M01 (Removed by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33507 M01S19396.1mt44 ---| DCB EQU UDTB+/MTX/UUDTL*5
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33508 M01S00046.1mt44 +++| DCB EQU UDTB+/MTX/UUDTL*5 DATA CONVERSION BUFFER 33509 M01S00047.1mt44 +++|
| Line S01340 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33510 M01S01340.252l678 +++| WUCC EQU UDTB+/MTX/UDAT*5-/MTX/UUFN*5 CREATION DATE IN UDT
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33511 M01S00048.1mt44 +++| TITLE PRESET. 33512 M00S19397.1mt +++| PRS SPACE 4,10 33513 M00S19398.1mt +++|** PRS - PRESET. 33514 M00S19399.1mt +++|* 33515 M00S19400.1mt +++|* CALLS MCH. 33516 M00S19401.1mt +++| 33517 M00S19402.1mt +++| 33518 M00S19403.1mt +++| PRS LDC PRSA MODIFY CHANNELS 33519 M00S19404.1mt +++| RJM MCH
| Line S07804 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33520 M01S07804.274l797 +++| LDD HP 33521 M01S07805.274l797 +++| SHN 21-7 33522 M01S07806.274l797 +++| PJP PRS2 IF NOT CTS 33523 M01S07807.274l797 +++| LDC LDNI+CCW/10000 33524 M01S07808.274l797 +++| STM /WRITE/WCTA DO CODE CONVERSION 33525 M01S07809.274l797 +++| LDN CLBL 33526 M01S07810.274l797 +++| STM LTYP+1 LENGTH OF LABEL 33527 M00S19405.1mt +++| LDC LDNI+0
| Line S07811 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33528 M01S07811.274l797 +++| STM /WRITE/WCTD 33529 M01S07812.274l797 +++| STM /WRITE/WCTD+1 33530 M01S07813.274l797 +++| ISTORE /WRITE/WCTE,(UJN /WRITE/WCT5) 33531 M01S07814.274l797 +++| LDC 6321 BITS IN GENERAL STATUS TO CHECK 33532 M01S07815.274l797 +++| STM /PRESET/WFEA 33533 M01S07816.274l797 +++| LDC /PRESET/GPS 33534 M01S07817.274l797 +++| STM WTMA 33535 M01S07818.274l797 +++| ISTORE WTMB,(MJN WTM2) 33536 M01S07819.274l797 +++| LDK CPEL-1 33537 M01S07820.274l797 +++| STD T1 33538 M01S07821.274l797 +++| PRS1 LDM .CPE,T1 REPLACE *WTE* WITH *CPE* 33539 M01S07822.274l797 +++| STM WTEX,T1 33540 M01S07823.274l797 +++| SOD T1 33541 M01S07824.274l797 +++| PJN PRS1 IF MORE CODE TO MOVE 33542 M01S07825.274l797 +++| ISTORE ERAA,(UJN ERA1) SKIP ERASE GAP 33543 M01S07826.274l797 +++| ISTORE /WRITE/WCTJ,(UJN /WRITE/WRT7) SKIP READ CM BUFFER 33544 M01S07827.274l797 +++| LDC /WRITE/WCT2 SKIP CODE CONVERSION 33545 M01S07828.274l797 +++| STM /WRITE/WCTI 33546 M01S07829.274l797 +++| ISTORE /WRITE/WCTG,(UJN /WRITE/WCT7) SKIP READ OF CM BUFFER
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 1mt38 |
Seq # *Modification Id* Act ----------------------------+ 33547 M01S00024.1mt38 +++| ISTORE /WRITE/WCTM,(UJN /WRITE/WRT7) SKIP BLOCK COUNT UPDATE
| Line S07830 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33548 M01S07830.274l797 +++| UJN PRS3 SET SRU INCREMENT 33549 M01S07831.274l797 +++| 33550 M01S07832.274l797 +++| PRS2 LDC LDNI+0
| Line S19406 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33551 M01S19406.251l664 ---| STM /WRITE/WRTF 33552 M01S19407.251l664 ---| STM /WRITE/WRTF+1 33553 M01S19408.251l664 ---| LDC UJNI+2 33554 M01S19409.251l664 ---| STM /WRITE/WRTG
| Line S00155 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33555 M01S00155.251l664 +++| STM /WRITE/WRTC 33556 M01S00156.251l664 +++| STM /WRITE/WRTC+1 33557 M01S00157.251l664 +++| LDM PRSC 33558 M01S00158.251l664 +++| STM /WRITE/WRTD 33559 M01S00159.251l664 +++| LDM PRSD 33560 M01S00160.251l664 +++| STM /WRITE/WRTG
| Line S07833 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33561 M01S07833.274l797 +++| LDC 4625 33562 M01S07834.274l797 +++| STM //WEOA 33563 M01S07835.274l797 +++| PRS3 LDC /SRU/ITCL*100 SET SRU INCREMENT 33564 M01S07836.274l797 +++| STM //CECA 33565 M00S19410.1mt +++| LDM PRSB
| Line S19411 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33566 M01S19411.251l664 ---| STM /WRITE/WRTI
| Line S00161 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33567 M01S00161.251l664 +++| STM /WRITE/WRTH
| Line S19412 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33568 M01S19412.274l797 ---| LDC 4625 33569 M01S19413.274l797 ---| STM //WEOA 33570 M01S19414.274l797 ---| LDC /SRU/ITCL*100 SET SRU INCREMENT 33571 M01S19415.274l797 ---| STM //CECA 33572 M00S19416.1mt +++| LJM PRSX RETURN 33573 M00S19417.1mt +++| 33574 M00S19418.1mt +++| 33575 M00S19419.1mt +++| PRSA CHTB CHANNEL TABLE 33576 M00S19420.1mt +++| 33577 M00S19421.1mt +++| PRSB BSS 0
| Line S19422 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33578 M01S19422.251l664 ---| LOC /WRITE/WRTI
| Line S00162 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33579 M01S00162.251l664 +++| LOC /WRITE/WRTH 33580 M00S19423.1mt +++| UJN /WRITE/WRT7 CALCULATE DATA CHECKSUM 33581 M00S19424.1mt +++| LOC *O
| Line S00163 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33582 M01S00163.251l664 +++| 33583 M01S00164.251l664 +++| PRSC BSS 0 33584 M01S00165.251l664 +++| LOC /WRITE/WRTD 33585 M01S00166.251l664 +++| UJN /WRITE/WRT3.1 WRITE LABELS 33586 M01S00167.251l664 +++| LOC *O 33587 M01S00168.251l664 +++| 33588 M01S00169.251l664 +++| PRSD BSS 0 33589 M01S00170.251l664 +++| LOC /WRITE/WRTG 33590 M01S00171.251l664 +++| UJN /WRITE/WRT5 WRITE LABELS 33591 M01S00172.251l664 +++| LOC *O
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33592 M01S00049.1mt44 +++| TITLE CTS-SPECIFIC ROUTINES.
| Line S07837 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33593 M01S07837.274l797 +++| CPE SPACE 4,15 33594 M01S07838.274l797 +++|** CPE - CHECK AND PROCESS WRITE TAPE MARK ERRORS. 33595 M01S07839.274l797 +++|* 33596 M01S07840.274l797 +++|* THIS ROUTINE OVERLAYS *WTE* FOR CTS. 33597 M01S07841.274l797 +++|* 33598 M01S07842.274l797 +++|* ENTRY (A) .EQ. 0 IF STATUS SHOULD BE CHECKED. 33599 M01S07843.274l797 +++|* (A) .NE. 0 IF NOT READY OR NO WRITE ENABLE. 33600 M01S07844.274l797 +++|*
| Line S07845 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33601 M02S07845.1mt44 ---|* CALLS *CWP*, *EMM*.
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33602 M01S00050.1mt44 +++|* CALLS *CEM*, *CWP*.
| Line S07846 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33603 M01S07846.274l797 +++|* 33604 M01S07847.274l797 +++|* MACROS CALL. 33605 M01S07848.274l797 +++| 33606 M01S07849.274l797 +++| 33607 M01S07850.274l797 +++| .CPE BSS 0 33608 M01S07851.274l797 +++| LOC WTEX 33609 M01S07852.274l797 +++| CPE SUBR ENTRY/EXIT 33610 M01S07853.274l797 +++| ZJN CPE2 IF CHECK STATUS 33611 M01S07854.274l797 +++| LPN 1 33612 M01S07855.274l797 +++| NJN CPE1 IF NOT READY 33613 M01S07856.274l797 +++| LDN 3 33614 M01S07857.274l797 +++| STD EP SET SUB ERROR CODE 33615 M01S07858.274l797 +++| LDN /MTX/NWE 33616 M01S07859.274l797 +++| UJN CPE1.1 RETURN 33617 M01S07860.274l797 +++| 33618 M01S07861.274l797 +++| CPE1 LDN /MTX/RDR NOT READY 33619 M01S07862.274l797 +++| STD EC
| Line S07863 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33620 M02S07863.1mt44 ---| CALL EMM CALL ERROR HANDLER
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33621 M01S00051.1mt44 +++| CALL CEM CALL ERROR HANDLER
| Line S07864 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33622 M01S07864.274l797 +++| LDD EC 33623 M01S07865.274l797 +++| CPE1.1 LJM RET3 RETURN 33624 M01S07866.274l797 +++| 33625 M01S07867.274l797 +++| CPE2 STD EC 33626 M01S07868.274l797 +++| CPE3 RJM /PRESET/WFE WAIT FOR END OF OPERATION 33627 M01S07869.274l797 +++| MJN CPE5 IF COMMAND RETRY 33628 M01S07870.274l797 +++| LMN 20 EXPECT TAPE MARK STATUS 33629 M01S07871.274l797 +++| ZJN CPE4 IF NO ERROR 33630 M01S07872.274l797 +++| LDN /MTX/STE STATUS ERROR 33631 M01S07873.274l797 +++| CPE4 ADD EI 33632 M01S07874.274l797 +++| ZJN CPEX IF NO ERROR OR PREVIOUS ERROR 33633 M01S07875.274l797 +++| CALL CWP WRITE ERROR PROCESSOR 33634 M01S07876.274l797 +++| UJP CPEX RETURN 33635 M01S07877.274l797 +++| 33636 M01S07878.274l797 +++| CPE5 LDN F0002 33637 M01S07879.274l797 +++| RJM /PRESET/ICF ISSUE CONTINUE FUNCTION 33638 M01S07880.274l797 +++| UJN CPE3 WAIT FOR END OF OPERATION
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33639 M01S00052.1mt44 +++|
| Line S07881 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33640 M01S07881.274l797 +++| CPEL EQU *-CPEX LENGTH OF *CPE*
| Line S07882 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33641 M02S07882.1mt44 ---| ERRMI WTEB-* IF *CPE* OVERFLOWS
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | 1mt44 |
Seq # *Modification Id* Act ----------------------------+ 33642 M01S00053.1mt44 +++| ERRNG WTEB-* *CPE* LARGER THAN *WTE* 33643 M01S00054.1mt44 +++|
| Line S07883 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33644 M01S07883.274l797 +++| LOC *O 33645 M01S07884.274l797 +++| OVERLAY (CODE CONVERT LABEL TO WRITE.),(ERLB+5),P
| Line S07885 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33646 M02S07885.282l826 ---| CCW SPACE 4,15
| Line S01497 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33647 M01S01497.282l826 +++| CCW SPACE 4,10
| Line S07886 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33648 M01S07886.274l797 +++|** CCW - CODE CONVERT LABEL TO WRITE TO CTS. 33649 M01S07887.274l797 +++|* 33650 M01S07888.274l797 +++|* ENTRY (MD) = MODE FUNCTION.
| Line S07889 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | ns2794 |
Seq # *Modification Id* Act ----------------------------+ 33651 M02S07889.ns2794 ---|* (DC) = CONVERSION MODE.
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | ns2794 |
Seq # *Modification Id* Act ----------------------------+ 33652 M01S00050.ns2794 +++|* (DNCV) = CONVERSION MODE.
| Line S07890 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33653 M01S07890.274l797 +++|* (CF) = 63/64 CHARACTER SET FLAG. 33654 M01S07891.274l797 +++|*
| Line S07892 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33655 M02S07892.282l826 ---|* USES CM - CM+4, T1 - T1+3.
| Line S01498 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33656 M01S01498.282l826 +++|* USES T1, T2, T3.
| Line S07893 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33657 M01S07893.274l797 +++|* 33658 M01S07894.274l797 +++|* CALLS GCC, SCC. 33659 M01S07895.274l797 +++| 33660 M01S07896.274l797 +++| 33661 M01S07897.274l797 +++| ENTRY CCW 33662 M01S07898.274l797 +++| CCW SUBR ENTRY/EXIT 33663 M01S07899.274l797 +++| LDD MD 33664 M01S07900.274l797 +++| SHN 21-6 33665 M01S07901.274l797 +++| PJN CCW1 IF NOT CODED
| Line S07902 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33666 M02S07902.282l826 ---| LDD DC 33667 M02S07903.282l826 ---| SHN 21-0 33668 M02S07904.282l826 ---| PJN CCW1 IF ANSI
| Line S01499 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 33669 M01S01499.282l826 +++| LDM DNCV 33670 M01S01500.282l826 +++| LPN 7 33671 M01S01501.282l826 +++| LMN /MTX/ANS 33672 M01S01502.282l826 +++| ZJN CCW1 IF ASCII CONVERSION MODE
| Line S07905 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33673 M01S07905.274l797 +++| LDC EBCI 33674 M01S07906.274l797 +++| STM GCCA CODE MODIFICATION FOR EBCDIC 33675 M01S07907.274l797 +++| CCW1 LDD CF 33676 M01S07908.274l797 +++| LPN 1 33677 M01S07909.274l797 +++| NJN CCW2 IF 64 CHARACTER SET 33678 M01S07910.274l797 +++| LDK 0#20 33679 M01S07911.274l797 +++| STM ANSI+ANSIA MODIFY TABLES FOR 63 CHARACTER SET 33680 M01S07912.274l797 +++| LDK 0#3A 33681 M01S07913.274l797 +++| STM ANSI+ANSIB 33682 M01S07914.274l797 +++| LDN 0 33683 M01S07915.274l797 +++| STM EBCI+EBCIA 33684 M01S07916.274l797 +++| LDK 0#7A 33685 M01S07917.274l797 +++| STM EBCI+EBCIB 33686 M01S07918.274l797 +++| CCW2 LDC 79D 33687 M01S07919.274l797 +++| STD T1 POINTER TO CHARACTER TO CONVERT 33688 M01S07920.274l797 +++| LDC 64 33689 M01S07921.274l797 +++| STD T2 POINTER TO STORE CONVERTED CHARACTER 33690 M01S07922.274l797 +++| LDN 1 33691 M01S07923.274l797 +++| STD T3 1 OF 3 POSITIONS OF 8-BIT BYTE 33692 M01S07924.274l797 +++| LDN 0 33693 M01S07925.274l797 +++| STM BUF+1,T2 33694 M01S07926.274l797 +++| CCW3 RJM GCC GET CONVERTED CHARACTER 33695 M01S07927.274l797 +++| RJM SCC STORE CONVERTED CHARACTER 33696 M01S07928.274l797 +++| SOD T1 33697 M01S07929.274l797 +++| PJN CCW3 IF MORE CHARACTERS TO CONVERT 33698 M01S07930.274l797 +++| LJM CCWX RETURN 33699 M01S07931.274l797 +++| GCC SPACE 4,15 33700 M01S07932.274l797 +++|** GCC - GET CONVERTED CHARACTER. 33701 M01S07933.274l797 +++|* 33702 M01S07934.274l797 +++|* ENTRY (T1) = POINTER TO CHARACTER TO CONVERT. 33703 M01S07935.274l797 +++|* (T5) = CHARACTER TO CONVERT IF (T1) HAS EVEN VALUE. 33704 M01S07936.274l797 +++|* 33705 M01S07937.274l797 +++|* EXIT (T6) = CONVERTED CHARACTER. 33706 M01S07938.274l797 +++|* (T5) = NEXT CHARACTER TO CONVERT IF (T1) HAS ODD VALUE. 33707 M01S07939.274l797 +++| 33708 M01S07940.274l797 +++| 33709 M01S07941.274l797 +++| GCC SUBR ENTRY/EXIT 33710 M01S07942.274l797 +++| LDD T1 33711 M01S07943.274l797 +++| SHN 21-0 33712 M01S07944.274l797 +++| STD T6 33713 M01S07945.274l797 +++| PJN GCC1 IF LEFT MOST CHARACTER OF WORD 33714 M01S07946.274l797 +++| LDM BUF,T6 33715 M01S07947.274l797 +++| STD T5 33716 M01S07948.274l797 +++| LPN 77 33717 M01S07949.274l797 +++| UJN GCC2 SAVE CHARACTER TO CONVERT 33718 M01S07950.274l797 +++| 33719 M01S07951.274l797 +++| GCC1 LDD T5 33720 M01S07952.274l797 +++| SHN -6 33721 M01S07953.274l797 +++| GCC2 STD T6 CHARACTER TO CONVERT 33722 M01S07954.274l797 +++| LDM ANSI,T6 33723 M01S07955.274l797 +++| GCCA EQU *-1 33724 M01S07956.274l797 +++|* LDM EBCI,T6 (EBCDIC) 33725 M01S07957.274l797 +++| STD T6 33726 M01S07958.274l797 +++| UJN GCCX RETURN 33727 M01S07959.274l797 +++| SCC SPACE 4,15 33728 M01S07960.274l797 +++|** SCC - STORE CONVERTED CHARACTER. 33729 M01S07961.274l797 +++|* 33730 M01S07962.274l797 +++|* THIS ROUTINE CONVERTS ONE OF THE 80 CHARACTERS OF THE 33731 M01S07963.274l797 +++|* LABEL FROM DISPLAY CODE TO ASCII OR EBCDIC AND STORES 33732 M01S07964.274l797 +++|* IT IN THE LABEL BUFFER. 33733 M01S07965.274l797 +++|* 33734 M01S07966.274l797 +++|* ENTRY (T6) = CONVERTED CHARACTER. 33735 M01S07967.274l797 +++|* (T2) = POINTER TO STORE CHARACTER. 33736 M01S07968.274l797 +++|* (T3) = 1 0F 3 POSITIONS TO STORE 8-BIT BYTE. 33737 M01S07969.274l797 +++| 33738 M01S07970.274l797 +++| 33739 M01S07971.274l797 +++| SCC3 SOD T3 33740 M01S07972.274l797 +++| 33741 M01S07973.274l797 +++| SCC SUBR ENTRY/EXIT 33742 M01S07974.274l797 +++| LDD T3 33743 M01S07975.274l797 +++| NJN SCC1 IF NOT BYTE 1 OF 3 33744 M01S07976.274l797 +++| LDD T6 33745 M01S07977.274l797 +++| SHN 4 33746 M01S07978.274l797 +++| RAM BUF,T2 33747 M01S07979.274l797 +++| LDN 2 33748 M01S07980.274l797 +++| STD T3 33749 M01S07981.274l797 +++| LCN 2 33750 M01S07982.274l797 +++| RAD T2 33751 M01S07983.274l797 +++| UJN SCCX RETURN 33752 M01S07984.274l797 +++| 33753 M01S07985.274l797 +++| SCC1 SBN 1 33754 M01S07986.274l797 +++| NJN SCC2 IF NOT BYTE 2 OF 3 33755 M01S07987.274l797 +++| LDD T6 33756 M01S07988.274l797 +++| SHN 10 33757 M01S07989.274l797 +++| RAM BUF+1,T2 33758 M01S07990.274l797 +++| SHN -14 33759 M01S07991.274l797 +++| STM BUF,T2 33760 M01S07992.274l797 +++| UJN SCC3 UPDATE POINTER 33761 M01S07993.274l797 +++| 33762 M01S07994.274l797 +++| SCC2 LDD T6 33763 M01S07995.274l797 +++| STM BUF+1,T2 33764 M01S07996.274l797 +++| UJP SCC3 UPDATE POINTER 33765 M01S07997.274l797 +++| ANSI SPACE 4,10 33766 M01S07998.274l797 +++|** ATANS - TABLE TO CONVERT DISPLAY TO ASCII. 33767 M01S07999.274l797 +++| 33768 M01S08000.274l797 +++| 33769 M01S08001.274l797 +++| ANSI BSS 0 33770 M01S08002.274l797 +++| LOC 0 33771 M01S08003.274l797 +++| CON 0#3A COLON 33772 M01S08004.274l797 +++| ANSIA EQU *-1 33773 M01S08005.274l797 +++|* CON 0#20 (63 CHARACTER SET - SPACE) 33774 M01S08006.274l797 +++| CON 0#41 A 33775 M01S08007.274l797 +++| CON 0#42 B 33776 M01S08008.274l797 +++| CON 0#43 C 33777 M01S08009.274l797 +++| CON 0#44 D 33778 M01S08010.274l797 +++| CON 0#45 E 33779 M01S08011.274l797 +++| CON 0#46 F 33780 M01S08012.274l797 +++| CON 0#47 G 33781 M01S08013.274l797 +++| CON 0#48 H 33782 M01S08014.274l797 +++| CON 0#49 I 33783 M01S08015.274l797 +++| CON 0#4A J 33784 M01S08016.274l797 +++| CON 0#4B K 33785 M01S08017.274l797 +++| CON 0#4C L 33786 M01S08018.274l797 +++| CON 0#4D M 33787 M01S08019.274l797 +++| CON 0#4E N 33788 M01S08020.274l797 +++| CON 0#4F O 33789 M01S08021.274l797 +++| CON 0#50 P 33790 M01S08022.274l797 +++| CON 0#51 Q 33791 M01S08023.274l797 +++| CON 0#52 R 33792 M01S08024.274l797 +++| CON 0#53 S 33793 M01S08025.274l797 +++| CON 0#54 T 33794 M01S08026.274l797 +++| CON 0#55 U 33795 M01S08027.274l797 +++| CON 0#56 V 33796 M01S08028.274l797 +++| CON 0#57 W 33797 M01S08029.274l797 +++| CON 0#58 X 33798 M01S08030.274l797 +++| CON 0#59 Y 33799 M01S08031.274l797 +++| CON 0#5A Z 33800 M01S08032.274l797 +++| CON 0#30 0 33801 M01S08033.274l797 +++| CON 0#31 1 33802 M01S08034.274l797 +++| CON 0#32 2 33803 M01S08035.274l797 +++| CON 0#33 3 33804 M01S08036.274l797 +++| CON 0#34 4 33805 M01S08037.274l797 +++| CON 0#35 5 33806 M01S08038.274l797 +++| CON 0#36 6 33807 M01S08039.274l797 +++| CON 0#37 7 33808 M01S08040.274l797 +++| CON 0#38 8 33809 M01S08041.274l797 +++| CON 0#39 9 33810 M01S08042.274l797 +++| CON 0#2B PLUS 33811 M01S08043.274l797 +++| CON 0#2D HYPHEN 33812 M01S08044.274l797 +++| CON 0#2A ASTERISK 33813 M01S08045.274l797 +++| CON 0#2F SLANT 33814 M01S08046.274l797 +++| CON 0#28 OPENING PAREN 33815 M01S08047.274l797 +++| CON 0#29 CLOSING PAREN 33816 M01S08048.274l797 +++| CON 0#24 DOLLAR SIGN 33817 M01S08049.274l797 +++| CON 0#3D EQUALS 33818 M01S08050.274l797 +++| CON 0#20 SPACE 33819 M01S08051.274l797 +++| CON 0#2C PERIOD 33820 M01S08052.274l797 +++| CON 0#2E COMMA 33821 M01S08053.274l797 +++| CON 0#23 NUMBER SIGN 33822 M01S08054.274l797 +++| CON 0#5B OPEN BRACKET 33823 M01S08055.274l797 +++| CON 0#5D CLOSING BRACKET 33824 M01S08056.274l797 +++| CON 0#25 PERCENT 33825 M01S08057.274l797 +++| ANSIB EQU *-1 33826 M01S08058.274l797 +++|* CON 0#3A (63 CHARACTER SET - PERCENT) 33827 M01S08059.274l797 +++| CON 0#22 QUOTATION MARKS 33828 M01S08060.274l797 +++| CON 0#5F UNDERLINE 33829 M01S08061.274l797 +++| CON 0#21 EXCLAMATION POINT 33830 M01S08062.274l797 +++| CON 0#26 AMPERSAND 33831 M01S08063.274l797 +++| CON 0#27 APOSTROPHE 33832 M01S08064.274l797 +++| CON 0#3F QUESTION MARK 33833 M01S08065.274l797 +++| CON 0#3C LESS THAN 33834 M01S08066.274l797 +++| CON 0#3E GREATER THAN 33835 M01S08067.274l797 +++| CON 0#40 COMMERCIAL AT 33836 M01S08068.274l797 +++| CON 0#5C REVERSE SLANT 33837 M01S08069.274l797 +++| CON 0#5E CIRCUMFLEX 33838 M01S08070.274l797 +++| CON 0#3B SEMICOLON 33839 M01S08071.274l797 +++| LOC *O 33840 M01S08072.274l797 +++| EBCI SPACE 4,10 33841 M01S08073.274l797 +++|** EBCI - TABLE TO CONVERT DISPLAY TO EBCDIC. 33842 M01S08074.274l797 +++| 33843 M01S08075.274l797 +++| 33844 M01S08076.274l797 +++| EBCI BSS 0 33845 M01S08077.274l797 +++| LOC 0 33846 M01S08078.274l797 +++| 33847 M01S08079.274l797 +++| CON 0#7A COLON 33848 M01S08080.274l797 +++| EBCIA EQU *-1 33849 M01S08081.274l797 +++|* CON 0 (63 CHARACTER SET - COLON) 33850 M01S08082.274l797 +++| CON 0#C1 A 33851 M01S08083.274l797 +++| CON 0#C2 B 33852 M01S08084.274l797 +++| CON 0#C3 C 33853 M01S08085.274l797 +++| CON 0#C4 D 33854 M01S08086.274l797 +++| CON 0#C5 E 33855 M01S08087.274l797 +++| CON 0#C6 F 33856 M01S08088.274l797 +++| CON 0#C7 G 33857 M01S08089.274l797 +++| CON 0#C8 H 33858 M01S08090.274l797 +++| CON 0#C9 I 33859 M01S08091.274l797 +++| CON 0#D1 J 33860 M01S08092.274l797 +++| CON 0#D2 K 33861 M01S08093.274l797 +++| CON 0#D3 L 33862 M01S08094.274l797 +++| CON 0#D4 M 33863 M01S08095.274l797 +++| CON 0#D5 N 33864 M01S08096.274l797 +++| CON 0#D6 O 33865 M01S08097.274l797 +++| CON 0#D7 P 33866 M01S08098.274l797 +++| CON 0#D8 Q 33867 M01S08099.274l797 +++| CON 0#D9 R 33868 M01S08100.274l797 +++| CON 0#E2 S 33869 M01S08101.274l797 +++| CON 0#E3 T 33870 M01S08102.274l797 +++| CON 0#E4 U 33871 M01S08103.274l797 +++| CON 0#E5 V 33872 M01S08104.274l797 +++| CON 0#E6 W 33873 M01S08105.274l797 +++| CON 0#E7 X 33874 M01S08106.274l797 +++| CON 0#E8 Y 33875 M01S08107.274l797 +++| CON 0#E9 Z 33876 M01S08108.274l797 +++| CON 0#F0 0 33877 M01S08109.274l797 +++| CON 0#F1 1 33878 M01S08110.274l797 +++| CON 0#F2 2 33879 M01S08111.274l797 +++| CON 0#F3 3 33880 M01S08112.274l797 +++| CON 0#F4 4 33881 M01S08113.274l797 +++| CON 0#F5 5 33882 M01S08114.274l797 +++| CON 0#F6 6 33883 M01S08115.274l797 +++| CON 0#F7 7 33884 M01S08116.274l797 +++| CON 0#F8 8 33885 M01S08117.274l797 +++| CON 0#F9 9 33886 M01S08118.274l797 +++| CON 0#4E PLUS 33887 M01S08119.274l797 +++| CON 0#60 HYPHEN 33888 M01S08120.274l797 +++| CON 0#5C ASTERISK 33889 M01S08121.274l797 +++| CON 0#61 SLANT 33890 M01S08122.274l797 +++| CON 0#4D OPENING PAREN 33891 M01S08123.274l797 +++| CON 0#5D CLOSING PAREN 33892 M01S08124.274l797 +++| CON 0#5B DOLLAR SIGN 33893 M01S08125.274l797 +++| CON 0#7E EQUALS 33894 M01S08126.274l797 +++| CON 0#40 SPACE 33895 M01S08127.274l797 +++| CON 0#6B PERIOD 33896 M01S08128.274l797 +++| CON 0#4B COMMA 33897 M01S08129.274l797 +++| CON 0#7B NUMBER SIGN 33898 M01S08130.274l797 +++| CON 0#4A OPEN BRACKET 33899 M01S08131.274l797 +++| CON 0#5A CLOSING BRACKET 33900 M01S08132.274l797 +++| CON 0#6C PERCENT 33901 M01S08133.274l797 +++| EBCIB EQU *-1 33902 M01S08134.274l797 +++|* CON 0#7A (63 CHARACTER SET - COLON) 33903 M01S08135.274l797 +++| CON 0#7F QUOTATION MARKS 33904 M01S08136.274l797 +++| CON 0#6D UNDERLINE 33905 M01S08137.274l797 +++| CON 0#4F EXCLAMATION POINT 33906 M01S08138.274l797 +++| CON 0#50 AMPERSAND 33907 M01S08139.274l797 +++| CON 0#7D APOSTROPHE 33908 M01S08140.274l797 +++| CON 0#6F QUESTION MARK 33909 M01S08141.274l797 +++| CON 0#4C LESS THAN 33910 M01S08142.274l797 +++| CON 0#6E GREATER THAN 33911 M01S08143.274l797 +++| CON 0#7C COMMERCIAL AT 33912 M01S08144.274l797 +++| CON 0#E0 REVERSE SLANT 33913 M01S08145.274l797 +++| CON 0#5F CIRCUMFLEX 33914 M01S08146.274l797 +++| CON 0#5E SEMICOLON 33915 M01S08147.274l797 +++| LOC *O 33916 M01S08148.274l797 +++| ERRNG 473+ERLB+5-* IF OVERLAY LONGER THAN ONE PRU 33917 M00S19425.1mt +++| OVERLAY (MTS/ATS WRITE ERROR PROCESSOR.),(BUFB+10),P 33918 M00S19426.1mt +++| WEM SPACE 4,10 33919 M00S19427.1mt +++|** WEM - WRITE ERROR PROCESSOR. 33920 M00S19428.1mt +++|*
| Line S19429 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33921 M01S19429.252l678 ---|* ENTRY (EP, 13) = VERIFY IN PROGRESS. 33922 M01S19430.252l678 ---|* (EP, 12) = ERASE ERROR HAS OCCURRED.
| Line S01341 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33923 M01S01341.252l678 +++|* ENTRY (EP, 11) = VERIFY IN PROGRESS. 33924 M01S01342.252l678 +++|* (EP, 10) = ERASE ERROR HAS OCCURRED. 33925 M01S01343.252l678 +++|* (EP, 9) = LOAD POINT ERROR FLAG. 33926 M01S01344.252l678 +++|* (EP, 8) = LOAD POINT RECOVERY FLAG. 33927 M00S19431.1mt +++|* (EP+1, 5 - 0) = NUMBER OF ERASES. 33928 M00S19432.1mt +++|* 33929 M00S19433.1mt +++|* CALLS /CPP/CAL, CFC, /WRITE/CNW, *CPP*, EBW, *EMM*, EOT,
| Line S19434 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33930 M01S19434.252l678 ---|* /CPP/INM, MCH, POT, PRS, RCI, /CPP/SFP.
| Line S01345 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33931 M01S01345.252l678 +++|* /CPP/INM, MCH, POT, PRS, RCI, /CPP/SFP, WLP. 33932 M00S19435.1mt +++|* 33933 M00S19436.1mt +++|* MACROS CALL. 33934 M00S19437.1mt +++| 33935 M00S19438.1mt +++| 33936 M00S19439.1mt +++| ENTRY WEM 33937 M00S19440.1mt +++| WEM SUBR ENTRY 33938 M00S19441.1mt +++| LDM //LOV SAVE CALLERS EXIT ADDRESS 33939 M00S19442.1mt +++| STM WEMH 33940 M00S19443.1mt +++| LDC WEM1 SET ADDRESS TO ENTER AT 33941 M00S19444.1mt +++| STM //LOV 33942 M00S19445.1mt +++| UJN WEMX RETURN 33943 M00S19446.1mt +++| 33944 M00S19447.1mt +++| WEM1 LDD MA SAVE OUT POINTER 33945 M00S19448.1mt +++| CWD CN 33946 M00S19449.1mt +++| CRM WEMI,ON 33947 M00S19450.1mt +++| LDC CTAB MODIFY CHANNELS 33948 M00S19451.1mt +++| RJM MCH 33949 M00S19452.1mt +++| RJM PRS 33950 M00S19453.1mt +++| RJM EBW EVALUATE BID WINDOW 33951 M00S19454.1mt +++| RJM CFC RECONNECT UNIT 33952 M00S19455.1mt +++| LDM //STER RESTORE STATUS 33953 M00S19456.1mt +++| STD DS 33954 M00S19457.1mt +++| LPN 1
| Line S19458 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33955 M01S19458.252l678 ---| NJN WEM2 IF READY
| Line S01346 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33956 M01S01346.252l678 +++| NJN WEM2 IF READY 33957 M00S19459.1mt +++| LDN /MTX/RDR 33958 M00S19460.1mt +++| STD EC
| Line S19461 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33959 M01S19461.252l678 ---| WEM2 LDD FN
| Line S01347 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 33960 M01S01347.252l678 +++| UJN WEM2.1 NO LOAD POINT RECOVERY IF NOT READY 33961 M01S01348.252l678 +++| 33962 M01S01349.252l678 +++| WEM2 RJM WLP CHECK FOR LOAD POINT RECOVERY 33963 M01S01350.252l678 +++|* UJN WEM2.1 (NOT ATS CONTROLLER) 33964 M01S01351.252l678 +++| WEML EQU *-2 33965 M01S01352.252l678 +++| MJN WEM2.1 IF NO LOAD POINT ERROR OR ERROR RECOVERED 33966 M01S01353.252l678 +++| CALL EMM ISSUE MESSAGE 33967 M01S01354.252l678 +++| LDN 0 33968 M01S01355.252l678 +++| STD EC 33969 M01S01356.252l678 +++| AOD EI 33970 M01S01357.252l678 +++| LJM RET2 RETRY ON *BFW* ERROR 33971 M01S01358.252l678 +++| 33972 M01S01359.252l678 +++| WEM2.1 LDD FN LOAD MAGNET FUNCTION CODE 33973 M00S19462.1mt +++| LMN /MTX/WLA 33974 M00S19463.1mt +++| NJN WEM3 IF NOT WRITE LABELS 33975 M00S19464.1mt +++| LDC RET2 FORCE REQUEUE AFTER WRITE IS GOOD 33976 M00S19465.1mt +++| STM /WLA/WLAG 33977 M00S19466.1mt +++| AOM POTD
| Line S19467 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33978 M01S19467.251l664 ---| WEM3 LDM /WRITE/WTFA CHECK IF EOF REQUEST DETECTED AHEAD
| Line S00173 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 33979 M01S00173.251l664 +++| WEM3 LDM /WRITE/WTFE CHECK IF EOF REQUEST DETECTED AHEAD
| Line S08149 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 33980 M01S08149.274l797 +++| WEMK EQU *-1 33981 M01S08150.274l797 +++|* LDM /WLI/WLIA (LI FORMAT) 33982 M00S19468.1mt +++| LMN 1 33983 M00S19469.1mt +++| NJN WEM4 IF NOT EOF REQUEST 33984 M00S19470.1mt +++| LDD MD 33985 M00S19471.1mt +++| SCN 14 33986 M00S19472.1mt +++| STD MD 33987 M00S19473.1mt +++| WEM4 LDD EC 33988 M00S19474.1mt +++| ZJN WEM6 IF VERIFY OPERATION 33989 M00S19475.1mt +++| LMN /MTX/STE 33990 M00S19476.1mt +++| NJN WEM7 IF NOT STATUS ERROR 33991 M00S19477.1mt +++| LDD DS 33992 M00S19478.1mt +++| SHN 21-3 33993 M00S19479.1mt +++| PJN WEM7 IF NOT EOT 33994 M00S19480.1mt +++| SHN 12 33995 M00S19481.1mt +++| PJN WEM5 IF NO OTHER ERRORS 33996 M00S19482.1mt +++| LDM MTDS 33997 M00S19483.1mt +++| LPC 7077 33998 M00S19484.1mt +++| WEMA EQU *-1 33999 M00S19485.1mt +++|* LPC 7777 (ATS UNIT) 34000 M00S19486.1mt +++| NJN WEM7 IF OTHER ERRORS 34001 M00S19487.1mt +++| WEM5 RJM EOT 34002 M00S19488.1mt +++| WEM6 LJM WEM10 POSITION TAPE 34003 M00S19489.1mt +++| 34004 M00S19490.1mt +++| WEM7 LDD DS CHECK FOR NON-FATAL ERRORS 34005 M00S19491.1mt +++| SHN 21-13 34006 M00S19492.1mt +++| PJN WEM8 IF OTHER ERRORS 34007 M00S19493.1mt +++| LDM MTDS 34008 M00S19494.1mt +++| LPC 7077 34009 M00S19495.1mt +++| WEMB EQU *-1 34010 M00S19496.1mt +++|* LPC 7777 (ATS UNIT) 34011 M00S19497.1mt +++| NJN WEM8 IF FATAL ERRORS 34012 M00S19498.1mt +++| STD EC
| Line S19499 Modification History | |
|---|---|
M01 (Removed by) | 1mt2 |
Seq # *Modification Id* Act ----------------------------+ 34013 M01S19499.1mt2 ---| WEMC UJN WEM6
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1mt2 |
Seq # *Modification Id* Act ----------------------------+ 34014 M01S00001.1mt2 +++| AOM WEME SET ACCEPT DATA FLAG 34015 M01S00002.1mt2 +++| WEMC UJN WEM8 PROCESS MTS DATA 34016 M00S19500.1mt +++|* LDM MTDS+1 (ATS UNIT) 34017 M00S19501.1mt +++| CON MTDS+1 34018 M00S19502.1mt +++| SHN -11 34019 M00S19503.1mt +++| LPN 3
| Line S19504 Modification History | |
|---|---|
M01 (Removed by) | 1mt2 |
Seq # *Modification Id* Act ----------------------------+ 34020 M01S19504.1mt2 ---| ZJN WEM10 IF NOT ON-THE-FLY 34021 M01S19505.1mt2 ---| AOM WEME SET ACCEPT FLAG
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1mt2 |
M02 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 34022 M02S00003.ns21000 ---| ZJN WEM8 IF NOT ON THE FLY
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 34023 M01S00273.ns21000 +++| ZJN WEM7.1 IF NOT ON-THE-FLY 34024 M00S19506.1mt +++| LDN /MTX/OTF 34025 M00S19507.1mt +++| STD EC
| Line S00274 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 34026 M01S00274.ns21000 +++| UJN WEM8 PROCESS CORRECTED BLOCK 34027 M01S00275.ns21000 +++| 34028 M01S00276.ns21000 +++| WEM7.1 LDD HN 34029 M01S00277.ns21000 +++| RAM ECNT+1 INCREMENT LATE DATA COUNTER 34030 M01S00278.ns21000 +++| SHN -14 34031 M01S00279.ns21000 +++| RAM ECNT 34032 M00S19508.1mt +++| WEM8 LDD SP 34033 M00S19509.1mt +++| LPN 4 34034 M00S19510.1mt +++| RAM WEME SET ACCEPT WRITE FLAG 34035 M00S19511.1mt +++| LDD SP 34036 M00S19512.1mt +++| LPN 4 34037 M00S19513.1mt +++| NJN WEM9 IF ERROR PROCESSING INHIBITED
| Line S19514 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34038 M01S19514.274l797 ---| LDM /WRITE/BYWR SET BYTE COUNT
| Line S08151 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34039 M01S08151.274l797 +++| LDM /WRITE/BYWR SET BYTE COUNT 34040 M00S19515.1mt +++| STD BY 34041 M00S19516.1mt +++| LDC -0 RESTORE BID 34042 M00S19517.1mt +++| WEMD EQU *-1 34043 M00S19518.1mt +++| STM UBWB 34044 M00S19519.1mt +++| CALL EMM DIAGNOSE ERROR 34045 M00S19520.1mt +++| RJM CFC RECONNECT UNIT 34046 M00S19521.1mt +++| WEM9 LDD EC 34047 M00S19522.1mt +++| SBN /MTX/BFAT 34048 M00S19523.1mt +++| MJN WEM10 IF NOT FATAL ERROR 34049 M00S19524.1mt +++| SBN /MTX/MFAT-/MTX/BFAT 34050 M00S19525.1mt +++| PJN WEM10 IF NOT FATAL ERROR 34051 M00S19526.1mt +++| LJM RET4 RETURN FATAL ERROR 34052 M00S19527.1mt +++| 34053 M00S19528.1mt +++| WEM10 LDC 0 ACCEPT DATA FLAG 34054 M00S19529.1mt +++| WEME EQU *-1 34055 M00S19530.1mt +++| NJN WEM11 IF ACCEPT DATA 34056 M00S19531.1mt +++| RJM POT POSITION TAPE 34057 M00S19532.1mt +++| WEMF EQU *-2 34058 M00S19533.1mt +++|* UJN *+2 (DISCARD BLOCK AT EOT) 34059 M00S19534.1mt +++| WEM11 LDN 0 CLEAR ERROR CODE 34060 M00S19535.1mt +++| STD EC
| Line S19536 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 34061 M01S19536.v23l617 ---| CALL CPP RELOAD ADDRESS RELOCATOR
| Line S00531 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 34062 M01S00531.v23l617 +++| WEMJ LDN 1 34063 M01S00532.v23l617 +++|* LDN 0 (FORMAT CHANGE)
| Line S00533 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34064 M02S00533.274l797 ---| NJN WEM11.1 IF FORMAT PARAMETERS NOT CHANGES
| Line S08152 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34065 M01S08152.274l797 +++| NJN WEM11.1 IF FORMAT PARAMETERS NOT CHANGED
| Line S00534 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 34066 M01S00534.v23l617 +++| STM //RELA 34067 M01S00535.v23l617 +++| WEM11.1 CALL CPP RELOAD ADDRESS RELOCATOR
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1mt10 |
Seq # *Modification Id* Act ----------------------------+ 34068 M01S00001.1mt10 +++| LDM WEMD RESTORE BLOCK ID 34069 M01S00002.1mt10 +++| STM UBWB
| Line S19537 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34070 M01S19537.274l797 ---| LDM /WRITE/BYWR RESET BYTE COUNT
| Line S08153 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34071 M01S08153.274l797 +++| LDM /WRITE/BYWR RESET BYTE COUNT 34072 M00S19538.1mt +++| STD BY 34073 M00S19539.1mt +++| LDD FN 34074 M00S19540.1mt +++| LMN /MTX/WLA 34075 M00S19541.1mt +++| NJN WEM12 IF NOT WRITE LABELS 34076 M00S19542.1mt +++| LJM WEM15 EXIT 34077 M00S19543.1mt +++| 34078 M00S19544.1mt +++| WEM12 RJM RCI READ UDT 34079 M00S19545.1mt +++| RJM /CPP/CAL CALCULATE PARAMETERS 34080 M00S19546.1mt +++| LDC ADDR MODIFY INSTRUCTIONS 34081 M00S19547.1mt +++| RJM /CPP/INM 34082 M00S19548.1mt +++| LDM WEME 34083 M00S19549.1mt +++| ZJN WEM13 IF REREAD DATA 34084 M00S19550.1mt +++| LDN 0 CLEAR ERROR PARAMATERS 34085 M00S19551.1mt +++| STD EP 34086 M00S19552.1mt +++| STD EP+1 34087 M00S19553.1mt +++| STD EI 34088 M00S19554.1mt +++| LDD MA RESTORE OUT POINTER 34089 M00S19555.1mt +++| CWM WEMI,ON 34090 M00S19556.1mt +++| SBN 1 34091 M00S19557.1mt +++| CRD CN
| Line S19558 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 34092 M01S19558.251l664 ---| LDM /WRITE/WTFA CHECK IF EOF REQUEST DETECTED AHEAD
| Line S00174 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 34093 M01S00174.251l664 +++| LDM /WRITE/WTFE CHECK IF EOF REQUEST DETECTED AHEAD
| Line S08154 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34094 M01S08154.274l797 +++| WEMM EQU *-1 34095 M01S08155.274l797 +++|* LDM /WLI/WLIA (LI FORMAT) 34096 M00S19559.1mt +++| LMN 1 34097 M00S19560.1mt +++| NJN WEM14 IF NOT EOF REQUEST 34098 M00S19561.1mt +++| LDN 14 SET EOF STATUS 34099 M00S19562.1mt +++| RAD MD 34100 M00S19563.1mt +++| UJN WEM15 EXIT 34101 M00S19564.1mt +++| 34102 M00S19565.1mt +++| WEM13 LDN 3 READ OUT POINTER 34103 M00S19566.1mt +++| RJM /CPP/SFP 34104 M00S19567.1mt +++| WEM14 RJM /WRITE/CNW 34105 M00S19568.1mt +++| WEMG EQU *-2 34106 M00S19569.1mt +++|* UJN *+2 (DISCARD BLOCK AT EOT)
| Line S08156 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34107 M01S08156.274l797 +++|* RJM /WLI/CNW (LI FORMAT) 34108 M00S19570.1mt +++| WEM15 LJM * EXIT 34109 M00S19571.1mt +++| WEMH EQU *-1 34110 M00S19572.1mt +++| 34111 M00S19573.1mt +++| 34112 M00S19574.1mt +++| WEMI EQU WEM 34113 M00S19575.1mt +++| TBDW EQU WEMI+5 TEMPORARY BID WINDOW 34114 M00S19576.1mt +++| ERRNG WEM1-TBDW BUFFER OVERFLOW 34115 M00S19577.1mt +++| EOT SPACE 4,10 34116 M00S19578.1mt +++|** EOT - END OF TAPE PROCESSOR. 34117 M00S19579.1mt +++| 34118 M00S19580.1mt +++|
| Line S19581 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34119 M01S19581.252l678 ---| EOT4 LDC EOT3 SET TO RETURN HERE AFTER POINTER UPDATE
| Line S01360 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34120 M01S01360.252l678 +++| EOT3 LDC EOTEXIT SET TO RETURN HERE AFTER POINTER UPDATE
| Line S19582 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 34121 M01S19582.251l664 ---| STM /WRITE/WRTL
| Line S00175 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 34122 M01S00175.251l664 +++| STM /WRITE/WRTK
| Line S08157 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34123 M01S08157.274l797 +++| EOTA EQU *-1 34124 M01S08158.274l797 +++|* STM /WLI/WRTK (LI FORMAT) 34125 M00S19583.1mt +++| LDD EI 34126 M00S19584.1mt +++| ZJN EOTX IF RECOVERY NOT IN PROGRESS 34127 M00S19585.1mt +++| LDN 0 SET TO VERIFY REWRITE AND ISSUE MESSAGE 34128 M00S19586.1mt +++| STM WEME 34129 M00S19587.1mt +++| STD EC 34130 M00S19588.1mt +++| 34131 M00S19589.1mt +++| EOT SUBR ENTRY/EXIT 34132 M00S19590.1mt +++| AOM WEME SET ACCEPT DATA FLAG 34133 M00S19591.1mt +++| LDD SP 34134 M00S19592.1mt +++| SHN -12
| Line S19593 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34135 M01S19593.252l678 ---| ZJN EOT4 IF TERMINATE WITH TAPE MARK
| Line S01361 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34136 M01S01361.252l678 +++| ZJN EOT3 IF TERMINATE WITH TAPE MARK 34137 M00S19594.1mt +++| LMN 1 34138 M00S19595.1mt +++| NJN EOT1 IF NOT ACCEPT BLOCK AT EOT 34139 M00S19596.1mt +++| LDM /WRITE/STAT 34140 M00S19597.1mt +++| SHN 21-3 34141 M00S19598.1mt +++| PJN EOTX IF TAPE MARK ENCOUNTERED THIS BLOCK 34142 M00S19599.1mt +++| UJN EOT2 CLEAR ACCEPT DATA FLAG 34143 M00S19600.1mt +++| 34144 M00S19601.1mt +++| EOT1 LMN 2&1 34145 M00S19602.1mt +++| NJN EOTX IF NOT DISCARD BLOCK AT EOT
| Line S19603 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34146 M01S19603.282l826 ---| LDD HP CLEAR EOR FLAG 34147 M01S19604.282l826 ---| LPC 5777 34148 M01S19605.282l826 ---| STD HP
| Line S01503 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34149 M01S01503.282l826 +++| LDD UP CLEAR EOR FLAG 34150 M01S01504.282l826 +++| SCN 10 34151 M01S01505.282l826 +++| STD UP 34152 M00S19606.1mt +++| LDD MD CLEAR EOR/EOF THIS OPERATION 34153 M00S19607.1mt +++| LPC 7377 34154 M00S19608.1mt +++| STD MD 34155 M00S19609.1mt +++| EOT2 LDN 0 34156 M00S19610.1mt +++| STM WEME 34157 M00S19611.1mt +++| LDC UJNI+2 34158 M00S19612.1mt +++| STM WEMF 34159 M00S19613.1mt +++| STM WEMG
| Line S19614 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34160 M01S19614.252l678 ---| LJM EOT4 SET RETURN ADDRESS 34161 M01S19615.252l678 ---| 34162 M01S19616.252l678 ---| EOT3 LDN /MTX/BEI RETURN END OF TAPE 34163 M01S19617.252l678 ---| LJM RET3 RETURN ERROR CODE
| Line S01362 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34164 M01S01362.252l678 +++| LJM EOT3 SET RETURN ADDRESS 34165 M00S19618.1mt +++| POT SPACE 4,10 34166 M00S19619.1mt +++|** POT - POSITION AND VERIFY TAPE AFTER ERROR. 34167 M00S19620.1mt +++|*
| Line S19621 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 34168 M01S19621.v23l617 ---|* CALLS BKS, CBS, CID, DTS, FCN, ISC, ISM, POS, RBL, RTR,
| Line S00536 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34169 M02S00536.252l678 ---|* CALL BKS, CBS, CID, DTS, FCN, ISC, ISM, POS, RDA, RTR,
| Line S19622 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34170 M01S19622.252l678 ---|* STW, WEO.
| Line S01363 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34171 M02S01363.282l826 ---|* CALLS BKS, CID, DTS, FCN, IRC, ISC, POS, RDA, STW, WEO.
| Line S01506 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34172 M01S01506.282l826 +++|* USES CM - CM+4. 34173 M01S01507.282l826 +++|* 34174 M01S01508.282l826 +++|* CALLS BKS, CID, CKR, FCN, IRC, ISC, POS, RDA, STW, WEO. 34175 M00S19623.1mt +++| 34176 M00S19624.1mt +++| 34177 M00S19625.1mt +++| POT SUBR ENTRY/EXIT 34178 M00S19626.1mt +++| LDD EC 34179 M00S19627.1mt +++| NJN POT1 IF ERROR 34180 M00S19628.1mt +++| RJM DTS GET DETAIL STATUS
| Line S19629 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34181 M01S19629.252l678 ---| LJM POT28 VERIFY REWRITE
| Line S01364 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34182 M01S01364.252l678 +++| LJM POT12 VERIFY BLOCK REWRITE 34183 M00S19630.1mt +++| 34184 M00S19631.1mt +++|* BACKSPACE OVER THE ERROR BLOCK. 34185 M00S19632.1mt +++|
| Line S19633 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34186 M01S19633.252l678 ---|* USE CONTROLLED BACKSPACE IF - 34187 M01S19634.252l678 ---|* 34188 M01S19635.252l678 ---|* 1) FRAME COUNT ERROR 3 AND NOT LONG BLOCKS FOR MTS. 34189 M01S19636.252l678 ---|* 2) ATS UNIT AND NOT TAPE MARK. 34190 M01S19637.252l678 ---| 34191 M00S19638.1mt +++| POT1 AOD EI
| Line S19639 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34192 M01S19639.252l678 ---| POTA LDD LG+1 34193 M01S19640.252l678 ---|* UJN POT4 (ATS UNIT) 34194 M01S19641.252l678 ---| NJN POT2 IF NOT TAPE MARK 34195 M01S19642.252l678 ---| LDC UJNI+CBS2-CBSC 34196 M01S19643.252l678 ---| STM CBSC 34197 M01S19644.252l678 ---| LDN 16 34198 M01S19645.252l678 ---| UJN POT3 STORE FUNCTION 34199 M01S19646.252l678 ---| 34200 M01S19647.252l678 ---| POT2 LDN 17 34201 M01S19648.252l678 ---| POT3 STM CBSB 34202 M01S19649.252l678 ---| LDM MTDS+1 34203 M01S19650.252l678 ---| LPC 1000 34204 M01S19651.252l678 ---| ZJN POT5 IF NOT FRAME COUNT ERROR 3 34205 M01S19652.252l678 ---| LDM /WRITE/BYWR 34206 M01S19653.252l678 ---| LMC 7777 34207 M01S19654.252l678 ---| ZJN POT5 IF LONG BLOCKS 34208 M01S19655.252l678 ---| LDC 217 WRITE REPOSITION USING CONTROLLED BACK 34209 M01S19656.252l678 ---| STM CBSB 34210 M01S19657.252l678 ---| POT4 LDM /WRITE/BYWR 34211 M01S19658.252l678 ---| SBM /WRITE/BYRM 34212 M01S19659.252l678 ---| POT5 RJM CBS ISSUE CONTROLLED BACKSPACE
| Line S19660 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34213 M02S19660.252l678 ---|* RJM BKS (ATS TAPE MARK OR FSC ADAPTOR) 34214 M02S19661.252l678 ---| POTB EQU *-1
| Line S19662 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34215 M01S19662.252l678 ---| POTC BSS 0 34216 M01S19663.252l678 ---| POT6 RJM POS 34217 M01S19664.252l678 ---|* UJN POT8 (NO BID RECOVERY) 34218 M01S19665.252l678 ---| LJM POT17 CHECK TAPE POSITION 34219 M01S19666.252l678 ---| 34220 M01S19667.252l678 ---| POT7 LDN 5 SET NUMBER OF BLOCKS TO TRY FOR LGB 34221 M01S19668.252l678 ---| STM POTI 34222 M01S19669.252l678 ---| 34223 M01S19670.252l678 ---|* POSITION THE TAPE TO THE LGB OR SNB. 34224 M01S19671.252l678 ---| 34225 M01S19672.252l678 ---| POT8 LDN 5 SET RETRY COUNT 34226 M01S19673.252l678 ---| STM POTJ 34227 M01S19674.252l678 ---| POT9 RJM BKS BACKSPACE TAPE 34228 M01S19675.252l678 ---| MJN POT12 IF BOT 34229 M01S19676.252l678 ---| RJM BKS BACKSPACE TAPE 34230 M01S19677.252l678 ---| MJN POT10 IF BOT
| Line S19678 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34231 M02S19678.252l678 ---| RJM RBL READ BLOCK
| Line S00537 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34232 M02S00537.252l678 ---| RJM RDA READ BLOCK
| Line S19679 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34233 M01S19679.252l678 ---| POT10 LDN 5 SET ERROR REREAD COUNT 34234 M01S19680.252l678 ---| STM POTK
| Line S19681 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34235 M02S19681.252l678 ---| POT11 RJM RBL READ BLOCK
| Line S00538 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34236 M02S00538.252l678 ---| POT11 RJM RDA READ BLOCK
| Line S19682 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34237 M01S19682.252l678 ---| NJN POT13 IF ERROR 34238 M01S19683.252l678 ---| LDD LG CHECK IF LAST GOOD BLOCK LOCATED 34239 M01S19684.252l678 ---| LMM RDAG 34240 M01S19685.252l678 ---| NJN POT14 IF LGB INFORMATION DOES NOT MATCH 34241 M01S19686.252l678 ---| LDN 1 CHECK I FORMAT TRAILER INFORMATION 34242 M01S19687.252l678 ---| RJM CID 34243 M01S19688.252l678 ---| NJN POT14 IF ERROR 34244 M01S19689.252l678 ---| POT12 UJN POT17 CHECK TAPE POSITION 34245 M01S19690.252l678 ---| 34246 M01S19691.252l678 ---|* RETRY TO GET TO LGB. 34247 M01S19692.252l678 ---| 34248 M01S19693.252l678 ---| POT13 SOM POTK PROCESS BAD BLOCK 34249 M01S19694.252l678 ---| ZJN POT14 IF REREADS EXHAUSTED 34250 M01S19695.252l678 ---| RJM BKS BACKSPACE TAPE 34251 M01S19696.252l678 ---| UJN POT11 READ BLOCK 34252 M01S19697.252l678 ---| 34253 M01S19698.252l678 ---| POT14 SOM POTJ 34254 M01S19699.252l678 ---| ZJN POT16 IF RETRYS EXHAUSTED 34255 M01S19700.252l678 ---| LJM POT9 BACKSPACE TAPE 34256 M01S19701.252l678 ---| 34257 M01S19702.252l678 ---| POT15 LDN /MTX/PLO POSITION LOST 34258 M01S19703.252l678 ---| STD EC 34259 M01S19704.252l678 ---| RJM ISC ISSUE MESSAGE AND RECONNECT UNIT 34260 M01S19705.252l678 ---| LJM POT41 FATAL ERROR 34261 M01S19706.252l678 ---| 34262 M01S19707.252l678 ---|* TRY THE FIVE PRECEDING BLOCKS FOR LGB. 34263 M01S19708.252l678 ---| 34264 M01S19709.252l678 ---| POT16 SOM POTI 34265 M01S19710.252l678 ---| ZJN POT15 IF LAST 5 BLOCKS NOT LGB 34266 M01S19711.252l678 ---| RJM BKS BACKSPACE TO TRY NEXT BLOCK 34267 M01S19712.252l678 ---| LJM POT8 REPOSITION TO LGB
| Line S01365 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34268 M01S01365.252l678 +++| RJM BKS BACKSPACE OVER BAD BLOCK 34269 M01S01366.252l678 +++| LDD EI LOAD ERROR COUNTER 34270 M01S01367.252l678 +++| LPN 77 ERROR ITERATION 34271 M01S01368.252l678 +++| SBN 2 34272 M01S01369.252l678 +++| PJN POT3 IF SECOND ITERATION 34273 M01S01370.252l678 +++| POT2 RJM POS POSITION TO LAST GOOD RECORD 34274 M00S19713.1mt +++| 34275 M00S19714.1mt +++|* TAPE IS POSITIONED TO LGB. 34276 M00S19715.1mt +++|
| Line S19716 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34277 M01S19716.252l678 ---| POT17 LDD DS CHECK POSITION 34278 M01S19717.252l678 ---| SHN 21-2 34279 M01S19718.252l678 ---| PJN POT18 IF NOT LOAD POINT 34280 M01S19719.252l678 ---| LDD BL 34281 M01S19720.252l678 ---| ADD BL+1 34282 M01S19721.252l678 ---| NJN POT15 IF NOT PERFORMING RECOVERY ON BLOCK ZERO 34283 M01S19722.252l678 ---| POT18 LDD EP
| Line S01371 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34284 M01S01371.252l678 +++| LDD EP 34285 M00S19723.1mt +++| SHN 21-13
| Line S19724 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34286 M01S19724.252l678 ---| PJN POT19 IF NOT VERIFY 34287 M01S19725.252l678 ---| LJM POT35 VERIFY BLOCK
| Line S01372 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34288 M01S01372.252l678 +++| PJN POT3 IF NOT VERIFY 34289 M01S01373.252l678 +++| LJM POT12 VERIFY BLOCK REWRITE 34290 M00S19726.1mt +++| 34291 M00S19727.1mt +++|* ERASE TAPE. 34292 M00S19728.1mt +++|
| Line S19729 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34293 M01S19729.252l678 ---| POT19 AOD EP+1 COUNT ERASE
| Line S01374 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34294 M01S01374.252l678 +++| POT3 AOD EP+1 COUNT ERASE 34295 M00S19730.1mt +++| LPN 77 34296 M00S19731.1mt +++| SBN ERAL
| Line S19732 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34297 M01S19732.252l678 ---| MJN POT20 IF NOT MAXIMUM ERASES 34298 M01S19733.252l678 ---| LDN /MTX/ERA ERASE LIMIT ERROR
| Line S01375 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34299 M01S01375.252l678 +++| MJN POT4 IF NOT MAXIMUM ERASES 34300 M01S01376.252l678 +++| LDN /MTX/ERA ERASE LIMIT ERROR 34301 M00S19734.1mt +++| STD EC
| Line S19735 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34302 M01S19735.252l678 ---| LJM POT40 FATAL ERROR
| Line S01377 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34303 M01S01377.252l678 +++| LJM POT17 FATAL ERROR 34304 M00S19736.1mt +++|
| Line S19737 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34305 M01S19737.252l678 ---| POT20 LDD EP+1 SET NUMBER OF ERASE TO PERFORM 34306 M01S19738.252l678 ---| LPN 77 34307 M01S19739.252l678 ---| STM POTL
| Line S01378 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34308 M01S01378.252l678 +++| POT4 LDN 1 NUMBER OF ERASES TO PERFORM 34309 M01S01379.252l678 +++| STM POTK 34310 M00S19740.1mt +++| LDN 2 WAIT NOT BUSY 34311 M00S19741.1mt +++| RJM STW 34312 M00S19742.1mt +++| LDD CP CHECK ERROR FLAG 34313 M00S19743.1mt +++| ADN STSW 34314 M00S19744.1mt +++| CRD CM 34315 M00S19745.1mt +++| LDD CM+1
| Line S01380 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34316 M01S01380.252l678 +++| LPN 37 34317 M00S19746.1mt +++| SBN SPET
| Line S19747 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34318 M01S19747.252l678 ---| MJN POT21 IF NO ERROR *SPET* OR ABOVE
| Line S01381 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34319 M01S01381.252l678 +++| MJN POT5 IF NO ERROR *SPET* OR ABOVE 34320 M00S19748.1mt +++| LDN /MTX/EFT SET ERROR FLAG TERMINATION 34321 M00S19749.1mt +++| STD EC
| Line S19750 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34322 M01S19750.252l678 ---| LJM POT40 RETURN ERROR
| Line S01382 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34323 M01S01382.252l678 +++| LJM POT17 RETURN ERROR 34324 M00S19751.1mt +++|
| Line S19752 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34325 M01S19752.252l678 ---| POT21 LDN 52 SKIP BAD SPOT (ERASE)
| Line S01383 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34326 M01S01383.252l678 +++| POT5 LDN 52 SKIP BAD SPOT (ERASE) 34327 M00S19753.1mt +++| RJM FCN 34328 M00S19754.1mt +++| LDN 2 WAIT NOT BUSY 34329 M00S19755.1mt +++| RJM STW 34330 M00S19756.1mt +++| SHN 21-3
| Line S19757 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34331 M01S19757.252l678 ---| PJN POT22 IF NOT EOT 34332 M01S19758.252l678 ---| LJM POT43 SET ERASE AT EOT FLAG
| Line S01384 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34333 M01S01384.252l678 +++| PJN POT6 IF NOT EOT 34334 M01S01385.252l678 +++| LJM POT19 SET ERASE AT EOT FLAG 34335 M00S19759.1mt +++|
| Line S19760 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34336 M01S19760.252l678 ---| POT22 RJM WEO WAIT END OF OPERATION
| Line S01386 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34337 M01S01386.252l678 +++| POT6 RJM WEO WAIT END OF OPERATION 34338 M00S19761.1mt +++| SCN 10 IGNORE EOT
| Line S19762 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34339 M01S19762.252l678 ---| NJN POT23 IF ERASE ERROR 34340 M01S19763.252l678 ---| SOM POTL 34341 M01S19764.252l678 ---| NJN POT21 IF MORE ERASES TO PERFORM 34342 M01S19765.252l678 ---| LJM POT25 SET UP TO REWRITE BLOCK
| Line S01387 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34343 M01S01387.252l678 +++| NJN POT7 IF ERASE ERROR 34344 M01S01388.252l678 +++| SOM POTK 34345 M01S01389.252l678 +++| NJN POT5 IF MORE ERASES TO PERFORM 34346 M01S01390.252l678 +++| LJM POT9 SET UP TO REWRITE BLOCK 34347 M00S19766.1mt +++|
| Line S19767 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34348 M01S19767.252l678 ---| POT23 LDN /MTX/ERA DIAGNOSE ERASE ERROR
| Line S01391 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34349 M01S01391.252l678 +++| POT7 LDN /MTX/STE DIAGNOSE ERASE ERROR 34350 M00S19768.1mt +++| STD EC 34351 M00S19769.1mt +++| LDD DS SET STATUS FOR MESSAGE 34352 M00S19770.1mt +++| STM //STER 34353 M00S19771.1mt +++| RJM ISC ISSUE MESSAGE AND RECONNECT UNIT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1mt5 |
Seq # *Modification Id* Act ----------------------------+ 34354 M01S00001.1mt5 +++| AOD EI INCREMENT ERROR ITERATION COUNT
| Line S19772 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34355 M01S19772.282l826 ---| LDD DC 34356 M01S19773.282l826 ---| SHN -6 34357 M01S19774.282l826 ---| LMN /MTX/D16
| Line S01509 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34358 M01S01509.282l826 +++| LDM DNCV 34359 M01S01510.282l826 +++| LPN 70 34360 M01S01511.282l826 +++| LMN /MTX/D16*10
| Line S19775 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34361 M01S19775.252l678 ---| ZJN POT24 IF 1600 BPI CONTINUE ERASE
| Line S01392 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34362 M01S01392.252l678 +++| ZJN POT8 IF 1600 BPI CONTINUE ERASE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1mt3 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34363 M02S00001.282l826 ---| LMN /MTX/D62&/MTX/D16
| Line S01512 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34364 M01S01512.282l826 +++| LMN /MTX/D62*10&/MTX/D16*10
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1mt3 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34365 M02S00002.252l678 ---| ZJN POT24 IF 6250 CPI CONTINUE ERASE
| Line S19776 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34366 M01S19776.252l678 ---| LJM POT29 SET UP TO REPOSITION TO LGB
| Line S01393 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34367 M01S01393.252l678 +++| ZJN POT8 IF 6250 CPI CONTINUE ERASE 34368 M01S01394.252l678 +++| LJM POT2 REPOSITION TO LAST GOOD RECORD 34369 M00S19777.1mt +++|
| Line S19778 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 34370 M01S19778.v23l617 ---| POT24 LJM POT19 ERASE TAPE
| Line S00539 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34371 M02S00539.252l678 ---| POT24 RJM CKR CHECK READY 34372 M02S00540.252l678 ---| LJM POT19 ERASE TAPE 34373 M02S00541.252l678 ---|
| Line S01395 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 1mt29 |
Seq # *Modification Id* Act ----------------------------+ 34374 M02S01395.1mt29 ---| POT8 LJM POT5 REISSUE THE ERASE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1mt29 |
Seq # *Modification Id* Act ----------------------------+ 34375 M01S00001.1mt29 +++| POT8 RJM CKR CHECK FOR UNIT READY 34376 M01S00002.1mt29 +++| LJM POT3 REISSUE THE ERASE 34377 M00S19779.1mt +++| 34378 M00S19780.1mt +++|* REWRITE THE BLOCK. 34379 M00S19781.1mt +++|
| Line S19782 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34380 M01S19782.252l678 ---| POT25 LDD LG+1 34381 M01S19783.252l678 ---| ZJN POT27 IF TAPE MARK WRITE
| Line S01396 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34382 M01S01396.252l678 +++| POT9 LDD LG+1 34383 M01S01397.252l678 +++| ZJN POT11 IF TAPE MARK WRITE
| Line S19784 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34384 M01S19784.282l826 ---| LDD HP CLEAR EOR FLAG 34385 M01S19785.282l826 ---| LPC 5777 34386 M01S19786.282l826 ---| STD HP
| Line S01513 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 34387 M01S01513.282l826 +++| LDD UP CLEAR EOR FLAG 34388 M01S01514.282l826 +++| SCN 10 34389 M01S01515.282l826 +++| STD UP 34390 M00S19787.1mt +++| LDD MD CLEAR EOR/EOF THIS OPERATION FLAG 34391 M00S19788.1mt +++| LPC 7377 34392 M00S19789.1mt +++| STD MD 34393 M00S19790.1mt +++| LDD EI 34394 M00S19791.1mt +++| LPN 7
| Line S19792 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34395 M01S19792.252l678 ---| ZJN POT27 IF TIME TO REQUEUE
| Line S01398 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34396 M01S01398.252l678 +++| ZJN POT11 IF TIME TO REQUEUE 34397 M00S19793.1mt +++| LDC 0
| Line S19794 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34398 M01S19794.252l678 ---| POTD EQU *-1 34399 M01S19795.252l678 ---| ZJN POT26 IF NOT WRITE LABELS
| Line S01399 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34400 M01S01399.252l678 +++| POTD EQU *-1 ADD ONE TO *POTD* 34401 M01S01400.252l678 +++| ZJN POT10 IF NOT WRITE LABELS
| Line S19796 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 34402 M01S19796.251l664 ---| LDC /WLA/WLA8-/WRITE/PWR-1 34403 M01S19797.251l664 ---| POT26 ADC /WRITE/PWR+1
| Line S00176 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 34404 M01S00176.251l664 +++| LDC /WLA/WLA8-/WRITE/WTF
| Line S00177 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34405 M02S00177.252l678 ---| POT26 ADC /WRITE/WTF
| Line S01401 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34406 M01S01401.252l678 +++| POT10 ADC /WRITE/WTF
| Line S08159 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 34407 M01S08159.274l797 +++| ERRNZ /WRITE/WTF-/WLI/WLI ENTRY POINTS MUST BE THE SAME 34408 M00S19798.1mt +++| STM WEMH 34409 M00S19799.1mt +++| LJM POTX RETURN 34410 M00S19800.1mt +++|
| Line S19801 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34411 M01S19801.252l678 ---| POT27 LJM RET2 REQUEUE 34412 M01S19802.252l678 ---| 34413 M01S19803.252l678 ---|* VERIFY THE BLOCK. 34414 M01S19804.252l678 ---|
| Line S19805 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34415 M02S19805.252l678 ---| POT28 RJM RTR READ TAPE REVERSE
| Line S00542 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34416 M02S00542.252l678 ---| POT28 RJM BKS BACKSPACE TAPE
| Line S19806 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34417 M02S19806.252l678 ---| LDD T4
| Line S00543 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34418 M02S00543.252l678 ---| LDD DS CHECK FOR ALERT BIT 34419 M02S00544.252l678 ---| SHN -13
| Line S19807 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34420 M01S19807.252l678 ---| ZJN POT30 IF NO ERROR 34421 M01S19808.252l678 ---| RJM ISM ISSUE MESSAGE 34422 M01S19809.252l678 ---| POT29 LDN 5 SET BLOCKS TO TRY FOR LBG 34423 M01S19810.252l678 ---| STM POTI 34424 M01S19811.252l678 ---| LJM POT6 REPOSITION TAPE TO LGB 34425 M01S19812.252l678 ---| POTE EQU *-1 34426 M01S19813.252l678 ---|* LJM POT8 (NO BID RECOVERY) 34427 M01S19814.252l678 ---|
| Line S19815 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34428 M02S19815.252l678 ---| POT30 RJM RBL READ BLOCK
| Line S00545 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 34429 M02S00545.252l678 ---| POT30 RJM RDA READ BLOCK
Proceed to Part 26
cdc/nos2.source/opl.opl871/deck/1mt.025.txt · Last modified: by 127.0.0.1