Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.compcsc +++| CTEXT COMPCSC - CHANGE JOB SERVICE CLASS.
00002 M00S00002.compcsc +++| SPACE 4,10
00003 M00S00003.compcsc +++| QUAL$ IF -DEF,QUAL$
00004 M00S00004.compcsc +++| QUAL COMPCSC
00005 M00S00005.compcsc +++| QUAL$ ENDIF
| Line S00006 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00006 M01S00006.281l803 ---|* COMMENT COMPCSC - CHANGE JOB SERVICE CLASS.
00007 M01S00007.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORP. 1981.
| Line S00001 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00008 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00009 M00S00008.compcsc +++| SPACE 4,10
00010 M00S00009.compcsc +++|*** COMPCSC - CHANGE JOB SERVICE CLASS.
00011 M00S00010.compcsc +++|*
00012 M00S00011.compcsc +++|* J. L. LARSON. 81/04/30.
00013 M00S00012.compcsc +++| SPACE 4,10
00014 M00S00013.compcsc +++|** *COMPCSC* CHANGES THE SERVICE CLASS OF A JOB IN THE EJT.
00015 M00S00014.compcsc +++|*
00016 M00S00015.compcsc +++|* IF *CSC$* IS DEFINED, IT IS ASSUMED THAT THE SERVICE CLASS
00017 M00S00016.compcsc +++|* HAS ALREADY BEEN VALIDATED AND THAT THE JOB BEING CHANGED
00018 M00S00017.compcsc +++|* IS NOT A SUBSYSTEM.
00019 M00S00018.compcsc +++|*
00020 M00S00019.compcsc +++|* XREF COMPAST, COMPGFP, COMPRJC, COMPCPS, COMSEJT, COMSSSJ.
00021 M00S00020.compcsc +++| CSC SPACE 4,15
00022 M00S00021.compcsc +++|** CSC - CHANGE JOB SERVICE CLASS.
00023 M00S00022.compcsc +++|*
00024 M00S00023.compcsc +++|* ENTRY (A) = NEW SERVICE CLASS.
00025 M00S00024.compcsc +++|*
00026 M00S00025.compcsc +++|* EXIT (A) .GE. 0, IF ILLEGAL SERVICE CLASS.
00027 M00S00026.compcsc +++|*
| Line S00027 Modification History |
M01 (Removed by) | pcsc7 |
Seq # *Modification Id* Act
----------------------------+
00028 M01S00027.pcsc7 ---|* USES CM - CM+4, CN - CN+4, T0 - T6.
| Line S00001 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00029 M02S00001.ns2731 ---|* USES CM - CM+4, CN - CN+4, T0 - T7.
| Line S00001 Modification History |
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00030 M01S00001.ns2731 +++|* USES CM - CM+4, CN - CN+4, T4, T5.
00031 M00S00028.compcsc +++|*
00032 M00S00029.compcsc +++|* CALLS DFM, RJC, UJS.
00033 M00S00030.compcsc +++|*
| Line S00031 Modification History |
M01 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00034 M01S00031.ns2731 ---|* MACROS MONITOR, NFA, SFA.
| Line S00002 Modification History |
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00035 M01S00002.ns2731 +++|* MACROS CFI, MONITOR, SFA.
00036 M00S00032.compcsc +++|
00037 M00S00033.compcsc +++|
00038 M00S00034.compcsc +++| CSC SUBR ENTRY/EXIT
00039 M00S00035.compcsc +++| STD T5 SAVE NEW SERVICE CLASS
00040 M00S00036.compcsc +++| CSC$ IF -DEF,CSC$
00041 M00S00037.compcsc +++| STM CSCB+4
00042 M00S00038.compcsc +++| SBN MXJC
00043 M00S00039.compcsc +++| PJN CSCX IF ILLEGAL SERVICE CLASS
00044 M00S00040.compcsc +++| CSC$ ENDIF
00045 M00S00041.compcsc +++| LDD CP RETRIEVE CURRENT SERVICE CLASS
00046 M00S00042.compcsc +++| ADN TFSW
00047 M00S00043.compcsc +++| CRD CM
00048 M00S00044.compcsc +++| LDD CM
00049 M00S00045.compcsc +++| CSC$ IF -DEF,CSC$
00050 M00S00046.compcsc +++| STM UJSC
00051 M00S00047.compcsc +++| CSC$ ENDIF
00052 M00S00048.compcsc +++| SFA EJT GET ADDRESS OF EJT ENTRY
00053 M00S00049.compcsc +++| ADK JSNE
00054 M00S00050.compcsc +++| CRM CSCC,ON READ CURRENT JSN
00055 M00S00051.compcsc +++| ADN SCLE-JSNE-1
00056 M00S00052.compcsc +++| CRD CM
00057 M00S00053.compcsc +++| LDD CM
00058 M00S00054.compcsc +++| SHN -6
00059 M00S00055.compcsc +++| CSC$ IF -DEF,CSC$
00060 M00S00056.compcsc +++| STM UJSA
00061 M00S00057.compcsc +++| LMC 7700 SET FIELD NON-ZERO
00062 M00S00058.compcsc +++| CSC$ ENDIF
| Line S00059 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
00063 M01S00059.271l750 ---| STM CSCC+4 SAVE CURRENT SERVICE CLASS
| Line S00001 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
00064 M01S00001.271l750 +++| STM CSCC+4 SAVE OLD SERVICE CLASS
| Line S00002 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00065 M02S00002.ns2731 ---| LPN 77
| Line S00003 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | 271l750 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00066 M03S00003.ns2731 ---| RJM RJC GET CURRENT CPU UPPER BOUND
00067 M03S00004.ns2731 ---| ADK SVJT
| Line S00002 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00068 M02S00002.ns2731 ---| RJM RJC GET OLD SERVICE CLASS CPU PRIORITY
00069 M02S00003.ns2731 ---| ADK CSJT
| Line S00005 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00070 M02S00005.ns2731 ---| CRD CM
| Line S00006 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | 271l750 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00071 M03S00006.ns2731 ---| LDD CM
00072 M03S00007.ns2731 ---| LPN 77
| Line S00004 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00073 M02S00004.ns2731 ---| LDD CM SAVE OLD SERVICE CLASS CPU PRIORITY
| Line S00008 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00074 M02S00008.ns2731 ---| STD T7
00075 M00S00060.compcsc ---| LCN 0
00076 M00S00061.compcsc ---| STM CSCC+2
00077 M00S00062.compcsc ---| STM CSCC+3
00078 M00S00063.compcsc ---| CSC$ IF -DEF,CSC$
00079 M00S00064.compcsc ---| LDM TUSC,T5 CHECK IF CHANGE ALLOWED
00080 M00S00065.compcsc ---| NJP CSCX IF SERVICE CLASS CHANGE NOT ALLOWED
00081 M00S00066.compcsc ---| CSC$ ENDIF
00082 M00S00067.compcsc ---| LDD T5 GET NEW SERVICE CLASS
00083 M00S00068.compcsc ---| RJM RJC
00084 M00S00069.compcsc ---| ZJP CSCX IF NO JCB FOR SERVICE CLASS
| Line S00070 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
00085 M01S00070.271l750 ---| ADN SVJT
| Line S00005 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00086 M02S00005.ns2731 ---| ADN CSJT
| Line S00071 Modification History |
M01 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00087 M01S00071.ns2731 ---| CRD CM
| Line S00072 Modification History |
M01 (Removed by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00088 M02S00072.ns2731 ---| ADK JCTT-SVJT READ JOBS WAITING INDICATOR
| Line S00006 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00089 M02S00006.ns2731 ---| ADK JCTT-CSJT READ JOBS WAITING INDICATOR
| Line S00003 Modification History |
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00090 M01S00003.ns2731 +++| ADK JCTT READ JOBS WAITING INDICATOR
00091 M00S00073.compcsc +++| CRD CN
| Line S00074 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
00092 M01S00074.271l716 ---| LDD CM SAVE CPU PRIORITY
| Line S00001 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
00093 M02S00001.271l750 ---| LDD CM SAVE UPPER BOUND CPU PRIORITY
00094 M02S00002.271l750 ---| LPN 77
| Line S00007 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00095 M02S00007.ns2731 ---| LDD CM SAVE NEW SERVICE CLASS CPU PRIORITY
| Line S00075 Modification History |
M01 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00096 M01S00075.ns2731 ---| STD T6
00097 M00S00076.compcsc ---| LDN 0 CLEAR JOBS WAITING INDICATOR
00098 M00S00077.compcsc ---| STD CN+1
00099 M00S00078.compcsc ---| LDD T5
00100 M00S00079.compcsc ---| RJM RJC
00101 M00S00080.compcsc ---| ADK JCTT
00102 M00S00081.compcsc ---| CWD CN
| Line S00082 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
00103 M01S00082.271l716 ---| LDD CP CHECK FOR SSJ= JOB
00104 M01S00083.271l716 ---| ADC SEPW
| Line S00003 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00105 M02S00003.ns2731 ---| LDD CP CHECK CURRENT CPU PRIORITY
| Line S00004 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00106 M03S00004.ns2731 ---| ADK JCIW
| Line S00008 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00107 M02S00008.ns2731 ---| ADK CWQW
| Line S00005 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00108 M02S00005.ns2731 ---| CRD CN
| Line S00006 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00109 M03S00006.ns2731 ---| ADK SEPW-JCIW CHECK FOR *SSJ=* JOB
| Line S00009 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00110 M02S00009.ns2731 ---| ADK SEPW-CWQW CHECK FOR *SSJ=* JOB
| Line S00084 Modification History |
M01 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00111 M01S00084.ns2731 ---| CRD CM
| Line S00007 Modification History |
M01 (Added by) | 271l716 |
M02 (Removed by) | pcsc7 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00112 M03S00007.ns2731 ---| LDD CN
00113 M03S00008.ns2731 ---| SHN 21-10
00114 M03S00009.ns2731 ---| MJN CSC4 IF CURRENT CPU PRIORITY AT LEAST *LFCS*
| Line S00085 Modification History |
M01 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00115 M01S00085.ns2731 ---| LDD CM
00116 M01S00086.ns2731 ---| SHN 21-2
00117 M01S00087.ns2731 ---| PJN CSC3 IF NO *SSJ=* ENTRY POINT
00118 M01S00088.ns2731 ---| LDD CM+3 CHECK FOR SWAP BLOCK
00119 M01S00089.ns2731 ---| LPN 37
00120 M01S00090.ns2731 ---| ADD CM+4
00121 M01S00091.ns2731 ---| ZJN CSC3 IF NO SWAP BLOCK
00122 M01S00092.ns2731 ---| NFA SSJN+SPPS READ *SSJ=* BLOCK
00123 M01S00093.ns2731 ---| CRD T0
| Line S00009 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00124 M02S00009.ns2731 ---| LDD T7
00125 M02S00010.ns2731 ---| SBD T0+3
| Line S00011 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | 271l750 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00126 M03S00011.ns2731 ---| MJN CSC4 IF CURRENT PRIORITY .GT. OLD UPPER BOUND
| Line S00094 Modification History |
M01 (Removed by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00127 M02S00094.ns2731 ---| LDD T6 SET CPU PRIORITY IN SSJ= BLOCK
00128 M02S00095.ns2731 ---| STD T0+3
| Line S00010 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00129 M02S00010.ns2731 ---| MJN CSC4 IF JOB ABOVE OLD SERVICE CLASS PRIORITY
00130 M02S00011.ns2731 ---| LDD T6 CPU PRIORITY FROM NEW SERVICE CLASS
00131 M02S00012.ns2731 ---| STD T0+3 SET CPU PRIORITY IN *SSJ=* BLOCK
| Line S00096 Modification History |
M01 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00132 M01S00096.ns2731 ---| NFA SSJN+SPPS
00133 M01S00097.ns2731 ---| CWD T0
00134 M01S00098.ns2731 ---| UJN CSC4 SET SERVICE CLASS IDENTIFIER
00135 M01S00099.ns2731 ---|
| Line S00100 Modification History |
M01 (Removed by) | pcsc7 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00136 M02S00100.ns2731 ---| CSC3 LDD T6 SET CPU PRIORITY
| Line S00012 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00137 M02S00012.ns2731 ---| CSC3 LDD CN
| Line S00013 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00138 M02S00013.ns2731 ---| SHN -3
| Line S00013 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00139 M02S00013.ns2731 ---| LPC 177
| Line S00014 Modification History |
M01 (Added by) | pcsc7 |
M02 (Removed by) | 271l750 |
M03 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00140 M03S00014.ns2731 ---| SBD T7
00141 M03S00015.ns2731 ---| MJN CSC3.1 IF CURRENT PRIORITY .LT. OLD UPPER BOUND
00142 M03S00016.ns2731 ---| NJN CSC4 IF CURRENT PRIORITY .GT. OLD UPPER BOUND
00143 M03S00017.ns2731 ---| CSC3.1 LDD T6 SET CPU PRIORITY
| Line S00014 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00144 M02S00014.ns2731 ---| SBD T7 CPU PRIORITY FROM OLD SERVICE CLASS
00145 M02S00015.ns2731 ---| MJN CSC3.1 IF JOB IS BELOW SERVICE CLASS CPU PRIORITY
00146 M02S00016.ns2731 ---| NJN CSC4 IF JOB IS ABOVE SERVICE CLASS CPU PRIORITY
00147 M02S00017.ns2731 ---| CSC3.1 LDD T6 SET CPU PRIORITY FROM NEW SERVICE CLASS
| Line S00101 Modification History |
M01 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00148 M01S00101.ns2731 ---| STD CM+4
00149 M01S00102.ns2731 ---| LDN CPRS
00150 M01S00103.ns2731 ---| STD CM+1
00151 M01S00104.ns2731 ---| MONITOR SJCM
00152 M01S00105.ns2731 ---| CSC4 LDM CSCA,T5 GET NEW SERVICE CLASS CHARACTER
| Line S00004 Modification History |
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00153 M01S00004.ns2731 +++| LDM CSCA,T5 GET NEW SERVICE CLASS CHARACTER
00154 M00S00106.compcsc +++| STM CSCD+3
00155 M00S00107.compcsc +++| CSC$ IF -DEF,CSC$
00156 M00S00108.compcsc +++| LDM UJSC
00157 M00S00109.compcsc +++| SFA EJT GET FWA OF EJT ENTRY
00158 M00S00110.compcsc +++| STD CM+4
00159 M00S00111.compcsc +++| SHN -14
00160 M00S00112.compcsc +++| STD CM+3
00161 M00S00113.compcsc +++| LDN 1 SET NUMBER OF REQUESTS FOR *UTEM*
00162 M00S00114.compcsc +++| STD CM+1
00163 M00S00115.compcsc +++| LDD MA WRITE REQUEST TO MESSAGE BUFFER
00164 M00S00116.compcsc +++| CWM CSCB,CM+1
00165 M00S00117.compcsc +++| MONITOR UTEM CHANGE SERVICE CLASS IN EJT ENTRY
00166 M01S00005.ns2731 +++| CSC$ ENDIF
00167 M01S00006.ns2731 +++|
00168 M01S00007.ns2731 +++|* SET CPU SCHEDULING PARAMETERS FOR NEW SERVICE CLASS.
00169 M01S00008.ns2731 +++|
| Line S00018 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
00170 M01S00018.271l750 +++| LDN ZERL
00171 M01S00019.271l750 +++| CRD CM
| Line S00020 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00172 M02S00020.ns2731 ---| LDN SSPS SET SCHEDULING PARAMETERS INDEX IN *CWQW*
| Line S00009 Modification History |
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00173 M01S00009.ns2731 +++| LDN SSPS SET CPU SCHEDULING PARAMETERS
| Line S00021 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
00174 M01S00021.271l750 +++| STD CM+1
| Line S00022 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00175 M02S00022.ns2731 ---| LDD T5
| Line S00010 Modification History |
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00176 M01S00010.ns2731 +++| LDD T5 SET JCB OFFSET
| Line S00023 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
00177 M01S00023.271l750 +++| CFI JCB
00178 M01S00024.271l750 +++| STD CM+4
00179 M01S00025.271l750 +++| MONITOR SJCM
00180 M00S00118.compcsc +++|
00181 M00S00119.compcsc +++|* DETERMINE IF FORMERLY A SUBSYSTEM.
00182 M00S00120.compcsc +++|
| Line S00011 Modification History |
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00183 M01S00011.ns2731 +++| CSC$ IF -DEF,CSC$
00184 M00S00121.compcsc +++| RJM UJS UPDATE JSN AND SUBSYSTEM TABLES
00185 M00S00122.compcsc +++| CSC$ ENDIF
00186 M00S00123.compcsc +++|
00187 M00S00124.compcsc +++|* GET ACCUMULATED SRU-S FOR *ACSC* MESSAGE.
00188 M00S00125.compcsc +++|
00189 M00S00126.compcsc +++| LDN ACTWL
00190 M00S00127.compcsc +++| STD T4
00191 M00S00128.compcsc +++| LDD CP GET CONVERTED SRU-S FOR MESSAGE
00192 M00S00129.compcsc +++| ADN ACTW
00193 M00S00130.compcsc +++| CRM CSCE,T4
00194 M00S00131.compcsc +++| LDD MA
00195 M00S00132.compcsc +++| CWM CSCE,T4
00196 M00S00133.compcsc +++| LDN ABVF
00197 M00S00134.compcsc +++| STD CM+1
00198 M00S00135.compcsc +++| MONITOR ACTM
00199 M00S00136.compcsc +++| LDD MA SET SRU-S INTO MESSAGE
00200 M00S00137.compcsc +++| CRM CSCD+10,ON
| Line S00001 Modification History |
M01 (Added by) | pcsc6 |
Seq # *Modification Id* Act
----------------------------+
00201 M01S00001.pcsc6 +++| LDM CSCD+10
00202 M01S00002.pcsc6 +++| NJN CSC5 IF SRU ACCUMULATOR NONZERO
00203 M01S00003.pcsc6 +++| LDD MA
00204 M01S00004.pcsc6 +++| CWM CSCG,ON FORMAT CORRECT MESSAGE
00205 M01S00005.pcsc6 +++| SBN 1
00206 M01S00006.pcsc6 +++| CRM CSCD+10,ON
00207 M00S00138.compcsc +++|
00208 M00S00139.compcsc +++|* ISSUE ACCOUNTING MESSAGES.
00209 M00S00140.compcsc +++|
| Line S00141 Modification History |
M01 (Removed by) | pcsc6 |
Seq # *Modification Id* Act
----------------------------+
00210 M01S00141.pcsc6 ---| LDC CPON+CSCD ISSUE MESSAGE TO USER DAYFILE
| Line S00007 Modification History |
M01 (Added by) | pcsc6 |
M02 (Removed by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00211 M02S00007.ns2731 ---| CSC5 LDC CPON+CSCD ISSUE MESSAGE TO USER DAYFILE
| Line S00012 Modification History |
M01 (Added by) | ns2731 |
Seq # *Modification Id* Act
----------------------------+
00212 M01S00012.ns2731 +++| CSC5 LDC CDON+CSCD ISSUE MESSAGE TO USER DAYFILE ONLY
00213 M00S00142.compcsc +++| RJM DFM
00214 M00S00143.compcsc +++| LDC AJNN+CSCC ISSUE MESSAGE TO ACCOUNT FILE WITH OLD JSN
00215 M00S00144.compcsc +++| RJM DFM
00216 M00S00145.compcsc +++|
00217 M00S00146.compcsc +++|* RESET PARAMETERS.
00218 M00S00147.compcsc +++|
00219 M00S00148.compcsc +++| LDC 2R CLEAR JSN
00220 M00S00149.compcsc +++| STM CSCD+5
00221 M00S00150.compcsc +++| STM CSCD+6
00222 M00S00151.compcsc +++| LCN 1 SET *NO ERROR* STATUS
00223 M00S00152.compcsc +++| LJM CSCX RETURN
00224 M00S00153.compcsc +++|
00225 M00S00154.compcsc +++|
00226 M00S00155.compcsc +++| CSCA BSS 0 TABLE OF SERVICE CLASS CHARACTERS
00227 M00S00156.compcsc +++| .1 SET 1
00228 M00S00157.compcsc +++| .A DUP MXJC
00229 M00S00158.compcsc +++| .2 MICRO .1,1,$"NMDS"$
00230 M00S00159.compcsc +++| CON 2H ".2"
00231 M00S00160.compcsc +++| .1 SET .1+1
00232 M00S00161.compcsc +++| .A ENDD
00233 M00S00162.compcsc +++|
00234 M00S00163.compcsc +++| CSCB VFD 1/0,5/SCLE,6/6,6/54D,36/,6/**
00235 M00S00164.compcsc +++| CSCC BSS 5 CURRENT JSN AND SERVICE CLASS
00236 M00S00165.compcsc +++| CSCD DATA C*ACSC, S, , 000000.000UNTS.*
00237 M00S00166.compcsc +++|
00238 M00S00167.compcsc +++| CSCE BSS ACTWL*5 BUFFER FOR CPA ACCUMULATOR WORDS
| Line S00008 Modification History |
M01 (Added by) | pcsc6 |
Seq # *Modification Id* Act
----------------------------+
00239 M01S00008.pcsc6 +++| CSCG DATA C* 0.000* DISPLAY FORMAT ZERO
00240 M00S00168.compcsc +++| CSC$ IF -DEF,CSC$
00241 M00S00169.compcsc +++| TUSC SPACE 4,10
00242 M00S00170.compcsc +++|** TUSC - TABLE OF UNALLOWABLE SERVICE CLASS CHANGES.
00243 M00S00171.compcsc +++|*
00244 M00S00172.compcsc +++|* TABLE IS INDEXED BY SERVICE CLASS.
00245 M00S00173.compcsc +++|*
00246 M00S00174.compcsc +++|*T 12/ ST
00247 M00S00175.compcsc +++|* ST = STATUS OF CHANGE.
00248 M00S00176.compcsc +++|* 0 = CHANGE ALLOWED.
00249 M00S00177.compcsc +++|* 1 = CHANGE NOT ALLOWED.
00250 M00S00178.compcsc +++|
00251 M00S00179.compcsc +++| TUSC INDEX
00252 M00S00180.compcsc +++| INDEX SSSC,1 SUBSYSTEM
00253 M00S00181.compcsc +++| INDEX DSSC,1 DEADSTART SEQUENCING
00254 M00S00182.compcsc +++| INDEX MXSC MAXIMUM NUMBER OF SERVICE CLASSES
00255 M00S00183.compcsc +++| UJS SPACE 4,10
00256 M00S00184.compcsc +++|** UJS - UPDATE JSN AND SUBSYSTEM TABLES.
00257 M00S00185.compcsc +++|*
00258 M00S00186.compcsc +++|* USES T1 - T5, CM - CM+4.
00259 M00S00187.compcsc +++|*
00260 M00S00188.compcsc +++|* CALLS AST.
00261 M00S00189.compcsc +++|*
00262 M00S00190.compcsc +++|* MACROS MONITOR, SFA.
00263 M00S00191.compcsc +++|
00264 M00S00192.compcsc +++|
00265 M00S00193.compcsc +++| UJS SUBR ENTRY/EXIT
00266 M00S00194.compcsc +++|
00267 M00S00195.compcsc +++|* DETERMINE IF FORMERLY A SUBSYSTEM.
00268 M00S00196.compcsc +++|
00269 M00S00197.compcsc +++| LDC ** CHECK IF FORMERLY A SUBSYSTEM
00270 M00S00198.compcsc +++| UJSA EQU *-1 (FORMER SERVICE CLASS)
00271 M00S00199.compcsc +++| LMN SSSC
00272 M00S00200.compcsc +++| NJN UJSX IF NOT FORMERLY A SUBSYSTEM
00273 M00S00201.compcsc +++|
00274 M00S00202.compcsc +++|* ALTER SSAT/SSCT TABLES.
00275 M00S00203.compcsc +++|
00276 M00S00204.compcsc +++| LDD CP GET SUBSYSTEM ID
00277 M00S00205.compcsc +++| ADN JCIW
00278 M00S00206.compcsc +++| CRD CM
00279 M00S00207.compcsc +++| LDD CM+2 SAVE SUBSYSTEM ID
00280 M00S00208.compcsc +++| STD T5
00281 M00S00209.compcsc +++| LDN ZERL CLEAR SSID FIELD
00282 M00S00210.compcsc +++| CRD CM
00283 M00S00211.compcsc +++| LDK SSIS SET SUBFUNCTION CODE
00284 M00S00212.compcsc +++| STD CM+1
00285 M00S00213.compcsc +++| MONITOR SJCM SELECT JOB CONTROL PARAMETERS
00286 M00S00214.compcsc +++| LDN CSCF CLEAR SUBSYSTEM ACCESS FLAG
00287 M00S00215.compcsc +++| SHN 14
00288 M00S00216.compcsc +++| LMD T5
00289 M00S00217.compcsc +++| RJM AST ACCESS SUBSYSTEM TABLES
00290 M00S00218.compcsc +++| LDN CEAF RELEASE EJT ASSIGNMENT
00291 M00S00219.compcsc +++| SHN 14
00292 M00S00220.compcsc +++| LMD T5
00293 M00S00221.compcsc +++| RJM AST ACCESS SUBSYSTEM TABLES
00294 M00S00222.compcsc +++|
00295 M00S00223.compcsc +++|* CHANGE FORMER SUBSYSTEM-S JSN.
00296 M00S00224.compcsc +++|
00297 M00S00225.compcsc +++| LDN ZERL CLEAR PARAMETERS
00298 M00S00226.compcsc +++| CRD CM
00299 M00S00227.compcsc +++| CRD T1
00300 M00S00228.compcsc +++| LDN 1 DO NOT REQUEST A QFT ENTRY
00301 M00S00229.compcsc +++| STD CM+1
00302 M00S00230.compcsc +++| MONITOR RJSM REQUEST JOB SEQUENCE NUMBER
00303 M00S00231.compcsc +++|* LDN 0 CLEAR *UTEM* PARAMETER BYTE
00304 M00S00232.compcsc +++| STD CM+2
00305 M00S00233.compcsc +++| STD T3
00306 M00S00234.compcsc +++| LDD CM+3 PUT JSN IN DAYFILE MESSAGE
00307 M00S00235.compcsc +++| STM CSCD+5
00308 M00S00236.compcsc +++| STD T4
00309 M00S00237.compcsc +++| LDD CM+4
00310 M00S00238.compcsc +++| STM CSCD+6
00311 M00S00239.compcsc +++| STD T5
00312 M00S00240.compcsc +++| LDK JSNE*100+24D SET WORD OFFSET AND FIELD SIZE
00313 M00S00241.compcsc +++| STD T1
00314 M00S00242.compcsc +++| LDC 36D*100 SET BEGINNING BIT POSITION
00315 M00S00243.compcsc +++| STD T2
00316 M00S00244.compcsc +++| LDC ** EJT ORDINAL
00317 M00S00245.compcsc +++| UJSC EQU *-1
00318 M00S00246.compcsc +++| SFA EJT GET EJT ADDRESS
00319 M00S00247.compcsc +++| STD CM+4
00320 M00S00248.compcsc +++| SHN -14
00321 M00S00249.compcsc +++| STD CM+3
00322 M00S00250.compcsc +++| LDN 1 SET NUMBER OF REQUESTS
00323 M00S00251.compcsc +++| STD CM+1
00324 M00S00252.compcsc +++| LDD MA
00325 M00S00253.compcsc +++| CWD T1
00326 M00S00254.compcsc +++| MONITOR UTEM UPDATE EJT ENTRY WITH JSN
00327 M00S00255.compcsc +++| LJM UJSX RETURN
00328 M00S00256.compcsc +++| CSC$ ENDIF
00329 M00S00257.compcsc +++| SPACE 4,10
00330 M00S00258.compcsc +++| QUAL$ IF -DEF,QUAL$
00331 M00S00259.compcsc +++| QUAL *
00332 M00S00260.compcsc +++| CSC EQU /COMPCSC/CSC
00333 M00S00261.compcsc +++| QUAL$ ENDIF
00334 M00S00262.compcsc +++| ENDX