Seq # *Modification Id* Act
----------------------------+
00001 M01S00001.dcc +++| IDENT DCC,DCC
00002 M01S00002.dcc +++| TITLE DCC - CCC COMMUNICATOR.
00003 M01S00003.dcc +++|*COMMENT DCC - CCC COMMUNICATOR.
Line S00004 Modification History
M01 (Added by) dcc
M02 (Updated by) 281l803
Seq # *Modification Id* Act
----------------------------+
00004 M02S00004.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1984.
00005 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00006 M01S00005.dcc +++|
00007 M01S00006.dcc +++|
00008 M01S00007.dcc +++| PERIPH
00009 M01S00008.dcc +++| BASE MIXED
00010 M01S00009.dcc +++| SST
00011 M01S00010.dcc +++| QUAL$ EQU 1 DEFINE UNQUALIFIED COMMOM DECKS
00012 M01S00011.dcc +++| SPACE 4
00013 M01S00012.dcc +++|*** DCC - CCC COMMUNICATOR.
00014 M01S00013.dcc +++|* L. E. LOVETT 84/04/01.
00015 M01S00014.dcc +++| SPACE 4,10
00016 M01S00015.dcc +++|*** DCC - CCC COMMUNICATOR.
00017 M01S00016.dcc +++|*
00018 M01S00017.dcc +++|* CALL -
00019 M01S00018.dcc +++|*
00020 M01S00019.dcc +++|*T IR 18/ *DCC* 1/1, 23/ 0, 18/ ADDR
Figure
IR
0 17 18 29 ADDR 0 30 40 41 58 0 *DCC* 1
00021 M01S00020.dcc +++|*
00022 M01S00021.dcc +++|* ADDR - *FET* ADDRESS.
00023 M01S00022.dcc +++|*
Line S00023 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00024 M02S00023.252l678 ---|*T ADDR 7/ 0, 5/ CH, 18/ LWA, 18/FWA, 12/ 0
Figure
ADDR
0 11 12 29 0 FWA 30 47 48 52 53 59 LWA CH 0
00025 M01S00001.252l678 +++|*T ADDR 6/ 0, 6/ CH, 18/ LWA, 18/FWA, 12/ 0
Figure
ADDR
0 11 12 29 0 FWA 30 47 48 53 54 59 LWA CH 0
00026 M01S00024.dcc +++|*T, 42/ 0, 18/ FIRST
00027 M01S00025.dcc +++|*T, 42/ 0, 18/ IN
00028 M01S00026.dcc +++|*T, 42/ 0, 18/ OUT
00029 M01S00027.dcc +++|*T, 42/ 0, 18/ LIMIT
00030 M01S00028.dcc +++|*
00031 M01S00029.dcc +++|* CH - CHANNEL NUMBER.
00032 M01S00030.dcc +++|* LWA - *CCC* LAST WORD ADDRESS.
00033 M01S00031.dcc +++|* FWA - *CCC* FIRST WORD ADDRESS.
00034 M01S00032.dcc +++| SPACE 4,10
00035 M01S00033.dcc +++|*** DAYFILE AND ERRLOG MESSAGES
00036 M01S00034.dcc +++|*
00037 M01S00035.dcc +++|* * CCC, CHXX. DCC - CHANNEL ACTIVE BEFORE FUNCTION.*
00038 M01S00036.dcc +++|* CHANNEL XX WAS ALREADY ACTIVE WHEN *DCC* TRIED TO SEND
00039 M01S00037.dcc +++|* A FUNCTION CODE TO THE CCC.
00040 M01S00038.dcc +++|*
00041 M01S00039.dcc +++|* * CCC, CHXX. DCC - NO RESPONSE. CHECK CABLES.*
00042 M01S00040.dcc +++|* THERE WAS A FUNCTION TIMEOUT ON THE FIRST ATTEMPT TO
00043 M01S00041.dcc +++|* SEND A FUNCTION CODE NNNN TO THE CCC ON CHANNEL XX.
00044 M01S00042.dcc +++|*
00045 M01S00043.dcc +++|* * CCC, CHXX. DCC - FUNCTION NNNN REJECT.*
00046 M01S00044.dcc +++|* THERE WAS A FUNCTION TIMEOUT ON AN ATTEMPT TO SEND
00047 M01S00045.dcc +++|* A FUNCTION CODE NNNN TO THE CCC ON CHANNEL XX.
00048 M01S00046.dcc +++|*
00049 M01S00047.dcc +++|* * CCC, CHXX. DCC - INPUT INCOMPLETE.*
00050 M01S00048.dcc +++|* DCC ENCOUNTERED AN INCOMPLETE INPUT ON ATTEMPTING TO
00051 M01S00049.dcc +++|* READ DATA FROM THE CCC ON CHANNEL XX.
00052 M01S00050.dcc +++|*
00053 M01S00051.dcc +++|* * CCC, CHXX. DCC - LOAD ADDRESS ERROR.*
00054 M01S00052.dcc +++|* THERE WAS AN CHANNEL HANG ON A LOAD ADDRESS FUNCTION
00055 M01S00053.dcc +++|* ATTEMPT ON THE CCC ON CHANNEL XX.
00056 M01S00054.dcc +++|*
00057 M01S00055.dcc +++|* * CCC, CHXX. DCC - CHANNEL NOT AVAILABLE.*
00058 M01S00056.dcc +++|* CHANNEL XX WAS NOT AVAILABLE WHEN DCC ATTEMPTED TO
00059 M01S00057.dcc +++|* ACCESS IT TO DUMP THE CCC.
00060 M01S00058.dcc +++|*
00061 M01S00059.dcc +++|* * CCC, CHXX. DCC - CONSTANT CHANNEL FULL.*
00062 M01S00060.dcc +++|* AN ATTEMPT TO CLEAR THE CCC ON CHANNEL XX
00063 M01S00061.dcc +++|* TIMED OUT WITH A CHANNEL FULL CONDITION.
00064 M01S00062.dcc +++|*
00065 M01S00063.dcc +++|* * DCC - INCORRECT USER ACCESS.*
00066 M01S00064.dcc +++|* USER IS NOT VALIDATED FOR SYSTEM ORIGIN PRIVILEGES
00067 M01S00065.dcc +++|* OR SYSTEM IS NOT IN ENGINEERING MODE.
00068 M01S00066.dcc +++|*
00069 M01S00067.dcc +++|* * DCC - INCORRECT ORIGIN TYPE.*
00070 M01S00068.dcc +++|* USER MUST BE SYSTEM ORIGIN TO USE DCC AND IS NOT.
00071 M01S00069.dcc +++|*
00072 M01S00070.dcc +++|* * DCC - PARAMETER ADDRESS ERROR.*
00073 M01S00071.dcc +++|* THE CCC ADDRESSES PASSED WITH THE CALL TO DCC
00074 M01S00072.dcc +++|* ARE NOT IN THE VALID ADDRESS RANGE.
00075 M01S00073.dcc +++|*
00076 M01S00074.dcc +++|* * DCC - LWA+1 OUT OF RANGE.*
00077 M01S00075.dcc +++|* THE CCC LAST WORD ADDRESS SPECIFIED IN THE CALL TO
00078 M01S00076.dcc +++|* DCC IS BEYOND THE CCC LIMIT ADDRESS.
00079 M01S00077.dcc +++|*
00080 M01S00078.dcc +++|* * DCC - FWA .GE. LWA+1.*
00081 M01S00079.dcc +++|* THE SPECIFIED CCC ADDRESSES ARE NOT IN THE CORRECT
00082 M01S00080.dcc +++|* RELATIONSHIP. THEY MAY BE REVERSED.
00083 M01S00081.dcc +++|*
00084 M01S00082.dcc +++|* * DCC - INCORRECT REQUEST.*
00085 M01S00083.dcc +++|* THE REQUEST SPECIFIED IN THE CALL TO DCC IS INCORRECT.
00086 M01S00084.dcc +++|*
00087 M01S00085.dcc +++|* * DCC - NOT CONTROLWARE CHANNEL.*
00088 M01S00086.dcc +++|* THE CHANNEL SPECIFIED IN THE CALL TO DCC IS NOT A
00089 M01S00087.dcc +++|* CHANNEL WITH CONTROLWARE.
00090 M01S00088.dcc +++|*
00091 M01S00089.dcc +++|* * DCC - INCORRECT CCC CONTROLWARE TYPE.*
00092 M01S00090.dcc +++|* THE CONTROLWARE TYPE ASSOCIATED WITH THE SPECIFIED
00093 M01S00091.dcc +++|* CHANNEL IS NOT ONE THAT DCC IS ALLOWED TO DUMP.
00094 M01S00092.dcc +++|*
00095 M01S00093.dcc +++|* * DCC - CIRCULAR BUFFER ADDRESS ERROR.*
00096 M01S00094.dcc +++|* ONE OF THE CIRCULAR BUFFER POINTERS *FIRST*, *IN*,
00097 M01S00095.dcc +++|* *OUT* OR *LAST* POINTS OUTSIDE THE FIELD LENGTH,
00098 M01S00096.dcc +++|* *LAST IS NOT GREATER THAN *FIRST*, OR *IN* OR *OUT*
00099 M01S00097.dcc +++|* IS NOT WITHIN THE BUFFER LIMITS.
00100 M01S00098.dcc +++|* * DCC - INCOMPLETE *CCC* DUMP.*
00101 M01S00099.dcc +++|* THE CM BUFFER SIZE IN THE CALLING PROGRAM WAS NOT
00102 M01S00100.dcc +++|* LARGE ENOUGH TO HOLD THE ENTIRE *CCC* MEMORY.
00103 M01S00101.dcc +++|*
00104 M01S00102.dcc +++|* * DCC INCORRECT REQUEST.*
00105 M01S00103.dcc +++|* *DCC* WAS NOT CALLED WITH RECALL.
00106 M01S00104.dcc +++| SPACE 4,10
00107 M01S00105.dcc +++|** COMMON DECKS.
00108 M01S00106.dcc +++|
00109 M01S00107.dcc +++|
00110 M01S00108.dcc +++|*CALL COMPMAC
00111 M01S00109.dcc +++|*CALL COMPCHM
00112 M01S00110.dcc +++|*CALL COMSDSL
00113 M01S00111.dcc +++|*CALL COMSPIM
00114 M01S00112.dcc +++| SPACE 4,10
00115 M01S00113.dcc +++|** CHTE - CREATE CHANNEL TABLE ENTRY.
00116 M01S00114.dcc +++|*
00117 M01S00115.dcc +++|*
00118 M01S00116.dcc +++|* CHTE CH,ADDRESS
00119 M01S00117.dcc +++|*
00120 M01S00118.dcc +++|* ENTRY (ADDRESS) = ADDRESS TO INSERT IN CHANNEL TABLE.
00121 M01S00119.dcc +++|
00122 M01S00120.dcc +++|
00123 M01S00121.dcc +++| PURGMAC CHTE
00124 M01S00122.dcc +++| CHTE MACRO D,B
00125 M01S00123.dcc +++| LOCAL A
00126 M01S00124.dcc +++| A EQU B
00127 M01S00125.dcc +++| CT_D RMT
00128 M01S00126.dcc +++| CON A
00129 M01S00127.dcc +++| RMT
00130 M01S00128.dcc +++| ENDM
00131 M01S00129.dcc +++| IAN SPACE 4,10
00132 M01S00130.dcc +++|** IAN - REDEFINE IAN WITH 2**5 SET.
00133 M01S00131.dcc +++|
00134 M01S00132.dcc +++|
00135 M01S00133.dcc +++| CHIN IAN,7040
00136 M01S00134.dcc +++| SPACE 4
00137 M01S00135.dcc +++|** ASSEMBLY CONSTANTS.
00138 M01S00136.dcc +++|
00139 M01S00137.dcc +++|
00140 M01S00138.dcc +++| NWC EQU 100*5/2 CCC WORD COUNT
00141 M01S00139.dcc +++| EORS EQU 22 END OF RECORD RETURN STATUS
00142 M01S00140.dcc +++| FSLA EQU 500 SELECT CCC LOAD ADDRESS AND LENGTH
00143 M01S00141.dcc +++| FSRD EQU 701 SELECT CCC READ MEMORY
00144 M01S00142.dcc +++| FSMC EQU 740 SELECT CCC MASTER CLEAR INTERFACE
00145 M01S00143.dcc +++| SPACE 4,10
00146 M01S00144.dcc +++| SPACE 4
00147 M01S00145.dcc +++|** DIRECT LOCATION ASSIGNMENTS.
00148 M01S00146.dcc +++|
00149 M01S00147.dcc +++|
00150 M01S00148.dcc +++| NA EQU 20 - 21 CCC ADDRESS
00151 M01S00149.dcc +++| NL EQU 22 - 23 CCC LIMIT ADDRESS
00152 M01S00150.dcc +++| NC EQU 24 CCC WORD COUNT
00153 M01S00151.dcc +++| WC EQU 25 BLOCK WORD COUNT
00154 M01S00152.dcc +++| EB EQU 27 ERROR BUFFER ADDRESS
00155 M01S00153.dcc +++| RQ EQU 30 - 34 REQUEST WORD
00156 M01S00154.dcc +++| DA EQU 40 - 44 DATA ADDRESS
00157 M01S00155.dcc +++| FT EQU 60 - 61 FIRST
00158 M01S00156.dcc +++| IN EQU 62 - 63 IN
00159 M01S00157.dcc +++| OT EQU 64 - 65 OUT
00160 M01S00158.dcc +++| LM EQU 66 - 67 LIMIT
00161 M01S00159.dcc +++| TITLE MAIN PROGRAM
00162 M01S00160.dcc +++|** DCC - MAIN PROGRAM.
00163 M01S00161.dcc +++|
00164 M01S00162.dcc +++|
00165 M01S00163.dcc +++| ORG PPFW
00166 M01S00164.dcc +++| DCC RJM PRS PRESET PROGRAM
00167 M01S00165.dcc +++| RJM DNP DUMP CCC
00168 M01S00166.dcc +++| LDD RQ+4 SET OPERATION COMPLETE
00169 M01S00167.dcc +++| SCN 1
00170 M01S00168.dcc +++| LMN 1
00171 M01S00169.dcc +++| STD RQ+4
00172 M01S00170.dcc +++| LDD IR+3 WRITE REQUEST
00173 M01S00171.dcc +++| SHN 6
00174 M01S00172.dcc +++| ADD RA
00175 M01S00173.dcc +++| SHN 6
00176 M01S00174.dcc +++| ADD IR+4
00177 M01S00175.dcc +++| CWD RQ
Line S00176 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00178 M02S00176.252l678 ---| CHTE CH,*
Line S00177 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00179 M02S00177.252l678 ---| LDN CH DROP CHANNEL
00180 M01S00002.252l678 +++| LDD T4 DROP CHANNEL
00181 M01S00178.dcc +++| DCHAN
00182 M01S00179.dcc +++| DPP MONITOR DPPM
00183 M01S00180.dcc +++| LJM PPR
00184 M01S00181.dcc +++| DNP SPACE 4
00185 M01S00182.dcc +++|** DNP - DUMP CCC.
00186 M01S00183.dcc +++|*
00187 M01S00184.dcc +++|* THIS ROUTINE IS CALLED TO DUMP *CCC* MEMORY.
00188 M01S00185.dcc +++|*
00189 M01S00186.dcc +++|* ENTRY (NA, NA+1) = STARTING ADDRESS FOR DUMP.
00190 M01S00187.dcc +++|* (IN, IN+1) = INPUT BUFFER IN POINTER.
00191 M01S00188.dcc +++|* (NL, NL+1) = ENDING ADDRESS FOR DUMP.
00192 M01S00189.dcc +++|* (NC) = DUMP BLOCK *CCC* WORD COUNT.
00193 M01S00190.dcc +++|* (IR+3, IR+4) = DUMP *FET* ADDRESS.
00194 M01S00191.dcc +++|* (FT, FT+1) = INPUT BUFFER FIRST WORD ADDRESS.
00195 M01S00192.dcc +++|* (LM, LM+1) = INPUT BUFFER LIMIT.
00196 M01S00193.dcc +++|*
00197 M01S00194.dcc +++|* EXIT (RQ+4) = END OF RECORD STATUS (*EORS*) IF
00198 M01S00195.dcc +++|* DUMP IS COMPLETE.
00199 M01S00196.dcc +++|*
00200 M01S00197.dcc +++|* USES NC, WC, CM - CM+4, DA+3 - DA+4, OT - OT+1.
00201 M01S00198.dcc +++|*
00202 M01S00199.dcc +++|* CALLS DV5, RNP, WCB.
00203 M01S00200.dcc +++|
00204 M01S00201.dcc +++|
00205 M01S00202.dcc +++| DNP9 LDN EORS SET END OF RECORD
00206 M01S00203.dcc +++| STD RQ+4
00207 M01S00204.dcc +++|
00208 M01S00205.dcc +++| DNP SUBR ENTRY/EXIT
00209 M01S00206.dcc +++| LDD IN DATA ADDRESS = IN
00210 M01S00207.dcc +++| STD DA+3
00211 M01S00208.dcc +++| LDD IN+1
00212 M01S00209.dcc +++| STD DA+4
00213 M01S00210.dcc +++| DNP1 LDD NL CHECK CCC ADDRESS
00214 M01S00211.dcc +++| SBD NA
00215 M01S00212.dcc +++| SHN 14
00216 M01S00213.dcc +++| ADD NL+1
00217 M01S00214.dcc +++| SBD NA+1
00218 M01S00215.dcc +++| ZJN DNP9 IF END OF DUMP
00219 M01S00216.dcc +++| SBD NC
00220 M01S00217.dcc +++| PJN DNP2 IF ENOUGH DATA FOR FULL BLOCK
00221 M01S00218.dcc +++| RAD NC SET SHORT BLOCK COUNT
00222 M01S00219.dcc +++| DNP2 RJM RNP READ CCC
00223 M01S00220.dcc +++| LDD NC SET CPU WORD COUNT
00224 M01S00221.dcc +++| SHN 1
00225 M01S00222.dcc +++| ADN 4
00226 M01S00223.dcc +++| RJM DV5 DIVIDE *PP* WORD COUNT BY FIVE
00227 M01S00224.dcc +++| STD WC SAVE *CP* WORD COUNT
00228 M01S00225.dcc +++| DNP3 LDD IR+3 READ OUT
00229 M01S00226.dcc +++| SHN 6
00230 M01S00227.dcc +++| ADD RA
00231 M01S00228.dcc +++| SHN 6
00232 M01S00229.dcc +++| ADD IR+4
00233 M01S00230.dcc +++| ADN 3
00234 M01S00231.dcc +++| CRD CM
00235 M01S00232.dcc +++| LDD CM+3 SET OUT
00236 M01S00233.dcc +++| LPN 37
00237 M01S00234.dcc +++| STD OT
00238 M01S00235.dcc +++| SHN 14
00239 M01S00236.dcc +++| LMD CM+4
00240 M01S00237.dcc +++| STD OT+1
00241 M01S00238.dcc +++| SHN -6
00242 M01S00239.dcc +++| SBD FL
00243 M01S00240.dcc +++| MJN DNP5 IF IN BOUNDS
00244 M01S00241.dcc +++| DNP4 LJM DNPX RETURN
00245 M01S00242.dcc +++|
00246 M01S00243.dcc +++| DNP5 LDD OT CHECK CIRCULAR BUFFER
00247 M01S00244.dcc +++| SBD DA+3
00248 M01S00245.dcc +++| SHN 14
00249 M01S00246.dcc +++| ADD OT+1
00250 M01S00247.dcc +++| SBD DA+4
00251 M01S00248.dcc +++| SBN 1
00252 M01S00249.dcc +++| PJN DNP6 IF OUT WILL NOT HIT BUFFER LIMIT
00253 M01S00250.dcc +++| SHN 6
00254 M01S00251.dcc +++| ADD LM
00255 M01S00252.dcc +++| SBD FT
00256 M01S00253.dcc +++| SHN 14
00257 M01S00254.dcc +++| ADD LM+1
00258 M01S00255.dcc +++| SBD FT+1
00259 M01S00256.dcc +++| DNP6 SBD WC
00260 M01S00257.dcc +++| MJN DNP7 IF NO ROOM IN BUFFER
00261 M01S00258.dcc +++| RJM WCB WRITE CIRCULAR BUFFER
00262 M01S00259.dcc +++| LJM DNP1 CONTINUE WITH DUMP
00263 M01S00260.dcc +++|
00264 M01S00261.dcc +++| DNP7 LDC =C+ DCC - INCOMPLETE *CCC* DUMP.+
00265 M01S00262.dcc +++| RJM DFM
00266 M01S00263.dcc +++| LJM DNP9
00267 M01S00264.dcc +++|
00268 M01S00265.dcc +++| TITLE SUBROUTINES.
00269 M01S00266.dcc +++| ERR SPACE 4
00270 M01S00267.dcc +++|** ERR - PROCESS ERROR.
00271 M01S00268.dcc +++|*
00272 M01S00269.dcc +++|* ERR DAYFILES AN ERROR MESSAGE AND ABORTS THE JOB. THE
00273 M01S00270.dcc +++|* CHANNEL TO THE *CCC* WILL BE DROPPED IF RESERVED.
00274 M01S00271.dcc +++|*
00275 M01S00272.dcc +++|* ENTRY (A) = ERROR MESSAGE ADDRESS.
00276 M01S00273.dcc +++|* (ERRA) = *LDN 1* IF CHANNEL IS RESERVED.
00277 M01S00003.252l678 +++|* (T4) = CHANNEL.
00278 M01S00274.dcc +++|*
00279 M01S00275.dcc +++|* EXIT *PPR* ENTERED.
00280 M01S00276.dcc +++|*
00281 M01S00277.dcc +++|* USES T1, T7.
00282 M01S00278.dcc +++|*
00283 M01S00279.dcc +++|* CALLS C2D, DFM, PPR.
00284 M01S00280.dcc +++|*
00285 M01S00281.dcc +++|* MACROS CHTE, DCHAN, MONITOR.
00286 M01S00282.dcc +++|
00287 M01S00283.dcc +++|
00288 M01S00284.dcc +++| ERR STD T7 SAVE MESSAGE ADDRESS
00289 M01S00285.dcc +++| ERRA LDN 0 CHANNEL RESERVED FLAG
00290 M01S00286.dcc +++|* LDN 1 (CHANNEL RESERVED)
00291 M01S00287.dcc +++| ZJN ERR1 IF CHANNEL NOT RESERVED
00292 M01S00288.dcc +++| DCN CH
Line S00289 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00293 M02S00289.252l678 ---| CHTE CH,*
Line S00290 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00294 M02S00290.252l678 ---| LDN CH DROP CHANNEL
00295 M01S00004.252l678 +++| LDD T4 DROP CHANNEL
00296 M01S00291.dcc +++| DCHAN
00297 M01S00292.dcc +++| ERR1 CHTE CH,*
00298 M01S00293.dcc +++| LDN CH CONVERT CHANNEL NUMBER
00299 M01S00294.dcc +++| RJM C2D CONVERT OCTAL TO DISPLAY
Line S00295 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00300 M02S00295.252l678 ---| STM ERRB+4
Line S00296 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00301 M02S00296.252l678 ---| LDC ERRC
00302 M01S00005.252l678 +++| STM ERRB+5
00303 M01S00006.252l678 +++| LDD T4
00304 M01S00007.252l678 +++| LPN 40
00305 M01S00008.252l678 +++| ZJN ERR1.1 IF NOT A CONCURRENT CHANNEL
00306 M01S00009.252l678 +++| LDC 2R C SET CONCURRENT MESSAGE
00307 M01S00010.252l678 +++| STM ERRB+3
00308 M01S00011.252l678 +++| ERR1.1 LDC ERRC
00309 M01S00297.dcc +++| STD T1
00310 M01S00298.dcc +++| ERR2 LDI T7 COPY MESSAGE
00311 M01S00299.dcc +++| STI T1
00312 M01S00300.dcc +++| ZJN ERR3 IF MOVE IS COMPLETE
00313 M01S00301.dcc +++| AOD T7
00314 M01S00302.dcc +++| AOD T1
00315 M01S00303.dcc +++| UJN ERR2 MOVE NEXT WORD OF MESSAGE
00316 M01S00304.dcc +++|
00317 M01S00305.dcc +++| ERR3 LDC ERRB ISSUE DAYFILE MESSAGE
00318 M01S00306.dcc +++| ABT RJM DFM DAYFILE ERROR MESSAGE
00319 M01S00307.dcc +++| MONITOR ABTM ABORT JOB
00320 M01S00308.dcc +++| LJM PPR TERMINATE PROGRAM
00321 M01S00309.dcc +++|
Line S00310 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00322 M02S00310.252l678 ---| ERRB DATA H* CCC, CH00. *
00323 M01S00012.252l678 +++| ERRB DATA H* CCC, CH00. *
00324 M01S00311.dcc +++| ERRC BSS 0
00325 M01S00312.dcc +++| FCN SPACE 4,10
00326 M01S00313.dcc +++|** FCN - CHECK FUNCTION COUPLER.
00327 M01S00314.dcc +++|*
00328 M01S00315.dcc +++|* THIS ROUTINE FUNCTIONS THE EQUIPMENT WITH THE REQUESTED
00329 M01S00316.dcc +++|* FUNCTION CODE. THE FUNCTION WILL BE TIMED OUT TO CHECK
00330 M01S00317.dcc +++|* COUPLER RESPONSE.
00331 M01S00318.dcc +++|*
00332 M01S00319.dcc +++|* ENTRY (A) = FUNCTION CODE.
00333 M01S00320.dcc +++|* (FCNA) = 1 IF NOT FIRST FUNCTION REQUEST.
00334 M01S00321.dcc +++|*
00335 M01S00322.dcc +++|* EXIT FUNCTION ACCEPTED.
00336 M01S00323.dcc +++|*
00337 M01S00324.dcc +++|* ERROR *ERR* CALLED IF CHANNEL ACTIVE OR TIMEOUT.
00338 M01S00325.dcc +++|* (A) = ERROR MESSAGE ADDRESS.
00339 M01S00326.dcc +++|*
00340 M01S00327.dcc +++|* USES T1, T7.
00341 M01S00328.dcc +++|*
00342 M01S00329.dcc +++|* CALLS C2D, ERR.
00343 M01S00330.dcc +++|
00344 M01S00331.dcc +++|
00345 M01S00332.dcc +++| FCN4 LDN 1 FLAG FIRST ENTRY TO *FCN* COMPLETED
00346 M01S00333.dcc +++| STM FCNA
00347 M01S00334.dcc +++|
00348 M01S00335.dcc +++| FCN SUBR ENTRY/EXIT
00349 M01S00336.dcc +++| STD T1
00350 M01S00337.dcc +++| AJM FCN2,CH
00351 M01S00338.dcc +++| FAN CH FUNCTION COUPLER
00352 M01S00339.dcc +++| LCN 0 SET TIMEOUT WAIT COUNT
00353 M01S00340.dcc +++| FCN1 IJM FCN4,CH IF NO FUNCTION TIMEOUT
00354 M01S00341.dcc +++| SBN 1
00355 M01S00342.dcc +++| NJN FCN1 IF NOT FUNCTION TIMEOUT
00356 M01S00343.dcc +++| LDC 0
00357 M01S00344.dcc +++|* LDC 1 (AFTER FIRST FUNCTION)
00358 M01S00345.dcc +++| FCNA EQU *-1
00359 M01S00346.dcc +++| ZJN FCN3 IF FIRST ENTRY
00360 M01S00347.dcc +++| LDD T1 CONVERT FUNCTION
00361 M01S00348.dcc +++| STD T7
00362 M01S00349.dcc +++| SHN -6
00363 M01S00350.dcc +++| RJM C2D CONVERT OCTAL TO DISPLAY
00364 M01S00351.dcc +++| STM FCNC *0000 REJECT.*
00365 M01S00352.dcc +++| LDD T7
00366 M01S00353.dcc +++| LPN 77
00367 M01S00354.dcc +++| RJM C2D CONVERT OCTAL TO DISPLAY
00368 M01S00355.dcc +++| STM FCNC+1
00369 M01S00356.dcc +++| LDC FCNB *FUNCTION 0000 REJECT.*
00370 M01S00357.dcc +++| LJM ERR PROCESS ERROR
00371 M01S00358.dcc +++|
00372 M01S00359.dcc +++| FCN2 LDC =C* DCC - CHANNEL ACTIVE BEFORE FUNCTION.*
00373 M01S00360.dcc +++| LJM ERR PROCESS ERROR
00374 M01S00361.dcc +++|
00375 M01S00362.dcc +++| FCN3 LDC =C* DCC - NO RESPONSE, CHECK CABLES.*
00376 M01S00363.dcc +++| LJM ERR
00377 M01S00364.dcc +++|
00378 M01S00365.dcc +++|
00379 M01S00366.dcc +++| FCNB DATA H*FUNCTION *
00380 M01S00367.dcc +++| FCNC DATA C*0000 REJECT.*
00381 M01S00368.dcc +++| RNP SPACE 4
00382 M01S00369.dcc +++|** RNP - READ CCC.
00383 M01S00370.dcc +++|*
00384 M01S00371.dcc +++|* RNP READS A BLOCK OF DATA FROM THE *CCC* INTO
00385 M01S00372.dcc +++|* THE *PP* BUFFER. AN ERROR IS GENERATED IF THE INPUT
00386 M01S00373.dcc +++|* IS INCOMPLETE.
00387 M01S00374.dcc +++|*
00388 M01S00375.dcc +++|* ENTRY (NC) = COUNT OF *CCC* WORDS TO RRAD.
00389 M01S00376.dcc +++|* (NA, NA+1) = STARTING ADDRESS OF RRAD.
00390 M01S00377.dcc +++|*
00391 M01S00378.dcc +++|* EXIT (NA, NA+1) = UPDATED *CCC* ADDRESS.
00392 M01S00379.dcc +++|* (PBF) = *PP* BUFFER READ FROM DEVICE.
00393 M01S00380.dcc +++|*
00394 M01S00381.dcc +++|* ERROR *ERR* CALLED IF READ IS INCOMPLETE.
00395 M01S00382.dcc +++|* (A) = ERROR MESSAGE ADDRESS.
00396 M01S00383.dcc +++|*
00397 M01S00384.dcc +++|* USES NONE.
00398 M01S00385.dcc +++|*
00399 M01S00386.dcc +++|* CALLS ERR, FCN, SAL, SNA.
00400 M01S00387.dcc +++|
00401 M01S00388.dcc +++|
00402 M01S00389.dcc +++| RNP SUBR ENTRY/EXIT
00403 M01S00390.dcc +++| RJM SFL
00404 M01S00391.dcc +++| RJM FCN
00405 M01S00392.dcc +++| ACN CH
00406 M01S00393.dcc +++| LDD NC READ BLOCK
00407 M01S00394.dcc +++| SHN 1
00408 M01S00395.dcc +++| IAM PBF,CH
00409 M01S00396.dcc +++| NJN RNP1 IF INCOMPLETE INPUT
00410 M01S00397.dcc +++| DCN CH
00411 M01S00398.dcc +++| LDD NC ADVANCE CCC ADDRESS
00412 M01S00399.dcc +++| RAD NA+1
00413 M01S00400.dcc +++| SHN -14
00414 M01S00401.dcc +++| RAD NA
00415 M01S00402.dcc +++| UJN RNPX RETURN
00416 M01S00403.dcc +++|
00417 M01S00404.dcc +++| RNP1 LDC =C* DCC - INPUT INCOMPLETE.*
00418 M01S00405.dcc +++| LJM ERR PROCESS ERROR
00419 M01S00406.dcc +++| SFL SPACE 4,10
00420 M01S00407.dcc +++|** SFL - SET CCC ADDRESS AND LENGTH.
00421 M01S00408.dcc +++|*
00422 M01S00409.dcc +++|* ENTRY (NC) = LENGTH.
00423 M01S00410.dcc +++|* (NA, NA+1) = CCC START ADDRESS.
00424 M01S00411.dcc +++|*
00425 M01S00412.dcc +++|* EXIT (A) = READ MEMORY FUNCTION.
00426 M01S00413.dcc +++|* TO *ERR* IF CHANNEL HUNG.
00427 M01S00414.dcc +++|*
00428 M01S00415.dcc +++|* CALLS ERR, FCN.
00429 M01S00416.dcc +++|
00430 M01S00417.dcc +++|
00431 M01S00418.dcc +++| SFL SUBR ENTRY/EXIT
00432 M01S00419.dcc +++| LDC FSLA
00433 M01S00420.dcc +++| ADD NA
00434 M01S00421.dcc +++| RJM FCN ISSUE LOAD ADDRESS + UPPER 6 OF ADDRESS
00435 M01S00422.dcc +++| ACN CH
00436 M01S00423.dcc +++| LDD NA+1
00437 M01S00424.dcc +++| OAN CH OUTPUT LOWER 12 OF ADDRESS
00438 M01S00425.dcc +++| SFL1 ADN 1
00439 M01S00426.dcc +++| MJN SFL3 IF TIMEOUT
00440 M01S00427.dcc +++| IJM SFL3,CH IF INACTIVE
00441 M01S00428.dcc +++| FJM SFL1,CH IF NOT ACCEPTED
00442 M01S00429.dcc +++| LDD NC
00443 M01S00430.dcc +++| OAN CH OUTPUT LENGTH
00444 M01S00431.dcc +++| SFL2 ADN 1
00445 M01S00432.dcc +++| MJN SFL3 IF HUNG
00446 M01S00433.dcc +++| FJM SFL2,CH IF NOT ACCEPTED
00447 M01S00434.dcc +++| DCN CH
00448 M01S00435.dcc +++| LDC FSRD CCC READ MEMORY FUNCTION CODE
00449 M01S00436.dcc +++| UJN SFLX RETURN
00450 M01S00437.dcc +++|
00451 M01S00438.dcc +++| SFL3 LDC =C* DCC - LOAD ADDRESS ERROR.*
00452 M01S00439.dcc +++| LJM ERR PROCESS ERROR
00453 M01S00440.dcc +++| WCB SPACE 4
00454 M01S00441.dcc +++|** WCB - WRITE CIRCULAR BUFFER.
00455 M01S00442.dcc +++|*
00456 M01S00443.dcc +++|* WCB WRITES THE *PP* BUFFER TO THE *CM* CIRCULAR BUFFER.
00457 M01S00444.dcc +++|*
00458 M01S00445.dcc +++|* ENTRY (WC) = *CM* WORD COUNT TO WRITE.
00459 M01S00446.dcc +++|* (FT, FT+1) = FIRST WORD ADDRESS OF *CM* BUFFER.
00460 M01S00447.dcc +++|* (LM, LM+1) = LIMIT OF *CM* BUFFER.
00461 M01S00448.dcc +++|* (DA+3, DA+4) = START ADDRESS OF DATA WRITE.
00462 M01S00449.dcc +++|* (IR+3, IR+4) = INPUT *FET* ADDRESS.
00463 M01S00450.dcc +++|* (PBF) = *PP* BUFFER TO BE WRITTEN.
00464 M01S00451.dcc +++|*
00465 M01S00452.dcc +++|* EXIT (DA+3, DA+4) = UPDATED BUFFER POINTER.
00466 M01S00453.dcc +++|* INPUT *FET* IN POINTER UPDATED AND BUFFER WRITTEN.
00467 M01S00454.dcc +++|*
00468 M01S00455.dcc +++|* USES T1, T2.
00469 M01S00456.dcc +++|
00470 M01S00457.dcc +++|
00471 M01S00458.dcc +++| WCB4 LDD IR+3 WRITE IN
00472 M01S00459.dcc +++| SHN 6
00473 M01S00460.dcc +++| ADD RA
00474 M01S00461.dcc +++| SHN 6
00475 M01S00462.dcc +++| ADD IR+4
00476 M01S00463.dcc +++| ADN 2
00477 M01S00464.dcc +++| CWD DA
00478 M01S00465.dcc +++|
00479 M01S00466.dcc +++| WCB SUBR ENTRY/EXIT
00480 M01S00467.dcc +++| LDD WC SET FIRST PART WORD COUNT
00481 M01S00468.dcc +++| STD T1
00482 M01S00469.dcc +++| LDD LM CHECK WORDS TO LIMIT
00483 M01S00470.dcc +++| SBD DA+3
00484 M01S00471.dcc +++| SHN 14
00485 M01S00472.dcc +++| ADD LM+1
00486 M01S00473.dcc +++| SBD DA+4
00487 M01S00474.dcc +++| SBD WC
00488 M01S00475.dcc +++| PJN WCB1 IF NOT LESS THAN WORD COUNT
00489 M01S00476.dcc +++| RAD T1 SET FIRST PART WORD COUNT
00490 M01S00477.dcc +++| WCB1 LDD DA+3 WRITE FIRST PART
00491 M01S00478.dcc +++| SHN 6
00492 M01S00479.dcc +++| ADD RA
00493 M01S00480.dcc +++| SHN 6
00494 M01S00481.dcc +++| ADD DA+4
00495 M01S00482.dcc +++| CWM PBF,T1
00496 M01S00483.dcc +++| LDD T1 ADVANCE IN
00497 M01S00484.dcc +++| RAD DA+4
00498 M01S00485.dcc +++| SHN -14
00499 M01S00486.dcc +++| RAD DA+3
00500 M01S00487.dcc +++| LMD LM
00501 M01S00488.dcc +++| SHN 14
00502 M01S00489.dcc +++| LMD DA+4
00503 M01S00490.dcc +++| LMD LM+1
00504 M01S00491.dcc +++| ZJN WCB2 IF IN = LIMIT
00505 M01S00492.dcc +++| LJM WCB4 RETURN
00506 M01S00493.dcc +++|
00507 M01S00494.dcc +++| WCB2 LDD WC SET SECOND PART WORD COUNT
00508 M01S00495.dcc +++| SBD T1
00509 M01S00496.dcc +++| STD T2
00510 M01S00497.dcc +++| ZJN WCB3 IF NO SECOND PART
00511 M01S00498.dcc +++| LDD T1 SET PP BUFFER ADDRESS
00512 M01S00499.dcc +++| SHN 2
00513 M01S00500.dcc +++| ADD T1
00514 M01S00501.dcc +++| ADC PBF
00515 M01S00502.dcc +++| STM WCBA
00516 M01S00503.dcc +++| LDD FT WRITE SECOND PART
00517 M01S00504.dcc +++| SHN 6
00518 M01S00505.dcc +++| ADD RA
00519 M01S00506.dcc +++| SHN 6
00520 M01S00507.dcc +++| ADD FT+1
00521 M01S00508.dcc +++| CWM **,T2
00522 M01S00509.dcc +++| WCBA EQU *-1
00523 M01S00510.dcc +++| WCB3 LDD T2 SET OUT
00524 M01S00511.dcc +++| ADD FT+1
00525 M01S00512.dcc +++| STD DA+4
00526 M01S00513.dcc +++| SHN -14
00527 M01S00514.dcc +++| ADD FT
00528 M01S00515.dcc +++| STD DA+3
00529 M01S00516.dcc +++| LJM WCB4 RETURN
00530 M01S00517.dcc +++| SPACE 4
00531 M01S00518.dcc +++|** COMMON DECKS.
00532 M01S00519.dcc +++|
00533 M01S00520.dcc +++|
00534 M01S00521.dcc +++|*CALL COMPC2D
00535 M01S00522.dcc +++|*CALL COMPDV5
00536 M01S00523.dcc +++| TITLE INITIALIZATION.
00537 M01S00524.dcc +++| PRS SPACE 4
00538 M01S00525.dcc +++|** PRS - PRESET PROGRAM.
00539 M01S00526.dcc +++|
00540 M01S00527.dcc +++|
00541 M01S00528.dcc +++| PRS SUBR ENTRY/EXIT
00542 M01S00529.dcc +++| RJM CRS CHECK RECALL STATUS
00543 M01S00530.dcc +++| NJN PRS0 IF RECALL SET
00544 M01S00531.dcc +++| LDC =C* DCC INCORRECT REQUEST.*
00545 M01S00532.dcc +++| LJM ABT
00546 M01S00533.dcc +++|
00547 M01S00534.dcc +++| PRS0 RJM CUA CHECK USER ACCESS
00548 M01S00535.dcc +++| ZJN PRS1 IF VALID USER
00549 M01S00536.dcc +++| LDD CM
00550 M01S00537.dcc +++| ZJN PRS1 IF ENGINEERING ACCESS ALLOWED
00551 M01S00538.dcc +++| LDC =C* DCC - INCORRECT USER ACCESS.*
00552 M01S00539.dcc +++| LJM ABT ABORT JOB
00553 M01S00540.dcc +++|
00554 M01S00541.dcc +++| PRS1 LDD CP CHECK ORIGIN TYPE
00555 M01S00542.dcc +++| ADN JOTW
00556 M01S00543.dcc +++| CRD CM
00557 M01S00544.dcc +++| LDD CM+3
00558 M01S00545.dcc +++| LPN 77
00559 M01S00546.dcc +++| LMC SYOT
00560 M01S00547.dcc +++| ZJN PRS2 IF SYSTEM ORIGIN
00561 M01S00548.dcc +++| LDC =C* DCC - INCORRECT ORIGIN TYPE.*
00562 M01S00549.dcc +++| LJM ABT ABORT
00563 M01S00550.dcc +++|
00564 M01S00551.dcc +++| PRS2 LDC NWC SET CCC WORD COUNT
00565 M01S00552.dcc +++| STD NC
00566 M01S00553.dcc +++| LDD IR+3 CHECK ADDRESS
00567 M01S00554.dcc +++| LPN 37
00568 M01S00555.dcc +++| SHN 14
00569 M01S00556.dcc +++| ADD IR+4
00570 M01S00557.dcc +++| ADN 5
00571 M01S00558.dcc +++| SHN -6
00572 M01S00559.dcc +++| SBD FL
00573 M01S00560.dcc +++| MJN PRS3 IF ADDRESS IN RANGE
00574 M01S00561.dcc +++| LDC =C* DCC - PARAMETER ADDRESS ERROR.*
00575 M01S00562.dcc +++| LJM ABT ABORT
00576 M01S00563.dcc +++|
00577 M01S00564.dcc +++| PRS3 RJM SBP SET BUFFER PARAMETERS
00578 M01S00565.dcc +++| LDN ZERL CLEAR DATA ADDRESS
00579 M01S00566.dcc +++| CRD DA
00580 M01S00567.dcc +++| LDD IR+3 READ REQUEST
00581 M01S00568.dcc +++| LPN 37
00582 M01S00569.dcc +++| SHN 6
00583 M01S00570.dcc +++| ADD RA
00584 M01S00571.dcc +++| SHN 6
00585 M01S00572.dcc +++| ADD IR+4
00586 M01S00573.dcc +++| CRD RQ
00587 M01S00574.dcc +++| LDD RQ+3 SET CCC FWA
00588 M01S00575.dcc +++| STD NA+1
00589 M01S00576.dcc +++| LDD RQ+2
00590 M01S00577.dcc +++| LPN 77
00591 M01S00578.dcc +++| STD NA
00592 M01S00579.dcc +++| LDD RQ+2 SET CCC LWA+1
00593 M01S00580.dcc +++| SCN 77
00594 M01S00581.dcc +++| SHN 6
00595 M01S00582.dcc +++| LMD RQ+1
00596 M01S00583.dcc +++| SHN 6
00597 M01S00584.dcc +++| STD NL+1
00598 M01S00585.dcc +++| SHN -14
00599 M01S00586.dcc +++| STD NL *CCC* LIMIT ADDRESS
00600 M01S00587.dcc +++| SHN 14
00601 M01S00588.dcc +++| ADD NL+1
00602 M01S00589.dcc +++| ZJN PRS4 IF ADDRESS OUT OF RANGE
00603 M01S00590.dcc +++| ADC -0#4001
00604 M01S00591.dcc +++| MJN PRS5 IF IN RANGE
00605 M01S00592.dcc +++| PRS4 LDC =C* DCC - LWA+1 OUT OF RANGE.*
00606 M01S00593.dcc +++| LJM ABT ABORT
00607 M01S00594.dcc +++|
00608 M01S00595.dcc +++| PRS5 LDD NA CHECK *CCC* ADDRESS
00609 M01S00596.dcc +++| SBD NL
00610 M01S00597.dcc +++| SHN 14
00611 M01S00598.dcc +++| ADD NA+1
00612 M01S00599.dcc +++| SBD NL+1
00613 M01S00600.dcc +++| MJN PRS6 IF *LWA+1* GREATER THAN *FWA*
00614 M01S00601.dcc +++| LDC =C* DCC - FWA .GE. LWA+1.*
00615 M01S00602.dcc +++| LJM ABT ABORT
00616 M01S00603.dcc +++|
00617 M01S00604.dcc +++| PRS6 LDD RQ+4 CHECK *DCC* REQUEST
00618 M01S00605.dcc +++| SHN -1
00619 M01S00606.dcc +++| SBN 2
00620 M01S00607.dcc +++| MJN PRS7 IF VALID REQUEST
00621 M01S00608.dcc +++| LDC =C* DCC - INCORRECT REQUEST.*
00622 M01S00609.dcc +++| LJM ABT ABORT
00623 M01S00610.dcc +++|
00624 M01S00611.dcc +++| PRS7 LDD RQ SET DATA CHANNEL
Line S00612 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00625 M02S00612.252l678 ---| LPN 37
00626 M01S00013.252l678 +++| LPN 77
00627 M01S00613.dcc +++| STD T2 SAVE DATA CHANNEL
Line S00614 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00628 M02S00614.ns2795 ---| LDC CHTP GET FWA OF CHANNEL TABLES
Line S00615 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00629 M02S00615.ns2795 ---| CRD CM
Line S00616 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00630 M02S00616.ns2795 ---| LDD CM+2
Line S00617 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00631 M02S00617.ns2795 ---| LPN 77
Line S00618 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00632 M02S00618.ns2795 ---| RAM SDCB-1
Line S00619 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00633 M02S00619.ns2795 ---| LDD CM+3
Line S00620 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00634 M02S00620.ns2795 ---| STM SDCB
Line S00621 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00635 M02S00621.ns2795 ---| LDN CTALL CHANNEL TABLE LENGTH
Line S00622 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00636 M02S00622.ns2795 ---| STD T1
Line S00623 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00637 M02S00623.ns2795 ---| LDD CM+2
Line S00624 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00638 M02S00624.ns2795 ---| LPN 77
Line S00625 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00639 M02S00625.ns2795 ---| SHN 14
Line S00626 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00640 M02S00626.ns2795 ---| ADD CM+3
Line S00627 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00641 M02S00627.ns2795 ---| ADN CTALL*2 FWA OF CHANNEL CONTROLWARE TABLE
Line S00628 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00642 M02S00628.ns2795 ---| CRM PBF,T1
Line S00629 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00643 M02S00629.ns2795 ---| LDM PBF,T2 CHECK CHANNEL CONFIGURATION
Line S00630 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00644 M02S00630.ns2795 ---| LPN 37
Line S00631 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00645 M02S00631.ns2795 ---| NJN PRS8 IF CONTROLWARE CHANNEL
00646 M01S00001.ns2795 +++| RJM SEC SEARCH FOR EQUIPMENT ON CHANNEL
00647 M01S00002.ns2795 +++| NJN PRS8 IF EQUIPMENT FOUND
00648 M01S00632.dcc +++| LDC =C* DCC - NOT CONTROLWARE CHANNEL.*
00649 M01S00633.dcc +++| LJM ABT ABORT JOB
00650 M01S00634.dcc +++|
Line S00635 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00651 M02S00635.ns2795 ---| PRS8 STD T1
Line S00636 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00652 M02S00636.ns2795 ---| LDN 0
00653 M01S00003.ns2795 +++| PRS8 LDN 0
00654 M01S00637.dcc +++| STD T3
00655 M01S00638.dcc +++| PRS9 LDM PRSB,T3
00656 M01S00639.dcc +++| ZJN PRS10 IF END OF TABLE
Line S00640 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00657 M02S00640.ns2795 ---| LMD T1
00658 M01S00004.ns2795 +++| LMD CM+3 COMPARE DEVICE MNEMONIC
Line S00641 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2466
Seq # *Modification Id* Act
----------------------------+
00659 M02S00641.ns2466 ---| ZJN PRS11 IF CCC CONTROLLWARE CHANNEL
00660 M01S00001.ns2466 +++| ZJN PRS11 IF CCC CONTROLWARE CHANNEL
00661 M01S00642.dcc +++| AOD T3
00662 M01S00643.dcc +++| UJN PRS9 CONTINE SEARCH
00663 M01S00644.dcc +++|
00664 M01S00645.dcc +++| PRS10 LDC =C* DCC - INCORRECT CCC CONTROLWARE TYPE.*
00665 M01S00646.dcc +++| LJM ABT ABORT JOB
00666 M01S00647.dcc +++|
Line S00648 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00667 M02S00648.ns2795 ---| PRS11 LDD T2 RESTORE DATA CHANNEL
00668 M01S00005.ns2795 +++| PRS11 LDD T3 CHECK FOR CMTS
00669 M01S00006.ns2795 +++| SBN EMTD
00670 M01S00007.ns2795 +++| PJN PRS11.1 IF NOT MT/NT DEVICE TYPE
00671 M01S00008.ns2795 +++| LDD CM
00672 M01S00009.ns2795 +++| LPN 4
00673 M01S00010.ns2795 +++| ZJN PRS10 IF NOT 698 (CMTS) EQUIPMENT
00674 M01S00011.ns2795 +++| PRS11.1 LDD T2 RESTORE DATA CHANNEL
00675 M01S00649.dcc +++| RJM SDC SET DATA CHANNEL
00676 M01S00650.dcc +++| NJN PRS12 IF CHANNEL AVAILABLE
00677 M01S00651.dcc +++| LDC =C* DCC - CHANNEL NOT AVAILABLE.*
00678 M01S00652.dcc +++| LJM ERR PROCESS ERROR
00679 M01S00653.dcc +++|
00680 M01S00654.dcc +++| PRS12 AOM ERRA SET CHANNEL RESERVED
00681 M01S00655.dcc +++| DCN CH
00682 M01S00656.dcc +++| RJM CCC CLEAR *CCC* COUPLER
00683 M01S00657.dcc +++| LJM PRSX RETURN
00684 M01S00658.dcc +++|
Line S00659 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2466
Seq # *Modification Id* Act
----------------------------+
00685 M02S00659.ns2466 ---|* TABLE OF *CCC* CONTROLER TYPES *
00686 M01S00002.ns2466 +++|** TABLE OF CCC CONTROLLER TYPES.
00687 M01S00660.dcc +++|
Line S00661 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00688 M02S00661.ns2795 ---| PRSB CON M8CW 7990 CCC CONTROLWARE TYPE
Line S00662 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00689 M02S00662.ns2795 ---| CON CXCW 5870 CCC CONTROLWARE TYPE
Line S00663 Modification History
M01 (Added by) dcc
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00690 M02S00663.ns2795 ---| CON CCCW 7165 CCC CONTROLWARE TYPE
Line S00003 Modification History
M01 (Added by) ns2466
M02 (Updated by) ns2795
Seq # *Modification Id* Act
----------------------------+
00691 M02S00003.ns2795 ---| CON CTCW 698 CCC CONTROLWARE TYPE
00692 M01S00012.ns2795 +++| PRSB BSS 0
00693 M01S00013.ns2795 +++| CON 2RMT 698 (CMTS)
00694 M01S00014.ns2795 +++| CON 2RNT 698 (CMTS)
00695 M01S00015.ns2795 +++| EMTD EQU *-PRSB END OF MT/NT DEVICE TYPES
00696 M01S00016.ns2795 +++| CON 2RCT CTS
00697 M01S00017.ns2795 +++| CON 2RAT ATS
00698 M01S00018.ns2795 +++| CON 2RSS 7990
00699 M01S00019.ns2795 +++| CON 2RLX 5870
00700 M01S00020.ns2795 +++| CON 2RLY 5970
00701 M01S00021.ns2795 +++| CON 2RDC 895/7165
00702 M01S00664.dcc +++| CON 0 END OF TABLE
00703 M01S00665.dcc +++| CCC SPACE 4,20
00704 M01S00666.dcc +++|** CCC - CLEAR CCC COUPLER.
00705 M01S00667.dcc +++|*
00706 M01S00668.dcc +++|* CCC ISSUES THE CLEAR COUPLER FUNCTION AND CHECKS CHANNEL
00707 M01S00669.dcc +++|* ACTIVITY. AN ERROR MESSAGE IS RETURNED IF THE FUNCTION
00708 M01S00670.dcc +++|* DOES NOT TAKE OR THE CHANNEL REMAINS FULL.
00709 M01S00671.dcc +++|*
00710 M01S00672.dcc +++|* ENTRY CHANNEL INSTRUCTIONS MODIFIED.
00711 M01S00673.dcc +++|*
00712 M01S00674.dcc +++|* EXIT CHANNEL DISCONNECTED.
00713 M01S00675.dcc +++|*
00714 M01S00676.dcc +++|* ERROR *ERR* CALLED IF CHANNEL REMAINS FULL.
00715 M01S00677.dcc +++|* (A) = ERROR MESSAGE ADDRESS.
00716 M01S00678.dcc +++|*
00717 M01S00679.dcc +++|* USES T1.
00718 M01S00680.dcc +++|*
00719 M01S00681.dcc +++|* CALLS ERR, FCN.
00720 M01S00682.dcc +++|
00721 M01S00683.dcc +++|
00722 M01S00684.dcc +++| CCC SUBR ENTRY/EXIT
00723 M01S00685.dcc +++| LDC 1000
00724 M01S00686.dcc +++| STD T1
00725 M01S00687.dcc +++| ACN CH
00726 M01S00688.dcc +++| EJM CCC2,CH IF CHANNEL EMPTY OR INACTIVE
00727 M01S00689.dcc +++| IAN CH
00728 M01S00690.dcc +++| DCN CH
00729 M01S00691.dcc +++| ACN CH
00730 M01S00692.dcc +++| CCC1 EJM CCC2,CH IF CHANNEL EMPTY OR INACTIVE
00731 M01S00693.dcc +++| IAN CH
00732 M01S00694.dcc +++| SOD T1
00733 M01S00695.dcc +++| NJN CCC1 IF NOT CHANNEL FULL TIMEOUT
00734 M01S00696.dcc +++| LDC =C* DCC - CONSTANT CHANNEL FULL.*
00735 M01S00697.dcc +++| LJM ERR PROCESS ERROR
00736 M01S00698.dcc +++|
00737 M01S00699.dcc +++| CCC2 DCN CH
00738 M01S00700.dcc +++| UJN CCCX RETURN
00739 M01S00701.dcc +++| SBP SPACE 4
00740 M01S00702.dcc +++|** SBP - SET BUFFER PARAMETERS.
00741 M01S00703.dcc +++|*
00742 M01S00704.dcc +++|* THIS ROUTINE READS THE *CM* CIRCULAR BUFFER POINTERS.
00743 M01S00705.dcc +++|* THE POINTERS ARE CHECKED TO BE WITHIN THE JOB-S FIELD LENGTH
00744 M01S00706.dcc +++|* AND IN AND OUT WITHIN THE BUFFER LIMITS. THE JOB IS
00745 M01S00707.dcc +++|* ABORTED IF THESE CONDITIONS ARE NOT MET.
00746 M01S00708.dcc +++|*
00747 M01S00709.dcc +++|* ENTRY (IR+3, IR+4) = FILE *CM* ADDRESS OF *FET*.
00748 M01S00710.dcc +++|*
00749 M01S00711.dcc +++|* EXIT (FT, FT+1) = FIRST WORD ADDRESS OF BUFFER.
00750 M01S00712.dcc +++|* (IN, IN+1) = INPUT POINTER TO BUFFER.
00751 M01S00713.dcc +++|* (OT, OT+1) = OUTPUT POINTER TO BUFFER.
00752 M01S00714.dcc +++|* (LM, LM+1) = LIMIT OF BUFFER.
00753 M01S00715.dcc +++|*
00754 M01S00716.dcc +++|* ERROR *ABT* CALLED IF BUFFER POINTER OUT OF RANGE.
00755 M01S00717.dcc +++|* (A) = ERROR MESSAGE ADDRESS.
00756 M01S00718.dcc +++|*
00757 M01S00719.dcc +++|* USES CM - CM+4.
00758 M01S00720.dcc +++|*
00759 M01S00721.dcc +++|* CALLS ABT.
00760 M01S00722.dcc +++|
00761 M01S00723.dcc +++|
00762 M01S00724.dcc +++| SBP SUBR ENTRY/EXIT
00763 M01S00725.dcc +++| LDD IR+3 READ LIMIT
00764 M01S00726.dcc +++| SHN 6
00765 M01S00727.dcc +++| ADD RA
00766 M01S00728.dcc +++| SHN 6
00767 M01S00729.dcc +++| ADD IR+4
00768 M01S00730.dcc +++| ADN 4 READ LIMIT
00769 M01S00731.dcc +++| CRD LM-3
00770 M01S00732.dcc +++| SBN 1 READ OUT
00771 M01S00733.dcc +++| CRD OT-3
00772 M01S00734.dcc +++| SBN 1 READ IN
00773 M01S00735.dcc +++| CRD IN-3
00774 M01S00736.dcc +++| SBN 1 READ FIRST
00775 M01S00737.dcc +++| CRD CM
00776 M01S00738.dcc +++| LDD LM SET LIMIT
00777 M01S00739.dcc +++| LPN 77
00778 M01S00740.dcc +++| STD LM
00779 M01S00741.dcc +++| LDD CM+4 SET FIRST
00780 M01S00742.dcc +++| STD FT+1
00781 M01S00743.dcc +++| LDD CM+3
00782 M01S00744.dcc +++| LPN 77
00783 M01S00745.dcc +++| STD FT
00784 M01S00746.dcc +++| SCN 37 CHECK UPPER PART OF ADDRESSES
00785 M01S00747.dcc +++| ADD LM
00786 M01S00748.dcc +++| SCN 37
00787 M01S00749.dcc +++| ADD IN
00788 M01S00750.dcc +++| SCN 37
00789 M01S00751.dcc +++| ADD OT
00790 M01S00752.dcc +++| SCN 37
00791 M01S00753.dcc +++| NJN SBP1
00792 M01S00754.dcc +++| LDD LM CHECK LIMIT
00793 M01S00755.dcc +++| SHN 14
00794 M01S00756.dcc +++| ADD LM+1
00795 M01S00757.dcc +++| SBN 1
00796 M01S00758.dcc +++| SHN -6
00797 M01S00759.dcc +++| SBD FL
00798 M01S00760.dcc +++| PJN SBP1 IF LIMIT GREATER THAN *FL*
00799 M01S00761.dcc +++| LDD FT CHECK FIRST
00800 M01S00762.dcc +++| SBD LM
00801 M01S00763.dcc +++| SHN 14
00802 M01S00764.dcc +++| ADD FT+1
00803 M01S00765.dcc +++| SBD LM+1
00804 M01S00766.dcc +++| MJN SBP2 IF FIRST LESS THAN LIMIT
00805 M01S00767.dcc +++| SBP1 LDC =C* DCC - CIRCULAR BUFFER ADDRESS ERROR.*
00806 M01S00768.dcc +++| LJM ABT ABORT JOB
00807 M01S00769.dcc +++|
00808 M01S00770.dcc +++| SBP2 LDD IN CHECK IN
00809 M01S00771.dcc +++| SBD FT
00810 M01S00772.dcc +++| SHN 14
00811 M01S00773.dcc +++| ADD IN+1
00812 M01S00774.dcc +++| SBD FT+1
00813 M01S00775.dcc +++| MJN SBP1 IF IN LESS THAN FIRST
00814 M01S00776.dcc +++| LDD IN
00815 M01S00777.dcc +++| SBD LM
00816 M01S00778.dcc +++| SHN 14
00817 M01S00779.dcc +++| ADD IN+1
00818 M01S00780.dcc +++| SBD LM+1
00819 M01S00781.dcc +++| PJN SBP1 IF IN NOT LESS THAN LIMIT
00820 M01S00782.dcc +++| LDD OT CHECK OUT
00821 M01S00783.dcc +++| SBD FT
00822 M01S00784.dcc +++| SHN 14
00823 M01S00785.dcc +++| ADD OT+1
00824 M01S00786.dcc +++| SBD FT+1
00825 M01S00787.dcc +++| MJN SBP1 IF OUT LESS THAN FIRST
00826 M01S00788.dcc +++| LDD OT
00827 M01S00789.dcc +++| SBD LM
00828 M01S00790.dcc +++| SHN 14
00829 M01S00791.dcc +++| ADD OT+1
00830 M01S00792.dcc +++| SBD LM+1
00831 M01S00793.dcc +++| PJN SBP1 IF OUT NOT LESS THAN LIMIT
00832 M01S00794.dcc +++| LJM SBPX RETURN
00833 M01S00795.dcc +++| SDC SPACE 4
00834 M01S00796.dcc +++|** SDC - SET DATA CHANNEL.
00835 M01S00797.dcc +++|*
00836 M01S00798.dcc +++|* THIS ROUTINE MODIFIES ALL INSTRUCTIONS WHICH CONTAIN A
00837 M01S00799.dcc +++|* CHANNEL NUMBER. THE CHANNEL IS RESERVED.
00838 M01S00800.dcc +++|*
00839 M01S00801.dcc +++|* ENTRY (A) = CHANNEL NUMBER.
00840 M01S00802.dcc +++|*
00841 M01S00803.dcc +++|* EXIT (A) = ZERO IF CHANNEL NOT RESERVED.
00842 M01S00804.dcc +++|* = NON-ZERO IF CHANNEL RESERVED.
00843 M01S00014.252l678 +++|* (T4) = CHANNEL.
00844 M01S00805.dcc +++|* CHANNEL INSTRUCTIONS MODIFIED.
00845 M01S00806.dcc +++|*
Line S00807 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00846 M02S00807.252l678 ---|* USES CM - CM+4, T1 - T3.
00847 M01S00015.252l678 +++|* USES CM - CM+4, T1 - T4.
00848 M01S00808.dcc +++|*
00849 M01S00809.dcc +++|* MACROS MONITOR, PAUSE.
00850 M01S00810.dcc +++|
00851 M01S00811.dcc +++|
00852 M01S00812.dcc +++| SDC SUBR ENTRY/EXIT
Line S00813 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00853 M02S00813.252l678 ---| SDCA STD T1 SET CHANNEL
00854 M01S00016.252l678 +++| STD T4
00855 M01S00017.252l678 +++| LPN 37
00856 M01S00018.252l678 +++| STD T1 SET CHANNEL
00857 M01S00814.dcc +++| LDC CTCH SET CHANNEL TABLE ADDRESS
00858 M01S00815.dcc +++| STD T2
00859 M01S00816.dcc +++| SDC1 LDI T2 SET NEXT INSTRUCTION ADDRESS
00860 M01S00817.dcc +++| ZJN SDC2 IF ALL CHANNELS MODIFIED
00861 M01S00818.dcc +++| STD T3
00862 M01S00819.dcc +++| LDI T3
00863 M01S00820.dcc +++| SCN 37
00864 M01S00821.dcc +++| LMD T1
00865 M01S00822.dcc +++| STI T3
00866 M01S00823.dcc +++| AOD T2
00867 M01S00824.dcc +++| UJN SDC1 MODIFY NEXT INSTRUCTION
00868 M01S00825.dcc +++|
00869 M01S00826.dcc +++| SDC2 LDN CTALL CHANNEL TABLE LENGTH
00870 M01S00827.dcc +++| STD T2
00871 M01S00828.dcc +++| LDC 0 FWA OF CHANNEL STATUS TABLE
00872 M01S00829.dcc +++| SDCB EQU *-1
00873 M01S00830.dcc +++| CRM PBF,T2
00874 M01S00831.dcc +++| LDM PBF,T1
00875 M01S00832.dcc +++| LMC 7777
00876 M01S00833.dcc +++| ZJN SDC6 IF CHANNEL NOT AVAILABLE
Line S00834 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00877 M02S00834.252l678 ---| CHTE CH,*
Line S00835 Modification History
M01 (Added by) dcc
M02 (Updated by) 252l678
Seq # *Modification Id* Act
----------------------------+
00878 M02S00835.252l678 ---| SDC5 LDN CH SET CHANNEL NUMBER
00879 M01S00019.252l678 +++| SDC5 LDD T4 SET CHANNEL NUMBER
00880 M01S00836.dcc +++| STD CM+1
00881 M01S00837.dcc +++| MONITOR CCHM REQUEST CHANNEL
00882 M01S00838.dcc +++| LDD CM+2
00883 M01S00839.dcc +++| NJN SDC7 IF ASSIGNED
00884 M01S00840.dcc +++| LDN 77 DELAY
00885 M01S00841.dcc +++| SBN 1
00886 M01S00842.dcc +++| NJN *-1 IF MORE DELAY
00887 M01S00843.dcc +++| PAUSE
00888 M01S00844.dcc +++| LDD CM+1
00889 M01S00845.dcc +++| ZJN SDC5 IF NO ERROR FLAGS
00890 M01S00846.dcc +++| SDC6 LDN 0 RETURN WITH A = 0
00891 M01S00847.dcc +++| SDC7 LJM SDCX RETURN
00892 M01S00022.ns2795 +++| SEC SPACE 4,15
00893 M01S00023.ns2795 +++|** SEC - SEARCH FOR EQUIPMENT ON CHANNEL.
00894 M01S00024.ns2795 +++|*
00895 M01S00025.ns2795 +++|* ENTRY (T2) = CHANNEL.
00896 M01S00026.ns2795 +++|*
00897 M01S00027.ns2795 +++|* EXIT (A) = 0, IF NO EQUIPMENT FOUND.
00898 M01S00028.ns2795 +++|* (CM - CM+4) = *EQDE* WORD OF EQUIPMENT ON CHANNEL.
00899 M01S00029.ns2795 +++|*
00900 M01S00030.ns2795 +++|* USES T3, T5, CM - CM+4.
00901 M01S00031.ns2795 +++|*
00902 M01S00032.ns2795 +++|* MACROS SFA.
00903 M01S00033.ns2795 +++|
00904 M01S00034.ns2795 +++|
00905 M01S00035.ns2795 +++| SEC SUBR ENTRY/EXIT
00906 M01S00036.ns2795 +++| LDK ESTP
00907 M01S00037.ns2795 +++| CRD CM
00908 M01S00038.ns2795 +++| LDD CM+2 LAST EST ORDINAL + 1
00909 M01S00039.ns2795 +++| STD T3
00910 M01S00040.ns2795 +++| LDN NOPE-1 SET EST ORDINAL
00911 M01S00041.ns2795 +++| STD T5
00912 M01S00042.ns2795 +++| SEC1 AOD T5 CHECK NEXT EST
00913 M01S00043.ns2795 +++| LMD T3
00914 M01S00044.ns2795 +++| ZJN SECX IF END OF EST
00915 M01S00045.ns2795 +++| SFA EST,T5
00916 M01S00046.ns2795 +++| ADK EQDE
00917 M01S00047.ns2795 +++| CRD CM
00918 M01S00048.ns2795 +++| LDD CM+1 CHECK FIRST CHANNEL
00919 M01S00049.ns2795 +++| ZJN SEC2 IF FIRST CHANNEL NOT PRESENT
00920 M01S00050.ns2795 +++| LPN 77
00921 M01S00051.ns2795 +++| LMD T2
00922 M01S00052.ns2795 +++| ZJN SEC3 IF FIRST CHANNEL MATCHES
00923 M01S00053.ns2795 +++| SEC2 LDD CM+2 CHECK SECOND CHANNEL
00924 M01S00054.ns2795 +++| ZJN SEC1 IF SECOND CHANNEL NOT PRESENT
00925 M01S00055.ns2795 +++| LPN 77
00926 M01S00056.ns2795 +++| LMD T2
00927 M01S00057.ns2795 +++| NJN SEC1 IF SECOND CHANNEL DOES NOT MATCH
00928 M01S00058.ns2795 +++| SEC3 LDN 1 INDICATE SUCCESS
00929 M01S00059.ns2795 +++| UJN SECX RETURN
00930 M01S00848.dcc +++| SPACE 4,10
00931 M01S00849.dcc +++|** PRESET COMMON DECKS.
00932 M01S00850.dcc +++|
00933 M01S00851.dcc +++|
00934 M01S00852.dcc +++|*CALL COMPCRS
00935 M01S00853.dcc +++|*CALL COMPCUA
00936 M01S00854.dcc +++| CIT SPACE 4
00937 M01S00855.dcc +++|** CIT - CHANNEL INSTRUCTION TABLE.
00938 M01S00856.dcc +++|
00939 M01S00857.dcc +++|
00940 M01S00858.dcc +++| CHTB CH
00941 M01S00859.dcc +++| PBF SPACE 4
00942 M01S00860.dcc +++|** PBF - PPU BUFFER.
00943 M01S00861.dcc +++|
00944 M01S00862.dcc +++|
00945 M01S00863.dcc +++| USE BUFFER
00946 M01S00864.dcc +++|
00947 M01S00865.dcc +++| PBF BSS 0 *PP* BUFFER TO READ/WRITE *CCC*
Line S00866 Modification History
M01 (Added by) dcc
M02 (Updated by) 251l664
Seq # *Modification Id* Act
----------------------------+
00948 M02S00866.251l664 ---| ERRNG 7777-PBF-NWC*2 PP OVERFLOW
00949 M01S00001.251l664 +++| PBFL MAX NWC*2,CTALL*5
00950 M01S00002.251l664 +++| ERRNG 7777-PBF-PBFL PP OVERFLOW
00951 M01S00867.dcc +++| SPACE 4,10
00952 M01S00868.dcc +++| OVERFLOW
00953 M01S00869.dcc +++| END