Seq # *Modification Id* Act
----------------------------+
39467 M03S24019.ns2782 ---| LX2 -6
39468 M03S24020.ns2782 ---| ZR X6,INR2 IF SECOND ACCESS NOT PRESENT
39469 M03S24021.ns2782 ---| LX6 59-5
39470 M03S24022.ns2782 ---| LX5 -CCTLS/2+59-5
39471 M03S24023.ns2782 ---| NG X6,INR2 IF SECOND ACCESS DOWN
39472 M03S24024.ns2782 ---| LX6 CCTLS/2+5-59
39473 M03S24025.ns2782 ---| BX1 -X7*X3 ACTIVE REQUESTS - FIRST CHANNEL
39474 M03S24026.ns2782 ---| TA4 X6+CREQ,CCT
39475 M03S24027.ns2782 ---| NG X5,INR1 IF FIRST ACCESS DOWN
| Line S00801 Modification History |
M01 (Added by) | 252l678 |
M02 (Removed by) | 261l700 |
M03 (Removed by) | ns2782 |
Seq # *Modification Id* Act
----------------------------+
39476 M03S00801.ns2782 ---| LX5 1
39477 M03S00802.ns2782 ---| ERRNZ ESTE-2 CODE DEPENDS ON VALUE
| Line S00139 Modification History |
M01 (Added by) | 261l700 |
M02 (Removed by) | ns2782 |
Seq # *Modification Id* Act
----------------------------+
39478 M02S00139.ns2782 ---| BX3 -X7*X2 EST ORDINAL
| Line S00803 Modification History |
M01 (Added by) | 252l678 |
M02 (Removed by) | ns2782 |
Seq # *Modification Id* Act
----------------------------+
39479 M02S00803.ns2782 ---| LX2 -12
| Line S00052 Modification History |
M01 (Added by) | ns2782 |
Seq # *Modification Id* Act
----------------------------+
39480 M01S00052.ns2782 +++| BX3 -X7*X3 EST ORDINAL
39481 M01S00053.ns2782 +++| LX2 12
| Line S00140 Modification History |
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
39482 M01S00140.261l700 +++| CX5 X3,EST CONVERT EST ORDINAL TO OFFSET
| Line S00804 Modification History |
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
39483 M01S00804.252l678 +++| MX3 -6
39484 M01S00805.252l678 +++| BX3 -X3*X2
39485 M01S00806.252l678 +++| MX1 12
39486 M01S00807.252l678 +++| SB7 X3 UNIT NUMBER
39487 M01S00808.252l678 +++| LX1 3
39488 M01S00809.252l678 +++| MX4 3 FORM CHANNEL MASK
39489 M01S00810.252l678 +++| LX2 -6
39490 M01S00811.252l678 +++| BX1 X1-X4
39491 M01S00812.252l678 +++| TA5 X5+EQDE,EST READ EST ENTRY
39492 M01S00813.252l678 +++| LX5 24+3
| Line S00814 Modification History |
M01 (Added by) | 252l678 |
M02 (Removed by) | cpum182 |
Seq # *Modification Id* Act
----------------------------+
39493 M02S00814.cpum182 ---| BX6 -X1*X5 EXTRACT ALTERNATE CHANNEL
| Line S00001 Modification History |
M01 (Added by) | cpum182 |
Seq # *Modification Id* Act
----------------------------+
39494 M01S00001.cpum182 +++| BX6 X1*X5 EXTRACT ALTERNATE CHANNEL
| Line S00815 Modification History |
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
39495 M01S00815.252l678 +++| SB5 X6-4
39496 M01S00816.252l678 +++| AX6 48+3-CCTLS/2 CHANNEL CONTROL TABLE INDEX
39497 M01S00817.252l678 +++| LX5 -12
| Line S00818 Modification History |
M01 (Added by) | 252l678 |
M02 (Removed by) | cpum182 |
Seq # *Modification Id* Act
----------------------------+
39498 M02S00818.cpum182 ---| BX5 -X1*X5 EXTRACT PRIMARY CHANNEL
| Line S00002 Modification History |
M01 (Added by) | cpum182 |
Seq # *Modification Id* Act
----------------------------+
39499 M01S00002.cpum182 +++| BX5 X1*X5 EXTRACT PRIMARY CHANNEL
| Line S00819 Modification History |
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
39500 M01S00819.252l678 +++| SX1 X5-4
39501 M01S00820.252l678 +++| AX5 48+3-CCTLS/2 CHANNEL CONTROL TABLE INDEX
39502 M01S00821.252l678 +++| TA3 X5+CREQ,CCT
39503 M01S00822.252l678 +++| NZ B5,INR2 IF ALTERNATE ACCESS UNAVAILABLE
39504 M01S00823.252l678 +++| TA4 X5+CREQ,CCT
39505 M01S00824.252l678 +++| SB5 X1 SAVE PRIMARY CHANNEL STATUS
39506 M01S00825.252l678 +++| BX1 -X7*X3
39507 M01S00826.252l678 +++| NZ B5,INR1 IF PRIMARY ACCESS UNAVAILABLE
39508 M00S24028.cpumtr +++| BX7 -X7*X4 ACTIVE REQUESTS - SECOND CHANNEL
39509 M00S24029.cpumtr +++| IX7 X1-X7
39510 M00S24030.cpumtr +++| NG X7,INR2 IF FIRST CHANNEL HAS FEWEST REQUESTS
39511 M00S24031.cpumtr +++| INR1 SA3 A4+ USE SECOND CHANNEL
39512 M00S24032.cpumtr +++| INR2 NG X3,INR3 IF CHANNEL BUSY
39513 M00S24033.cpumtr +++| TX4 A3-CREQ,-CCT COMPUTE CHANNEL NUMBER
39514 M00S24034.cpumtr +++| MX6 -3
39515 M00S24035.cpumtr +++| AX4 CCTLS/2
39516 M00S24036.cpumtr +++| BX6 -X6*X2 READ RECOVERY INDEX
39517 M00S24037.cpumtr +++| MX1 1
39518 M00S24038.cpumtr +++| IX6 X0+X6 OFFSET FOR READ RECOVERY
39519 M00S24039.cpumtr +++| SB5 X4 CHANNEL NUMBER
39520 M00S24040.cpumtr +++| TA5 X0+IOLK,CBT GET READ/WRITE FLAG
39521 M00S24041.cpumtr +++| TA4 X6+PAD1,CBT READ PHYSICAL ADDRESS
39522 M00S24042.cpumtr +++| LX1 54-59
39523 M00S24043.cpumtr +++| LX5 54-57
39524 M00S24044.cpumtr +++| SX6 B7 UNIT NUMBER
39525 M00S24045.cpumtr +++| BX5 X5*X1 READ/WRITE FLAG
39526 M00S24046.cpumtr +++| MX7 12
39527 M00S24047.cpumtr +++| LX6 48
39528 M00S24048.cpumtr +++| LX7 -12
39529 M00S24049.cpumtr +++| BX5 X5+X6 FCN, UNIT
39530 M00S24050.cpumtr +++| BX6 X7*X4 CYLINDER
39531 M00S24051.cpumtr +++| LX7 -36
39532 M00S24052.cpumtr +++| LX4 -24
39533 M00S24053.cpumtr +++| BX6 X6+X5 FCN, UNIT, CYL
39534 M00S24054.cpumtr +++| BX4 X7*X4 TRACK, SECTOR
39535 M00S24055.cpumtr +++| SX5 B5 CHANNEL NUMBER
39536 M00S24056.cpumtr +++| BX6 X6+X4 FCN, UNIT, CYL, TRACK, SECTOR
39537 M00S24057.cpumtr +++| LX5 7
39538 M00S24058.cpumtr +++| SA6 /MONITOR/MCU+X5 STORE REQUEST
39539 M00S24059.cpumtr +++|
39540 M00S24060.cpumtr +++|* INITIATE REQUEST.
39541 M00S24061.cpumtr +++|
39542 M00S24062.cpumtr +++| MX1 48
39543 M00S24063.cpumtr +++| SX7 B7 UNIT NUMBER
39544 M00S24064.cpumtr +++| TX6 A2-UNCT,-PUT SET *PUT* ENTRY PENDING
39545 M00S24065.cpumtr +++| LX1 12
39546 M00S24066.cpumtr +++| LX6 12-PUTLS
39547 M00S24067.cpumtr +++| BX3 X1*X3 CLEAR PENDING REQUEST
39548 M00S24068.cpumtr +++| SA7 A6+B1
39549 M00S24069.cpumtr +++| BX6 X6+X3 INSERT NEW PENDING REQUEST
39550 M00S24070.cpumtr +++| RI B5 RESET I/O BUFFER POINTERS
39551 M00S24071.cpumtr +++| MX3 1
39552 M00S24072.cpumtr +++| RO B5 SET RECORD FLAG TO *FLPP*
39553 M00S24073.cpumtr +++| BX6 X6+X3 SET CHANNEL BUSY
39554 M00S24074.cpumtr +++| SB5 B5+B1
39555 M00S24075.cpumtr +++| SA6 A3
39556 M00S24076.cpumtr +++| RI B5 RESET BUFFER POINTERS (PARTNER CHANNEL)
39557 M00S24077.cpumtr +++| JP B3 RETURN
39558 M00S24078.cpumtr +++|
39559 M00S24079.cpumtr +++| INR3 TX7 A2-UNCT,-PUT SET RETRY REQUEST
39560 M00S24080.cpumtr +++| MX1 48
39561 M00S24081.cpumtr +++| LX7 24-PUTLS
39562 M00S24082.cpumtr +++| LX1 24
39563 M00S24083.cpumtr +++| LX2 -6
39564 M00S24084.cpumtr +++| MX4 -59
39565 M00S24085.cpumtr +++| BX3 X1*X3 CLEAR RETRY REQUEST
39566 M00S24086.cpumtr +++| BX6 -X4*X2 CLEAR UNIT BUSY
39567 M00S24087.cpumtr +++| BX7 X7+X3 INSERT NEW RETRY REQUEST
39568 M00S24088.cpumtr +++| SA6 A2
39569 M00S24089.cpumtr +++| SA7 A3
39570 M00S24090.cpumtr +++| JP B3 RETURN
39571 M00S24091.cpumtr +++| IOA SPACE 4,20
39572 M00S24092.cpumtr +++|** IOA - I/O ACCEPT.
39573 M00S24093.cpumtr +++|*
39574 M00S24094.cpumtr +++|* MASTER INPUT.
39575 M00S24095.cpumtr +++|*
39576 M00S24096.cpumtr +++|* ENTRY (A0) = CM BUFFER ADDRESS.
39577 M00S24097.cpumtr +++|* (B4) = CHANNEL NUMBER.
39578 M00S24098.cpumtr +++|* ((A0)+1) = UNIT NUMBER.
39579 M00S24099.cpumtr +++|*
39580 M00S24100.cpumtr +++|* EXIT (X0) = CONTROL BUFFER ORDINAL.
39581 M00S24101.cpumtr +++|* TO *INR*.
39582 M00S24102.cpumtr +++|*
39583 M00S24103.cpumtr +++|* USES X - 1, 2, 3, 4, 5, 6, 7.
39584 M00S24104.cpumtr +++|* A - 2, 4, 5, 6, 7.
39585 M00S24105.cpumtr +++|* B - 3, 5, 6, 7.
39586 M00S24106.cpumtr +++|*
39587 M00S24107.cpumtr +++|* CALLS INR, SAA.
39588 M00S24108.cpumtr +++|
39589 M00S24109.cpumtr +++|
39590 M00S24110.cpumtr +++| IOAX MJ EXIT
39591 M00S24111.cpumtr +++|
39592 M00S24112.cpumtr +++| IOA TB7 READ REAL TIME CLOCK
39593 M00S24113.cpumtr +++| SX1 B4
39594 M00S24114.cpumtr +++| SX7 B7
39595 M00S24115.cpumtr +++| LX1 CCTLS/2
39596 M00S24116.cpumtr +++| SA4 A0+B1 GET UNIT NUMBER
39597 M00S24117.cpumtr +++| MX6 48
39598 M00S24118.cpumtr +++| SA7 RTCI SAVE REAL-TIME CLOCK
39599 M00S24119.cpumtr +++| TA3 X1+CREQ,CCT READ CHANNEL REQUEST CONTROL
39600 M00S24120.cpumtr +++| SB7 X4 UNIT NUMBER
39601 M00S24121.cpumtr +++| SA5 A3+B1
39602 M00S24122.cpumtr +++| ERRNZ CCNT-CREQ-1 INDEXES MUST BE CONSECUTIVE
39603 M00S24123.cpumtr +++| MX7 -59
39604 M00S24124.cpumtr +++| PL X3,IOAX IF CHANNEL NOT BUSY
39605 M00S24125.cpumtr +++| LX6 12
39606 M00S24126.cpumtr +++| BX3 -X7*X3 CLEAR CHANNEL BUSY
39607 M00S24127.cpumtr +++| SX2 B1
39608 M00S24128.cpumtr +++| BX3 X6*X3 CLEAR PENDING REQUEST
39609 M00S24129.cpumtr +++| RI B4 RESET I/O BUFFER POINTERS
39610 M00S24130.cpumtr +++| SB6 B7-60
39611 M00S24131.cpumtr +++| IX5 X5+X2 INCREMENT TOTAL REQUEST COUNT
39612 M00S24132.cpumtr +++| IX6 X3+X2 INCREMENT ACTIVE REQUEST COUNT
39613 M00S24133.cpumtr +++| AX7 B6
39614 M00S24134.cpumtr +++| RI B2 RESET I/O BUFFER POINTERS
39615 M00S24135.cpumtr +++| BX7 X7+X5 SET UNIT REQUEST FLAG
39616 M00S24136.cpumtr +++| SA6 A3
39617 M00S24137.cpumtr +++| SA7 A5+
39618 M00S24138.cpumtr +++| SB6 7
39619 M00S24139.cpumtr +++|
39620 M00S24140.cpumtr +++|* *IOA* IS ENTERED HERE BY *RIO* TO INITIATE REQUESTS ON
39621 M00S24141.cpumtr +++|* ALL CHANNELS IN USE WHEN FLUSHING WRITE BUFFERS DURING
39622 M00S24142.cpumtr +++|* RECOVERY. EXIT IS ACCOMPLISHED BY CODE MODIFICATION.
39623 M00S24143.cpumtr +++|
39624 M00S24144.cpumtr +++| IOA1 MX2 -3
39625 M00S24145.cpumtr +++| SX6 B7+1 INCREMENT UNIT NUMBER
39626 M00S24146.cpumtr +++| BX4 -X2*X6
39627 M00S24147.cpumtr +++| SB7 X4
39628 M00S24148.cpumtr +++| LX3 X7,B7 UNIT REQUEST FLAG
39629 M00S24149.cpumtr +++| PL X3,IOA4 IF NO REQUEST ISSUED
39630 M00S24150.cpumtr +++| IOA2 SB6 B6-1
39631 M00S24151.cpumtr +++| NZ B6,IOA1 IF NOT END OF UNITS
39632 M00S24152.cpumtr +++| IOA3 SB3 IOAX *SAA* RETURN ADDRESS
39633 M00S24153.cpumtr +++|* EQ RIO2 (BUFFER RECOVERY IN PROGRESS)
39634 M00S24154.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
39635 M00S24155.cpumtr +++|
39636 M00S24156.cpumtr +++| IOA4 SB5 B7-4
39637 M00S24157.cpumtr +++| SX3 A5+CUN1-CCNT
39638 M00S24158.cpumtr +++| NG B5,IOA5 IF UNITS 0 - 3
39639 M00S24159.cpumtr +++| SX3 X3+CUN2-CUN1
39640 M00S24160.cpumtr +++| IOA5 SA2 X3 GET *PUT* ORDINAL
39641 M00S24161.cpumtr +++| SX6 B7 COMPUTE BYTE OFFSET
39642 M00S24162.cpumtr +++| ZR X2,IOA2 IF NO UNITS DEFINED
39643 M00S24163.cpumtr +++| MX4 -2
39644 M00S24164.cpumtr +++| SX5 12
39645 M00S24165.cpumtr +++| BX4 -X4*X6
39646 M00S24166.cpumtr +++| IX6 X4*X5
39647 M00S24167.cpumtr +++| SB5 X6
39648 M00S24168.cpumtr +++| MX4 -12
39649 M00S24169.cpumtr +++| AX2 B5
39650 M00S24170.cpumtr +++| BX6 -X4*X2 *PUT* ORDINAL
39651 M00S24171.cpumtr +++| ZR X6,IOA2 IF NO UNIT DEFINED
39652 M00S24172.cpumtr +++| LX6 PUTLS
39653 M00S24173.cpumtr +++| TA2 X6+UNCT,PUT READ *PUT* ENTRY
39654 M00S24174.cpumtr +++| NG X2,IOA2 IF UNIT BUSY
39655 M00S24175.cpumtr +++| MX4 1
39656 M00S24176.cpumtr +++| MX5 -12
39657 M00S24177.cpumtr +++| BX6 X4+X2 SET UNIT BUSY
39658 M00S24178.cpumtr +++| LX2 -12
39659 M00S24179.cpumtr +++| BX0 -X5*X2
39660 M00S24180.cpumtr +++| ZR X0,IOA2 IF EMPTY QUEUE
39661 M00S24181.cpumtr +++| SA6 A2
39662 M00S24182.cpumtr +++| SB3 IOA3 *INR* RETURN ADDRESS
39663 M00S24183.cpumtr +++| EQ INR INITIATE REQUEST
39664 M00S24184.cpumtr +++| IOL SPACE 4,25
39665 M00S24185.cpumtr +++|** IOL - I/O LINKUP.
39666 M00S24186.cpumtr +++|*
39667 M00S24187.cpumtr +++|* XP SLAVE INPUT.
39668 M00S24188.cpumtr +++|*
39669 M00S24189.cpumtr +++|* ENTRY (A1) = PARTNER XP ADDRESS.
39670 M00S24190.cpumtr +++|* (A0) = CM BUFFER ADDRESS.
39671 M00S24191.cpumtr +++|* (B2) = CHANNEL NUMBER (PARTNER).
39672 M00S24192.cpumtr +++|* (B4) = CHANNEL NUMBER.
39673 M00S24193.cpumtr +++|* ((A0)) = *FLPP* REPLY.
39674 M00S24194.cpumtr +++|*
39675 M00S24195.cpumtr +++|* EXIT (A2) = *PUT* ENTRY ADDRESS.
39676 M00S24196.cpumtr +++|* (A3) = CONTROL BUFFER ADDRESS.
39677 M00S24197.cpumtr +++|* (X0) = LCM BUFFER ADDRESS.
39678 M00S24198.cpumtr +++|* (X2) = *PUT* ENTRY.
39679 M00S24199.cpumtr +++|* TO *RDD* (READ) OR *WRT* (WRITE).
39680 M00S24200.cpumtr +++|*
39681 M00S24201.cpumtr +++|* USES X - ALL.
39682 M00S24202.cpumtr +++|* A - 2, 3, 5, 6, 7.
39683 M00S24203.cpumtr +++|* B - 3, 5, 7.
39684 M00S24204.cpumtr +++|*
39685 M00S24205.cpumtr +++|* CALLS DCS, RDD, SAA, WRT.
39686 M00S24206.cpumtr +++|
39687 M00S24207.cpumtr +++|
39688 M00S24208.cpumtr +++| IOLX MJ EXIT
39689 M00S24209.cpumtr +++|
39690 M00S24210.cpumtr +++| IOL TB7 READ REAL-TIME CLOCK
39691 M00S24211.cpumtr +++| SX2 B2 CHANNEL NUMBER
39692 M00S24212.cpumtr +++| SX7 B7
39693 M00S24213.cpumtr +++| LX2 CCTLS/2
39694 M00S24214.cpumtr +++| SA7 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
39695 M00S24215.cpumtr +++| TA3 X2+CREQ,CCT READ CHANNEL CONTROL TABLE
39696 M00S24216.cpumtr +++| MX6 -12
39697 M00S24217.cpumtr +++| BX7 -X6*X3 ACTIVE REQUESTS
39698 M00S24218.cpumtr +++| ZR X7,IOLX IF NO ACTIVE REQUESTS
39699 M00S24219.cpumtr +++| MX4 1
39700 M00S24220.cpumtr +++| LX6 12
39701 M00S24221.cpumtr +++| BX7 X3+X4 SET CHANNEL BUSY
39702 M00S24222.cpumtr +++| BX3 -X6*X3 PENDING REQUEST
39703 M00S24223.cpumtr +++| ZR X3,IOL1 IF NO PENDING REQUEST ISSUED
39704 M00S24224.cpumtr +++| MX6 36
39705 M00S24225.cpumtr +++| AX3 12-PUTLS
39706 M00S24226.cpumtr +++| LX6 12
39707 M00S24227.cpumtr +++| TA2 X3+UNCT,PUT READ *PUT* ENTRY
39708 M00S24228.cpumtr +++| BX7 X6*X7 CLEAR RETRY REQUEST
39709 M00S24229.cpumtr +++| LX3 24-PUTLS
39710 M00S24230.cpumtr +++| BX7 X3+X7 INSERT NEW RETRY REQUEST
39711 M00S24231.cpumtr +++| BX6 -X4*X2 CLEAR UNIT BUSY
39712 M00S24232.cpumtr +++| SA6 A2
39713 M00S24233.cpumtr +++| IOL1 SB3 IOL2 *SAA* RETURN ADDRESS
39714 M00S24234.cpumtr +++| SA2 B0 SET I/O LINKUP SEQUENCE
39715 M00S24235.cpumtr +++| RO B4 SIGNAL *FLPP*
39716 M00S24236.cpumtr +++| SA7 A3
39717 M00S24237.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
39718 M00S24238.cpumtr +++|
39719 M00S24239.cpumtr +++| IOL2 MJ EXIT
39720 M00S24240.cpumtr +++|
39721 M00S24241.cpumtr +++|* SECOND I/O LINKUP INTERRUPT, OR STATUS REPLY.
39722 M00S24242.cpumtr +++|*
39723 M00S24243.cpumtr +++|* (A2) = 0 IF I/O LINKUP SEQUENCE.
39724 M00S24244.cpumtr +++|* (A2) = *PUT* ENTRY ADDRESS, IF STATUS REPLY.
39725 M00S24245.cpumtr +++|
39726 M00S24246.cpumtr +++| IOL3 TB3 READ REAL-TIME CLOCK
39727 M00S24247.cpumtr +++| SX6 A2+
39728 M00S24248.cpumtr +++| SX7 B3
39729 M00S24249.cpumtr +++| SA7 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
39730 M00S24250.cpumtr +++| NZ X6,DCS IF STATUS REPLY
39731 M00S24251.cpumtr +++| SA2 A0+ GET *FLPP* REPLY
39732 M00S24252.cpumtr +++| SX5 A3+B1
39733 M00S24253.cpumtr +++| ERRNZ CCNT-CREQ-1 INDEXES MUST BE CONSECUTIVE
39734 M00S24254.cpumtr +++| MX3 12
39735 M00S24255.cpumtr +++| RI B4
39736 M00S24256.cpumtr +++| BX0 X3*X2
39737 M00S24257.cpumtr +++| RI B2 RESET I/O BUFFER POINTERS
39738 M00S24258.cpumtr +++| LX2 18
39739 M00S24259.cpumtr +++| SX3 4
39740 M00S24260.cpumtr +++| SB5 X2 FUNCTION
39741 M00S24261.cpumtr +++| LX2 6
39742 M00S24262.cpumtr +++| BX3 X3*X2
39743 M00S24263.cpumtr +++| ZR X3,IOL4 IF UNITS 0-3
39744 M00S24264.cpumtr +++| SX5 X5+B1
39745 M00S24265.cpumtr +++| ERRNZ CUN2-CUN1-1 INDEXES MUST BE CONSECUTIVE
39746 M00S24266.cpumtr +++| IOL4 SA5 X5+B1 READ UNIT LIST
39747 M00S24267.cpumtr +++| ERRNZ CUN1-CCNT-1 INDEXES MUST BE CONSECUTIVE
39748 M00S24268.cpumtr +++| MX3 -2 COMPUTE UNIT OFFSET
39749 M00S24269.cpumtr +++| SX4 12
39750 M00S24270.cpumtr +++| BX3 -X3*X2
39751 M00S24271.cpumtr +++| IX3 X3*X4
39752 M00S24272.cpumtr +++| SB7 X3
39753 M00S24273.cpumtr +++| AX5 B7 POSITION *PUT* ORDINAL
39754 M00S24274.cpumtr +++| MX4 -12
39755 M00S24275.cpumtr +++| BX3 -X4*X5
39756 M00S24276.cpumtr +++| LX3 PUTLS
39757 M00S24277.cpumtr +++| MX1 -24
39758 M00S24278.cpumtr +++| TA2 X3+UNCT,PUT READ *PUT* ENTRY
39759 M00S24279.cpumtr +++| LX2 -12
39760 M00S24280.cpumtr +++| BX4 -X4*X2 CURRENT
39761 M00S24281.cpumtr +++| LX2 12
39762 M00S24282.cpumtr +++| LX4 CBTLS
39763 M00S24283.cpumtr +++| TA5 X4+IOLK,CBT
39764 M00S24284.cpumtr +++| TA3 X4+PAD1,CBT SET CONTROL BUFFER ADDRESS
39765 M00S24285.cpumtr +++| PL X5,IOL6 IF I/O INTERLOCK CLEAR
39766 M00S24286.cpumtr +++| SX3 B1
39767 M00S24287.cpumtr +++| LX5 -57
39768 M00S24288.cpumtr +++| BX3 X5*X3
39769 M00S24289.cpumtr +++| SX4 B5 FUNCTION
39770 M00S24290.cpumtr +++| IX4 X4-X3
39771 M00S24291.cpumtr +++| NZ X4,IOL6 IF FUNCTIONS DO NOT MATCH
39772 M00S24292.cpumtr +++| MX3 1
39773 M00S24293.cpumtr +++| BX7 X7-X7
39774 M00S24294.cpumtr +++| BX6 X3+X5 SET I/O LINKUP
39775 M00S24295.cpumtr +++| SA7 A0 SET *GO* TO *FLPP*
39776 M00S24296.cpumtr +++| LX6 57
39777 M00S24297.cpumtr +++| SA6 A5
39778 M00S24298.cpumtr +++| NZ X0,DCS IF ABORT DURING I/O LINKUP
39779 M00S24299.cpumtr +++| RO B2 SIGNAL MASTER *FLPP*
39780 M00S24300.cpumtr +++| IOL5 OB7 B2
39781 M00S24301.cpumtr +++| ZR B7,IOL5 IF MASTER HAS NOT ACCEPTED
39782 M00S24302.cpumtr +++| BX0 -X1*X6 I/O BUFFER ADDRESS
39783 M00S24303.cpumtr +++| NZ B5,WRT IF WRITE
39784 M00S24304.cpumtr +++| EQ RDD READ
39785 M00S24305.cpumtr +++|
39786 M00S24306.cpumtr +++| IOL6 NZ X0,DCS IF ABORT DURING I/O LINKUP
39787 M00S24307.cpumtr +++| EQ * HANG
39788 M00S24308.cpumtr +++| RAB SPACE 4,20
39789 M00S24309.cpumtr +++|** RAB - READ ABORT PROCESSOR.
39790 M00S24310.cpumtr +++|*
39791 M00S24311.cpumtr +++|* XP SLAVE INPUT.
39792 M00S24312.cpumtr +++|*
39793 M00S24313.cpumtr +++|* ENTRY (A0) = CM BUFFER ADDRESS.
39794 M00S24314.cpumtr +++|* (A1) = PARTNER XP ADDRESS.
39795 M00S24315.cpumtr +++|* (A2) = *PUT* ENTRY ADDRESS.
39796 M00S24316.cpumtr +++|* (A3) = CONTROL BUFFER ADDRESS.
39797 M00S24317.cpumtr +++|* (B4) = CHANNEL NUMBER.
39798 M00S24318.cpumtr +++|* (B5) = READ RECOVERY INDEX.
39799 M00S24319.cpumtr +++|* (X0) = LCM BUFFER ADDRESS.
39800 M00S24320.cpumtr +++|*
39801 M00S24321.cpumtr +++|* EXIT TO *DCS*.
39802 M00S24322.cpumtr +++|*
39803 M00S24323.cpumtr +++|* USES X - 1, 2, 3, 4, 5, 6, 7.
39804 M00S24324.cpumtr +++|* A - 2, 3, 4, 5, 6, 7.
39805 M00S24325.cpumtr +++|* B - 6, 7.
39806 M00S24326.cpumtr +++|
39807 M00S24327.cpumtr +++|
39808 M00S24328.cpumtr +++| RAB SA5 A1 RESET MASTER XP
39809 M00S24329.cpumtr +++| SA4 A0 GET STATUS
39810 M00S24330.cpumtr +++| SX3 IOA NEW (P)
39811 M00S24331.cpumtr +++| MX6 -36
39812 M00S24332.cpumtr +++| LX3 36
39813 M00S24333.cpumtr +++| BX6 -X6*X5 CLEAR OLD (P)
39814 M00S24334.cpumtr +++| LX4 59-58
39815 M00S24335.cpumtr +++| BX6 X6+X3 INSERT NEW (P)
39816 M00S24336.cpumtr +++| MX7 1
39817 M00S24337.cpumtr +++| SA6 A5
39818 M00S24338.cpumtr +++| MX1 -3
39819 M00S24339.cpumtr +++| PL X4,DCS IF NOT A READ ERROR
39820 M00S24340.cpumtr +++| SA5 A1+5 READ MASTER XP
| Line S24341 Modification History |
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39821 M01S24341.251l664 ---| SA3 A3 READ CONTROL BUFFER
39822 M01S24342.251l664 ---| ERRNZ PAD1 INDEX MUST BE ZERO
39823 M00S24343.cpumtr +++| BX5 -X1*X5 (B5) = READ RECOVERY INDEX
39824 M00S24344.cpumtr +++| SA2 A2 READ *PUT* ENTRY
39825 M00S24345.cpumtr +++| ERRNZ UNCT INDEX MUST BE ZERO
| Line S24346 Modification History |
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39826 M01S24346.251l664 ---| BX6 X7+X3 SET READ ERROR
| Line S01899 Modification History |
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39827 M01S01899.251l664 +++| LX1 -6
39828 M00S24347.cpumtr +++| SB7 X5
| Line S01900 Modification History |
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39829 M01S01900.251l664 +++| BX2 X1*X2
39830 M00S24348.cpumtr +++| GT B7,B5,RAB1 IF MASTER NEXT
39831 M00S24349.cpumtr +++| SX5 B5
| Line S24350 Modification History |
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39832 M01S24350.251l664 ---| RAB1 SA6 A3
39833 M01S24351.251l664 ---| LX1 -6
39834 M01S24352.251l664 ---| SB6 X5-1
| Line S01901 Modification History |
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39835 M01S01901.251l664 +++| RAB1 SB6 X5-1
| Line S00001 Modification History |
M01 (Added by) | cpumt91 |
Seq # *Modification Id* Act
----------------------------+
39836 M01S00001.cpumt91 +++| SB7 X5-PSLB
| Line S24353 Modification History |
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39837 M01S24353.251l664 ---| BX2 X1*X2 CLEAR READ RECOVERY INDEX
39838 M00S24354.cpumtr +++| LX5 54
39839 M00S24355.cpumtr +++| SA4 A3+B6 ADDRESS OF SECTOR IN ERROR
39840 M00S24356.cpumtr +++| MX1 2
| Line S24357 Modification History |
M01 (Removed by) | cpumt91 |
Seq # *Modification Id* Act
----------------------------+
39841 M01S24357.cpumt91 ---| SB7 X5-PSLB
39842 M00S24358.cpumtr +++| LX1 23-59
| Line S24359 Modification History |
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39843 M01S24359.251l664 ---| BX6 X1*X4 VALID DATA FLAGS
| Line S01902 Modification History |
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39844 M01S01902.251l664 +++| BX6 X1*X4 CLEAR VALID DATA FLAGS
39845 M00S24360.cpumtr +++| BX6 -X6
39846 M00S24361.cpumtr +++| BX6 X1*X6
| Line S24362 Modification History |
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39847 M01S24362.251l664 ---| LX6 21-23
39848 M01S24363.251l664 ---| BX6 X6+X4 SET UNRECOVERED DATA FLAGS
| Line S01903 Modification History |
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
39849 M01S01903.251l664 +++| BX6 X6+X4
39850 M00S24364.cpumtr +++| SA6 A4
39851 M00S24365.cpumtr +++| NG B7,RAB2 IF NOT LAST SECTOR
39852 M00S24366.cpumtr +++| BX5 X5-X5 CLEAR NEW READ RECOVERY INDEX
39853 M00S24367.cpumtr +++| RAB2 BX7 X5+X2 SET NEW READ RECOVERY INDEX
39854 M00S24368.cpumtr +++| SA7 A2
39855 M00S24369.cpumtr +++| SX7 B4+ CLEAR POSSIBLE CONTINUATION REQUEST
39856 M00S24370.cpumtr +++| AX7 CCTLS/2
39857 M00S24371.cpumtr +++| MX6 1
39858 M00S24372.cpumtr +++| SA6 NRQT-1+X7
39859 M00S24373.cpumtr +++| EQ DCS DECODE STATUS
39860 M00S24374.cpumtr +++| RDD SPACE 4,15
39861 M00S24375.cpumtr +++|** RDD - READ DISK.
39862 M00S24376.cpumtr +++|*
39863 M00S24377.cpumtr +++|* ENTRY (A0) = CM BUFFER ADDRESS.
39864 M00S24378.cpumtr +++|* (A1) = PARTNER XP ADDRESS.
39865 M00S24379.cpumtr +++|* (A2) = *PUT* ENTRY ADDRESS.
39866 M00S24380.cpumtr +++|* (A3) = CONTROL BUFFER ADDRESS.
39867 M00S24381.cpumtr +++|* (X0) = LCM BUFFER ADDRESS.
39868 M00S24382.cpumtr +++|* (X2) = *PUT* ENTRY.
39869 M00S24383.cpumtr +++|*
39870 M00S24384.cpumtr +++|* USES X - ALL.
39871 M00S24385.cpumtr +++|* A - ALL.
39872 M00S24386.cpumtr +++|* B - 3, 5, 6, 7.
39873 M00S24387.cpumtr +++|*
39874 M00S24388.cpumtr +++|* CALLS /BUFIO/DLB, FNR, RAB, SAA, /BUFIO/SBR, SCB.
39875 M00S24389.cpumtr +++|
39876 M00S24390.cpumtr +++|
39877 M00S24391.cpumtr +++| RDD SA1 A1 SET UP PARTNER XP
39878 M00S24392.cpumtr +++| SA4 A1+2
39879 M00S24393.cpumtr +++| MX6 -3
39880 M00S24394.cpumtr +++| LX2 6
39881 M00S24395.cpumtr +++| SX7 RDD3 ENTRY ADDRESS FOR MASTER XP
39882 M00S24396.cpumtr +++| SA5 A4+B1
39883 M00S24397.cpumtr +++| BX2 -X6*X2 RECOVERY INDEX
39884 M00S24398.cpumtr +++| MX3 42
39885 M00S24399.cpumtr +++| LX7 36
39886 M00S24400.cpumtr +++| LX3 18
39887 M00S24401.cpumtr +++| SB5 X2 RECOVERY INDEX
39888 M00S24402.cpumtr +++| BX4 X3*X4 CLEAR (A2)
39889 M00S24403.cpumtr +++| BX5 X3*X5 CLEAR (A3)
39890 M00S24404.cpumtr +++| SX6 A2
39891 M00S24405.cpumtr +++| SX3 A3
39892 M00S24406.cpumtr +++| LX6 18
39893 M00S24407.cpumtr +++| LX3 18
39894 M00S24408.cpumtr +++| BX6 X4+X6 INSERT NEW (A2)
39895 M00S24409.cpumtr +++| SA6 A4
39896 M00S24410.cpumtr +++| SA4 A1+5
39897 M00S24411.cpumtr +++| BX6 X5+X3 INSERT NEW (A3)
39898 M00S24412.cpumtr +++| SB7 B5-PSLB+1
39899 M00S24413.cpumtr +++| SA6 A5
39900 M00S24414.cpumtr +++| MX3 42
39901 M00S24415.cpumtr +++| MX5 -36
39902 M00S24416.cpumtr +++| SX6 X2+B1 RECOVERY INDEX FOR PARTNER
39903 M00S24417.cpumtr +++| BX4 X3*X4 CLEAR (B5)
39904 M00S24418.cpumtr +++| BX1 -X5*X1 CLEAR (P)
39905 M00S24419.cpumtr +++| BX6 X6+X4 INSERT NEW (B5)
39906 M00S24420.cpumtr +++| BX7 X7+X1 INSERT NEW (P)
39907 M00S24421.cpumtr +++| SA6 A4+
39908 M00S24422.cpumtr +++| LX2 9
39909 M00S24423.cpumtr +++| SA7 A1+
39910 M00S24424.cpumtr +++| IX0 X0+X2 OFFSET LCM ADDRESS BY RECOVERY INDEX
39911 M00S24425.cpumtr +++| NZ B7,RDD1 IF NOT LAST SECTOR
39912 M00S24426.cpumtr +++| MX7 1
39913 M00S24427.cpumtr +++| SA7 A0
39914 M00S24428.cpumtr +++| RDD1 SX4 1000B
39915 M00S24429.cpumtr +++| SB3 RDD2 *SAA* RETURN ADDRESS
39916 M00S24430.cpumtr +++| IX6 X0+X4
39917 M00S24431.cpumtr +++| RO B2 SIGNAL MASTER
39918 M00S24432.cpumtr +++| SA6 A1+10B SET NEW (X0)
39919 M00S24433.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
39920 M00S24434.cpumtr +++|
39921 M00S24435.cpumtr +++| RDD2 MJ EXIT
39922 M00S24436.cpumtr +++|
39923 M00S24437.cpumtr +++|* FIRST INTERRUPT.
39924 M00S24438.cpumtr +++|
39925 M00S24439.cpumtr +++| RDD3 TB7 READ REAL-TIME CLOCK
39926 M00S24440.cpumtr +++| IB3 B4 CHECK FOR FULL BUFFER
39927 M00S24441.cpumtr +++| SA4 A0 READ HEADER
39928 M00S24442.cpumtr +++| MX5 2
39929 M00S24443.cpumtr +++| SB6 200B
39930 M00S24444.cpumtr +++| SX7 B7
39931 M00S24445.cpumtr +++| LX5 -12
39932 M00S24446.cpumtr +++| SB3 B3-B6
39933 M00S24447.cpumtr +++| BX6 X5*X4 UNIT NUMBER
39934 M00S24448.cpumtr +++| SA7 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
39935 M00S24449.cpumtr +++| NG B3,RAB IF READ ABORT
39936 M00S24450.cpumtr +++| SA0 A0+B1
39937 M00S24451.cpumtr +++| BX4 -X5*X4 CLEAR UNIT
39938 M00S24452.cpumtr +++| WE 177B
39939 M00S24453.cpumtr +++|+ LX6 2
39940 M00S24454.cpumtr +++| SX2 177B
39941 M00S24455.cpumtr +++| BX6 X6+X4 INSERT UNIT NUMBER
39942 M00S24456.cpumtr +++| IX0 X0+X2 INCREMENT LCM ADDRESS
39943 M00S24457.cpumtr +++| SA0 A0+177B INCREMENT CM ADDRESS
39944 M00S24458.cpumtr +++| SA6 A3+B5 SET HEADER IN CONTROL BUFFER
39945 M00S24459.cpumtr +++| SB3 RDD4 *SAA* RETURN ADDRESS
39946 M00S24460.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
39947 M00S24461.cpumtr +++|
39948 M00S24462.cpumtr +++| RDD4 MJ EXIT
39949 M00S24463.cpumtr +++|
39950 M00S24464.cpumtr +++|* SECOND INTERRUPT.
39951 M00S24465.cpumtr +++|
39952 M00S24466.cpumtr +++| TB7 READ REAL-TIME CLOCK
39953 M00S24467.cpumtr +++| SX2 200B
39954 M00S24468.cpumtr +++| SX7 B7
39955 M00S24469.cpumtr +++| WE 200B
39956 M00S24470.cpumtr +++|+ SA7 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
39957 M00S24471.cpumtr +++| SA0 A0-B6 RESET CM ADDRESS
39958 M00S24472.cpumtr +++| IX0 X0+X2 INCREMENT LCM ADDRESS
39959 M00S24473.cpumtr +++| SB3 RDD5 *SAA* RETURN ADDRESS
39960 M00S24474.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
39961 M00S24475.cpumtr +++|
39962 M00S24476.cpumtr +++| RDD5 MJ EXIT
39963 M00S24477.cpumtr +++|
39964 M00S24478.cpumtr +++|* THIRD INTERRUPT.
39965 M00S24479.cpumtr +++|
39966 M00S24480.cpumtr +++| TB7 READ REAL-TIME CLOCK
39967 M00S24481.cpumtr +++| BX7 X7-X7 *GO* FOR NEXT SECTOR
39968 M00S24482.cpumtr +++| SB3 PSLB-2 CHECK FOR NEXT TO LAST SECTOR
39969 M00S24483.cpumtr +++| WE 200B
39970 M00S24484.cpumtr +++|+ SX6 B7
39971 M00S24485.cpumtr +++| IX0 X0+X2 INCREMENT LCM ADDRESS
39972 M00S24486.cpumtr +++| SA6 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
39973 M00S24487.cpumtr +++| SA0 A0+B6 INCREMENT CM ADDRESS
39974 M00S24488.cpumtr +++| NE B3,B5,RDD6 IF NOT NEXT TO LAST SECTOR
39975 M00S24489.cpumtr +++| SB7 B0 SET READ PROCESSING FOR *FNR*
39976 M00S24490.cpumtr +++| SB3 RDD6 *FNR* RETURN ADDRESS
39977 M00S24491.cpumtr +++| EQ FNR FIND NEXT REQUEST
39978 M00S24492.cpumtr +++|
39979 M00S24493.cpumtr +++| RDD6 SB3 RDD7 *SAA* RETURN ADDRESS
39980 M00S24494.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
39981 M00S24495.cpumtr +++|
39982 M00S24496.cpumtr +++| RDD7 MJ EXIT
39983 M00S24497.cpumtr +++|
39984 M00S24498.cpumtr +++|* FOURTH INTERRUPT.
39985 M00S24499.cpumtr +++|
39986 M00S24500.cpumtr +++| TB7 READ REAL-TIME CLOCK
39987 M00S24501.cpumtr +++| SX2 B6
39988 M00S24502.cpumtr +++|- WL 200B
39989 M00S24503.cpumtr +++| SX6 B7
39990 M00S24504.cpumtr +++| SA0 A0-B6 RESET CM ADDRESS
39991 M00S24505.cpumtr +++| SA6 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
39992 M00S24506.cpumtr +++| RDD8 IB3 B4
39993 M00S24507.cpumtr +++| SA5 A0
39994 M00S24508.cpumtr +++| NE B3,B1,RDD8 IF LAST WORD NOT PRESENT
39995 M00S24509.cpumtr +++| IX0 X0+X2 INCREMENT LCM ADDRESS
39996 M00S24510.cpumtr +++| SB5 B5+2 INCREMENT SECTOR COUNT
39997 M00S24511.cpumtr +++| SX2 B1
39998 M00S24512.cpumtr +++| WX5 X0 WRITE LAST WORD TO BUFFER
39999 M00S24513.cpumtr +++| SX4 1000B
40000 M00S24514.cpumtr +++| IX0 X0+X2
40001 M00S24515.cpumtr +++| SA7 A0+ SEND CONTROL WORD TO *FLPP*
40002 M00S24516.cpumtr +++| SB3 PSLB+1
40003 M00S24517.cpumtr +++| RI B4 RESET I/O BUFFER POINTERS
40004 M00S24518.cpumtr +++| IX0 X0+X4 INCREMENT LCM BUFFER ADDRESS
40005 M00S24519.cpumtr +++| RO B4
40006 M00S24520.cpumtr +++| MX7 -57
40007 M00S24521.cpumtr +++| EQ B3,B5,RDD9 IF LAST SECTOR
40008 M00S24522.cpumtr +++| SB3 RDD2 *SAA* RETURN ADDRESS
40009 M00S24523.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40010 M00S24524.cpumtr +++|
40011 M00S24525.cpumtr +++| RDD9 SA2 A2 READ *PUT* ENTRY
40012 M00S24526.cpumtr +++| ERRNZ UNCT INDEX MUST BE ZERO
40013 M00S24527.cpumtr +++| LX7 -3
40014 M00S24528.cpumtr +++| SB3 RDD10 *DLB* RETURN ADDRESS
40015 M00S24529.cpumtr +++| BX2 -X7*X2 CLEAR RECOVERY INDEX
| Line S24530 Modification History |
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
40016 M01S24530.252l678 ---| SB5 B0 *DLB* CONTROL
40017 M00S24531.cpumtr +++| EQ /BUFIO/DLB DELETE BUFFER
40018 M00S24532.cpumtr +++|
40019 M00S24533.cpumtr +++| RDD10 SB3 RDD11 *SRC* RETURN ADDRESS
40020 M00S24534.cpumtr +++| SB7 B0+ SET INPUT XP
40021 M00S24535.cpumtr +++| EQ /BUFIO/SBR SET BUFFER RECALL
40022 M00S24536.cpumtr +++|
40023 M00S24537.cpumtr +++| RDD11 SX2 B4 GET NEXT REQUEST
40024 M00S24538.cpumtr +++| SA5 A1+5 CLEAR PARTNER SECTOR COUNT
40025 M00S24539.cpumtr +++| AX2 CCTLS/2
40026 M00S24540.cpumtr +++| MX0 42
40027 M00S24541.cpumtr +++| SA4 NRQT-1+X2
40028 M00S24542.cpumtr +++| BX6 X0*X5 CLEAR (B5)
40029 M00S24543.cpumtr +++| MX1 -24
40030 M00S24544.cpumtr +++| SA6 A5
40031 M00S24545.cpumtr +++| SA3 X4 READ NEXT CONTROL BUFFER
40032 M00S24546.cpumtr +++| SX7 X4 CONTROL BUFFER ADDRESS
40033 M00S24547.cpumtr +++| BX2 X4
40034 M00S24548.cpumtr +++| SA5 A1+3
40035 M00S24549.cpumtr +++| LX0 18
40036 M00S24550.cpumtr +++| SA4 X4+IOLK
40037 M00S24551.cpumtr +++| LX7 18
40038 M00S24552.cpumtr +++| BX5 X0*X5 CLEAR (A3)
40039 M00S24553.cpumtr +++| BX6 -X1*X4 LCM BUFFER ADDRESS
40040 M00S24554.cpumtr +++| BX7 X5+X7 INSERT NEW (A3)
40041 M00S24555.cpumtr +++| SA4 A2+RDST UPDATE READ STATISTICS
40042 M00S24556.cpumtr +++| SX5 PSLB PHYSICAL SECTOR COUNT
40043 M00S24557.cpumtr +++| SA6 A1+10B SET NEW (X0)
40044 M00S24558.cpumtr +++| SA7 A5+
40045 M00S24559.cpumtr +++| SX0 1000B
40046 M00S24560.cpumtr +++| SB7 59-35
40047 M00S24561.cpumtr +++| SB5 B1
40048 M00S24562.cpumtr +++| IX7 X4+X5 INCREMENT ACCUMLATOR
40049 M00S24563.cpumtr +++| IX0 X0+X6 LCM BUFFER ADDRESS
40050 M00S24564.cpumtr +++| LX1 X7,B7
40051 M00S24565.cpumtr +++| SB3 RDD13 *RXB* *SCB* RETURN ADDRESS
40052 M00S24566.cpumtr +++| NG X1,RDD12 IF ACCUMULATOR OVERFLOW
40053 M00S24567.cpumtr +++| SA7 A4+ UPDATE ACCUMULATOR
40054 M00S24568.cpumtr +++| RDD12 NG X2,RXP IF NOT CONTINUING ON NEXT REQUEST
40055 M00S24569.cpumtr +++| EQ SCB SET CURRENT BUFFER
40056 M00S24570.cpumtr +++|
40057 M00S24571.cpumtr +++| RDD13 SB3 RDD2 *SAA* RETURN ADDRESS
40058 M00S24572.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40059 M00S24573.cpumtr +++| RPP SPACE 4,10
40060 M00S24574.cpumtr +++|** RPP - REQUEST PSEUDO-PP.
40061 M00S24575.cpumtr +++|*
40062 M00S24576.cpumtr +++|* ENTRY (A4) = FWA OF CONTROL BUFFER + *LSLK*.
40063 M00S24577.cpumtr +++|* (B3) = RETURN ADDRESS.
40064 M00S24578.cpumtr +++|* (B4) = CHANNEL NUMBER.
40065 M00S24579.cpumtr +++|* (B7) = 0 IF INPUT XP, 20B IF OUTPUT XP.
40066 M00S24580.cpumtr +++|*
40067 M00S24581.cpumtr +++|* USES X - 3, 4, 5, 6, 7.
40068 M00S24582.cpumtr +++|* A - 5, 6, 7.
40069 M00S24583.cpumtr +++|
40070 M00S24584.cpumtr +++|
40071 M00S24585.cpumtr +++| RPP SX4 B4 COMPUTE XP ADDRESS
40072 M00S24586.cpumtr +++| LX4 5
40073 M00S24587.cpumtr +++| SX4 X4+B7
40074 M00S24588.cpumtr +++| SX3 B1
40075 M00S24589.cpumtr +++| SA5 /MONITOR/MCU+X4+3 READ PSD
40076 M00S24590.cpumtr +++| LX3 39
40077 M00S24591.cpumtr +++| BX6 X3+X5 SET STEP MODE FLAG
40078 M00S24592.cpumtr +++| SA6 A5+
40079 M00S24593.cpumtr +++| TX7 A4-LSLK,-CBT COMPUTE CONTROL BUFFER ORDINAL
40080 M00S24594.cpumtr +++| SA5 BMRI GET REQUEST QUEUE INDEX
40081 M00S24595.cpumtr +++| AX7 3
40082 M00S24596.cpumtr +++| SX6 X5+B1 INCREMENT INDEX
40083 M00S24597.cpumtr +++| SA7 TBMR+X5 SET REQUEST IN QUEUE
40084 M00S24598.cpumtr +++| SA6 A5+
40085 M00S24599.cpumtr +++| JP B3 RETURN
40086 M00S24600.cpumtr +++| RXP SPACE 4,10
40087 M00S24601.cpumtr +++|** RXP - RESET EXCHANGE PACKAGES.
40088 M00S24602.cpumtr +++|*
40089 M00S24603.cpumtr +++|* ENTRY (A1) = PARTNER XP ADDRESS.
40090 M00S24604.cpumtr +++|* (B3) = RETURN ADDRESS.
40091 M00S24605.cpumtr +++|* (B4) = CHANNEL NUMBER.
40092 M00S24606.cpumtr +++|*
40093 M00S24607.cpumtr +++|* USES X - 2, 3, 4, 6, 7.
40094 M00S24608.cpumtr +++|* A - 4, 7.
40095 M00S24609.cpumtr +++|* B - 3.
40096 M00S24610.cpumtr +++|*
40097 M00S24611.cpumtr +++|* CALLS SAA.
40098 M00S24612.cpumtr +++|
40099 M00S24613.cpumtr +++|
40100 M00S24614.cpumtr +++| RXP SX2 B4 CHANNEL NUMBER
40101 M00S24615.cpumtr +++| SX3 B1
40102 M00S24616.cpumtr +++| SX7 IOA
40103 M00S24617.cpumtr +++| BX3 X3*X2
40104 M00S24618.cpumtr +++| MX6 -36
40105 M00S24619.cpumtr +++| SB3 IOL2 *SAA* RETURN ADDRESS
40106 M00S24620.cpumtr +++| SA4 A1+
40107 M00S24621.cpumtr +++| NZ X3,RXP1 IF IN SLAVE
40108 M00S24622.cpumtr +++| SX7 IOL3
40109 M00S24623.cpumtr +++| SB3 IOAX *SAA* RETURN ADDRESS
40110 M00S24624.cpumtr +++| RXP1 LX7 36
40111 M00S24625.cpumtr +++| BX6 -X6*X4
40112 M00S24626.cpumtr +++| BX7 X7+X6 INSERT NEW (P)
40113 M00S24627.cpumtr +++| SA7 A4
40114 M00S24628.cpumtr +++| ERRNZ SAA-* SUBROUTINES MUST BE CONSECUTIVE
40115 M00S24629.cpumtr +++|* EQ SAA
40116 M00S24630.cpumtr +++| SAA SPACE 4,10
40117 M00S24631.cpumtr +++|** SAA - SET ACCOUNTING ADJUSTMENT.
40118 M00S24632.cpumtr +++|*
40119 M00S24633.cpumtr +++|* ENTRY (B3) = RETURN ADDRESS.
40120 M00S24634.cpumtr +++|* (RTCI) = REAL-TIME CLOCK AT INTERRUPT.
40121 M00S24635.cpumtr +++|*
40122 M00S24636.cpumtr +++|* USES X - 3, 4, 5, 6.
40123 M00S24637.cpumtr +++|* A - 4, 5, 6.
40124 M00S24638.cpumtr +++|* B - 7.
40125 M00S24639.cpumtr +++|
40126 M00S24640.cpumtr +++|
40127 M00S24641.cpumtr +++| SAA SA4 RTCI REAL-TIME CLOCK AT INTERRUPT
| Line S24642 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40128 M01S24642.271l750 ---| SA5 /MONITOR/ST START TIME OF ACTIVE JOB
| Line S01586 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40129 M01S01586.271l750 +++| SA5 CL+CPBT PROGRAM MODE BASE TIME OF ACTIVE JOB
40130 M00S24643.cpumtr +++| TB7 READ REAL-TIME CLOCK
40131 M00S24644.cpumtr +++| MX6 -18
40132 M00S24645.cpumtr +++| SX3 B7
40133 M00S24646.cpumtr +++| BX4 -X6*X4
40134 M00S24647.cpumtr +++| BX6 -X6*X3
40135 M00S24648.cpumtr +++| IX6 X6-X4 COMPUTE ACCOUNTING ADJUSTMENT
40136 M00S24649.cpumtr +++| SX6 X6+80D ADJUST FOR NON-TIMED CODE
40137 M00S24650.cpumtr +++| IX6 X5+X6 ADJUST START TIME
40138 M00S24651.cpumtr +++| SA6 A5
40139 M00S24652.cpumtr +++| JP B3 RETURN
40140 M00S24653.cpumtr +++| SCB SPACE 4,10
40141 M00S24654.cpumtr +++|** SCB - SET CURRENT BUFFER.
40142 M00S24655.cpumtr +++|*
40143 M00S24656.cpumtr +++|* ENTRY (A2) = *PUT* ENTRY ADDRESS.
40144 M00S24657.cpumtr +++|* (A3) = CONTROL BUFFER ADDRESS.
40145 M00S24658.cpumtr +++|* (B3) = RETURN ADDRESS.
40146 M00S24659.cpumtr +++|*
40147 M00S24660.cpumtr +++|* USES X - 2, 5, 6.
40148 M00S24661.cpumtr +++|* A - 2, 6.
40149 M00S24662.cpumtr +++|
40150 M00S24663.cpumtr +++|
40151 M00S24664.cpumtr +++| SCB SA2 A2 *PUT* ENTRY
40152 M00S24665.cpumtr +++| MX6 48
40153 M00S24666.cpumtr +++| TX5 A3,-CBT COMPUTE CONTROL BUFFER ORDINAL
40154 M00S24667.cpumtr +++| LX6 12
40155 M00S24668.cpumtr +++| LX5 12-CBTLS
40156 M00S24669.cpumtr +++| BX6 X6*X2 CLEAR CURRENT
40157 M00S24670.cpumtr +++| BX6 X5+X6 INSERT NEW CURRENT
40158 M00S24671.cpumtr +++| SA6 A2
40159 M00S24672.cpumtr +++| JP B3 RETURN
40160 M00S24673.cpumtr +++| WRT SPACE 4,15
40161 M00S24674.cpumtr +++|** WRT - WRITE DISK.
40162 M00S24675.cpumtr +++|*
40163 M00S24676.cpumtr +++|* ENTRY (A0) = CM BUFFER ADDRESS.
40164 M00S24677.cpumtr +++|* (A1) = PARTNER XP ADDRESS.
40165 M00S24678.cpumtr +++|* (A2) = *PUT* ENTRY ADDRESS.
40166 M00S24679.cpumtr +++|* (A3) = CONTROL BUFFER ADDRESS.
40167 M00S24680.cpumtr +++|* (X0) = LCM BUFFER ADDRESS.
40168 M00S24681.cpumtr +++|* (X2) = *PUT* ENTRY.
40169 M00S24682.cpumtr +++|*
40170 M00S24683.cpumtr +++|* USES X - ALL.
40171 M00S24684.cpumtr +++|* A - 0, 2, 3, 4, 5, 6, 7.
40172 M00S24685.cpumtr +++|* B - 3, 5, 6, 7.
40173 M00S24686.cpumtr +++|*
40174 M00S24687.cpumtr +++|* CALLS /BUFIO/DLB, FNR, SAA, SCB, /BUFIO/SBR.
40175 M00S24688.cpumtr +++|
40176 M00S24689.cpumtr +++|
40177 M00S24690.cpumtr +++| WRT SA4 A1+20B+2 SET UP PARTNER XP
40178 M00S24691.cpumtr +++| MX6 42
40179 M00S24692.cpumtr +++| SA3 A3 READ CONTROL BUFFER
| Line S01904 Modification History |
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
40180 M01S01904.251l664 +++| ERRNZ PAD1 CODE DEPENDS ON VALUE
40181 M00S24693.cpumtr +++| MX1 2
40182 M00S24694.cpumtr +++| LX6 18
40183 M00S24695.cpumtr +++| SA5 A4+B1
40184 M00S24696.cpumtr +++| LX1 49-59
40185 M00S24697.cpumtr +++| MX7 -48
40186 M00S24698.cpumtr +++| BX4 X6*X4 CLEAR (A2)
40187 M00S24699.cpumtr +++| BX1 X1*X3 UNIT NUMBER
40188 M00S24700.cpumtr +++| BX7 -X7*X3 CLEAR FLAGS
40189 M00S24701.cpumtr +++| LX1 -2
40190 M00S24702.cpumtr +++| BX5 X6*X5 CLEAR (A3)
40191 M00S24703.cpumtr +++| BX7 X1+X7 INSERT UNIT NUMBER
40192 M00S24704.cpumtr +++| SX6 A2
40193 M00S24705.cpumtr +++| SA7 A0 SET HEADER WORD IN SECTOR
40194 M00S24706.cpumtr +++| LX6 18
40195 M00S24707.cpumtr +++| SA0 A0+B1
40196 M00S24708.cpumtr +++| SX7 A3
40197 M00S24709.cpumtr +++| BX6 X6+X4 INSERT NEW (A2)
40198 M00S24710.cpumtr +++| LX7 18
40199 M00S24711.cpumtr +++| SA6 A4
40200 M00S24712.cpumtr +++| BX7 X7+X5 INSERT NEW (A3)
40201 M00S24713.cpumtr +++| SX3 377B
40202 M00S24714.cpumtr +++|- RL 377B FILL CM BUFFER
40203 M00S24715.cpumtr +++| SA7 A5
40204 M00S24716.cpumtr +++| IX6 X0+X3
40205 M00S24717.cpumtr +++| SA4 A1+20B+5
40206 M00S24718.cpumtr +++| SA6 A1+20B+10B SET (X0)
40207 M00S24719.cpumtr +++| MX5 42
40208 M00S24720.cpumtr +++| SA0 A0-B1 RESET CM BUFFER ADDRESS
40209 M00S24721.cpumtr +++| BX7 X5*X4 CLEAR (B5) = READ RECOVERY INDEX
40210 M00S24722.cpumtr +++| SB3 IOL2 *SAA* RETURN ADDRESS
40211 M00S24723.cpumtr +++| SA7 A4
40212 M00S24724.cpumtr +++| RO B2 SIGNAL MASTER FLPP
40213 M00S24725.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40214 M00S24726.cpumtr +++|
40215 M00S24727.cpumtr +++| WRTX MJ EXIT
40216 M00S24728.cpumtr +++|
40217 M00S24729.cpumtr +++|* FIRST INTERRUPT.
40218 M00S24730.cpumtr +++|
40219 M00S24731.cpumtr +++| WRT1 TB7 READ REAL-TIME CLOCK
40220 M00S24732.cpumtr +++| SB3 WRT2 *SAA* RETURN ADDRESS
40221 M00S24733.cpumtr +++| SX7 B7
40222 M00S24734.cpumtr +++| SB6 200B ADDRESS INCREMENT
40223 M00S24735.cpumtr +++| SA7 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
40224 M00S24736.cpumtr +++| SX2 B6+
40225 M00S24737.cpumtr +++|- RL 200B
40226 M00S24738.cpumtr +++| IX0 X0+X2 INCREMENT LCM ADDRESS
40227 M00S24739.cpumtr +++| SA0 A0+B6 INCREMENT CM ADDRESS
40228 M00S24740.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40229 M00S24741.cpumtr +++|
40230 M00S24742.cpumtr +++| WRT2 MJ EXIT
40231 M00S24743.cpumtr +++|
40232 M00S24744.cpumtr +++|* SECOND INTERRUPT.
40233 M00S24745.cpumtr +++|
40234 M00S24746.cpumtr +++| TB7 READ REAL-TIME CLOCK
40235 M00S24747.cpumtr +++| SB3 WRT3 *SAA* RETURN ADDRESS
40236 M00S24748.cpumtr +++| SX7 B7
40237 M00S24749.cpumtr +++| SA7 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
40238 M00S24750.cpumtr +++|- RL 200B
40239 M00S24751.cpumtr +++| IX0 X0+X2 INCREMENT LCM ADDRESS
40240 M00S24752.cpumtr +++| SA0 A0-B6 RESET CM ADDRESS
40241 M00S24753.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40242 M00S24754.cpumtr +++|
40243 M00S24755.cpumtr +++| WRT3 MJ EXIT
40244 M00S24756.cpumtr +++|
40245 M00S24757.cpumtr +++|* THIRD INTERRUPT.
40246 M00S24758.cpumtr +++|
40247 M00S24759.cpumtr +++| TB7 READ REAL-TIME CLOCK
40248 M00S24760.cpumtr +++| RX6 X0 READ LAST WORD
40249 M00S24761.cpumtr +++| SB3 PSLB-1
40250 M00S24762.cpumtr +++| SX7 B7
40251 M00S24763.cpumtr +++| SB5 B5+B1 INCREMENT SECTOR COUNT
40252 M00S24764.cpumtr +++| SA7 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
40253 M00S24765.cpumtr +++| SB7 B1 *FNR* CONTROL
40254 M00S24766.cpumtr +++| SX7 B1
40255 M00S24767.cpumtr +++| SA6 A0 LAST WORD OF SECTOR TO BUFFER
40256 M00S24768.cpumtr +++| IX0 X0+X7
40257 M00S24769.cpumtr +++| EQ B3,B5,WRT6 IF NEXT TO LAST SECTOR
40258 M00S24770.cpumtr +++| SB3 B3+B1
40259 M00S24771.cpumtr +++| BX7 X7-X7 *GO*
40260 M00S24772.cpumtr +++| NE B3,B5,WRT7 IF NOT LAST SECTOR
40261 M00S24773.cpumtr +++| SB3 WRT4 *DLB* RETURN ADDRESS
40262 M00S24774.cpumtr +++| SA2 A2 *PUT* ENTRY
40263 M00S24775.cpumtr +++| ERRNZ UNCT INDEX MUST BE ZERO
| Line S24776 Modification History |
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
40264 M01S24776.252l678 ---| SB5 B0 *DLB* CONTROL
40265 M00S24777.cpumtr +++| EQ /BUFIO/DLB DELETE BUFFER
40266 M00S24778.cpumtr +++|
40267 M00S24779.cpumtr +++| WRT4 SB3 WRT5 *SRC* RETURN ADDRESS
| Line S00005 Modification History |
M01 (Added by) | ns2514 |
Seq # *Modification Id* Act
----------------------------+
40268 M01S00005.ns2514 +++| SB6 200B RESET B6
40269 M00S24780.cpumtr +++| SB7 20B SET OUTPUT XP
40270 M00S24781.cpumtr +++| EQ /BUFIO/SBR SET BUFFER RECALL
40271 M00S24782.cpumtr +++|
40272 M00S24783.cpumtr +++| WRT5 SA5 A2+WTST UPDATE WRITE STATISTICS
40273 M00S24784.cpumtr +++| SX6 PSLB PHYSICAL SECTOR COUNT
40274 M00S24785.cpumtr +++| SX7 B4 CHANNEL NUMBER
40275 M00S24786.cpumtr +++| IX6 X5+X6 INCREMENT ACCUMULATOR
40276 M00S24787.cpumtr +++| AX7 1
40277 M00S24788.cpumtr +++| LX6 59-35
40278 M00S24789.cpumtr +++| SA4 NRQT-1+X7 CHECK FOR CONTINUATION
40279 M00S24790.cpumtr +++| SB5 B0+ CLEAR READ RECOVERY INDEX
40280 M00S24791.cpumtr +++| NG X6,WRT5.1 IF ACCUMULATOR OVERFLOW
40281 M00S24792.cpumtr +++| LX6 35-59
40282 M00S24793.cpumtr +++| SA6 A5 UPDATE ACCUMULATOR
40283 M00S24794.cpumtr +++| WRT5.1 NG X4,WRT10 IF END OF TRANSFER
40284 M00S24795.cpumtr +++| SA3 X4
40285 M00S24796.cpumtr +++| SX6 A1 SET NEW CONTROL BUFFER INDEX IN XP
40286 M00S24797.cpumtr +++| SA5 X4+IOLK
40287 M00S24798.cpumtr +++| MX7 54
40288 M00S24799.cpumtr +++| MX2 -24
40289 M00S24800.cpumtr +++| BX3 X7*X6
40290 M00S24801.cpumtr +++| BX0 -X2*X5
40291 M00S24802.cpumtr +++| BX7 X7-X7 PRESET *CONTINUE*
40292 M00S24803.cpumtr +++| MX2 42
| Line S24804 Modification History |
M01 (Removed by) | cpumt47 |
Seq # *Modification Id* Act
----------------------------+
40293 M01S24804.cpumt47 ---| SA5 X3+40B+11B
| Line S00006 Modification History |
M01 (Added by) | cpumt47 |
Seq # *Modification Id* Act
----------------------------+
40294 M01S00006.cpumt47 +++| SA5 X3+40B+3
40295 M00S24805.cpumtr +++| SB3 WRT7 *SCB* RETURN ADDRESS
40296 M00S24806.cpumtr +++| SX3 A3
40297 M00S24807.cpumtr +++| LX2 18
40298 M00S24808.cpumtr +++| LX3 18
40299 M00S24809.cpumtr +++| BX6 X2*X5 CLEAR (A3)
40300 M00S24810.cpumtr +++| BX6 X6+X3 INSERT NEW (A3)
40301 M00S24811.cpumtr +++| SA6 A5
40302 M00S24812.cpumtr +++| EQ SCB SET CURRENT BUFFER
40303 M00S24813.cpumtr +++|
40304 M00S24814.cpumtr +++| WRT6 SB3 WRT7 *FNR* RETURN ADDRESS
40305 M00S24815.cpumtr +++| EQ FNR FIND NEXT REQUEST
40306 M00S24816.cpumtr +++|
40307 M00S24817.cpumtr +++| WRT7 SA0 A0+1
40308 M00S24818.cpumtr +++| SX2 177B
40309 M00S24819.cpumtr +++| RE 177B
40310 M00S24820.cpumtr +++|+ SB3 WRT8 *SAA* RETURN ADDRESS
40311 M00S24821.cpumtr +++| IX0 X0+X2 INCREMENT LCM ADDRESS
40312 M00S24822.cpumtr +++| SX2 B6
40313 M00S24823.cpumtr +++| SA0 A0+177B INCREMENT CM ADDRESS
40314 M00S24824.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40315 M00S24825.cpumtr +++|
40316 M00S24826.cpumtr +++| WRT8 MJ EXIT
40317 M00S24827.cpumtr +++|
40318 M00S24828.cpumtr +++|* FOURTH INTERRUPT.
40319 M00S24829.cpumtr +++|
40320 M00S24830.cpumtr +++| TB7 READ REAL-TIME CLOCK
40321 M00S24831.cpumtr +++| MX1 2
40322 M00S24832.cpumtr +++| SA5 A3+B5 GET HEADER FOR NEXT SECTOR
40323 M00S24833.cpumtr +++| MX3 -48
40324 M00S24834.cpumtr +++| LX1 -10
40325 M00S24835.cpumtr +++| SX6 B7
40326 M00S24836.cpumtr +++|- RL 200B
40327 M00S24837.cpumtr +++| SA6 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
40328 M00S24838.cpumtr +++| BX1 X1*X5 UNIT NUMBER
40329 M00S24839.cpumtr +++| BX3 -X3*X5
40330 M00S24840.cpumtr +++| LX1 -2
40331 M00S24841.cpumtr +++| SA0 A0-B6 RESET CM ADDRESS
40332 M00S24842.cpumtr +++| BX3 X1+X3 INSERT UNIT NUMBER
40333 M00S24843.cpumtr +++| IX0 X0+X2
40334 M00S24844.cpumtr +++| WRT9 OB3 B4
40335 M00S24845.cpumtr +++| ZR B3,WRT9 IF LAST WORD STILL PRESENT
40336 M00S24846.cpumtr +++| BX7 X7+X3
40337 M00S24847.cpumtr +++| SA7 A0
40338 M00S24848.cpumtr +++| RO B2 RESET I/O BUFFER POINTERS
40339 M00S24849.cpumtr +++| SA4 A1+2 RESET PARTNER XP
40340 M00S24850.cpumtr +++| SA5 A1+3
40341 M00S24851.cpumtr +++| BX6 X0
40342 M00S24852.cpumtr +++| SX2 A2
40343 M00S24853.cpumtr +++| SA6 A1+10B SET (X0) IN PARTNER XP
40344 M00S24854.cpumtr +++| LX2 18
40345 M00S24855.cpumtr +++| MX1 42
40346 M00S24856.cpumtr +++| SX3 A3
40347 M00S24857.cpumtr +++| LX1 18
40348 M00S24858.cpumtr +++| LX3 18
40349 M00S24859.cpumtr +++| BX4 X1*X4 CLEAR (A2)
40350 M00S24860.cpumtr +++| BX5 X1*X5 CLEAR (A3)
40351 M00S24861.cpumtr +++| BX6 X4+X2 INSERT NEW (A2)
40352 M00S24862.cpumtr +++| BX7 X5+X3 INSERT NEW (A3)
40353 M00S24863.cpumtr +++| SA6 A4
40354 M00S24864.cpumtr +++| SA7 A5
40355 M00S24865.cpumtr +++| MX1 42
40356 M00S24866.cpumtr +++| SA4 A1+5
40357 M00S24867.cpumtr +++| SX6 B5
40358 M00S24868.cpumtr +++| SB3 WRTX *SAA* RETURN ADDRESS
40359 M00S24869.cpumtr +++| BX4 X1*X4 CLEAR (B5)
40360 M00S24870.cpumtr +++| BX6 X4+X6 INSERT NEW (B5)
40361 M00S24871.cpumtr +++| SA6 A4
40362 M00S24872.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40363 M00S24873.cpumtr +++|
40364 M00S24874.cpumtr +++| WRT10 SB3 WRT11 *SAA* RETURN ADDRESS
40365 M00S24875.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40366 M00S24876.cpumtr +++|
40367 M00S24877.cpumtr +++| WRT11 MJ EXIT
40368 M00S24878.cpumtr +++|
40369 M00S24879.cpumtr +++| TB7 READ REAL-TIME CLOCK
40370 M00S24880.cpumtr +++| RO B2 INDICATE TRANSFER COMPLETE TO *FLPP*
40371 M00S24881.cpumtr +++| SX7 B7+
40372 M00S24882.cpumtr +++| SB3 WRTX *SAA* RETURN ADDRESS
40373 M00S24883.cpumtr +++| SA7 RTCI SAVE REAL-TIME CLOCK AT INTERRUPT
40374 M00S24884.cpumtr +++| EQ SAA SET ACCOUNTING ADJUSTMENT
40375 M00S24885.cpumtr +++|
40376 M00S24886.cpumtr +++| ENDBLK
40377 M00S24887.cpumtr +++| BLOCK DCP,(DUAL CPU OPERATION.)
| Line S24888 Modification History |
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40378 M01S24888.273l780 ---| CX SPACE 4,10
40379 M01S24889.273l780 ---|** CX - CPU EXCHANGE REQUEST.
40380 M01S24890.273l780 ---|* SET BY A CPU TO REQUEST EXCHANGE OF ALTERNATE CPU TO PROCESS
40381 M01S24891.273l780 ---|* A PPU REQUEST BY THE CORRECT CPU.
40382 M01S24892.273l780 ---|*
40383 M01S24893.273l780 ---|*T, CX 12/0,20/PB,28/
40384 M01S24894.273l780 ---|*T, CX+1 12/0,20/PB,28/
40385 M01S24895.273l780 ---|* PB BIT SET FOR PP REQUESTING FUNCTION TO BE PROCESSED
40386 M01S24896.273l780 ---|* IN THIS CPU.
40387 M01S24897.273l780 ---|
40388 M01S24898.273l780 ---|
40389 M01S24899.273l780 ---| CX CON 0,0
| Line S24900 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40390 M01S24900.271l750 ---| PCXF SPACE 4
| Line S01587 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40391 M01S01587.271l750 +++| PCXF SPACE 4,15
40392 M00S24901.cpumtr +++|** PCXF - PROCESS CPU EXCHANGE REQUEST.
40393 M00S24902.cpumtr +++|*
40394 M00S24903.cpumtr +++|* ENTRY
40395 M00S24904.cpumtr +++|*T, X0 42/,18/ PCXF
| Line S24905 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40396 M01S24905.271l750 ---|
| Line S01588 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40397 M01S01588.271l750 +++|* (X5) = MONITOR MODE ENTRY TIME IF 180 MACHINE.
40398 M01S01589.271l750 +++|*
40399 M01S01590.271l750 +++|* EXIT TO */MONITOR/PMN4*.
40400 M01S01591.271l750 +++|*
40401 M01S01592.271l750 +++|* USES X - 1, 2, 3, 4, 7.
40402 M01S01593.271l750 +++|* A - 1, 7.
40403 M01S01594.271l750 +++|* B - 3.
40404 M00S24906.cpumtr +++|
| Line S24907 Modification History |
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40405 M01S24907.273l780 ---| PCX SA1 CX+A0 READ REQUEST WORD
| Line S00862 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40406 M01S00862.273l780 +++| PCX SA1 CL+CACX+A0 READ REQUEST WORD
40407 M00S24908.cpumtr +++| NX3,B3 X1 SET PPU NUMBER
40408 M00S24909.cpumtr +++| SX4 B1
40409 M00S24910.cpumtr +++| ZR X1,/MONITOR/MTRX IF NO REQUESTS PRESENT
40410 M00S24911.cpumtr +++| LX4 47
40411 M00S24912.cpumtr +++| SX2 B3 SET OUTPUT REGISTER OFFSET
40412 M00S24913.cpumtr +++| AX3 X4,B3
40413 M00S24914.cpumtr +++| BX7 X1-X3
40414 M00S24915.cpumtr +++| LX2 3
40415 M00S24916.cpumtr +++| SA7 A1
40416 M00S24917.cpumtr +++| TX0 X2+1,FP SET OUTPUT REGISTER ADDRESS
| Line S24918 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
40417 M01S24918.271l716 ---| EQ /MONITOR/PMN2 PROCESS FUNCTION
| Line S02051 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
40418 M01S02051.271l716 +++| EQ /MONITOR/PMN4 PROCESS FUNCTION
| Line S01595 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40419 M01S01595.271l750 +++| ACQ SPACE 4,10
40420 M01S01596.271l750 +++|** ACQ - *ACQ* PREPROCESSOR FOR DUAL CPU CACHE MACHINE.
40421 M01S01597.271l750 +++|*
40422 M01S01598.271l750 +++|* ENTRY JOB ACTIVE IN THIS CPU.
40423 M01S01599.271l750 +++|* (B7) = CONTROL POINT ADDRESS.
40424 M01S01600.271l750 +++|*
40425 M01S01601.271l750 +++|* USES X - 1.
40426 M01S01602.271l750 +++|* A - 1.
40427 M01S01603.271l750 +++|* B - 6.
40428 M01S01604.271l750 +++|*
40429 M01S01605.271l750 +++|* EXIT TO *ACQ* VIA *CCC*.
40430 M01S01606.271l750 +++|
40431 M01S01607.271l750 +++|
40432 M01S01608.271l750 +++| ACQ BSS 0 ENTRY
40433 M01S01609.271l750 +++| SA1 B7+CWQW
40434 M01S01610.271l750 +++| SB6 /BUFIO/ACQ SET EXIT ADDRESS
40435 M01S01611.271l750 +++| EQ CCC CHECK CACHE MACHINE CPU SELECTION
40436 M01S01612.271l750 +++| APQ SPACE 4,10
40437 M01S01613.271l750 +++|** APQ - *APQ* PREPROCESSOR FOR DUAL CPU CACHE MACHINE.
40438 M01S01614.271l750 +++|*
40439 M01S01615.271l750 +++|* ENTRY JOB ACTIVE IN THIS CPU.
40440 M01S01616.271l750 +++|* (B7) = CONTROL POINT ADDRESS.
40441 M01S01617.271l750 +++|*
40442 M01S01618.271l750 +++|* USES X - 1.
40443 M01S01619.271l750 +++|* A - 1.
40444 M01S01620.271l750 +++|* B - 6.
40445 M01S01621.271l750 +++|*
40446 M01S01622.271l750 +++|* EXIT TO *APQ* VIA *CCC*.
40447 M01S01623.271l750 +++|
40448 M01S01624.271l750 +++|
40449 M01S01625.271l750 +++| APQ BSS 0 ENTRY
40450 M01S01626.271l750 +++| SA1 B7+CWQW
40451 M01S01627.271l750 +++| SB6 /MONITOR/APQ SET EXIT ADDRESS
40452 M01S01628.271l750 +++| EQ CCC CHECK CACHE MACHINE CPU SELECTION
40453 M01S01629.271l750 +++| CCA SPACE 4,15
40454 M01S01630.271l750 +++|** CCA - DUAL CPU CACHE MACHINE *CCAM* PROCESSOR.
40455 M01S01631.271l750 +++|*
40456 M01S01632.271l750 +++|* ENTRY JOB ACTIVE IN THIS CPU IF CPU 1.
40457 M01S01633.271l750 +++|* (B3) = *JAV* RETURN ADDRESS.
40458 M01S01634.271l750 +++|* (B7) = OLD CONTROL POINT ADDRESS.
40459 M01S01635.271l750 +++|* (X6) = OLD CONTROL POINT *STSW*.
| Line S01636 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40460 M02S01636.273l780 ---|* (X5) = NEW CONTROL POINT ADDRESS.
| Line S00863 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40461 M01S00863.273l780 +++|* (B6) = NEW CONTROL POINT ADDRESS.
40462 M01S00864.273l780 +++|* (X0) .GE. 0 IF OLD CP/PCP IS SYSTEM CP OR PCP.
| Line S01637 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40463 M01S01637.271l750 +++|*
| Line S01638 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40464 M02S01638.273l780 ---|* EXIT TO */MONITOR/JAV* VIA *CCC*.
| Line S00865 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40465 M01S00865.273l780 +++|* EXIT TO */MONITOR/JAV* IF OLD CP JOB ADVANCE TO BE CHECKED.
40466 M01S00866.273l780 +++|* TO *PPRX* IF OLD CP JOB ADVANCE NOT TO BE CHECKED.
| Line S01639 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40467 M01S01639.271l750 +++|* (B7) = OLD CONTROL POINT ADDRESS.
40468 M01S01640.271l750 +++|*
| Line S01641 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40469 M02S01641.273l780 ---|* USES X - 1.
| Line S00867 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40470 M01S00867.273l780 +++|* USES X - 1, 2.
| Line S01642 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40471 M01S01642.271l750 +++|* A - 1.
40472 M01S01643.271l750 +++|* B - 4, 6.
40473 M01S01644.271l750 +++|
40474 M01S01645.271l750 +++|
40475 M01S01646.271l750 +++| CCA BSS 0 ENTRY
| Line S00868 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40476 M01S00868.273l780 +++| TX2 B6,-SCA
40477 M01S00869.273l780 +++| PL X0,CCA1 IF OLD CP/PCP IS SYSTEM CP OR PCP
| Line S01647 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40478 M01S01647.271l750 +++| SB4 CCA1 SET *CPA* RETURN ADDRESS
40479 M01S01648.271l750 +++| EQ CPA CHECK OLD CP ACTIVITY
40480 M01S01649.271l750 +++|
| Line S01650 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40481 M02S01650.273l780 ---| CCA1 SA1 X5+CWQW
40482 M02S01651.273l780 ---| SB6 /MONITOR/JAV SET *CCC* RETURN ADDRESS
| Line S00870 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40483 M01S00870.273l780 +++| CCA1 SA1 B6+CWQW
40484 M01S00871.273l780 +++| SB6 /MONITOR/JAV SET TO CHECK ADVANCE ON OLD CP
40485 M01S00872.273l780 +++| NG X0,CCA2 IF OLD CP/PCP IS NOT SYSTEM CP OR PCP
40486 M01S00873.273l780 +++| SB6 /MONITOR/PPRX SET TO NOT CHECK ADVANCE ON OLD CP
40487 M01S00874.273l780 +++| CCA2 PL X2,/MONITOR/RB6 IF NEW CP/PCP IS SYSTEM CP OR PCP
| Line S01652 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40488 M01S01652.271l750 +++|* EQ CCC CHECK NEW CP CPU SELECTION
40489 M01S01653.271l750 +++| CCC SPACE 4,15
40490 M01S01654.271l750 +++|** CCC - CHECK CPU SELECTION FOR DUAL CPU CACHE MACHINE.
40491 M01S01655.271l750 +++|*
40492 M01S01656.271l750 +++|* ENTRY JOB ACTIVE IN THIS CPU.
40493 M01S01657.271l750 +++|* (B6) = EXIT ADDRESS.
40494 M01S01658.271l750 +++|* (X1) = *CWQW*.
40495 M01S01659.271l750 +++|* (A1) = ADDRESS OF *CWQW*.
40496 M01S01660.271l750 +++|*
40497 M01S01661.271l750 +++|* EXIT ASSIGNMENT OF CPU 1 PROHIBITED.
40498 M01S01662.271l750 +++|* CPU SWITCH REQUESTED IF EXECUTING IN CPU 1.
40499 M01S01663.271l750 +++|*
40500 M01S01664.271l750 +++|* USES X - 1, 2, 7.
40501 M01S01665.271l750 +++|* A - 1, 7.
40502 M01S01666.271l750 +++|
40503 M01S01667.271l750 +++|
40504 M01S01668.271l750 +++| CCC BSS 0 ENTRY
40505 M01S01669.271l750 +++| SX7 B1
40506 M01S01670.271l750 +++| SX2 A0
40507 M01S01671.271l750 +++| LX7 24-0
40508 M01S01672.271l750 +++| BX7 X1+X7 DISALLOW ASSIGNMENT OF CPU 1
40509 M01S01673.271l750 +++| SA7 A1
40510 M01S01674.271l750 +++| ZR X2,/MONITOR/RB6 IF JOB IN CPU 0
40511 M01S01675.271l750 +++| MX7 1
40512 M01S01676.271l750 +++| SA1 CSWL+A0
40513 M01S01677.271l750 +++| BX7 X7+X1 SET CPU SWITCH REQUEST
40514 M01S01678.271l750 +++| SA7 A1
40515 M01S01679.271l750 +++| JP B6 EXIT TO SPECIFIED ROUTINE
40516 M01S01680.271l750 +++| CPA SPACE 4,15
40517 M01S01681.271l750 +++|** CPA - CHECK PP AND TAPE ACTIVITY FOR DUAL CPU CACHE MACHINE.
40518 M01S01682.271l750 +++|*
40519 M01S01683.271l750 +++|* ENTRY (B4) = RETURN ADDRESS.
40520 M01S01684.271l750 +++|* (X6) = *STSW*.
40521 M01S01685.271l750 +++|* (B7) = CONTROL POINT ADDRESS.
40522 M01S01686.271l750 +++|*
40523 M01S01687.271l750 +++|* EXIT CPU ASSIGNMENT FLAGS RESTORED FROM USER CPU SELECTION
40524 M01S01688.271l750 +++|* IF NO PP OR TAPE ACTIVITY.
40525 M01S01689.271l750 +++|* (X6) = *STSW*.
40526 M01S01690.271l750 +++|* (B7) = CONTROL POINT ADDRESS.
40527 M01S01691.271l750 +++|*
40528 M01S01692.271l750 +++|* USES X - 1, 3, 7.
40529 M01S01693.271l750 +++|* A - 1, 3, 7.
40530 M01S01694.271l750 +++|
40531 M01S01695.271l750 +++| CPA BSS 0 ENTRY
40532 M01S01696.271l750 +++| TX1 B7,-SCA
| Line S01697 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40533 M02S01697.273l780 ---| ZR B7,/MONITOR/RB4 IF CONTROL POINT 0
40534 M02S01698.273l780 ---| ZR X1,/MONITOR/RB4 IF SYSTEM CONTROL POINT
| Line S00875 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40535 M01S00875.273l780 +++| PL X1,/MONITOR/RB4 IF SYSTEM CP OR PCP
| Line S01699 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40536 M01S01699.271l750 +++| SX7 360B
40537 M01S01700.271l750 +++| MX1 4
40538 M01S01701.271l750 +++| LX1 48-56
40539 M01S01702.271l750 +++| BX7 X7+X1
40540 M01S01703.271l750 +++| BX7 X7*X6
40541 M01S01704.271l750 +++| NZ X7,/MONITOR/RB4 IF REMAINING PP OR TAPE ACTIVITY
40542 M01S01705.271l750 +++| SA1 B7+JCIW
40543 M01S01706.271l750 +++| SA3 B7+CWQW
40544 M01S01707.271l750 +++| MX7 58
40545 M01S01708.271l750 +++| LX7 24
40546 M01S01709.271l750 +++| LX1 24-36
40547 M01S01710.271l750 +++| BX3 X7*X3 CLEAR CPU ASSIGNMENT FLAGS
40548 M01S01711.271l750 +++| BX1 -X7*X1 CPU SELECTION
40549 M01S01712.271l750 +++| BX7 X3+X1 RESET CPU ASSIGNMENT FLAGS
| Line S01713 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40550 M02S01713.273l780 ---| SA7 A3
| Line S00876 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40551 M01S00876.273l780 +++| SA7 A3+
| Line S01714 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40552 M01S01714.271l750 +++| JP B4 RETURN
40553 M00S24919.cpumtr +++| CPE SPACE 4,10
40554 M00S24920.cpumtr +++|** CPE - CPU SELECTION.
40555 M00S24921.cpumtr +++|*
40556 M00S24922.cpumtr +++|* ENTRY (B6) = EXIT ADDRESS.
40557 M00S24923.cpumtr +++|* (B7) = CONTROL POINT ADDRESS.
40558 M00S24924.cpumtr +++|*
40559 M00S24925.cpumtr +++|* USES A - 4.
40560 M00S24926.cpumtr +++|* B - 4.
| Line S24927 Modification History |
M01 (Removed by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40561 M01S24927.cpum228 ---|* X - 4.
| Line S00001 Modification History |
M01 (Added by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40562 M01S00001.cpum228 +++|* X - 4, 6.
40563 M00S24928.cpumtr +++|
40564 M00S24929.cpumtr +++|
| Line S24930 Modification History |
M01 (Removed by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40565 M01S24930.cpum228 ---| CPE SB4 A0-CPAL-1 CHECK JOB ACTIVE IN OPPOSITE CPU
| Line S00002 Modification History |
M01 (Added by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40566 M01S00002.cpum228 +++| CPE BSS 0 ENTRY
40567 M01S00003.cpum228 +++| SB4 A0-CPAL-1 CHECK IF JOB IS ACTIVE IN THE OPPOSITE CPU
40568 M01S00004.cpum228 +++| TX6 B7,-SCA CHECK FOR SYSTEM CONTROL POINT
40569 M00S24931.cpumtr +++| SA4 -B4
| Line S00005 Modification History |
M01 (Added by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40570 M01S00005.cpum228 +++| ZR X6,CPE1 IF SYSTEM CONTROL POINT
40571 M00S24932.cpumtr +++| AX4 24
| Line S24933 Modification History |
M01 (Removed by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40572 M01S24933.cpum228 ---| SB4 X4
| Line S00006 Modification History |
M01 (Added by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40573 M01S00006.cpum228 +++| SB4 X4+
40574 M00S24934.cpumtr +++| EQ B4,B7,SAX IF JOB ACTIVE IN OPPOSITE CPU
| Line S24935 Modification History |
M01 (Removed by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40575 M01S24935.cpum228 ---| JP B6 RETURN
| Line S00007 Modification History |
M01 (Added by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40576 M01S00007.cpum228 +++| CPE1 JP B6 RETURN
40577 M00S24936.cpumtr +++| CPS SPACE 4
40578 M00S24937.cpumtr +++|** CPS - CPU SELECTION.
40579 M00S24938.cpumtr +++|*
40580 M00S24939.cpumtr +++|* ENTRY FROM PPR.
40581 M00S24940.cpumtr +++|
40582 M00S24941.cpumtr +++|
| Line S24942 Modification History |
M01 (Removed by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40583 M01S24942.cpum228 ---| CPS SB4 A0-CPAL-1 CHECK JOB ACTIVE IN OPPOSITE CPU
| Line S00008 Modification History |
M01 (Added by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40584 M01S00008.cpum228 +++| CPS BSS 0 ENTRY
40585 M01S00009.cpum228 +++| SB4 A0-CPAL-1 CHECK IF JOB IS ACTIVE IN THE OPPOSITE CPU
40586 M01S00010.cpum228 +++| TX6 B7,-SCA CHECK FOR SYSTEM CONTROL POINT
40587 M00S24943.cpumtr +++| SA4 -B4
| Line S00011 Modification History |
M01 (Added by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40588 M01S00011.cpum228 +++| ZR X6,CPS1 IF SYSTEM CONTROL POINT
40589 M00S24944.cpumtr +++| AX4 24
40590 M00S24945.cpumtr +++| SB4 X4+
40591 M00S24946.cpumtr +++| EQ B4,B7,SAX IF JOB ACTIVE ON OPPOSITE CPU
| Line S24947 Modification History |
M01 (Removed by) | cpum228 |
Seq # *Modification Id* Act
----------------------------+
40592 M01S24947.cpum228 ---| SX4 7600B
| Line S00012 Modification History |
M01 (Added by) | cpum228 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40593 M02S00012.273l780 ---| CPS1 SX4 7600B
40594 M00S24948.cpumtr +++|
40595 M00S24949.cpumtr +++|** EXIT TO PROCESSOR WITH -
40596 M00S24950.cpumtr +++|* (X1) = BITS 0 - 47 OF OUTPUT REGISTER.
| Line S24951 Modification History |
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40597 M01S24951.273l780 ---|* (X2) = INPUT REGISTER SHIFTED TO CP ADDRESS.
| Line S00877 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40598 M01S00877.273l780 +++|* (X2) = *ACPP*.
40599 M00S24952.cpumtr +++|* (X3) = PROCESOR CONTROL WORD.
| Line S24953 Modification History |
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40600 M01S24953.273l780 ---|* (X4) = CONTROL POINT MASK (7600B).
40601 M00S24954.cpumtr +++|* (X5) = OUTPUT REGISTER.
40602 M00S24955.cpumtr +++|* (X7) = 0.
| Line S24956 Modification History |
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40603 M01S24956.273l780 ---|* (B5) = REQUEST NUMBER.
| Line S00878 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40604 M01S00878.273l780 +++|* (A2) = *ACPP* ADDRESS.
40605 M00S24957.cpumtr +++|* (B6) = PROCESSOR ADDRESS.
40606 M00S24958.cpumtr +++|* (B7) = CONTROL POINT ADDRESS.
40607 M00S24959.cpumtr +++|
| Line S24960 Modification History |
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
40608 M01S24960.252l678 ---| TJP 0,(/PROBE/PPR,B6,PROBE) PROCESS REQUEST
| Line S00827 Modification History |
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
40609 M02S00827.253l688 ---| TJP 0,(/PROBE/PPR,PROBE,B6) PROCESS REQUEST
| Line S01615 Modification History |
M01 (Added by) | 253l688 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40610 M02S01615.273l780 ---| TJP (/PROBE/PPR,PROBE,B6) PROCESS REQUEST
| Line S00879 Modification History |
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40611 M01S00879.273l780 +++| CPS1 TJP (/PROBE/PPR,PROBE,B6) PROCESS REQUEST
| Line S24961 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40612 M01S24961.271l750 ---| BNJ SPACE 4,10
| Line S01715 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40613 M01S01715.271l750 +++| DCP SPACE 4,20
40614 M01S01716.271l750 +++|** DCP - DUAL CPU *DCPM* FUNCTION PROCESSOR.
40615 M01S01717.271l750 +++|*
40616 M01S01718.271l750 +++|* EXIT TO /MONITOR/DCP3.
40617 M01S01719.271l750 +++|*
40618 M01S01720.271l750 +++|* ENTRY (X3) = *CWQW*.
40619 M01S01721.271l750 +++|* (A3) = *CWQW* ADDRESS.
40620 M01S01722.271l750 +++|* (X4) = 42 BIT MASK LEFT JUSTIFIED.
40621 M01S01723.271l750 +++|*
40622 M01S01724.271l750 +++|* EXIT TO */MONITOR/DCP3*.
40623 M01S01725.271l750 +++|* (X3) = *CWQW*.
40624 M01S01726.271l750 +++|* (A3) = *CWQW* ADDRESS.
40625 M01S01727.271l750 +++|* (X4) = 42 BIT MASK LEFT JUSTIFIED.
40626 M01S01728.271l750 +++|*
40627 M01S01729.271l750 +++|* USES X - 2, 6.
40628 M01S01730.271l750 +++|* A - 2, 6.
40629 M01S01731.271l750 +++|* B - 4.
40630 M01S01732.271l750 +++|
40631 M01S01733.271l750 +++|
40632 M01S01734.271l750 +++|* CLEAR *WQ* POINTER FROM PENDING CPU SWITCH REQUEST.
40633 M01S01735.271l750 +++|
40634 M01S01736.271l750 +++| DCP SA2 CSWL CPU 0 SWITCH REQUEST
40635 M01S01737.271l750 +++| LX2 -24
40636 M01S01738.271l750 +++| SB4 X2
40637 M01S01739.271l750 +++| SB4 A3-B4
40638 M01S01740.271l750 +++| ZR B4,DCP1 IF SWITCH REQUEST FOR THIS JOB
40639 M01S01741.271l750 +++| SA2 A2+B1 CPU 1 SWITCH REQUEST
40640 M01S01742.271l750 +++| LX2 -24
40641 M01S01743.271l750 +++| SB4 X2+
40642 M01S01744.271l750 +++| SB4 A3-B4
40643 M01S01745.271l750 +++| NZ B4,/MONITOR/DCP3 IF NOT SWITCH REQUEST FOR THIS JOB
40644 M01S01746.271l750 +++| DCP1 BX6 X4*X2 CLEAR *WQ* POINTER FROM SWITCH REQUEST
40645 M01S01747.271l750 +++| LX6 24
40646 M01S01748.271l750 +++| SA6 A2+
40647 M01S01749.271l750 +++| EQ /MONITOR/DCP3 REMOVE *WQ* ENTRY
| Line S01750 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act
----------------------------+
40648 M02S01750.273l780 ---| DPP SPACE 4,20
40649 M02S01751.273l780 ---|** DPP - DUAL CPU CACHE MACHINE *DPPM* FUNCTION PROCESSOR.
40650 M02S01752.273l780 ---|*
40651 M02S01753.273l780 ---|* ENTRY (X6) = *STSW*.
40652 M02S01754.273l780 ---|* (X4) = PP INPUT REGISTER.
40653 M02S01755.273l780 ---|* (B3) = *DPPM* EXIT ADDRESS.
40654 M02S01756.273l780 ---|*
40655 M02S01757.273l780 ---|* EXIT TO /MONITOR/DPP3.1.
40656 M02S01758.273l780 ---|* (X6) = *STSW*.
40657 M02S01759.273l780 ---|* (X4) = PP INPUT REGISTER.
40658 M02S01760.273l780 ---|* (B3) = *DPPM* EXIT ADDRESS.
40659 M02S01761.273l780 ---|*
40660 M02S01762.273l780 ---|* USES B - 4.
40661 M02S01763.273l780 ---|
40662 M02S01764.273l780 ---|
40663 M02S01765.273l780 ---| DPP BSS 0 ENTRY
40664 M02S01766.273l780 ---| SB4 /MONITOR/DPP3.1 SET *CPA* RETURN ADDRESS
40665 M02S01767.273l780 ---| EQ CPA CHECK PP AND TAPE ACTIVITY
| Line S01768 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40666 M01S01768.271l750 +++| SJC SPACE 4,20
40667 M01S01769.271l750 +++|** SJC - DUAL CPU CACHE MACHINE *SJCM* FUNCTION PROCESSOR.
40668 M01S01770.271l750 +++|*
40669 M01S01771.271l750 +++|* ENTRY (X6) = *CWQW* WITH NEW CPU SELECTION.
40670 M01S01772.271l750 +++|* (A2) = *JCIW* ADDRESS.
40671 M01S01773.271l750 +++|* (X2) = *JCIW*.
40672 M01S01774.271l750 +++|* (X5) = NEW CPU SELECTION LEFT SHIFTED 24 BITS.
40673 M01S01775.271l750 +++|* (X3) = CPU SELECTION MASK LEFT SHIFTED 24 BITS.
40674 M01S01776.271l750 +++|*
40675 M01S01777.271l750 +++|* EXIT TO /MONITOR/SJC3.
40676 M01S01778.271l750 +++|* (X6) = *CWQW* WITH NEW CPU SELECTION.
40677 M01S01779.271l750 +++|* (A2) = *JCIW* ADDRESS.
40678 M01S01780.271l750 +++|* (X2) = *JCIW*.
40679 M01S01781.271l750 +++|* (X5) = NEW CPU SELECTION LEFT SHIFTED 24 BITS.
40680 M01S01782.271l750 +++|* (X3) = CPU SELECTION MASK LEFT SHIFTED 24 BITS.
40681 M01S01783.271l750 +++|*
40682 M01S01784.271l750 +++|* USES X - 6, 7.
40683 M01S01785.271l750 +++|
40684 M01S01786.271l750 +++|
40685 M01S01787.271l750 +++| SJC BSS 0 ENTRY
40686 M01S01788.271l750 +++|
40687 M01S01789.271l750 +++|* THE ASSIGNMENT OF CPU 1 IS PROHIBITED IN CASE THE PP ISSUING
40688 M01S01790.271l750 +++|* THE *SJCM* FUNCTION IS ASSIGNED TO A SUBSYSTEM WHILE OTHER
40689 M01S01791.271l750 +++|* PP-S ARE ASSIGNED. WHEN THE REQUESTING PP DROPS, THE *DPPM*
40690 M01S01792.271l750 +++|* PROCESSOR WILL RESET THE *CWQW* CPU ASSIGNMENT FLAGS FROM THE
40691 M01S01793.271l750 +++|* *JCIW* CPU SELECTION IF NO OTHER ACTIVITY IS PRESENT.
40692 M01S01794.271l750 +++|
40693 M01S01795.271l750 +++|
40694 M01S01796.271l750 +++| SJC BSS 0 ENTRY
40695 M01S01797.271l750 +++| SX7 1 DISALLOW ASSIGNMENT OF CPU 1
40696 M01S01798.271l750 +++| LX7 24-0
40697 M01S01799.271l750 +++| BX6 X6+X7
40698 M01S01800.271l750 +++| EQ /MONITOR/SJC3 RETURN TO MAIN *SJCM* PROCESSOR
40699 M01S01801.271l750 +++| BNJ SPACE 4,15
40700 M00S24962.cpumtr +++|** BNJ - EXTENSION TO *BNJ* FOR DUAL CPU MACHINES.
| Line S24963 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40701 M01S24963.271l750 ---|*
40702 M01S24964.271l750 ---|* ENTRY (WQRL) = POINTER TO BEGINNING OF CPU REQUEST QUEUE.
40703 M00S24965.cpumtr +++|*
| Line S24966 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40704 M01S24966.271l750 ---|* EXIT TO /MONITOR/BNJ5.
40705 M01S24967.271l750 ---|* (A4) = *JCIW* ADDRESS OF SELECTED JOB.
40706 M01S24968.271l750 ---|* (ENTRY DELETED FROM QUEUE)
40707 M01S24969.271l750 ---|* (X4) = CONTENTS OF *JCIW* FROM SELECTED JOB.
| Line S01802 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40708 M01S01802.271l750 +++|* ENTRY (X6) = 42 BIT MASK LEFT JUSTIFIED.
40709 M00S24970.cpumtr +++|*
| Line S24971 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
40710 M01S24971.271l716 ---|* USES X - 1, 2, 3, 4, 6.
40711 M01S24972.271l716 ---|* A - 1, 3, 4, 6.
40712 M01S24973.271l716 ---|* B - 6.
| Line S02052 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40713 M02S02052.271l750 ---|* USES X - 0, 1, 2, 3, 4, 6, 7.
40714 M02S02053.271l750 ---|* A - 1, 2, 3, 4, 6, 7.
40715 M02S02054.271l750 ---|* B - 5, 6.
| Line S01803 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40716 M01S01803.271l750 +++|* EXIT TO */MONITOR/BNJ16*.
40717 M01S01804.271l750 +++|* (X3) = *CWQW* OF NEW JOB (DELINKED FROM *WQ*).
40718 M01S01805.271l750 +++|* (A3) = *CWQW* ADDRESS OF NEW JOB.
40719 M01S01806.271l750 +++|* (B4) = PRIORITY WITH FLAGS OF NEW JOB.
40720 M01S01807.271l750 +++|*
40721 M01S01808.271l750 +++|* USES X - ALL.
40722 M01S01809.271l750 +++|* A - 1, 2, 3, 4, 7.
40723 M01S01810.271l750 +++|* B - 3, 4, 5, 6.
40724 M01S01811.271l750 +++|*
40725 M01S01812.271l750 +++|* CALLS /MONITOR/ACS.
40726 M00S24974.cpumtr +++|
40727 M00S24975.cpumtr +++|
| Line S24976 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40728 M01S24976.271l750 ---| BNJ SA1 WQRL POINTER TO FIRST CPU CANDIDATE
40729 M01S24977.271l750 ---| MX3 -2
40730 M01S24978.271l750 ---| SX2 A0+B1 CPU SELECTION THAT IS VALID
40731 M01S24979.271l750 ---| SA4 X1
40732 M01S24980.271l750 ---| LX3 36
40733 M01S24981.271l750 ---| LX2 36
40734 M01S24982.271l750 ---| BX6 -X3*X4
40735 M01S24983.271l750 ---| BX7 X6-X2
40736 M01S24984.271l750 ---| BX7 X6*X7
40737 M01S24985.271l750 ---| NZ X7,BNJ3 IF JOB CANNOT USE THIS CPU
40738 M01S24986.271l750 ---| SX6 X4
40739 M01S24987.271l750 ---| SX1 X4
40740 M01S24988.271l750 ---| SA6 A1+ UPDATE POINTER TO NEXT JOB
| Line S01813 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40741 M01S01813.271l750 +++| BNJ BSS 0 ENTRY
40742 M00S24989.cpumtr +++|
| Line S24990 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40743 M01S24990.271l750 ---|* DETERMINE IF OTHER CPU NEEDS TO BE SWITCHED.
| Line S01814 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40744 M01S01814.271l750 +++|* SEARCH *WQ* FOR JOB THAT CAN USE THIS CPU AND UPDATE *WQ*
40745 M01S01815.271l750 +++|* LINKAGE.
40746 M01S01816.271l750 +++|* SEARCH LOOP REPLICATED FOR PERFORMANCE.
40747 M00S24991.cpumtr +++|
| Line S24992 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40748 M01S24992.271l750 ---| BNJ1 SB6 A0-TSCL-1
40749 M01S24993.271l750 ---| SA2 -B6
| Line S02055 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40750 M02S02055.271l750 ---| MX7 24
| Line S24994 Modification History |
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40751 M02S24994.271l750 ---| UX6,B6 X2 (B6) = PRIORITY OF JOB IN OTHER CPU
| Line S02056 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40752 M02S02056.271l750 ---| UX6,B4 X2 (B4) = PRIORITY OF JOB IN OTHER CPU
| Line S24995 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40753 M01S24995.271l750 ---| SX2 A2-TSCL+1 CPU SELECTION FOR OTHER CPU
| Line S24996 Modification History |
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40754 M02S24996.271l750 ---| SB6 B6+B1 DO NOT SWITCH FOR SLICE PRIORITY
| Line S24997 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40755 M01S24997.271l750 ---| LX2 36
40756 M01S24998.271l750 ---| BNJ2 ZR X1,/MONITOR/BNJ5 IF NO CANDIDATE FOR THIS CPU
40757 M01S24999.271l750 ---| SA1 X1
40758 M01S25000.271l750 ---| BX6 -X3*X1
40759 M01S25001.271l750 ---| UX1,B5 X1 (B5) = CANDIDATE CPU PRIORITY
40760 M01S25002.271l750 ---| BX0 X6-X2
40761 M01S25003.271l750 ---| BX6 X6*X0
40762 M01S25004.271l750 ---| SX1 X1
40763 M01S25005.271l750 ---| NZ X6,BNJ2 IF NOT CANDIDATE FOR THIS CPU
| Line S25006 Modification History |
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40764 M02S25006.271l750 ---| LE B5,B6,/MONITOR/BNJ5 IF CANDIDATE .LE. CURRENT JOB
40765 M02S25007.271l750 ---| MX7 24
40766 M02S25008.271l750 ---| SA7 A2+CSWL-TSCL REQUEST CPU SWITCH OF OTHER CPU
40767 M02S25009.271l750 ---| EQ /MONITOR/BNJ5
| Line S02057 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40768 M02S02057.271l750 ---| SX1 B5+1777B
40769 M02S02058.271l750 ---| SX2 B4+1777B
40770 M02S02059.271l750 ---| AX1 7
40771 M02S02060.271l750 ---| AX2 7
40772 M02S02061.271l750 ---| ZR X1,/MONITOR/BNJ5 IF CANDIDATE NOT PREEMPTIVE
40773 M02S02062.271l750 ---| SA7 A2+CSWL-TSCL REQUEST SWITCH OF OTHER CPU
40774 M02S02063.271l750 ---| EQ /MONITOR/BNJ5 CONTINUE WITH JOB ASSIGNMENT
| Line S01817 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40775 M01S01817.271l750 +++| SA1 WQRL GET *WQ* POINTER
40776 M01S01818.271l750 +++| SB6 A0+59-25 SET THIS CPU SELECTION BIT SHIFT COUNT
40777 M01S01819.271l750 +++| BNJ1 SA3 X1 GET NEXT ENTRY
40778 M01S01820.271l750 +++| LX7 B6,X3
40779 M01S01821.271l750 +++| PL X7,BNJ2 IF JOB CAN USE THIS CPU
40780 M01S01822.271l750 +++| SA1 X3 GET NEXT ENTRY
40781 M01S01823.271l750 +++| LX7 B6,X1
40782 M01S01824.271l750 +++| NG X7,BNJ1 IF JOB CANNOT USE THIS CPU
40783 M01S01825.271l750 +++| BX7 -X6*X1 EXTRACT *WQ* LINK
40784 M01S01826.271l750 +++| BX3 X6*X3
40785 M01S01827.271l750 +++| BX7 X3+X7 MERGE LINK IN PREVIOUS ENTRY
40786 M01S01828.271l750 +++| SA7 A3 UPDATE *WQ* LINKAGE
40787 M01S01829.271l750 +++| SA3 A1+ GET SELECTED ENTRY
40788 M01S01830.271l750 +++| EQ BNJ3 CLEAR *WQ* LINK IN SELECTED ENTRY
40789 M00S25010.cpumtr +++|
| Line S25011 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40790 M01S25011.271l750 ---| BNJ3 SB6 A4
40791 M01S25012.271l750 ---| SA4 X4
40792 M01S25013.271l750 ---| BX6 -X3*X4 EXTRACT CPU SELECTION
40793 M01S25014.271l750 ---| BX7 X6-X2
40794 M01S25015.271l750 ---| BX7 X6*X7
40795 M01S25016.271l750 ---| NZ X7,BNJ3 IF NOT CORRECT CPU
40796 M01S25017.271l750 ---| SA2 B6 GET LAST ENTRY
40797 M01S25018.271l750 ---| MX0 -18
40798 M01S25019.271l750 ---| BX6 -X0*X4 EXTRACT LINK FROM SELECTED ENTRY
40799 M01S25020.271l750 ---| BX2 X0*X2 CLEAR OLD LINK
40800 M01S25021.271l750 ---| BX6 X2+X6 INSERT NEW LINK
40801 M01S25022.271l750 ---| SA6 A2
40802 M01S25023.271l750 ---| SA1 A1 GET POINTER TO FIRST CANDIDATE
40803 M01S25024.271l750 ---| EQ BNJ1 CHECK OTHER CPU
40804 M01S25025.271l750 ---| RCC SPACE 4,10
| Line S01831 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40805 M01S01831.271l750 +++| BNJ2 BX7 -X6*X3 EXTRACT *WQ* LINK
40806 M01S01832.271l750 +++| BX1 X6*X1
40807 M01S01833.271l750 +++| BX7 X1+X7 MERGE LINK IN PREVIOUS ENTRY
40808 M01S01834.271l750 +++| SA7 A1 UPDATE *WQ* LINKAGE
40809 M01S01835.271l750 +++| BNJ3 UX0,B4 X3 UNPACK PRIORITY
40810 M01S01836.271l750 +++| BX7 X6*X3 CLEAR *WQ* LINK IN SELECTED ENTRY
40811 M01S01837.271l750 +++| ZR B4,BNJ3 IF NOT VALID *WQ* ENTRY FOR SELECTION
40812 M01S01838.271l750 +++| SA7 A3+
40813 M01S01839.271l750 +++| BX3 X7
40814 M01S01840.271l750 +++| LX7 59-49
40815 M01S01841.271l750 +++| NG X7,BNJ11 IF ACTIVE CPU SLICE
40816 M01S01842.271l750 +++|
40817 M01S01843.271l750 +++|* SEARCH *WQ* FOR FIRST ENTRY AT OR BELOW PRIORITY OF NEW JOB
40818 M01S01844.271l750 +++|* AND ADVANCE CPU SERVICE CYCLE.
40819 M01S01845.271l750 +++|* SEARCH LOOP REPLICATED FOR PERFORMANCE.
40820 M01S01846.271l750 +++|
40821 M01S01847.271l750 +++| SA1 WQRL GET *WQ* POINTER
40822 M01S01848.271l750 +++| SX7 3
40823 M01S01849.271l750 +++| SB3 BNJ5 SET *ACS* RETURN ADDRESS
40824 M01S01850.271l750 +++| LX7 48
40825 M01S01851.271l750 +++| BX7 X3+X7 SET PRIORITY FLAGS FOR COMPARISON
40826 M01S01852.271l750 +++| SX5 A3 SET NEW JOB *CWQW* ADDRESS
40827 M01S01853.271l750 +++| UX0,B6 X7 UNPACK PRIORITY WITH FLAGS
40828 M01S01854.271l750 +++| BNJ4 SA4 X1 GET NEXT ENTRY
40829 M01S01855.271l750 +++| UX0,B5 X4 UNPACK *WQ* ENTRY PRIORITY
40830 M01S01856.271l750 +++| LE B5,B6,/MONITOR/ACS IF ENTRY .LE. NEW JOB
40831 M01S01857.271l750 +++| SA1 X4 GET NEXT ENTRY
40832 M01S01858.271l750 +++| UX0,B5 X1 UNPACK *WQ* ENTRY PRIORITY
40833 M01S01859.271l750 +++| GT B5,B6,BNJ4 IF ENTRY .GT. NEW JOB
40834 M01S01860.271l750 +++| SX0 X4
40835 M01S01861.271l750 +++| BX4 X1
40836 M01S01862.271l750 +++| SX1 X0+
40837 M01S01863.271l750 +++| EQ /MONITOR/ACS ADVANCE SERVICE CYCLE
40838 M01S01864.271l750 +++|
40839 M01S01865.271l750 +++|* UPDATE SERVICE CYCLE OF JOB IN OTHER CPU IF SAME PRIORITY AS
40840 M01S01866.271l750 +++|* NEW JOB.
40841 M01S01867.271l750 +++|
40842 M01S01868.271l750 +++| BNJ5 SB3 A0-CPAL-1
40843 M01S01869.271l750 +++| SA1 -B3 GET OTHER CPU *CPAL*
40844 M01S01870.271l750 +++| LX1 -24
40845 M01S01871.271l750 +++| SA2 X1+STSW
40846 M01S01872.271l750 +++| LX2 59-56
40847 M01S01873.271l750 +++| MX6 -58
40848 M01S01874.271l750 +++| NG X2,BNJ6 IF SUB-CP ACTIVE
40849 M01S01875.271l750 +++| LX1 24 SET EXCHANGE PACKAGE ADDRESS
40850 M01S01876.271l750 +++| BNJ6 SA1 X1+CWQW GET OTHER CPU JOB *CWQW*
40851 M01S01877.271l750 +++| LX6 48-58
40852 M01S01878.271l750 +++| BX1 -X6*X1 CLEAR PRIORITY FLAGS
40853 M01S01879.271l750 +++| UX0 B5,X1 UNPACK PRIORITY OF OTHER CPU JOB
40854 M01S01880.271l750 +++| NE B5,B6,BNJ7 IF NOT SAME PRIORITY
40855 M01S01881.271l750 +++| SA7 A1+B1 SET SERVICE CYCLE AND CLEAR ACCUMULATORS
40856 M01S01882.271l750 +++| ERRNZ CSAW-CWQW-1
40857 M01S01883.271l750 +++|
40858 M01S01884.271l750 +++|* DETERMINE IF SETTING CPU SLICE ACTIVE HAS CHANGED THE ORDER
40859 M01S01885.271l750 +++|* OF *WQ*.
40860 M01S01886.271l750 +++|
40861 M01S01887.271l750 +++| BNJ7 LX4 59-49
40862 M01S01888.271l750 +++| PL X4,BNJ11 IF ALL ENTRIES HAD INACTIVE SLICE
40863 M01S01889.271l750 +++| SA1 WQRL
40864 M01S01890.271l750 +++| SB5 1000B INITIALIZE PREVIOUS ENTRY PRIORITY
40865 M01S01891.271l750 +++| BNJ8 SX2 A1 SET PREVIOUS ENTRY ADDRESS
40866 M01S01892.271l750 +++| SA1 X1
40867 M01S01893.271l750 +++| SB3 B5 SET PREVIOUS ENTRY PRIORITY
40868 M01S01894.271l750 +++| UX0,B5 X1 UNPACK *WQ* ENTRY PRIORITY
40869 M01S01895.271l750 +++| LT B5,B6,BNJ11 IF PRIORITY .LT. NEW JOB PRIORITY
40870 M01S01896.271l750 +++| LE B5,B3,BNJ8 IF ENTRY IN ORDER WITH PREVIOUS
40871 M01S01897.271l750 +++|
40872 M01S01898.271l750 +++|* FIND END OF *WQ* ENTRIES TO MOVE AND DELINK FROM QUEUE.
40873 M01S01899.271l750 +++|
40874 M01S01900.271l750 +++| BNJ9 SX4 A1 SET PREVIOUS ENTRY ADDRESS
40875 M01S01901.271l750 +++| SA1 X1+
40876 M01S01902.271l750 +++| UX0,B3 X1 UNPACK *WQ* ENTRY PRIORITY
40877 M01S01903.271l750 +++| EQ B3,B5,BNJ9 IF SAME PRIORITY AS PREVIOUS
40878 M01S01904.271l750 +++| SA2 X2
40879 M01S01905.271l750 +++| MX6 42
40880 M01S01906.271l750 +++| BX7 X6*X2 CLEAR OLD LINK
40881 M01S01907.271l750 +++| SX0 A1+
40882 M01S01908.271l750 +++| BX7 X7+X0 MERGE NEW LINK
40883 M01S01909.271l750 +++| SA7 A2+
40884 M01S01910.271l750 +++|
40885 M01S01911.271l750 +++|* FIND POSITION IN *WQ* TO INSERT ENTRIES AND RELINK INTO
40886 M01S01912.271l750 +++|* QUEUE.
40887 M01S01913.271l750 +++|
40888 M01S01914.271l750 +++| SA1 WQRL
40889 M01S01915.271l750 +++| BNJ10 SX7 A1 SET PREVIOUS ENTRY ADDRESS
40890 M01S01916.271l750 +++| SA1 X1+
40891 M01S01917.271l750 +++| UX0,B3 X1 UNPACK *WQ* ENTRY PRIORITY
40892 M01S01918.271l750 +++| LE B5,B3,BNJ10 IF POSITION NOT FOUND
40893 M01S01919.271l750 +++| SA4 X4 GET LAST ENTRY TO MOVE
40894 M01S01920.271l750 +++| BX2 -X6*X2 ADDRESS OF FIRST ENTRY TO MOVE
40895 M01S01921.271l750 +++| SX0 A1
40896 M01S01922.271l750 +++| SA1 X7
40897 M01S01923.271l750 +++| BX4 X6*X4 CLEAR OLD LINK
40898 M01S01924.271l750 +++| BX7 X4+X0 MERGE NEW LINK
40899 M01S01925.271l750 +++| SA7 A4
40900 M01S01926.271l750 +++| BX7 X6*X1 CLEAR OLD LINK
40901 M01S01927.271l750 +++| BX7 X7+X2 MERGE NEW LINK
40902 M01S01928.271l750 +++| SA7 A1
40903 M01S01929.271l750 +++|
40904 M01S01930.271l750 +++|* SEARCH *WQ* FOR JOB THAT CAN PREEMPT JOB IN OTHER CPU.
40905 M01S01931.271l750 +++|* SEARCH LOOP REPLICATED FOR PERFORMANCE.
40906 M01S01932.271l750 +++|
40907 M01S01933.271l750 +++| BNJ11 SB3 A0-CSWL-1
40908 M01S01934.271l750 +++| SA4 -B3 GET OTHER CPU *CSWL*
40909 M01S01935.271l750 +++| SA2 A4+TSCL-CSWL GET OTHER CPU *TSCL*
40910 M01S01936.271l750 +++| NG X4,/MONITOR/BNJ16 IF SWITCH REQUEST FOR OTHER CPU
40911 M01S01937.271l750 +++| SA1 WQRL GET *WQ* POINTER
40912 M01S01938.271l750 +++| SB6 A0-59+24 SET OTHER CPU SELECTION BIT SHIFT COUNT
40913 M01S01939.271l750 +++| UX0,B3 X2 UNPACK PRIORITY OF JOB IN OTHER CPU
40914 M01S01940.271l750 +++| SB6 -B6 SET SELECTION BIT FOR OTHER CPU
40915 M01S01941.271l750 +++| BNJ12 SA2 X1+ GET NEXT ENTRY
40916 M01S01942.271l750 +++| UX0,B5 X2 UNPACK *WQ* ENTRY PRIORITY
40917 M01S01943.271l750 +++| LX7 B6,X2
40918 M01S01944.271l750 +++| LE B5,B3,/MONITOR/BNJ16 IF ENTRY .LE. OTHER CPU JOB
40919 M01S01945.271l750 +++| PL X7,BNJ13 IF JOB CAN USE OTHER CPU
40920 M01S01946.271l750 +++| SA1 X2+ GET NEXT ENTRY
40921 M01S01947.271l750 +++| UX0,B5 X1 UNPACK *WQ* ENTRY PRIORITY
40922 M01S01948.271l750 +++| LX7 B6,X1
40923 M01S01949.271l750 +++| LE B5,B3,/MONITOR/BNJ16 IF ENTRY .LE. OTHER CPU JOB
40924 M01S01950.271l750 +++| NG X7,BNJ12 IF JOB CANNOT USE OTHER CPU
40925 M01S01951.271l750 +++| BNJ13 MX7 1
40926 M01S01952.271l750 +++| BX7 X4+X7
40927 M01S01953.271l750 +++| SA7 A4+ REQUEST SWITCH OF OTHER CPU
40928 M01S01954.271l750 +++| EQ /MONITOR/BNJ16 SET ACTIVE CPU STATUS
40929 M01S01955.271l750 +++| RCC SPACE 4,30
40930 M00S25026.cpumtr +++|** RCC - EXTENSION TO *RCC* FOR DUAL CPU MACHINES.
40931 M00S25027.cpumtr +++|*
| Line S25028 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40932 M01S25028.271l750 ---|* ENTRY (X0) = ADDRESS OF ACTIVE CP ON THIS CPU.
40933 M01S25029.271l750 ---|* (X2) = (JCIW) UNPACKED.
| Line S25030 Modification History |
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40934 M02S25030.271l750 ---|* (X3) = (RTCL) - (MINIMUM SLICE)
| Line S25031 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40935 M01S25031.271l750 ---|* (X7) = MASK OF -36.
40936 M01S25032.271l750 ---|* (A2) = *JCIW* OF NEW JOB.
| Line S01956 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40937 M01S01956.271l750 +++|* ENTRY (X1) = THIS CPU RECALL SLICE EXPIRATION TIME.
40938 M01S01957.271l750 +++|* (X2) = CURRENT MILLISECOND CLOCK.
40939 M01S01958.271l750 +++|* (X3) = *CWQW* OF RECALLED JOB.
40940 M01S01959.271l750 +++|* (X4) = *CSWL* FOR THIS CPU.
40941 M01S01960.271l750 +++|* (X7) = 24 BIT MASK LEFT JUSTIFIED.
40942 M01S01961.271l750 +++|* (A3) = *CWQW* ADDRESS OF RECALLED JOB.
40943 M01S01962.271l750 +++|* (A4) = ADDRESS OF *CSWL* FOR THIS CPU.
40944 M00S25033.cpumtr +++|* (B3) = EXIT ADDRESS.
| Line S25034 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40945 M01S25034.271l750 ---|* (B4) = NEW JOB PRIORITY.
40946 M01S25035.271l750 ---|* (B5) = THIS CPU JOB PRIORITY.
| Line S01963 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40947 M01S01963.271l750 +++|* (B4) = RECALLED JOB PRIORITY AND FLAGS.
40948 M01S01964.271l750 +++|* (B5) = THIS CPU JOB PRIORITY AND FLAGS.
40949 M00S25036.cpumtr +++|*
| Line S25037 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40950 M01S25037.271l750 ---|* EXIT CPU SWITCH REQUESTED AS REQUIRED.
40951 M01S25038.271l750 ---|* (A2) = UNCHANGED.
| Line S01965 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40952 M01S01965.271l750 +++|* EXIT TO */MONITOR/RCC12* TO CHECK RECALL SLICE EXPIRATION
40953 M01S01966.271l750 +++|* FOR THIS CPU.
40954 M01S01967.271l750 +++|* TO */MONITOR/RCC13* TO UPDATE *CWQW* AND REQUEST CPU
40955 M01S01968.271l750 +++|* SWITCH.
40956 M01S01969.271l750 +++|* TO */MONITOR/RCC14* TO UPDATE *CWQW* AND CLEAR *MTR*
40957 M01S01970.271l750 +++|* BYPASS FLAG.
40958 M01S01971.271l750 +++|* (X3) = *CWQW* OF RECALLED JOB.
40959 M01S01972.271l750 +++|* (X4) = *CSWL* OF CPU FOR SWITCH REQUEST IF EXIT TO
40960 M01S01973.271l750 +++|* *RCC13*.
40961 M01S01974.271l750 +++|* (A3) = *CWQW* ADDRESS OF RECALLED JOB.
40962 M01S01975.271l750 +++|* (A4) = *CSWL* ADDRESS OF CPU FOR SWITCH REQUEST IF
40963 M01S01976.271l750 +++|* EXIT TO *RCC13*.
40964 M01S01977.271l750 +++|* (B3) = EXIT ADDRESS.
40965 M00S25039.cpumtr +++|*
| Line S25040 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40966 M01S25040.271l750 ---|* USES X - 1, 2, 4, 6, 7.
| Line S01978 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40967 M01S01978.271l750 +++|* USES X - 0, 1, 4, 6.
40968 M00S25041.cpumtr +++|* B - 6.
| Line S25042 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40969 M01S25042.271l750 ---|* A - 1, 2, 4, 6, 7.
| Line S01979 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40970 M01S01979.271l750 +++|* A - 1, 4.
40971 M00S25043.cpumtr +++|
40972 M00S25044.cpumtr +++|
| Line S25045 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40973 M01S25045.271l750 ---| RCC MX6 -2 CHECK CPU SELECTION
40974 M01S25046.271l750 ---| SB6 A0-CPAL-1
40975 M01S25047.271l750 ---| AX2 36
40976 M01S25048.271l750 ---| SA4 -B6 GET ACTIVE CP IN OTHER CPU
40977 M01S25049.271l750 ---| BX2 -X6*X2
| Line S25050 Modification History |
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40978 M02S25050.271l750 ---| SB6 X2
| Line S02064 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40979 M02S02064.271l750 ---| SB6 X2+
| Line S25051 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40980 M01S25051.271l750 ---| SA1 A4+ACPL-CPAL CHECK OTHER CPU
| Line S01980 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40981 M01S01980.271l750 +++| RCC SB6 A0-59+24 SET OTHER CPU SELECTION BIT SHIFT COUNT
40982 M01S01981.271l750 +++| SB6 -B6
40983 M01S01982.271l750 +++| LX0 X3,B6
40984 M01S01983.271l750 +++| PL X0,RCC1 IF JOB CAN USE OTHER CPU
40985 M01S01984.271l750 +++| SB6 A0+59-25 SET THIS CPU SELECTION BIT SHIFT COUNT
40986 M01S01985.271l750 +++| LX0 B6,X3
| Line S02065 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
40987 M01S02065.271l716 +++| NO
| Line S25052 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40988 M01S25052.271l750 ---| BX6 -X7*X1
40989 M01S25053.271l750 ---| ZR X6,RCC0 IF SUBCP NOT ACTIVE
40990 M01S25054.271l750 ---| AX4 24
40991 M01S25055.271l750 ---| RCC0 SA1 A4+TSCL-CPAL GET OTHER CPU JOB PRIORITY
40992 M01S25056.271l750 ---| NZ B6,RCC5 IF CPU SELECTION
40993 M01S25057.271l750 ---| UX2,B6 X1
40994 M01S25058.271l750 ---| GT B4,B5,RCC10 IF NEW .GT. CURRENT JOB
40995 M01S25059.271l750 ---| BX6 X1
40996 M01S25060.271l750 ---| GT B4,B6,RCC9 IF NEW .GT. OTHER CPU JOB PRIORITY
| Line S25061 Modification History |
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
40997 M02S25061.271l750 ---| LT B4,B5,RCC1 IF NEW .LT. THIS CPU JOB PRIORITY
40998 M02S25062.271l750 ---| PL X3,/MONITOR/RCC12 IF MINIMUM SLICE EXPIRED THIS CPU
40999 M02S25063.271l750 ---| RCC1 LT B4,B6,/MONITOR/RCC14 IF NEW .LT. OTHER CPU JOB
41000 M02S25064.271l750 ---| SA1 RTCL
41001 M02S25065.271l750 ---| BX1 -X7*X1 REAL TIME CLOCK (MS)
41002 M02S25066.271l750 ---| IX1 X1-X2
41003 M02S25067.271l750 ---| NG X1,RCC6.1 IF SLICE NOT EXPIRED OTHER CPU
41004 M02S25068.271l750 ---| RCC4 SA1 X4+CRCW CLEAR RECALL ACCUMULATOR
41005 M02S25069.271l750 ---| MX7 -48
41006 M02S25070.271l750 ---| BX6 -X7*X1
41007 M02S25071.271l750 ---| SA6 A1+
41008 M02S25072.271l750 ---| SA7 A4+CSWL-CPAL SWITCH OTHER CPU
| Line S25073 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41009 M01S25073.271l750 ---| EQ /MONITOR/RCC14 RETURN
| Line S01986 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41010 M01S01986.271l750 +++| NG X0,/MONITOR/RCC14 IF JOB CANNOT USE THIS CPU
41011 M00S25074.cpumtr +++|
| Line S25075 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41012 M01S25075.271l750 ---| RCC5 SB6 B6+A0 CHECK IN CORRECT CPU
41013 M01S25076.271l750 ---| SB6 B6-B1
41014 M01S25077.271l750 ---| EQ B6,B1,RCC6 IF SELECTION FOR OTHER CPU
41015 M01S25078.271l750 ---| GT B4,B5,/MONITOR/RCC8 IF NEW .GT. CURRENT JOB
| Line S25079 Modification History |
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41016 M02S25079.271l750 ---| LT B4,B5,/MONITOR/RCC14 IF NEW .LT. CURRENT JOB
41017 M02S25080.271l750 ---| EQ /MONITOR/RCC6 CHECK CPU SLICE - THIS CPU
| Line S02066 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41018 M02S02066.271l750 ---| EQ /MONITOR/RCC14 EXIT
| Line S01987 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41019 M01S01987.271l750 +++|* CHECK PRIORITY OF JOB WITH SELECTION FOR THIS CPU.
41020 M00S25081.cpumtr +++|
| Line S25082 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41021 M01S25082.271l750 ---| RCC6 BX6 X1
41022 M01S25083.271l750 ---| UX2,B6 X1
41023 M01S25084.271l750 ---| GT B4,B6,RCC9 IF NEW .GT. OTHER CPU JOB PRIORITY
| Line S25085 Modification History |
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41024 M02S25085.271l750 ---| LT B4,B6,/MONITOR/RCC14 IF NEW .LT. OTHER CPU JOB
41025 M02S25086.271l750 ---| SA1 RTCL
41026 M02S25087.271l750 ---| BX1 -X7*X1 REAL TIME CLOCK (MS)
41027 M02S25088.271l750 ---| IX1 X1-X2
41028 M02S25089.271l750 ---| PL X1,RCC4 IF MINIMUM SLICE EXPIRED OTHER CPU
41029 M02S25090.271l750 ---| RCC6.1 SA6 A4+CSWL-CPAL SET OTHER CPU SLICE TO MINIMUM
| Line S25091 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41030 M01S25091.271l750 ---| EQ /MONITOR/RCC14 RETURN
| Line S01988 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
41031 M01S01988.271l750 +++| GT B4,B5,/MONITOR/RCC13 IF NEW JOB .GT. THIS CPU JOB