Seq # *Modification Id* Act
----------------------------+
50976 M00S30369.cpumtr +++| BX6 X6*X1
50977 M00S30370.cpumtr +++| SA6 A1
50978 M00S30371.cpumtr +++| EQ SSC18 EXIT
50979 M00S30372.cpumtr +++|
50980 M00S30373.cpumtr +++| SSF15 SA1 SSFC CHECK CONNECTIONS REQUIRED FOR FUNCTION
50981 M00S30374.cpumtr +++| UX2,B5 X7
50982 M00S30375.cpumtr +++| LX1 B5
50983 M00S30376.cpumtr +++| PL X1,SSF14.1 IF NO CONNECTION CHECKING NECESSARY
50984 M00S30377.cpumtr +++| LX4 -18
50985 M00S30378.cpumtr +++| SA2 X4+SSCW GET UCP CONTROL WORD
50986 M00S30379.cpumtr +++| LX4 -18
Line S30380 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
50987 M01S30380.v22l602 ---| SB6 X4 SUBSYSTEM INDEX * 4
Line S00220 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
50988 M01S00220.v22l602 +++| SB6 X4 SHIFT COUNT
50989 M00S30381.cpumtr +++| LX4 36
50990 M00S30382.cpumtr +++| MX6 -4
Line S30383 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
50991 M01S30383.v22l602 ---| LX1 X6,B6
50992 M01S30384.v22l602 ---| BX6 -X1*X2
Line S00221 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
50993 M01S00221.v22l602 +++| LX2 B6
50994 M01S00222.v22l602 +++| BX6 -X6*X2
50995 M01S00223.v22l602 +++| ZR B6,SSF16 IF NO CONNECTION
50996 M00S30385.cpumtr +++| NZ X6,SSF14.1 IF CONNECTIONS ESTABLISHED
50997 M00S30386.cpumtr +++| SSF16 SX5 RC63 * UCP NOT ESTABLISHED WITH SUBSYSTEM.*
50998 M00S30387.cpumtr +++| EQ SSF12 SET REPLY CODE
50999 M00S30388.cpumtr +++|
51000 M00S30389.cpumtr +++| SSF18 SX5 RC45 * USER JOB IS NOT IN SYSTEM.*
51001 M00S30390.cpumtr +++| EQ SSF12 SET REPLY CODE
51002 M00S30391.cpumtr +++|
51003 M00S30392.cpumtr +++| SSF19 BX5 X5-X5 RC = COMPLETE, NO ERRORS
51004 M00S30393.cpumtr +++| SB6 B1
51005 M00S30394.cpumtr +++| EQ SSF12 COMPLETE REQUEST
51006 M00S30395.cpumtr +++|
51007 M00S30396.cpumtr +++| SSF20 SX5 RC42 * SCP CM/ECS ADDRESS OUT OF RANGE.*
51008 M00S30397.cpumtr +++| SB6 -B1 SET FATAL ERROR
51009 M00S30398.cpumtr +++| MX0 -12
51010 M00S30399.cpumtr +++| EQ SSF12 COMPLETE REQUEST
51011 M00S30400.cpumtr +++|
51012 M00S30401.cpumtr +++| SSF21 SX5 RC41 * JOB IDENTIFIER INVALID.*
51013 M00S30402.cpumtr +++| EQ SSF12 COMPLETE REQUEST
51014 M00S30403.cpumtr +++|
51015 M00S30404.cpumtr +++| SSF22 SX5 RC67 * EXCESSIVE ACCUMULATOR INCREMENT.*
51016 M00S30405.cpumtr +++| EQ SSF12 COMPLETE REQUEST
51017 M00S30406.cpumtr +++|
51018 M00S30407.cpumtr +++|
51019 M00S30408.cpumtr +++|* TABLE OF FUNCTIONS WHICH REQUIRE SCPA VALIDITY CHECKING.
51020 M00S30409.cpumtr +++|*
51021 M00S30410.cpumtr +++|* 2 BITS PER SFCALL FUNCTION - 1/A, 1/R
51022 M00S30411.cpumtr +++|* A IF SET, SCPA VALIDATION IS REQUIRED.
51023 M00S30412.cpumtr +++|* R RESERVED.
51024 M00S30413.cpumtr +++|*
51025 M00S30414.cpumtr +++|* NOTE - INSTALLATION RESERVED SFCALL FUNCTIONS (70-76)
51026 M00S30415.cpumtr +++|* SHOULD USE ADDITIONAL VALIDATION WORD.
51027 M00S30416.cpumtr +++|
51028 M00S30417.cpumtr +++| SSFB BSS 0
51029 M00S30418.cpumtr +++| POS 60-REGR SF.REGR
51030 M00S30419.cpumtr +++| VFD 1/1
51031 M00S30420.cpumtr +++| POS 60-READ SF.READ
51032 M00S30421.cpumtr +++| VFD 1/1
51033 M00S30422.cpumtr +++| POS 60-WRIT SF.WRIT
51034 M00S30423.cpumtr +++| VFD 1/1
51035 M00S30424.cpumtr +++| POS 60-LIST SF.LIST
51036 M00S30425.cpumtr +++| VFD 1/1
51037 M00S30426.cpumtr +++| POS 60-XLST SF.XLST
51038 M00S30427.cpumtr +++| VFD 1/1
51039 M00S30428.cpumtr +++| POS 60-CPID SF.CPID
51040 M00S30429.cpumtr +++| VFD 1/1
51041 M00S30430.cpumtr +++| POS 1
51042 M00S30431.cpumtr +++| VFD 1/0 AVOID *PASS* INSTRUCTIONS
51043 M00S30432.cpumtr +++| BSS 0 FORCE UPPER
51044 M00S30433.cpumtr +++|
51045 M00S30434.cpumtr +++|
51046 M00S30435.cpumtr +++|* TABLE OF FUNCTIONS WHICH REQUIRE UCPA VALIDITY CHECKING.
51047 M00S30436.cpumtr +++|*
51048 M00S30437.cpumtr +++|* 2 BITS PER SFCALL FUNCTION - 1/A, 1/B
51049 M00S30438.cpumtr +++|* A IF SET, UCPA VALIDATION IS REQUIRED.
51050 M00S30439.cpumtr +++|* B IF SET, UCPA TO BE VERIFIED IS EXTENDED ADDRESS.
51051 M00S30440.cpumtr +++|*
51052 M00S30441.cpumtr +++|* NOTE - INSTALLATION RESERVED SFCALL FUNCTIONS (70-76)
51053 M00S30442.cpumtr +++|* SHOULD USE ADDITIONAL VALIDATION WORD.
51054 M00S30443.cpumtr +++|
51055 M00S30444.cpumtr +++| SSFC BSS 0
51056 M00S30445.cpumtr +++| POS 60-ENDT SF.ENDT
51057 M00S30446.cpumtr +++| VFD 1/1
51058 M00S30447.cpumtr +++| VFD 1/0
51059 M00S30448.cpumtr +++| POS 60-READ SF.READ
51060 M00S30449.cpumtr +++| VFD 1/1
51061 M00S30450.cpumtr +++| VFD 1/0
51062 M00S30451.cpumtr +++| POS 60-WRIT SF.WRIT
51063 M00S30452.cpumtr +++| VFD 1/1
51064 M00S30453.cpumtr +++| VFD 1/0
51065 M00S30454.cpumtr +++| POS 60-XRED SF.XRED
51066 M00S30455.cpumtr +++| VFD 1/1
51067 M00S30456.cpumtr +++| VFD 1/1
51068 M00S30457.cpumtr +++| POS 60-XWRT SF.XWRT
51069 M00S30458.cpumtr +++| VFD 1/1
51070 M00S30459.cpumtr +++| VFD 1/1
51071 M00S30460.cpumtr +++| POS 1
51072 M00S30461.cpumtr +++| VFD 1/0 AVOID *PASS* INSTRUCTIONS
51073 M00S30462.cpumtr +++| BSS 0 FORCE UPPER
51074 M00S30463.cpumtr +++|
Line S30464 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51075 M01S30464.v22l602 ---| SSFD CON 00003567356735673567B
51076 M00S30465.cpumtr +++|
51077 M00S30466.cpumtr +++| SSFE CON 0 SFCALL REMAINING MONITOR MODE TIME
51078 M00S30467.cpumtr +++|
51079 M00S30468.cpumtr +++| SSFF CON 0 UCP EJT ENTRY ABSOLUTE ADDRESS
Line S00042 Modification History
M01 (Added by) cpumt61
Seq # *Modification Id* Act
----------------------------+
51080 M01S00042.cpumt61 +++| SSFG CON 0 *STSW* FLAGS FOR FUNCTION 24
51081 M00S30469.cpumtr +++| EJECT
51082 M00S30470.cpumtr +++| SST SPACE 4,10
51083 M00S30471.cpumtr +++|*** *SST*
51084 M00S30472.cpumtr +++|* PROCESS FILE SWITCHING.
51085 M00S30473.cpumtr +++|*
51086 M00S30474.cpumtr +++|*T 18/ *SST*,1/ ,1/R,10/ ,12/ SS,18/ ADDR
Figure
0 17 18 29 ADDR SS 30 39 40 41 42 59 R *SST*
51087 M00S30475.cpumtr +++|*
51088 M00S30476.cpumtr +++|* SS SUBSYSTEM IDENTIFICATION OF PARTNER (FCN = 1 OR 2).
51089 M00S30477.cpumtr +++|*
51090 M00S30478.cpumtr +++|*T ADDR 12/ FNTR,12/ FNTS,18/ RSV,6/ FCN,11/ ST,1/C
Figure
ADDR
0 1 11 12 17 18 29 C ST FCN RSV 30 35 36 47 48 59 RSV FNTS FNTR
51091 M00S30479.cpumtr +++|*T ADDR+1 24/ JSN,24/ 0,12/ JEJT
Figure
ADDR+1
0 11 12 29 JEJT 0 30 35 36 59 0 JSN
51092 M00S30480.cpumtr +++|*
51093 M00S30481.cpumtr +++|* C COMPLETION BIT.
51094 M00S30482.cpumtr +++|* FCN FUNCTION CODE -
51095 M00S30483.cpumtr +++|* CUSU = 1 CALLER UCP - SCP TO UCP SWITCH.
51096 M00S30484.cpumtr +++|* CUUS = 2 CALLER UCP - UCP TO SCP SWITCH.
51097 M00S30485.cpumtr +++|* CSUS = 3 CALLER SCP - UCP TO SCP SWITCH.
51098 M00S30486.cpumtr +++|* CSSU = 4 CALLER SCP - SCP TO UCP SWITCH.
51099 M00S30487.cpumtr +++|* FNTR FNT ORDINAL IN RECEIVER-S FNT (RETURNED PARAMETER).
51100 M00S30488.cpumtr +++|* (SET TO PARTNER CPA BY *CPUMTR* FOR *1MA*.)
51101 M00S30489.cpumtr +++|* FNTS FNT ORDINAL IN SOURCES FNT.
51102 M00S30490.cpumtr +++|* JEJT PARTNERS EJT ORDINAL (FCN = 3 OR 4).
51103 M00S30491.cpumtr +++|* JSN JOB SEQUENCE NUMBER FOR PARTNER (FCN = 3 OR 4).
51104 M00S30492.cpumtr +++|* RSV RESERVED FOR CDC.
51105 M00S30493.cpumtr +++|* ST RETURN STATUS CODE -
51106 M00S30494.cpumtr +++|* 00 SWITCH COMPLETED NORMALLY.
51107 M00S30495.cpumtr +++|* 01 FILE BUSY.
51108 M00S30496.cpumtr +++|* 02 PARTNER ROLLED OUT.
51109 M00S30497.cpumtr +++|* 03 INCORRECT FILE TYPE.
51110 M00S30498.cpumtr +++|* 04 PARTNERS IDENTIFICATION NOT KNOWN.
51111 M00S30499.cpumtr +++|* 05 NO SPACE IN RECEIVER-S NFL.
51112 M00S30500.cpumtr +++|* 06 LOCAL FILE LIMIT (MAXIMUM NFL).
51113 M00S30501.cpumtr +++|* 07 FILE *FNTS* NOT FOUND.
51114 M00S30502.cpumtr +++|
51115 M00S30503.cpumtr +++|
51116 M00S30504.cpumtr +++|* GET FUNCTION CODE.
51117 M00S30505.cpumtr +++|
51118 M00S30506.cpumtr +++| SST SB6 X5 CHECK *ADDR* WITHIN RANGE
51119 M00S30507.cpumtr +++| LE B6,B1,CPE IF *ADDR* .LE. 1
51120 M00S30508.cpumtr +++| MX2 -6
51121 M00S30509.cpumtr +++| GT B6,B4,CPE IF *ADDR* .GE. FL
51122 M00S30510.cpumtr +++| SX3 X5
51123 M00S30511.cpumtr +++| SA1 B3 RA
51124 M00S30512.cpumtr +++| IX6 X3+X1
51125 M00S30513.cpumtr +++| ERX1 X6 GET (ADDR)
51126 M00S30514.cpumtr +++| SA6 T1 SAVE ABSOLUTE ADDRESS OF PARAMETER BLOCK
51127 M00S30515.cpumtr +++| LX1 59-0
51128 M00S30516.cpumtr +++| NG X1,CPE IF COMPLETION BIT ALREADY SET
51129 M00S30517.cpumtr +++| LX1 49 VALIDATE FUNCTION CODE
51130 M00S30518.cpumtr +++| BX3 -X2*X1
51131 M00S30519.cpumtr +++| SB5 X3-FCNM
51132 M00S30520.cpumtr +++| ZR X3,CPE IF *FCN* INVALID
51133 M00S30521.cpumtr +++| SX7 X3-1 FUNCTION CODE - 1
51134 M00S30522.cpumtr +++| SX3 X3-CSUS
51135 M00S30523.cpumtr +++| PL B5,CPE IF *FCN* INVALID
51136 M00S30524.cpumtr +++| PL X3,SST2 IF CALL FROM SCP
51137 M00S30525.cpumtr +++|
51138 M00S30526.cpumtr +++|* PROCESS REQUEST FROM UCP TYPE CALLER.
51139 M00S30527.cpumtr +++|
51140 M00S30528.cpumtr +++| LX5 -18 GET SUBSYSTEM CODE
51141 M00S30529.cpumtr +++| BX1 -X0*X5
51142 M00S30530.cpumtr +++| LX5 18
Line S30531 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51143 M01S30531.v22l602 ---| SX2 X1-MNSI SUBSYSTEM INDEX
Line S00224 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
51144 M01S00224.v22l602 +++| SX2 X1-LSSI-1
51145 M00S30532.cpumtr +++| NG X2,CPE IF NOT SUBSYSTEM
Line S30533 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51146 M01S30533.v22l602 ---| LX2 2 SUBSYSTEM INDEX * 4
51147 M01S30534.v22l602 ---| SB6 X2
51148 M00S30535.cpumtr +++| SA2 B7+AACW CHECK VALIDATION OF CALLER AS UCP
51149 M00S30536.cpumtr +++| LX2 59-11
Line S30537 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51150 M01S30537.v22l602 ---| PX4 X1,B6
Line S00225 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
51151 M01S00225.v22l602 +++| BX4 X1 SAVE SSID
51152 M00S30538.cpumtr +++| SB3 SST1 SET EXIT ADDRESS FOR *RSC*
51153 M00S30539.cpumtr +++| NG X2,RSC IF VALIDATED, RETURN SUBSYSTEM CONTROL
51154 M00S30540.cpumtr +++| EQ CPE UNAUTHORIZED UCP
51155 M00S30541.cpumtr +++|
51156 M00S30542.cpumtr +++|* RETURN FROM *RSC* WITH -
51157 M00S30543.cpumtr +++|* (A2) SUBSYSTEM CPA + STSW.
51158 M00S30544.cpumtr +++|* (B7) CALLER-S CPA.
51159 M00S30545.cpumtr +++|* (X0) -7777B.
51160 M00S30546.cpumtr +++|* (X3) SUBSYSTEM RA.
Line S30547 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51161 M01S30547.v22l602 ---|* (X4) SUBSYSTEM INDEX*4.
Line S00226 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
51162 M01S00226.v22l602 +++|* (X4) SUBSYSTEM ID.
51163 M00S30548.cpumtr +++|* (X6) SUBSYSTEM FL.
51164 M00S30549.cpumtr +++|* (X7) FUNCTION CODE - 1.
51165 M00S30550.cpumtr +++|
51166 M00S30551.cpumtr +++|* *RSC* ERROR EXIT ADDRESSES -
51167 M00S30552.cpumtr +++|
Line S30553 Modification History
M01 (Removed by) cpumt66
Seq # *Modification Id* Act
----------------------------+
51168 M01S30553.cpumt66 ---|+ VFD 12/SST7-SST1,18/SST7,12/SST1-SST1,18/SST1
Line S00001 Modification History
M01 (Added by) cpumt66
Seq # *Modification Id* Act
----------------------------+
51169 M01S00001.cpumt66 +++|+ VFD 12/SST7-SST1,18/SST7,12/SST10-SST1,18/SST1
51170 M00S30554.cpumtr +++|
51171 M00S30555.cpumtr +++| SST1 SX1 SSIW CHECK SUBSYSTEM IDENTIFICATION
51172 M00S30556.cpumtr +++| IX1 X3+X1
51173 M00S30557.cpumtr +++| ERX1 X1
51174 M00S30558.cpumtr +++| SB6 A2-STSW SCP CPA
51175 M00S30559.cpumtr +++| BX1 X1-X4 COMPARE WITH SUBSYSTEM IDENTIFICATION
51176 M00S30560.cpumtr +++| SX2 SSCR
51177 M00S30561.cpumtr +++| IX2 X2+X3
51178 M00S30562.cpumtr +++| ERX3 X2 SUBSYSTEM RECEIVING BUFFER
51179 M00S30563.cpumtr +++| BX1 -X0*X1
51180 M00S30564.cpumtr +++| LX3 1
51181 M00S30565.cpumtr +++| NZ X1,CPE IF SUBSYSTEM NOT INITIALIZED
51182 M00S30566.cpumtr +++| SB4 B7 UCP CPA
Line S30567 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51183 M01S30567.v22l602 ---| UX4 B5,X4
51184 M00S30568.cpumtr +++| SA1 B4+JCIW CHECK IF UCP IS SUBSYSTEM
Line S30569 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51185 M01S30569.v22l602 ---| SX4 B5 SUBSYSTEM INDEX * 4
51186 M00S30570.cpumtr +++| LX1 36
51187 M00S30571.cpumtr +++| PL X3,SST1.1 IF NO RESTRICTIONS ON UCP ACCESS
51188 M00S30572.cpumtr +++|
51189 M00S30573.cpumtr +++|* VALIDATE PERMISSION STATUS.
51190 M00S30574.cpumtr +++|
51191 M00S30575.cpumtr +++| SA2 B4+SEPW READ SPECIAL ENTRY POINT WORD
51192 M00S30576.cpumtr +++| BX1 -X0*X1
51193 M00S30577.cpumtr +++| LX2 59-50
51194 M00S30578.cpumtr +++| NG X2,SST1.1 IF SSJ= ENTRY POINT
51195 M00S30579.cpumtr +++| ZR X1,CPE IF NOT AUTHORIZED UCP
51196 M00S30580.cpumtr +++| SST1.1 SA3 T1 GET ABSOLUTE ADDRESS OF PARAMETER BLOCK
51197 M00S30581.cpumtr +++| SX2 B1
51198 M00S30582.cpumtr +++| IX2 X2+X3
51199 M00S30583.cpumtr +++| SA1 B6+TFSW GET SCP EJT ORDINAL
51200 M00S30584.cpumtr +++| LX1 12
51201 M00S30585.cpumtr +++| BX7 -X0*X1
51202 M00S30586.cpumtr +++| EWX7 X2
51203 M00S30587.cpumtr +++| EQ SST3 CONTINUE PROCESSING
51204 M00S30588.cpumtr +++|
51205 M00S30589.cpumtr +++|* PROCESS REQUEST FROM SCP TYPE CALLER.
51206 M00S30590.cpumtr +++|* ENSURE THAT CALLER IS SUBSYSTEM AND
51207 M00S30591.cpumtr +++|* THAT SUBSYSTEM IDENTIFICATION WORD MATCHES CALLER.
51208 M00S30592.cpumtr +++|
51209 M00S30593.cpumtr +++| SST2 SA2 B7+JCIW CHECK SUBSYSTEM CALL
51210 M00S30594.cpumtr +++| LX2 -24 GET SUBSYSTEM IDENTIFICATION
51211 M00S30595.cpumtr +++| BX4 -X0*X2
51212 M00S30596.cpumtr +++| SA1 RA
51213 M00S30597.cpumtr +++| SX7 SSIW READ SUBSYSTEM IDENTIFICATION WORD
51214 M00S30598.cpumtr +++| IX1 X1+X7
51215 M00S30599.cpumtr +++| ERX1 X1
51216 M00S30600.cpumtr +++| BX7 -X0*X1 SUBSYSTEM CODE
51217 M00S30601.cpumtr +++| BX7 X4-X7
Line S30602 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51218 M01S30602.v22l602 ---| SX4 X4-MNSI
Line S00227 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
51219 M01S00227.v22l602 +++| SX2 X4-LSSI-1
51220 M00S30603.cpumtr +++| NZ X7,CPE IF SUBSYSTEM NOT INITIALIZED
Line S30604 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51221 M01S30604.v22l602 ---| NG X4,CPE IF CALLER NOT SUBSYSTEM
51222 M01S30605.v22l602 ---| LX4 2 SUBSYSTEM INDEX * 4
Line S00228 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
51223 M01S00228.v22l602 +++| NG X2,CPE IF CALLER IS NOT A SUBSYSTEM
51224 M00S30606.cpumtr +++|
51225 M00S30607.cpumtr +++|* VALIDATE *JSN* AND *JEJT* FROM (*ADDR*+1).
51226 M00S30608.cpumtr +++|
51227 M00S30609.cpumtr +++| SB6 CPE SET ERROR RETURN FOR *CUI*
51228 M00S30610.cpumtr +++| SB5 SST2.1 SET NORMAL RETURN FOR *CUI*
51229 M00S30611.cpumtr +++| EQ CUI CHECK UCP IDENTIFICATION
51230 M00S30612.cpumtr +++|
51231 M00S30613.cpumtr +++| SST2.1 BX7 X6 SAVE JOB SEQUENCE NUMBER MATCH STATUS
51232 M00S30614.cpumtr +++| SX6 RC04 * PARTNERS IDENTIFICATION NOT KNOWN.*
51233 M00S30615.cpumtr +++| SB4 X5 UCP CPA
51234 M00S30616.cpumtr +++| NZ X7,SST6 IF JOB SEQUENCE NUMBER MISMATCH
51235 M00S30617.cpumtr +++| SX6 RC02 * PARTNER ROLLED OUT.*
51236 M00S30618.cpumtr +++| NZ X2,SST6 IF UCP NOT AT CONTROL POINT
Line S00001 Modification History
M01 (Added by) cpumt93
Seq # *Modification Id* Act
----------------------------+
51237 M01S00001.cpumt93 +++| SA2 CMCL CHECK FOR STORAGE MOVE
Line S00002 Modification History
M01 (Added by) cpumt93
M02 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
51238 M02S00002.271l716 ---| LX2 12
51239 M02S00003.271l716 ---| BX2 -X0*X2
Line S02831 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
51240 M01S02831.271l716 +++| AX2 48
51241 M01S02832.271l716 +++| LX2 7
Line S00004 Modification History
M01 (Added by) cpumt93
Seq # *Modification Id* Act
----------------------------+
51242 M01S00004.cpumt93 +++| BX2 X2-X5
51243 M01S00005.cpumt93 +++| ZR X2,SXS IF UCP MOVING, SET *X* STATUS
Line S30619 Modification History
M01 (Removed by) cpumt84
Seq # *Modification Id* Act
----------------------------+
51244 M01S30619.cpumt84 ---| SB6 X5+ PARTNERS CPA
Line S00001 Modification History
M01 (Added by) cpumt84
Seq # *Modification Id* Act
----------------------------+
51245 M01S00001.cpumt84 +++| SA2 X5+STSW
51246 M01S00002.cpumt84 +++| SB6 X5 PARTNERS CPA
51247 M01S00003.cpumt84 +++| LX2 59-24
51248 M01S00004.cpumt84 +++| NG X2,SST6 IF ROLLOUT REQUESTED ON UCP
51249 M00S30620.cpumtr +++|
51250 M00S30621.cpumtr +++|* CONTINUE PROCESSING ALL FUNCTIONS.
51251 M00S30622.cpumtr +++|*
51252 M00S30623.cpumtr +++|* (X3) = ABSOLUTE ADDRESS OF STATUS WORD.
Line S00229 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
51253 M01S00229.v22l602 +++|* (X4) = SSID.
51254 M00S30624.cpumtr +++|* (B4) = UCP CPA.
51255 M00S30625.cpumtr +++|* (B6) = CPA OF PARTNER.
51256 M00S30626.cpumtr +++|* (B7) = CPA OF CALLER.
51257 M00S30627.cpumtr +++|
51258 M00S30628.cpumtr +++|* CHECK LONG TERM CONNECTION.
51259 M00S30629.cpumtr +++|
Line S30630 Modification History
M01 (Removed by) v22l602
Seq # *Modification Id* Act
----------------------------+
51260 M01S30630.v22l602 ---| SST3 SA1 B4+SSCW READ SUBSYSTEM CONTROL WORD OF UCP
51261 M01S30631.v22l602 ---| SB5 X4+3
51262 M01S30632.v22l602 ---| SX6 B1
51263 M01S30633.v22l602 ---| ERX2 X3 READ (ADDR)
51264 M01S30634.v22l602 ---| LX6 X6,B5
51265 M01S30635.v22l602 ---| BX4 X6*X1
51266 M01S30636.v22l602 ---| ZR X4,CPE IF NO LONG TERM CONNECTION
Line S00230 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
51267 M01S00230.v22l602 +++| SST3 BX2 X4 SSID
51268 M01S00231.v22l602 +++| BX5 X3 SAVE REGISTERS
51269 M01S00232.v22l602 +++| SB5 B6
51270 M01S00233.v22l602 +++| SB3 B4
51271 M01S00234.v22l602 +++| SA3 B4+SSCW
51272 M01S00235.v22l602 +++| SB4 SST3.1 RETURN ADDRESS FOR *CSC*
51273 M01S00236.v22l602 +++| EQ CSC CHECK SUBSYSTEM CONNECTION
51274 M01S00237.v22l602 +++|
51275 M01S00238.v22l602 +++| SST3.1 ZR B6,CPE IF NOT CONNECTED
51276 M01S00239.v22l602 +++| SA3 A3
51277 M01S00240.v22l602 +++| LX3 B6
51278 M01S00241.v22l602 +++| SB6 B5
51279 M01S00242.v22l602 +++| SB4 B3
51280 M01S00243.v22l602 +++| LX3 59-3
51281 M01S00244.v22l602 +++| PL X3,CPE IF NO LONG TERM CONNECTION
51282 M01S00245.v22l602 +++| BX3 X5
51283 M01S00246.v22l602 +++| ERX2 X3 READ (ADDR)
51284 M00S30637.cpumtr +++|
51285 M00S30638.cpumtr +++|* VALIDATE *FNTS* ADDRESS.
51286 M00S30639.cpumtr +++|
51287 M00S30640.cpumtr +++| LX2 59-12
51288 M00S30641.cpumtr +++| SB5 B6 GET PARTNER FL STATUS WORD
51289 M00S30642.cpumtr +++| NG X2,SST4 IF FCN = 1 OR 3
51290 M00S30643.cpumtr +++| SB5 B7+ GET CALLER FL STATUS WORD
51291 M00S30644.cpumtr +++| SST4 LX2 59-35-59+12
51292 M00S30645.cpumtr +++| SA1 B5+FLSW
51293 M00S30646.cpumtr +++| BX4 -X0*X2 FNTS
51294 M00S30647.cpumtr +++| LX1 12
51295 M00S30648.cpumtr +++| SB4 X4
51296 M00S30649.cpumtr +++| BX2 -X0*X1 NFL SIZE
51297 M00S30650.cpumtr +++| LX2 6
51298 M00S30651.cpumtr +++| SB5 X2
51299 M00S30652.cpumtr +++| MX6 -RMSK
51300 M00S30653.cpumtr +++| GE B4,B5,CPE IF *FNTS* OUT OF RANGE
51301 M00S30654.cpumtr +++| SB5 FNTN
51302 M00S30655.cpumtr +++| LE B4,B5,CPE IF *FNTS* BELOW RANGE
51303 M00S30656.cpumtr +++| LX1 -24 SHIFT TO RA
51304 M00S30657.cpumtr +++| BX1 -X6*X1
51305 M00S30658.cpumtr +++| LX1 6
51306 M00S30659.cpumtr +++| IX4 X1-X4 READ *FNTS*
51307 M00S30660.cpumtr +++| SX6 RC07 * FILE NOT FOUND.*
51308 M00S30661.cpumtr +++| ERX2 X4
51309 M00S30662.cpumtr +++| ZR X2,SST6 IF FNT EMPTY
51310 M00S30663.cpumtr +++|
51311 M00S30664.cpumtr +++|* VALIDATE *FNTS* FILE TYPE.
51312 M00S30665.cpumtr +++|
51313 M00S30666.cpumtr +++| MX6 -6
51314 M00S30667.cpumtr +++| LX2 0-6
51315 M00S30668.cpumtr +++| BX1 -X6*X2
51316 M00S30669.cpumtr +++| SB4 X1+
51317 M00S30670.cpumtr +++| SX6 RC03
51318 M00S30671.cpumtr +++| SB5 59
51319 M00S30672.cpumtr +++| SA1 SLFT SET VALID FILE TYPES MASK
51320 M00S30673.cpumtr +++| SB4 B5-B4 SET SHIFT BIAS
51321 M00S30674.cpumtr +++| LX1 X1,B4
51322 M00S30675.cpumtr +++| PL X1,SST6 IF FILE TYPE NOT VALID
51323 M00S30676.cpumtr +++|
51324 M00S30677.cpumtr +++|* CHECK FILE BUSY STATUS.
51325 M00S30678.cpumtr +++|
51326 M00S30679.cpumtr +++| R= X6,RC01 * FILE BUSY.*
51327 M00S30680.cpumtr +++| IX4 X4+X6
51328 M00S30681.cpumtr +++| ERRNZ RC01-1
51329 M00S30682.cpumtr +++| ERX1 X4
51330 M00S30683.cpumtr +++| LX1 59-0
51331 M00S30684.cpumtr +++| PL X1,SST6 IF FILE *FNTS* BUSY
51332 M00S30685.cpumtr +++| LX1 1 SET FILE BUSY
51333 M00S30686.cpumtr +++| BX7 -X6*X1
51334 M00S30687.cpumtr +++| ERRNZ RC01-1
51335 M00S30688.cpumtr +++| R= X6,RC00 NORMAL RETURN
51336 M00S30689.cpumtr +++| ERX2 X3 GET FUNCTION CODE
51337 M00S30690.cpumtr +++| LX2 59-12
51338 M00S30691.cpumtr +++| NG X2,SST5 IF FCN = 1 OR 3
51339 M00S30692.cpumtr +++| EWX7 X4 UPDATE FST
Line S00010 Modification History
M01 (Added by) cpum128
Seq # *Modification Id* Act
----------------------------+
51340 M01S00010.cpum128 +++| BX7 X4 SAVE FST ADDRESS FOR *1MA* CALL REJECT
51341 M01S00011.cpum128 +++| SA7 SSTA
51342 M00S30693.cpumtr +++| SST5 ERX2 X3 GET PARAMETER WORD
51343 M00S30694.cpumtr +++| SX1 B6 PARTNER-S CP ADDRESS
51344 M00S30695.cpumtr +++| MX7 -48
51345 M00S30696.cpumtr +++| LX1 -12
51346 M00S30697.cpumtr +++| BX2 -X7*X2 CLEAR *FNTR* FIELD
51347 M00S30698.cpumtr +++| BX7 X0*X2 CLEAR STATUS FIELD
51348 M00S30699.cpumtr +++| BX7 X1+X7 INSERT CP ADDRESS (FOR *1MA*)
51349 M00S30700.cpumtr +++| BX7 X6+X7 INSERT RETURN STATUS
51350 M00S30701.cpumtr +++| ZR X6,SST8 IF NO ERROR CODE RETURNED
51351 M00S30702.cpumtr +++| SX6 B1 SET COMPLETION BIT
51352 M00S30703.cpumtr +++| BX6 X6+X7
51353 M00S30704.cpumtr +++| EWX6 X3
51354 M00S30705.cpumtr +++| BX7 X7-X7 CLEAR RA+1
51355 M00S30706.cpumtr +++| EQ MTRP RETURN TO CALLER
51356 M00S30707.cpumtr +++|
51357 M00S30708.cpumtr +++|* ERROR PROCESSING.
51358 M00S30709.cpumtr +++|
51359 M00S30710.cpumtr +++| SST6 SB6 B0 NO *FNTR* (CPA) ENTRY ON ERROR
51360 M00S30711.cpumtr +++| LX6 1
51361 M00S30712.cpumtr +++| EQ SST5 COMPLETE PROCESSING
51362 M00S30713.cpumtr +++|
51363 M00S30714.cpumtr +++| SST7 EQ CPE ERROR EXIT FROM *RSC*
51364 M00S30715.cpumtr +++|
51365 M00S30716.cpumtr +++|* CALL *1MA* TO PROCESS FILE SWITCH.
51366 M00S30717.cpumtr +++|
51367 M00S30718.cpumtr +++| SST8 EWX7 X3
51368 M00S30719.cpumtr +++| SB3 SST8.1 *ACB* RETURN ADDRESS
51369 M00S30720.cpumtr +++| EQ ACB ASSIGN COMMUNICATION BUFFER
51370 M00S30721.cpumtr +++|
51371 M00S30722.cpumtr +++| SST8.1 ZR X1,SST9 IF NO BUFFER AVAILABLE
51372 M00S30723.cpumtr +++| BX6 X1 SET PARAMETER WORD
51373 M00S30724.cpumtr +++| SA7 X1+B1 SET (*ADDR*) IN BUFFER
51374 M00S30725.cpumtr +++| SA6 APQA
51375 M00S30726.cpumtr +++| SA5 RA1 GET (RA+1)
51376 M00S30727.cpumtr +++| ERX5 X5
51377 M00S30728.cpumtr +++| SX1 B1 GET (*ADDR*+1)
51378 M00S30729.cpumtr +++| IX3 X3+X1
51379 M00S30730.cpumtr +++| ERX1 X3
51380 M00S30731.cpumtr +++| MX0 -18
51381 M00S30732.cpumtr +++| BX0 -X0*X5 EXTRACT *ADDR*
51382 M00S30733.cpumtr +++| BX7 X1
51383 M00S30734.cpumtr +++| SA7 A7+B1 SET (*ADDR*+1) IN BUFFER
51384 M00S30735.cpumtr +++| SX5 B7+ SET CPA
51385 M00S30736.cpumtr +++| SX2 3 *1MA* FUNCTION CODE
51386 M00S30737.cpumtr +++| EQ SSC15 CALL *1MA*
51387 M00S30738.cpumtr +++|
51388 M00S30739.cpumtr +++| SST9 ERX2 X4 RESET FILE NOT BUSY
51389 M00S30740.cpumtr +++| SX6 B1
51390 M00S30741.cpumtr +++| BX6 X2+X6
51391 M00S30742.cpumtr +++| EWX6 X4
Line S30743 Modification History
M01 (Removed by) cpumt66
Seq # *Modification Id* Act
----------------------------+
51392 M01S30743.cpumt66 ---| EQ SXS SET *X* STATUS
Line S00002 Modification History
M01 (Added by) cpumt66
Seq # *Modification Id* Act
----------------------------+
51393 M01S00002.cpumt66 +++| SST10 EQ SXS SET *X* STATUS
51394 M00S30744.cpumtr +++|
51395 M00S30745.cpumtr +++|* *SST* REQUEST LEGAL FILE TYPES.
51396 M00S30746.cpumtr +++|
Line S30747 Modification History
M01 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
51397 M01S30747.v23l617 ---| QFFT DECMIC QFFT
Line S00501 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
51398 M01S00501.v23l617 +++| QFFT DECMIC QFFT QUEUE FILE
51399 M01S00502.v23l617 +++| PMFT DECMIC PMFT DIRECT ACCESS PERMANENT FILE
51400 M01S00503.v23l617 +++| LOFT DECMIC LOFT LOCAL FILE
51401 M01S00504.v23l617 +++| LIFT DECMIC LIFT
51402 M00S30748.cpumtr +++|
Line S30749 Modification History
M01 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
51403 M01S30749.v23l617 ---| SLFT CON 1S"QFFT"
Line S00505 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
51404 M01S00505.v23l617 +++| SLFT CON 1S"QFFT"+1S"PMFT"+1S"LOFT"+1S"LIFT"
Line S00012 Modification History
M01 (Added by) cpum128
Seq # *Modification Id* Act
----------------------------+
51405 M01S00012.cpum128 +++| SSTA CON 0 FST ADDRESS
51406 M00S30750.cpumtr +++| TITLE SCP SUBROUTINES.
Line S00247 Modification History
M01 (Added by) v22l602
Seq # *Modification Id* Act
----------------------------+
51407 M01S00247.v22l602 +++| CSC SPACE 4,20
51408 M01S00248.v22l602 +++|** CSC - CHECK SUBSYSTEM CONNECTION.
51409 M01S00249.v22l602 +++|*
51410 M01S00250.v22l602 +++|* CSC WILL DETERMINE IF THE UCP IS CURRENTLY CONNECTED TO
51411 M01S00251.v22l602 +++|* THE SPECIFIED SUBSYSTEM AS A UCP, BASED ON WORD *SSCW*.
51412 M01S00252.v22l602 +++|*
51413 M01S00253.v22l602 +++|* ENTRY (X0) = -7777B.
51414 M01S00254.v22l602 +++|* (X2) = SSID.
51415 M01S00255.v22l602 +++|* (X3) = *SSCW* WORD TO CHECK.
51416 M01S00256.v22l602 +++|* (B4) = RETURN ADDRESS.
51417 M01S00257.v22l602 +++|*
51418 M01S00258.v22l602 +++|* EXIT (B6) = SHIFT COUNT TO SHIFT *SSCW* SO THAT THE
51419 M01S00259.v22l602 +++|* BYTE FOR THE SPECIFIED SUBSYSTEM IS IN THE
51420 M01S00260.v22l602 +++|* BOTTOM. IF THE UCP IS NOT CONNECTED TO THE
51421 M01S00261.v22l602 +++|* SPECIFIED SUBSYSTEM, THE SHIFT COUNT IS
51422 M01S00262.v22l602 +++|* FOR AN EMPTY BYTE, IF THERE IS ONE.
51423 M01S00263.v22l602 +++|* (B6) = 0, IF THE UCP IS CURRENTLY CONNECTED TO 5
51424 M01S00264.v22l602 +++|* SCP-S, NONE OF WHICH IS THE SPECIFIED ONE.
51425 M01S00265.v22l602 +++|*
51426 M01S00266.v22l602 +++|* USES X - 1, 2, 3, 6.
51427 M01S00267.v22l602 +++|* B - 6.
51428 M01S00268.v22l602 +++|
51429 M01S00269.v22l602 +++|
51430 M01S00270.v22l602 +++| CSC BSS 0 ENTRY
51431 M01S00271.v22l602 +++| SB6 60 INITIALIZE SHIFT COUNT
51432 M01S00272.v22l602 +++| SX6 B0+
51433 M01S00273.v22l602 +++| SX2 X2-LSSI SUBSYSTEM INDEX
51434 M01S00274.v22l602 +++| CSC1 BX1 -X0*X3
51435 M01S00275.v22l602 +++| LX3 -12
51436 M01S00276.v22l602 +++| ZR X1,CSC3 IF NO CONNECTION IN THIS BYTE
51437 M01S00277.v22l602 +++| AX1 6
51438 M01S00278.v22l602 +++| IX1 X1-X2
51439 M01S00279.v22l602 +++| ZR X1,/MONITOR/RB4 IF SPECIFIED SUBSYSTEM
51440 M01S00280.v22l602 +++| CSC2 SB6 B6-12
51441 M01S00281.v22l602 +++| NZ B6,CSC1 IF MORE TO CHECK
51442 M01S00282.v22l602 +++| SB6 X6
51443 M01S00283.v22l602 +++| JP B4 RETURN
51444 M01S00284.v22l602 +++|
51445 M01S00285.v22l602 +++| CSC3 NZ X6,CSC2 IF EMPTY BYTE ALREADY FOUND
51446 M01S00286.v22l602 +++| SX6 B6+
51447 M01S00287.v22l602 +++| EQ CSC2 CONTINUE
Line S30751 Modification History
M01 (Removed by) ns2738
Seq # *Modification Id* Act
----------------------------+
51448 M01S30751.ns2738 ---| CUI SPACE 4,20
Line S00017 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51449 M01S00017.ns2738 +++| CUI SPACE 4,25
51450 M00S30752.cpumtr +++|** CUI - CHECK UCP IDENTIFICATION.
51451 M00S30753.cpumtr +++|*
51452 M00S30754.cpumtr +++|* ENTRY (B5) = RETURN ADDRESS IF NO ERROR.
51453 M00S30755.cpumtr +++|* (B6) = RETURN ADDRESS IF INVALID EJT ORDINAL.
51454 M00S30756.cpumtr +++|* (X0) = -7777B.
51455 M00S30757.cpumtr +++|* (T1) = ABSOLUTE ADDRESS OF PARAMETER BLOCK.
51456 M00S30758.cpumtr +++|*
51457 M00S30759.cpumtr +++|* EXIT (A1) = ABSOLUTE ADDRESS OF UCP EJT ENTRY.
Line S00018 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51458 M01S00018.ns2738 +++|* (X0) = -7777B.
Line S30760 Modification History
M01 (Removed by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51459 M01S30760.ns2738c ---|* (X1) = UCP EJT ENTRY.
Line S00001 Modification History
M01 (Added by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51460 M01S00001.ns2738c +++|* (X1) = *JSNE* WORD OF UCP EJT ENTRY.
Line S30761 Modification History
M01 (Removed by) ns2738
Seq # *Modification Id* Act
----------------------------+
51461 M01S30761.ns2738 ---|* (X2) = UCP JOB STATUS - EXJS.
Line S00019 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51462 M01S00019.ns2738 +++|* (X2) = UCP JOB STATUS - EXJS (IF A *DMP=* PROGRAM IS
51463 M01S00020.ns2738 +++|* EXECUTING AND THE *DMP=* FLAG IS NOT SET IN THE
51464 M01S00021.ns2738 +++|* REQUEST, THE UCP JOB STATUS WILL BE FLAGGED AS
51465 M01S00022.ns2738 +++|* MXJS TO INDICATE JOB ROLLED OUT).
51466 M00S30762.cpumtr +++|* (X3) = ABSOLUTE ADDRESS OF PARAMETER BLOCK.
51467 M00S30763.cpumtr +++|* (X5) = UCP CONTROL POINT ADDRESS IF (X2) = 0.
Line S30764 Modification History
M01 (Removed by) ns2738
Seq # *Modification Id* Act
----------------------------+
51468 M01S30764.ns2738 ---|* (X6) = 0 IF JOB SEQUENCE NUMBER MATCHES.
Line S00023 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51469 M01S00023.ns2738 +++|* (X6) .NE. 0 IF SPECIFIED JSN DOES NOT MATCH JSN IN
51470 M01S00024.ns2738 +++|* SPECIFIED EJT ORDINAL OR IF THE *DMP=* FLAG IS
51471 M01S00025.ns2738 +++|* SET AND A *DMP=* PROGRAM IS NOT EXECUTING.
51472 M00S30765.cpumtr +++|*
51473 M00S30766.cpumtr +++|* USES A - 1, 2, 3.
51474 M00S30767.cpumtr +++|* B - 6.
Line S30768 Modification History
M01 (Removed by) ns2738
Seq # *Modification Id* Act
----------------------------+
51475 M01S30768.ns2738 ---|* X - 1, 2, 3, 5, 6.
Line S00026 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51476 M01S00026.ns2738 +++|* X - 0, 1, 2, 3, 5, 6.
51477 M00S30769.cpumtr +++|
51478 M00S30770.cpumtr +++|
Line S30771 Modification History
M01 (Removed by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51479 M01S30771.ns2738c ---| CUI SA3 T1 GET UCP IDENTIFICATION
Line S00002 Modification History
M01 (Added by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51480 M01S00002.ns2738c +++| CUI BSS 0 ENTRY
51481 M01S00003.ns2738c +++| SA3 T1 GET UCP IDENTIFICATION
51482 M00S30772.cpumtr +++| SX1 B1
51483 M00S30773.cpumtr +++| IX1 X3+X1
51484 M00S30774.cpumtr +++| ERX2 X1
51485 M00S30775.cpumtr +++| BX1 -X0*X2 UCP EJT ORDINAL
51486 M00S30776.cpumtr +++| TX6 X1,-EJTM
51487 M00S30777.cpumtr +++| ZR X1,RB6 IF NO EJT ORDINAL
51488 M00S30778.cpumtr +++| PL X6,RB6 IF EJT ORDINAL EXCEEDS MAXIMUM
Line S30779 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
51489 M01S30779.261l700 ---| SX6 EJTE
51490 M01S30780.261l700 ---| IX1 X1*X6
Line S00170 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
51491 M01S00170.261l700 +++| CX6 X1,EJT CONVERT EJT ORDINAL TO OFFSET
51492 M01S00171.261l700 +++| TA1 X6+JSNE,EJT GET UCP EJT ENTRY
51493 M00S30781.cpumtr +++| MX6 24
Line S00027 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51494 M01S00027.ns2738 +++| BX0 X2
Line S30782 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
51495 M01S30782.261l700 ---| TA1 X1+JSNE,EJT GET UCP EJT ENTRY
51496 M00S30783.cpumtr +++| BX2 X6*X2 JOB SEQUENCE NUMBER FROM CALL
51497 M00S30784.cpumtr +++| SB6 B5 SET NORMAL RETURN ADDRESS
51498 M00S30785.cpumtr +++| BX5 X6*X1 JOB SEQUENCE NUMBER FROM EJT ENTRY
Line S30786 Modification History
M01 (Removed by) ns2738
Seq # *Modification Id* Act
----------------------------+
51499 M01S30786.ns2738 ---| ZR X5,RB6 IF EJT ENTRY NOT IN USE
Line S00028 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51500 M01S00028.ns2738 +++| ZR X5,CUI1 IF EJT ENTRY NOT IN USE
51501 M00S30787.cpumtr +++| BX6 X2-X5
Line S00004 Modification History
M01 (Added by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51502 M01S00004.ns2738c +++| SA2 A1+SCHE-JSNE
Line S30788 Modification History
M01 (Removed by) ns2738
Seq # *Modification Id* Act
----------------------------+
51503 M01S30788.ns2738 ---| NZ X6,RB6 IF JOB SEQUENCE NUMBER DOES NOT MATCH
Line S00029 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51504 M01S00029.ns2738 +++| NZ X6,CUI1 IF JOB SEQUENCE NUMBER DOES NOT MATCH
Line S00005 Modification History
M01 (Added by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51505 M01S00005.ns2738c +++| LX0 59-12
51506 M01S00006.ns2738c +++| LX2 59-32
51507 M01S00007.ns2738c +++| BX0 X0-X2
51508 M00S30789.cpumtr +++| MX6 -6
Line S30790 Modification History
M01 (Removed by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51509 M01S30790.ns2738c ---| SA2 A1+B1
51510 M01S30791.ns2738c ---| ERRNZ SCHE-JSNE-1 CODE DEPENDS ON VALUE
51511 M01S30792.ns2738c ---| AX2 12
51512 M01S30793.ns2738c ---| BX5 -X6*X2 CONTROL POINT NUMBER
51513 M01S30794.ns2738c ---| BX6 -X6*X1 JOB STATUS
51514 M01S30795.ns2738c ---| LX5 7
51515 M01S30796.ns2738c ---| AX6 1
51516 M01S30797.ns2738c ---| SX2 X6-EXJS
Line S30798 Modification History
M01 (Removed by) ns2738
M02 (Removed by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51517 M02S30798.ns2738c ---| BX6 X6-X6
Line S00030 Modification History
M01 (Added by) ns2738
M02 (Removed by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51518 M02S00030.ns2738c ---| BX6 X6-X6 SET NO ERROR
51519 M02S00031.ns2738c ---| NZ X2,CUI1 IF JOB NOT AT CONTROL POINT
51520 M02S00032.ns2738c ---| SA2 X5+SEPW CHECK *DMP=* STATUS
51521 M02S00033.ns2738c ---| LX0 59-12
51522 M02S00034.ns2738c ---| LX2 59-52
51523 M02S00035.ns2738c ---| BX2 X0-X2
51524 M02S00036.ns2738c ---| AX2 59
51525 M02S00037.ns2738c ---| PL X2,CUI1 IF NO *DMP=* CONFLICT
51526 M02S00038.ns2738c ---| SX2 MXJS-EXJS SET SPECIAL STATUS TO INDICATE ROLLOUT
51527 M02S00039.ns2738c ---| PL X0,CUI1 IF NOT *DMP=* REQUEST
51528 M02S00040.ns2738c ---| SX6 B1+ SET *DMP=* REQUEST ERROR
Line S00008 Modification History
M01 (Added by) ns2738c
Seq # *Modification Id* Act
----------------------------+
51529 M01S00008.ns2738c +++| PL X0,CUI0.1 IF NO *DMP=* CONFLICT
51530 M01S00009.ns2738c +++| PL X2,CUI1 IF *DMP=* REQUEST ON NON-*DMP=* PROGRAM
51531 M01S00010.ns2738c +++| SX2 MXJS INDICATE *DMP=* ROLLOUT STATUS
51532 M01S00011.ns2738c +++| EQ CUI0.2 SET EXIT CONDITIONS
51533 M01S00012.ns2738c +++|
51534 M01S00013.ns2738c +++| CUI0.1 LX2 0-12-59+32
51535 M01S00014.ns2738c +++| BX0 -X6*X1
51536 M01S00015.ns2738c +++| BX5 -X6*X2 CP NUMBER IF *EXJS* STATUS
51537 M01S00016.ns2738c +++| AX2 X0,B1 JOB STATUS
51538 M01S00017.ns2738c +++| CUI0.2 LX5 7 CP ADDRESS IF *EXJS* STATUS
51539 M01S00018.ns2738c +++| SX2 X2-EXJS
51540 M01S00019.ns2738c +++| SX6 B0 SET NO ERROR
Line S00041 Modification History
M01 (Added by) ns2738
Seq # *Modification Id* Act
----------------------------+
51541 M01S00041.ns2738 +++| CUI1 MX0 -12
51542 M00S30799.cpumtr +++| JP B6 RETURN
51543 M00S30800.cpumtr +++| CWT SPACE 4,10
51544 M00S30801.cpumtr +++|** CWT - CALCULATE WORD TRANSFER SIZE (CM OR ECS).
51545 M00S30802.cpumtr +++|*
51546 M00S30803.cpumtr +++|* THE ENTIRE BLOCK WILL BE TRANSFERRED IF .LE. *MAXB* WORDS
51547 M00S30804.cpumtr +++|* ARE REQUESTED, IF THE REMAINING *SFCALL* MONITOR MODE TIME
51548 M00S30805.cpumtr +++|* IS SUFFICIENT, OR IF THE REQUESTED DATA TRANSFER SIZE IS
51549 M00S30806.cpumtr +++|* WITHIN 40B WORDS OF THE AMOUNT THAT CAN BE TRANSFERRED IN
51550 M00S30807.cpumtr +++|* THE REMAINING TIME. OTHERWISE, THE DATA TRANSFER SIZE WILL
51551 M00S30808.cpumtr +++|* BE SET TO THE MAXIMUM OF *MAXB* AND THE REMAINING TIME
51552 M00S30809.cpumtr +++|* TRANSFER SIZE (IN MULTIPLE OF 10B).
51553 M00S30810.cpumtr +++|*
51554 M00S30811.cpumtr +++|* ENTRY (X7) = WORD COUNT.
51555 M00S30812.cpumtr +++|* (B6) = EXIT ADDRESS IF CM TRANSFER.
51556 M00S30813.cpumtr +++|* = COMPLEMENT OF EXIT ADDRESS IF ECS TRANSFER.
51557 M00S30814.cpumtr +++|* (B4) = SCP FL.
51558 M00S30815.cpumtr +++|* (SSFE) = SFCALL REMAINING MONITOR MODE TIME.
51559 M00S30816.cpumtr +++|*
51560 M00S30817.cpumtr +++|* EXIT (X3) = SCP FL.
51561 M00S30818.cpumtr +++|* (B4) = WORD TRANSFER SIZE.
51562 M00S30819.cpumtr +++|* (SSFE) = MONITOR MODE TIME REMAINING AFTER TRANSFER.
51563 M00S30820.cpumtr +++|*
51564 M00S30821.cpumtr +++|* USES X - 1, 2, 3, 7.
51565 M00S30822.cpumtr +++|* A - 1, 7.
51566 M00S30823.cpumtr +++|* B - 4, 6.
51567 M00S30824.cpumtr +++|
51568 M00S30825.cpumtr +++|
51569 M00S30826.cpumtr +++| CWT SX3 B4+ SAVE SCP FL
51570 M00S30827.cpumtr +++| SA1 SSFE GET REMAINING MONITOR MODE TIME
51571 M00S30828.cpumtr +++| TB4 SFCS SET CM TRANSFER RATE SHIFT
51572 M00S30829.cpumtr +++| PL B6,CWT1 IF CM TRANSFER
51573 M00S30830.cpumtr +++| TB4 SFES SET ECS TRANSFER RATE SHIFT
51574 M00S30831.cpumtr +++| SB6 -B6 SET RETURN ADDRESS
51575 M00S30832.cpumtr +++| CWT1 SX2 X7-MAXB-1
51576 M00S30833.cpumtr +++| NG X2,CWT2 IF .LE. *MAXB* WORDS TO BE TRANSFERRED
51577 M00S30834.cpumtr +++| AX1 B4 TRANSFER SIZE FOR REMAINING TIME
51578 M00S30835.cpumtr +++| AX1 3 ROUND DOWN TO MULTIPLE OF 10B
51579 M00S30836.cpumtr +++| LX1 3
51580 M00S30837.cpumtr +++| IX2 X7-X1
51581 M00S30838.cpumtr +++| NG X2,CWT2 IF TIME TO COMPLETE TRANSFER
51582 M00S30839.cpumtr +++| AX2 5
51583 M00S30840.cpumtr +++| ZR X2,CWT2 IF WITHIN 40B WORDS OF COMPLETION
51584 M00S30841.cpumtr +++| SX7 MAXB TRANSFER AT LEAST *MAXB* WORDS
51585 M00S30842.cpumtr +++| IX2 X1-X7
51586 M00S30843.cpumtr +++| NG X2,CWT2 IF TRANSFER MINIMUM WORDS
51587 M00S30844.cpumtr +++| LX7 X1
51588 M00S30845.cpumtr +++| CWT2 BX2 X7 CALCULATE TRANSFER TIME
51589 M00S30846.cpumtr +++| SA1 A1
51590 M00S30847.cpumtr +++| LX2 B4
51591 M00S30848.cpumtr +++| SB4 X7 SET TRANSFER SIZE
51592 M00S30849.cpumtr +++| IX7 X1-X2 DECREMENT REMAINING MONITOR MODE TIME
51593 M00S30850.cpumtr +++| SA7 A1
51594 M00S30851.cpumtr +++| JP B6 RETURN
51595 M00S30852.cpumtr +++| SCB SPACE 4,10
51596 M00S30853.cpumtr +++|** SCB - SET COMPLETION BIT SPECIFIED BY *ADDRESS*.
51597 M00S30854.cpumtr +++|*
51598 M00S30855.cpumtr +++|* SCB SETS THE COMPLETION BIT FOR AN SF.XXXX FUNCTION OR
51599 M00S30856.cpumtr +++|* AN SF.XXXX FUNCTION WITHIN A LIST.
51600 M00S30857.cpumtr +++|*
51601 M00S30858.cpumtr +++|* ENTRY (A2) = SUBSYSTEM *STSW* WORD.
51602 M00S30859.cpumtr +++|* (A5) = PPU OR ADDRESS.
51603 M00S30860.cpumtr +++|* (X3) = SUBSYSTEM RA.
51604 M00S30861.cpumtr +++|* (X5) = PPU OUTPUT REGISTER.
51605 M00S30862.cpumtr +++|* (B3) = SUBSYSTEM FL.
51606 M00S30863.cpumtr +++|* (B5) = RELATIVE ADDRESS OF COMPLETION BIT WORD.
51607 M00S30864.cpumtr +++|*
51608 M00S30865.cpumtr +++|* EXIT TO *PPRX* OR *PPR1* TO COMPLETE PP REQUEST.
51609 M00S30866.cpumtr +++|
51610 M00S30867.cpumtr +++|
51611 M00S30868.cpumtr +++| SCB GE B5,B3,SCB3 IF WORD TO SET COMPLETE OUTSIDE SCP FL
51612 M00S30869.cpumtr +++| AX5 18
51613 M00S30870.cpumtr +++| SX4 B1
51614 M00S30871.cpumtr +++| MX0 -6
51615 M00S30872.cpumtr +++| SX1 B5
51616 M00S30873.cpumtr +++| IX7 X3+X1
51617 M00S30874.cpumtr +++| ERX1 X7 SET COMPLETION BIT
51618 M00S30875.cpumtr +++| SA7 T1 SAVE ABSOLUTE ADDRESS
51619 M00S30876.cpumtr +++| BX5 -X0*X5 REPLY CODE
51620 M00S30877.cpumtr +++| BX7 X4+X1
51621 M00S30878.cpumtr +++| SX6 X1-LIST CHECK LIST PROCESSING IN EFFECT
51622 M00S30879.cpumtr +++| MX2 -54
51623 M00S30880.cpumtr +++| BX0 -X0*X6
51624 M00S30881.cpumtr +++| LX5 -6
51625 M00S30882.cpumtr +++| BX1 -X2*X7
51626 M00S30883.cpumtr +++| LX7 -6
51627 M00S30884.cpumtr +++| BX6 X5+X1
51628 M00S30885.cpumtr +++| ZR X0,SCB0 IF LIST PROCESSING IN EFFECT
51629 M00S30886.cpumtr +++| SX0 X0-XLST+LIST
51630 M00S30887.cpumtr +++| NZ X0,SCB2 IF NOT EXTENDED LIST PROCESSING
51631 M00S30888.cpumtr +++| SX0 B1+
51632 M00S30889.cpumtr +++| SCB0 ZR X5,SCB1 IF NO ERROR ENCOUNTERED
51633 M00S30890.cpumtr +++| SX6 RC40 * AT LEAST ONE ERROR ENCOUNTERED IN LIST.*
51634 M00S30891.cpumtr +++| LX6 54
51635 M00S30892.cpumtr +++| BX1 X1+X6
51636 M00S30893.cpumtr +++| SCB1 SB6 X7
51637 M00S30894.cpumtr +++| BX5 X4+X5 REPLY CODE AND COMPLETION BIT FOR SF.XXXX
51638 M00S30895.cpumtr +++| GE B6,B3,SCB3 IF WORD TO SET COMPLETE OUTSIDE SCP FL
51639 M00S30896.cpumtr +++| SX6 B6
51640 M00S30897.cpumtr +++| IX6 X6+X3
51641 M00S30898.cpumtr +++| ERX3 X6 FUNCTION PARAMETER WORD
51642 M00S30899.cpumtr +++| SA6 T2 SAVE ABSOLUTE ADDRESS
51643 M00S30900.cpumtr +++| IX0 X0+X4 LIST ADDRESS INCREMENT
51644 M00S30901.cpumtr +++| LX0 6
51645 M00S30902.cpumtr +++| BX2 -X2*X3
51646 M00S30903.cpumtr +++| IX6 X0+X1 POINT TO NEXT FUNCTION IN LIST
51647 M00S30904.cpumtr +++| BX7 X2+X5 SET COMPLETION BIT AND REPLY CODE
51648 M00S30905.cpumtr +++| LX4 42
51649 M00S30906.cpumtr +++| SA3 T2
51650 M00S30907.cpumtr +++| EWX7 X3
51651 M00S30908.cpumtr +++| IX6 X6-X4 DECREMENT NUMBER OF FUNCTIONS IN LIST
51652 M00S30909.cpumtr +++| SCB2 BX7 X7-X7 CLEAR OUTPUT REGISTER, NO ERRORS
51653 M00S30910.cpumtr +++| SA3 T1
51654 M00S30911.cpumtr +++| EWX6 X3
51655 M00S30912.cpumtr +++| EQ PPR1 EXIT TO STORE OUTPUT REGISTER
51656 M00S30913.cpumtr +++|
51657 M00S30914.cpumtr +++|* EXIT FOR INVALID SCP PARAMETERS. (ALSO ENTERED HERE
51658 M00S30915.cpumtr +++|* FROM *SSR*.)
51659 M00S30916.cpumtr +++|
51660 M00S30917.cpumtr +++| SCB3 SA2 A2-STSW+TFSW GET SCP EJT ORDINAL
51661 M00S30918.cpumtr +++| MX0 -12
51662 M00S30919.cpumtr +++| LX2 12
51663 M00S30920.cpumtr +++| BX2 -X0*X2
Line S30921 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
51664 M01S30921.261l700 ---| SX1 EJTE
51665 M01S30922.261l700 ---| IX1 X2*X1
Line S00172 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
51666 M01S00172.261l700 +++| CX1 X2,EJT CONVERT EJT ORDINAL TO OFFSET
51667 M00S30923.cpumtr +++| TA1 X1+JSNE,EJT GET SCP JOB SEQUENCE NUMBER
51668 M00S30924.cpumtr +++| SX7 X2+5*10000B STATUS = SCP INVALID PARAMETERS
51669 M00S30925.cpumtr +++| MX0 24
51670 M00S30926.cpumtr +++| BX1 X0*X1
51671 M00S30927.cpumtr +++| BX7 X7+X1
51672 M00S30928.cpumtr +++| LX7 24
51673 M00S30929.cpumtr +++| SA7 A5 STORE PP OUTPUT REGISTER
51674 M00S30930.cpumtr +++| EQ PPRX EXIT
51675 M00S30931.cpumtr +++| SSR SPACE 4,10
51676 M00S30932.cpumtr +++|** SSR - SET SPECIAL RECEIVING BUFFER.
51677 M00S30933.cpumtr +++|*
51678 M00S30934.cpumtr +++|* SSR SETS UP A DATA TRANSFER TO THE SCP RECEIVING BUFFER
51679 M00S30935.cpumtr +++|* POINTED TO BY *SSCR* WITHIN THE SUBYSTEM FL.
51680 M00S30936.cpumtr +++|*
51681 M00S30937.cpumtr +++|* ENTRY (A2) = SUBSYSTEM *STSW* WORD.
51682 M00S30938.cpumtr +++|* (A5) = PPU OR ADDRESS.
51683 M00S30939.cpumtr +++|* (X0) = -7777B.
51684 M00S30940.cpumtr +++|* (X5) = PPU OUTPUT REGISTER.
51685 M00S30941.cpumtr +++|* (X3) = SUBSYSTEM RA.
51686 M00S30942.cpumtr +++|* (X7) = NOT READY FOR DATA STATUS (2).
51687 M00S30943.cpumtr +++|* (B3) = SUBSYSTEM FL.
51688 M00S30944.cpumtr +++|*
Line S30945 Modification History
M01 (Removed by) cpum220
Seq # *Modification Id* Act
----------------------------+
51689 M01S30945.cpum220 ---|* EXIT TO *PPR1* IF NOT READY FOR DATA OR TRANSFER COMPLETE.
Line S00001 Modification History
M01 (Added by) cpum186
M02 (Removed by) cpum220
Seq # *Modification Id* Act
----------------------------+
51690 M02S00001.cpum220 ---|* (X7) = NEW PP OUTPUT REGISTER.
Line S00003 Modification History
M01 (Added by) cpum220
Seq # *Modification Id* Act
----------------------------+
51691 M01S00003.cpum220 +++|* EXIT (X7) = NEW PP OUTPUT REGISTER.
Line S00002 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51692 M01S00002.cpum186 +++|* TO *HNG* IF WORD COUNT EXCEEDS MESSAGE BUFFER LENGTH.
Line S00004 Modification History
M01 (Added by) cpum220
Seq # *Modification Id* Act
----------------------------+
51693 M01S00004.cpum220 +++|* TO *PPR1* IF NOT READY FOR DATA.
51694 M00S30946.cpumtr +++|* TO *SCB3* IF BUFFER ADDRESS OUTSIDE SCP FL.
Line S00005 Modification History
M01 (Added by) cpum220
Seq # *Modification Id* Act
----------------------------+
51695 M01S00005.cpum220 +++|* TO *TDA2.3* IF TRANSFER COMPLETE.
51696 M00S30947.cpumtr +++|* TO *TDA3* IF IDENTIFICATION WORD NOT INITIALIZED.
51697 M00S30948.cpumtr +++|
51698 M00S30949.cpumtr +++|
51699 M00S30950.cpumtr +++| SSR SX1 SSIW CHECK SUBSYSTEM IDENTIFICATION WORD
Line S00001 Modification History
M01 (Added by) cpumt86
Seq # *Modification Id* Act
----------------------------+
51700 M01S00001.cpumt86 +++| SX2 X1+B1 SUBSYSTEM RECEIVING BUFFER POINTER WORD
51701 M01S00002.cpumt86 +++| ERRNZ SSIW+1-SSCR CODE DEPENDS ON VALUE
51702 M00S30951.cpumtr +++| IX1 X1+X3
Line S00003 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51703 M01S00003.cpum186 +++| MX4 6 EXTRACT WORD COUNT
51704 M00S30952.cpumtr +++| ERX1 X1
51705 M00S30953.cpumtr +++| LX5 -24 COMPARE SUBSYSTEM IDENTIFICATIONS
Line S00004 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51706 M01S00004.cpum186 +++| BX4 X4*X5
51707 M00S30954.cpumtr +++| BX5 X1-X5
Line S00005 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51708 M01S00005.cpum186 +++| LX4 6
Line S30955 Modification History
M01 (Removed by) cpumt86
Seq # *Modification Id* Act
----------------------------+
51709 M01S30955.cpumt86 ---| SX1 SSCR SUBSYSTEM RECEIVING BUFFER POINTER WORD
51710 M01S30956.cpumt86 ---| IX1 X1+X3
Line S00003 Modification History
M01 (Added by) cpumt86
Seq # *Modification Id* Act
----------------------------+
51711 M01S00003.cpumt86 +++| IX1 X2+X3
51712 M00S30957.cpumtr +++| ERX1 X1
Line S00006 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51713 M01S00006.cpum186 +++| SB5 X4
51714 M00S30958.cpumtr +++| BX2 -X0*X5
51715 M00S30959.cpumtr +++| LX5 X1
Line S00004 Modification History
M01 (Added by) cpumt86
Seq # *Modification Id* Act
----------------------------+
51716 M01S00004.cpumt86 +++| SX1 B1
Line S00007 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51717 M01S00007.cpum186 +++| SX4 X4-7 VALIDATE THE WORD COUNT
51718 M00S30960.cpumtr +++| NZ X2,TDA3 IF IDENTIFICATION WORD NOT INITIALIZED
Line S00008 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51719 M01S00008.cpum186 +++| PL X4,HNG IF WC .GT. MESSAGE BUFFER
51720 M00S30961.cpumtr +++| SA4 A5+B1
51721 M00S30962.cpumtr +++| LX4 59-20
51722 M00S30963.cpumtr +++| PL X4,SSR1 IF NOT SUBSYSTEM ABORTED *TDAM* CALL
51723 M00S30964.cpumtr +++| SA4 RC CHECK RCLP REQUEST
Line S30965 Modification History
M01 (Removed by) cpumt86
Seq # *Modification Id* Act
----------------------------+
51724 M01S30965.cpumt86 ---| SX1 B1
51725 M00S30966.cpumtr +++| IX1 X3+X1
51726 M00S30967.cpumtr +++| ERX1 X1 RA+1 OF SCP RECEIVING NOTIFICATION
51727 M00S30968.cpumtr +++| BX6 X4-X1
51728 M00S30969.cpumtr +++| AX6 18 COMPARE SUBSYSTEM IDENTIFIERS
51729 M00S30970.cpumtr +++| SA4 A5+2
51730 M00S30971.cpumtr +++| BX6 X6-X4
Line S00005 Modification History
M01 (Added by) cpumt86
Seq # *Modification Id* Act
----------------------------+
51731 M01S00005.cpumt86 +++| SX1 X1 ADDRESS OF RECALL WORD
51732 M00S30972.cpumtr +++| NZ X6,SSR1 IF RECEIVER NOT IN RECALL ON ABORTED SCP
51733 M00S30973.cpumtr +++| IX4 X3+X1 ABSOLUTE ADDRESS OF RECALL WORD
51734 M00S30974.cpumtr +++| ERX1 X4
51735 M00S30975.cpumtr +++| SX6 ES1+1 SUBSYSTEM NOT PRESENT STATUS
51736 M00S30976.cpumtr +++| BX6 X1+X6
51737 M00S30977.cpumtr +++| EWX6 X4
Line S02246 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51738 M01S02246.271l750 +++| TIC DCPC INVALIDATE CACHE ON OTHER CPU, IF PRESENT
51739 M00S30978.cpumtr +++| SSR1 NG X5,PPR1 IF NOT READY FOR DATA
51740 M00S30979.cpumtr +++| SB6 X5
51741 M00S30980.cpumtr +++| MX6 1
51742 M00S30981.cpumtr +++| ZR B6,PPR1 IF NOT READY FOR DATA
51743 M00S30982.cpumtr +++| LE B6,B1,SCB3 IF BUFFER ADDRESS INVALID
Line S30983 Modification History
M01 (Removed by) cpum186
Seq # *Modification Id* Act
----------------------------+
51744 M01S30983.cpum186 ---| SX0 X5
Line S00009 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51745 M01S00009.cpum186 +++| SX0 X5+
51746 M01S00010.cpum186 +++| SB6 X5+B5 CHECK ADDRESS OUT OF RANGE
51747 M00S30984.cpumtr +++| IX0 X0+X3 ABSOLUTE ADDRESS OF RECEIVING BUFFER
Line S30985 Modification History
M01 (Removed by) cpum186
Seq # *Modification Id* Act
----------------------------+
51748 M01S30985.cpum186 ---| SB6 X5+2 CHECK ADDRESS OUT OF RANGE
51749 M00S30986.cpumtr +++| GT B6,B3,SCB3 IF BUFFER ADDRESS OUTSIDE SCP FL
51750 M00S30987.cpumtr +++| SA4 A5+B1 MOVE 2 WORDS OF DATA TO RECEIVING BUFFER
51751 M00S30988.cpumtr +++| BX6 X6+X5 SET CPU INTERLOCK BIT
51752 M00S30989.cpumtr +++| LX7 X4
Line S30990 Modification History
M01 (Removed by) cpum220
Seq # *Modification Id* Act
----------------------------+
51753 M01S30990.cpum220 ---| SA2 A4+B1
Line S00006 Modification History
M01 (Added by) cpum220
Seq # *Modification Id* Act
----------------------------+
51754 M01S00006.cpum220 +++| SA4 A4+B1
51755 M00S30991.cpumtr +++| EWX7 X0
Line S30992 Modification History
M01 (Removed by) cpum220
Seq # *Modification Id* Act
----------------------------+
51756 M01S30992.cpum220 ---| BX7 X2
Line S00007 Modification History
M01 (Added by) cpum220
Seq # *Modification Id* Act
----------------------------+
51757 M01S00007.cpum220 +++| BX7 X4
51758 M00S30993.cpumtr +++| SX1 B1
51759 M00S30994.cpumtr +++| IX0 X1+X0
Line S00011 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51760 M01S00011.cpum186 +++| SB5 B5-2
51761 M00S30995.cpumtr +++| EWX7 X0
Line S30996 Modification History
M01 (Removed by) cpum186
Seq # *Modification Id* Act
----------------------------+
51762 M01S30996.cpum186 ---| BX7 X7-X7
Line S00012 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51763 M01S00012.cpum186 +++| LE B5,B0,SSR3 IF ALL WORDS MOVED
Line S00013 Modification History
M01 (Added by) cpum186
M02 (Removed by) cpum220
Seq # *Modification Id* Act
----------------------------+
51764 M02S00013.cpum220 ---| SSR2 SA2 A2+B1 MOVE REMAINING WORDS
Line S00008 Modification History
M01 (Added by) cpum220
Seq # *Modification Id* Act
----------------------------+
51765 M01S00008.cpum220 +++| SSR2 SA4 A4+B1 MOVE REMAINING WORDS
Line S00014 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51766 M01S00014.cpum186 +++| IX0 X0+X1
51767 M01S00015.cpum186 +++| SB5 B5-1
Line S00016 Modification History
M01 (Added by) cpum186
M02 (Removed by) cpum220
Seq # *Modification Id* Act
----------------------------+
51768 M02S00016.cpum220 ---| BX7 X2
Line S00009 Modification History
M01 (Added by) cpum220
Seq # *Modification Id* Act
----------------------------+
51769 M01S00009.cpum220 +++| BX7 X4
Line S00017 Modification History
M01 (Added by) cpum186
Seq # *Modification Id* Act
----------------------------+
51770 M01S00017.cpum186 +++| EWX7 X0
51771 M01S00018.cpum186 +++| GT B5,B0,SSR2 IF MORE WORDS TO MOVE
51772 M01S00019.cpum186 +++| SSR3 BX7 X7-X7
51773 M00S30997.cpumtr +++| SX1 SSCR
51774 M00S30998.cpumtr +++| IX1 X1+X3
Line S02247 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51775 M01S02247.271l750 +++| TIC DCPC INVALIDATE CACHE ON OTHER CPU, IF PRESENT
51776 M00S30999.cpumtr +++| EWX6 X1 SUBSYSTEM RECEIVING BUFFER POINTER WORD
Line S31000 Modification History
M01 (Removed by) cpum220
Seq # *Modification Id* Act
----------------------------+
51777 M01S31000.cpum220 ---| EQ PPR1 CLEAR OUTPUT REGISTER
Line S00010 Modification History
M01 (Added by) cpum220
M02 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51778 M02S00010.271l750 ---| SA1 A2 READ SUBSYSTEM STATUS
Line S00011 Modification History
M01 (Added by) cpum220
Seq # *Modification Id* Act
----------------------------+
51779 M01S00011.cpum220 +++| EQ TDA2.3 RESTART SCP CPU
51780 M00S31001.cpumtr +++|
51781 M00S31002.cpumtr +++| ENDBLK
51782 M00S31003.cpumtr +++| BLOCK SCPUEC,(SCP FACILITY ECS INTERFACE.)
51783 M00S31004.cpumtr +++| SFE SPACE 4,10
51784 M00S31005.cpumtr +++|** SFE - SFCALL SF.READ/SF.WRIT ECS TRANSFER.
51785 M00S31006.cpumtr +++|*
51786 M00S31007.cpumtr +++|* SF.READ - TRANSFER DATA FROM UCP CM TO SCP ECS (WRITE ECS)
51787 M00S31008.cpumtr +++|* OR TRANSFER DATA FROM UCP ECS TO SCP CM (READ ECS).
51788 M00S31009.cpumtr +++|*
51789 M00S31010.cpumtr +++|* SF.WRIT - TRANSFER DATA FROM SCP CM TO UCP ECS (WRITE ECS)
51790 M00S31011.cpumtr +++|* OR TRANSFER DATA FROM SCP ECS TO UCP CM (READ ECS).
51791 M00S31012.cpumtr +++|*
51792 M00S31013.cpumtr +++|* ENTRY (A0) = CPU NUMBER (0 OR 1).
51793 M00S31014.cpumtr +++|* (X0) = -7777B.
51794 M00S31015.cpumtr +++|* (X2) = EXTENDED ADDRESS WORD.
51795 M00S31016.cpumtr +++|* (X4) = LIST PROCESSING FLAG.
51796 M00S31017.cpumtr +++|* (X5) = 0, IF SF.WRIT OR SF.XWRT, .LT. 0 IF SF.READ
51797 M00S31018.cpumtr +++|* OR SF.XRED.
51798 M00S31019.cpumtr +++|* (X6) = UCP/SCP ABSOLUTE CM ADDRESS.
51799 M00S31020.cpumtr +++|* (X7) = WORD COUNT.
51800 M00S31021.cpumtr +++|* ((B3)) = SCP RA.
51801 M00S31022.cpumtr +++|* (B4) = SCP FL.
51802 M00S31023.cpumtr +++|* (B7) = SCP CPA.
51803 M00S31024.cpumtr +++|*
51804 M00S31025.cpumtr +++|* EXIT TO */MONITOR/S404* IF ECS TRANSFER COMPLETE.
51805 M00S31026.cpumtr +++|* (A0) = CPU NUMBER.
51806 M00S31027.cpumtr +++|* (X2) = LIST PROCESSING FLAG.
51807 M00S31028.cpumtr +++|* (X3) = SCP FL.
51808 M00S31029.cpumtr +++|* (X5) = TRANSFER SIZE.
51809 M00S31030.cpumtr +++|*
51810 M00S31031.cpumtr +++|* TO */MONITOR/CPE* IF NOT IN CPU 0 FOR ECS TRANSFER.
51811 M00S31032.cpumtr +++|* (A0) UNCHANGED.
51812 M00S31033.cpumtr +++|*
51813 M00S31034.cpumtr +++|* TO */MONITOR/SSF11* IF UCP ECS ADDRESS ILLEGAL.
51814 M00S31035.cpumtr +++|* (A0), (B4) UNCHANGED.
51815 M00S31036.cpumtr +++|*
51816 M00S31037.cpumtr +++|* TO */MONITOR/SSF20* IF SCP ECS ADDRESS ILLEGAL.
51817 M00S31038.cpumtr +++|* (A0), (B4) UNCHANGED.
51818 M00S31039.cpumtr +++|*
51819 M00S31040.cpumtr +++|* TO */MONITOR/SSF12* IF ECS ABORT OR PARITY ERROR.
51820 M00S31041.cpumtr +++|* (A0), (X0), (B4) RESTORED.
51821 M00S31042.cpumtr +++|* (X5) = REPLY CODE.
51822 M00S31043.cpumtr +++|* (B6) .GT. 0 TO INDICATE NOT FATAL OR FORCED ERROR.
51823 M00S31044.cpumtr +++|*
51824 M00S31045.cpumtr +++|* USES A - 0, 1.
51825 M00S31046.cpumtr +++|* B - 4, 5, 6.
51826 M00S31047.cpumtr +++|* X - ALL.
51827 M00S31048.cpumtr +++|*
51828 M00S31049.cpumtr +++|* CALLS /MONITOR/CWT.
51829 M00S31050.cpumtr +++|*
51830 M00S31051.cpumtr +++|* MACROS PER, RUE, WUE.
51831 M00S31052.cpumtr +++|
51832 M00S31053.cpumtr +++|
51833 M00S31054.cpumtr +++|* PROCESS UCP ECS TO/FROM SCP CM TRANSFER.
51834 M00S31055.cpumtr +++|
51835 M00S31056.cpumtr +++| SFE LX4 -18 GET UCP CONTROL POINT ADDRESS
51836 M00S31057.cpumtr +++| SA1 X4+ECSW GET UCP ECS RA AND FL
51837 M00S31058.cpumtr +++| LX4 18
51838 M00S31059.cpumtr +++| LX2 -24
51839 M00S31060.cpumtr +++| SB5 /MONITOR/SSF11-/MONITOR/SSF20 SET ADDRESS ERROR EXIT
51840 M00S31061.cpumtr +++| EQ SFE2 VALIDATE UCP ECS ADDRESS
51841 M00S31062.cpumtr +++|
51842 M00S31063.cpumtr +++|* PROCESS UCP CM TO/FROM SCP ECS TRANSFER.
51843 M00S31064.cpumtr +++|
51844 M00S31065.cpumtr +++| SFE1 SB5 B0 SET ADDRESS ERROR EXIT BIAS
51845 M00S31066.cpumtr +++| SA1 B7+ECSW GET SCP ECS RA AND FL
51846 M00S31067.cpumtr +++| BX5 -X5 SET WE FOR SF.READ, RE FOR SF.WRIT
51847 M00S31068.cpumtr +++|
51848 M00S31069.cpumtr +++|* VALIDATE SCP OR UCP ECS ADDRESS.
51849 M00S31070.cpumtr +++|
Line S31071 Modification History
M01 (Removed by) ns2184
Seq # *Modification Id* Act
----------------------------+
51850 M01S31071.ns2184 ---| SFE2 BX3 -X0*X1 SCP OR UCP ECS FL / 1000B
Line S00014 Modification History
M01 (Added by) ns2184
Seq # *Modification Id* Act
----------------------------+
51851 M01S00014.ns2184 +++| SFE2 BX3 -X0*X1 SCP OR UCP ECS FL/*UEBS*
51852 M00S31072.cpumtr +++| LX1 -12
Line S31073 Modification History
M01 (Removed by) ns2184
Seq # *Modification Id* Act
----------------------------+
51853 M01S31073.ns2184 ---| BX1 -X0*X1 SCP OR UCP ECS RA / 1000B
51854 M01S31074.ns2184 ---| LX3 9
Line S00015 Modification History
M01 (Added by) ns2184
Seq # *Modification Id* Act
----------------------------+
51855 M01S00015.ns2184 +++| BX1 -X0*X1 SCP OR UCP ECS RA/*UEBS*
Line S00016 Modification History
M01 (Added by) ns2184
M02 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
51856 M02S00016.252l678 ---| LX3 9+UESF
Line S00892 Modification History
M01 (Added by) 252l678
Seq # *Modification Id* Act
----------------------------+
51857 M01S00892.252l678 +++| TLX3 9,UESC
51858 M00S31075.cpumtr +++| MX0 -24
Line S31076 Modification History
M01 (Removed by) ns2184
Seq # *Modification Id* Act
----------------------------+
51859 M01S31076.ns2184 ---| LX1 9
Line S00017 Modification History
M01 (Added by) ns2184
M02 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
51860 M02S00017.252l678 ---| LX1 9+UESF
Line S00893 Modification History
M01 (Added by) 252l678
Seq # *Modification Id* Act
----------------------------+
51861 M01S00893.252l678 +++| TLX1 9,UESC
51862 M00S31077.cpumtr +++| BX2 -X0*X2 SCP OR UCP RELATIVE ECS ADDRESS
51863 M00S31078.cpumtr +++| IX3 X3-X2 CHECK BLOCK LWA .GT. ECS FL
51864 M00S31079.cpumtr +++| IX0 X2+X1 SCP OR UCP ABSOLUTE ECS ADDRESS
51865 M00S31080.cpumtr +++| SB6 SFE3 SET RETURN ADDRESS FOR *CWT*
51866 M00S31081.cpumtr +++| IX3 X3-X7
51867 M00S31082.cpumtr +++| SB6 -B6 INDICATE ECS TRANSFER
51868 M00S31083.cpumtr +++| PL X3,/MONITOR/CWT IF ECS ADDRESS LEGAL
51869 M00S31084.cpumtr +++| JP B5+/MONITOR/SSF20 EXIT TO SET ERROR CODE
51870 M00S31085.cpumtr +++|
51871 M00S31086.cpumtr +++| SFE3 SB5 A0 SAVE CPU NUMBER
51872 M00S31087.cpumtr +++| SA0 X6 SET SCP OR UCP CM ADDRESS
51873 M00S31088.cpumtr +++| TNZB5 /MONITOR/CPE,NOTDCE IF NOT CPU 0
51874 M00S31089.cpumtr +++| MX2 -24
51875 M00S31090.cpumtr +++| BX0 -X2*X0
51876 M00S31091.cpumtr +++| SB6 SFE5 SET RETURN ADDRESS
51877 M00S31092.cpumtr +++| BX6 -X2*X6
51878 M00S31093.cpumtr +++| LX6 30
51879 M00S31094.cpumtr +++| BX0 X6+X0
51880 M00S31095.cpumtr +++| BX2 X4 SAVE LIST PROCESSING FLAG
51881 M00S31096.cpumtr +++| PL X5,SFE4 IF WRITE ECS
51882 M00S31097.cpumtr +++| RUE MONITOR READ (B4) WORDS FROM USER ECS
51883 M00S31098.cpumtr +++| PER /SCPUEC/SFE6,/ECS/PER IF PARITY ERROR
51884 M00S31099.cpumtr +++| EQ SFE5 RESTORE REGISTERS AND EXIT
51885 M00S31100.cpumtr +++|
51886 M00S31101.cpumtr +++| SFE4 WUE MONITOR WRITE (B4) WORDS TO USER ECS
51887 M00S31102.cpumtr +++| PER /SCPUEC/SFE6,/ECS/PER IF PARITY ERROR
51888 M00S31103.cpumtr +++| SFE5 SA0 B5 RESET CPU NUMBER
51889 M00S31104.cpumtr +++| SX5 B4 SET TRANSFER LENGTH
51890 M00S31105.cpumtr +++| EQ /MONITOR/S404 EXIT
51891 M00S31106.cpumtr +++|
51892 M00S31107.cpumtr +++| SFE6 SX5 RC56 * ECS ABORT/PARITY ERROR.*
51893 M00S31108.cpumtr +++| SA0 B5 RESET CPU NUMBER
51894 M00S31109.cpumtr +++| MX0 -12
51895 M00S31110.cpumtr +++| SB4 X3 RESTORE SCP FL
51896 M00S31111.cpumtr +++| SB6 B1 INDICATE NO ERROR
51897 M00S31112.cpumtr +++| EQ /MONITOR/SSF12 SET COMPLETE BIT AND ERROR CODE
51898 M00S31113.cpumtr +++|
51899 M00S31114.cpumtr +++| ENDBLK
51900 M00S31115.cpumtr +++| BLOCK SUBCP,(SUB-CONTROL POINT PROCESSING.),MONITOR
Line S31116 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51901 M01S31116.271l750 ---| BCE SPACE 4
Line S02248 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51902 M01S02248.271l750 +++| BCE SPACE 4,15
51903 M00S31117.cpumtr +++|** BCE - BEGIN CONTROL POINT EXECUTIVE.
51904 M00S31118.cpumtr +++|*
51905 M00S31119.cpumtr +++|* ENTRY (B7) = CONTROL POINT ADDRESS.
51906 M00S31120.cpumtr +++|*
51907 M00S31121.cpumtr +++|* EXIT TO *ESC0*.
51908 M00S31122.cpumtr +++|*
Line S02249 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51909 M01S02249.271l750 +++|* USES X - 0, 2, 4.
51910 M01S02250.271l750 +++|* A - 2.
51911 M01S02251.271l750 +++|* B - 3.
51912 M01S02252.271l750 +++|*
51913 M00S31123.cpumtr +++|* CALLS CPT.
Line S31124 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51914 M01S31124.271l750 ---|*
51915 M00S31125.cpumtr +++|
51916 M00S31126.cpumtr +++|
51917 M00S31127.cpumtr +++| BCE SB3 BCE1 *CPT* RETURN ADDRESS
Line S31128 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
51918 M01S31128.253l688 ---| TJMP /CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR/CPT
Line S02546 Modification History
M01 (Added by) 253l688
M02 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51919 M02S02546.271l750 ---| TJP (/CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR/CPT)
Line S02253 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51920 M01S02253.271l750 +++| TJP (/NVE/CPT,NVE,/CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR
51921 M01S02254.271l750 +++|,/CPT)
51922 M00S31129.cpumtr +++|
51923 M00S31130.cpumtr +++| BCE1 SA2 B7+STSW
51924 M00S31131.cpumtr +++| MX4 1
51925 M00S31132.cpumtr +++| SX0 B1 SET CP EXEC AS NEXT JOB
51926 M00S31133.cpumtr +++| LX4 56-59 SUB-CP BIT
51927 M00S31134.cpumtr +++| EQ ESC0 END SUB-CONTROL POINT
Line S31135 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51928 M01S31135.271l750 ---| ESC SPACE 4
Line S02255 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51929 M01S02255.271l750 +++| ESC SPACE 4,25
51930 M00S31136.cpumtr +++|** ESC - END SUB-CONTROL POINT.
Line S31137 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51931 M01S31137.271l750 ---|* CLEAR *SUB-CP ACTIVE* CPU STATUS, RELATIVIZE SUB-CP EXCHANGE
51932 M01S31138.271l750 ---|* PACKAGE AND PROCESS SUBCP SUSPENSION OR TERMINATION.
Line S02256 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51933 M01S02256.271l750 +++|*
51934 M01S02257.271l750 +++|* CLEAR SUB-CONTROL POINT ACTIVE STATUS, RELATIVIZE SUB-CONTROL
51935 M01S02258.271l750 +++|* POINT EXCHANGE PACKAGE, AND RETURN CONTROL TO NEW JOB OR
51936 M01S02259.271l750 +++|* CONTROL POINT EXECUTIVE.
51937 M01S02260.271l750 +++|*
51938 M01S02261.271l750 +++|* IF ENTERED AT *ESC*, THE CPU WILL BE SWITCHED TO A NEW JOB
51939 M01S02262.271l750 +++|* ON EXIT TO *BNJ*. IF ENTERED AT *ESC0*, CONTROL WILL BE
51940 M01S02263.271l750 +++|* RETURNED TO THE CONTROL POINT EXECUTIVE.
51941 M00S31139.cpumtr +++|*
51942 M00S31140.cpumtr +++|* ENTRY (X2) = STSW OF CONTROL POINT.
51943 M00S31141.cpumtr +++|* (X4) = SUB CONTROL POINT ACTIVE BIT.
51944 M00S31142.cpumtr +++|* (A2) = ADDRESS OF STSW IN CONTROL POINT AREA.
Line S31143 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51945 M01S31143.271l750 ---|* (X1) = CPA IF ENTERED AT *ESC*.
Line S02264 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51946 M01S02264.271l750 +++|* (X1 BITS 0-17) = CONTROL POINT ADDRESS IF ENTERED AT
51947 M01S02265.271l750 +++|* *ESC*.
51948 M00S31144.cpumtr +++|*
Line S31145 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51949 M01S31145.271l750 ---|* EXIT (X2) = CRCW OF CONTROL POINT
Line S02266 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51950 M01S02266.271l750 +++|* EXIT TO *BNJ3* TO START NEW JOB IF ENTERED AT *ESC*.
51951 M01S02267.271l750 +++|* (CPAL+A0) SET WITH USER EXCHANGE PACKAGE ADDRESS IF
51952 M01S02268.271l750 +++|* ENTERED AT *ESC*.
51953 M01S02269.271l750 +++|* TO *BNJ20* TO RESTART CONTROL POINT EXECUTIVE IF
51954 M01S02270.271l750 +++|* ENTERED AT *ESC0*.
51955 M00S31146.cpumtr +++|*
Line S31147 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51956 M01S31147.271l750 ---|* USES X - ALL.
51957 M01S31148.271l750 ---|* B - 6, 7.
Line S02271 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51958 M01S02271.271l750 +++|* USES X - 1, 2, 3, 4, 5, 6, 7.
51959 M00S31149.cpumtr +++|* A - 2, 3, 4, 6, 7.
Line S31150 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51960 M01S31150.271l750 ---|*
51961 M01S31151.271l750 ---|* CALLS BNJ.
Line S02272 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51962 M01S02272.271l750 +++|* B - 2, 3, 6, 7.
51963 M00S31152.cpumtr +++|
51964 M00S31153.cpumtr +++|
Line S31154 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51965 M01S31154.271l750 ---| ESC SX0 B0+ SET NEW JOB AS NEXT ONE
51966 M01S31155.271l750 ---| SB7 X1+ SET CPA
Line S02273 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51967 M01S02273.271l750 +++| ESC SB3 B0+ SET NEW JOB AS NEXT ONE
51968 M01S02274.271l750 +++| SB7 X1+ SET CONTROL POINT ADDRESS
51969 M01S02275.271l750 +++|
51970 M01S02276.271l750 +++|* ENTRY FROM *BCE*.
51971 M01S02277.271l750 +++|
51972 M00S31156.cpumtr +++| ESC0 BX7 -X4*X2 CLEAR SUBCP ACTIVE BIT
51973 M00S31157.cpumtr +++| SA7 A2
51974 M00S31158.cpumtr +++|
Line S31159 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
51975 M01S31159.271l750 ---|* RELATIVIZE SUBCP RA AND RAX.
Line S02278 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
51976 M01S02278.271l750 +++|* RELATIVIZE SUB-CONTROL POINT P, RA, AND RAX.
51977 M00S31160.cpumtr +++|
51978 M00S31161.cpumtr +++| SA3 B7+4 READ RAX(CP)
51979 M00S31162.cpumtr +++| SA4 B2+4 READ RAX(S)
51980 M00S31163.cpumtr +++| MX2 24
51981 M00S31164.cpumtr +++| BX3 X2*X3
51982 M00S31165.cpumtr +++| IX7 X4-X3
51983 M00S31166.cpumtr +++| SA3 B7+B1 READ RA(CP)
51984 M00S31167.cpumtr +++| SA7 A4+
51985 M00S31168.cpumtr +++| SA4 B2+1 READ RA(S)
51986 M00S31169.cpumtr +++| BX1 X2*X3
51987 M00S31170.cpumtr +++| IX7 X4-X1
51988 M00S31171.cpumtr +++| SA7 A4+
51989 M00S31172.cpumtr +++| SA3 RTCL CHECK FOR TIME LIMIT
51990 M00S31173.cpumtr +++| SA4 ACPL+A0
51991 M00S31174.cpumtr +++| BX3 -X2*X3
51992 M00S31175.cpumtr +++| BX4 -X2*X4
51993 M00S31176.cpumtr +++| AX1 36
51994 M00S31177.cpumtr +++| IX4 X3-X4
51995 M00S31178.cpumtr +++| SA3 A2-2 READ X6
51996 M00S31179.cpumtr +++| SX5 B1 READ RA+1
51997 M00S31180.cpumtr +++| IX5 X5+X1
51998 M00S31181.cpumtr +++| ERX2 X5
51999 M00S31182.cpumtr +++| MX6 -18
52000 M00S31183.cpumtr +++| BX7 -X6*X2
52001 M00S31184.cpumtr +++| IX1 X7+X1 ADDRESS OF USER EXCHANGE PACKAGE
52002 M00S31185.cpumtr +++| UX3,B6 X3 CHECK ERROR FLAG
Line S31186 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52003 M01S31186.271l750 ---| NZ X0,ESC1 IF CP EXEC IS NEXT
Line S02279 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52004 M01S02279.271l750 +++| NZ B3,ESC1 IF TO RETURN TO CP EXECUTIVE
52005 M00S31187.cpumtr +++| NZ B6,ESC1 IF ERROR FLAG
52006 M00S31188.cpumtr +++| NG X4,ESC2 IF NOT TIME LIMIT
52007 M00S31189.cpumtr +++| SB6 TLET
52008 M00S31190.cpumtr +++|
Line S31191 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52009 M01S31191.271l750 ---|* TERMINATE SUB CONTROL POINT.
Line S02280 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52010 M01S02280.271l750 +++|* TERMINATE SUB-CONTROL POINT ACTIVITY.
52011 M00S31192.cpumtr +++|
52012 M00S31193.cpumtr +++| ESC1 SA4 A3-16B+12B READ START TIME
52013 M00S31194.cpumtr +++| PX7 X3,B6
52014 M00S31195.cpumtr +++| BX6 X4
52015 M00S31196.cpumtr +++| SA4 B7+CPTW
52016 M00S31197.cpumtr +++| IX6 X4-X6 COMPUTE TIME USED
52017 M00S31198.cpumtr +++| SA6 A3+B1
Line S31199 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52018 M01S31199.271l750 ---| SA7 A3
Line S02281 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52019 M01S02281.271l750 +++| SA7 A3+
52020 M00S31200.cpumtr +++| BX7 X7-X7 CLEAR RA+1
52021 M00S31201.cpumtr +++| EWX7 X5
Line S31202 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52022 M01S31202.271l750 ---| ZR X0,ESC3 IF ENTERED AT *ESC*
52023 M01S31203.271l750 ---| SA3 B7+B1 SET NEW RA IN *ACPL*
52024 M01S31204.271l750 ---| SA2 CPAL+A0 RESET ACCOUNTING CONTROL
52025 M01S31205.271l750 ---| MX0 24
52026 M01S31206.271l750 ---| BX7 X0*X3
52027 M01S31207.271l750 ---| AX2 24
52028 M01S31208.271l750 ---| SA7 ACPL+A0
52029 M01S31209.271l750 ---| MX0 -24
52030 M01S31210.271l750 ---| BX2 -X0*X2
52031 M01S31211.271l750 ---| BX7 X2
52032 M01S31212.271l750 ---| LX7 24
52033 M01S31213.271l750 ---| BX1 X7+X1 ENTRY TO *BNJ*
52034 M01S31214.271l750 ---| BX7 X7+X2
52035 M01S31215.271l750 ---| BX2 X7 ENTRY TO *BNJ*
52036 M01S31216.271l750 ---| SA7 A2+ RESET *CPTD*
52037 M01S31217.271l750 ---| SA7 B7+CRCW
52038 M01S31218.271l750 ---| EQ /MONITOR/BNJ7 COPY EXCHANGE PACKAGE
Line S02282 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52039 M01S02282.271l750 +++| ZR B3,ESC3 IF NOT TO RETURN TO CP EXECUTIVE
52040 M01S02283.271l750 +++|
52041 M01S02284.271l750 +++|* EXIT TO CONTROL POINT EXECUTIVE.
52042 M01S02285.271l750 +++|
52043 M01S02286.271l750 +++| SA2 B7+1 GET CONTROL POINT RA
52044 M01S02287.271l750 +++| SX3 B7
52045 M01S02288.271l750 +++| SX7 B7 SET EXCHANGE PACKAGE ADDRESS
52046 M01S02289.271l750 +++| LX3 24
52047 M01S02290.271l750 +++| BX7 X3+X7 SET CONTROL POINT ADDRESS
52048 M01S02291.271l750 +++| MX6 24
52049 M01S02292.271l750 +++| SA7 CPAL+A0 UPDATE *CPAL*
52050 M01S02293.271l750 +++| SX3 B2 SET EXCHANGE ADDRESS
52051 M01S02294.271l750 +++| BX6 X6*X2 SET CONTROL POINT RA
52052 M01S02295.271l750 +++| IX1 X3-X1 SET EXCHANGE PACKAGE MOVE DIFFERENTIAL
52053 M01S02296.271l750 +++| SA6 ACPL+A0 UPDATE *ACPL*
52054 M01S02297.271l750 +++| SB2 B7 SET CP EXECUTIVE EXCHANGE ADDRESS
52055 M01S02298.271l750 +++| EQ /MONITOR/BNJ20 COPY EXCHANGE PACKAGE
52056 M00S31219.cpumtr +++|
52057 M00S31220.cpumtr +++|* SET REMAINING TIME IN RA+1.
52058 M00S31221.cpumtr +++|
52059 M00S31222.cpumtr +++| ESC2 LX4 18 SET REMAINING TIME REQUESTED IN XJP CALL
52060 M00S31223.cpumtr +++| LX6 18
52061 M00S31224.cpumtr +++| BX6 X6*X2 CLEAR OLD TIME
52062 M00S31225.cpumtr +++| BX6 -X4+X6 SET NEW TIME
52063 M00S31226.cpumtr +++| EWX6 X5
Line S31227 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52064 M01S31227.271l750 ---| ESC3 SA3 CPAL+A0 SET UP FOR EXCHANGE PACKAGE COPY
52065 M01S31228.271l750 ---| MX0 36
52066 M01S31229.271l750 ---| BX7 X0*X3
52067 M01S31230.271l750 ---| BX7 X7+X1 INSERT XP ADDRESS
52068 M01S31231.271l750 ---| SA1 B7+STSW CHECK CPU STATUS
Line S02299 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52069 M01S02299.271l750 +++|
52070 M01S02300.271l750 +++|* EXIT TO BEGIN NEW JOB.
52071 M01S02301.271l750 +++|
52072 M01S02302.271l750 +++| ESC3 SA3 CPAL+A0 SET *CPAL* FOR EXCHANGE PACKAGE COPY
52073 M01S02303.271l750 +++| MX6 36
52074 M01S02304.271l750 +++| BX7 X6*X3
52075 M01S02305.271l750 +++| BX7 X7+X1 INSERT USER EXCHANGE PACKAGE ADDRESS
52076 M00S31232.cpumtr +++| SA7 A3
Line S31233 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52077 M01S31233.271l750 ---| MX3 -3
52078 M01S31234.271l750 ---| LX1 3
52079 M01S31235.271l750 ---| BX1 -X3*X1
52080 M01S31236.271l750 ---| SX1 X1-XCPS
52081 M01S31237.271l750 ---| ZR X1,/MONITOR/BNJ4 IF *X* STATUS
52082 M01S31238.271l750 ---| SA3 B7+CRCW RESET *CRCW*
52083 M01S31239.271l750 ---| AX3 24
52084 M01S31240.271l750 ---| BX7 -X0*X3 CONTROL POINT ADDRESS
52085 M01S31241.271l750 ---| BX3 -X0*X3
52086 M01S31242.271l750 ---| LX7 24
52087 M01S31243.271l750 ---| BX7 X7+X3
52088 M01S31244.271l750 ---| SA7 A3
52089 M01S31245.271l750 ---| EQ /MONITOR/BNJ4 SELECT NEXT JOB
Line S02306 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52090 M01S02306.271l750 +++| EQ /MONITOR/BNJ3 SELECT NEXT JOB
52091 M00S31246.cpumtr +++| TITLE CPU REQUEST PROCESSORS.
52092 M00S31247.cpumtr +++| SSE SPACE 4,10
52093 M00S31248.cpumtr +++|** SSE - SET SUBCONTROL POINT ERROR.
52094 M00S31249.cpumtr +++|*
52095 M00S31250.cpumtr +++|* ENTRY (X7) = ERROR FLAG.
52096 M00S31251.cpumtr +++|* (B7) = CP ADDRESS.
52097 M00S31252.cpumtr +++|*
52098 M00S31253.cpumtr +++|* EXIT TO *SEF1* IF NOT ALLOWABLE SUBCP ERROR.
52099 M00S31254.cpumtr +++|* TO *BCE* IF SUBCP ERROR ALLOWED.
52100 M00S31255.cpumtr +++|*
52101 M00S31256.cpumtr +++|* USES X - 1, 2, 6.
52102 M00S31257.cpumtr +++|* B - 3.
52103 M00S31258.cpumtr +++|* A - 2, 6.
52104 M00S31259.cpumtr +++|
52105 M00S31260.cpumtr +++|
52106 M00S31261.cpumtr +++| SSE SA2 SSEA
52107 M00S31262.cpumtr +++| SB3 X7
52108 M00S31263.cpumtr +++| LX1 X2,B3
52109 M00S31264.cpumtr +++| PL X1,SEF1 IF ERROR NOT ALLOWED
52110 M00S31265.cpumtr +++| SA2 B7+16B SET ERROR IN X6 OF XP
52111 M00S31266.cpumtr +++| PX6 X2,B3
52112 M00S31267.cpumtr +++| SA6 A2
52113 M00S31268.cpumtr +++| EQ BCE BEGIN CONTROL POINT EXECUTIVE
52114 M00S31269.cpumtr +++|
52115 M00S31270.cpumtr +++| SSEA BSS 0 ALLOWABLE SUBCP ERROR FLAGS
52116 M00S31271.cpumtr +++| POS 60-ARET
52117 M00S31272.cpumtr +++| VFD 1/1
52118 M00S31273.cpumtr +++| POS 60-PSET
52119 M00S31274.cpumtr +++| VFD 1/1
52120 M00S31275.cpumtr +++| POS 60-TLET
52121 M00S31276.cpumtr +++| VFD 1/1
52122 M00S31277.cpumtr +++| BSS 0
52123 M00S31278.cpumtr +++| XJP SPACE 4,25
52124 M00S31279.cpumtr +++|*** *XJP*.
52125 M00S31280.cpumtr +++|* INITIATE SUB-CONTROL POINT.
52126 M00S31281.cpumtr +++|*
52127 M00S31282.cpumtr +++|*T 18/ *XJP*,6/ ,18/ TIML,18/ ADDR
Figure
0 17 18 29 ADDR TIML 30 35 36 41 42 59 TIML *XJP*
52128 M00S31283.cpumtr +++|* TIML CPU TIME LIMIT FOR SUB-CONTROL POINT IN MILLISECONDS.
52129 M00S31284.cpumtr +++|* ADDR ADDRESS OF SUB-CONTROL POINT EXCHANGE PACKAGE.
52130 M00S31285.cpumtr +++|*
52131 M00S31286.cpumtr +++|* RESPONSE AFTER CONTROL RETURNED TO CALLER.
52132 M00S31287.cpumtr +++|*T, X2 60/ CPTW BEFORE SUBCP INITIATION.
Figure
X2
0 29 CPTW BEFORE SUBCP INITIATION. 30 59 CPTW BEFORE SUBCP INITIATION.
52133 M00S31288.cpumtr +++|*T, X6 12/ 200B+EF,48/ RA OF SUBCP.
Figure
X6
0 29 RA OF SUBCP. 30 47 48 59 RA OF SUBCP. 200B+EF
52134 M00S31289.cpumtr +++|*T, X7 60/ CPU TIME USED BY SUBCP.
Figure
X7
0 29 CPU TIME USED BY SUBCP. 30 59 CPU TIME USED BY SUBCP.
52135 M00S31290.cpumtr +++|* THIS TIME HAS THE ACCOUNTING MULTIPLIERS APPLIED
52136 M00S31291.cpumtr +++|* AND IS IN QUARTER NANO SECONDS.
52137 M00S31292.cpumtr +++|* EF ERROR FLAG CAUSED BY SUB-CONTROL POINT.
52138 M00S31293.cpumtr +++|*
52139 M00S31294.cpumtr +++|* IF AN ERROR IS ENCOUNTERED DURING PROCESSING OF THE
52140 M00S31295.cpumtr +++|* *XJP* REQUEST, CERTAIN VALUES MAY HAVE ALREADY BEEN
52141 M00S31296.cpumtr +++|* ALTERED BY CPUMTR. THESE INCLUDE:
52142 M00S31297.cpumtr +++|* RA, EM, AND RAX IN THE SUB-CP EXCHANGE PACKAGE.
52143 M00S31298.cpumtr +++|* X2, AND X6 OF THE REQUESTING PROGRAM.
52144 M00S31299.cpumtr +++|
52145 M00S31300.cpumtr +++|
52146 M00S31301.cpumtr +++| XJP SB5 X5 ADDR
52147 M00S31302.cpumtr +++| MX0 24
52148 M00S31303.cpumtr +++| SB6 X5+20B
52149 M00S31304.cpumtr +++| LE B5,B1,CPE IF ILLEGAL ADDRESS
52150 M00S31305.cpumtr +++| GE B6,B4,CPE IF ILLEGAL ADDRESS
52151 M00S31306.cpumtr +++| NG B6,CPE IF ILLEGAL ADDRESS
52152 M00S31307.cpumtr +++| SA4 A0+TXJP READ EXCHANGE PACKAGE ADDRESS AND (MA)
52153 M00S31308.cpumtr +++|
52154 M00S31309.cpumtr +++|* MOVE EXCHANGE PACKAGE TO SUB CONTROL POINT EXCHANGE AREA.
52155 M00S31310.cpumtr +++|
52156 M00S31311.cpumtr +++| SA5 B3 RA
52157 M00S31312.cpumtr +++| SX6 B5 EXCHANGE ADDRESS
52158 M00S31313.cpumtr +++| IX5 X5+X6 ABSOLUTE ADDRESS OF SUBCP XP
52159 M00S31314.cpumtr +++| ERX3 X5 READ P
52160 M00S31315.cpumtr +++| LX2 36 POSITION RA
52161 M00S31316.cpumtr +++| BX6 X3
52162 M00S31317.cpumtr +++| SX3 B1
52163 M00S31318.cpumtr +++| IX5 X5+X3 RA ADDRESS
52164 M00S31319.cpumtr +++| ERX3 X5 READ RA
52165 M00S31320.cpumtr +++| SA6 X4
52166 M00S31321.cpumtr +++| IX7 X2+X3 RA(S) + RA(CP)
52167 M00S31322.cpumtr +++| BX3 X0*X3
52168 M00S31323.cpumtr +++| LX3 24
52169 M00S31324.cpumtr +++| PX6 X3
52170 M00S31325.cpumtr +++| SA7 X4+B1
52171 M00S31326.cpumtr +++| IX1 X1-X3 FL(CP) - RA(S)
52172 M00S31327.cpumtr +++| SX3 B1
52173 M00S31328.cpumtr +++| IX5 X5+X3 FL ADDRESS
52174 M00S31329.cpumtr +++| ERX3 X5 FL(S)
52175 M00S31330.cpumtr +++| SA6 B2+16B SET EXIT CONDITION IN (X6)
52176 M00S31331.cpumtr +++| BX2 X0*X3
52177 M00S31332.cpumtr +++| BX7 X3
52178 M00S31333.cpumtr +++| LX2 24
52179 M00S31334.cpumtr +++| SA7 A7+B1
52180 M00S31335.cpumtr +++| IX1 X1-X2 FL(CP) - RA(S) - FL(S)
52181 M00S31336.cpumtr +++| SX3 B1
52182 M00S31337.cpumtr +++| IX5 X5+X3
52183 M00S31338.cpumtr +++| ERX3 X5 EM
52184 M00S31339.cpumtr +++| SX7 B1 CLEAR COPY FLAG
52185 M00S31340.cpumtr +++| LX7 56-0
52186 M00S31341.cpumtr +++| TSX2 UEM SET COPY FLAG IF REQUIRED
52187 M00S31342.cpumtr +++| BX3 -X7*X3
52188 M00S31343.cpumtr +++| LX2 56-0
52189 M00S31344.cpumtr +++| BX7 X2+X3
52190 M00S31345.cpumtr +++| SA2 B2+4 READ RAX(CP)
52191 M00S31346.cpumtr +++| SX3 B1
52192 M00S31347.cpumtr +++| IX5 X5+X3
52193 M00S31348.cpumtr +++| ERX3 X5 RAX(S)
52194 M00S31349.cpumtr +++| NG X1,CPE IF RA(S) + FL(S) .GT. FL(CP)
52195 M00S31350.cpumtr +++| SA1 A2+B1 FLX(CP)
52196 M00S31351.cpumtr +++| BX2 X0*X2
52197 M00S31352.cpumtr +++| BX1 X0*X1
52198 M00S31353.cpumtr +++| IX6 X2+X3 RAX(S) + RAX(CP)
52199 M00S31354.cpumtr +++| BX3 X0*X3
52200 M00S31355.cpumtr +++| SA7 A7+B1
52201 M00S31356.cpumtr +++| IX1 X1-X3 FLX(CP) - RAX(S)
52202 M00S31357.cpumtr +++| SX3 B1
52203 M00S31358.cpumtr +++| IX5 X5+X3
52204 M00S31359.cpumtr +++| ERX3 X5 FLX(S)
52205 M00S31360.cpumtr +++| SA6 A7+B1
52206 M00S31361.cpumtr +++| BX7 X3
52207 M00S31362.cpumtr +++| BX3 X0*X3
Line S31363 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52208 M01S31363.271l750 ---| BX2 X0*X4
Line S02307 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52209 M01S02307.271l750 +++| LX4 36
52210 M00S31364.cpumtr +++| IX1 X1-X3 FLX(CP) - RAX(S) - FLX(S)
52211 M00S31365.cpumtr +++| SX3 B1
52212 M00S31366.cpumtr +++| IX5 X5+X3
52213 M00S31367.cpumtr +++| ERX3 X5 MA
52214 M00S31368.cpumtr +++| LX1 24
52215 M00S31369.cpumtr +++| NG X1,CPE IF RAX(S) + FLX(S) .GT. FLX(CP)
52216 M00S31370.cpumtr +++| BX3 -X0*X3
52217 M00S31371.cpumtr +++| SA7 A6+B1
Line S31372 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52218 M01S31372.271l750 ---| BX7 X2+X3
Line S02308 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52219 M01S02308.271l750 +++| BX7 X4+X3
52220 M00S31373.cpumtr +++| MX6 -11B SET LENGTH OF MOVE
52221 M00S31374.cpumtr +++| SA7 A7+B1
52222 M00S31375.cpumtr +++| SX3 B1
52223 M00S31376.cpumtr +++| IX5 X5+X3
52224 M00S31377.cpumtr +++| ERX3 X5
52225 M00S31378.cpumtr +++| BX3 -X0*X3
Line S31379 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52226 M01S31379.271l750 ---| BX3 X2+X3
Line S02309 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52227 M01S02309.271l750 +++| BX3 X4+X3
52228 M00S31380.cpumtr +++|
52229 M00S31381.cpumtr +++|* MOVE REMAINDER OF EXCHANGE PACKAGE.
52230 M00S31382.cpumtr +++|
52231 M00S31383.cpumtr +++| XJP1 BX7 X3
52232 M00S31384.cpumtr +++| AX6 1
52233 M00S31385.cpumtr +++| SA7 A7+B1
52234 M00S31386.cpumtr +++| SX3 B1
52235 M00S31387.cpumtr +++| IX5 X5+X3
52236 M00S31388.cpumtr +++| ERX3 X5
52237 M00S31389.cpumtr +++| NZ X6,XJP1 IF NOT END OF MOVE
52238 M00S31390.cpumtr +++| SA3 B7+STSW SET SUBCP ACTIVE BIT
52239 M00S31391.cpumtr +++| SX7 B1
52240 M00S31392.cpumtr +++| LX7 56
52241 M00S31393.cpumtr +++| BX7 X7+X3
52242 M00S31394.cpumtr +++| SA7 A3
52243 M00S31395.cpumtr +++| SB3 XJP2 *CPT* RETURN ADDRESS
Line S31396 Modification History
M01 (Removed by) 253l688
Seq # *Modification Id* Act
----------------------------+
52244 M01S31396.253l688 ---| TJMP /CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR/CPT
Line S02547 Modification History
M01 (Added by) 253l688
M02 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52245 M02S02547.271l750 ---| TJP (/CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR/CPT)
Line S02310 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52246 M01S02310.271l750 +++| TJP (/NVE/CPT,NVE,/CME/CPT,CME,/MONITOR/CP76,CP176,/MONITOR
52247 M01S02311.271l750 +++|,/CPT)
52248 M00S31397.cpumtr +++|
52249 M00S31398.cpumtr +++| XJP2 SA2 RA1 CHECK FOR INITIAL CALL
52250 M00S31399.cpumtr +++| SX1 B1
52251 M00S31400.cpumtr +++| ERX5 X2
52252 M00S31401.cpumtr +++| LX1 41
52253 M00S31402.cpumtr +++| BX7 X1+X5
52254 M00S31403.cpumtr +++| BX1 X1*X5
52255 M00S31404.cpumtr +++| EWX7 X2 SET NON-INITIAL CALL FLAG
52256 M00S31405.cpumtr +++| NZ X1,XJP3 IF NOT INITIAL CALL
52257 M00S31406.cpumtr +++| SA6 B2+12B SET (X2) TO START TIME
Line S31407 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52258 M01S31407.271l750 ---| XJP3 SA2 B7+CRCW SET UP *CPTD* AND *CRCW*
52259 M01S31408.271l750 ---| SA4 A0+TXJP
52260 M01S31409.271l750 ---| MX7 -24
52261 M01S31410.271l750 ---| AX2 24
52262 M01S31411.271l750 ---| BX4 -X7*X4 SUBCP XP ADDRESS
52263 M01S31412.271l750 ---| BX2 -X7*X2 CONTROL POINT ADDRESS
52264 M01S31413.271l750 ---| LX2 24
52265 M01S31414.271l750 ---| BX7 X2+X4
52266 M01S31415.271l750 ---| BX2 X2+X4 ENTRY TO *BNJ*
52267 M01S31416.271l750 ---| SA7 A2 SET *CRCW*
52268 M01S31417.271l750 ---| SA1 CPAL+A0
52269 M01S31418.271l750 ---| SA7 A1
Line S00106 Modification History
M01 (Added by) ns2443
M02 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52270 M02S00106.271l750 ---| MX0 24
Line S31419 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52271 M01S31419.271l750 ---| SA3 RTCL COMPUTE TIME LIMIT
52272 M01S31420.271l750 ---| BX3 -X0*X3
52273 M01S31421.271l750 ---| SA4 X4+B1 RA(S)
52274 M01S31422.271l750 ---| BX4 X0*X4
52275 M01S31423.271l750 ---| AX5 18
52276 M01S31424.271l750 ---| MX0 -18
52277 M01S31425.271l750 ---| BX5 -X0*X5 REQUESTED TIME LIMIT
52278 M01S31426.271l750 ---| IX5 X5+X3
52279 M01S31427.271l750 ---| BX7 X5+X4
52280 M01S31428.271l750 ---| SA7 ACPL+A0 SET ACCOUNTING CONTROL
52281 M01S31429.271l750 ---| EQ /MONITOR/BNJ7 COPY EXCHANGE PACKAGE
Line S02312 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52282 M01S02312.271l750 +++| XJP3 SA2 A0+TXJP
52283 M01S02313.271l750 +++| SA1 RTCL
52284 M01S02314.271l750 +++| SX7 B7 CONTROL POINT ADDRESS
52285 M01S02315.271l750 +++| LX5 -18
52286 M01S02316.271l750 +++| MX0 -36
52287 M01S02317.271l750 +++| LX7 24
52288 M01S02318.271l750 +++| MX6 -18
52289 M01S02319.271l750 +++| SA4 X2+B1 RA(S)
52290 M01S02320.271l750 +++| BX7 X7+X2 SET CP AND EXCHANGE PACKAGE ADDRESSES
52291 M01S02321.271l750 +++| BX1 -X0*X1 MILLISECOND CLOCK
52292 M01S02322.271l750 +++| BX5 -X6*X5 REQUESTED TIME LIMIT
52293 M01S02323.271l750 +++| SA7 CPAL+A0 UPDATE *CPAL*
52294 M01S02324.271l750 +++| IX5 X5+X1
52295 M01S02325.271l750 +++| BX4 X0*X4 SUBCP RA
52296 M01S02326.271l750 +++| SX3 B2 SET OLD EXCHANGE ADDRESS
52297 M01S02327.271l750 +++| BX6 X5+X4
52298 M01S02328.271l750 +++| SX1 B2-B7 SET EXCHANGE PACKAGE MOVE DIFFERENTIAL
52299 M01S02329.271l750 +++| SA6 ACPL+A0 UPDATE *ACPL*
52300 M01S02330.271l750 +++| SB2 X2+ SET SUBCP EXCHANGE ADDRESS
52301 M01S02331.271l750 +++| EQ /MONITOR/BNJ20 CHECK EXCHANGE PACKAGE COPY
52302 M01S02332.271l750 +++| TXJP SPACE 4,10
52303 M01S02333.271l750 +++|** TXJP - TABLE OF SUB-CONTROL POINT EXCHANGE PACKAGES.
52304 M01S02334.271l750 +++|*
52305 M01S02335.271l750 +++|* INDEXED BY CPU NUMBER.
52306 M00S31430.cpumtr +++|
Line S31431 Modification History
M01 (Removed by) 271l750
Seq # *Modification Id* Act
----------------------------+
52307 M01S31431.271l750 ---| TXJP VFD 24//MONITOR/SCX
52308 M01S31432.271l750 ---| VFD 18/0,18/SCX
52309 M01S31433.271l750 ---| VFD 24//DCP/SCX1
52310 M01S31434.271l750 ---| VFD 18/0,18//DCP/SCX1
Line S02336 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
52311 M01S02336.271l750 +++|
52312 M01S02337.271l750 +++| TXJP VFD 42/0,18/SCX
52313 M01S02338.271l750 +++| VFD 42/0,18//DCP/SCX1
52314 M00S31435.cpumtr +++| SPACE 4
52315 M00S31436.cpumtr +++|** SCX - SUB-CONTROL POINT EXCHANGE PACKAGE.
52316 M00S31437.cpumtr +++|
52317 M00S31438.cpumtr +++|
52318 M00S31439.cpumtr +++| SCX EXP
52319 M00S31440.cpumtr +++|
52320 M00S31441.cpumtr +++| ENDBLK
52321 M00S31442.cpumtr +++| BLOCK CSE,(CLEAR CM STORAGE VIA ECS.),PROGRAM
52322 M00S31443.cpumtr +++| CSE SPACE 4,10
52323 M00S31444.cpumtr +++|** CSE - CLEAR CM STORAGE VIA ECS. (PROGRAM MODE)
52324 M00S31445.cpumtr +++|*
52325 M00S31446.cpumtr +++|* ENTRY (A5) = PPU OUTPUT REGISTER ADDRESS.
52326 M00S31447.cpumtr +++|* (X1) = BITS 0 - 47 OF OUTPUT REGISTER.
52327 M00S31448.cpumtr +++|* (X5) = PPU OUTPUT REGISTER.
52328 M00S31449.cpumtr +++|*
Line S31450 Modification History
M01 (Removed by) 273l780
Seq # *Modification Id* Act
----------------------------+
52329 M01S31450.273l780 ---|* USES X - 0, 1, 2, 5.
Line S00923 Modification History
M01 (Added by) 273l780
Seq # *Modification Id* Act
----------------------------+
52330 M01S00923.273l780 +++|* USES X - 0, 1, 2, 3, 5.
52331 M01S00924.273l780 +++|* A - 0, 1, 2, 3.
52332 M00S31451.cpumtr +++|* B - 3, 4, 5.
Line S31452 Modification History
M01 (Removed by) 273l780
Seq # *Modification Id* Act
----------------------------+
52333 M01S31452.273l780 ---|* A - 0, 1, 2.
52334 M00S31453.cpumtr +++|
52335 M00S31454.cpumtr +++|
52336 M00S31455.cpumtr +++| CSE TA2 EEN GET ECS EST ENTRY
Line S31456 Modification History
M01 (Removed by) 251l664
Seq # *Modification Id* Act
----------------------------+
52337 M01S31456.251l664 ---| LX2 59-23
52338 M01S31457.251l664 ---| TNG X2,(/PROGRAM/CSC,/PROGRAM/CSP,CMU) IF ECS OFF
Line S02819 Modification History
M01 (Added by) 251l664
Seq # *Modification Id* Act
----------------------------+
52339 M01S02819.251l664 +++| LX2 59-49
Line S02820 Modification History
M01 (Added by) 251l664
M02 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
52340 M02S02820.252l678 ---| TNG X2,(/PROGRAM/CSC,/PROGRAM/CSP,CMU) IF EM OFF OR DOWN
Line S00894 Modification History
M01 (Added by) 252l678
Seq # *Modification Id* Act
----------------------------+
52341 M01S00894.252l678 +++| TNG X2,(/PROGRAM/CSC,CMU,/PROGRAM/CSP) IF EM OFF OR DOWN
52342 M00S31458.cpumtr +++|
52343 M00S31459.cpumtr +++|* ENTRY FOR CME MAINFRAMES.
52344 M00S31460.cpumtr +++|* THE UEM FAKE READ IS USED ON ALL CYBER 170-8X5
52345 M00S31461.cpumtr +++|* MAINFRAMES WHEN NO EXTERNAL ECS DEVICE IS DEFINED.
52346 M00S31462.cpumtr +++|* NOTE THAT EVEN WHEN EXTERNAL ECS IS DEFINED ON A
52347 M00S31463.cpumtr +++|* CYBER 170-865/875, THE SMU DOES NOT ACCESS THE DEVICE
Line S31464 Modification History
M01 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
52348 M01S31464.252l678 ---|* IF A FAKE READ WITH BIT 21 SET IS ISSUED, SO NO CHECK
52349 M01S31465.252l678 ---|* IS NEEDED FOR ECS DEVICE LOGICALLY OFF.
Line S00895 Modification History
M01 (Added by) 252l678
Seq # *Modification Id* Act
----------------------------+
52350 M01S00895.252l678 +++|* IF A FAKE READ IS ISSUED, SO NO CHECK IS NEEDED FOR EM
52351 M01S00896.252l678 +++|* DEVICE LOGICALLY TURNED OFF.
52352 M00S31466.cpumtr +++|
52353 M00S31467.cpumtr +++| CSE1 LX5 59-43
Line S31468 Modification History
M01 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
52354 M01S31468.252l678 ---| TNG X5,(/PROGRAM/CEC,/PROGRAM/HNG,UEC) IF CLEAR USER ECS
Line S00897 Modification History
M01 (Added by) 252l678
Seq # *Modification Id* Act
----------------------------+
52355 M01S00897.252l678 +++| TNG X5,(/PROGRAM/CEC,UEC,/PROGRAM/HNG) IF CLEAR USER ECS
52356 M00S31469.cpumtr +++| LX5 -24-59+43
52357 M00S31470.cpumtr +++| SB3 X5 (B3) = 0 IF LIST PRESENT
52358 M00S31471.cpumtr +++| NZ B3,CSE2 IF NOT LIST OPTION
52359 M00S31472.cpumtr +++| SA1 A5+B1 GET LIST ENTRY
52360 M00S31473.cpumtr +++| CSE2 SA0 X1
Line S00001 Modification History
M01 (Added by) ns2520
Seq # *Modification Id* Act
----------------------------+
52361 M01S00001.ns2520 +++| MX5 -21
Line S31474 Modification History
M01 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
52362 M01S31474.252l678 ---| MX5 -21
52363 M01S31475.252l678 ---| BX5 -X5*X1
52364 M01S31476.252l678 ---| AX1 24 EXTRACT WORD COUNT
52365 M01S31477.252l678 ---| TSX0 (LCCB,1,CP176)
52366 M01S31478.252l678 ---| SB5 X1
Line S00898 Modification History
M01 (Added by) 252l678
M02 (Removed by) ns2499
Seq # *Modification Id* Act
----------------------------+
52367 M02S00898.ns2499 ---| TSX0 (LCCB,CP176,0)
52368 M02S00899.ns2499 ---| NZ X0,CSE2.1 IF 176 TYPE MAINFRAME
52369 M02S00900.ns2499 ---| TSX0 0,THCCB
52370 M02S00901.ns2499 ---| SX5 B1
52371 M02S00902.ns2499 ---| IX5 X0-X5
52372 M02S00903.ns2499 ---| ZR X5,CSE2.1 IF NOT CYBER 990
52373 M02S00904.ns2499 ---| LX0 6-21 MULTIPLY BY 100B AND NULLIFY 21 BIT SHIFT
52374 M02S00905.ns2499 ---| CSE2.1 MX5 -21
52375 M02S00906.ns2499 ---| BX5 -X5*X1
52376 M02S00907.ns2499 ---| AX1 24 EXTRACT WORD COUNT
Line S00009 Modification History
M01 (Added by) ns2499
Seq # *Modification Id* Act
----------------------------+
52377 M01S00009.ns2499 +++| TSX0 (LCCB-1,CP176,1-1)
52378 M01S00010.ns2499 +++| SAC 18,CCMB ADD CLEAR CENTRAL MEMORY BUFFER
52379 M01S00011.ns2499 +++| NZ X0,CSE3 IF NOT A 990
Line S00012 Modification History
M01 (Added by) ns2499
M02 (Removed by) 273l780
Seq # *Modification Id* Act
----------------------------+
52380 M02S00012.273l780 ---| SA3 ECRL GET RAE FOR CP 0
Line S00925 Modification History
M01 (Added by) 273l780
Seq # *Modification Id* Act
----------------------------+
52381 M01S00925.273l780 +++| SA3 ECRL GET RAE FOR ZERO UEM BLOCK
Line S00013 Modification History
M01 (Added by) ns2499
Seq # *Modification Id* Act
----------------------------+
52382 M01S00013.ns2499 +++| LX3 0-12
52383 M01S00014.ns2499 +++| MX0 -24
52384 M01S00015.ns2499 +++| BX0 -X0*X3
52385 M01S00016.ns2499 +++| TLX0 9-21+60,UESC
Line S00017 Modification History
M01 (Added by) ns2499
M02 (Removed by) ns2520
Seq # *Modification Id* Act
----------------------------+
52386 M02S00017.ns2520 ---| CSE3 MX5 -21
52387 M02S00018.ns2520 ---| BX5 -X5*X1 GET CM ADDRESS
Line S00002 Modification History
M01 (Added by) ns2520
Seq # *Modification Id* Act
----------------------------+
52388 M01S00002.ns2520 +++| CSE3 BX5 -X5*X1 GET CM ADDRESS
Line S00019 Modification History
M01 (Added by) ns2499
Seq # *Modification Id* Act
----------------------------+
52389 M01S00019.ns2499 +++| AX1 24