cdc:nos2.source:opl.opl871:deck:cpumtr.004
Deck CPUMTR Part 004
308 Modifications
Listing Sections
- Deck CPUMTR Start
- Deck CPUMTR Part 1 (Line 1426)
- Deck CPUMTR Part 2 (Line 2835)
- Deck CPUMTR Part 3 (Line 4189)
- Deck CPUMTR Part 4 (Line 5202)
- Deck CPUMTR Part 5 (Line 6708)
- Deck CPUMTR Part 6 (Line 8299)
- Deck CPUMTR Part 7 (Line 9638)
- Deck CPUMTR Part 8 (Line 10916)
- Deck CPUMTR Part 9 (Line 11967)
- Deck CPUMTR Part 10 (Line 13138)
- Deck CPUMTR Part 11 (Line 14282)
- Deck CPUMTR Part 12 (Line 15410)
- Deck CPUMTR Part 13 (Line 16567)
- Deck CPUMTR Part 14 (Line 17788)
- Deck CPUMTR Part 15 (Line 19052)
- Deck CPUMTR Part 16 (Line 20073)
- Deck CPUMTR Part 17 (Line 21429)
- Deck CPUMTR Part 18 (Line 22828)
- Deck CPUMTR Part 19 (Line 24227)
- Deck CPUMTR Part 20 (Line 25696)
- Deck CPUMTR Part 21 (Line 26966)
- Deck CPUMTR Part 22 (Line 28134)
- Deck CPUMTR Part 23 (Line 29251)
- Deck CPUMTR Part 24 (Line 30351)
- Deck CPUMTR Part 25 (Line 31361)
- Deck CPUMTR Part 26 (Line 32485)
- Deck CPUMTR Part 27 (Line 33477)
- Deck CPUMTR Part 28 (Line 34727)
- Deck CPUMTR Part 29 (Line 36372)
- Deck CPUMTR Part 30 (Line 38175)
- Deck CPUMTR Part 31 (Line 39467)
- Deck CPUMTR Part 32 (Line 41032)
- Deck CPUMTR Part 33 (Line 42467)
- Deck CPUMTR Part 34 (Line 44089)
- Deck CPUMTR Part 35 (Line 45392)
- Deck CPUMTR Part 36 (Line 46832)
- Deck CPUMTR Part 37 (Line 47923)
- Deck CPUMTR Part 38 (Line 49530)
- Deck CPUMTR Part 39 (Line 50976)
- Deck CPUMTR Part 40 (Line 52390)
- Deck CPUMTR Part 41 (Line 53539)
- Deck CPUMTR Part 42 (Line 54779)
- Deck CPUMTR Part 43 (Line 56002)
- Deck CPUMTR Part 44 (Line 57163)
- Deck CPUMTR Part 45 (Line 58215)
- Deck CPUMTR Part 46 (Line 59341)
Source
Seq # *Modification Id* Act ----------------------------+ 05202 M01S00779.271l750 +++| SA7 A4 WRITE *CSWL* 05203 M00S02897.cpumtr +++| JP B3 RETURN 05204 M00S02898.cpumtr +++|
| Line S02899 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05205 M01S02899.271l716 ---| RCC12 SA7 A0+CSWL SET SWITCH REQUEST 05206 M01S02900.271l716 ---| RCC13 BX4 X4-X4 05207 M01S02901.271l716 ---| EQ RCC11 CLEAR RECALL ACCUMULATOR 05208 M01S02902.271l716 ---|
| Line S02903 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05209 M01S02903.271l750 ---|* CLEAR *JCIW* INTERLOCK.
| Line S00780 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05210 M01S00780.271l750 +++|* CLEAR *MTR* BYPASS FLAG. 05211 M00S02904.cpumtr +++|
| Line S02905 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05212 M01S02905.271l750 ---| RCC14 SA2 A2 GET *JCIW* 05213 M01S02906.271l750 ---| SX7 B1 05214 M01S02907.271l750 ---| LX7 38 05215 M01S02908.271l750 ---| BX7 -X7*X2 CLEAR INTERLOCK 05216 M01S02909.271l750 ---| SA7 A2
| Line S00781 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05217 M01S00781.271l750 +++| RCC14 SX7 B1 05218 M01S00782.271l750 +++| LX7 26-0 05219 M01S00783.271l750 +++| BX6 -X7*X3 CLEAR BYPASS FLAG 05220 M01S00784.271l750 +++| SA6 A3 WRITE *CWQW* 05221 M00S02910.cpumtr +++| JP B3 RETURN 05222 M00S02911.cpumtr +++|
| Line S02912 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05223 M01S02912.271l750 ---| RCC15 SX2 B1 SET CPU STATUS AT ROLLOUT
| Line S00785 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05224 M01S00785.271l750 +++|* PROCESS RECALL REQUEST WITH ROLLOUT PENDING. 05225 M01S00786.271l750 +++| 05226 M01S00787.271l750 +++| RCC15 LX1 12+24-59 05227 M01S00788.271l750 +++| SX2 B1 05228 M01S00789.271l750 +++| AX1 48 EXTRACT ERROR FLAG 05229 M00S02913.cpumtr +++| LX2 25
| Line S02914 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05230 M01S02914.271l750 ---| BX6 X2+X6
| Line S00790 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05231 M01S00790.271l750 +++| NZ X1,RB3 IF ERROR FLAG SET 05232 M01S00791.271l750 +++| BX6 X2+X6 SET CPU STATUS AT ROLLOUT 05233 M00S02915.cpumtr +++| LX2 59-25 05234 M00S02916.cpumtr +++| BX6 -X2*X6 CLEAR *W* STATUS 05235 M00S02917.cpumtr +++| SA6 A1 SET NULL STATUS 05236 M00S02918.cpumtr +++| JP B3 RETURN
| Line S02919 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05237 M01S02919.271l750 ---| RSC SPACE 4,25
| Line S00792 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05238 M01S00792.271l750 +++| RSC SPACE 4,30 05239 M00S02920.cpumtr +++|** RSC - RETURN SUB-SYSTEM CONTROL POINT ADDRESS. 05240 M00S02921.cpumtr +++|* 05241 M00S02922.cpumtr +++|* ENTRY (X0) = -7777B 05242 M00S02923.cpumtr +++|* (X1) = SUBSYSTEM IDENTIFICATION. 05243 M00S02924.cpumtr +++|* (B3) = EXIT ADDRESS. 05244 M00S02925.cpumtr +++|* ((B3)-1) = EXIT ADDRESSES FOR ERROR CASES. 05245 M00S02926.cpumtr +++|* ((B3)-1) = 12/ A1-XA,18/ A2,12/ A3-XA,18/ A4 05246 M00S02927.cpumtr +++|* XA = EXIT ADDRESS = (B3) 05247 M00S02928.cpumtr +++|* A1 = EXIT ADDRESS IF SUB-SYSTEM NOT ACTIVE. 05248 M00S02929.cpumtr +++|* NOTE - IF THE SUB-SYSTEM FL IS ZERO IT 05249 M00S02930.cpumtr +++|* IS TREATED AS A NOT ACTIVE CONDITION. 05250 M00S02931.cpumtr +++|* A2 = EXIT ADDRESS IF ILLEGAL SUBSYSTEM ID. 05251 M00S02932.cpumtr +++|* A3 = EXIT ADDRESS IF JOB ADVANCE OR DMP= SET. 05252 M00S02933.cpumtr +++|* A4 = EXIT ADDRESS IF STORAGE MOVE SET. 05253 M00S02934.cpumtr +++|* (B7) = CALLER,S CONTROL POINT ADDRESS. 05254 M00S02935.cpumtr +++|* 05255 M00S02936.cpumtr +++|* EXIT (X0) = -7777B 05256 M00S02937.cpumtr +++|* (X3) = SUB-SYSTEM RA. 05257 M00S02938.cpumtr +++|* (X6) = SUB-SYSTEM FL. 05258 M00S02939.cpumtr +++|* (A2) = STSW ADDRESS IN SUB-SYSTEM CONTROL POINT AREA. 05259 M00S02940.cpumtr +++|* 05260 M00S02941.cpumtr +++|* USES X - 1, 2, 3, 6. 05261 M00S02942.cpumtr +++|* B - 6. 05262 M00S02943.cpumtr +++|* A - 1, 2. 05263 M00S02944.cpumtr +++|* 05264 M00S02945.cpumtr +++|* CALLS RSI. 05265 M00S02946.cpumtr +++| 05266 M00S02947.cpumtr +++| 05267 M00S02948.cpumtr +++| RSC SB6 RSC1 SET RETURN ADDRESS FOR *RSI* 05268 M00S02949.cpumtr +++| EQ RSI1 RETURN SUBSYSTEM INFORMATION 05269 M00S02950.cpumtr +++| 05270 M00S02951.cpumtr +++|* RETURN FROM *RSI* IF ILLEGAL SUBSYSTEM IDENTIFICATION. 05271 M00S02952.cpumtr +++| 05272 M00S02953.cpumtr +++| RSC1 SA1 B3-B1 GET RETURN ADDRESS 05273 M00S02954.cpumtr +++| AX1 30 05274 M00S02955.cpumtr +++| EQ RSC6 RETURN 05275 M00S02956.cpumtr +++| 05276 M00S02957.cpumtr +++|* RETURN FROM *RSI* WITH SUBSYSTEM INFORMATION. 05277 M00S02958.cpumtr +++| 05278 M00S02959.cpumtr +++|+ SB6 X3 SHIFT COUNT 05279 M00S02960.cpumtr +++| AX2 B6 05280 M00S02961.cpumtr +++| LX2 -12 05281 M00S02962.cpumtr +++| MX3 -5 05282 M00S02963.cpumtr +++| PL X2,RSC4 IF SUBSYSTEM NOT ACTIVE 05283 M00S02964.cpumtr +++| SA2 A2+SSCTL GET *SSAT* WORD FOR THIS SUBSYSTEM 05284 M00S02965.cpumtr +++| AX2 B6 05285 M00S02966.cpumtr +++| BX6 -X0*X2 GET EJT ORDINAL OF SUBSYSTEM
| Line S02967 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 05286 M01S02967.261l700 ---| SX2 EJTE 05287 M01S02968.261l700 ---| IX2 X6*X2
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 05288 M01S00008.261l700 +++| CX2 X6,EJT CONVERT EJT ORDINAL TO OFFSET 05289 M00S02969.cpumtr +++| TA2 X2+JSNE,EJT GET EJT ENTRY 05290 M00S02970.cpumtr +++| LX2 -1 05291 M00S02971.cpumtr +++| BX6 -X3*X2 GET JOB STATUS 05292 M00S02972.cpumtr +++| SX6 X6-EXJS 05293 M00S02973.cpumtr +++| LX2 59-6+1 05294 M00S02974.cpumtr +++| NZ X6,RSC4 IF SUBSYSTEM NOT AT CONTROL POINT 05295 M00S02975.cpumtr +++| NG X2,RSC7 IF JOB ADVANCE SET ON SUBSYSTEM 05296 M00S02976.cpumtr +++| SA2 A2+SCHE-JSNE GET CONTROL POINT NUMBER 05297 M00S02977.cpumtr +++| AX2 12 05298 M00S02978.cpumtr +++| BX6 -X3*X2 05299 M00S02979.cpumtr +++| LX6 7 SUBSYSTEM CONTROL POINT ADDRESS 05300 M00S02980.cpumtr +++| SA2 X6+JCIW READ JOB CONTROL 05301 M00S02981.cpumtr +++| AX2 24 05302 M00S02982.cpumtr +++| BX3 X2-X1 05303 M00S02983.cpumtr +++| SA1 SMRL CHECK FOR STORAGE MOVE IN PROGRESS 05304 M00S02984.cpumtr +++| BX3 -X0*X3 05305 M00S02985.cpumtr +++| NZ X3,RSC4 IF SUB-SYSTEM NOT ACTIVE
| Line S02986 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05306 M01S02986.271l716 ---| BX1 X1-X6 05307 M01S02987.271l716 ---| BX1 -X0*X1 05308 M01S02988.271l716 ---| SA2 X6+STSW
| Line S00153 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05309 M01S00153.271l716 +++| BX1 -X0*X1 05310 M01S00154.271l716 +++| LX1 7
| Line S00155 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05311 M02S00155.271l750 ---| ERRNZ STSW+1-JCIW CODE DEPENDS ON VALUE 05312 M02S00156.271l750 ---| SA2 A2-B1
| Line S00793 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05313 M01S00793.271l750 +++| SA2 X6+STSW
| Line S00157 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05314 M01S00157.271l716 +++| BX1 X1-X6 05315 M00S02989.cpumtr +++| ZR X1,RSC5 IF SUBSYSTEM MOVING 05316 M00S02990.cpumtr +++| RSC2 SA1 A2+FLSW-STSW GET RA AND FL 05317 M00S02991.cpumtr +++| BX6 -X0*X1 EXTRACT FL 05318 M00S02992.cpumtr +++| LX1 -RSHF 05319 M00S02993.cpumtr +++| ZR X6,RSC4 IF ZERO FL - TREAT AS NOT ACTIVE 05320 M00S02994.cpumtr +++| MX3 -RMSK 05321 M00S02995.cpumtr +++| BX3 -X3*X1 05322 M00S02996.cpumtr +++| LX6 6 05323 M00S02997.cpumtr +++| LX3 6 05324 M00S02998.cpumtr +++| SA1 A2+SPCW-STSW CHECK DMP= PROCESSING 05325 M00S02999.cpumtr +++| AX1 48 05326 M00S03000.cpumtr +++| NZ X1,RSC7 IF DMP= IN PROGRESS 05327 M00S03001.cpumtr +++| JP B3 05328 M00S03002.cpumtr +++| 05329 M00S03003.cpumtr +++|* EXIT IF SUB-SYSTEM NOT ACTIVE. 05330 M00S03004.cpumtr +++| 05331 M00S03005.cpumtr +++| RSC4 SA1 B3-B1 05332 M00S03006.cpumtr +++| AX1 48 05333 M00S03007.cpumtr +++| EQ RSC8 RETURN 05334 M00S03008.cpumtr +++| 05335 M00S03009.cpumtr +++|* EXIT IF MOVE FLAG SET. 05336 M00S03010.cpumtr +++| 05337 M00S03011.cpumtr +++| RSC5 SA1 B3-B1 05338 M00S03012.cpumtr +++| SB6 X6 05339 M00S03013.cpumtr +++| EQ B6,B7,RSC2 IF CALLER,S CP .EQ. SUB-SYSTEM,S CP 05340 M00S03014.cpumtr +++| RSC6 SB3 X1 05341 M00S03015.cpumtr +++| JP B3 RETURN 05342 M00S03016.cpumtr +++| 05343 M00S03017.cpumtr +++|* EXIT IF ADVANCE FLAG SET. 05344 M00S03018.cpumtr +++| 05345 M00S03019.cpumtr +++| RSC7 SA1 B3-1 05346 M00S03020.cpumtr +++| LX1 30 05347 M00S03021.cpumtr +++| AX1 48 05348 M00S03022.cpumtr +++| RSC8 SB3 B3+X1 05349 M00S03023.cpumtr +++| JP B3 RETURN 05350 M00S03024.cpumtr +++| RSI SPACE 4,15 05351 M00S03025.cpumtr +++|** RSI - RETURN SUBSYSTEM IDENTIFICATION. 05352 M00S03026.cpumtr +++|* 05353 M00S03027.cpumtr +++|* ENTRY (X0) = -7777B. 05354 M00S03028.cpumtr +++|* (X1) = SUBSYSTEM IDENTIFICATION IF ENTRY AT *RSI1*. 05355 M00S03029.cpumtr +++|* (B6) = RETURN ADDRESS IF NOT SUBSYSTEM. 05356 M00S03030.cpumtr +++|* RETURN TO (B6)+1 WITH SUBSYSTEM INFORMATION. 05357 M00S03031.cpumtr +++|* (B7) = CONTROL POINT ADDRESS OF SUBSYSTEM IF 05358 M00S03032.cpumtr +++|* ENTRY AT *RSI*. 05359 M00S03033.cpumtr +++|* 05360 M00S03034.cpumtr +++|* EXIT (A2) = ADDRESS OF *SSCT* WORD FOR THIS SUBSYSTEM. 05361 M00S03035.cpumtr +++|* (X1) = SUBSYSTEM IDENTIFICATION. 05362 M00S03036.cpumtr +++|* (X2) = *SSCT* ENTRY FOR THIS SUBSYSTEM. 05363 M00S03037.cpumtr +++|* (X3) = SHIFT COUNT TO POSITION TO BYTE IN *SSCT* 05364 M00S03038.cpumtr +++|* WORD FOR THIS SUBSYSTEM INFORMATION. 05365 M00S03039.cpumtr +++|* 05366 M00S03040.cpumtr +++|* USES A - 2. 05367 M00S03041.cpumtr +++|* X - 1, 2, 3, 6. 05368 M00S03042.cpumtr +++| 05369 M00S03043.cpumtr +++| 05370 M00S03044.cpumtr +++| RSI SA1 B7+JCIW GET SUBSYSTEM IDENTIFICATION 05371 M00S03045.cpumtr +++| LX1 36 05372 M00S03046.cpumtr +++| BX1 -X0*X1 05373 M00S03047.cpumtr +++| RSI1 SX6 X1-LSSI-1 05374 M00S03048.cpumtr +++| NG X6,RB6 IF NOT SUBSYSTEM 05375 M00S03049.cpumtr +++| SX6 X1-MXSI-1 05376 M00S03050.cpumtr +++| PL X6,RB6 IF NOT SUBSYSTEM 05377 M00S03051.cpumtr +++| TX3 -1,SSCT GET FWA - 1 OF *SSCT* TABLE 05378 M00S03052.cpumtr +++| SB6 B6+1 ADVANCE RETURN ADDRESS 05379 M00S03053.cpumtr +++| RSI2 SX6 X6+5 05380 M00S03054.cpumtr +++| SX3 X3+1 05381 M00S03055.cpumtr +++| NG X6,RSI2 IF *SSCT* WORD NOT REACHED 05382 M00S03056.cpumtr +++| LX6 2 05383 M00S03057.cpumtr +++| SA2 X3 GET *SSCT* WORD FOR THIS SUBSYSTEM 05384 M00S03058.cpumtr +++| LX3 X6,B1 05385 M00S03059.cpumtr +++| IX3 X3+X6 SHIFT COUNT FOR SUBSYSTEM BYTE 05386 M00S03060.cpumtr +++| JP B6 RETURN 05387 M00S03061.cpumtr +++| SCD SPACE 4,10 05388 M00S03062.cpumtr +++|** SCD - SEARCH CENTRAL LIBRARY DIRECTORY. 05389 M00S03063.cpumtr +++|* 05390 M00S03064.cpumtr +++|* ENTRY (X2) = 42/ ENTRY POINT NAME, 18/ 05391 M00S03065.cpumtr +++|* (B6) = RETURN ADDRESS. 05392 M00S03066.cpumtr +++|* 05393 M00S03067.cpumtr +++|* EXIT (X7) = ADDRESS OF PST. 05394 M00S03068.cpumtr +++|* (X7) = 0 IF NOT FOUND. 05395 M00S03069.cpumtr +++|* 05396 M00S03070.cpumtr +++|* USES X - 1, 2, 3, 4, 5, 7. 05397 M00S03071.cpumtr +++|* A - 1, 2. 05398 M00S03072.cpumtr +++|* B - 4, 5. 05399 M00S03073.cpumtr +++| 05400 M00S03074.cpumtr +++| 05401 M00S03075.cpumtr +++| SCD SA1 EPDP READ DIRECTORY ADDRESS 05402 M00S03076.cpumtr +++| MX4 42 05403 M00S03077.cpumtr +++| SX3 B1 05404 M00S03078.cpumtr +++| BX7 X4*X2 ENTRY POINT NAME 05405 M00S03079.cpumtr +++| AX1 36 05406 M00S03080.cpumtr +++| SA2 LBDP FIND END OF DIRECTORY 05407 M00S03081.cpumtr +++| SB4 X1 FWA OF DIRECTORY 05408 M00S03082.cpumtr +++| AX2 12 05409 M00S03083.cpumtr +++| LX3 41-1 05410 M00S03084.cpumtr +++| IX2 X2-X3 05411 M00S03085.cpumtr +++| SB5 X2 LWA+1 OF DIRECTORY 05412 M00S03086.cpumtr +++| EQ SCD2 ENTER LOOP 05413 M00S03087.cpumtr +++| 05414 M00S03088.cpumtr +++| SCD1 BX1 -X4*X1 05415 M00S03089.cpumtr +++| ZR X5,SCD4 IF ENTRY POINT FOUND 05416 M00S03090.cpumtr +++| SB4 A1+B1 RESET FWA OF SEARCH 05417 M00S03091.cpumtr +++| SCD2 SX1 B5-B4 LENGTH OF SEARCH INTERVAL 05418 M00S03092.cpumtr +++| AX1 1 05419 M00S03093.cpumtr +++| EQ B4,B5,SCD3 IF END OF SEARCH 05420 M00S03094.cpumtr +++| SA1 B4+X1 GET DIRECTORY ENTRY 05421 M00S03095.cpumtr +++| NO 05422 M00S03096.cpumtr +++| BX5 X4*X1 ENTRY POINT NAME 05423 M00S03097.cpumtr +++| IX5 X7-X5 05424 M00S03098.cpumtr +++| PL X5,SCD1 IF PROGRAM .GE. SAMPLE ENTRY 05425 M00S03099.cpumtr +++| SB5 A1+ 05426 M00S03100.cpumtr +++| SCD3 GT B5,B4,SCD2 IF MORE DIRECTORY TO SEARCH 05427 M00S03101.cpumtr +++| SX7 B0+ CLEAR REPLY (ENTRY POINT NOT FOUND) 05428 M00S03102.cpumtr +++| JP B6 RETURN 05429 M00S03103.cpumtr +++| 05430 M00S03104.cpumtr +++|* ENTRY POINT FOUND. 05431 M00S03105.cpumtr +++| 05432 M00S03106.cpumtr +++| SCD4 SA2 PSTP GET FWA OF PST 05433 M00S03107.cpumtr +++| AX2 12 05434 M00S03108.cpumtr +++| BX2 -X4*X2 05435 M00S03109.cpumtr +++| IX7 X1+X2 ADDRESS OF PST ENTRY 05436 M00S03110.cpumtr +++| JP B6 RETURN 05437 M00S03111.cpumtr +++| SEF SPACE 4,15 05438 M00S03112.cpumtr +++|** SEF - SET ERROR FLAG. 05439 M00S03113.cpumtr +++|* 05440 M00S03114.cpumtr +++|* ENTRY (B7) = CP ADDRESS. 05441 M00S03115.cpumtr +++|* (X7) = ERROR FLAG.
| Line S00794 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05442 M01S00794.271l750 +++|* JOB ACTIVE IN THIS CPU. 05443 M00S03116.cpumtr +++|* 05444 M00S03117.cpumtr +++|* EXIT TO *SSE* IF SUBCONTROL POINT ACTIVE. 05445 M00S03118.cpumtr +++|* TO *MTRX* IF NEW .LT. CURRENT ERROR FLAG. 05446 M00S03119.cpumtr +++|* TO *SNS* IN NORMAL CASE. 05447 M00S03120.cpumtr +++|* 05448 M00S03121.cpumtr +++|* USES X - 1, 2, 4, 6, 7. 05449 M00S03122.cpumtr +++|* A - 1, 6. 05450 M00S03123.cpumtr +++|* B - 3, 5. 05451 M00S03124.cpumtr +++|* 05452 M00S03125.cpumtr +++|* CALLS MSC. 05453 M00S03126.cpumtr +++| 05454 M00S03127.cpumtr +++| 05455 M00S03128.cpumtr +++| SEF SA1 B7+STSW READ CP STATUS 05456 M00S03129.cpumtr +++| BX6 X1 05457 M00S03130.cpumtr +++| LX1 59-56
| Line S03131 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 05458 M01S03131.252l678 ---| SEF1 TNG X1,(/MONITOR/SSE,/MONITOR/SEF1,SUBCP)
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 05459 M01S00102.252l678 +++| SEF1 TNG X1,(/MONITOR/SSE,SUBCP,/MONITOR/SEF1) 05460 M00S03132.cpumtr +++| MX2 -12 05461 M00S03133.cpumtr +++| LX7 36 05462 M00S03134.cpumtr +++| LX2 36 05463 M00S03135.cpumtr +++| BX4 -X2*X6 GET OLD ERROR FLAG 05464 M00S03136.cpumtr +++| IX4 X7-X4 05465 M00S03137.cpumtr +++| ZR X7,SEF2 IF NEW ERROR FLAG IS ZERO 05466 M00S03138.cpumtr +++| NG X4,MTRX IF OLD .GT. NEW ERROR FLAG
| Line S03139 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05467 M01S03139.271l750 ---| SEF2 SX1 SABT * SYSTEM ABORT.*
| Line S03140 Modification History | |
|---|---|
M01 (Removed by) | cpum201 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05468 M02S03140.271l750 ---| ZR B7,SEF3 IF CONTROL POINT ZERO
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | cpum201 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05469 M02S00001.271l750 ---| TZR B7,(/MONITOR/SEF4,NVE,/MONITOR/SEF3) IF CP ZERO
| Line S03141 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05470 M01S03141.271l750 ---| TB3 SCA 05471 M01S03142.271l750 ---| EQ B7,B3,SEF3 IF SYSTEM CONTROL POINT
| Line S00795 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05472 M01S00795.271l750 +++| SEF2 TB3 SCA 05473 M01S00796.271l750 +++| EQ B7,B3,SEF2.1 IF SYSTEM CONTROL POINT 05474 M00S03143.cpumtr +++| IX6 X6+X4 05475 M00S03144.cpumtr +++| SA6 A1 05476 M00S03145.cpumtr +++| EQ SNS SET NULL CPU STATUS
| Line S00797 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05477 M01S00797.271l750 +++| 05478 M01S00798.271l750 +++| SEF2.1 SA1 CPAL+A0 05479 M01S00799.271l750 +++| AX1 42 05480 M01S00800.271l750 +++| SX2 X1-IDXT 05481 M01S00801.271l750 +++| SX1 SABT * SYSTEM ABORT.* 05482 M01S00802.271l750 +++| TPL X2,(/MONITOR/SEF4,NVE,/MONITOR/SEF3) IF IDLE PACKAGE 05483 M00S03146.cpumtr +++| 05484 M00S03147.cpumtr +++| SEF3 SB5 MTRX SET EXIT ADDRESS FOR *MSC* 05485 M00S03148.cpumtr +++| EQ MSC SET MESSAGE AT SYSTEM CONTROL POINT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | cpum201 |
Seq # *Modification Id* Act ----------------------------+ 05486 M01S00002.cpum201 +++| 05487 M01S00003.cpum201 +++| SEF4 SB5 ZERL ABORT AFTER POSTING MESSAGE 05488 M01S00004.cpum201 +++| EQ MSC SET MESSAGE AT SYSTEM CONTROL POINT 05489 M00S03149.cpumtr +++| SFL SPACE 4,15 05490 M00S03150.cpumtr +++|** SFL - SET FIELD LENGTH. 05491 M00S03151.cpumtr +++|*
| Line S03152 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05492 M01S03152.271l716 ---|* ENTRY (B6) = EXCHANGE PACKAGE ADDRESS.
| Line S00158 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05493 M01S00158.271l716 +++|* ENTRY (B5) = 0 IF NOT *MTR* CALL. 05494 M01S00159.271l716 +++|* (B6) = EXCHANGE PACKAGE ADDRESS.
| Line S03153 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 05495 M01S03153.273l780 ---|* (B7) = CONTROL POINT ADDRESS.
| Line S00110 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 05496 M01S00110.273l780 +++|* (B7) = CONTROL POINT ADDRESS IF .NE. 0. 05497 M01S00111.273l780 +++|* (B7) = 0 IF CMR REQUEST FROM *MTR*. 05498 M00S03154.cpumtr +++|* (X0) = INCREMENT. 05499 M00S03155.cpumtr +++|* 05500 M00S03156.cpumtr +++|* EXIT TO *MTRX*. 05501 M00S03157.cpumtr +++|*
| Line S03158 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 05502 M01S03158.273l780 ---|* USES X - 0, 2, 3, 4, 6, 7.
| Line S00112 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 05503 M01S00112.273l780 +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 05504 M00S03159.cpumtr +++|* B - 3, 4. 05505 M00S03160.cpumtr +++|* A - 2, 3, 4, 6, 7. 05506 M00S03161.cpumtr +++|* 05507 M00S03162.cpumtr +++|* CALLS CJS, SJS, SRU. 05508 M00S03163.cpumtr +++|
| Line S03164 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05509 M01S03164.271l716 ---|
| Line S00160 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05510 M01S00160.271l716 +++| SFL BSS 0 ENTRY 05511 M01S00161.271l716 +++| SA2 A0+CPAL FETCH CPU ASSIGNMENT DATA 05512 M01S00162.271l716 +++| SA3 ACML 05513 M01S00163.271l716 +++| SX6 B7 05514 M01S00164.271l716 +++| BX7 -X0 COMPLEMENT INCREMENT 05515 M01S00165.271l716 +++| AX2 24 POSITION CP ADDRESS 05516 M01S00166.271l716 +++| LX7 36-6 05517 M01S00167.271l716 +++| AX6 7-1 05518 M01S00168.271l716 +++| IX7 X3+X7 ADJUST AVAILABLE MEMORY 05519 M01S00169.271l716 +++| SB3 X2+ 05520 M01S00170.271l716 +++| SA6 UMTA SET MCT INDEX FOR CP 05521 M01S00171.271l716 +++| SA7 A3+ 05522 M00S03165.cpumtr +++| 05523 M00S03166.cpumtr +++|* UPDATE EXCHANGE PACKAGE AND CP STATUS. 05524 M00S03167.cpumtr +++|
| Line S03168 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05525 M01S03168.271l716 ---| SFL SA4 B6+2 READ EXCHANGE PACKAGE FL 05526 M01S03169.271l716 ---| SA3 B7+FLSW READ FL STATUS 05527 M01S03170.271l716 ---| MX1 -12 05528 M01S03171.271l716 ---| AX0 6 POSITION INCREMENT 05529 M01S03172.271l716 ---| SA2 CPAL+A0 CHECK CPU ACTIVE 05530 M01S03173.271l716 ---| IX7 X3+X0 UPDATE FL 05531 M01S03174.271l716 ---| SA3 A3+B1 05532 M01S03175.271l716 ---| IX6 X3+X0 05533 M01S03176.271l716 ---| AX2 24 05534 M01S03177.271l716 ---|+ SA6 A3 UPDATE FL WORDS IN 1 WORD OF CODE 05535 M01S03178.271l716 ---| BX6 -X1*X7 NEW FL 05536 M01S03179.271l716 ---| SB3 X2 05537 M01S03180.271l716 ---| SA7 A3-B1 STORE FL STATUS 05538 M01S03181.271l716 ---| LX6 36+6 POSITION NEW FL 05539 M01S03182.271l716 ---| MX7 24 05540 M01S03183.271l716 ---| BX4 -X7*X4 CLEAR OLD FL 05541 M01S03184.271l716 ---| BX6 X4+X6 INSERT NEW FL 05542 M01S03185.271l716 ---| SA6 A4 UPDATE EXCHANGE PACKAGE 05543 M01S03186.271l716 ---| NE B3,B7,SFL1 IF THIS CPU NOT ACTIVE ON THIS JOB 05544 M01S03187.271l716 ---| SB4 SFL1 CHECK JOB STATUS 05545 M01S03188.271l716 ---| JP CJS
| Line S00172 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05546 M01S00172.271l716 +++| SFL1 SA3 B7+FLSW GET FL STATUS WORDS 05547 M01S00173.271l716 +++| AX0 6 05548 M01S00174.271l716 +++| SA4 A3+B1 05549 M01S00175.271l716 +++| TA2 X6,MCT FETCH MCT ENTRY 05550 M01S00176.271l716 +++| MX1 -12 05551 M01S00177.271l716 +++| IX6 X3+X0 UPDATE FIELD LENGTH 05552 M01S00178.271l716 +++| + SA6 A3 05553 M01S00179.271l716 +++| IX7 X4+X0 MODIFY *FLSW* + 1 05554 M01S00180.271l716 +++| BX6 -X1*X6 05555 M01S00181.271l716 +++| SA7 A4 CHANGE CPA WORDS IN 1 WORD OF CODE 05556 M01S00182.271l716 +++| SA3 B6+2 05557 M01S00183.271l716 +++| IX7 X2-X0 ADJUST UNASSIGNED CM ABOVE CP/PCP 05558 M01S00184.271l716 +++| SA7 A2
| Line S00185 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 05559 M02S00185.273l780 ---| ZR B7,SFL2 IF CONTROL POINT ZERO
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 05560 M01S00113.273l780 +++| ZR B7,SFL2 IF CMR REQUEST
| Line S00186 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05561 M01S00186.271l716 +++| MX7 -36 05562 M01S00187.271l716 +++| BX4 -X7*X3 CLEAR OLD FL 05563 M01S00188.271l716 +++| LX6 36+6 05564 M01S00189.271l716 +++| BX6 X6+X4 UPDATE EXCHANGE PACKAGE FL 05565 M01S00190.271l716 +++| SA6 B6+2 05566 M01S00191.271l716 +++| SFL2 ZR B5,SFL3 IF NOT *MTR* CALL 05567 M01S00192.271l716 +++| SX6 0 05568 M01S00193.271l716 +++| SA6 SMRL
| Line S00194 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 05569 M02S00194.273l780 ---| ZR B7,MTRX IF CONTROL POINT ZERO
| Line S00114 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 05570 M01S00114.273l780 +++| ZR B7,MTRX IF CMR REQUEST
| Line S00195 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05571 M01S00195.271l716 +++| SFL3 NE B3,B7,SFL4 IF CURRENT CPU NOT ACTIVE ON THIS JOB 05572 M01S00196.271l716 +++| SB4 SFL4 05573 M01S00197.271l716 +++| JP CJS CHECK JOB STATUS 05574 M00S03189.cpumtr +++| 05575 M00S03190.cpumtr +++|* UPDATE CM USAGE. 05576 M00S03191.cpumtr +++|
| Line S03192 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05577 M01S03192.271l716 ---| SFL1 SB4 SJS
| Line S00198 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05578 M01S00198.271l716 +++| SFL4 SB4 SJS 05579 M00S03193.cpumtr +++| NG X0,SRU IF FL DECREASE 05580 M00S03194.cpumtr +++| SB4 MTRX 05581 M00S03195.cpumtr +++| NZ X0,SRU IF FL INCREASE 05582 M00S03196.cpumtr +++| JP MTRX EXIT MONITOR MODE 05583 M00S03197.cpumtr +++| SIS SPACE 4,10 05584 M00S03198.cpumtr +++|** SIS - SET *I* STATUS.
| Line S03199 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05585 M01S03199.271l750 ---|* ASSUMES JOB IS ACTIVE IN THIS CPU. 05586 M00S03200.cpumtr +++|* 05587 M00S03201.cpumtr +++|* ENTRY (B7) = CONTROL POINT ADDRESS.
| Line S00803 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05588 M01S00803.271l750 +++|* JOB ACTIVE IN THIS CPU. 05589 M00S03202.cpumtr +++|* 05590 M00S03203.cpumtr +++|* EXIT TO *BNJ* BEGIN NEW JOB.
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | cpum99a |
Seq # *Modification Id* Act ----------------------------+ 05591 M01S00015.cpum99a +++|*
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | cpum99a |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05592 M02S00016.271l716 ---|* USES X - 1, 2, 3, 4, 6, 7. 05593 M02S00017.271l716 ---|* A - 2, 3, 4, 6.
| Line S00199 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05594 M01S00199.271l716 +++|* USES X - 7. 05595 M00S03204.cpumtr +++|
| Line S03205 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05596 M01S03205.271l716 ---|
| Line S03206 Modification History | |
|---|---|
M01 (Removed by) | cpum99a |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05597 M02S03206.271l716 ---| SIS SX7 ICPS *I* STATUS IS *BNJ* ENTRY CONDITION
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | cpum99a |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05598 M02S00018.271l716 ---| SIS SA2 A0+CSWL DETERMINE SLICE TIME REMAINING 05599 M02S00019.271l716 ---| SA3 RTCL 05600 M02S00020.271l716 ---| SA4 MSCL GET MINIMUM SLICE TIME 05601 M02S00021.271l716 ---| MX7 -36 05602 M02S00022.271l716 ---| SX1 B1 05603 M02S00023.271l716 ---| BX6 -X7*X2 TIME OF SLICE EXPIRATION 05604 M02S00024.271l716 ---| SA2 B7+JCIW GET RECALL FLAG 05605 M02S00025.271l716 ---| BX7 -X7*X3 EXTRACT REAL TIME 05606 M02S00026.271l716 ---| MX3 -12 05607 M02S00027.271l716 ---| IX6 X6-X7 TIME LEFT IN SLICE 05608 M02S00028.271l716 ---| BX7 -X3*X4 MINIMUM SLICE TIME 05609 M02S00029.271l716 ---| SA3 A2+B1 GET RECALL ACCUMULATOR 05610 M02S00030.271l716 ---| ERRNZ JCIW+1-CRCW CODE ASSUMES VALUE 05611 M02S00031.271l716 ---| IX7 X7-X6 POSITIVE IF TIME LEFT WILL BE .LT. MINIMUM 05612 M02S00032.271l716 ---| IX6 X6-X1 DECREMENT TIME REMAINING BY 1 05613 M02S00033.271l716 ---| AX7 59 05614 M02S00034.271l716 ---| LX1 48 RECALL FLAG 05615 M02S00035.271l716 ---| BX4 X7*X6 CLEAR THE TIME REMAINING, IF .LT. MINIMUM 05616 M02S00036.271l716 ---| BX6 X7*X1 SET OR CLEAR THE RECALL FLAG 05617 M02S00037.271l716 ---| MX7 -48 05618 M02S00038.271l716 ---| BX2 -X1*X2 05619 M02S00039.271l716 ---| LX4 -12 05620 M02S00040.271l716 ---| BX7 -X7*X3 05621 M02S00041.271l716 ---| BX6 X6+X2 05622 M02S00042.271l716 ---| BX7 X4+X7 05623 M02S00043.271l716 ---| SA6 A2 UPDATE THE RECALL FLAG 05624 M02S00044.271l716 ---| SA7 A3 UPDATE THE RECALL ACCUMULATOR 05625 M02S00045.271l716 ---| SX7 ICPS *I* STATUS IS *BNJ* ENTRY CONDITION
| Line S00200 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05626 M01S00200.271l716 +++| SIS BSS 0 ENTRY 05627 M01S00201.271l716 +++| SX7 ICPS SET *I* STATUS FOR *BNJ* ENTRY 05628 M00S03207.cpumtr +++| EQ BNJ BEGIN NEW JOB 05629 M00S03208.cpumtr +++| SJS SPACE 4,15 05630 M00S03209.cpumtr +++|** SJS - START JOB SCHEDULER. 05631 M00S03210.cpumtr +++|* 05632 M00S03211.cpumtr +++|* EXIT TO MTRX. 05633 M00S03212.cpumtr +++|* 05634 M00S03213.cpumtr +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 05635 M00S03214.cpumtr +++|* B - 3, 4. 05636 M00S03215.cpumtr +++|* A - 1, 2, 3, 7. 05637 M00S03216.cpumtr +++|* 05638 M00S03217.cpumtr +++|* CALLS APQ. 05639 M00S03218.cpumtr +++|* 05640 M00S03219.cpumtr +++|* PRESERVES A5, B7, A0. 05641 M00S03220.cpumtr +++| 05642 M00S03221.cpumtr +++| 05643 M00S03222.cpumtr +++| SJS SX7 B7+ SAVE CONTROL POINT ADDRESS 05644 M00S03223.cpumtr +++| TB7 SCA SET SYSTEM CONTROL POINT ADDRESS 05645 M00S03224.cpumtr +++| SA7 T1 05646 M00S03225.cpumtr +++| SB6 SJS0 RETURN ADDRESS IF NO ACTIVITY LIMIT 05647 M00S03226.cpumtr +++| SB3 SJS3 RETURN ADDRESS IF ACTIVITY LIMIT 05648 M00S03227.cpumtr +++| EQ CAL CHECK ACTIVITY LIMIT 05649 M00S03228.cpumtr +++| 05650 M00S03229.cpumtr +++| SJS0 SA3 JSCL READ SCHEDULER CONTROL WORD 05651 M00S03230.cpumtr +++| SA1 RTCL 05652 M00S03231.cpumtr +++| NG X3,SJS3 IF SCHEDULER ACTIVE 05653 M00S03232.cpumtr +++| SA2 SJSA READ *1SJ* CALL 05654 M00S03233.cpumtr +++| MX7 24 05655 M00S03234.cpumtr +++| AX1 36 EXTRACT TIME IN SECONDS 05656 M00S03235.cpumtr +++| MX0 -24 05657 M00S03236.cpumtr +++| BX7 X7*X2 CLEAR *1SJ* CALL FLAGS 05658 M00S03237.cpumtr +++| MX5 1
| Line S03238 Modification History | |
|---|---|
M01 (Removed by) | ns2220a |
Seq # *Modification Id* Act ----------------------------+ 05659 M01S03238.ns2220a ---| BX4 -X0*X3 EXTRACT RECALL TIME 05660 M00S03239.cpumtr +++| SA7 A2
| Line S03240 Modification History | |
|---|---|
M01 (Removed by) | ns2220a |
Seq # *Modification Id* Act ----------------------------+ 05661 M01S03240.ns2220a ---| IX4 X1-X4 *RTCL* - TIME TO RECALL
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2220a |
Seq # *Modification Id* Act ----------------------------+ 05662 M01S00001.ns2220a +++| ERRNZ SJSB-SJSA-1 CODE ASSUMES *SJSB* = *SJSA* + 1 05663 M01S00002.ns2220a +++| SA4 A2+B1 05664 M01S00003.ns2220a +++| SA7 A4 RESET FORCED *JSCL* RESET FLAG 05665 M00S03241.cpumtr +++| BX7 X3+X5 SET SCHEDULER ACTIVE FLAG 05666 M00S03242.cpumtr +++| BX6 X2
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2220a |
Seq # *Modification Id* Act ----------------------------+ 05667 M01S00004.ns2220a +++| ZR X4,SJS0.1 IF FORCED *JSCL* RESET 05668 M01S00005.ns2220a +++| BX4 -X0*X3 EXTRACT RECALL TIME 05669 M01S00006.ns2220a +++| IX4 X1-X4 *RTCL* - TIME TO RECALL 05670 M00S03243.cpumtr +++| NG X4,SJS1 IF NOT TIME TO PERFORM PERIODIC RECALL
| Line S03244 Modification History | |
|---|---|
M01 (Removed by) | ns2220a |
Seq # *Modification Id* Act ----------------------------+ 05671 M01S03244.ns2220a ---| LX5 25-59
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2220a |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05672 M02S00007.271l716 ---| SJS0.1 LX5 25-59
| Line S03245 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05673 M01S03245.271l716 ---| AX3 24 EXTRACT RECALL TIME PERIOD
| Line S00202 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05674 M01S00202.271l716 +++| SJS0.1 AX3 24 EXTRACT RECALL TIME PERIOD 05675 M00S03246.cpumtr +++| MX0 -12 05676 M00S03247.cpumtr +++| BX4 -X0*X3
| Line S03248 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05677 M01S03248.271l716 ---| BX6 X6+X5 05678 M00S03249.cpumtr +++| IX7 X7+X4 UPDATE TIME TO RECALL 05679 M00S03250.cpumtr +++| AX3 12 EXTRACT QFT/EJT SCHEDULING FREQUENCY 05680 M00S03251.cpumtr +++| BX4 -X0*X3
| Line S03252 Modification History | |
|---|---|
M01 (Removed by) | ns2220a |
Seq # *Modification Id* Act ----------------------------+ 05681 M01S03252.ns2220a ---| SX3 B1 05682 M01S03253.ns2220a ---| SB3 X4
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2220a |
Seq # *Modification Id* Act ----------------------------+ 05683 M01S00008.ns2220a +++| SX3 B1+
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2220a |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05684 M02S00009.271l716 ---| SB3 X4+
| Line S00203 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 05685 M01S00203.271l716 +++| SB3 X4 05686 M00S03254.cpumtr +++| LX4 X3,B3 GENERATE FREQUENCY MASK 05687 M00S03255.cpumtr +++| IX4 X4-X3 05688 M00S03256.cpumtr +++| BX1 X4*X1 05689 M00S03257.cpumtr +++| NZ X1,SJS1 IF NOT TIME FOR QFT SCHEDULING 05690 M00S03258.cpumtr +++| LX3 24 05691 M00S03259.cpumtr +++| BX6 X6+X3 05692 M00S03260.cpumtr +++| SJS1 SB3 SJS2 *APQ* RETURN ADDRESS 05693 M00S03261.cpumtr +++| SB4 LA1SJ SET LOAD PARAMETER INDEX 05694 M00S03262.cpumtr +++| SA7 A3 STORE SCHEDULER CONTROL WORD 05695 M00S03263.cpumtr +++| EQ APQ ASSIGN PP 05696 M00S03264.cpumtr +++| 05697 M00S03265.cpumtr +++|* NOTE - 05698 M00S03266.cpumtr +++|* IN ORDER TO AVOID *DEADLOCK* (SORT OF) PROBLEMS 05699 M00S03267.cpumtr +++|* WITH THE *CPUCIO* REQUEST QUEUE, THE QUEUE IS CHECKED 05700 M00S03268.cpumtr +++|* PENDING REQUESTS ON EVERY *1SJ* CALL 05701 M00S03269.cpumtr +++| 05702 M00S03270.cpumtr +++| SJS2 SB3 SJS3 *PCQ* RETURN ADDRESS 05703 M00S03271.cpumtr +++| SB4 SJS3 05704 M00S03272.cpumtr +++| TNO /BUFIO/PCQ1,BUFIO PROCESS PSEUDO-PP REQUEST QUEUE 05705 M00S03273.cpumtr +++| 05706 M00S03274.cpumtr +++| SJS3 SA1 T1 RESTORE (B7) 05707 M00S03275.cpumtr +++| SB7 X1+ 05708 M00S03276.cpumtr +++| 05709 M00S03277.cpumtr +++|* IF A PRIORITY PP REQUEST IS PENDING, THE ENTRY IS 05710 M00S03278.cpumtr +++|* CLEARED AND A REJECT STATUS IS SET TO THE WAITING PP. 05711 M00S03279.cpumtr +++| 05712 M00S03280.cpumtr +++| SA3 PQRL CHECK FOR PENDING PRIORITY REQUEST 05713 M00S03281.cpumtr +++| ZR X3,MTRX IF NO PP REQUESTS IN QUEUE 05714 M00S03282.cpumtr +++| SA1 X3 05715 M00S03283.cpumtr +++| MX2 -18 05716 M00S03284.cpumtr +++| LX1 -18 05717 M00S03285.cpumtr +++| BX3 -X2*X1 05718 M00S03286.cpumtr +++| ZR X3,MTRX IF FIRST REQUEST NOT PRIORITY 05719 M00S03287.cpumtr +++| BX7 X7-X7 SEND REJECT RESPONSE TO WAITING PP 05720 M00S03288.cpumtr +++| SA7 X3 05721 M00S03289.cpumtr +++| 05722 M00S03290.cpumtr +++|* DELETE ENTRY FROM QUEUE. 05723 M00S03291.cpumtr +++| 05724 M00S03292.cpumtr +++| LX1 18 05725 M00S03293.cpumtr +++| MX4 -12 05726 M00S03294.cpumtr +++| BX6 -X4*X1 ADDRESS OF NEXT ENTRY 05727 M00S03295.cpumtr +++| SA6 A3 05728 M00S03296.cpumtr +++| SA7 A1+RECW-RCCW CLEAR ENTRY FROM CONTROL POINT 05729 M00S03297.cpumtr +++| SA7 A1+REPW-RCCW 05730 M00S03298.cpumtr +++| SX1 A1 05731 M00S03299.cpumtr +++| AX1 7 05732 M00S03300.cpumtr +++| MX4 -4 05733 M00S03301.cpumtr +++| LX1 7 CONTROL POINT ADDRESS 05734 M00S03302.cpumtr +++| SA2 X1+STSW ADD ENTRY TO FREE LIST 05735 M00S03303.cpumtr +++| SX3 -420B-RCCW+1 05736 M00S03304.cpumtr +++| SB4 X1 05737 M00S03305.cpumtr +++| BX7 -X4*X2 NEXT FREE ENTRY 05738 M00S03306.cpumtr +++| BX2 X4*X2 05739 M00S03307.cpumtr +++| SA7 A1 05740 M00S03308.cpumtr +++| SX4 A1-B4 COMPUTE RECALL INDEX 05741 M00S03309.cpumtr +++| IX4 X4+X3 05742 M00S03310.cpumtr +++| IX7 X4+X2 05743 M00S03311.cpumtr +++| SA7 A2 UPDATE STSW 05744 M00S03312.cpumtr +++| EQ MTRX EXIT 05745 M00S03313.cpumtr +++| 05746 M00S03314.cpumtr +++| 05747 M00S03315.cpumtr +++| SJSA VFD 18/3R1SJ,6/0,12/0,12/0,12/0
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2220a |
Seq # *Modification Id* Act ----------------------------+ 05748 M01S00010.ns2220a +++| SJSB CON 1 ZERO IF FORCED *JSCL* RESET 05749 M00S03316.cpumtr +++| SNS SPACE 4,10 05750 M00S03317.cpumtr +++|** SNS - SET NULL STATUS. 05751 M00S03318.cpumtr +++|* 05752 M00S03319.cpumtr +++|* ENTRY (B7) = CONTROL POINT ADDRESS. 05753 M00S03320.cpumtr +++|* 05754 M00S03321.cpumtr +++|* EXIT TO *JAV* ADVANCE JOB. 05755 M00S03322.cpumtr +++|* 05756 M00S03323.cpumtr +++|* CALLS JAV. 05757 M00S03324.cpumtr +++| 05758 M00S03325.cpumtr +++| 05759 M00S03326.cpumtr +++| SNS SA4 B7+STSW CLEAR CPU STATUS 05760 M00S03327.cpumtr +++| SB3 BNJ1 *JAV* RETURN ADDRESS 05761 M00S03328.cpumtr +++| MX7 -57 05762 M00S03329.cpumtr +++| BX7 -X7*X4 05763 M00S03330.cpumtr +++| SA7 A4+ 05764 M00S03331.cpumtr +++| EQ JAV ADVANCE JOB 05765 M00S03332.cpumtr +++| SPL SPACE 4,20 05766 M00S03333.cpumtr +++|** SPL - SEARCH PERIPHERAL LIBRARY. 05767 M00S03334.cpumtr +++|* 05768 M00S03335.cpumtr +++|* ENTRY (X6) = PPU REQUEST. 05769 M00S03336.cpumtr +++|* (X5) = PP OUTPUT REGISTER IF *SPLM* CALL. 05770 M00S03337.cpumtr +++|* (B6) = EXIT ADDRESS.
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05771 M01S00035.251l664 +++|* = EXIT ADDRESS + 400000B, IF REQUEST IS FOR CPP. 05772 M00S03338.cpumtr +++|* 05773 M00S03339.cpumtr +++|* EXIT LIBRARY UNLOCKED. 05774 M00S03340.cpumtr +++|* (X1) .GT. 0. 05775 M00S03341.cpumtr +++|* (X5) = 0 IF PROGRAM FOUND, ELSE *SFP* *PLD* ENTRY 05776 M00S03342.cpumtr +++|* RETURNED. 05777 M00S03343.cpumtr +++|* (X7) = PP LOAD PARAMETERS. 05778 M00S03344.cpumtr +++|* (A1) = ADDRESS OF PLD ENTRY. 05779 M00S03345.cpumtr +++|* (B6) = EXIT ADDRESS. 05780 M00S03346.cpumtr +++|* 05781 M00S03347.cpumtr +++|* LIBRARY LOCKED (SYSEDIT ACTIVE) 05782 M00S03348.cpumtr +++|* (X1) = -0. 05783 M00S03349.cpumtr +++|* (X7) = (X5) ON ENTRY WITH BITS 56 AND 57 SET. 05784 M00S03350.cpumtr +++|* 05785 M00S03351.cpumtr +++|* USES X - 1, 3, 4, 5, 7. 05786 M00S03352.cpumtr +++|* B - 5. 05787 M00S03353.cpumtr +++|* A - 1, 7. 05788 M00S03354.cpumtr +++| 05789 M00S03355.cpumtr +++| 05790 M00S03356.cpumtr +++| SPL SA1 PSTP FIND END OF DIRECTORY 05791 M00S03357.cpumtr +++| MX4 18 05792 M00S03358.cpumtr +++| AX1 12 05793 M00S03359.cpumtr +++| SX3 X1-2 05794 M00S03360.cpumtr +++| SA1 PLDP READ START OF DIRECTORY 05795 M00S03361.cpumtr +++| BX7 X4*X6 SET PROGRAM NAME 05796 M00S03362.cpumtr +++| AX1 36 05797 M00S03363.cpumtr +++| SB5 X1 FWA OF LIBRARY 05798 M00S03364.cpumtr +++| IX3 X3-X1 LIBRARY LENGTH 05799 M00S03365.cpumtr +++| NZ B5,SPL1 IF LIBRARY NOT LOCKED
| Line S03366 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05800 M01S03366.253l688 ---| MX3 2
| Line S00605 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05801 M01S00605.253l688 +++| SX3 44B REJECT FUNCTION (SET RETRY/MOVABLE FLAGS) 05802 M00S03367.cpumtr +++| BX1 -X1+X1
| Line S03368 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05803 M01S03368.253l688 ---| LX3 -2 SET MOVABLE FUNCTION
| Line S00606 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05804 M01S00606.253l688 +++| LX3 -6 05805 M00S03369.cpumtr +++| BX7 X5+X3
| Line S03370 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05806 M01S03370.251l664 ---| JP B6
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 05807 M02S00036.252l678 ---| TJP 0,(/CPP/SPL1,B6,CPP) RETURN
| Line S00103 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05808 M02S00103.253l688 ---| TJP 0,(/CPP/SPL1,CPP,B6) RETURN
| Line S00607 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05809 M01S00607.253l688 +++| TJP (/CPP/SPL1,CPP,B6) RETURN 05810 M00S03371.cpumtr +++| 05811 M00S03372.cpumtr +++| SPL1 SX2 B5+X3 RESET LWA OF LIBRARY
| Line S03373 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05812 M01S03373.251l664 ---| ZR X3,SPL3 IF END OF SEARCH
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05813 M01S00037.251l664 +++| ZR X3,SPL4 IF END OF SEARCH 05814 M00S03374.cpumtr +++| AX3 1 05815 M00S03375.cpumtr +++| SA1 B5+X3 SAMPLE DIRECTORY ENTRY 05816 M00S03376.cpumtr +++| BX5 X4*X1 05817 M00S03377.cpumtr +++| IX5 X7-X5 05818 M00S03378.cpumtr +++| LX5 18 POSITION SIGN BIT 05819 M00S03379.cpumtr +++| NG X5,SPL1 IF PROGRAM .LT. SAMPLE 05820 M00S03380.cpumtr +++| SB5 A1+B1 RESET FWA OF SEARCH INTERVAL 05821 M00S03381.cpumtr +++| SX3 B5 RESET LENGTH 05822 M00S03382.cpumtr +++| IX3 X2-X3 05823 M00S03383.cpumtr +++| NZ X5,SPL1 IF PROGRAM NOT FOUND
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05824 M01S00038.251l664 +++| LX7 -54
| Line S03384 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05825 M01S03384.253l688 ---| BX1 -X4*X1
| Line S00608 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05826 M01S00608.253l688 +++| 05827 M01S00609.253l688 +++|* ENTER HERE TO BUILD THE LOAD PARAMETERS FOR AN OVERLAY. 05828 M01S00610.253l688 +++| 05829 M01S00611.253l688 +++|* (X1) = PLD ENTRY. 05830 M01S00612.253l688 +++|* (X4) = 77777700 ... 00B. 05831 M01S00613.253l688 +++|* (X7) = FIRST CHARACTER OF OVERLAY NAME. 05832 M01S00614.253l688 +++|* (B6) = RETURN ADDRESS. 05833 M01S00615.253l688 +++|* 05834 M01S00616.253l688 +++|* NOTE. (X5) WILL NOT BE CHANGED. 05835 M01S00617.253l688 +++| 05836 M01S00618.253l688 +++| 05837 M01S00619.253l688 +++| SPL1.1 BX1 -X4*X1
| Line S03385 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05838 M01S03385.251l664 ---| SPL2 SX3 B1
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05839 M01S00039.251l664 +++| SX3 B1 05840 M01S00040.251l664 +++| SX7 X7-1R7 05841 M00S03386.cpumtr +++| LX3 41
| Line S03387 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05842 M01S03387.251l664 ---| IX7 X1+X3
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05843 M01S00041.251l664 +++| ZR X7,SPL5 IF *7XX* OVERLAY 05844 M01S00042.251l664 +++| 05845 M01S00043.251l664 +++|* SET *RT* PARAMETER. 05846 M01S00044.251l664 +++| 05847 M01S00045.251l664 +++| BX7 -X3*X1 CLEAR CM/MS BIT 05848 M01S00046.251l664 +++| SB5 -B6 SET (B5) POSITIVE IF CPP 05849 M01S00047.251l664 +++| SX2 214B SET *RT* PARAMETER POSSIBILITIES 05850 M01S00048.251l664 +++| BX3 X3*X1 05851 M01S00049.251l664 +++| ZR X3,SPL2 IF MS RESIDENT OVERLAY 05852 M01S00050.251l664 +++| LX1 -24 GET *RPL* ADDRESS 05853 M01S00051.251l664 +++| SB5 A1 05854 M01S00052.251l664 +++| SA1 X1-400000B 05855 M01S00053.251l664 +++| AX2 3 SET NEW *RT* PARAMETER 05856 M01S00054.251l664 +++| BX3 -X4*X1 05857 M01S00055.251l664 +++| SA1 B5 RESTORE THE *PLD* ADDRESS 05858 M01S00056.251l664 +++| AX3 40 ONE = 16-BIT PROGRAM 05859 M01S00057.251l664 +++| SB5 X3 05860 M01S00058.251l664 +++| AX2 B5 SET NEW *RT* PARAMETER 05861 M01S00059.251l664 +++| SPL2 MX3 -4 05862 M01S00060.251l664 +++| BX1 -X4*X1 ENSURE (X1) .GT. 0 05863 M01S00061.251l664 +++| BX2 -X3*X2 *RT* = 14/10/01/00 05864 M01S00062.251l664 +++| LX2 42 05865 M01S00063.251l664 +++| PL B5,SPL3 IF CONCURRENT PP OR CM RESIDENT 05866 M01S00064.251l664 +++| AX1 23-17 05867 M01S00065.251l664 +++| SX3 X1 SET LEADING ZEROS IF 12-BIT OVERLAY 05868 M01S00066.251l664 +++| SPL3 BX2 X3*X2 05869 M01S00067.251l664 +++| BX7 X7+X2
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05870 M02S00068.253l688 ---| TJMP /CPP/SPL1,CPP,/PROBE/SPL,PROBE,B6 RETURN
| Line S00620 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05871 M01S00620.253l688 +++| TJP (/CPP/SPL1,CPP,/PROBE/SPL,PROBE,B6) RETURN
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05872 M01S00069.251l664 +++| 05873 M01S00070.251l664 +++| SPL4 SA1 PSTP READ SFP ENTRY 05874 M01S00071.251l664 +++| SX3 1 05875 M01S00072.251l664 +++| AX1 12 05876 M01S00073.251l664 +++| SA1 X1-2 05877 M01S00074.251l664 +++| LX3 41 05878 M01S00075.251l664 +++| SPL5 IX7 X1+X3 SET *RT* PARAMETER 05879 M00S03388.cpumtr +++| BX7 -X3*X7
| Line S03389 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05880 M01S03389.251l664 ---| TJP 0,(/PROBE/SPL,B6,PROBE) RETURN 05881 M01S03390.251l664 ---| 05882 M01S03391.251l664 ---| SPL3 SA1 PSTP READ SFP ENTRY 05883 M01S03392.251l664 ---| AX1 12
| Line S03393 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05884 M02S03393.251l664 ---| LX7 6
| Line S03394 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05885 M01S03394.251l664 ---| SA1 X1-2
| Line S03395 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
M02 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05886 M02S03395.251l664 ---| SB5 X7-1R6 05887 M02S03396.251l664 ---| NZ B5,SPL2 IF NOT *6XX* PROGRAM 05888 M02S03397.251l664 ---| EQ HNG HANG
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 05889 M02S00017.251l664 ---| EQ SPL2 RETURN *SFP* LOAD PARAMETERS
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05890 M02S00076.253l688 ---| TJMP /CPP/SPL1,CPP,/PROBE/SPL,PROBE,B6 RETURN
| Line S00621 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 05891 M01S00621.253l688 +++| TJP (/CPP/SPL1,CPP,/PROBE/SPL,PROBE,B6) RETURN
| Line S00804 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05892 M01S00804.271l750 +++| SPR SPACE 4,20 05893 M01S00805.271l750 +++|** SPR - SET CPU PRIORITY. 05894 M01S00806.271l750 +++|* 05895 M01S00807.271l750 +++|* ENTRY (B3) = RETURN ADDRESS. 05896 M01S00808.271l750 +++|* (B7) = CONTROL POINT ADDRESS. 05897 M01S00809.271l750 +++|* (X3) = *CWQW*. 05898 M01S00810.271l750 +++|* (X5) = NEW CPU PRIORITY. 05899 M01S00811.271l750 +++|* (A3) = ADDRESS OF *CWQW*. 05900 M01S00812.271l750 +++|* 05901 M01S00813.271l750 +++|* EXIT NEW CPU PRIORITY SET AND CPU SLICE RESTARTED. 05902 M01S00814.271l750 +++|* TO CALLER VIA *RCC* IF JOB IN *W* STATUS. 05903 M01S00815.271l750 +++|* TO CALLER VIA */NVE/SVS* IF JOB ACTIVE IN CPU AND 05904 M01S00816.271l750 +++|* *NVE* PRESENT. 05905 M01S00817.271l750 +++|* 05906 M01S00818.271l750 +++|* USES X - ALL. 05907 M01S00819.271l750 +++|* A - 1, 2, 3, 6, 7. 05908 M01S00820.271l750 +++|* B - 4, 6. 05909 M01S00821.271l750 +++| 05910 M01S00822.271l750 +++| 05911 M01S00823.271l750 +++| SPR BSS 0 ENTRY 05912 M01S00824.271l750 +++| SA4 TPRC+X5 GET SERVICE CYCLE FOR NEW PRIORITY 05913 M01S00825.271l750 +++| SA1 B7+STSW DETERMINE CPU STATUS 05914 M01S00826.271l750 +++| LX5 3 05915 M01S00827.271l750 +++| UX3,B4 X3 UNPACK CPU PRIORITY AND PARAMETERS 05916 M01S00828.271l750 +++| SB4 X5 SET PRIORITY WITHOUT PRIORITY FLAGS 05917 M01S00829.271l750 +++| SX6 B1 05918 M01S00830.271l750 +++| PX3 B4,X3 SET NEW CPU PRIORITY IN *CWQW* 05919 M01S00831.271l750 +++| LX6 47-0 05920 M01S00832.271l750 +++| MX7 6 05921 M01S00833.271l750 +++| BX6 X3+X6 SET EXTENDED CPU SLICE INCOMPLETE FLAG 05922 M01S00834.271l750 +++| BX7 X7*X4 05923 M01S00835.271l750 +++| SA6 A3 UPDATE *CWQW* 05924 M01S00836.271l750 +++| SA7 A3+B1 SET SERVICE CYCLE AND CLEAR ACCUMULATORS 05925 M01S00837.271l750 +++| ERRNZ CSAW-CWQW-1 05926 M01S00838.271l750 +++| MX4 3 05927 M01S00839.271l750 +++| BX1 X4*X1 05928 M01S00840.271l750 +++| LX1 3 05929 M01S00841.271l750 +++| SX4 X1-WCPS 05930 M01S00842.271l750 +++| ZR X1,RB3 IF NULL STATUS 05931 M01S00843.271l750 +++| PL X4,SPR1 IF *W* STATUS OR GREATER 05932 M01S00844.271l750 +++| 05933 M01S00845.271l750 +++|* SET PRIORITY OF ACTIVE JOB. A CPU SWITCH IS REQUESTED TO 05934 M01S00846.271l750 +++|* FORCE SELECTION OF THE HIGHEST PRIORITY JOB. 05935 M01S00847.271l750 +++| 05936 M01S00848.271l750 +++| SA2 X1+TSCL-1 GET CPU PRIORITY OF ACTIVE JOB 05937 M01S00849.271l750 +++| SA3 X1+CSWL-1 05938 M01S00850.271l750 +++| SB4 B4+3 SET ACTIVE SLICE AND RECALL FLAGS 05939 M01S00851.271l750 +++| UX6 X6 05940 M01S00852.271l750 +++| PX6 B4,X6 05941 M01S00853.271l750 +++| SA6 A6 REWRITE *CWQW* WITH FLAGS 05942 M01S00854.271l750 +++| UX2 X2 05943 M01S00855.271l750 +++| PX6 B4,X2 SET *TSCL* CPU PRIORITY AND FLAGS 05944 M01S00856.271l750 +++| MX7 1 05945 M01S00857.271l750 +++| BX7 X3+X7 05946 M01S00858.271l750 +++| SA7 A3 REQUEST CPU SWITCH 05947 M01S00859.271l750 +++| SA6 A2 UPDATE *TSCL* 05948 M01S00860.271l750 +++| SB6 B3 SET *SVS* RETURN ADDRESS 05949 M01S00861.271l750 +++| MX0 -12 05950 M01S00862.271l750 +++| TJP (/NVE/SVS1,NVE,/MONITOR/RB3) 05951 M01S00863.271l750 +++| 05952 M01S00864.271l750 +++| SPR1 NZ X4,RB3 IF NOT *W* STATUS 05953 M01S00865.271l750 +++| SB6 B7+ SET EXCHANGE PACKAGE ADDRESS 05954 M01S00866.271l750 +++| EQ RCC REORDER WAIT QUEUE
| Line S03398 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05955 M01S03398.271l750 ---| SRU SPACE 4,20
| Line S00867 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 05956 M01S00867.271l750 +++| SRU SPACE 4,30 05957 M00S03399.cpumtr +++|** SRU - CALCULATE SRU MULTIPLIERS CPM AND IOM. 05958 M00S03400.cpumtr +++|* 05959 M00S03401.cpumtr +++|* SRU = M1(CP + M2*IO + M3(CP+IO)CM + 05960 M00S03402.cpumtr +++|* M4(CP+IO)EC + MM*MP + AUC) + A1 05961 M00S03403.cpumtr +++|* 05962 M00S03404.cpumtr +++|* = M1(1 + M3*CM + M4*EC)CP + M1(M2 + M3*CM + M4*EC)IO + 05963 M00S03405.cpumtr +++|* M1*MM*MP + M1*AUC + A1 05964 M00S03406.cpumtr +++|* 05965 M00S03407.cpumtr +++|* = (M1 + M1*M3*CM + M1*M4*EC)CP + 05966 M00S03408.cpumtr +++|* (M1*M2 + M1*M3*CM + M1*M4*EC)IO + 05967 M00S03409.cpumtr +++|* M1*MM*MP + M1*AUC + A1 05968 M00S03410.cpumtr +++|* 05969 M00S03411.cpumtr +++|* = CPM*CP + IOM*IO + M1M*MP + M1*AUC + A1. 05970 M00S03412.cpumtr +++|* 05971 M00S03413.cpumtr +++|* CP = (S0)*CP0 + (S1)*CP1 05972 M00S03414.cpumtr +++|* IO = S2*MS + S3*MT + S4*PF 05973 M00S03415.cpumtr +++|* CM = (CM FL + 777B) / 1000B (WORDS) 05974 M00S03416.cpumtr +++|* EC = (ECS FL) / 1000B
| Line S03417 Modification History | |
|---|---|
M01 (Removed by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 05975 M01S03417.v22l602 ---|* MP = MAP III ACCUMULATOR
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 05976 M01S00003.v22l602 +++|* MP = MAP ACCUMULATOR 05977 M00S03418.cpumtr +++|* AUC = AUC ACCUMULATOR 05978 M00S03419.cpumtr +++|* A1 = ADDER ACCUMULATOR (MAINTAINED IN MICROUNITS * 10) 05979 M00S03420.cpumtr +++|* 05980 M00S03421.cpumtr +++|* ENTRY (B4) = EXIT ADDRESS. 05981 M00S03422.cpumtr +++|* 05982 M00S03423.cpumtr +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 05983 M00S03424.cpumtr +++|* B - 3. 05984 M00S03425.cpumtr +++|* A - 1, 3, 4, 6. 05985 M00S03426.cpumtr +++|* 05986 M00S03427.cpumtr +++|* CALLS CPT 05987 M00S03428.cpumtr +++| 05988 M00S03429.cpumtr +++| 05989 M00S03430.cpumtr +++| SRU SA3 B7+ECSW ECS FL 05990 M00S03431.cpumtr +++| SA4 B7+FLSW 05991 M00S03432.cpumtr +++| MX2 -12 05992 M00S03433.cpumtr +++| BX0 -X2*X4 05993 M00S03434.cpumtr +++| LX4 12 05994 M00S03435.cpumtr +++| BX4 -X2*X4 ADD NEGATIVE FIELD LENGTH 05995 M00S03436.cpumtr +++| IX4 X4+X0 05996 M00S03437.cpumtr +++| SA1 B7+MP1W M1*M3 AND M1*M4
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2184 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 05997 M02S00001.252l678 ---| LX3 UESF ADJUST ECS FL
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 05998 M01S00104.252l678 +++| TLX3 0,UESC ADJUST EM FL 05999 M00S03438.cpumtr +++| MX7 -3 06000 M00S03439.cpumtr +++| BX3 -X2*X3 06001 M00S03440.cpumtr +++| LX1 18 06002 M00S03441.cpumtr +++| MX2 -18 06003 M00S03442.cpumtr +++| IX4 X4-X7 ROUND CM FL/100B WITH 7B 06004 M00S03443.cpumtr +++| BX6 -X2*X1 06005 M00S03444.cpumtr +++| AX4 3 CM = (CM FL/100B + 7B) / 10B 06006 M00S03445.cpumtr +++| LX1 18 06007 M00S03446.cpumtr +++| IX6 X6*X4 M1*M3*CM 06008 M00S03447.cpumtr +++| BX7 -X2*X1 06009 M00S03448.cpumtr +++| ERRNZ MP2W-MP1W-1 CODE DEPENDS ON CONTIGUOUS WORDS 06010 M00S03449.cpumtr +++| SA4 A1+B1 M1*1000 AND M1*M2 06011 M00S03450.cpumtr +++| IX7 X7*X3 M1*M4*EC 06012 M00S03451.cpumtr +++| LX4 18 06013 M00S03452.cpumtr +++| IX6 X6+X7 M1*M3*CM + M1*M4*EC 06014 M00S03453.cpumtr +++| BX3 -X2*X4 06015 M00S03454.cpumtr +++| LX4 18 06016 M00S03455.cpumtr +++| IX7 X3+X6 M1*1000 + M1*M3*CM + M1*M4*EC (CPM) 06017 M00S03456.cpumtr +++| BX4 -X2*X4 06018 M00S03457.cpumtr +++| IX4 X4+X6 M1*M2 + M1*M3*CM + M1*M4*EC (IOM) 06019 M00S03458.cpumtr +++| LX7 30
| Line S03459 Modification History | |
|---|---|
M01 (Removed by) | ns2443 |
Seq # *Modification Id* Act ----------------------------+ 06020 M01S03459.ns2443 ---| SX0 B4 SAVE EXIT ADDRESS
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | ns2443 |
Seq # *Modification Id* Act ----------------------------+ 06021 M01S00032.ns2443 +++| SX6 B4 SAVE EXIT ADDRESS 06022 M01S00033.ns2443 +++| SA6 SRUA 06023 M00S03460.cpumtr +++| IX4 X7+X4 30/CPM AND 30/IOM 06024 M00S03461.cpumtr +++| SB3 SRU1
| Line S03462 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 06025 M01S03462.253l688 ---| TJMP /CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR/CPT
| Line S00622 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06026 M02S00622.271l750 ---| TJP (/CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR/CPT)
| Line S00868 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06027 M01S00868.271l750 +++| TJP (/NVE/CPT,NVE,/CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR 06028 M01S00869.271l750 +++|,/CPT) 06029 M00S03463.cpumtr +++|
| Line S03464 Modification History | |
|---|---|
M01 (Removed by) | ns2443 |
Seq # *Modification Id* Act ----------------------------+ 06030 M01S03464.ns2443 ---| SRU1 SA1 A4+B1 PRESERVE SRU CALCULATION ENABLE /DISABLE
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns2443 |
Seq # *Modification Id* Act ----------------------------+ 06031 M01S00034.ns2443 +++| SRU1 SA1 SRUA 06032 M01S00035.ns2443 +++| SB4 X1 06033 M01S00036.ns2443 +++| SA1 A4+B1 06034 M00S03465.cpumtr +++| MX2 1
| Line S03466 Modification History | |
|---|---|
M01 (Removed by) | ns2443 |
Seq # *Modification Id* Act ----------------------------+ 06035 M01S03466.ns2443 ---| SB4 X0 RESTORE EXIT ADDRESS 06036 M00S03467.cpumtr +++| BX2 X2*X1 06037 M00S03468.cpumtr +++| BX6 X2+X4 06038 M00S03469.cpumtr +++| SA6 A1 06039 M00S03470.cpumtr +++| JP B4 EXIT
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns2443 |
Seq # *Modification Id* Act ----------------------------+ 06040 M01S00037.ns2443 +++| 06041 M01S00038.ns2443 +++| SRUA CON 0 06042 M00S03471.cpumtr +++| STL SPACE 4,15 06043 M00S03472.cpumtr +++|** STL - SET CPU TIME LIMIT. 06044 M00S03473.cpumtr +++|* 06045 M00S03474.cpumtr +++|* ENTRY (X3)= TIME LIMIT IN MILLISECONDS. 06046 M00S03475.cpumtr +++|* IF (X3) .LT. 0, TIME LIMIT IS UNLIMITED. 06047 M00S03476.cpumtr +++|* (B7)= CONTROL POINT ADDRESS. 06048 M00S03477.cpumtr +++|* (B3)= EXIT ADDRESS. 06049 M00S03478.cpumtr +++|* 06050 M00S03479.cpumtr +++|* EXIT (X7) = 0. 06051 M00S03480.cpumtr +++|* 06052 M00S03481.cpumtr +++|* USES X - 1, 2, 6, 7. 06053 M00S03482.cpumtr +++|* B - 4. 06054 M00S03483.cpumtr +++|* A - 2, 6. 06055 M00S03484.cpumtr +++|* 06056 M00S03485.cpumtr +++|* CALLS MSB. 06057 M00S03486.cpumtr +++| 06058 M00S03487.cpumtr +++| 06059 M00S03488.cpumtr +++| STL SA2 B7+SRUW ENTRY 06060 M00S03489.cpumtr +++| MX1 1 06061 M00S03490.cpumtr +++| BX6 -X1*X3 06062 M00S03491.cpumtr +++| LX1 58-59 06063 M00S03492.cpumtr +++| BX7 -X1*X2 CLEAR TIME LIMIT 06064 M00S03493.cpumtr +++| SA7 A2+ 06065 M00S03494.cpumtr +++| NG X3,STL1 IF UNLIMITED REQUEST 06066 M00S03495.cpumtr +++| SB4 STL1 SET *MSB* RETURN ADDRESS 06067 M00S03496.cpumtr +++| SA2 CPTC MILLISECONDS TO QUARTER NANOUNITS 06068 M00S03497.cpumtr +++| EQ /PROGRAM/MSB MULTIPLY 60 BIT INTEGER 06069 M00S03498.cpumtr +++| 06070 M00S03499.cpumtr +++| STL1 SA6 B7+CPLW 06071 M00S03500.cpumtr +++| SX7 B0+ CLEAR OUTPUT REGISTER 06072 M00S03501.cpumtr +++| JP B3 RETURN 06073 M00S03502.cpumtr +++| SXR SPACE 4,10 06074 M00S03503.cpumtr +++|** SXR - SET *X* STATUS WITH RECALL CRITERION. 06075 M00S03504.cpumtr +++|* 06076 M00S03505.cpumtr +++|* ENTRY (X0) = RECALL CRITERION. 06077 M00S03506.cpumtr +++|* (B7) = CONTROL POINT ADDRESS. 06078 M00S03507.cpumtr +++|* 06079 M00S03508.cpumtr +++|* EXIT TO *MTRX* IF CONTROL POINT NOT ACTIVE. 06080 M00S03509.cpumtr +++|* TO *BNJ* BEGIN NEW JOB.
| Line S00870 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06081 M01S00870.271l750 +++|* 06082 M01S00871.271l750 +++|* USES X - ALL. 06083 M01S00872.271l750 +++|* A - 1, 2, 3, 6, 7. 06084 M00S03510.cpumtr +++| 06085 M00S03511.cpumtr +++| 06086 M00S03512.cpumtr +++| SXR SA1 B7+STSW GET JOB STATUS
| Line S00873 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06087 M01S00873.271l750 +++| SA2 RQRL 06088 M01S00874.271l750 +++| SA3 B7+CWQW 06089 M01S00875.271l750 +++| SX6 1 06090 M01S00876.271l750 +++| NG X1,MTRX IF *W* OR *I* STATUS 06091 M01S00877.271l750 +++| LX6 46-0 06092 M01S00878.271l750 +++| AX1 57 06093 M01S00879.271l750 +++| BX6 -X6*X3 CLEAR RECALL NOT REQUIRED FLAG 06094 M01S00880.271l750 +++| ZR X1,MTRX IF NULL STATUS 06095 M01S00881.271l750 +++| SA6 B7+CWQW UPDATE *CWQW* 06096 M00S03513.cpumtr +++| MX4 -12
| Line S03514 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06097 M01S03514.271l750 ---| NG X1,MTRX IF *W* OR *I* STATUS 06098 M01S03515.271l750 ---| SA2 RQRL 06099 M01S03516.271l750 ---| AX1 57 06100 M01S03517.271l750 ---| ZR X1,MTRX IF NULL STATUS 06101 M00S03518.cpumtr +++| LX0 12 06102 M00S03519.cpumtr +++| 06103 M00S03520.cpumtr +++|* FIND POSITION IN *RQ*. CODE IS REPLICATED FOR PERFORMANCE 06104 M00S03521.cpumtr +++|* REASONS. 06105 M00S03522.cpumtr +++| 06106 M00S03523.cpumtr +++| SXR1 BX7 -X4*X2 06107 M00S03524.cpumtr +++| SA3 X7 06108 M00S03525.cpumtr +++| IX6 X3-X0 06109 M00S03526.cpumtr +++| BX5 -X4*X3 06110 M00S03527.cpumtr +++| PL X6,SXR2 IF POSITION REACHED 06111 M00S03528.cpumtr +++| SA2 X5 06112 M00S03529.cpumtr +++| IX6 X2-X0 06113 M00S03530.cpumtr +++| NG X6,SXR1 IF POSITION NOT REACHED 06114 M00S03531.cpumtr +++| BX7 X5 06115 M00S03532.cpumtr +++| SA2 A3 06116 M00S03533.cpumtr +++| SXR2 SX3 B7+CRCW ADDRESS OF NEW ENTRY 06117 M00S03534.cpumtr +++| BX7 X7+X0 06118 M00S03535.cpumtr +++| SA7 X3 06119 M00S03536.cpumtr +++| BX2 X4*X2 06120 M00S03537.cpumtr +++| BX6 X2+X3 06121 M00S03538.cpumtr +++| SX7 XCPS 06122 M00S03539.cpumtr +++| SA6 A2 06123 M00S03540.cpumtr +++| EQ BNJ BEGIN NEW JOB 06124 M00S03541.cpumtr +++| SXS SPACE 4 06125 M00S03542.cpumtr +++|** SXS - SET *X* STATUS. 06126 M00S03543.cpumtr +++|* 06127 M00S03544.cpumtr +++|* ENTRY (B7) = CONTROL POINT ADDRESS. 06128 M00S03545.cpumtr +++|* 06129 M00S03546.cpumtr +++|* EXIT TO SXR. 06130 M00S03547.cpumtr +++| 06131 M00S03548.cpumtr +++| 06132 M00S03549.cpumtr +++| SXS SA1 RTCL GET CURRENT TIME 06133 M00S03550.cpumtr +++| SA2 MSCL EXTRACT RECALL TIME DELAY 06134 M00S03551.cpumtr +++| MX0 -36 06135 M00S03552.cpumtr +++| BX1 -X0*X1 06136 M00S03553.cpumtr +++| MX0 -12 06137 M00S03554.cpumtr +++| LX2 -36 06138 M00S03555.cpumtr +++| BX2 -X0*X2 06139 M00S03556.cpumtr +++| SX0 PTMF SET RECALL CRITERION 06140 M00S03557.cpumtr +++| IX1 X1+X2 06141 M00S03558.cpumtr +++| LX0 36 06142 M00S03559.cpumtr +++| BX0 X0+X1 06143 M00S03560.cpumtr +++| EQ SXR SET *X* STATUS WITH RECALL CRITERION
| Line S03561 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06144 M01S03561.271l750 ---| TSM SPACE 4,10
| Line S00882 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06145 M01S00882.271l750 +++| TSM SPACE 4,15 06146 M00S03562.cpumtr +++|** TSM - TERMINATE STORAGE MOVE. 06147 M00S03563.cpumtr +++|* 06148 M00S03564.cpumtr +++|* EXIT (SMRL) = 0.
| Line S00204 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06149 M01S00204.271l716 +++|* TO *BNJ1* (VIA *UMT* AND *JAV*). 06150 M01S00205.271l716 +++|* TO *CRA5* IF FIELD LENGTH SWAP. 06151 M00S03565.cpumtr +++|*
| Line S03566 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06152 M01S03566.271l716 ---|* USES X - 1, 2, 4, 5, 6. 06153 M01S03567.271l716 ---|* A - 1, 4, 6. 06154 M01S03568.271l716 ---|* B - 3, 6, 7. 06155 M01S03569.271l716 ---|* 06156 M01S03570.271l716 ---|* CALLS BNJ, JAV, RCC.
| Line S00206 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06157 M01S00206.271l716 +++|* USES X - 0, 1, 2, 4, 5, 6. 06158 M01S00207.271l716 +++|* A - 1, 4, 6. 06159 M01S00208.271l716 +++|* B - 3, 6. 06160 M01S00209.271l716 +++|* 06161 M01S00210.271l716 +++|* CALLS BNJ, JAV, RCC, SCA. 06162 M00S03571.cpumtr +++| 06163 M00S03572.cpumtr +++| 06164 M00S03573.cpumtr +++| TSM SA1 SMPXP+STSW CLEAR CPU STATUS ON PSEUDO-CP
| Line S03574 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06165 M01S03574.271l716 ---| SA4 SMRL 06166 M01S03575.271l716 ---| MX2 -57 06167 M01S03576.271l716 ---| MX5 -12 06168 M01S03577.271l716 ---| BX6 -X2*X1 SET NULL STATUS 06169 M01S03578.271l716 ---| BX0 -X5*X4 CONTROL POINT STATUS 06170 M01S03579.271l716 ---| SA6 A1 06171 M01S03580.271l716 ---| LX4 59-37
| Line S03581 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06172 M02S03581.271l716 ---| TNG X4,(/ECS/TSM4,/MONITOR/TSM1,EEC) IF ECS ERROR ON MOVE
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06173 M02S00105.271l716 ---| TNG X4,(/ECS/TSM4,EEC,/MONITOR/TSM1) IF ECS ERROR ON MOVE
| Line S03582 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06174 M01S03582.271l716 ---| TSM1 LX4 59-36-59+37
| Line S03583 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06175 M02S03583.271l716 ---| TNG X4,(/ECS/TSM8,/MONITOR/TSM2,EEC) IF USER ECS ERROR
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06176 M02S00106.271l716 ---| TNG X4,(/ECS/TSM8,EEC,/MONITOR/TSM2) IF USER ECS ERROR
| Line S03584 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06177 M01S03584.271l716 ---| TSM2 LX4 59-47-59+36 06178 M01S03585.271l716 ---| SB7 X0 CONTROL POINT ADDRESS 06179 M01S03586.271l716 ---| AX4 57 06180 M01S03587.271l716 ---| MX5 2 *I* STATUS 06181 M01S03588.271l716 ---| ERRNZ ICPS-6 CODE DEPENDS ON VALUE 06182 M01S03589.271l716 ---| SB3 TSM3 *JAV*/*RCC* RETURN ADDRESS 06183 M01S03590.271l716 ---| ZR X4,JAV IF STATUS PREVIOUS NULL
| Line S00211 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06184 M01S00211.271l716 +++| MX2 -57 06185 M01S00212.271l716 +++| BX6 -X2*X1 SET NULL STATUS 06186 M01S00213.271l716 +++| SA6 A1+ 06187 M01S00214.271l716 +++| SB3 TSM1 06188 M01S00215.271l716 +++| EQ SCA CONVERT CP/PCP ADDRESS 06189 M01S00216.271l716 +++| 06190 M01S00217.271l716 +++| TSM1 SA4 A2 READ *SMRL* 06191 M01S00218.271l716 +++| LX4 59-37 06192 M01S00219.271l716 +++| TNG X4,(/ECS/TSM4,EEC,/MONITOR/TSM2) IF ECS ERROR ON MOVE 06193 M01S00220.271l716 +++| TSM2 LX4 37-36 06194 M01S00221.271l716 +++| ERRNZ ICPS-6 CODE DEPENDS ON VALUE 06195 M01S00222.271l716 +++| MX5 2 06196 M01S00223.271l716 +++| TNG X4,(/ECS/TSM8,EEC,/MONITOR/TSM3) IF USER ECS ERROR 06197 M01S00224.271l716 +++| TSM3 LX4 59-47+36-59 06198 M01S00225.271l716 +++| SB3 TSM4 *RCC* RETURN ADDRESS 06199 M01S00226.271l716 +++| AX4 57 06200 M01S00227.271l716 +++| ZR X4,TSM4 IF STATUS PREVIOUS NULL
| Line S03591 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06201 M01S03591.271l716 ---| SX4 X4+B1
| Line S00228 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06202 M01S00228.271l716 +++| SX4 X4+1
| Line S00229 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06203 M02S00229.271l750 ---| MX2 -57
| Line S03592 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06204 M01S03592.271l750 ---| SB6 B7 EXCHANGE PACKAGE ADDRESS 06205 M01S03593.271l750 ---| NZ X4,RCC0 IF PREVIOUSLY ACTIVE STATUS
| Line S00883 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06206 M01S00883.271l750 +++| SB6 B7+ EXCHANGE PACKAGE ADDRESS 06207 M01S00884.271l750 +++| NZ X4,RCC IF PREVIOUSLY ACTIVE STATUS
| Line S03594 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06208 M01S03594.271l716 ---| SA1 B7+STSW SET *I* STATUS 06209 M01S03595.271l716 ---| BX6 X1+X5 06210 M01S03596.271l716 ---| SA6 A1
| Line S00230 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06211 M01S00230.271l716 +++| SA1 B7+STSW 06212 M01S00231.271l716 +++| BX6 X1+X5 SET *I* STATUS 06213 M01S00232.271l716 +++| SA6 A1 06214 M00S03597.cpumtr +++| 06215 M00S03598.cpumtr +++|* CPU STATUS IS RESTORED BEFORE *SMRL* IS CLEARED SO THAT ANY 06216 M00S03599.cpumtr +++|* PP PROGRAMS SENSING CPU STATUS WILL NOT MISS IT. 06217 M00S03600.cpumtr +++|
| Line S03601 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06218 M01S03601.271l716 ---| TSM3 SX6 B0+ INDICATE STORAGE MOVE COMPLETE 06219 M01S03602.271l716 ---| SA6 SMRL 06220 M01S03603.271l716 ---| EQ BNJ1 BEGIN NEW JOB
| Line S00233 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06221 M01S00233.271l716 +++| TSM4 SA2 TSMA CHECK BLOCK MOVE STATUS 06222 M01S00234.271l716 +++| SB4 BNJ1 06223 M01S00235.271l716 +++| NZ X2,TSM6 IF FIELD LENGTH SWAP 06224 M01S00236.271l716 +++| TB5 SCA 06225 M01S00237.271l716 +++| GT B7,B5,TSM5 IF PSEUDO-CONTROL POINT 06226 M01S00238.271l716 +++| SB4 JAV SET *UMT* EXIT ADDRESS 06227 M01S00239.271l716 +++| TSM5 SB3 BNJ1 SET *JAV* EXIT ADDRESS 06228 M01S00240.271l716 +++| EQ UMT UPDATE MEMORY CONTROL TABLE 06229 M01S00241.271l716 +++| 06230 M01S00242.271l716 +++| TSM6 SA1 SMRL GET MOVE PARAMETERS 06231 M01S00243.271l716 +++| BX0 X2 06232 M01S00244.271l716 +++| SX4 X1 EXTRACT MEMORY TYPE FLAG 06233 M01S00245.271l716 +++| AX4 12-1 06234 M01S00246.271l716 +++| MX5 -12 06235 M01S00247.271l716 +++| ERRNZ FLSW+2-ECSW CODE DEPENDS ON VALUE 06236 M01S00248.271l716 +++| SX6 X4+FLSW 06237 M01S00249.271l716 +++| SA1 X6+B7 READ FL CONTROL WORD 06238 M01S00250.271l716 +++| SX2 B7 06239 M01S00251.271l716 +++| BX5 -X5*X1 EXTRACT FIELD LENGTH 06240 M01S00252.271l716 +++| AX4 1 06241 M01S00253.271l716 +++| AX2 7-1 06242 M01S00254.271l716 +++| TB5 X4,MCT SET BASE MCT ADDRESS 06243 M01S00255.271l716 +++| AX1 48 06244 M01S00256.271l716 +++| SA4 X2+B5 READ REQUESTOR-S MCT ENTRY 06245 M01S00257.271l716 +++| IX1 X1+X5 06246 M01S00258.271l716 +++| LX0 1 CONVERT MCT ORDINAL TO INDEX 06247 M01S00259.271l716 +++| IX7 X4+X1 ADJUST REQUESTOR-S HOLE SIZE 06248 M01S00260.271l716 +++| SA4 TSMB GET PRE-MOVE HOLE POINT HOLE SIZE 06249 M01S00261.271l716 +++| SA3 X0+B5 READ HOLE POINT MCT ENTRY 06250 M01S00262.271l716 +++| MX5 12 06251 M01S00263.271l716 +++| IX6 X3-X4 ADJUST HOLE POINT HOLE SIZE 06252 M01S00264.271l716 +++| SA7 X2+B5 06253 M01S00265.271l716 +++| IX4 X4-X1 06254 M01S00266.271l716 +++| AX2 1 06255 M01S00267.271l716 +++| MX7 -24 06256 M01S00268.271l716 +++| BX3 X7*X3 06257 M01S00269.271l716 +++| LX5 -12 06258 M01S00270.271l716 +++| BX3 X3+X4 06259 M01S00271.271l716 +++| EQ CRA5 CHANGE MEMORY TABLE LINKAGE 06260 M01S00272.271l716 +++| 06261 M01S00273.271l716 +++| 06262 M01S00274.271l716 +++| TSMA CON 0 HOLE POINT NUMBER IF BLOCK MOVE 06263 M01S00275.271l716 +++| TSMB CON 0 PRE-MOVE HOLE POINT HOLE SIZE 06264 M00S03604.cpumtr +++| TITLE CPU REQUEST PROCESSOR. 06265 M00S03605.cpumtr +++| CPR SPACE 4 06266 M00S03606.cpumtr +++|*** CPU PROGRAM REQUESTS. 06267 M00S03607.cpumtr +++|* 06268 M00S03608.cpumtr +++|* 06269 M00S03609.cpumtr +++|* CPU PROGRAM REQUESTS ARE PASSED THROUGH RELATIVE 06270 M00S03610.cpumtr +++|* LOCATION 1. THE FORMAT IS AS FOLLOWS - 06271 M00S03611.cpumtr +++|* 06272 M00S03612.cpumtr +++|*T 18/ NAME,6/ A,36/ ARG
Figure
06273 M00S03613.cpumtr +++|* 06274 M00S03614.cpumtr +++|* NAME REQUEST NAME 06275 M00S03615.cpumtr +++|* A 20B IF AUTO RECALL DESIRED 06276 M00S03616.cpumtr +++|* ARG ARGUMENTS 06277 M00S03617.cpumtr +++|* 06278 M00S03618.cpumtr +++|* 06279 M00S03619.cpumtr +++|* IF THE REQUEST IS NOT ONE OF THE FOLLOWING, AND THE 06280 M00S03620.cpumtr +++|* NAME OF THE REQUEST BEGINS WITH AN ALPHA CHARACTER, 06281 M00S03621.cpumtr +++|* THE REQUEST IS ASSUMED TO BE THE NAME OF A PP PROGRAM, AND 06282 M00S03622.cpumtr +++|* THIS PROGRAM IS ASSIGNED TO AN AVAILABLE PP. 06283 M00S03623.cpumtr +++|* 06284 M00S03624.cpumtr +++|* IF THE REQUEST IS NOT OF THE ABOVE FORMAT, THE JOB IS 06285 M00S03625.cpumtr +++|* ABORTED WITH A *MONITOR CALL ERROR.*. 06286 M00S03626.cpumtr +++| CPR SPACE 4 06287 M00S03627.cpumtr +++|** CPR - PROCESS CPU REQUEST. 06288 M00S03628.cpumtr +++|* 06289 M00S03629.cpumtr +++|* ENTRY (X2) = RA. 06290 M00S03630.cpumtr +++|* (X5) = (RA+1). 06291 M00S03631.cpumtr +++|* (A2) = ADDRESS OF RA IN EXCHANGE PACKAGE. 06292 M00S03632.cpumtr +++|* (B3) = ADDRESS OF WORD IN CPUMTR CONTAINING RA. 06293 M00S03633.cpumtr +++|* (B7) = CONTROL POINT ADDRESS. 06294 M00S03634.cpumtr +++| 06295 M00S03635.cpumtr +++| 06296 M00S03636.cpumtr +++| CPR SA1 A2+B1 GET FL 06297 M00S03637.cpumtr +++| BX4 X5 06298 M00S03638.cpumtr +++| MX0 -12 06299 M00S03639.cpumtr +++| LX4 18 06300 M00S03640.cpumtr +++| AX1 36
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | ns2443 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06301 M02S00039.271l750 ---| BX7 X7-X7 INDICATE RA+1 PROCESS 06302 M02S00040.271l750 ---| SA7 MS 06303 M00S03641.cpumtr +++| SX7 X4-3RRCL 06304 M00S03642.cpumtr +++| SB4 X1 SET FL 06305 M00S03643.cpumtr +++| NZ X7,CPR2 IF NOT *RCL* 06306 M00S03644.cpumtr +++| 06307 M00S03645.cpumtr +++|* PROCESS *RCL* IN LINE DUE TO FREQUENCY OF USE. 06308 M00S03646.cpumtr +++| 06309 M00S03647.cpumtr +++| LX4 59-40-18 06310 M00S03648.cpumtr +++| SX3 B1 06311 M00S03649.cpumtr +++| IX2 X2+X3 RA+1 06312 M00S03650.cpumtr +++| NG X4,CPR1 IF AUTO RECALL 06313 M00S03651.cpumtr +++| EWX7 X2 CLEAR RA+1 06314 M00S03652.cpumtr +++| EQ SXS SET *X* STATUS 06315 M00S03653.cpumtr +++| 06316 M00S03654.cpumtr +++| CPR1 SX3 X5-1 RECALL ADDRESS - 1 06317 M00S03655.cpumtr +++| SA1 B7+STSW CHECK ACTIVITY 06318 M00S03656.cpumtr +++| MX6 -4 06319 M00S03657.cpumtr +++| SB5 X5 06320 M00S03658.cpumtr +++| LX6 4 06321 M00S03659.cpumtr +++| IX4 X2+X3 ADDRESS OF WORD RECALLED ON 06322 M00S03660.cpumtr +++| BX7 -X6*X1 06323 M00S03661.cpumtr +++| LX6 48-4 06324 M00S03662.cpumtr +++| GE B5,B4,CPE IF ILLEGAL ADDRESS 06325 M00S03663.cpumtr +++| LE B5,B1,CPE IF ILLEGAL ADDRESS 06326 M00S03664.cpumtr +++| BX6 -X6*X1 06327 M00S03665.cpumtr +++| ERX1 X4 CHECK WORD RECALLED ON 06328 M00S03666.cpumtr +++| BX7 X7+X6 06329 M00S03667.cpumtr +++| MX6 -18 06330 M00S03668.cpumtr +++| R= X0,PCBF PROCESS COMPLETION BIT 06331 M00S03669.cpumtr +++| LX0 36 06332 M00S03670.cpumtr +++| LX1 59-0 06333 M00S03671.cpumtr +++| BX0 X0+X4 06334 M00S03672.cpumtr +++| SA4 B7+SSCW CHECK FOR SUBSYSTEM CONNECTIONS 06335 M00S03673.cpumtr +++| ZR X7,CPR1.2 IF NO ACTIVITY 06336 M00S03674.cpumtr +++| PL X1,SXR IF BUSY, SET *X* STATUS, RECALL CONDITION 06337 M00S03675.cpumtr +++| CPR1.1 BX7 X7-X7 06338 M00S03676.cpumtr +++| EWX7 X2 CLEAR RA+1 06339 M00S03677.cpumtr +++| EQ MTRX RETURN 06340 M00S03678.cpumtr +++| 06341 M00S03679.cpumtr +++| CPR1.2 NG X1,CPR1.1 IF COMPLETION BIT SET 06342 M00S03680.cpumtr +++| SA1 B7+DBAW GET K-DISPLAY BUFFER ADDRESSES 06343 M00S03681.cpumtr +++| SA2 B7+JCIW CHECK SUBSYSTEM ID 06344 M00S03682.cpumtr +++| MX3 -12 06345 M00S03683.cpumtr +++| BX7 -X6*X5
| Line S03684 Modification History | |
|---|---|
M01 (Removed by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 06346 M01S03684.v22l602 ---| MX5 -48 06347 M00S03685.cpumtr +++| LX3 24 06348 M00S03686.cpumtr +++| BX3 -X3*X2
| Line S03687 Modification History | |
|---|---|
M01 (Removed by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 06349 M01S03687.v22l602 ---| BX5 -X5*X4 06350 M00S03688.cpumtr +++| NZ X3,SXR IF SUBSYSTEM
| Line S03689 Modification History | |
|---|---|
M01 (Removed by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 06351 M01S03689.v22l602 ---| NZ X5,SXR IF WAIT RESPONSE INDICATORS SET
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 06352 M01S00004.v22l602 +++| NZ X4,SXS IF SUBSYSTEM CONNECTIONS 06353 M00S03690.cpumtr +++| BX3 -X6*X1 CHECK K-DISPLAY BUFFERS 06354 M00S03691.cpumtr +++| LX6 18 06355 M00S03692.cpumtr +++| BX6 -X6*X1 06356 M00S03693.cpumtr +++| LX1 59-58 06357 M00S03694.cpumtr +++| BX3 X3-X7 06358 M00S03695.cpumtr +++| LX6 -18 06359 M00S03696.cpumtr +++| BX6 X6-X7 06360 M00S03697.cpumtr +++| SX7 RCET 06361 M00S03698.cpumtr +++| NG X1,SEF IF K-DISPLAY STATUS NOT TO BE RETURNED 06362 M00S03699.cpumtr +++| ZR X3,SXR IF K-DISPLAY ADDRESS MATCHES 06363 M00S03700.cpumtr +++| ZR X6,SXR IF K-DISPLAY ADDRESS MATCHES 06364 M00S03701.cpumtr +++| EQ SEF SET ERROR FLAG 06365 M00S03702.cpumtr +++| 06366 M00S03703.cpumtr +++| CPR2 SX6 X4-3RTIM 06367 M00S03704.cpumtr +++| SA3 CMCL CHECK STORAGE MOVE REQUEST 06368 M00S03705.cpumtr +++| ZR X6,TIM IF *TIM* 06369 M00S03706.cpumtr +++| SX7 B7
| Line S03707 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06370 M01S03707.271l716 ---| LX3 -48 06371 M01S03708.271l716 ---| BX3 -X0*X3
| Line S00276 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06372 M01S00276.271l716 +++| AX3 48 06373 M01S00277.271l716 +++| AX7 7 06374 M00S03709.cpumtr +++| BX7 X7-X3 06375 M00S03710.cpumtr +++| SA3 B7+STSW CHECK SUBCP ACTIVE 06376 M00S03711.cpumtr +++| ZR X7,SXS IF STORAGE MOVE REQUESTED 06377 M00S03712.cpumtr +++| LX3 59-56 06378 M00S03713.cpumtr +++| BX7 -X0*X4
| Line S03714 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 06379 M01S03714.252l678 ---| CPR3 TNG X3,(/MONITOR/BCE,/MONITOR/CPR3,SUBCP)
| Line S00107 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 06380 M01S00107.252l678 +++| CPR3 TNG X3,(/MONITOR/BCE,SUBCP,/MONITOR/CPR3) 06381 M00S03715.cpumtr +++| SB5 X4-3RMSG 06382 M00S03716.cpumtr +++| ZR X7,CPE IF LAST TWO CHARACTERS OF PP CALL ZERO
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | cpum132 |
Seq # *Modification Id* Act ----------------------------+ 06383 M01S00001.cpum132 +++| SX7 B1+ 06384 M01S00002.cpum132 +++| LX7 41-0 06385 M01S00003.cpum132 +++| BX5 -X7*X5 CLEAR BIT 41 IN RA+1 CALL 06386 M00S03717.cpumtr +++| 06387 M00S03718.cpumtr +++| 06388 M00S03719.cpumtr +++|* IDENTIFY REQUEST BY TREE SEARCH. 06389 M00S03720.cpumtr +++|* EXIT TO PROCESSOR WITH 06390 M00S03721.cpumtr +++|* (X0) = -7777B 06391 M00S03722.cpumtr +++|* (X1) = FL 06392 M00S03723.cpumtr +++|* (X2) = RA 06393 M00S03724.cpumtr +++|* (X4) = REQUEST WORD SHIFTED 18 06394 M00S03725.cpumtr +++|* (X5) = REQUEST WORD 06395 M00S03726.cpumtr +++|* (B3) = ADDRESS OF MEMORY WORD CONTAINING RA. 06396 M00S03727.cpumtr +++|* (B4) = FL 06397 M00S03728.cpumtr +++|* (B7) = CONTROL POINT ADDRESS 06398 M00S03729.cpumtr +++| 06399 M00S03730.cpumtr +++| ZR B5,MSG IF *MSG* 06400 M00S03731.cpumtr +++| SX7 X4-3RCIO 06401 M00S03732.cpumtr +++| PL B5,CPR5 IF ABOVE *MSG* 06402 M00S03733.cpumtr +++| ZR X7,CIO IF *CIO* 06403 M00S03734.cpumtr +++| PL X7,CPR4 IF ABOVE *CIO* 06404 M00S03735.cpumtr +++| SB6 X4-3RABT 06405 M00S03736.cpumtr +++| ZR B6,ABT IF *ABT* 06406 M00S03737.cpumtr +++| SX6 X4-3RAAA 06407 M00S03738.cpumtr +++| PL X6,APJ IF LEGAL PROGRAM NAME 06408 M00S03739.cpumtr +++| EQ CPE *MONITOR CALL ERROR.* 06409 M00S03740.cpumtr +++| 06410 M00S03741.cpumtr +++| 06411 M00S03742.cpumtr +++| CPR4 SX6 X4-3RLDR 06412 M00S03743.cpumtr +++| ZR X6,LDR IF *LDR* 06413 M00S03744.cpumtr +++| SX7 X4-3RCPM 06414 M00S03745.cpumtr +++| PL X6,LDV IF ABOVE *LDR* 06415 M00S03746.cpumtr +++| SX6 X4-3REND 06416 M00S03747.cpumtr +++| ZR X7,CPM IF *CPM* 06417 M00S03748.cpumtr +++| SX7 X4-3REJT 06418 M00S03749.cpumtr +++| ZR X6,END IF *END* 06419 M00S03750.cpumtr +++| ZR X7,EJT IF *EJT* 06420 M00S03751.cpumtr +++| SX7 X4-3RCLO 06421 M00S03752.cpumtr +++| NZ X7,APJ IF NOT *CLO* 06422 M00S03753.cpumtr +++| EQ CLO CONVERT *CLO* TO *CIO* 06423 M00S03754.cpumtr +++| 06424 M00S03755.cpumtr +++| 06425 M00S03756.cpumtr +++| CPR5 SX7 X4-3RRFL 06426 M00S03757.cpumtr +++| PL X6,CPR6 IF ABOVE *TIM* 06427 M00S03758.cpumtr +++| NG X7,PFL IF BELOW *RFL* 06428 M00S03759.cpumtr +++| SX6 X4-3RRSB 06429 M00S03760.cpumtr +++| ZR X7,RFL IF *RFL* 06430 M00S03761.cpumtr +++| ZR X6,RSB IF *RSB* 06431 M00S03762.cpumtr +++| SX7 X4-3RSPC 06432 M00S03763.cpumtr +++| ZR X7,SPC IF *SPC* 06433 M00S03764.cpumtr +++| PL X6,SIC IF ABOVE *RSB* 06434 M00S03765.cpumtr +++| SX6 X4-3RRPV 06435 M00S03766.cpumtr +++| ZR X6,RPV IF *RPV* 06436 M00S03767.cpumtr +++| EQ APJ 06437 M00S03768.cpumtr +++| 06438 M00S03769.cpumtr +++| 06439 M00S03770.cpumtr +++| CPR6 SX7 X4-3RWCL 06440 M00S03771.cpumtr +++| SX6 X4-3RXJP 06441 M00S03772.cpumtr +++| ZR X7,WCL IF *WCL* 06442 M00S03773.cpumtr +++| SX7 X4-3RXJR
| Line S03774 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 06443 M01S03774.252l678 ---| TZR X6,(/MONITOR/XJP,/MONITOR/APJ,SUBCP) IF *XJP*
| Line S00108 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 06444 M01S00108.252l678 +++| TZR X6,(/MONITOR/XJP,SUBCP,/MONITOR/APJ) IF *XJP* 06445 M00S03775.cpumtr +++| ZR X7,XJR IF *XJR* 06446 M00S03776.cpumtr +++| SX6 X4-3R0AA 06447 M00S03777.cpumtr +++| PL X6,CPE IF ILLEGAL REQUEST 06448 M00S03778.cpumtr +++| EQ APJ ASSIGN PPU JOB 06449 M00S03779.cpumtr +++| AAR SPACE 4,10 06450 M00S03780.cpumtr +++|** AAR - ASSIGN AUTO RECALL PP REQUEST. 06451 M00S03781.cpumtr +++|* 06452 M00S03782.cpumtr +++|* ENTRY (X5) = PP REQUEST. 06453 M00S03783.cpumtr +++|* (B7) = CONTROL POINT. 06454 M00S03784.cpumtr +++| 06455 M00S03785.cpumtr +++| 06456 M00S03786.cpumtr +++| AAR SB4 B0+ SET LIBRARY SEARCH NEEDED 06457 M00S03787.cpumtr +++| AAR1 SB6 AAR2 *CAL* RETURN ADDRESS - NO LIMIT 06458 M00S03788.cpumtr +++| SB3 SXS *CAL* RETURN ADDRESS - ACTIVITY LIMIT 06459 M00S03789.cpumtr +++| EQ CAL CHECK ACTIVITY LIMIT 06460 M00S03790.cpumtr +++| 06461 M00S03791.cpumtr +++| AAR2 MX0 1 FORCE AUTO-RECALL 06462 M00S03792.cpumtr +++| SX7 B0+ CLEAR RA+1 06463 M00S03793.cpumtr +++| LX0 41-59 06464 M00S03794.cpumtr +++| SA2 RA1 ADDRESS OF RA+1 06465 M00S03795.cpumtr +++| EWX7 X2 CLEAR (RA+1) 06466 M00S03796.cpumtr +++| BX6 X0+X5 06467 M00S03797.cpumtr +++| SA7 APQA 06468 M00S03798.cpumtr +++| SB3 SIS *APQ* RETURN ADDRESS 06469 M00S03799.cpumtr +++| EQ APQ ASSIGN PP 06470 M00S03800.cpumtr +++| APJ SPACE 4,15 06471 M00S03801.cpumtr +++|** APJ - ASSIGN PPU JOB. 06472 M00S03802.cpumtr +++|* 06473 M00S03803.cpumtr +++|* ENTRY (X5) = PPU REQUEST WORD. 06474 M00S03804.cpumtr +++|* (B7) = CONTROL POINT ADDRESS. 06475 M00S03805.cpumtr +++|*
| Line S03806 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06476 M01S03806.271l750 ---|* EXIT TO MTRX.
| Line S00885 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06477 M01S00885.271l750 +++|* EXIT TO *APQ* TO ASSIGN PP. 06478 M01S00886.271l750 +++|* TO *SXS* TO SET X STATUS IF ACTIVITY LIMIT. 06479 M00S03807.cpumtr +++|*
| Line S03808 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06480 M01S03808.271l750 ---|* USES X - 0, 1, 2, 3, 4, 5, 6, 7. 06481 M01S03809.271l750 ---|* B - 3. 06482 M01S03810.271l750 ---|* A - 1, 2, 4, 7.
| Line S00887 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06483 M01S00887.271l750 +++|* USES X - ALL. 06484 M01S00888.271l750 +++|* B - 3, 4, 6. 06485 M01S00889.271l750 +++|* A - 1, 2, 7. 06486 M00S03811.cpumtr +++|*
| Line S03812 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06487 M01S03812.271l750 ---|* CALLS APQ, SIS, SXS.
| Line S00890 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06488 M01S00890.271l750 +++|* CALLS CAL. 06489 M00S03813.cpumtr +++| 06490 M00S03814.cpumtr +++|
| Line S03815 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06491 M01S03815.242l642 ---| APJ SB4 B0+ SET LIBRARY SEARCH NEEDED
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 06492 M01S00018.242l642 +++| APJ BX7 X7-X7 CLEAR PP PARAMETER WORD 06493 M01S00019.242l642 +++| SB4 B0 SET LIBRARY SEARCH NEEDED 06494 M01S00020.242l642 +++| SA7 APQA 06495 M00S03816.cpumtr +++| APJ0 SA1 B7+JCIW CHECK FOR SUBSYSTEM OR NON-ROLLABLE JOB 06496 M00S03817.cpumtr +++| SX3 B1 06497 M00S03818.cpumtr +++| LX1 0-21 06498 M00S03819.cpumtr +++| BX4 X3*X1 *DIS* FLAG 06499 M00S03820.cpumtr +++| LX3 40-0 06500 M00S03821.cpumtr +++| BX6 X3*X5 CHECK FOR AUTO RECALL 06501 M00S03822.cpumtr +++| LX1 -24-0+21 06502 M00S03823.cpumtr +++| MX2 -12 06503 M00S03824.cpumtr +++| BX2 -X2*X1 SUBSYSTEM IDENTIFICATION 06504 M00S03825.cpumtr +++| NZ X6,APJ0.1 IF PP CALL WITH AUTO RECALL 06505 M00S03826.cpumtr +++| BX6 X2+X4 06506 M00S03827.cpumtr +++| NZ X6,APJ2 IF SYSTEM JOB 06507 M00S03828.cpumtr +++| BX5 X5+X3 FORCE AUTO RECALL
| Line S03829 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06508 M01S03829.271l750 ---| APJ0.1 SA1 A1-B1 GET *STSW* CPA WORD 06509 M01S03830.271l750 ---| ERRNZ JCIW-STSW-1 CODE DEPENDS ON VALUE
| Line S00891 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06510 M01S00891.271l750 +++| APJ0.1 SA1 B7+STSW GET JOB ACTIVITY 06511 M00S03831.cpumtr +++| MX6 -8 06512 M00S03832.cpumtr +++| SX2 X2-LSSI-1 06513 M00S03833.cpumtr +++| LX1 -4 06514 M00S03834.cpumtr +++| BX6 -X6*X1 RECALL/TAPE ACTIVITY COUNT 06515 M00S03835.cpumtr +++| PL X2,APJ0.2 IF SUBSYSTEM 06516 M00S03836.cpumtr +++| LX1 12+4 06517 M00S03837.cpumtr +++| MX2 -5 06518 M00S03838.cpumtr +++| BX2 -X2*X1 PP COUNT 06519 M00S03839.cpumtr +++| IX6 X6+X2 06520 M00S03840.cpumtr +++| IX6 X6-X4 ALLOW FOR *DIS* 06521 M00S03841.cpumtr +++| APJ0.2 NZ X6,SXS IF PP OR TAPE ACTIVITY 06522 M00S03842.cpumtr +++| 06523 M00S03843.cpumtr +++|* ASSIGN PPU JOB. 06524 M00S03844.cpumtr +++| 06525 M00S03845.cpumtr +++| APJ1 MX0 1 EXTRACT AUTO RECALL FLAG 06526 M00S03846.cpumtr +++| LX0 40-59 06527 M00S03847.cpumtr +++| BX0 X0*X5 06528 M00S03848.cpumtr +++| LX0 41-40 06529 M00S03849.cpumtr +++| SA2 RA1 ADDRESS OF RA+1
| Line S03850 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06530 M01S03850.271l750 ---| BX7 X7-X7 CLEAR RA+1
| Line S00892 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06531 M01S00892.271l750 +++| SX7 B0+ CLEAR RA+1 06532 M00S03851.cpumtr +++| BX6 X0+X5 MAP AUTO RECALL TO BIT 41 06533 M00S03852.cpumtr +++| EWX7 X2 CLEAR (RA+1) 06534 M00S03853.cpumtr +++| SB3 SIS *APQ* RETURN ADDRESS
| Line S03854 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06535 M01S03854.271l750 ---| NZ X0,APQ IF AUTO RECALL
| Line S00893 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06536 M01S00893.271l750 +++| TNZ X0,(/DCP/APQ,DCPC,/MONITOR/APQ) IF AUTO-RECALL 06537 M00S03855.cpumtr +++| SB3 MTRX
| Line S03856 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06538 M01S03856.271l750 ---| EQ APQ ASSIGN PP
| Line S00894 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06539 M01S00894.271l750 +++| TJP (/DCP/APQ,DCPC,/MONITOR/APQ) ASSIGN PP 06540 M00S03857.cpumtr +++| 06541 M00S03858.cpumtr +++|* AVOID FORCED AUTO RECALL 06542 M00S03859.cpumtr +++| 06543 M00S03860.cpumtr +++| APJ2 SB6 APJ1 *CAL* RETURN ADDRESS - NO LIMIT 06544 M00S03861.cpumtr +++| SB3 SXS *CAL* RETURN ADDRESS - ACTIVITY LIMIT 06545 M00S03862.cpumtr +++| EQ CAL CHECK ACTIVITY LIMIT 06546 M00S03863.cpumtr +++| AFL SPACE 4,20 06547 M00S03864.cpumtr +++|** AFL - ASSIGN FIELD LENGTH. 06548 M00S03865.cpumtr +++|* 06549 M00S03866.cpumtr +++|* ENTRY (X1) = CURRENT FIELD LENGTH. 06550 M00S03867.cpumtr +++|* (X2) = REQUESTED FIELD LENGTH. 06551 M00S03868.cpumtr +++|* (X5) = *1MA* CALL TO BE ISSUED IF NEEDED. 06552 M00S03869.cpumtr +++|* (B3) = ADDRESS OF MEMORY WORD CONTAINING RA. 06553 M00S03870.cpumtr +++|* (B5) = STATUS RESPONSE ADDRESS. 06554 M00S03871.cpumtr +++|* (B7) = CONTROL POINT ADDRESS. 06555 M00S03872.cpumtr +++|* (A5) = RA+1. 06556 M00S03873.cpumtr +++|* 06557 M00S03874.cpumtr +++|* EXIT TO MTRX. 06558 M00S03875.cpumtr +++|* 06559 M00S03876.cpumtr +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 06560 M00S03877.cpumtr +++|* A - 2, 3, 4, 6, 7.
| Line S00278 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06561 M02S00278.271l750 ---|* B - 4, 5, 6.
| Line S00895 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 06562 M01S00895.271l750 +++|* B - 4, 5, 6. 06563 M00S03878.cpumtr +++|* 06564 M00S03879.cpumtr +++|* CALLS APJ, SFL. 06565 M00S03880.cpumtr +++| 06566 M00S03881.cpumtr +++| 06567 M00S03882.cpumtr +++| AFL SA3 B7+ECSW GET ECS CONTROL WORD 06568 M00S03883.cpumtr +++| MX7 -17 SET FIELD LENGTH 06569 M00S03884.cpumtr +++| BX0 -X7*X2 06570 M00S03885.cpumtr +++| MX4 -12 GET ECS FIELD LENGTH 06571 M00S03886.cpumtr +++| SB6 B2 SET EXCHANGE PACKAGE ADDRESS 06572 M00S03887.cpumtr +++| BX4 -X4*X3 06573 M00S03888.cpumtr +++| BX6 X1 RETAIN CURRENT FL 06574 M00S03889.cpumtr +++| ZR X0,AFL3 IF EMPTY REQUEST 06575 M00S03890.cpumtr +++| SX3 X0-MCMX 06576 M00S03891.cpumtr +++| ZR X4,AFL1 IF NO ECS ASSIGNED 06577 M00S03892.cpumtr +++| PL X3,AFL1 IF FL .GE. MCMX 06578 M00S03893.cpumtr +++| SX0 MCMX SET FL TO MINIMUM ALLOWED WITH ECS 06579 M00S03894.cpumtr +++| 06580 M00S03895.cpumtr +++|* CHECK DIRECTION OF REQUEST. 06581 M00S03896.cpumtr +++| 06582 M00S03897.cpumtr +++| AFL1 SX1 X0+77B ROUND UP REQUEST 06583 M00S03898.cpumtr +++| NG X1,CPE IF REQUEST TOO LARGE 06584 M00S03899.cpumtr +++| AX1 6 06585 M00S03900.cpumtr +++| LX1 6 06586 M00S03901.cpumtr +++| IX0 X1-X6 CHECK REQUEST 06587 M00S03902.cpumtr +++| LX2 59-17 06588 M00S03903.cpumtr +++| ZR X0,AFL3 IF NO MEMORY CHANGE 06589 M00S03904.cpumtr +++| SB4 LA1MA SET *1MA* LOAD PARAMETER INDEX 06590 M00S03905.cpumtr +++| PL X0,APJ1 IF MEMORY INCREASE CALL *1MA* 06591 M00S03906.cpumtr +++| 06592 M00S03907.cpumtr +++|* CHECK NO-REDUCE STATUS. 06593 M00S03908.cpumtr +++| 06594 M00S03909.cpumtr +++| SA4 B7+STSW CHECK ACTIVITY 06595 M00S03910.cpumtr +++| SA3 AM 06596 M00S03911.cpumtr +++| BX4 X3*X4 06597 M00S03912.cpumtr +++| MX7 -12 06598 M00S03913.cpumtr +++| ZR X4,AFL2 IF NO PP ACTIVITY 06599 M00S03914.cpumtr +++| SA4 B7+JCIW CHECK FOR SUBSYSTEM OR NON-ROLLABLE JOB 06600 M00S03915.cpumtr +++| LX4 -24 06601 M00S03916.cpumtr +++| BX7 -X7*X4 06602 M00S03917.cpumtr +++| LX4 0-21+24 CHECK FOR *DIS* JOB 06603 M00S03918.cpumtr +++| SX3 B1 06604 M00S03919.cpumtr +++| BX4 X3*X4 06605 M00S03920.cpumtr +++| BX4 X4+X7 06606 M00S03921.cpumtr +++| ZR X4,SXS IF NOT SYSTEM JOB 06607 M00S03922.cpumtr +++| AFL2 SA3 B7+LB1W READ LOADER CONTROL 06608 M00S03923.cpumtr +++| LX3 59-53 06609 M00S03924.cpumtr +++| BX4 -X3+X2 06610 M00S03925.cpumtr +++| TX7 B7+200B,-SCA CHECK CONTROL POINT 06611 M00S03926.cpumtr +++| AX4 60 06612 M00S03927.cpumtr +++| BX0 X4*X0 06613 M00S03928.cpumtr +++| PL X4,AFL3 IF NO CHANGE IN MEMORY 06614 M00S03929.cpumtr +++| BX6 X1 SET NEW FIELD LENGTH 06615 M00S03930.cpumtr +++| ZR X7,APJ1 IF LAST CONTROL POINT CALL *1MA* 06616 M00S03931.cpumtr +++| SA3 SSTL 06617 M00S03932.cpumtr +++| LX3 59-58 06618 M00S03933.cpumtr +++| PL X3,APJ1 IF MEMORY CLEARING ENABLED 06619 M00S03934.cpumtr +++| AFL3 BX7 X7-X7 CLEAR (RA+1) 06620 M00S03935.cpumtr +++| SA3 B3+B1 06621 M00S03936.cpumtr +++| EWX7 X3 06622 M00S03937.cpumtr +++| ZR B5,SFL SET FIELD LENGTH IF NO STATUS RESPONSE 06623 M00S03938.cpumtr +++| SX4 B5 06624 M00S03939.cpumtr +++| SA3 B3 06625 M00S03940.cpumtr +++| IX4 X4+X3 06626 M00S03941.cpumtr +++| ERX3 X4 CHECK FOR CMM CLEAR JOB STEP STATUS 06627 M00S03942.cpumtr +++| LX6 30 06628 M00S03943.cpumtr +++| SX7 B1 06629 M00S03944.cpumtr +++| LX3 59-3 06630 M00S03945.cpumtr +++| BX6 X6+X7 STORE STATUS RESPONSE
| Line S00279 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 06631 M01S00279.271l716 +++| SB5 B0 06632 M00S03946.cpumtr +++| EWX6 X4 06633 M00S03947.cpumtr +++| PL X3,SFL IF NOT CMM CLEAR 06634 M00S03948.cpumtr +++| SA3 B7+DBAW 06635 M00S03949.cpumtr +++| LX7 54 06636 M00S03950.cpumtr +++| BX6 -X7*X3 06637 M00S03951.cpumtr +++| SA6 A3 06638 M00S03952.cpumtr +++| EQ SFL SET FIELD LENGTH 06639 M00S03953.cpumtr +++| CIO SPACE 4 06640 M00S03954.cpumtr +++|** CIO - CALL CIO. 06641 M00S03955.cpumtr +++|* 06642 M00S03956.cpumtr +++|* ENTRY (X7) = 0. 06643 M00S03957.cpumtr +++| 06644 M00S03958.cpumtr +++| 06645 M00S03959.cpumtr +++| CIO SB6 CIO1 *CAL* RETURN ADDRESS - NO LIMIT 06646 M00S03960.cpumtr +++| SB3 SXS *CAL* RETURN ADDRESS - ACTIVITY LIMIT 06647 M00S03961.cpumtr +++| EQ CAL CHECK ACTIVITY LIMIT 06648 M00S03962.cpumtr +++| 06649 M00S03963.cpumtr +++| CIO1 SA7 /CPUCIO/MB 06650 M00S03964.cpumtr +++| SX0 B1 MOVE AUTO RECALL BIT FROM BIT 40 TO 41 06651 M00S03965.cpumtr +++| LX0 40 06652 M00S03966.cpumtr +++| SA2 RA1 ADDRESS OF (RA+1) 06653 M00S03967.cpumtr +++| BX0 X0*X5 EXTRACT AUTO RECALL BIT 06654 M00S03968.cpumtr +++| BX5 -X0*X5 06655 M00S03969.cpumtr +++| LX0 41-40 06656 M00S03970.cpumtr +++| SB3 A2-B1 RESET ADDRESS OF WORD CONTAINING RA 06657 M00S03971.cpumtr +++| BX6 X0+X5 06658 M00S03972.cpumtr +++| SA6 A7-B1 STORE REQUEST WORD 06659 M00S03973.cpumtr +++| ERRNZ /CPUCIO/IR-/CPUCIO/MB+1 CODE REQUIRES CONTIGUOUS 06660 M00S03974.cpumtr +++| EWX7 X2 CLEAR (RA+1)
| Line S03975 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 06661 M01S03975.252l678 ---| TEQ (/PROBE/CIO,/CPUCIO/CPC,PROBE)
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 06662 M01S00109.252l678 +++| TEQ (/PROBE/CIO,PROBE,/CPUCIO/CPC) 06663 M00S03976.cpumtr +++| CLO SPACE 4,10 06664 M00S03977.cpumtr +++|** CLO - CLOSE. (CONVERT CALL TO *CIO*) 06665 M00S03978.cpumtr +++|* 06666 M00S03979.cpumtr +++|* ENTRY (X7) = 0. 06667 M00S03980.cpumtr +++| 06668 M00S03981.cpumtr +++| 06669 M00S03982.cpumtr +++| CLO MX2 42 06670 M00S03983.cpumtr +++| SX3 3RCIO 06671 M00S03984.cpumtr +++| BX4 X2*X4 06672 M00S03985.cpumtr +++| BX5 X4+X3 06673 M00S03986.cpumtr +++| LX5 42 06674 M00S03987.cpumtr +++| EQ CIO PROCESS AS *CIO* REQUEST 06675 M00S03988.cpumtr +++| CPE SPACE 4 06676 M00S03989.cpumtr +++|** CPE - PROCESS CPU CALL ERROR. 06677 M00S03990.cpumtr +++| 06678 M00S03991.cpumtr +++| 06679 M00S03992.cpumtr +++| CPE SX7 PCET SET ERROR FLAG = *MONITOR CALL ERROR.* 06680 M00S03993.cpumtr +++| EQ SEF 06681 M00S03994.cpumtr +++| ABT SPACE 4 06682 M00S03995.cpumtr +++|*** *ABT*. 06683 M00S03996.cpumtr +++|* ABORT JOB. 06684 M00S03997.cpumtr +++|* 06685 M00S03998.cpumtr +++|*T 18/ *ABT*,42/
Figure
06686 M00S03999.cpumtr +++| 06687 M00S04000.cpumtr +++| 06688 M00S04001.cpumtr +++| ABT SX7 CPET SET CPU ABORT FLAG 06689 M00S04002.cpumtr +++| JP SEF 06690 M00S04003.cpumtr +++| CPM SPACE 4 06691 M00S04004.cpumtr +++|*** *CPM*. 06692 M00S04005.cpumtr +++|* RESIDENT CPM FUNCTIONS. 06693 M00S04006.cpumtr +++|* 06694 M00S04007.cpumtr +++|* ENTRY (X7) = 0. 06695 M00S04008.cpumtr +++|* 06696 M00S04009.cpumtr +++|*T 18/ *CPM*,6/,12/ FN,6/,18/ PAR
Figure
06697 M00S04010.cpumtr +++|* FN FUNCTION NUMBER. 06698 M00S04011.cpumtr +++|* PAR PARAMETER. 06699 M00S04012.cpumtr +++| 06700 M00S04013.cpumtr +++| 06701 M00S04014.cpumtr +++| CPM SA2 CPMA READ VALID FUNCTION WORD 06702 M00S04015.cpumtr +++| LX4 -24-18 EXTRACT FUNCTION 06703 M00S04016.cpumtr +++| SX3 X5 06704 M00S04017.cpumtr +++| BX4 -X0*X4 06705 M00S04018.cpumtr +++| SB4 X4 06706 M00S04019.cpumtr +++| IX4 X3-X1 CHECK PARAMETER PAST FL 06707 M00S04020.cpumtr +++| AX2 X2,B4
Proceed to Part 5
cdc/nos2.source/opl.opl871/deck/cpumtr.004.txt · Last modified: by 127.0.0.1