Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:cpumtr.039
Deck CPUMTR Part 039
308 Modifications
Listing Sections
- Deck CPUMTR Start
- Deck CPUMTR Part 1 (Line 1426)
- Deck CPUMTR Part 2 (Line 2835)
- Deck CPUMTR Part 3 (Line 4189)
- Deck CPUMTR Part 4 (Line 5202)
- Deck CPUMTR Part 5 (Line 6708)
- Deck CPUMTR Part 6 (Line 8299)
- Deck CPUMTR Part 7 (Line 9638)
- Deck CPUMTR Part 8 (Line 10916)
- Deck CPUMTR Part 9 (Line 11967)
- Deck CPUMTR Part 10 (Line 13138)
- Deck CPUMTR Part 11 (Line 14282)
- Deck CPUMTR Part 12 (Line 15410)
- Deck CPUMTR Part 13 (Line 16567)
- Deck CPUMTR Part 14 (Line 17788)
- Deck CPUMTR Part 15 (Line 19052)
- Deck CPUMTR Part 16 (Line 20073)
- Deck CPUMTR Part 17 (Line 21429)
- Deck CPUMTR Part 18 (Line 22828)
- Deck CPUMTR Part 19 (Line 24227)
- Deck CPUMTR Part 20 (Line 25696)
- Deck CPUMTR Part 21 (Line 26966)
- Deck CPUMTR Part 22 (Line 28134)
- Deck CPUMTR Part 23 (Line 29251)
- Deck CPUMTR Part 24 (Line 30351)
- Deck CPUMTR Part 25 (Line 31361)
- Deck CPUMTR Part 26 (Line 32485)
- Deck CPUMTR Part 27 (Line 33477)
- Deck CPUMTR Part 28 (Line 34727)
- Deck CPUMTR Part 29 (Line 36372)
- Deck CPUMTR Part 30 (Line 38175)
- Deck CPUMTR Part 31 (Line 39467)
- Deck CPUMTR Part 32 (Line 41032)
- Deck CPUMTR Part 33 (Line 42467)
- Deck CPUMTR Part 34 (Line 44089)
- Deck CPUMTR Part 35 (Line 45392)
- Deck CPUMTR Part 36 (Line 46832)
- Deck CPUMTR Part 37 (Line 47923)
- Deck CPUMTR Part 38 (Line 49530)
- Deck CPUMTR Part 39 (Line 50976)
- Deck CPUMTR Part 40 (Line 52390)
- Deck CPUMTR Part 41 (Line 53539)
- Deck CPUMTR Part 42 (Line 54779)
- Deck CPUMTR Part 43 (Line 56002)
- Deck CPUMTR Part 44 (Line 57163)
- Deck CPUMTR Part 45 (Line 58215)
- Deck CPUMTR Part 46 (Line 59341)
Source
Seq # *Modification Id* Act ----------------------------+ 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
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
51091 M00S30479.cpumtr +++|*T ADDR+1 24/ JSN,24/ 0,12/ JEJT
Figure ADDR+1
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
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
52133 M00S31288.cpumtr +++|*T, X6 12/ 200B+EF,48/ RA OF SUBCP.
Figure X6
52134 M00S31289.cpumtr +++|*T, X7 60/ CPU TIME USED BY SUBCP.
Figure X7
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
Proceed to Part 40
cdc/nos2.source/opl.opl871/deck/cpumtr.039.txt · Last modified: by 127.0.0.1