cdc:nos2.source:opl.opl871:deck:resex.007
Deck RESEX Part 007
65 Modifications
Listing Sections
- Deck RESEX Start
- Deck RESEX Part 1 (Line 1216)
- Deck RESEX Part 2 (Line 2267)
- Deck RESEX Part 3 (Line 3399)
- Deck RESEX Part 4 (Line 4545)
- Deck RESEX Part 5 (Line 5477)
- Deck RESEX Part 6 (Line 6250)
- Deck RESEX Part 7 (Line 7341)
- Deck RESEX Part 8 (Line 8742)
- Deck RESEX Part 9 (Line 9995)
- Deck RESEX Part 10 (Line 11229)
- Deck RESEX Part 11 (Line 12506)
- Deck RESEX Part 12 (Line 13737)
- Deck RESEX Part 13 (Line 15029)
Source
Seq # *Modification Id* Act ----------------------------+ 07341 M02S00463.274l797 ---|* (BUF) = PREVIEW ENTRY.
| Line S01078 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07342 M02S01078.282l826 ---|* EXIT ENTRY MADE INTO PREVIEW BUFFER IF ROOM.
| Line S00423 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07343 M01S00423.282l826 +++|* EXIT ENTRY ADDED TO PREVIEW BUFFER OR MOUNT REQUEST BUFFER 07344 M01S00424.282l826 +++|* IF POSSIBLE.
| Line S00464 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07345 M01S00464.253l688 +++|*
| Line S00465 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07346 M02S00465.274l797 ---|* EXIT ENTRY MADE INTO PREVIEW BUFFER IF ROOM.
| Line S03821 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07347 M01S03821.274l797 ---|* 07348 M01S03822.274l797 ---|* USES A - 1, 2, 3, 4, 6, 7. 07349 M01S03823.274l797 ---|* B - 4, 5, 6, 7. 07350 M01S03824.274l797 ---|* X - ALL.
| Line S01079 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07351 M02S01079.282l826 ---|* USES A - 1, 2, 3, 4, 5, 6, 7. 07352 M02S01080.282l826 ---|* X - 1, 2, 3, 4, 5, 6, 7.
| Line S00425 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07353 M01S00425.282l826 +++|* USES A - 1, 5, 6. 07354 M01S00426.282l826 +++|* X - 1, 2, 3, 5, 6, 7. 07355 M00S03825.resex +++|* 07356 M00S03826.resex +++|* MACROS MOVE. 07357 M00S03827.resex +++| 07358 M00S03828.resex +++| 07359 M00S03829.resex +++| EPB SUBR ENTRY/EXIT
| Line S03830 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07360 M01S03830.274l797 ---| SA1 EPBB 07361 M01S03831.274l797 ---| SA2 BUF+RQPT 07362 M01S03832.274l797 ---| SA3 A1-B1
| Line S03833 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07363 M02S03833.274l797 ---| SB4 B0
| Line S00466 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07364 M02S00466.274l797 ---| BX5 X2 07365 M02S00467.274l797 ---| NG X5,EPB0 IF REQUEST FOR STAGING TAPE
| Line S00468 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07366 M01S00468.253l688 +++|
| Line S00469 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07367 M02S00469.274l797 ---|* CALCULATE PRIORITY.
| Line S01081 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07368 M02S01081.282l826 ---|* CHECK FOR *AT* TAPE REQUEST.
| Line S00427 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07369 M01S00427.282l826 +++|* CHECK FOR ACS TAPE REQUEST.
| Line S00470 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07370 M01S00470.253l688 +++|
| Line S03834 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07371 M01S03834.274l797 ---| IX1 X1-X2 07372 M01S03835.274l797 ---| IX6 X5-X4 07373 M01S03836.274l797 ---| SX5 X4+B1 A+1
| Line S03837 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07374 M02S03837.274l797 ---| SB5 X3
| Line S03838 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07375 M01S03838.274l797 ---| IX5 X5*X1 07376 M01S03839.274l797 ---| IX5 X5/X6 ((A+1)*T)/(D-A)
| Line S01082 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07377 M02S01082.282l826 ---| SA1 BUF+RQPD 07378 M02S01083.282l826 ---| SA5 OPRB+1-RPBE 07379 M02S01084.282l826 ---| MX6 -17 07380 M02S01085.282l826 ---| BX1 -X6*X1 07381 M02S01086.282l826 ---| SX1 X1-2RAT*100B 07382 M02S01087.282l826 ---| NZ X1,EPB2 IF NOT *AT* TAPE REQUEST 07383 M02S01088.282l826 ---| SA5 APRB+1-RPBE
| Line S00428 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07384 M01S00428.282l826 +++| SA1 BUF+RQPV+PRES 07385 M01S00429.282l826 +++| MX6 -12 07386 M01S00430.282l826 +++| LX1 -12 07387 M01S00431.282l826 +++| BX1 -X6*X1 RESOURCE TYPE 07388 M01S00432.282l826 +++| SX1 X1-2RAT 07389 M01S00433.282l826 +++| NZ X1,EPB3 IF NOT *AT* TAPE REQUEST 07390 M01S00434.282l826 +++| SA5 AMRB+1-RMBE
| Line S00471 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07391 M01S00471.253l688 +++|
| Line S00472 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07392 M02S00472.274l797 ---|* SELECT POSITION IN LIST, ACCORDING TO PRIORITY.
| Line S01089 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07393 M02S01089.282l826 ---|* FIND LOCATION IN ACS PREVIEW BUFFER.
| Line S00435 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07394 M01S00435.282l826 +++|* FIND LOCATION IN MOUNT REQUEST BUFFER.
| Line S00473 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07395 M01S00473.253l688 +++|
| Line S00474 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07396 M02S00474.274l797 ---| EPB0 SB5 X3 07397 M02S00475.274l797 ---| SB4 B0
| Line S03840 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07398 M01S03840.274l797 ---| ZR B5,EPB2 IF NO ENTRIES IN LIST
| Line S03841 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07399 M02S03841.274l797 ---| SB4 -3 07400 M02S03842.274l797 ---| SB6 /COMSMTX/PBUFL*3/2 07401 M02S03843.274l797 ---| EPB1 SB4 B4+3
| Line S00205 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07402 M02S00205.274l797 ---| SB4 -RQPL 07403 M02S00206.274l797 ---| SB6 /COMSMTX/PBUFL*RQPL/3 07404 M02S00207.274l797 ---| EPB1 SB4 B4+RQPL
| Line S03844 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07405 M01S03844.274l797 ---| GE B4,B6,EPBX IF NO ROOM 07406 M01S03845.274l797 ---| GE B4,B5,EPB2 IF ENTRY GOES AT END OF LIST
| Line S03846 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07407 M02S03846.274l797 ---| SA3 PDB+3+B4 PRIORITY
| Line S00208 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07408 M02S00208.274l797 ---| SA3 PDB+RQPL+B4 PRIORITY
| Line S00476 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07409 M02S00476.274l797 ---| NG X3,EPB1 IF OLD ENTRY IS STAGING TAPE VSN 07410 M02S00477.274l797 ---| NG X5,EPB1.1 IF NEW ENTRY IS STAGING TAPE VSN
| Line S03847 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07411 M01S03847.274l797 ---| IX3 X3-X5 07412 M01S03848.274l797 ---| PL X3,EPB1 IF ENTRY GOES FURTHER DOWN IN LIST
| Line S01090 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07413 M02S01090.282l826 ---| EPB1 SA5 A5+RPBE GET NEXT ENTRY
| Line S00436 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07414 M01S00436.282l826 +++| EPB1 SA5 A5+RMBE GET NEXT ENTRY
| Line S01091 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07415 M01S01091.274l797 +++| IX5 X5-X0 07416 M01S01092.274l797 +++| PL X5,EPB1 IF OLD ENTRY PRIORITY .GE. NEW
| Line S01093 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07417 M02S01093.282l826 ---| SX6 APRB+RPBL-1-RPBE ADDRESS OF LAST ENTRY
| Line S00437 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07418 M01S00437.282l826 +++| SX6 AMRB+RMBL-1-RMBE ADDRESS OF LAST ENTRY 07419 M01S00438.282l826 +++| SX2 A5 SET SOURCE ADDRESS 07420 M01S00439.282l826 +++| IX1 X6-X2 SET TO MOVE ALL ENTRIES BUT LAST 07421 M01S00440.282l826 +++| NG X1,EPB2 IF AT END OF FULL BUFFER 07422 M01S00441.282l826 +++| SX3 A5+RMBE SET DESTINATION ADDRESS 07423 M01S00442.282l826 +++| MOVE X1,X2,X3 MOVE LOWER PRIORITY ENTRIES 07424 M01S00443.282l826 +++| 07425 M01S00444.282l826 +++|* ENTER MOUNT REQUEST IN BUFFER. 07426 M01S00445.282l826 +++| 07427 M01S00446.282l826 +++| SA1 BUF+RQPV+PVSN GET VSN 07428 M01S00447.282l826 +++| BX6 X0 07429 M01S00448.282l826 +++| SA6 A5 SET PRIORITY WORD 07430 M01S00449.282l826 +++| MX7 36 07431 M01S00450.282l826 +++| BX6 X7*X1 VSN 07432 M01S00451.282l826 +++| SA6 A5+1 07433 M01S00452.282l826 +++| 07434 M01S00453.282l826 +++|* CHECK FOR PREVIEW DISPLAY MESSAGE ON ACS TAPE REQUEST. 07435 M01S00454.282l826 +++| 07436 M01S00455.282l826 +++| EPB2 SA1 BUF+RQPV+PFLG 07437 M01S00456.282l826 +++| MX7 -6 07438 M01S00457.282l826 +++| LX1 -12 07439 M01S00458.282l826 +++| BX1 -X7*X1 PREVIEW DISPLAY MESSAGE CODE 07440 M01S00459.282l826 +++| ZR X1,EPBX IF NO PREVIEW DISPLAY MESSAGE 07441 M01S00460.282l826 +++| 07442 M01S00461.282l826 +++|* FIND LOCATION IN PREVIEW BUFFER. 07443 M01S00462.282l826 +++| 07444 M01S00463.282l826 +++| EPB3 SA5 RPRB-RPBE 07445 M01S00464.282l826 +++| EPB4 SA5 A5+RPBE GET NEXT ENTRY 07446 M01S00465.282l826 +++| IX5 X5-X0 07447 M01S00466.282l826 +++| PL X5,EPB4 IF OLD ENTRY PRIORITY .GE. NEW 07448 M01S00467.282l826 +++| SX6 RPRB+RPBL-1-RPBE ADDRESS OF LAST ENTRY
| Line S01094 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07449 M01S01094.274l797 +++| SX2 A5 SET SOURCE ADDRESS 07450 M01S01095.274l797 +++| IX1 X6-X2 SET TO MOVE ALL ENTRIES BUT LAST 07451 M01S01096.274l797 +++| NG X1,EPBX IF AT END OF FULL BUFFER 07452 M01S01097.274l797 +++| SX3 A5+RPBE SET DESTINATION ADDRESS 07453 M01S01098.274l797 +++| MOVE X1,X2,X3 MOVE LOWER PRIORITY ENTRIES
| Line S01099 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07454 M02S01099.282l826 ---| EQ EPB3 ENTER REQUEST IN BUFFER
| Line S03849 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07455 M01S03849.253l688 ---| SX1 B5-B4 LENGTH OF LIST TO BE MOVED
| Line S00478 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07456 M01S00478.253l688 +++|
| Line S00479 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07457 M02S00479.274l797 ---|* ENTER INTO LIST.
| Line S01100 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07458 M02S01100.282l826 ---|* FIND LOCATION IN OPERATOR PREVIEW BUFFER.
| Line S00468 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07459 M01S00468.282l826 +++|* ENTER REQUEST IN PREVIEW BUFFER.
| Line S00480 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07460 M01S00480.253l688 +++|
| Line S00481 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07461 M02S00481.274l797 ---| EPB1.1 SX1 B5-B4 LENGTH OF LIST TO BE MOVED
| Line S03850 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07462 M02S03850.274l797 ---| MOVE X1,PDB+1+B4,PDB+4+B4 MOVE DOWN 3
| Line S00209 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07463 M02S00209.274l797 ---| MOVE X1,PDB+1+B4,PDB+RQPL+1+B4 MOVE DOWN 4
| Line S03851 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07464 M01S03851.274l797 ---| EPB2 SA1 BUF+RQPD 07465 M01S03852.274l797 ---| SA2 A1+B1 BUF+RQPU 07466 M01S03853.274l797 ---| MX0 42 07467 M01S03854.274l797 ---| SA4 BLANK REPLACE BLANK WITH WORD *SCRATCH* 07468 M01S03855.274l797 ---| BX6 X0*X1
| Line S01101 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07469 M02S01101.282l826 ---| EPB2 SA5 A5+RPBE GET NEXT ENTRY 07470 M02S01102.282l826 ---| IX5 X5-X0 07471 M02S01103.282l826 ---| PL X5,EPB2 IF OLD ENTRY PRIORITY .GE. NEW 07472 M02S01104.282l826 ---| SX6 OPRB+RPBL-1-RPBE ADDRESS OF LAST ENTRY 07473 M02S01105.282l826 ---| SX2 A5 SET SOURCE ADDRESS 07474 M02S01106.282l826 ---| IX1 X6-X2 SET TO MOVE ALL ENTRIES BUT LAST 07475 M02S01107.282l826 ---| NG X1,EPBX IF AT END OF FULL BUFFER 07476 M02S01108.282l826 ---| SX3 A5+RPBE SET DESTINATION ADDRESS 07477 M02S01109.282l826 ---| MOVE X1,X2,X3 MOVE LOWER PRIORITY ENTRIES 07478 M02S01110.282l826 ---| 07479 M02S01111.282l826 ---|* ENTER REQUEST IN BUFFER. 07480 M02S01112.282l826 ---| 07481 M02S01113.282l826 ---| EPB3 SA1 BUF+RQPD 07482 M02S01114.282l826 ---| SA4 BLANK 07483 M02S01115.282l826 ---| SA2 BUF+RQPF 07484 M02S01116.282l826 ---| MX7 42 07485 M02S01117.282l826 ---| BX6 X7*X1
| Line S03856 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07486 M01S03856.282l826 ---| BX6 X4-X6
| Line S03857 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07487 M02S03857.282l826 ---| NZ X6,EPB3 IF NOT BLANKS
| Line S01118 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07488 M02S01118.282l826 ---| NZ X6,EPB4 IF NOT SCRATCH REQUEST
| Line S03858 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07489 M01S03858.282l826 ---| SA4 SCRATCH
| Line S03859 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07490 M02S03859.282l826 ---| BX6 -X0*X1
| Line S01119 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07491 M02S01119.282l826 ---| BX6 -X7*X1
| Line S03860 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07492 M01S03860.282l826 ---| BX1 X4+X6
| Line S03861 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07493 M02S03861.282l826 ---| EPB3 BX6 X1 07494 M02S03862.282l826 ---| LX7 X2 07495 M02S03863.282l826 ---| SA6 PDB+1+B4 07496 M02S03864.282l826 ---| BX6 X5
| Line S03865 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07497 M03S03865.282l826 ---| SA7 A6+B1 ENTER USER NUMBER
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07498 M03S00046.282l826 ---| SA7 A6+B1 ENTER USER NAME
| Line S03866 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07499 M03S03866.282l826 ---| SX7 B5+3
| Line S00210 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07500 M03S00210.282l826 ---| SA3 BUF+RQCW ENTER EXTERNAL VSN/FAMILY ORDINAL
| Line S01120 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07501 M02S01120.282l826 ---| EPB4 SA3 BUF+RQPU
| Line S01121 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07502 M01S01121.274l797 +++| BX6 X0
| Line S01122 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07503 M02S01122.282l826 ---| BX7 X1
| Line S01123 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07504 M01S01123.274l797 +++| SA6 A5 SET PRIORITY WORD
| Line S01124 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07505 M02S01124.282l826 ---| SA7 A5+B1 SET RESOURCE TYPE AND VSN 07506 M02S01125.282l826 ---| ERRNZ /COMSMTX/PRST 07507 M02S01126.282l826 ---| BX6 X2
| Line S00211 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07508 M02S00211.282l826 ---| BX7 X3
| Line S00212 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07509 M03S00212.282l826 ---| SA7 A7+B1 07510 M03S00213.282l826 ---| SX7 B5+RQPL
| Line S03867 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07511 M02S03867.282l826 ---| SA6 A7+B1 ENTER PRIORITY 07512 M02S03868.282l826 ---| SA7 EPBA
| Line S01127 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07513 M02S01127.282l826 ---| SA6 A7+B1 SET FLAGS AND EXTERNAL VSN 07514 M02S01128.282l826 ---| ERRNZ /COMSMTX/PFLG-1 07515 M02S01129.282l826 ---| SA7 A6+B1 SET USER AND JOB IDENTIFICATION 07516 M02S01130.282l826 ---| ERRNZ /COMSMTX/PUID-2
| Line S00469 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07517 M01S00469.282l826 +++| MOVE PVEL,BUF+RQPV,A5+B1 MOVE PREVIEW ENTRY 07518 M00S03869.resex +++| EQ EPBX RETURN
| Line S03870 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07519 M01S03870.274l797 ---| 07520 M01S03871.274l797 ---| 07521 M01S03872.274l797 ---| EPBA CON 0 LENGTH OF DATA IN SCRATCH BUFFER 07522 M01S03873.274l797 ---| EPBB CON 0 CURRENT TIME 07523 M00S03874.resex +++| TITLE UTILITY SUBROUTINES. 07524 M00S03875.resex +++| BEV SPACE 4,10 07525 M00S03876.resex +++|** BEV - BUILD EVENT. 07526 M00S03877.resex +++|* 07527 M00S03878.resex +++|* ENTRY (X1) = VSN OR PACKNAME. 07528 M00S03879.resex +++|* (X3) = EVENT SKELETON. 07529 M00S03880.resex +++|* 07530 M00S03881.resex +++|* EXIT (X6) = ROLLOUT EVENT. 07531 M00S03882.resex +++|* 07532 M00S03883.resex +++|* USES X - 0, 1, 5, 6, 7. 07533 M00S03884.resex +++| 07534 M00S03885.resex +++| 07535 M00S03886.resex +++| BEV SUBR ENTRY/EXIT 07536 M00S03887.resex +++| MX0 -12 BUILD ROLLOUT EVENT 07537 M00S03888.resex +++| LX1 12 07538 M00S03889.resex +++| BX6 -X0*X1 SUM INDIVIDUAL BYTES OF VSN OR PACKNAME 07539 M00S03890.resex +++| LX1 12 07540 M00S03891.resex +++| BX5 -X0*X1 07541 M00S03892.resex +++| IX6 X5+X6 07542 M00S03893.resex +++| LX1 12 07543 M00S03894.resex +++| BX5 -X0*X1 07544 M00S03895.resex +++| IX6 X5+X6 07545 M00S03896.resex +++| LX1 12 07546 M00S03897.resex +++| BX5 -X0*X1 07547 M00S03898.resex +++| IX6 X5+X6 07548 M00S03899.resex +++| BX7 -X0*X6 TRUNCATE TO LOWER 12 BITS 07549 M00S03900.resex +++| LX7 12 07550 M00S03901.resex +++| BX6 X7+X3 07551 M00S03902.resex +++| EQ BEVX RETURN
| Line S00470 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07552 M01S00470.282l826 +++| BTR SPACE 4,10 07553 M01S00471.282l826 +++|** BTR - BUILD TAPE ASSIGNMENT REQUEST BLOCK. 07554 M01S00472.282l826 +++|* 07555 M01S00473.282l826 +++|* ENTRY UDT ENTRY IN *UDT*. 07556 M01S00474.282l826 +++|* 07557 M01S00475.282l826 +++|* EXIT TAPE ASSIGNMENT REQUEST IN *BUF*. 07558 M01S00476.282l826 +++|* 07559 M01S00477.282l826 +++|* USES X - 1, 2, 3, 4, 6, 7. 07560 M01S00478.282l826 +++|* A - 1, 2, 3, 4, 6, 7. 07561 M01S00479.282l826 +++|* 07562 M01S00480.282l826 +++|* CALLS IUT. 07563 M01S00481.282l826 +++| 07564 M01S00482.282l826 +++| 07565 M01S00483.282l826 +++| BTR SUBR ENTRY/EXIT 07566 M01S00484.282l826 +++| 07567 M01S00485.282l826 +++|* SET REQUEST HEADER. 07568 M01S00486.282l826 +++| 07569 M01S00487.282l826 +++| SA1 AV 07570 M01S00488.282l826 +++| SA2 RETI 07571 M01S00489.282l826 +++| SX6 /COMSMTX/RMA 07572 M01S00490.282l826 +++| SX7 13B LENGTH OF REQUEST 07573 M01S00491.282l826 +++| LX6 48 FUNCTION CODE 07574 M01S00492.282l826 +++| SX1 X1-EVSB 07575 M01S00493.282l826 +++| AX1 1 *EVSB* INDEX 07576 M01S00494.282l826 +++| IX1 X1-X2 UDT ORDINAL 07577 M01S00495.282l826 +++| LX1 36 07578 M01S00496.282l826 +++| BX6 X6+X1 07579 M01S00497.282l826 +++| BX6 X6+X7 07580 M01S00498.282l826 +++| SA6 BUF SET REQUEST HEADER 07581 M01S00499.282l826 +++| 07582 M01S00500.282l826 +++|* SET *UVSN* AND *UMST* FOR VERIFICATION BY MAGNET. 07583 M01S00501.282l826 +++| 07584 M01S00502.282l826 +++| SA1 UDT+/COMSMTX/UVSN 07585 M01S00503.282l826 +++| SA2 UDT+/COMSMTX/UMST 07586 M01S00504.282l826 +++| BX6 X1 07587 M01S00505.282l826 +++| BX7 X2 07588 M01S00506.282l826 +++| SA6 A6+B1 BUF+1 07589 M01S00507.282l826 +++| SA7 A6+B1 BUF+2 07590 M01S00508.282l826 +++| 07591 M01S00509.282l826 +++|* SET TAPE DESCRIPTORS AND BLOCK SIZE (*UST4*). 07592 M01S00510.282l826 +++| 07593 M01S00511.282l826 +++| SA1 F+FTAP GET TAPE DESCRIPTORS 07594 M01S00512.282l826 +++| SA2 TB GET BLOCK SIZE 07595 M01S00513.282l826 +++| MX6 30 07596 M01S00514.282l826 +++| BX1 X6*X1 07597 M01S00515.282l826 +++| BX6 X1+X2 MERGE TAPE DESCRIPTORS AND BLOCK SIZE 07598 M01S00516.282l826 +++| SA6 A7+B1 BUF+3 07599 M01S00517.282l826 +++| 07600 M01S00518.282l826 +++|* SET EJT ORDINAL, VSN FILE ADDRESS, AND REEL NUMBER, (*UVRI*). 07601 M01S00519.282l826 +++| 07602 M01S00520.282l826 +++| SA1 JEEO GET EJT ORDINAL 07603 M01S00521.282l826 +++| SA2 VA GET VSN FILE RANDOM ADDRESS 07604 M01S00522.282l826 +++| SA3 T+FESN GET REEL NUMBER IF TMS REQUEST 07605 M01S00523.282l826 +++| MX0 -12 07606 M01S00524.282l826 +++| LX1 48 07607 M01S00525.282l826 +++| LX2 24 07608 M01S00526.282l826 +++| BX3 -X0*X3 07609 M01S00527.282l826 +++| LX3 12 07610 M01S00528.282l826 +++| BX1 X1+X2 MERGE EJT ORDINAL AND VSN FILE ADDRESS 07611 M01S00529.282l826 +++| BX6 X1+X3 MERGE REEL NUMBER 07612 M01S00530.282l826 +++| SA6 A6+B1 BUF+4 07613 M01S00531.282l826 +++| 07614 M01S00532.282l826 +++|* SET TMS FLAGS (*UTMS*). 07615 M01S00533.282l826 +++| 07616 M01S00534.282l826 +++| RJ IUT INITIALIZE *UTMS* 07617 M01S00535.282l826 +++| SA7 BUF+5 07618 M01S00536.282l826 +++| 07619 M01S00537.282l826 +++|* SET TMS CATALOG INDEX (*UTCI*). 07620 M01S00538.282l826 +++| 07621 M01S00539.282l826 +++| SA2 T+FRAN GET CATALOG INDEX 07622 M01S00540.282l826 +++| BX6 X2 07623 M01S00541.282l826 +++| SA6 A7+B1 BUF+6 07624 M01S00542.282l826 +++| 07625 M01S00543.282l826 +++|* SET EXTERNAL VSN AND FLAGS (*UESN*). 07626 M01S00544.282l826 +++| 07627 M01S00545.282l826 +++| SA1 EVSN GET EXTERNAL VSN 07628 M01S00546.282l826 +++| SA2 RESB+RQPV+PRES GET RESOURCE TYPE, ACCESS LEVEL, FLAGS 07629 M01S00547.282l826 +++| MX0 36 07630 M01S00548.282l826 +++| BX2 -X0*X2 07631 M01S00549.282l826 +++| BX6 X1+X2 MERGE VSN AND PREVIEW DISPLAY DATA 07632 M01S00550.282l826 +++| SA6 A6+B1 BUF+7 07633 M01S00551.282l826 +++| 07634 M01S00552.282l826 +++|* SET INTERNAL VSN AND FLAGS (*UISN*). 07635 M01S00553.282l826 +++| 07636 M01S00554.282l826 +++| SA1 IVSN GET INTERNAL VSN 07637 M01S00555.282l826 +++| SA2 RESB+RQPV+PFLG GET FLAGS 07638 M01S00556.282l826 +++| SA3 UDT+/COMSMTX/UST1 07639 M01S00557.282l826 +++| SA4 TMPF 07640 M01S00558.282l826 +++| BX2 -X0*X2 07641 M01S00559.282l826 +++| LX3 59-49 07642 M01S00560.282l826 +++| LX4 59-58 07643 M01S00561.282l826 +++| PL X3,BTR1 IF NOT ACS UNIT REQUEST 07644 M01S00562.282l826 +++| NG X4,BTR1 IF TMS CONTROLLED REQUEST 07645 M01S00563.282l826 +++| SA1 UDT+/COMSMTX/UVSN USE ACTUAL VSN 07646 M01S00564.282l826 +++| BTR1 BX1 X0*X1 VSN 07647 M01S00565.282l826 +++| BX6 X1+X2 MERGE VSN AND FLAGS 07648 M01S00566.282l826 +++| SA6 BUF+10B 07649 M01S00567.282l826 +++| 07650 M01S00568.282l826 +++|* SET USER NAME, FAMILY ORDINAL, AND SPECIFIED FILE 07651 M01S00569.282l826 +++|* ACCESSIBILITY (*UUFN*). 07652 M01S00570.282l826 +++| 07653 M01S00571.282l826 +++| SA1 F+FFAS GET SPECIFIED FILE ACCESSIBILITY 07654 M01S00572.282l826 +++| SA2 RESB+RQPV+PJID GET USER NAME AND FAMILY 07655 M01S00573.282l826 +++| MX0 48 07656 M01S00574.282l826 +++| SX6 7700B 07657 M01S00575.282l826 +++| LX1 -12 07658 M01S00576.282l826 +++| BX2 X0*X2 07659 M01S00577.282l826 +++| BX1 X6*X1 07660 M01S00578.282l826 +++| BX6 X1+X2 MERGE USER NAME, FAMILY, AND FILE ACCESS 07661 M01S00579.282l826 +++| SA6 A6+B1 BUF+11B 07662 M01S00580.282l826 +++| 07663 M01S00581.282l826 +++|* SET JSN AND PACKED VSN FOR STAGING TAPE ASSIGNMENT. 07664 M01S00582.282l826 +++| 07665 M01S00583.282l826 +++| SA1 JSN 07666 M01S00584.282l826 +++| SA2 PVST PACKED VSN, IF STAGING TAPE ASSIGNMENT 07667 M01S00585.282l826 +++| BX6 X1+X2 07668 M01S00586.282l826 +++| SA6 A6+B1 BUF+12B 07669 M01S00587.282l826 +++| EQ BTRX RETURN 07670 M00S03903.resex +++| BWM SPACE 4,15 07671 M00S03904.resex +++|** BWM - BUILD WAITING FOR TAPE/PACK MESSAGE. 07672 M00S03905.resex +++|*
| Line S03906 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07673 M01S03906.282l826 ---|* ENTRY (X1) = VSN OR PACKNAME MASK AND COMPLEMENT OF 07674 M01S03907.282l826 ---|* MESSAGE ADDRESS. 07675 M01S03908.282l826 ---|* (RESB+RQPD) = VSN OR PACKNAME AND RESOURCE TYPE.
| Line S00588 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07676 M01S00588.282l826 +++|* ENTRY (X1) = COMPLEMENT OF MESSAGE SKELETON ADDRESS. 07677 M01S00589.282l826 +++|* PREVIEW INFORMATION IN *RESB+RQPV*. 07678 M00S03909.resex +++|* 07679 M00S03910.resex +++|* EXIT (X1) = ADDRESS OF UPDATED MESSAGE. 07680 M00S03911.resex +++|*
| Line S03912 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07681 M01S03912.282l826 ---|* USES X - 0, 1, 2, 4, 6. 07682 M01S03913.282l826 ---|* A - 2.
| Line S00590 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07683 M01S00590.282l826 +++|* USES X - 1, 2, 4, 6. 07684 M01S00591.282l826 +++|* A - 1, 2, 4. 07685 M00S03914.resex +++|* B - 2, 3, 5. 07686 M00S03915.resex +++|* 07687 M00S03916.resex +++|* CALLS SFN, SNM. 07688 M00S03917.resex +++| 07689 M00S03918.resex +++| 07690 M00S03919.resex +++| BWM SUBR ENTRY/EXIT
| Line S03920 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07691 M01S03920.282l826 ---| SB5 X1 COMPLEMENT OF MESSAGE ADDRESS 07692 M01S03921.282l826 ---| MX6 -18 07693 M01S03922.282l826 ---| SA2 RESB+RQPD GET VSN OR PACKNAME AND RESOURCE TYPE 07694 M01S03923.282l826 ---| BX0 -X6*X2 RESOURCE TYPE 07695 M01S03924.282l826 ---| BX6 X6*X1 VSN OR PACKNAME MASK 07696 M01S03925.282l826 ---| SB3 WTPB MESSAGE BUFFER
| Line S03926 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07697 M02S03926.282l826 ---| BX1 X6*X2 VSN OR PACKNAME
| Line S00214 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07698 M03S00214.282l826 ---| SA1 TMPF CHECK IF TMS TAPE
| Line S00482 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07699 M03S00482.282l826 ---| SA1 TMPF CHECK IF *TMS* TAPE
| Line S00215 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07700 M03S00215.282l826 ---| LX1 59-58
| Line S00216 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
M03 (Removed by) | 274l797 |
M04 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07701 M04S00216.282l826 ---| PL X1,BWM0.1 IF NOT A TMS TAPE 07702 M04S00217.282l826 ---| SA2 RESB+RQCW GET TMS VSN
| Line S00483 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 274l797 |
M03 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07703 M03S00483.282l826 ---| PL X1,BWM0.1 IF NOT A *TMS* TAPE 07704 M03S00484.282l826 ---| SA2 RESB+RQCW GET *TMS* VSN
| Line S01131 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07705 M02S01131.282l826 ---| SA1 EVSN 07706 M02S01132.282l826 ---| ZR X1,BWM0.1 IF NO EXTERNAL VSN 07707 M02S01133.282l826 ---| BX2 X1 USE EXTERNAL VSN
| Line S00218 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07708 M02S00218.282l826 ---| BWM0.1 BX1 X6*X2 VSN OR PACKNAM
| Line S03927 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07709 M01S03927.282l826 ---| SA2 BLANK BUILD BLANK WORD 07710 M01S03928.282l826 ---| BX4 X2 07711 M01S03929.282l826 ---| LX2 30 07712 M01S03930.282l826 ---| BX2 X4+X2 07713 M01S03931.282l826 ---| RJ SFN SPACE FILL VSN OR PACKNAME 07714 M01S03932.282l826 ---| BX1 X6-X2 LOCATE NON-BLANK CHARACTERS 07715 M01S03933.282l826 ---| LX4 X6 07716 M01S03934.282l826 ---| RJ SFN 07717 M01S03935.282l826 ---| BX1 X7*X4 REMOVE EXCESS BLANKS 07718 M01S03936.282l826 ---| NZ X1,BWM1 IF NOT BLANK VSN 07719 M01S03937.282l826 ---| SA1 A2+B1 SET SCRATCH VSN 07720 M01S03938.282l826 ---| ERRNZ BLANK+1-SCRATCH CODE DEPENDS ON LOCATION
| Line S00592 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07721 M01S00592.282l826 +++| SA2 RESB+RQPV+PRES 07722 M01S00593.282l826 +++| SB5 X1 COMPLEMENT OF MESSAGE SKELETON ADDRESS 07723 M01S00594.282l826 +++| LX2 59-5 07724 M01S00595.282l826 +++| SA1 SCRATCH 07725 M01S00596.282l826 +++| NG X2,BWM1 IF SCRATCH VSN 07726 M01S00597.282l826 +++| SA4 RESB+RQPV+PVSN GET VSN OR PACKNAME 07727 M01S00598.282l826 +++| SA1 BLANK 07728 M01S00599.282l826 +++| BX1 X4-X1 CONVERT TRAILING BLANKS TO ZEROS 07729 M01S00600.282l826 +++| RJ SFN COMPUTE MASK OF NON-BLANK CHARACTERS 07730 M01S00601.282l826 +++| BX1 X7*X4 REMOVE TRAILING BLANKS 07731 M00S03939.resex +++| BWM1 SB2 1R+ REPLACEMENT CHARACTER
| Line S00602 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07732 M01S00602.282l826 +++| SB3 WTPB SET ASSEMBLY BUFFER ADDRESS 07733 M00S03940.resex +++| RJ SNM INSERT VSN OR PACKNAME INTO MESSAGE
| Line S03941 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07734 M01S03941.282l826 ---| SB5 WTPB MESSAGE BUFFER
| Line S00603 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07735 M01S00603.282l826 +++| SA2 RESB+RQPV+PRES GET RESOURCE TYPE AND UNIT COUNT 07736 M01S00604.282l826 +++| MX6 12 07737 M01S00605.282l826 +++| LX2 59-23 07738 M01S00606.282l826 +++| BX1 X6*X2 RESOURCE MNEMONIC 07739 M01S00607.282l826 +++| LX2 59-4-59+23 07740 M01S00608.282l826 +++| PL X2,BWM2 IF NO UNIT COUNT 07741 M01S00609.282l826 +++| MX6 -6 07742 M01S00610.282l826 +++| LX2 0-9-59+4+60 07743 M01S00611.282l826 +++| BX6 -X6*X2 07744 M01S00612.282l826 +++| SX6 X6+1R1 UNIT COUNT 07745 M01S00613.282l826 +++| LX6 42 07746 M01S00614.282l826 +++| BX1 X1+X6 MERGE UNIT COUNT 07747 M01S00615.282l826 +++| BWM2 SB5 WTPB MESSAGE BUFFER 07748 M00S03942.resex +++| SB2 1R- REPLACEMENT CHARACTER
| Line S03943 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07749 M01S03943.282l826 ---| BX1 X0
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | ns2161 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07750 M02S00074.282l826 ---| MX4 1
| Line S03944 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07751 M01S03944.282l826 ---| LX1 -18
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | ns2161 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07752 M02S00075.282l826 ---| BX1 -X4*X1 ISOLATE RESOURCE TYPE ONLY 07753 M00S03945.resex +++| RJ SNM INSERT RESOURCE TYPE INTO MESSAGE 07754 M00S03946.resex +++| SX1 WTPB ADDRESS OF NEW MESSAGE 07755 M00S03947.resex +++| EQ BWMX RETURN
| Line S00319 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 07756 M01S00319.ns22000 +++| CAL SPACE 4,15 07757 M01S00320.ns22000 +++|** CAL - CHECK ACCESS LEVEL. 07758 M01S00321.ns22000 +++|* 07759 M01S00322.ns22000 +++|* ENTRY (X2) = EST ORDINAL IN BITS 59-48.
| Line S00323 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07760 M02S00323.253l688 ---|* (X3) = EVSB ENTRY OF VSN TO BE CHECKED.
| Line S00485 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 07761 M01S00485.253l688 +++|* (X3) = *EVSB* ENTRY OF VSN TO BE CHECKED.
| Line S00324 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 07762 M01S00324.ns22000 +++|* (EQ) = EST ORDINAL IF SPECIFIED. 07763 M01S00325.ns22000 +++|* 07764 M01S00326.ns22000 +++|* EXIT (TPAL) .GE. 0, IF TAPE ACCESS LEVEL WITHIN RANGE, 07765 M01S00327.ns22000 +++|* .LT. 0, IF TAPE ACCESS LEVEL OUT OF RANGE, 07766 M01S00328.ns22000 +++|* UNDEFINED, IF NOT CORRECT EQUIPMENT. 07767 M01S00329.ns22000 +++|* (X5) = 0, IF NO SPECIFIED EQUIPMENT 07768 M01S00330.ns22000 +++|* .NE. 0, IF EQUIPMENT SPECIFIED. 07769 M01S00331.ns22000 +++|* 07770 M01S00332.ns22000 +++|* USES X - 0, 2, 5, 6, 7. 07771 M01S00333.ns22000 +++|* A - 2, 5. 07772 M01S00334.ns22000 +++| 07773 M01S00335.ns22000 +++| 07774 M01S00336.ns22000 +++| CAL SUBR ENTRY/EXIT 07775 M01S00337.ns22000 +++| SA5 EQ 07776 M01S00338.ns22000 +++| ZR X5,CAL1 IF NO SPECIFIED EQUIPMENT 07777 M01S00339.ns22000 +++| BX5 X5-X2 07778 M01S00340.ns22000 +++| AX5 48 07779 M01S00341.ns22000 +++| NZ X5,CALX IF NOT CORRECT EQUIPMENT 07780 M01S00342.ns22000 +++| CAL1 SA2 SSMA SYSTEM SECURITY MODE 07781 M01S00343.ns22000 +++| BX6 X2 07782 M01S00344.ns22000 +++| ZR X6,CAL2 IF UNSECURED SYSTEM 07783 M01S00345.ns22000 +++| MX0 -3 07784 M01S00346.ns22000 +++| BX7 X3 07785 M01S00347.ns22000 +++| LX7 2-14 07786 M01S00348.ns22000 +++| BX5 -X0*X7 LOWER BOUND OF *EVSB* ENTRY 07787 M01S00349.ns22000 +++| LX7 2-11-2+14 07788 M01S00350.ns22000 +++| BX7 -X0*X7 UPPER BOUND OF *EVSB* ENTRY 07789 M01S00351.ns22000 +++| SA2 F+4 07790 M01S00352.ns22000 +++| LX2 -36 07791 M01S00353.ns22000 +++| BX2 -X0*X2 ACCESS LEVEL FROM FET 07792 M01S00354.ns22000 +++| IX6 X7-X2 07793 M01S00355.ns22000 +++| NG X6,CAL2 IF NOT WITHIN ACCESS LEVEL LIMITS 07794 M01S00356.ns22000 +++| IX6 X2-X5 07795 M01S00357.ns22000 +++| NG X6,CAL2 IF NOT WITHIN ACCESS LEVEL LIMITS 07796 M01S00358.ns22000 +++| LX5 3 07797 M01S00359.ns22000 +++| BX6 X7+X5 EQUIPMENT ACCESS LEVELS 07798 M01S00360.ns22000 +++| CAL2 SA6 TPAL 07799 M01S00361.ns22000 +++| BX5 X5-X5 SET EXIT CONDITION 07800 M01S00362.ns22000 +++| EQ CALX RETURN 07801 M00S03948.resex +++| CBP SPACE 4,10 07802 M00S03949.resex +++|** CBP - CALCULATE RESOURCE BYTE POSITION. 07803 M00S03950.resex +++|* 07804 M00S03951.resex +++|* ENTRY (X2) = 51/0, 3/UNIT COUNT, 6/RESOURCE INDEX. 07805 M00S03952.resex +++|* 07806 M00S03953.resex +++|* EXIT (B2) = RESOURCE INDEX, ADJUSTED FOR CONTINUATION WORD. 07807 M00S03954.resex +++|* (B4) = RIGHT SHIFT COUNT TO POSITION RESOURCE 07808 M00S03955.resex +++|* ASSIGNED AND DEMAND COUNT IN LOWER 12 BITS. 07809 M00S03956.resex +++|* 07810 M00S03957.resex +++|* USES B - 2, 4. 07811 M00S03958.resex +++|* X - 1, 2, 3, 7. 07812 M00S03959.resex +++| 07813 M00S03960.resex +++| 07814 M00S03961.resex +++| CBP SUBR ENTRY/EXIT 07815 M00S03962.resex +++| MX3 -6 07816 M00S03963.resex +++| BX1 -X3*X2 GET RESOURCE INDEX 07817 M00S03964.resex +++| AX2 6 07818 M00S03965.resex +++| SB2 X1+B1 07819 M00S03966.resex +++| SX7 RPEW*2 07820 M00S03967.resex +++| IX3 X7-X2 07821 M00S03968.resex +++| MX2 -2 07822 M00S03969.resex +++| BX2 -X2*X3 07823 M00S03970.resex +++| LX2 2 07824 M00S03971.resex +++| BX3 -X3 07825 M00S03972.resex +++| LX7 X2,B1 07826 M00S03973.resex +++| SB4 X2 07827 M00S03974.resex +++| AX3 2 07828 M00S03975.resex +++| SB4 B4+X7 07829 M00S03976.resex +++| SB2 B2+X3 ADJUST FOR CONTINUATION WORD 07830 M00S03977.resex +++| EQ CBPX RETURN
| Line S00616 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07831 M01S00616.282l826 +++| CCV SPACE 4,10 07832 M01S00617.282l826 +++|** CCV - CHECK FOR CHANGE OF TMS SCRATCH VSN. 07833 M01S00618.282l826 +++|* 07834 M01S00619.282l826 +++|* EXIT REQUEST PARAMETERS UPDATED IF CHANGE IN TMS SCRATCH 07835 M01S00620.282l826 +++|* VSN. 07836 M01S00621.282l826 +++|* 07837 M01S00622.282l826 +++|* USES X - 0, 1, 2, 6, 7. 07838 M01S00623.282l826 +++|* A - 1, 2, 6, 7. 07839 M01S00624.282l826 +++|* 07840 M01S00625.282l826 +++|* CALLS RDF. 07841 M01S00626.282l826 +++| 07842 M01S00627.282l826 +++| 07843 M01S00628.282l826 +++| CCV SUBR ENTRY/EXIT 07844 M01S00629.282l826 +++| 07845 M01S00630.282l826 +++|* CHECK CHANGE OF SCRATCH *TMS* VSN. 07846 M01S00631.282l826 +++| 07847 M01S00632.282l826 +++| SA1 TMPF CHECK FOR NON-*TMS* TAPE 07848 M01S00633.282l826 +++| LX1 59-58 07849 M01S00634.282l826 +++| PL X1,CCVX IF NOT *TMS* CONTROLLED REQUEST 07850 M01S00635.282l826 +++| RJ RDF READ DEMAND FILE 07851 M01S00636.282l826 +++| SA1 DBUF+RQPV+PVSI GET INTERNAL VSN 07852 M01S00637.282l826 +++| SA2 IVSN 07853 M01S00638.282l826 +++| MX0 6*6 07854 M01S00639.282l826 +++| BX2 X1-X2 07855 M01S00640.282l826 +++| ZR X2,CCVX IF NO CHANGE IN VSN 07856 M01S00641.282l826 +++| SA1 RQ REPLACE INTERNAL VSN 07857 M01S00642.282l826 +++| SA7 A2 UPDATE INTERNAL VSN 07858 M01S00643.282l826 +++| BX1 -X0*X1 07859 M01S00644.282l826 +++| BX6 X1+X7 07860 M01S00645.282l826 +++| SA6 A1 07861 M01S00646.282l826 +++| SA1 DBUF+RQPV+PVSN GET NEW EXTERNAL VSN 07862 M01S00647.282l826 +++| BX7 X1 07863 M01S00648.282l826 +++| SA7 EVSN UPDATE EXTERNAL VSN 07864 M01S00649.282l826 +++| EQ CCVX RETURN
| Line S01134 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 07865 M01S01134.274l797 +++| CDT SPACE 4,20 07866 M01S01135.274l797 +++|** CDT - CHECK DEVICE TYPE. 07867 M01S01136.274l797 +++|* 07868 M01S01137.274l797 +++|* ENTRY (A2) = ADDRESS OF DEVICE TYPE TABLE. 07869 M01S01138.274l797 +++|* (X7) = DEVICE CODE RIGHT JUSTIFIED. 07870 M01S01139.274l797 +++|* 07871 M01S01140.274l797 +++|* EXIT (X2) = 0 IF DEVICE TYPE NOT FOUND IN TABLE. 07872 M01S01141.274l797 +++|* (X2) = DEVICE TYPE TABLE ENTRY IF FOUND. 07873 M01S01142.274l797 +++|* (A2) = ADDRESS OF TABLE ENTRY IF FOUND. 07874 M01S01143.274l797 +++|* 07875 M01S01144.274l797 +++|* USES X - 2, 7. 07876 M01S01145.274l797 +++|* A - 2. 07877 M01S01146.274l797 +++|* 07878 M01S01147.274l797 +++|* DEVICE TYPE TABLE FORMAT - 07879 M01S01148.274l797 +++|* 07880 M01S01149.274l797 +++|* 42/ PARAMETERS,6/0,12/ DC 07881 M01S01150.274l797 +++|* 07882 M01S01151.274l797 +++|* DC = TWO CHARACTER DEVICE CODE. 07883 M01S01152.274l797 +++| 07884 M01S01153.274l797 +++| 07885 M01S01154.274l797 +++| CDT SUBR ENTRY/EXIT 07886 M01S01155.274l797 +++| CDT1 BX7 X7-X2 07887 M01S01156.274l797 +++| SX7 X7 07888 M01S01157.274l797 +++| ZR X7,CDTX IF ENTRY FOUND 07889 M01S01158.274l797 +++| BX7 X7-X2 07890 M01S01159.274l797 +++| SA2 A2+B1 07891 M01S01160.274l797 +++| NZ X2,CDT1 IF MORE ENTRIES TO CHECK 07892 M01S01161.274l797 +++| EQ CDTX RETURN WITH NOT FOUND STATUS
| Line S00650 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07893 M01S00650.282l826 +++| CER SPACE 4,15 07894 M01S00651.282l826 +++|** CER - CHECK FOR *CIO* ERROR ON TAPE FILE OPERATION. 07895 M01S00652.282l826 +++|* 07896 M01S00653.282l826 +++|* EXIT TO CALLER IF NO ERROR. 07897 M01S00654.282l826 +++|* TO *PER* IF ERROR.
| Line S00655 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
M02 (Removed by) | ns2770 |
Seq # *Modification Id* Act ----------------------------+ 07898 M02S00655.ns2770 ---|* ERROR PROCESSING CLEARED.
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2770 |
Seq # *Modification Id* Act ----------------------------+ 07899 M01S00020.ns2770 +++|* ERROR PROCESSING CLEARED IF ERROR DETECTED.
| Line S00656 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07900 M01S00656.282l826 +++|* 07901 M01S00657.282l826 +++|* USES X - 1, 6. 07902 M01S00658.282l826 +++|* A - 1. 07903 M01S00659.282l826 +++|* B - 2. 07904 M01S00660.282l826 +++|* 07905 M01S00661.282l826 +++|* MACROS SETFET. 07906 M01S00662.282l826 +++| 07907 M01S00663.282l826 +++| 07908 M01S00664.282l826 +++| CER SUBR ENTRY/EXIT
| Line S00665 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
M02 (Removed by) | ns2770 |
Seq # *Modification Id* Act ----------------------------+ 07909 M02S00665.ns2770 ---| SETFET F,ERP=0 CLEAR ERROR PROCESSING
| Line S00666 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07910 M01S00666.282l826 +++| SA1 F GET FET STATUS 07911 M01S00667.282l826 +++| MX6 -5 07912 M01S00668.282l826 +++| LX1 -9 07913 M01S00669.282l826 +++| BX1 -X6*X1 07914 M01S00670.282l826 +++| ZR X1,CERX IF NO ERROR
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2770 |
Seq # *Modification Id* Act ----------------------------+ 07915 M01S00021.ns2770 +++| SETFET F,ERP=0 CLEAR ERROR PROCESSING
| Line S00671 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 07916 M01S00671.282l826 +++| SB2 B0 SET NO MESSAGE 07917 M01S00672.282l826 +++| EQ PER PROCESS ERROR 07918 M00S03978.resex +++| CET SPACE 4,15 07919 M00S03979.resex +++|** CET - COPY EQUIPMENT STATUS TABLE (EST).
| Line S00506 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07920 M01S00506.ns21000 +++|* 07921 M01S00507.ns21000 +++|* ENTRY (B5) .LT. 0 IF INITIAL CALL. 07922 M00S03980.resex +++|*
| Line S03981 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07923 M01S03981.ns21000 ---|* EXIT (ESTI) = EST POINTER (ESTP). 07924 M01S03982.ns21000 ---|* EST = EQUIPMENT STATUS TABLE.
| Line S00508 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07925 M01S00508.ns21000 +++|* EXIT (B6) = NUMBER OF EST ENTRIES IN BUFFER. 07926 M01S00509.ns21000 +++|* (B6) .LT. 0 IF END OF EST. 07927 M00S03983.resex +++|* 07928 M00S03984.resex +++|* ERROR TO *PER*, IF ENVIRONMENT ERROR. 07929 M00S03985.resex +++|*
| Line S03986 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07930 M01S03986.ns21000 ---|* USES A - 1, 6. 07931 M01S03987.ns21000 ---|* B - 2. 07932 M01S03988.ns21000 ---|* X - 0, 1, 2, 4, 5, 6, 7.
| Line S00510 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07933 M01S00510.ns21000 +++|* USES A - 1, 2, 6, 7. 07934 M01S00511.ns21000 +++|* B - 6. 07935 M01S00512.ns21000 +++|* X - 0, 1, 2, 5, 6, 7. 07936 M00S03989.resex +++|* 07937 M00S03990.resex +++|* MACROS RDSB. 07938 M00S03991.resex +++| 07939 M00S03992.resex +++|
| Line S03993 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07940 M01S03993.ns21000 ---| CET1 RDSB 0,X5,X7,A6 READ EST 07941 M01S03994.ns21000 ---| 07942 M00S03995.resex +++| CET SUBR ENTRY/EXIT
| Line S03996 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07943 M01S03996.ns21000 ---| SA1 /LWC/ESTP GET EST POINTER
| Line S00513 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07944 M01S00513.ns21000 +++| PL B5,CET1 IF NOT INITIAL CALL 07945 M01S00514.ns21000 +++| SA1 /LWC/ESTP GET EST FWA 07946 M00S03997.resex +++| MX0 -12
| Line S03998 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 07947 M01S03998.ns22000 ---| LX1 12
| Line S00363 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 07948 M01S00363.ns22000 +++| LX1 24
| Line S03999 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07949 M01S03999.ns21000 ---| SX2 ESTL
| Line S00515 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 07950 M02S00515.ns22000 ---| SX6 ESTL
| Line S04000 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 07951 M01S04000.ns22000 ---| BX7 -X0*X1
| Line S00364 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 07952 M01S00364.ns22000 +++| SX7 X1 07953 M01S00365.ns22000 +++| LX1 12 07954 M01S00366.ns22000 +++| BX6 -X0*X1 GET NUMBER OF ENTRIES IN EST
| Line S04001 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07955 M01S04001.ns21000 ---| LX1 12 07956 M01S04002.ns21000 ---| BX4 -X0*X1 07957 M01S04003.ns21000 ---| IX5 X4-X7 07958 M01S04004.ns21000 ---| IX2 X2-X5 07959 M01S04005.ns21000 ---| MX6 1 07960 M01S04006.ns21000 ---| SA6 EST 07961 M01S04007.ns21000 ---| PL X2,CET1 IF NO EST LENGTH ERROR 07962 M01S04008.ns21000 ---| SB2 /PER/REV *RESOURCE ENVIRONMENT ERROR.* 07963 M01S04009.ns21000 ---| EQ PER PROCESS ERROR
| Line S00516 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 07964 M01S00516.ns21000 +++| SA7 CETA 07965 M01S00517.ns21000 +++| SA6 A7+B1 07966 M01S00518.ns21000 +++| CET1 SA1 CETA GET NEXT BLOCK EST ADDRESS 07967 M01S00519.ns21000 +++| SA2 A1+B1 GET REMAINING EST ENTRIES 07968 M01S00520.ns21000 +++| MX6 1 07969 M01S00521.ns21000 +++| SX5 ESTEB EST ENTRIES PER BLOCK 07970 M01S00522.ns21000 +++| SA6 SBUF2 07971 M01S00523.ns21000 +++| IX7 X2-X5 07972 M01S00524.ns21000 +++| PL X7,CET2 IF STILL MORE BLOCKS TO TRANSFER 07973 M01S00525.ns21000 +++| SB6 -B1 07974 M01S00526.ns21000 +++| ZR X2,CETX IF END OF EST 07975 M01S00527.ns21000 +++| BX7 X7-X7 07976 M01S00528.ns21000 +++| LX5 X2 SET REMAINING NUMBER OF ENTRIES 07977 M01S00529.ns21000 +++| CET2 SA7 A2 DECREMENT REMAINING ENTRY COUNT 07978 M01S00530.ns21000 +++| SB6 X5 NUMBER OF EST ENTRIES TO TRANSFER 07979 M01S00531.ns21000 +++| R= X2,ESTE 07980 M01S00532.ns21000 +++| IX5 X5*X2 LENGTH OF BLOCK TO TRANSFER 07981 M01S00533.ns21000 +++| IX7 X1+X5 ADVANCE EST ADDRESS 07982 M01S00534.ns21000 +++| SA7 A1 07983 M01S00535.ns21000 +++| RDSB 0,X5,X1,A6 READ EST BLOCK 07984 M01S00536.ns21000 +++| EQ CETX RETURN 07985 M01S00537.ns21000 +++| 07986 M01S00538.ns21000 +++| 07987 M01S00539.ns21000 +++| CETA CON 0 FWA EST BLOCK 07988 M01S00540.ns21000 +++| CON 0 NUMBER OF REMAINING ENTRIES IN EST 07989 M00S04010.resex +++| CFA SPACE 4,15 07990 M00S04011.resex +++|** CFA - CHECK FILE ATTACH. 07991 M00S04012.resex +++|* 07992 M00S04013.resex +++|* ENTRY (X2) = FET ADDRESS. 07993 M00S04014.resex +++|* (X6) = FILE MODE FOR ATTACH. 07994 M00S04015.resex +++|* IF RESOURCE FILE IS ALREADY ATTACHED AND INTERLOCKED, 07995 M00S04016.resex +++|* IT WILL BE REWOUND. 07996 M00S04017.resex +++|* 07997 M00S04018.resex +++|* EXIT (X2) = FET ADDRESS. 07998 M00S04019.resex +++|* (CFAA) = .NE. 0, IF FILE BUSY ROLLOUT OCCURRED. 07999 M00S04020.resex +++|* RESOURCE FILE ATTACHED, INTERLOCKED AND REWOUND. 08000 M00S04021.resex +++|* TO *PIT*, IF INTERRUPT OCCURRED AND FILE ATTACH IS 08001 M00S04022.resex +++|* NOT REQUIRED. 08002 M00S04023.resex +++|* TO *PIT2*, IF RETRY COUNT ON FILE ATTACH EXHAUSTED 08003 M00S04024.resex +++|* AFTER INTERRUPT HAS OCCURRED. 08004 M00S04025.resex +++|*
| Line S04026 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 08005 M01S04026.253l688 ---|* ERROR TO *PER*, IF PFM ERROR ON RESOURCE FILE ATTACH.
| Line S00486 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 08006 M01S00486.253l688 +++|* ERROR TO *PER*, IF *PFM* ERROR ON RESOURCE FILE ATTACH. 08007 M00S04027.resex +++|* 08008 M00S04028.resex +++|* USES A - 0, 1, 6, 7. 08009 M00S04029.resex +++|* B - 2, 3. 08010 M00S04030.resex +++|* X - 0, 1, 2, 4, 5, 6, 7. 08011 M00S04031.resex +++|* 08012 M00S04032.resex +++|* CALLS PRO, SFN. 08013 M00S04033.resex +++|* 08014 M00S04034.resex +++|* MACROS ATTACH, INTRP, MESSAGE, RECALL, REWIND. 08015 M00S04035.resex +++| 08016 M00S04036.resex +++| 08017 M00S04037.resex +++| CFA8 REWIND X2,R 08018 M00S04038.resex +++| 08019 M00S04039.resex +++| CFA SUBR ENTRY/EXIT 08020 M00S04040.resex +++| SA6 CFAC SAVE DEMAND FILE ATTACH MODE 08021 M00S04041.resex +++| SA1 X2-1 CHECK FILE INTERLOCK 08022 M00S04042.resex +++| MX0 1 08023 M00S04043.resex +++| NZ X1,CFA8 IF FILE ALREADY ATTACHED 08024 M00S04044.resex +++| SX6 DBMC RESET MESSAGE COUNT 08025 M00S04045.resex +++| SA6 CFAB 08026 M00S04046.resex +++| SA1 X2+B1 SET EP BIT 08027 M00S04047.resex +++| LX0 -15 08028 M00S04048.resex +++| BX7 X0+X1 08029 M00S04049.resex +++| SA7 A1 08030 M00S04050.resex +++| EQ CFA2 ATTACH RESOURCE FILE 08031 M00S04051.resex +++| 08032 M00S04052.resex +++| CFA1 SX0 X2+ 08033 M00S04053.resex +++| INTRP CFA4 PROCESS INTERRUPT 08034 M00S04054.resex +++| SA1 AA CHECK FOR EQUIPMENT ASSIGNMENT 08035 M00S04055.resex +++| SX2 -1 08036 M00S04056.resex +++| PL X1,CFA5 IF NOT AUTOMATIC TAPE ASSIGNMENT 08037 M00S04057.resex +++| SX5 PFRE SET ROLLOUT EVENT DESCRIPTOR 08038 M00S04058.resex +++| SA1 PFRE+1 GET ROLLOUT MESSAGE ADDRESS 08039 M00S04059.resex +++| RJ PRO PROCESS TIMED EVENT ROLLOUT 08040 M00S04060.resex +++| SX2 X0+ 08041 M00S04061.resex +++| CFA2 ATTACH X2,0,,,CFAC,,,DF,FA 08042 M00S04062.resex +++| SA1 X2 08043 M00S04063.resex +++| MX0 -8 08044 M00S04064.resex +++| LX1 -10 08045 M00S04065.resex +++| BX5 -X0*X1 ERROR STATUS 08046 M00S04066.resex +++| ZR X5,CFA3 IF NO ERRORS 08047 M00S04067.resex +++| SX6 X5-1 08048 M00S04068.resex +++| SX7 X5-16B 08049 M00S04069.resex +++| ZR X6,CFA1 IF FILE BUSY (1) 08050 M00S04070.resex +++| ZR X7,CFA1 IF PF UTILITY ACTIVE (16) 08051 M00S04071.resex +++| MX0 -3 08052 M00S04072.resex +++| BX6 -X0*X5 08053 M00S04073.resex +++| LX5 -3 08054 M00S04074.resex +++| BX7 -X0*X5 08055 M00S04075.resex +++| SX6 X6+2R00 08056 M00S04076.resex +++| LX7 6 08057 M00S04077.resex +++| MX0 7*6 08058 M00S04078.resex +++| IX5 X6+X7 08059 M00S04079.resex +++| LX1 10 08060 M00S04080.resex +++| LX5 -12 08061 M00S04081.resex +++| BX1 X0*X1 08062 M00S04082.resex +++| RJ SFN SPACE FILL FILE NAME 08063 M00S04083.resex +++| MX0 12 08064 M00S04084.resex +++| LX6 -18 08065 M00S04085.resex +++| BX6 -X0*X6 08066 M00S04086.resex +++| BX6 X6+X5 08067 M00S04087.resex +++| SB2 /PER/RFE *RESOURCE PF ERROR NN FILENAM.* 08068 M00S04088.resex +++| SA6 B2+2 ENTER *NN FILENAM* 08069 M00S04089.resex +++| MESSAGE CFAA ISSUE MESSAGE OF PF ERROR 08070 M00S04090.resex +++| EQ PER PROCESS ERROR 08071 M00S04091.resex +++| 08072 M00S04092.resex +++| CFA3 MX7 1 SET RESOURCE FILE INTERLOCK 08073 M00S04093.resex +++| SA7 X2-1 08074 M00S04094.resex +++| SA1 X2+B1 CLEAR EP BIT 08075 M00S04095.resex +++| LX7 44-59 08076 M00S04096.resex +++| BX7 -X7*X1 08077 M00S04097.resex +++| SA7 A1+ 08078 M00S04098.resex +++| SA3 CFAB 08079 M00S04099.resex +++| NZ X3,CFA8 IF NO MESSAGE POSTED 08080 M00S04100.resex +++| MESSAGE CFAB,2,R CLEAR MESSAGE 08081 M00S04101.resex +++| EQ CFA8 REWIND FILE AND RETURN 08082 M00S04102.resex +++| 08083 M00S04103.resex +++|* PROCESS INTERRUPT. DEPENDING ON OPTION SELECTED, WILL DELAY 08084 M00S04104.resex +++|* AND RETRY DEMAND FILE ATTACH UNTIL SUCCESSFUL OR FOR 08085 M00S04105.resex +++|* REQUESTED NUMBER OF RETRIES. AFTER *DBMC* TRIES, AN 08086 M00S04106.resex +++|* OPERATOR MESSAGE IS POSTED. IF THE OPERATOR OVERRIDES THE 08087 M00S04107.resex +++|* JOB AT THIS POINT, THE DEMAND FILE ENTRY FOR THE JOB MAY BE 08088 M00S04108.resex +++|* LEFT WITH INCORRECT DEMAND AND ASSIGN COUNTS WHICH MAY 08089 M00S04109.resex +++|* SUBSEQUENTLY CAUSE A *0RF* HANG. 08090 M00S04110.resex +++| 08091 M00S04111.resex +++| CFA4 SA2 UCRI CHECK FOR UPDATE REQUIRED 08092 M00S04112.resex +++| ZR X2,PIT IF UPDATE NOT REQUIRED 08093 M00S04113.resex +++| CFA5 SA1 CFAB CHECK WAIT FOR RESOURCE FILE MESSAGE 08094 M00S04114.resex +++| ZR X1,CFA6 IF MESSAGE ALREADY POSTED 08095 M00S04115.resex +++| SX6 X1-1 08096 M00S04116.resex +++| SA6 A1 08097 M00S04117.resex +++| NZ X6,CFA6 IF WAIT COUNT NOT EXHAUSTED 08098 M00S04118.resex +++| MESSAGE (=C*WAITING FOR RESOURCE FILE.*),2,R 08099 M00S04119.resex +++| CFA6 NG X2,CFA7 IF UPDATE REQUIRED 08100 M00S04120.resex +++| SX6 X2-1 08101 M00S04121.resex +++| ZR X6,PIT2 IF NUMBER OF RETRIES EXHAUSTED 08102 M00S04122.resex +++| SA6 A2+ 08103 M00S04123.resex +++| CFA7 RECALL DELAY 08104 M00S04124.resex +++| SX2 X0 08105 M00S04125.resex +++| EQ CFA2 RETRY FILE ATTACH 08106 M00S04126.resex +++| 08107 M00S04127.resex +++| 08108 M00S04128.resex +++| CFAA BSSZ 3 PF ERROR MESSAGE BUFFER 08109 M00S04129.resex +++| CFAB CON DBMC DEMAND FILE BUSY MESSAGE COUNT 08110 M00S04130.resex +++| CFAC CON 0 DEMAND FILE ATTACH MODE 08111 M00S04131.resex +++| CLB SPACE 4,15 08112 M00S04132.resex +++|** CLB - CLEAR BUFFER. 08113 M00S04133.resex +++|*
| Line S04134 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08114 M01S04134.ns21000 ---|* ENTRY (B2) = FWA OF BUFFER. 08115 M01S04135.ns21000 ---|* (B3) = LENGTH OF BUFFER.
| Line S00541 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08116 M01S00541.ns21000 +++|* ENTRY (A2) = LWA+1 OF BUFFER. 08117 M01S00542.ns21000 +++|* (B5) = LENGTH OF BUFFER. 08118 M00S04136.resex +++|* (X6) = MASK. 08119 M00S04137.resex +++|* 08120 M00S04138.resex +++|* EXIT BUFFER CLEARED AS DIRECTED BY MASK.
| Line S00543 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08121 M01S00543.ns21000 +++|* (A7) = FWA BUFFER. 08122 M00S04139.resex +++|*
| Line S04140 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08123 M01S04140.ns21000 ---|* USES X - 1, 7. 08124 M01S04141.ns21000 ---|* B - 3. 08125 M01S04142.ns21000 ---|* A - 1, 7.
| Line S00544 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08126 M01S00544.ns21000 +++|* USES X - 2, 7. 08127 M01S00545.ns21000 +++|* B - 5. 08128 M01S00546.ns21000 +++|* A - 2, 7. 08129 M00S04143.resex +++| 08130 M00S04144.resex +++| 08131 M00S04145.resex +++| CLB SUBR ENTRY/EXIT
| Line S04146 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08132 M01S04146.ns21000 ---| CLB1 SB3 B3-B1 08133 M01S04147.ns21000 ---| SA1 B2+B3 08134 M01S04148.ns21000 ---| NG B3,CLBX IF COMPLETED CLEAR 08135 M01S04149.ns21000 ---| BX7 X6*X1 08136 M01S04150.ns21000 ---| SA7 A1
| Line S00547 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08137 M01S00547.ns21000 +++| CLB1 SB5 B5-B1 08138 M01S00548.ns21000 +++| NG B5,CLBX IF CLEAR COMPLETED 08139 M01S00549.ns21000 +++| SA2 A2-B1 08140 M01S00550.ns21000 +++| BX7 X6*X2 08141 M01S00551.ns21000 +++| SA7 A2 08142 M00S04151.resex +++| EQ CLB1
| Line S00367 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08143 M01S00367.ns22000 +++| CLM SPACE 4,10 08144 M01S00368.ns22000 +++|** CLM - CHECK LEVEL MATCH. 08145 M01S00369.ns22000 +++|* 08146 M01S00370.ns22000 +++|* *CLM* COMPARES THE ACCESS LEVELS OF THE *RET* TABLE AND 08147 M01S00371.ns22000 +++|* THE *RDT* TABLE. 08148 M01S00372.ns22000 +++|* 08149 M01S00373.ns22000 +++|* ENTRY (B2) = POINTER +1 TO ENTRY IN *RET* TABLE. 08150 M01S00374.ns22000 +++|* (B6) = POINTER TO ENTRY IN *RDT* TABLE. 08151 M01S00375.ns22000 +++|* 08152 M01S00376.ns22000 +++|* EXIT (X0) .LT.0, IF DEMAND OUTSIDE OF ACCESS LEVEL. 08153 M01S00377.ns22000 +++|* .GE.0, IF DEMAND WITHIN ACCESS LEVEL. 08154 M01S00378.ns22000 +++|* 08155 M01S00379.ns22000 +++|* USES X - 0, 5, 6, 7. 08156 M01S00380.ns22000 +++|* A - 5. 08157 M01S00381.ns22000 +++| 08158 M01S00382.ns22000 +++| 08159 M01S00383.ns22000 +++| CLM SUBR ENTRY/EXIT 08160 M01S00384.ns22000 +++| MX0 -3 08161 M01S00385.ns22000 +++| SA5 B2-B1 *RET* TABLE ENTRY 08162 M01S00386.ns22000 +++| LX5 0-45 POSITION ACCESS LEVEL 08163 M01S00387.ns22000 +++| BX7 -X0*X5 LOWER BOUND ACCESS LEVEL 08164 M01S00388.ns22000 +++| LX5 3 08165 M01S00389.ns22000 +++| BX6 -X0*X5 UPPER BOUND ACCESS LEVEL 08166 M01S00390.ns22000 +++| SA5 B6 *RDT* TABLE ENTRY 08167 M01S00391.ns22000 +++| LX5 0-36 POSITION ACCESS LEVEL 08168 M01S00392.ns22000 +++| BX5 -X0*X5 08169 M01S00393.ns22000 +++| IX0 X6-X5 UPPER BOUND - REQUEST 08170 M01S00394.ns22000 +++| NG X0,CLMX IF REQUEST ABOVE UPPER BOUND 08171 M01S00395.ns22000 +++| IX0 X5-X7 REQUEST - LOWER BOUND 08172 M01S00396.ns22000 +++| EQ CLMX RETURN
| Line S01162 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 08173 M01S01162.274l797 +++| COV SPACE 4,10 08174 M01S01163.274l797 +++|** COV - CLEAR OPERATOR VERIFY FLAG. 08175 M01S01164.274l797 +++|* 08176 M01S01165.274l797 +++|* EXIT OPERATOR VERIFY REQUIRED FLAG CLEARED IN *TMPF*. 08177 M01S01166.274l797 +++|* 08178 M01S01167.274l797 +++|* USES X - 2, 6. 08179 M01S01168.274l797 +++|* A - 2, 6. 08180 M01S01169.274l797 +++| 08181 M01S01170.274l797 +++| 08182 M01S01171.274l797 +++| COV SUBR ENTRY/EXIT 08183 M01S01172.274l797 +++| SA2 TMPF 08184 M01S01173.274l797 +++| SX6 B1 08185 M01S01174.274l797 +++| LX6 56-0 08186 M01S01175.274l797 +++| BX6 -X6*X2 CLEAR OPERATOR VERIFY FLAG 08187 M01S01176.274l797 +++| SA6 A2 08188 M01S01177.274l797 +++| EQ COVX RETURN 08189 M00S04152.resex +++| CRM SPACE 4,10 08190 M00S04153.resex +++|** CRM - CHECK FOR RESOURCE MATCH. 08191 M00S04154.resex +++|* 08192 M00S04155.resex +++|* ENTRY (X0) = REQUESTED RESOURCE INDEX AND BYTE POINTER. 08193 M00S04156.resex +++|* (X5) = EQUIPMENT RESOURCE INDEX AND BYTE POINTER. 08194 M00S04157.resex +++|* (X2) = *PE* RESOURCE INDEX, IF *NT* REQUEST MATCH 08195 M00S04158.resex +++|* WITH *GE* EQUIPMENT ALLOWED. 08196 M00S04159.resex +++|* 08197 M00S04160.resex +++|* EXIT (X7) = 0, IF RESOURCES MATCH. 08198 M00S04161.resex +++|* 08199 M00S04162.resex +++|* USES X - 5, 7. 08200 M00S04163.resex +++| 08201 M00S04164.resex +++| 08202 M00S04165.resex +++| CRM SUBR ENTRY/EXIT
| Line S00397 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08203 M01S00397.ns22000 +++| MX7 -6 08204 M01S00398.ns22000 +++| BX5 -X7*X5 08205 M01S00399.ns22000 +++| BX0 -X7*X0 08206 M00S04166.resex +++| IX7 X0-X5 08207 M00S04167.resex +++| ZR X7,CRMX IF MATCH
| Line S04168 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08208 M01S04168.ns22000 ---| SX7 X0-RNTP-100B
| Line S00400 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08209 M01S00400.ns22000 +++| SX7 X0-RNTP 08210 M00S04169.resex +++| ZR X7,CRM1 IF *NT* REQUEST
| Line S04170 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08211 M01S04170.ns22000 ---| SX7 X0-RPEP-100B
| Line S00401 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08212 M01S00401.ns22000 +++| SX7 X0-RPEP 08213 M00S04171.resex +++| NZ X7,CRMX IF NOT *PE* REQUEST
| Line S04172 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08214 M01S04172.ns22000 ---| CRM1 SX7 X5-RHDP-100B
| Line S00402 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08215 M01S00402.ns22000 +++| CRM1 SX7 X5-RHDP 08216 M00S04173.resex +++| ZR X7,CRMX IF *HD* EQUIPMENT
| Line S04174 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08217 M01S04174.ns22000 ---| SX7 X5-RGEP-100B
| Line S00403 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08218 M01S00403.ns22000 +++| SX7 X5-RGEP 08219 M00S04175.resex +++| NZ X7,CRMX IF NOT *GE* EQUIPMENT
| Line S04176 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08220 M01S04176.ns22000 ---| SX5 X0-RNTP-100B
| Line S00404 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08221 M01S00404.ns22000 +++| SX5 X0-RNTP 08222 M00S04177.resex +++| NZ X5,CRMX IF NOT *NT* REQUEST 08223 M00S04178.resex +++| SX7 X2-RPEP 08224 M00S04179.resex +++| EQ CRMX RETURN 08225 M00S04180.resex +++| CRV SPACE 4,10 08226 M00S04181.resex +++|** CRV - CHECK RESOURCE VALIDITY. 08227 M00S04182.resex +++|* 08228 M00S04183.resex +++|* ENTRY RESB = RESOURCE DEMAND ENTRY, WITH INDIVIDUAL AND 08229 M00S04184.resex +++|* TOTAL DEMAND COUNTS CORRECTLY SET. 08230 M00S04185.resex +++|* 08231 M00S04186.resex +++|* ERROR TO *PER*, IF DEMAND VALIDATION ERROR. 08232 M00S04187.resex +++|* 08233 M00S04188.resex +++|* USES A - 1, 5. 08234 M00S04189.resex +++|* B - 2, 3, 4. 08235 M00S04190.resex +++|* X - ALL. 08236 M00S04191.resex +++| 08237 M00S04192.resex +++| 08238 M00S04193.resex +++| CRV SUBR ENTRY/EXIT 08239 M00S04194.resex +++| SB3 RMTL-1 08240 M00S04195.resex +++| SB4 RESB+RMTP 08241 M00S04196.resex +++| MX2 -6 08242 M00S04197.resex +++| BX3 X3-X3 08243 M00S04198.resex +++| SB2 /PER/DVE * DEMAND VALIDATION ERROR.* 08244 M00S04199.resex +++| SX4 7 MAXIMUM VALIDATION LIMIT 08245 M00S04200.resex +++| CRV1 SA1 B3+B4 COUNT TAPE DEMANDS 08246 M00S04201.resex +++| SB3 B3-B1
| Line S00405 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08247 M01S00405.ns22000 +++| SB5 RPEW TAPE ENTRIES PER WORD 08248 M00S04202.resex +++| LX1 24
| Line S04203 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08249 M01S04203.ns22000 ---| BX1 -X2*X1 08250 M01S04204.ns22000 ---| IX3 X3+X1 08251 M01S04205.ns22000 ---| PL B3,CRV1 IF MORE TAPE RESOURCES
| Line S00406 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08252 M01S00406.ns22000 +++| CRV1.0 BX5 -X2*X1 08253 M01S00407.ns22000 +++| IX3 X3+X5 08254 M01S00408.ns22000 +++| SB5 B5-B1 DECUREMENT ENTRIES PER WORD 08255 M01S00409.ns22000 +++| LX1 12 08256 M01S00410.ns22000 +++| NZ B5,CRV1.0 IF MORE ENTRIES IN WORD 08257 M01S00411.ns22000 +++| PL B3,CRV1 IF MORE TAPE ENTRIES 08258 M00S04206.resex +++| MX0 3 08259 M00S04207.resex +++| SA5 RESB+RVAL 08260 M00S04208.resex +++| BX6 X0*X5 TAPES VALIDATION LIMIT 08261 M00S04209.resex +++| MX2 -12 08262 M00S04210.resex +++| LX6 3 08263 M00S04211.resex +++| BX2 -X2*X5 TOTAL DEMAND COUNT 08264 M00S04212.resex +++| IX1 X6-X4 08265 M00S04213.resex +++| LX5 3 08266 M00S04214.resex +++| IX2 X2-X3 REMOVABLE PACK DEMANDS 08267 M00S04215.resex +++| BX7 X0*X5 REMOVABLE PACK VALIDATION LIMIT 08268 M00S04216.resex +++| IX6 X6-X3 08269 M00S04217.resex +++| LX7 3 08270 M00S04218.resex +++| ZR X1,CRV2 IF UNLIMITED TAPES 08271 M00S04219.resex +++| NG X6,PER IF TAPE VALIDATION EXCEEDED 08272 M00S04220.resex +++| CRV2 IX1 X7-X4 08273 M00S04221.resex +++| ZR X1,CRVX IF UNLIMITED PACKS 08274 M00S04222.resex +++| IX7 X7-X2 08275 M00S04223.resex +++| NG X7,PER IF PACK VALIDATION EXCEEDED 08276 M00S04224.resex +++| EQ CRVX RETURN 08277 M00S04225.resex +++| CTA SPACE 4,15 08278 M00S04226.resex +++|** CTA - COUNT TOTAL ASSIGNS AND DEMANDS. 08279 M00S04227.resex +++|* 08280 M00S04228.resex +++|* ENTRY (X4) = DEMAND ENTRY ADDRESS. 08281 M00S04229.resex +++|* (B5) .LT. 0, IF COUNT TOTAL ASSIGNS AND DEMANDS. 08282 M00S04230.resex +++|* (B5) .GE. 0, IF COUNT ONLY TAPE ASSIGNS AND DEMANDS. 08283 M00S04231.resex +++|* 08284 M00S04232.resex +++|* EXIT (B3) = ASSIGNED COUNT (TOTAL OR PARTIAL). 08285 M00S04233.resex +++|* (X7) = DEMAND COUNT (TOTAL OR PARTIAL). 08286 M00S04234.resex +++|* 08287 M00S04235.resex +++|* ERROR TO *PER*, IF TOTAL DEMAND OR ASSIGNED COUNT ERROR. 08288 M00S04236.resex +++|* 08289 M00S04237.resex +++|* USES A - 1, 2, 5. 08290 M00S04238.resex +++|* B - 2, 3, 6. 08291 M00S04239.resex +++|* X - 0, 1, 2, 3, 5, 6, 7. 08292 M00S04240.resex +++| 08293 M00S04241.resex +++| 08294 M00S04242.resex +++| CTA SUBR ENTRY/EXIT 08295 M00S04243.resex +++| SA2 CTAA GET ASSIGNED COUNT MASK 08296 M00S04244.resex +++| BX0 X0-X0 08297 M00S04245.resex +++| LX3 X2 08298 M00S04246.resex +++| BX6 X6-X6 08299 M00S04247.resex +++| LX2 -6 DEMAND COUNT MASK 08300 M00S04248.resex +++| SB2 RMTP 08301 M00S04249.resex +++| SB6 RMTP+RMTL+RRPL 08302 M00S04250.resex +++| LT B5,CTA1 IF COUNT TOTAL ASSIGNS AND DEMANDS 08303 M00S04251.resex +++| SB6 RMTP+RMTL SET UP TO COUNT TAPE ASSIGNS AND DEMANDS 08304 M00S04252.resex +++| CTA1 SA1 X4+B2 ADD UP MULTIPLE RESOURCE DEMANDS PER ENTRY 08305 M00S04253.resex +++| BX7 X2*X1 08306 M00S04254.resex +++| IX6 X6+X7 08307 M00S04255.resex +++| BX1 X3*X1 ADD UP MULTIPLE RESOURCE ASSIGNS PER ENTRY 08308 M00S04256.resex +++| IX0 X0+X1 08309 M00S04257.resex +++| SB2 B2+B1 08310 M00S04258.resex +++| LT B2,B6,CTA1 IF MORE RESOURCES TO COUNT 08311 M00S04259.resex +++| SB2 RPEW 08312 M00S04260.resex +++| BX7 X7-X7 08313 M00S04261.resex +++| SB3 B0 08314 M00S04262.resex +++| LX0 -6 08315 M00S04263.resex +++| MX2 -12 08316 M00S04264.resex +++| CTA2 BX1 -X2*X6 COUNT RESOURCE DEMANDS AND ASSIGNS 08317 M00S04265.resex +++| BX3 -X2*X0 08318 M00S04266.resex +++| IX7 X7+X1 08319 M00S04267.resex +++| SB3 B3+X3 08320 M00S04268.resex +++| LX6 -12 08321 M00S04269.resex +++| SB2 B2-1 08322 M00S04270.resex +++| LX0 -12 08323 M00S04271.resex +++| NZ B2,CTA2 IF MORE ENTRIES IN MULTIPLE COUNT 08324 M00S04272.resex +++| GE B5,CTAX IF COUNT ONLY TAPE ASSIGNS AND DEMANDS 08325 M00S04273.resex +++| SA5 X4+RVAL CHECK TOTAL DEMAND COUNT CORRECT 08326 M00S04274.resex +++| SX1 B3 08327 M00S04275.resex +++| BX6 -X2*X5 08328 M00S04276.resex +++| SB2 /PER/TDE * TOTAL DEMAND COUNT ERROR.* 08329 M00S04277.resex +++| LX5 -12 08330 M00S04278.resex +++| IX6 X6-X7 08331 M00S04279.resex +++| NZ X6,PER IF TOTAL DEMAND COUNT INCORRECT 08332 M00S04280.resex +++| BX2 -X2*X5 CHECK TOTAL ASSIGNED COUNT CORRECT 08333 M00S04281.resex +++| IX2 X2-X1 08334 M00S04282.resex +++| SB2 /PER/TAE * TOTAL ASSIGNED COUNT ERROR.* 08335 M00S04283.resex +++| NZ X2,PER IF TOTAL ASSIGNED COUNT INCORRECT 08336 M00S04284.resex +++| EQ CTAX RETURN 08337 M00S04285.resex +++| 08338 M00S04286.resex +++| 08339 M00S04287.resex +++| CTAA CON 7700770077007700B MASK FOR ASSIGNED COUNTS
| Line S01178 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 08340 M01S01178.274l797 +++| CTE SPACE 4,15 08341 M01S01179.274l797 +++|** CTE - CHECK FOR TAPE EQUIPMENT. 08342 M01S01180.274l797 +++|* 08343 M01S01181.274l797 +++|* ENTRY (X7) = DEVICE CODE RIGHT JUSTIFIED. 08344 M01S01182.274l797 +++|* 08345 M01S01183.274l797 +++|* EXIT (X2) = 0 IF NOT TAPE DEVICE. 08346 M01S01184.274l797 +++|* (X2) = *TTDV* ENTRY IF TAPE DEVICE. 08347 M01S01185.274l797 +++|* (X7) = TAPE DEVICE TYPE IF TAPE DEVICE. 08348 M01S01186.274l797 +++|* 08349 M01S01187.274l797 +++|* USES X - 2, 7. 08350 M01S01188.274l797 +++|* A - 2. 08351 M01S01189.274l797 +++|* 08352 M01S01190.274l797 +++|* CALLS CDT. 08353 M01S01191.274l797 +++| 08354 M01S01192.274l797 +++| 08355 M01S01193.274l797 +++| CTE SUBR ENTRY/EXIT 08356 M01S01194.274l797 +++| SA2 TTDV SET TO SEARCH TAPE DEVICE TABLE 08357 M01S01195.274l797 +++| RJ CDT CHECK FOR TAPE DEVICE 08358 M01S01196.274l797 +++| ZR X2,CTEX IF NOT TAPE DEVICE 08359 M01S01197.274l797 +++| SX7 A2-TTDV SET DEVICE TYPE 08360 M01S01198.274l797 +++| EQ CTEX RETURN 08361 M00S04288.resex +++| CTL SPACE 4,20 08362 M00S04289.resex +++|** CTL - CHECK FOR TRACK LIMIT. 08363 M00S04290.resex +++|* 08364 M00S04291.resex +++|* ENTRY (X2) = FET ADDRESS. 08365 M00S04292.resex +++|* 08366 M00S04293.resex +++|* EXIT (X2) = FET ADDRESS. 08367 M00S04294.resex +++|* TO *URF1*, IF TRACK LIMIT (AFTER TIMED/EVENT ROLLOUT 08368 M00S04295.resex +++|* COMPLETED). 08369 M00S04296.resex +++|* TO *PIT*, IF TRACK LIMIT DETECTED AND INTERRUPT 08370 M00S04297.resex +++|* HAS OCCURRED. 08371 M00S04298.resex +++|* 08372 M00S04299.resex +++|* ERROR TO *PER*, IF CIO ERROR OTHER THAN TRACK LIMIT 08373 M00S04300.resex +++|* DETECTED. 08374 M00S04301.resex +++|* 08375 M00S04302.resex +++|* USES A - 0, 1, 3, 4, 6, 7. 08376 M00S04303.resex +++|* B - 2. 08377 M00S04304.resex +++|* X - ALL. 08378 M00S04305.resex +++|* 08379 M00S04306.resex +++|* CALLS PRO. 08380 M00S04307.resex +++|* 08381 M00S04308.resex +++|* MACROS INTRP, RETRF, STATUS. 08382 M00S04309.resex +++| 08383 M00S04310.resex +++| 08384 M00S04311.resex +++| CTL SUBR ENTRY/EXIT 08385 M00S04312.resex +++| SA1 X2 CHECK FOR TRACK LIMIT STATUS 08386 M00S04313.resex +++| MX0 -4 08387 M00S04314.resex +++| LX1 -10 08388 M00S04315.resex +++| BX3 -X0*X1 08389 M00S04316.resex +++| MX0 -8 CLEAR STATUS 08390 M00S04317.resex +++| BX6 X0*X1 08391 M00S04318.resex +++| LX6 10 08392 M00S04319.resex +++| SA6 A1 08393 M00S04320.resex +++| SA1 X2+FDTY CLEAR USER PROCESSING 08394 M00S04321.resex +++| MX0 1 08395 M00S04322.resex +++| LX0 45-59 08396 M00S04323.resex +++| BX6 -X0*X1 08397 M00S04324.resex +++| SA6 A1 08398 M00S04325.resex +++| ZR X3,CTLX IF NO ERROR STATUS 08399 M00S04326.resex +++| SX5 X3-1 08400 M00S04327.resex +++| NZ X5,CTL1 IF NOT TRACK LIMIT 08401 M00S04328.resex +++| STATUS X2,P SET EVENT 08402 M00S04329.resex +++| MX0 18 08403 M00S04330.resex +++| SA4 X2+6 08404 M00S04331.resex +++| LX0 -6 08405 M00S04332.resex +++| SA3 TLIM 08406 M00S04333.resex +++| BX4 X0*X4 08407 M00S04334.resex +++| LX4 36 08408 M00S04335.resex +++| BX7 X4+X3 08409 M00S04336.resex +++| SA7 RE 08410 M00S04337.resex +++| SA0 X2 08411 M00S04338.resex +++| RETRF X2 RETURN RESOURCE FILE, RELEASE INTERLOCK 08412 M00S04339.resex +++| SX5 RE SET ROLLOUT DESCRIPTOR 08413 M00S04340.resex +++| INTRP PIT PROCESS INTERRUPT 08414 M00S04341.resex +++| SA1 TLIM+1 GET ROLLOUT MESSAGE ADDRESS 08415 M00S04342.resex +++| RJ PRO PROCESS TIMED EVENT ROLLOUT 08416 M00S04343.resex +++| INTRP PIT PROCESS INTERRUPT 08417 M00S04344.resex +++| SX2 A0+ RESTORE FET ADDRESS 08418 M00S04345.resex +++| SA1 URFE RESET INITIAL RANDOM INDEX 08419 M00S04346.resex +++| BX6 X6-X6 08420 M00S04347.resex +++| LX7 X1 08421 M00S04348.resex +++| SA6 EF CLEAR EOR FLAG 08422 M00S04349.resex +++| SA7 URFA 08423 M00S04350.resex +++| JP URF1 RETRY RESOURCE FILE UPDATE 08424 M00S04351.resex +++| 08425 M00S04352.resex +++| CTL1 SB2 /PER/CIO *CIO ERROR.* 08426 M00S04353.resex +++| EQ PER PROCESS ERROR
| Line S00219 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 08427 M01S00219.252l678 +++| CUC SPACE 4,10 08428 M01S00220.252l678 +++|** CUC - CHANGE USER NAME IN CONTROL POINT AREA. 08429 M01S00221.252l678 +++|* 08430 M01S00222.252l678 +++|* ENTRY (X1) = USER NAME TO CHANGE TO. 08431 M01S00223.252l678 +++|* 08432 M01S00224.252l678 +++|* EXIT USER NAME SET INTO WORD *UIDW*. 08433 M01S00225.252l678 +++|* 08434 M01S00226.252l678 +++|* USES X - 0, 6. 08435 M01S00227.252l678 +++|* A - 6. 08436 M01S00228.252l678 +++|* 08437 M01S00229.252l678 +++|* MACROS SETPFP. 08438 M01S00230.252l678 +++| 08439 M01S00231.252l678 +++| 08440 M01S00232.252l678 +++| CUC SUBR ENTRY/EXIT 08441 M01S00233.252l678 +++| SX6 B1+B1 SET USER NAME FLAG 08442 M01S00234.252l678 +++| SA6 CUCA+0 08443 M01S00235.252l678 +++| MX0 42 SET USER NAME 08444 M01S00236.252l678 +++| BX6 X0*X1 08445 M01S00237.252l678 +++| SA6 CUCA+2 08446 M01S00238.252l678 +++| SETPFP CUCA CHANGE USER NAME 08447 M01S00239.252l678 +++| EQ CUCX RETURN 08448 M01S00240.252l678 +++| 08449 M01S00241.252l678 +++| CUCA BSSZ 3 *SETPFP* BLOCK 08450 M00S04354.resex +++| CUP SPACE 4,10 08451 M00S04355.resex +++|** CUP - CLEAN UP REQUEST. 08452 M00S04356.resex +++|* 08453 M00S04357.resex +++|* ERROR TO *PER*, IF SHARE TABLE ERROR. 08454 M00S04358.resex +++|* 08455 M00S04359.resex +++|* USES A - 1, 3, 7. 08456 M00S04360.resex +++|* B - 2, 5, 6, 7. 08457 M00S04361.resex +++|* X - 1, 3, 5, 7. 08458 M00S04362.resex +++|* 08459 M00S04363.resex +++|* CALLS BPD, IRC, UDF. 08460 M00S04364.resex +++| 08461 M00S04365.resex +++| 08462 M00S04366.resex +++| CUP SUBR ENTRY/EXIT 08463 M00S04367.resex +++| SA1 DFDI CHECK FOR DEFAULT DEMAND 08464 M00S04368.resex +++| ZR X1,CUP1 IF DEFAULT DEMAND NOT SET 08465 M00S04369.resex +++| SB5 B1+B1 DECREMENT TOTAL AND RESOURCE DEMAND COUNTS 08466 M00S04370.resex +++| RJ IRC 08467 M00S04371.resex +++| CUP1 SB5 -B1 DECREMENT TOTAL AND RESOURCE ASSIGN COUNTS 08468 M00S04372.resex +++| RJ IRC 08469 M00S04373.resex +++| SX5 B2-RRPP 08470 M00S04374.resex +++| NG X5,CUP3 IF NOT REMOVABLE PACK 08471 M00S04375.resex +++| SA1 RQ
| Line S04376 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08472 M01S04376.ns21000 ---| SB6 RDEL
| Line S00552 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08473 M01S00552.ns21000 +++| SB6 RRPS+RPSL 08474 M00S04377.resex +++| SB7 RRPS 08475 M00S04378.resex +++| CUP2 SB6 B6-1 08476 M00S04379.resex +++| LT B6,B7,CUP4 IF END OF SHARE TABLE 08477 M00S04380.resex +++| SA3 B6+RESB 08478 M00S04381.resex +++| BX5 X3-X1 08479 M00S04382.resex +++| AX5 18 08480 M00S04383.resex +++| NZ X5,CUP2 IF NO MATCH 08481 M00S04384.resex +++| BX7 X7-X7 CLEAR SHARE TABLE ENTRY 08482 M00S04385.resex +++| SA7 A3 08483 M00S04386.resex +++| CUP3 BX5 X5-X5 SET NO DEMAND FILE RETURN 08484 M00S04387.resex +++| RJ UDF UPDATE DEMAND FILE 08485 M00S04388.resex +++| RJ BPD BUILD PREVIEW DISPLAY 08486 M00S04389.resex +++| EQ CUPX RETURN 08487 M00S04390.resex +++| 08488 M00S04391.resex +++| CUP4 SB2 /PER/STE *SHARE TABLE ERROR.* 08489 M00S04392.resex +++| JP PER PROCESS ERROR
| Line S00673 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08490 M01S00673.282l826 +++| CVA SPACE 4,10 08491 M01S00674.282l826 +++|** CVA - CHECK VSN AVAILABILITY. 08492 M01S00675.282l826 +++|* 08493 M01S00676.282l826 +++|* EXIT (X6) = PREVIEW DISPLAY MESSAGE CODE IF OFFSITE TMS 08494 M01S00677.282l826 +++|* TAPE REQUESTED OR IF ACS MOUNT ERROR. 08495 M01S00678.282l826 +++|* 08496 M01S00679.282l826 +++|* USES X - 0, 1, 2, 3, 6, 7. 08497 M01S00680.282l826 +++|* A - 1, 2. 08498 M01S00681.282l826 +++|* 08499 M01S00682.282l826 +++|* MACROS RDSB. 08500 M01S00683.282l826 +++| 08501 M01S00684.282l826 +++| 08502 M01S00685.282l826 +++| CVA SUBR ENTRY/EXIT 08503 M01S00686.282l826 +++| 08504 M01S00687.282l826 +++|* CHECK OFFSITE TMS TAPE. 08505 M01S00688.282l826 +++| 08506 M01S00689.282l826 +++| CVA2 SA1 TMPF 08507 M01S00690.282l826 +++| SX6 VOS SET VSN OFFSITE 08508 M01S00691.282l826 +++| LX1 59-50 08509 M01S00692.282l826 +++| NG X1,CVAX IF OFFSITE TMS TAPE 08510 M01S00693.282l826 +++| 08511 M01S00694.282l826 +++|* CHECK ACS MOUNT ERROR. 08512 M01S00695.282l826 +++| 08513 M01S00696.282l826 +++| SX6 B0 SET NO MESSAGE 08514 M01S00697.282l826 +++| SA1 RESB+RQPV+PRES 08515 M01S00698.282l826 +++| MX7 -12 08516 M01S00699.282l826 +++| LX1 -12 08517 M01S00700.282l826 +++| BX1 -X7*X1 RESOURCE MNEMONIC 08518 M01S00701.282l826 +++| SX1 X1-2RAT 08519 M01S00702.282l826 +++| NZ X1,CVAX IF NOT ACS TAPE REQUEST 08520 M01S00703.282l826 +++| RDSB MTSI,/COMSMTX/VETL,/COMSMTX/VET,CVAA 08521 M01S00704.282l826 +++| SA1 EVSN 08522 M01S00705.282l826 +++| SA2 CVAA-1 08523 M01S00706.282l826 +++| MX0 36 08524 M01S00707.282l826 +++| SX6 B0+ SET NO MESSAGE 08525 M01S00708.282l826 +++| CVA1 SA2 A2+B1 08526 M01S00709.282l826 +++| ZR X2,CVAX IF END OF ENTRIES 08527 M01S00710.282l826 +++| BX3 X1-X2 08528 M01S00711.282l826 +++| BX3 X0*X3 08529 M01S00712.282l826 +++| NZ X3,CVA1 IF NOT SAME VSN 08530 M01S00713.282l826 +++| MX6 -6 08531 M01S00714.282l826 +++| BX6 -X6*X2 PREVIEW DISPLAY MESSAGE CODE 08532 M01S00715.282l826 +++| EQ CVAX RETURN 08533 M01S00716.282l826 +++| 08534 M01S00717.282l826 +++| 08535 M01S00718.282l826 +++| CVAA BSSZ /COMSMTX/VETL+1 MOUNT ERROR TABLE AND TERMINATOR 08536 M00S04393.resex +++| END SPACE 4,10 08537 M00S04394.resex +++|** END - ENDING SEQUENCES. 08538 M00S04395.resex +++| 08539 M00S04396.resex +++| 08540 M00S04397.resex +++| END1 SA1 CF
| Line S04398 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 08541 M01S04398.274l797 ---| ZR X1,END2 IF NOT EXTERNAL CALL
| Line S01199 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 08542 M01S01199.274l797 +++| ZR X1,END2 IF NOT *DMP=* CALL 08543 M00S04399.resex +++| SX7 /STATUS/OK RETURN OK STATUS 08544 M00S04400.resex +++| LX7 24 08545 M00S04401.resex +++| SA7 SPPR 08546 M00S04402.resex +++| 08547 M00S04403.resex +++| END2 SA1 CI 08548 M00S04404.resex +++| ZR X1,END6 IF NO CHECKPOINT INDEX 08549 M00S04405.resex +++| SETFS F,X1 SET CHECKPOINT FILE STATUS 08550 M00S04406.resex +++| EQ END6 RENABLE CHARGE AND END
| Line S04407 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 08551 M01S04407.274l797 ---| 08552 M01S04408.274l797 ---| END3 RJ BSF BUILD SCRATCH FILE 08553 M01S04409.274l797 ---| RJ OCA CHECK FOR OVERCOMMITMENT 08554 M01S04410.274l797 ---| NZ X5,END4 IF NO OVERCOMMITMENT 08555 M01S04411.274l797 ---| SB2 /PER/RDE * RESOURCE DEMAND ERROR.* 08556 M01S04412.274l797 ---| EQ PER PROCESS ERROR 08557 M00S04413.resex +++| 08558 M00S04414.resex +++| END4 SX5 B0 SET NO RETURN FLAG FOR DEMAND FILE 08559 M00S04415.resex +++| RJ UDF UPDATE DEMAND FILE 08560 M00S04416.resex +++| INTRC ON REENABLE INTERRUPT 08561 M00S04417.resex +++| INTRP PIT PROCESS INTERRUPT
| Line S04418 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08562 M01S04418.282l826 ---| 08563 M01S04419.282l826 ---| END5 RJ BPD BUILD PREVIEW DISPLAY
| Line S00719 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08564 M01S00719.282l826 +++| RJ BPD BUILD PREVIEW DISPLAY 08565 M00S04420.resex +++|
| Line S04421 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 08566 M01S04421.253l688 ---| END6 RENSR /COMSSRU/IARX REENABLE ACCUMULATION WITH IARX CHARGE
| Line S00487 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 08567 M01S00487.253l688 +++| END6 SA1 R-1 08568 M01S00488.253l688 +++| NZ X1,END7 IF STAGE REQUEST FILE NOT ATTACHED 08569 M01S00489.253l688 +++| SETFS R,0 LEAVE FILE ATTACHED
| Line S00720 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08570 M01S00720.282l826 +++|
| Line S00490 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 08571 M01S00490.253l688 +++| END7 RENSR /COMSSRU/IARX REENABLE ACCUMULATION WITH IARX CHARGE 08572 M00S04422.resex +++| 08573 M00S04423.resex +++| END ENDRUN 08574 M00S04424.resex +++| ERR SPACE 4,10
| Line S04425 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 08575 M01S04425.v23l617 ---|** ERR - CONTROL CARD ERROR PROCESSOR.
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 08576 M01S00047.v23l617 +++|** ERR - COMMAND ERROR PROCESSOR. 08577 M00S04426.resex +++| 08578 M00S04427.resex +++| 08579 M00S04428.resex +++| ERR SB2 /PER/ARG *ARGUMENT ERROR.* 08580 M00S04429.resex +++| EQ PER PROCESS ERROR 08581 M00S04430.resex +++| 08582 M00S04431.resex +++| 08583 M00S04432.resex +++|** ERROR EXIT FOR RSB CALLS. 08584 M00S04433.resex +++| 08585 M00S04434.resex +++| 08586 M00S04435.resex +++| ERR1 LX2 1 08587 M00S04436.resex +++| NG X2,ERR3 IF NO SUBSYSTEM 08588 M00S04437.resex +++|* EQ ERR2 IF SYSTEM ERROR 08589 M00S04438.resex +++| 08590 M00S04439.resex +++| 08591 M00S04440.resex +++|** SUB-SYSTEM COMMUNICATION ERRORS. 08592 M00S04441.resex +++| 08593 M00S04442.resex +++| 08594 M00S04443.resex +++| ERR2 SB2 /PER/SCE *SYSTEM ERROR.* 08595 M00S04444.resex +++| EQ PER PROCESS ERROR 08596 M00S04445.resex +++|
| Line S04446 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 08597 M01S04446.v23l617 ---| ERR3 SB2 /PER/MAG *MAGNET NOT ACTIVE.*
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 08598 M01S00048.v23l617 +++| ERR3 SB2 /PER/MAG *MAGNETIC TAPE SUBSYSTEM NOT ACTIVE.*
| Line S00491 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 08599 M01S00491.253l688 +++| EQ PER PROCESS ERROR 08600 M01S00492.253l688 +++| 08601 M01S00493.253l688 +++| 08602 M01S00494.253l688 +++|** STAGE PROCESSING ERRORS. 08603 M01S00495.253l688 +++| 08604 M01S00496.253l688 +++| 08605 M01S00497.253l688 +++| ERR4 SB2 /PER/SRF *STAGE REQUEST FILE ERROR.* 08606 M00S04447.resex +++| EQ PER PROCESS ERROR
| Line S00553 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08607 M01S00553.ns21000 +++| GEE SPACE 4,15 08608 M01S00554.ns21000 +++|** GEE - GET EST ENTRY. 08609 M01S00555.ns21000 +++|*
| Line S00556 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08610 M02S00556.ns22000 ---|* ENTRY (X4) = EQUIPMENT NUMBER.
| Line S00412 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 08611 M02S00412.274l797 ---|* ENTRY (X4) = FAMILY EST ORDINAL.
| Line S01200 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 08612 M01S01200.274l797 +++|* ENTRY (X4) = EST ORDINAL.
| Line S00557 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08613 M01S00557.ns21000 +++|* 08614 M01S00558.ns21000 +++|* EXIT (BUF) = EST ENTRY OF LENGTH *ESTE*. 08615 M01S00559.ns21000 +++|* (A1) = BUF. 08616 M01S00560.ns21000 +++|* (X1) = FIRST WORD OF EST ENTRY. 08617 M01S00561.ns21000 +++|* 08618 M01S00562.ns21000 +++|* UESE A - 1, 6.
| Line S00563 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08619 M02S00563.ns22000 ---|* X - 1, 2, 5, 6, 7.
| Line S00413 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08620 M01S00413.ns22000 +++|* X - 1, 5, 6, 7.
| Line S00564 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08621 M01S00564.ns21000 +++|* 08622 M01S00565.ns21000 +++|* MACROS RDSB. 08623 M01S00566.ns21000 +++| 08624 M01S00567.ns21000 +++| 08625 M01S00568.ns21000 +++| GEE SUBR ENTRY/EXIT 08626 M01S00569.ns21000 +++| SA1 /LWC/ESTP GET EST FWA
| Line S00570 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08627 M02S00570.ns22000 ---| MX2 -12 08628 M02S00571.ns22000 ---| LX1 12 08629 M02S00572.ns22000 ---| BX7 -X2*X1 08630 M02S00573.ns22000 ---| SX5 ESTE
| Line S00414 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08631 M01S00414.ns22000 +++| AX1 36 08632 M01S00415.ns22000 +++| R= X5,ESTE
| Line S00574 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08633 M01S00574.ns21000 +++| IX6 X4*X5
| Line S00575 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08634 M02S00575.ns22000 ---| IX7 X7+X6
| Line S00416 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 08635 M01S00416.ns22000 +++| IX7 X6+X1
| Line S00576 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 08636 M01S00576.ns21000 +++| MX6 1 08637 M01S00577.ns21000 +++| SA6 BUF 08638 M01S00578.ns21000 +++| RDSB 0,X5,X7,A6 GET EST ENTY 08639 M01S00579.ns21000 +++| SA1 BUF 08640 M01S00580.ns21000 +++| EQ GEEX RETURN
| Line S04448 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08641 M01S04448.282l826 ---| GFN SPACE 4,10 08642 M01S04449.282l826 ---|** GFN - GET FAMILY NAME. 08643 M01S04450.282l826 ---|* 08644 M01S04451.282l826 ---|* ENTRY (X4) = FAMILY EQUIPMENT. 08645 M01S04452.282l826 ---|* 08646 M01S04453.282l826 ---|* EXIT (X7) = FAMILY NAME.
| Line S00417 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08647 M02S00417.282l826 ---|* (X2) = 42/-0,18/0.
| Line S04454 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08648 M01S04454.282l826 ---|* 08649 M01S04455.282l826 ---|* USES A - 1, 6. 08650 M01S04456.282l826 ---|* X - 1, 2, 6, 7.
| Line S00581 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08651 M02S00581.282l826 ---|* 08652 M02S00582.282l826 ---|* CALLS GEE.
| Line S04457 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08653 M01S04457.282l826 ---|* 08654 M01S04458.282l826 ---|* MACROS RDSB. 08655 M01S04459.282l826 ---| 08656 M01S04460.282l826 ---| 08657 M01S04461.282l826 ---| GFN SUBR ENTRY/EXIT
| Line S04462 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08658 M02S04462.282l826 ---| SA1 X4+EST READ EST ENTRY
| Line S00583 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08659 M02S00583.282l826 ---| RJ GEE GET EST ENTRY
| Line S04463 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08660 M01S04463.282l826 ---| MX2 -12 08661 M01S04464.282l826 ---| BX7 -X2*X1 08662 M01S04465.282l826 ---| LX7 3 MST ADDRESS 08663 M01S04466.282l826 ---| MX6 1
| Line S04467 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08664 M02S04467.282l826 ---| SA1 BUF+PFGL READ FAMILY NAME
| Line S04468 Modification History | |
|---|---|
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08665 M01S04468.282l826 ---| SX7 X7+PFGL MST ADDRESS OF FAMILY NAME 08666 M01S04469.282l826 ---| SA6 BUF 08667 M01S04470.282l826 ---| RDSB 0,1,X7,A6 READ PFGL WORD OF MST 08668 M01S04471.282l826 ---| SA1 BUF FAMILY NAME 08669 M01S04472.282l826 ---| MX2 42 08670 M01S04473.282l826 ---| BX7 X2*X1 08671 M01S04474.282l826 ---| EQ GFNX RETURN
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | resex14 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 08672 M02S00004.282l826 ---| GFO SPACE 4,10 08673 M02S00005.282l826 ---|** GFO - GET FAMILY ORDINAL. 08674 M02S00006.282l826 ---|* 08675 M02S00007.282l826 ---|* EXIT (X7) = FAMILY ORDINAL. 08676 M02S00008.282l826 ---|* 08677 M02S00009.282l826 ---|* USES X - 1, 2, 3, 4, 6, 7. 08678 M02S00010.282l826 ---|* A - 1, 2, 6, 7. 08679 M02S00011.282l826 ---|* 08680 M02S00012.282l826 ---|* CALLS GFN. 08681 M02S00013.282l826 ---|* 08682 M02S00014.282l826 ---|* MACROS RDSB. 08683 M02S00015.282l826 ---| 08684 M02S00016.282l826 ---| 08685 M02S00017.282l826 ---| GFO SUBR ENTRY/EXIT 08686 M02S00018.282l826 ---| SA1 /CPA/PFCW GET FAMILY EST ORDINAL 08687 M02S00019.282l826 ---| MX2 -12 08688 M02S00020.282l826 ---| AX1 12 08689 M02S00021.282l826 ---| BX4 -X2*X1 08690 M02S00022.282l826 ---| RJ GFN GET FAMILY NAME 08691 M02S00023.282l826 ---| SX6 B1 08692 M02S00024.282l826 ---| SA7 GFOA+2 08693 M02S00025.282l826 ---| SA6 A7+B1 08694 M02S00026.282l826 ---| 08695 M02S00027.282l826 ---|* GET FAMILY ORDINAL POINTERS. 08696 M02S00028.282l826 ---| 08697 M02S00029.282l826 ---| MX7 1 SET THE *LOW CORE READ* FLAG 08698 M02S00030.282l826 ---| SA7 GFOA 08699 M02S00031.282l826 ---| RDSB 0,1,FOTP,GFOA 08700 M02S00032.282l826 ---| SA1 GFOA 08701 M02S00033.282l826 ---| MX7 12 08702 M02S00034.282l826 ---| MX6 -24 08703 M02S00035.282l826 ---| LX1 24 08704 M02S00036.282l826 ---| BX6 -X6*X1 FOT POINTER 08705 M02S00037.282l826 ---| BX7 X7*X1 FOT SIZE 08706 M02S00038.282l826 ---| SA6 A1 08707 M02S00039.282l826 ---| LX7 12 08708 M02S00040.282l826 ---| SA7 GFOA+4 08709 M02S00041.282l826 ---| 08710 M02S00042.282l826 ---|* SCAN FOT FOR FAMILY NAME. 08711 M02S00043.282l826 ---| 08712 M02S00044.282l826 ---| GFO1 SA1 GFOA READ NEXT FOT ENTRY 08713 M02S00045.282l826 ---| SA2 GFOA+3 08714 M02S00046.282l826 ---| MX6 1 08715 M02S00047.282l826 ---| IX2 X1+X2 08716 M02S00048.282l826 ---| SA6 A1+B1 08717 M02S00049.282l826 ---| RDSB 0,1,X2,A6 08718 M02S00050.282l826 ---| SA1 GFOA+1 CHECK FOR FAMILY NAME MATCH 08719 M02S00051.282l826 ---| SA2 A1+B1 08720 M02S00052.282l826 ---| MX3 42 08721 M02S00053.282l826 ---| BX1 X1-X2 08722 M02S00054.282l826 ---| BX1 X3*X1 08723 M02S00055.282l826 ---| ZR X1,GFO2 IF MATCH 08724 M02S00056.282l826 ---| SA1 A2+B1 INCREMENT ORDINAL 08725 M02S00057.282l826 ---| SA2 A1+B1 GET FOT SIZE 08726 M02S00058.282l826 ---| SX6 X1+B1 08727 M02S00059.282l826 ---| SA6 A1 08728 M02S00060.282l826 ---| IX2 X6-X2 08729 M02S00061.282l826 ---| NG X2,GFO1 IF NOT END OF FOT 08730 M02S00062.282l826 ---| EQ ERR PROCESS ARGUMENT ERROR 08731 M02S00063.282l826 ---| 08732 M02S00064.282l826 ---| GFO2 SA1 A2+B1 GET FAMILY ORDINAL 08733 M02S00065.282l826 ---| SX7 X1 08734 M02S00066.282l826 ---| EQ GFOX RETURN 08735 M02S00067.282l826 ---| 08736 M02S00068.282l826 ---| GFOA VFD 1/1,59/0 FOT FWA 08737 M02S00069.282l826 ---| VFD 1/1,59/0 FOT ENTRY 08738 M02S00070.282l826 ---| CON 0 FAMILY NAME 08739 M02S00071.282l826 ---| DATA 1 FOT ORDINAL 08740 M02S00072.282l826 ---| DATA 0 FOT SIZE 08741 M00S04475.resex +++| GRI SPACE 4,15
Proceed to Part 8
cdc/nos2.source/opl.opl871/deck/resex.007.txt · Last modified: (external edit)