Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.ver +++| IDENT VER,VER
00002 M00S00002.ver +++| PERIPH
00003 M00S00003.ver +++| BASE MIXED
00004 M00S00004.ver +++| SST SSCP
00005 M00S00005.ver +++| TITLE VER - VIRTUAL ENVIRONMENT REQUEST PROCESSOR.
00006 M00S00006.ver +++|*COMMENT VER - VIRTUAL RESOURCE REQUEST PROCESSOR.
Line S00007 Modification History
M01 (Removed by) 281l803
Seq # *Modification Id* Act
----------------------------+
00007 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 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.ver +++| VER SPACE 4,10
00010 M00S00009.ver +++|*** VER - VIRTUAL ENVIRONMENT REQUEST PROCESSOR.
00011 M00S00010.ver +++|*
00012 M00S00011.ver +++|* K. H. BOSSARD. 82/04/19.
00013 M00S00012.ver +++| SPACE 4,10
00014 M00S00013.ver +++|*** *VER* PROCESSES REQUESTS FOR OBTAINING AND
00015 M00S00014.ver +++|* RETURNING RESOURCES FOR NOS/VE IN THE DUAL STATE
00016 M00S00015.ver +++|* ENVIRONMENT.
00017 M00S00016.ver +++| SPACE 4,10
00018 M00S00017.ver +++|*** CALL.
00019 M00S00018.ver +++|*
00020 M00S00019.ver +++|*
00021 M00S00020.ver +++|*T 18/*VER*, 1/1, 5/CP, 12/FCN, 6/0, 18/ADDR
Figure
0 17 18 23 24 29 ADDR 0 FCN 30 35 36 40 41 42 59 FCN CP 1 *VER*
00022 M00S00021.ver +++|*
00023 M00S00022.ver +++|* CP NVE CONTROL POINT NUMBER.
00024 M00S00023.ver +++|* FCN FUNCTION CODE.
00025 M00S00024.ver +++|* ADDR ADDRESS OF PARAMETER BLOCK.
00026 M00S00025.ver +++| SPACE 4,10
00027 M00S00026.ver +++|*** REPLY BLOCK.
00028 M00S00027.ver +++|*
00029 M00S00028.ver +++|* 48/UNCHANGED, 12/GRS
00030 M00S00029.ver +++|* 48/UNCHANGED, 12/RS
00031 M00S00030.ver +++|*
00032 M00S00031.ver +++|* GRS GENERAL RETURN STATUS (RIGHTMOST BIT IS A
00033 M00S00032.ver +++|* COMPLETION BIT).
00034 M00S00033.ver +++|* RS INDIVIDUAL RETURN STATUS.
00035 M00S00034.ver +++|*
00036 M00S00035.ver +++|* *RS* IS THE RETURN STATUS FOR A SPECIFIC INDIVIDUAL REQUEST
00037 M00S00036.ver +++|* AND IS NOT PRESENT IN ALL FORMATS. FOR REPLIES THAT HAVE
00038 M00S00037.ver +++|* BOTH *GRS* AND *RS*, *GRS* CONTAINS THE VALUE OF THE LAST
00039 M00S00038.ver +++|* ENCOUNTERED NON-ZERO ERROR STATUS. REQUEST PROCESSING
00040 M00S00039.ver +++|* CONTINUES UNTIL A FATAL ERROR (100X,200X) OCCURS.
00041 M00S00040.ver +++| SPACE 4,10
00042 M00S00041.ver +++|*** DAYFILE MESSAGES.
00043 M00S00042.ver +++|*
00044 M00S00043.ver +++|*
00045 M00S00044.ver +++|* * VER - ILLEGAL USER ACCESS.*
00046 M00S00045.ver +++|* THE CALLER DID NOT HAVE NVE SUBSYSTEM ID.
00047 M00S00046.ver +++|*
00048 M00S00047.ver +++|* * VER - ARGUMENT ERROR.*
00049 M00S00048.ver +++|* INDICATES ONE OF THE FOLLOWING.
00050 M00S00049.ver +++|* 1. AN ILLEGAL FUNCTION CODE WAS SPECIFIED.
00051 M00S00050.ver +++|* 2. AUTO RECALL WAS NOT SELECTED.
00052 M00S00051.ver +++|* 3. PARAMETER BLOCK WAS NOT WITHIN CALLER-S FIELD LENGTH.
00053 M00S00052.ver +++|* 4. THE COMPLETION BIT IN THE PARAMETER BLOCK WAS SET.
00054 M00S00053.ver +++|*
00055 M00S00054.ver +++|* * VER - FATAL MAINTENANCE REGISTER ERROR.*
00056 M00S00055.ver +++|* A FATAL PARITY ERROR OCCURRED DURING MAINTENANCE REGISTER
00057 M00S00056.ver +++|* ACCESS THROUGH THE MAINTENANCE CHANNEL.
00058 M00S00057.ver +++|*
00059 M00S00058.ver +++|* * VER - EJT ENTRY UNAVAILABLE.*
00060 M00S00059.ver +++|* *VER* WAS UNABLE TO OBTAIN AN EJT ORDINAL.
00061 M00S00060.ver +++|*
00062 M00S00061.ver +++|* * VER - OVERLAY SELECTION ERROR.*
00063 M00S00062.ver +++|* OVERLAY *2VR* RECEIVED CONTROL ON A FUNCTION CODE
00064 M00S00063.ver +++|* WHICH SHOULD HAVE BEEN PROCESSED BY *VER* MAIN.
00065 M00S00064.ver +++|
00066 M00S00065.ver +++| SPACE 4,10
00067 M00S00066.ver +++|*** BINARY MAINTENANCE LOG MESSAGES.
00068 M00S00067.ver +++|*
00069 M00S00068.ver +++|*
00070 M00S00069.ver +++|* MESSAGES WILL BE ISSUED IN THE FOLLOWING CASES.
00071 M00S00070.ver +++|*
00072 M00S00071.ver +++|* 1. REQUEST CM FOR NOS/VE.
00073 M00S00072.ver +++|* 2. RETURN CM FROM NOS/VE.
00074 M00S00073.ver +++|* 3. REQUEST PP FOR NOS/VE.
00075 M00S00074.ver +++|* 4. RETURN PP FROM NOS/VE.
00076 M00S00075.ver +++|* 5. CANNOT IDLE PP.
00077 M00S00076.ver +++|* 6. CANNOT DEADSTART PP.
00078 M00S00077.ver +++|* 7. BAD PP RETURNED FROM NOS/VE.
00079 M00S00078.ver +++|*
00080 M00S00079.ver +++|* THE CONTENTS OF THE MESSAGE INCLUDE THE PP NUMBER OR
00081 M00S00080.ver +++|* THE CURRENT FWA AND LWA+1 OF NOS/VE CM, AS APPROPRIATE.
00082 M00S00081.ver +++| SPACE 4,10
00083 M00S00082.ver +++|** ROUTINES CALLED.
00084 M00S00083.ver +++|*
00085 M00S00084.ver +++|*
00086 M00S00085.ver +++|* 1VP - RESERVE VIRTUAL PP.
00087 M00S00086.ver +++| SPACE 4,10
00088 M00S00087.ver +++|*CALL COMPMAC
00089 M00S00088.ver +++|*CALL COMPMRM
00090 M00S00089.ver +++|*CALL COMSCPS
00091 M00S00090.ver +++|*CALL COMSDFS
00092 M00S00091.ver +++|*CALL COMSDFT
00093 M00S00092.ver +++| QUAL DSL
00094 M00S00093.ver +++|*CALL COMSDSL
00095 M00S00094.ver +++| QUAL *
00096 M00S00095.ver +++| LIST X
00097 M00S00096.ver +++|*CALL COMSDST
00098 M00S00097.ver +++| LIST *
00099 M00S00098.ver +++|*CALL COMSEJT
00100 M00S00099.ver +++|*CALL COMSIOU
Line S00001 Modification History
M01 (Added by) 271l716
M02 (Removed by) 273l780
Seq # *Modification Id* Act
----------------------------+
00101 M02S00001.273l780 ---| CPA$ EQU 1 SELECT CPA/PCPA ACCESS
00102 M02S00002.273l780 ---| IPC$ EQU 1 SELECT *COMPPCP* INITIALIZATION
00103 M02S00003.273l780 ---|*CALL COMSPCP
00104 M00S00100.ver +++|*CALL COMSPIM
00105 M00S00101.ver +++|*CALL COMSSSD
00106 M00S00102.ver +++| LIST X
00107 M00S00103.ver +++|*CALL COMSVED
00108 M00S00104.ver +++| LIST *
00109 M00S00105.ver +++| SPACE 4,10
00110 M00S00106.ver +++|**** DIRECT LOCATION ASSIGNMENTS.
00111 M00S00107.ver +++|
00112 M00S00108.ver +++|
00113 M00S00109.ver +++| PB EQU 20 - 24 REQUEST/REPLY WORD BUFFER (5 LOCATIONS)
00114 M00S00110.ver +++| RN EQU 25 C180 REGISTER NUMBER
00115 M00S00111.ver +++| EC EQU 26 C180 REGISTER CONNECTION CODE
00116 M00S00112.ver +++| LO EQU 27 LIST OFFSET
Line S00004 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
00117 M01S00004.271l716 +++| NC EQU LO SYSTEM CONTROL POINT NUMBER
00118 M00S00113.ver +++| CL EQU 30 - 34 CM WORD BUFFER (5 LOCATIONS)
00119 M00S00114.ver +++| DA EQU 35 DIRECT CELL STORAGE
00120 M00S00115.ver +++| DB EQU 36 DIRECT CELL STORAGE
00121 M00S00116.ver +++| DC EQU 37 DIRECT CELL STORAGE
00122 M00S00117.ver +++| CN EQU 40 - 44 CM WORD BUFFER (5 LOCATIONS)
00123 M00S00118.ver +++| ES EQU CN CM WORD BUFFER FOR *COMPDVC*
00124 M00S00119.ver +++| LE EQU 45 LAST EST ORDINAL + 1
00125 M00S00120.ver +++| CF EQU 46 CONFIGURATION FLAG
Line S00005 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
00126 M01S00005.271l716 +++| BS EQU 47 MEMORY BLOCK SIZE
00127 M00S00121.ver +++| SC EQU 60 - 64 SCRATCH
00128 M00S00122.ver +++|****
00129 M00S00123.ver +++| SPACE 4,10
00130 M00S00124.ver +++|* IN ORDER TO SAVE SPACE, THE DIRECT CELL *TH* IS USED IN PLACE
00131 M00S00125.ver +++|* OF *ESIR*. THIS MUST BE CHANGED IF THE VALUE OF *ESIR* IN
00132 M00S00126.ver +++|* *COMSVED* CHANGES.
00133 M00S00127.ver +++|
00134 M00S00128.ver +++| ERRNZ ESIR-1000 *ESIR* VALUE HAS CHANGED, SEE ABOVE NOTE
00135 M00S00129.ver +++| TITLE MACRO DEFINITIONS.
00136 M00S00130.ver +++| ABORT SPACE 4,10
00137 M00S00131.ver +++|** ABORT - ERROR PROCESSING MACRO.
00138 M00S00132.ver +++|*
00139 M00S00133.ver +++|* ABORT ADDR
00140 M00S00134.ver +++|*
00141 M00S00135.ver +++|* ADDR = FWA OF ERROR MESSAGE FOR DAYFILE.
00142 M00S00136.ver +++|*
00143 M00S00137.ver +++|* CALLS ERR.
00144 M00S00138.ver +++|
00145 M00S00139.ver +++|
00146 M00S00140.ver +++| PURGMAC ABORT
00147 M00S00141.ver +++|
00148 M00S00142.ver +++| ABORT MACRO A
00149 M00S00143.ver +++| MACREF ABORT
00150 M00S00144.ver +++| LDC A
00151 M00S00145.ver +++| LJM ERR
00152 M00S00146.ver +++| ABORT ENDM
00153 M00S00147.ver +++| FCN SPACE 4,10
00154 M00S00148.ver +++|** FCN - DEFINE FUNCTION PROCESSOR.
00155 M00S00149.ver +++|*
00156 M00S00150.ver +++|* FCN NAME
00157 M00S00151.ver +++|*
00158 M00S00152.ver +++|* NAME = NAME OF FUNCTION PROCESSOR.
00159 M00S00153.ver +++|
00160 M00S00154.ver +++|
00161 M00S00155.ver +++| FCN MACRO A
00162 M00S00156.ver +++| CON A
00163 M00S00157.ver +++| FCN ENDM
00164 M00S00158.ver +++| TITLE MAIN PROGRAM.
00165 M00S00159.ver +++| ORG PPFW
00166 M00S00160.ver +++| VER SPACE 4,10
00167 M00S00161.ver +++|** VER - MAIN PROGRAM.
00168 M00S00162.ver +++|
00169 M00S00163.ver +++|
00170 M00S00164.ver +++| VER RJM PRS PRESET VIRTUAL ENVIRONMENT
00171 M00S00165.ver +++| STD PB+4
00172 M00S00166.ver +++| NJN VERX IF ERROR FOUND DURING PRESET
00173 M00S00167.ver +++|
00174 M00S00168.ver +++|* TO FUNCTION PROCESSOR WITH
00175 M00S00169.ver +++|* (PB - PB+4) = FIRST WORD OF PARAMETER BLOCK.
00176 M00S00170.ver +++|* = 1/F, 35/0, 12/LENGTH, 12/0.
00177 M00S00171.ver +++|* F = FLAG USED ONLY IN RETURN FUNCTIONS.
00178 M00S00172.ver +++|* = 0 - RETURN SPECIFIED RESOURCES.
00179 M00S00173.ver +++|* = 1 - RETURN ALL.
00180 M00S00174.ver +++|* LENGTH = LENGTH (IN CM WORDS) OF PARAMETER BLOCK.
00181 M00S00175.ver +++|* (IR+3 - IR+4) = ADDRESS OF PARAMETER BLOCK.
00182 M00S00176.ver +++|
00183 M00S00177.ver +++| RJM **
00184 M00S00178.ver +++| VERA EQU *-1 (FUNCTION PROCESSOR ADDRESS)
00185 M00S00179.ver +++|
00186 M00S00180.ver +++| VERX AOD PB+4 SET COMPLETION BIT
00187 M00S00181.ver +++| RJM CPA GET PARAMETER BLOCK ADDRESS
00188 M00S00182.ver +++| CWD PB WRITE RESPONSE
00189 M00S00183.ver +++| MONITOR DPPM DROP PP
00190 M00S00184.ver +++| LJM PPR EXIT TO PP RESIDENT
00191 M00S00185.ver +++|
00192 M00S00186.ver +++|
00193 M00S00187.ver +++|** RESERVED LOCATIONS.
00194 M00S00188.ver +++|
00195 M00S00189.ver +++| CHFL CON 0 CHANNEL RESERVED FLAG
00196 M00S00190.ver +++| NEJT CON 0 NOS/VE EJT ORDINAL
00197 M00S00191.ver +++| PPCA CON 0 PP COMMUNICATION AREA ADDRESS
00198 M00S00192.ver +++| TITLE ERROR PROCESSOR.
00199 M00S00193.ver +++| ERR SPACE 4,10
00200 M00S00194.ver +++|** ERR - ERROR PROCESSOR.
00201 M00S00195.ver +++|*
00202 M00S00196.ver +++|* ENTRY (A) = FWA OF ERROR MESSAGE FOR DAYFILE.
00203 M00S00197.ver +++|*
00204 M00S00198.ver +++|* EXIT DAYFILE MESSAGE ISSUED.
00205 M00S00199.ver +++|* CONTROL POINT ABORTED.
00206 M00S00200.ver +++|*
00207 M00S00201.ver +++|* CALLS DFM.
00208 M00S00202.ver +++|*
00209 M00S00203.ver +++|* MACROS MONITOR.
00210 M00S00204.ver +++|
00211 M00S00205.ver +++|
00212 M00S00206.ver +++| ERR RJM DFM ISSUE DAYFILE MESSAGE
00213 M00S00207.ver +++| MONITOR ABTM ABORT CONTROL POINT
00214 M00S00208.ver +++| LJM PPR EXIT TO PP RESIDENT
00215 M00S00209.ver +++|
00216 M00S00210.ver +++|* ERROR MESSAGES.
00217 M00S00211.ver +++|
00218 M00S00212.ver +++| ERIR DATA C* VER - ILLEGAL USER ACCESS.*
00219 M00S00213.ver +++| ERAE DATA C* VER - ARGUMENT ERROR.*
00220 M00S00214.ver +++| ERMR DATA C* VER - FATAL MAINTENANCE REGISTER ERROR.*
00221 M00S00215.ver +++| EREU DATA C* VER - EJT ENTRY UNAVAILABLE.*
00222 M00S00216.ver +++| EROS DATA C* VER - OVERLAY SELECTION ERROR.*
00223 M00S00217.ver +++| SPACE 4,10
00224 M00S00218.ver +++|* COMMON DECKS.
00225 M00S00219.ver +++|
00226 M00S00220.ver +++|
00227 M00S00221.ver +++|*CALL COMPMRA
00228 M00S00222.ver +++|*CALL COMPRNS
00229 M00S00223.ver +++| TITLE BUFFER DEFINITIONS.
00230 M00S00224.ver +++| SPACE 4,35
00231 M00S00225.ver +++|** BUFFER DEFINITIONS.
00232 M00S00226.ver +++|*
00233 M00S00227.ver +++|* BUFFERS ARE ALLOCATED AT THE HIGHEST MEMORY LOCATIONS
00234 M00S00228.ver +++|* SO THAT THE SAME BUFFER DEFINITIONS MAY BE USED BY BOTH
00235 M00S00229.ver +++|* THE MAIN PORTION OF *VER* AND THE *2VR* OVERLAY. NONE OF
00236 M00S00230.ver +++|* THESE BUFFERS MAY BE USED BY PRESET.
00237 M00S00231.ver +++|*
00238 M00S00232.ver +++|* *IBUF*, *PBUF*, AND *RBUF* MUST NOT OVERLAP.
Line S00001 Modification History
M01 (Added by) ver13
Seq # *Modification Id* Act
----------------------------+
00239 M01S00001.ver13 +++|* *MBUF* MUST NOT OVERLAP *IBUF* OR *RBUF*.
00240 M00S00233.ver +++|* *CBUF* MUST NOT OVERLAP *RBUF*.
Line S00002 Modification History
M01 (Added by) ver13
Seq # *Modification Id* Act
----------------------------+
00241 M01S00002.ver13 +++|* *MBUF* MAY OVERLAP *CBUF* AND *PBUF*.
00242 M00S00234.ver +++|* *CBUF* AND *TCFL* MAY OVERLAP *IBUF* AND *PBUF*.
00243 M00S00235.ver +++|*
Line S00003 Modification History
M01 (Added by) ver13
Seq # *Modification Id* Act
----------------------------+
00244 M01S00003.ver13 +++|* *MBUF* IS USED ONLY FOR THE *RSCM* AND *RNCM* FUNCTIONS.
00245 M00S00236.ver +++|* *PBUF* IS USED ONLY FOR THE *RNPP* AND *RNPT* FUNCTIONS.
00246 M00S00237.ver +++|* *PBUF* MUST HAVE TWO RESERVED WORDS PRECEEDING IT FOR DISK
00247 M00S00238.ver +++|* LINKAGE BYTES.
00248 M00S00239.ver +++|
00249 M00S00240.ver +++|
00250 M00S00241.ver +++| .CBUFL MAX 40,CTALL*5 CHANNEL TABLE/CONTROL POINT FL SPACE
00251 M00S00242.ver +++| .IBUFL EQU 10 MAINTENANCE REGISTER SPACE
Line S00004 Modification History
M01 (Added by) ver13
Seq # *Modification Id* Act
----------------------------+
00252 M01S00004.ver13 +++| .MBUFL EQU 10 MAINTENANCE REGISTER SPACE
00253 M00S00243.ver +++| .PBUFL EQU 1200 PP RESIDENT SPACE
00254 M00S00244.ver +++| .RBUFL MAX 10,CTALL*5 MAINTENANCE REGISTER/CHANNEL TABLE SPACE
00255 M00S00245.ver +++| RBUF EQU EPFW-.RBUFL MAINTENANCE REGISTER/CHANNEL TABLE BUFFER
00256 M00S00246.ver +++| CBUF EQU RBUF-.CBUFL CHANNEL TABLE/CONTROL POINT FL BUFFER
00257 M00S00247.ver +++| IBUF EQU RBUF-.IBUFL MAINTENANCE REGISTER BUFFER
Line S00005 Modification History
M01 (Added by) ver13
Seq # *Modification Id* Act
----------------------------+
00258 M01S00005.ver13 +++| MBUF EQU IBUF-.IBUFL MAINTENANCE REGISTER BUFFER
00259 M00S00248.ver +++| PBUF EQU IBUF-.PBUFL PP RESIDENT INPUT BUFFER
00260 M00S00249.ver +++|
Line S00006 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
00261 M01S00006.271l716 +++|
Line S00250 Modification History
M01 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
00262 M01S00250.271l716 ---|** TABLE OF CONTROL POINT FIELD LENGTH.
Line S00007 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
00263 M01S00007.271l716 +++|** TCFL - TABLE OF CP/PCP CM FIELD LENGTHS.
00264 M00S00251.ver +++|*
Line S00252 Modification History
M01 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
00265 M01S00252.271l716 ---|* ONE WORD PER CONTROL POINT.
Line S00008 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
00266 M01S00008.271l716 +++|* ONE WORD PER CP/PCP.
00267 M00S00253.ver +++|*
00268 M00S00254.ver +++|*T 1/R, 11/ FL
00269 M00S00255.ver +++|* R=1, IF ROLLOUT FLAG SET.
00270 M00S00256.ver +++|
00271 M00S00257.ver +++|
00272 M00S00258.ver +++| TCFL EQU CBUF
00273 M00S00259.ver +++| TITLE COMMON SUBROUTINES.
Line S00006 Modification History
M01 (Added by) ver13
Seq # *Modification Id* Act
----------------------------+
00274 M01S00006.ver13 +++| CHA SPACE 4,10
00275 M01S00007.ver13 +++|** CHA - CHECK CHANNEL ASSIGNMENT.
00276 M01S00008.ver13 +++|*
00277 M01S00009.ver13 +++|* ENTRY (T2) = CHANNEL NUMBER.
00278 M01S00010.ver13 +++|*
00279 M01S00011.ver13 +++|* EXIT (A) = 0 IF CHANNEL IS ASSIGNED TO NOS/VE.
00280 M01S00012.ver13 +++|*
00281 M01S00013.ver13 +++|* USES T4.
00282 M01S00014.ver13 +++|
00283 M01S00015.ver13 +++|
00284 M01S00016.ver13 +++| CHA SUBR ENTRY/EXIT
00285 M01S00017.ver13 +++| LDN CTALL
00286 M01S00018.ver13 +++| STD T4
00287 M01S00019.ver13 +++| LDC ** FWA OF CHANNEL EJT ASSIGNMENT TABLE
00288 M01S00020.ver13 +++| CHAA EQU *-2
00289 M01S00021.ver13 +++| CRM CBUF,T4 READ CHANNEL ASSIGNMENT TABLE
00290 M01S00022.ver13 +++| LDM NEJT
00291 M01S00023.ver13 +++| LMM CBUF,T2
00292 M01S00024.ver13 +++| UJN CHAX RETURN
00293 M00S00260.ver +++| CPA SPACE 4,10
00294 M00S00261.ver +++|** CPA - CHECK PARAMETER BLOCK ADDRESS.
00295 M00S00262.ver +++|*
00296 M00S00263.ver +++|* ENTRY (IR+3 - IR+4) = PARAMETER BLOCK ADDRESS.
00297 M00S00264.ver +++|* (PB+3) = WORD COUNT.
00298 M00S00265.ver +++|*
00299 M00S00266.ver +++|* EXIT (A) = ABSOLUTE ADDRESS OF PARAMETER BLOCK.
00300 M00S00267.ver +++|* ABORT IF PARAMETER BLOCK NOT WITHIN FIELD LENGTH.
00301 M00S00268.ver +++|*
00302 M00S00269.ver +++|* MACROS ABORT.
00303 M00S00270.ver +++|
00304 M00S00271.ver +++|
00305 M00S00272.ver +++| CPA2 LDD IR+3 LOAD ABSOLUTE ADDRESS
00306 M00S00273.ver +++| SHN 6
00307 M00S00274.ver +++| ADD RA
00308 M00S00275.ver +++| SHN 6
00309 M00S00276.ver +++| ADD IR+4
00310 M00S00277.ver +++|
00311 M00S00278.ver +++| CPA SUBR ENTRY/EXIT
00312 M00S00279.ver +++| LDD IR+3
00313 M00S00280.ver +++| SCN 37
00314 M00S00281.ver +++| NJN CPA1 IF OUT OF RANGE
00315 M00S00282.ver +++| LDD IR+3
00316 M00S00283.ver +++| SHN 14
00317 M00S00284.ver +++| LMD IR+4
00318 M00S00285.ver +++| ADD PB+3 ADD LENGTH
00319 M00S00286.ver +++| SBN 1
00320 M00S00287.ver +++| SHN -6
00321 M00S00288.ver +++| SBD FL
00322 M00S00289.ver +++| MJN CPA2 IF PARAMETER BLOCK WITHIN FL
00323 M00S00290.ver +++| CPA1 ABORT ERAE * VER - ARGUMENT ERROR.*
00324 M00S00291.ver +++| IBM SPACE 4,10
00325 M00S00292.ver +++|** IBM - ISSUE BINARY MAINTENANCE LOG MESSAGE.
00326 M00S00293.ver +++|*
00327 M00S00294.ver +++|* ENTRY (A) = MESSAGE ID.
00328 M00S00295.ver +++|* (T1) = SYMPTOM CODE.
00329 M00S00296.ver +++|* (CN - CN+4) = DATA WORD.
00330 M00S00297.ver +++|*
00331 M00S00298.ver +++|* USES CM - CM+4.
00332 M00S00299.ver +++|*
00333 M00S00300.ver +++|* CALLS DFM.
00334 M00S00301.ver +++|
00335 M00S00302.ver +++|
00336 M00S00303.ver +++| IBM SUBR ENTRY/EXIT
00337 M00S00304.ver +++| STM IBMA SET MESSAGE ID
00338 M00S00305.ver +++| LDD T1 SET SYMPTOM CODE
00339 M00S00306.ver +++| STM IBMA+1
00340 M00S00307.ver +++| LDD MA MOVE DATA WORD TO BUFFER
00341 M00S00308.ver +++| CWD CN
00342 M00S00309.ver +++| CRM IBMB,ON
00343 M00S00310.ver +++| LDN ZERL
00344 M00S00311.ver +++| CRD CM
00345 M00S00312.ver +++| LDN IBML SET MESSAGE LENGTH
00346 M00S00313.ver +++| STD CM+1
00347 M00S00314.ver +++| LDC IBMA+BMLN ISSUE DAYFILE MESSAGE
00348 M00S00315.ver +++| RJM DFM
00349 M00S00316.ver +++| UJN IBMX RETURN
00350 M00S00317.ver +++|
00351 M00S00318.ver +++|* MESSAGE BUFFER.
00352 M00S00319.ver +++|
00353 M00S00320.ver +++| IBMA VFD 12/0,12/0,36/0 MESSAGE ID, SYMPTOM CODE
00354 M00S00321.ver +++| VFD 60/0 RESERVED
00355 M00S00322.ver +++| IBMB VFD 60/0 MESSAGE
00356 M00S00323.ver +++| IBML EQU *-IBMA
00357 M00S00324.ver +++| LPR SPACE 4,10
00358 M00S00325.ver +++|** LPR - LOAD PP RESIDENT.
00359 M00S00326.ver +++|*
00360 M00S00327.ver +++|* EXIT (PBUF) = COPY OF PP RESIDENT.
00361 M00S00328.ver +++|*
00362 M00S00329.ver +++|* USES DA, DB, T2, T5, T6, T7, CL, CM - CM+4.
00363 M00S00330.ver +++|*
00364 M00S00331.ver +++|* CALLS RNS.
00365 M00S00332.ver +++|*
00366 M00S00333.ver +++|* MACROS ENDMS, MONITOR, SETMS.
00367 M00S00334.ver +++|
00368 M00S00335.ver +++|
00369 M00S00336.ver +++| LPR SUBR ENTRY/EXIT
00370 M00S00337.ver +++| LDC 0L1PR SET *PPR* NAME
00371 M00S00338.ver +++| STD CM+3
00372 M00S00339.ver +++| SHN -14
00373 M00S00340.ver +++| STD CM+2
00374 M00S00341.ver +++| MONITOR SPLM SEARCH PERIPHERAL LIBRARY
00375 M00S00342.ver +++| LDD CM+1 SET EST ORDINAL
00376 M00S00343.ver +++| LPN 77
00377 M00S00344.ver +++| STD T5
00378 M00S00345.ver +++| LDD CM+2 SET TRACK NUMBER
00379 M00S00346.ver +++| STD T6
00380 M00S00347.ver +++| LDD CM+3 SET SECTOR NUMBER
00381 M00S00348.ver +++| STD T7
00382 M00S00349.ver +++| SETMS IO
00383 M00S00350.ver +++| LDC PBUF-2
00384 M00S00351.ver +++| STD CL
00385 M00S00352.ver +++| LPR1 LDI CL SAVE TWO WORDS
00386 M00S00353.ver +++| STD CL+1
00387 M00S00354.ver +++| LDM 1,CL
00388 M00S00355.ver +++| STD CL+2
00389 M00S00356.ver +++| LDD CL
00390 M00S00357.ver +++| RJM RNS READ NEXT SECTOR
00391 M00S00358.ver +++| LDD CL+1 RESTORE TWO WORDS
00392 M00S00359.ver +++| STI CL
00393 M00S00360.ver +++| LDD CL+2
00394 M00S00361.ver +++| STM 1,CL
00395 M00S00362.ver +++| LDC 500 ADVANCE BUFFER ADDRESS
00396 M00S00363.ver +++| RAD CL
00397 M00S00364.ver +++| LDD T1
00398 M00S00365.ver +++| SHN -6
00399 M00S00366.ver +++| NJN LPR1 IF NOT END OF *PPR*
00400 M00S00367.ver +++| ENDMS
00401 M00S00368.ver +++| LJM LPRX RETURN
00402 M00S00369.ver +++| MRER SPACE 4,10
00403 M00S00370.ver +++|** MRER - MAINTENANCE REGISTER ERROR HANDLER.
00404 M00S00371.ver +++|*
00405 M00S00372.ver +++|* ENTRY FATAL MAINTENANCE REGISTER ERROR.
00406 M00S00373.ver +++|* (T7) = CHANNEL NUMBER IF ONE ASSIGNED.
00407 M00S00374.ver +++|* (CHFL) .NE. 0 IF CHANNEL ASSIGNED.
00408 M00S00375.ver +++|*
00409 M00S00376.ver +++|* EXIT TO *ERR* VIA *ABORT* MACRO.
00410 M00S00377.ver +++|* CHANNEL DROPPED AND DISCONNECTED.
00411 M00S00378.ver +++|*
00412 M00S00379.ver +++|* MACROS ABORT, DCHAN.
00413 M00S00380.ver +++|
00414 M00S00381.ver +++|
00415 M00S00382.ver +++| MRER LDM CHFL CHECK CHANNEL ASSIGNED FLAG
00416 M00S00383.ver +++| ZJN MRE1 IF CHANNEL NOT ASSIGNED
00417 M00S00384.ver +++| MREA DCN **+40
00418 M00S00385.ver +++| LDD T7
00419 M00S00386.ver +++| DCHAN DROP CHANNEL
00420 M00S00387.ver +++| MRE1 ABORT ERMR * VER - FATAL MAINTENANCE REGISTER ERROR.*
00421 M00S00388.ver +++| NEC SPACE 4,10
00422 M00S00389.ver +++|** NEC - NORMALIZE EC REGISTER.
00423 M00S00390.ver +++|*
00424 M00S00391.ver +++|* ENTRY (RBUF - RBUF+7) = EC REGISTER.
00425 M00S00392.ver +++|*
00426 M00S00393.ver +++|* EXIT (RBUF - RBUF+7) = NORMALIZED EC REGISTER.
00427 M00S00394.ver +++|* NORMALIZED EC REGISTER REWRITTEN.
00428 M00S00395.ver +++|* BITS 34-39, 43-47, 51-55, 58 = 0.
00429 M00S00396.ver +++|* ALL OTHER BITS ARE UNCHANGED.
00430 M00S00397.ver +++|*
00431 M00S00398.ver +++|* MACROS WRITMR.
00432 M00S00399.ver +++|
00433 M00S00400.ver +++|
00434 M00S00401.ver +++| NEC SUBR ENTRY/EXIT
00435 M00S00402.ver +++| LDM RBUF+4 CLEAR BITS 34-39
00436 M00S00403.ver +++| NECA SCN 37
00437 M00S00404.ver +++|* SCN 77 (IF IOU MODEL I2)
00438 M00S00405.ver +++| STM RBUF+4
00439 M00S00406.ver +++| LDM RBUF+5 CLEAR BITS 43-47
00440 M00S00407.ver +++| SCN 37
00441 M00S00408.ver +++| STM RBUF+5
00442 M00S00409.ver +++| LDM RBUF+6 CLEAR BITS 51-55
00443 M00S00410.ver +++| SCN 37
00444 M00S00411.ver +++| STM RBUF+6
00445 M00S00412.ver +++| LDM RBUF+7 CLEAR BIT 58
00446 M00S00413.ver +++| SCN 40
00447 M00S00414.ver +++| STM RBUF+7
00448 M00S00415.ver +++| WRITMR RBUF,,DEMR UPDATE EC REGISTER
00449 M00S00416.ver +++| LJM NECX RETURN
00450 M00S00417.ver +++| SDC SPACE 4,10
00451 M00S00418.ver +++|** SDC - SELECT DEADSTART CHANNEL.
00452 M00S00419.ver +++|*
00453 M00S00420.ver +++|* EXIT (T7) = CHANNEL NUMBER.
00454 M00S00421.ver +++|* (CHFL) = CHANNEL FLAG SET.
00455 M00S00422.ver +++|*
Line S00423 Modification History
M01 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
00456 M01S00423.252l678 ---|* USES T1, CM - CM+4.
Line S00001 Modification History
M01 (Added by) 252l678
Seq # *Modification Id* Act
----------------------------+
00457 M01S00001.252l678 +++|* USES T0, T1, CM - CM+4.
00458 M00S00424.ver +++|*
00459 M00S00425.ver +++|* MACROS RCHAN, SFA.
00460 M00S00426.ver +++|
00461 M00S00427.ver +++|
00462 M00S00428.ver +++| SDC SUBR ENTRY/EXIT
00463 M00S00429.ver +++| SDC1 LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH
00464 M00S00430.ver +++| STD T1
00465 M00S00431.ver +++| SDC2 AOD T1 ADVANCE EST ORDINAL
00466 M00S00432.ver +++| LMD LE
00467 M00S00433.ver +++| ZJN SDC1 IF NO CHANNEL FOUND
00468 M00S00434.ver +++| SFA EST,T1 READ EST ENTRY
00469 M00S00435.ver +++| ADK EQDE
00470 M00S00436.ver +++| CRD CM
00471 M00S00437.ver +++| LDD CM
00472 M00S00438.ver +++| SHN 21-13
00473 M00S00439.ver +++| PJN SDC2 IF NOT MASS STORAGE DEVICE
00474 M00S00440.ver +++| LDD CM+3 CHECK IF ECS ENTRY
Line S00441 Modification History
M01 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
00475 M01S00441.252l678 ---| LPC 3777
00476 M00S00442.ver +++| LMC 2RDE
00477 M00S00443.ver +++| ZJN SDC2 IF ECS ENTRY
Line S00444 Modification History
M01 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
00478 M01S00444.252l678 ---| LDD CM+1 CHECK IF CHANNEL DOWN
00479 M01S00445.252l678 ---| SHN 21-5
00480 M01S00446.252l678 ---| PJN SDC3 IF CHANNEL NOT DOWN
00481 M01S00447.252l678 ---| LPN 37
00482 M01S00448.252l678 ---| ZJN SDC2 IF NO ALTERNATE CHANNEL
00483 M01S00449.252l678 ---| LDD CM+1 CHECK IF ALTERNATE CHANNEL DOWN
00484 M01S00450.252l678 ---| SHN 21-13
00485 M01S00451.252l678 ---| MJN SDC2 IF ALTERNATE CHANNEL DOWN
00486 M01S00452.252l678 ---| SDC3 SHN -14
Line S00002 Modification History
M01 (Added by) 252l678
Seq # *Modification Id* Act
----------------------------+
00487 M01S00002.252l678 +++| LDN CM
00488 M01S00003.252l678 +++| STD T0
00489 M01S00004.252l678 +++| SDC3 AOD T0
00490 M01S00005.252l678 +++| LMN CM+3
00491 M01S00006.252l678 +++| ZJN SDC2 IF BOTH CHANNELS CHECKED
00492 M01S00007.252l678 +++| LDI T0
00493 M01S00008.252l678 +++| SHN 0-12
00494 M01S00009.252l678 +++| LMN 2
00495 M01S00010.252l678 +++| NJN SDC3 IF CHANNEL NOT PRESENT OR DISABLED
00496 M01S00011.252l678 +++| LDI T0
00497 M01S00012.252l678 +++| SHN 21-5
00498 M01S00013.252l678 +++| MJN SDC3 IF CONCURRENT CHANNEL
00499 M01S00014.252l678 +++| SHN 5-21
00500 M00S00453.ver +++| STD T7
00501 M00S00454.ver +++| RCHAN RESERVE CHANNEL
00502 M00S00455.ver +++| AOM CHFL SET CHANNEL RESERVED FLAG
00503 M00S00456.ver +++| LJM SDCX RETURN
00504 M00S00457.ver +++| SEA SPACE 4,10
00505 M00S00458.ver +++|** SEA - SET *EICB* ADDRESS.
00506 M00S00459.ver +++|*
00507 M00S00460.ver +++|* EXIT (A) = *EICB* ADDRESS.
00508 M00S00461.ver +++|
00509 M00S00462.ver +++|
00510 M00S00463.ver +++| SEA SUBR ENTRY/EXIT
00511 M00S00464.ver +++| SEAA LDC ** (FWA OF *EICB*)
00512 M00S00465.ver +++| UJN SEAX RETURN
Line S00025 Modification History
M01 (Added by) ver13
Seq # *Modification Id* Act
----------------------------+
00513 M01S00025.ver13 +++| VRC SPACE 4,15
00514 M01S00026.ver13 +++|** VRC - VE RESERVE CHANNEL.
00515 M01S00027.ver13 +++|*
00516 M01S00028.ver13 +++|* ENTRY (T2) = CHANNEL NUMBER.
00517 M01S00029.ver13 +++|*
00518 M01S00030.ver13 +++|* EXIT (T4) = 0 IF CHANNEL PREVIOUSLY NOS/VE RESERVED.
00519 M01S00031.ver13 +++|* (CM+1) = NONZERO VALUE IF CHANNEL ASSIGNED.
00520 M01S00032.ver13 +++|* NIO CHANNEL DISCONNECTED IF ASSIGNED.
00521 M01S00033.ver13 +++|*
00522 M01S00034.ver13 +++|* USES T4, CM - CM+4.
00523 M01S00035.ver13 +++|*
00524 M01S00036.ver13 +++|* CALLS CHA.
00525 M01S00037.ver13 +++|*
00526 M01S00038.ver13 +++|* MACROS MONITOR.
00527 M01S00039.ver13 +++|
00528 M01S00040.ver13 +++|
00529 M01S00041.ver13 +++| VRC1 STD T4 INDICATE ALREADY NOS/VE RESERVED
00530 M01S00042.ver13 +++|
00531 M01S00043.ver13 +++| VRC SUBR ENTRY/EXIT
00532 M01S00044.ver13 +++| RJM CHA CHECK CHANNEL ASSIGNMENT
00533 M01S00045.ver13 +++| ZJN VRC1 IF CHANNEL ALREADY NOS/VE RESERVED
00534 M01S00046.ver13 +++| LDD T2 SET CHANNEL NUMBER
00535 M01S00047.ver13 +++| STD CM+3
00536 M01S00048.ver13 +++| LDM NEJT SET ALTERNATE EJT ORDINAL
00537 M01S00049.ver13 +++| STD CM+4
00538 M01S00050.ver13 +++| LDC 4001 SET DUMMY EST ORDINAL
00539 M01S00051.ver13 +++| STD CM+1
00540 M01S00052.ver13 +++| LDN ICNS SET SUBFUNCTION
00541 M01S00053.ver13 +++| STD CM+2
00542 M01S00054.ver13 +++| MONITOR SEQM REQUEST CHANNEL
00543 M01S00055.ver13 +++| LDD CM+1
00544 M01S00056.ver13 +++| ZJP VRCX IF CHANNEL NOT AVAILABLE
00545 M01S00057.ver13 +++| LDD T2
00546 M01S00058.ver13 +++| LPN 40
00547 M01S00059.ver13 +++| NJP VRCX IF CONCURRENT CHANNEL
00548 M01S00060.ver13 +++| LDC DCNI+40 DISCONNECT CHANNEL
00549 M01S00061.ver13 +++| ADD T2
00550 M01S00062.ver13 +++| STM VRCA
00551 M01S00063.ver13 +++| VRCA DCN **+40
00552 M01S00064.ver13 +++| UJP VRCX RETURN
00553 M01S00065.ver13 +++| VTC SPACE 4,10
00554 M01S00066.ver13 +++|** VTC - VE RETURN CHANNEL.
00555 M01S00067.ver13 +++|*
00556 M01S00068.ver13 +++|* ENTRY (T2) = CHANNEL NUMBER.
00557 M01S00069.ver13 +++|*
00558 M01S00070.ver13 +++|* EXIT (A) = 0.
00559 M01S00071.ver13 +++|* CHANNEL RETURNED.
00560 M01S00072.ver13 +++|*
00561 M01S00073.ver13 +++|* USES CM - CM+4.
00562 M01S00074.ver13 +++|*
00563 M01S00075.ver13 +++|* MACROS MONITOR.
00564 M01S00076.ver13 +++|
00565 M01S00077.ver13 +++|
00566 M01S00078.ver13 +++| VTC SUBR ENTRY/EXIT
00567 M01S00079.ver13 +++| LDD T2 SET CHANNEL NUMBER
00568 M01S00080.ver13 +++| STD CM+3
00569 M01S00081.ver13 +++| LDM NEJT SET ALTERNATE EJT ORDINAL
00570 M01S00082.ver13 +++| STD CM+4
00571 M01S00083.ver13 +++| LDC 4001 SET DUMMY EST ORDINAL
00572 M01S00084.ver13 +++| STD CM+1
00573 M01S00085.ver13 +++| LDN CCNS SET SUBFUNCTION
00574 M01S00086.ver13 +++| STD CM+2
00575 M01S00087.ver13 +++| MONITOR SEQM RETURN CHANNEL
00576 M01S00088.ver13 +++|* LDN 0
00577 M01S00089.ver13 +++| UJN VTCX RETURN
00578 M00S00466.ver +++| OVLA SPACE 4,10
00579 M00S00467.ver +++|* DEFINE ORIGIN FOR OVERLAY *2VR*.
00580 M00S00468.ver +++|
00581 M00S00469.ver +++| OVLA EQU *+5
00582 M00S00470.ver +++| TITLE FUNCTION PROCESSORS.
00583 M00S00471.ver +++| RCM SPACE 4,15
00584 M00S00472.ver +++|** FUNCTION 0 - RSCM - RESERVE CM.
00585 M00S00473.ver +++|*
00586 M00S00474.ver +++|* ENTRY (EIBA - EIBA+1) = *EICB* ADDRESS.
00587 M00S00475.ver +++|* (PB LIST ENTRY) = 42/0, 18/CM WORDS/1000B REQUESTED.
00588 M00S00476.ver +++|*
00589 M00S00477.ver +++|* EXIT WORD *D7CM+1* OF *EICB* AND PB LIST ENTRY+1 =
00590 M00S00478.ver +++|* 12/0, 24/FWA/1000B, 24/LWA+1/1000B.
00591 M00S00479.ver +++|* (PB LIST ENTRY) = 42/0, 18/CM WORDS/1000B REQUESTED
00592 M00S00480.ver +++|* ROUNDED UP TO THE NEAREST 2000B BOUNDARY.
00593 M00S00481.ver +++|* MACHINE FL ADJUSTED TO REFLECT NEW TOTAL FOR NOS.
00594 M00S00482.ver +++|* (PB+4) = ERROR STATUS.
00595 M00S00483.ver +++|* BML MESSAGE ISSUED.
00596 M00S00484.ver +++|*
Line S00485 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00597 M01S00485.ns2633 ---|* USES PB+4, T6, T7, CL - CL+4, CM+3 - CM+4.
Line S00001 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
00598 M01S00001.ns2633 +++|* USES PB+4, T6, T7, CL - CL+4, CM+3 - CM+4, T1 - T1+4.
00599 M00S00486.ver +++|*
00600 M00S00487.ver +++|* CALLS CMS, CPA, CRZ, GCC, IBM, RST, SBA, SDA.
00601 M00S00488.ver +++|
00602 M00S00489.ver +++|
00603 M00S00490.ver +++| RCM SUBR ENTRY/EXIT
00604 M00S00491.ver +++| LDD PB+3 CHECK PARAMETER BLOCK LENGTH
00605 M00S00492.ver +++| SBN 2
00606 M00S00493.ver +++| PJN RCM1 IF LENGTH LONG ENOUGH
00607 M00S00494.ver +++| LDC ESIL SET INSUFFICIENT LENGTH STATUS
00608 M00S00495.ver +++| LJM RCM5 RETURN
00609 M00S00496.ver +++|
00610 M00S00497.ver +++| RCM1 RJM CPA GET NUMBER OF CM WORDS REQUESTED
00611 M00S00498.ver +++| ADN 1
00612 M00S00499.ver +++| CRD CL
00613 M00S00500.ver +++| LDD CL+4 CHECK REQUEST
00614 M00S00501.ver +++| LPN 1
00615 M00S00502.ver +++| ZJN RCM1.1 IF REQUEST EVEN
00616 M00S00503.ver +++| AOD CL+4 ROUND UP TO NEAREST 2000B BOUNDARY
00617 M00S00504.ver +++| SHN -14
00618 M00S00505.ver +++| RAD CL+3 ADD CARRY
00619 M00S00506.ver +++| RCM1.1 LDD CL+3
00620 M00S00507.ver +++| STD T6
Line S00508 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00621 M01S00508.ns2633 ---| SHN 14
00622 M01S00509.ns2633 ---| LMD CL+4
Line S00002 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
00623 M01S00002.ns2633 +++| LDD CL+4
00624 M00S00510.ver +++| STD T7
Line S00511 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00625 M01S00511.ns2633 ---| SHN -17
00626 M01S00512.ns2633 ---| NJN RCM1.2 IF REQUEST .GE. 128 MEGABYTES
00627 M00S00513.ver +++| RJM GCC GET CURRENT NOS/VE SIZE
Line S00514 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00628 M01S00514.ns2633 ---| STD CM+4
00629 M01S00515.ns2633 ---| SHN -14
00630 M01S00516.ns2633 ---| STD CM+3
00631 M00S00517.ver +++| RJM CRZ CHECK REQUEST SIZE
Line S00518 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00632 M01S00518.ns2633 ---| MJN RCM4 IF ILLEGAL REQUEST
00633 M01S00519.ns2633 ---| NJN RCM2 IF REQUEST SATISFIED BY RESERVED BLOCK
Line S00003 Modification History
M01 (Added by) ns2633
M02 (Removed by) ns2709
Seq # *Modification Id* Act
----------------------------+
00634 M02S00003.ns2709 ---| PJN RCM2 IF REQUEST SATISFIED BY RESERVED BLOCK
Line S00001 Modification History
M01 (Added by) ns2709
Seq # *Modification Id* Act
----------------------------+
00635 M01S00001.ns2709 +++| PJN RCM2.1 IF REQUEST SATISFIED BY RESERVED BLOCK
00636 M00S00520.ver +++| LDC UEML CHECK FOR UEM PRESENT
00637 M00S00521.ver +++| CRD T1
00638 M00S00522.ver +++| LDD T1+4
00639 M00S00523.ver +++| LPN 2
00640 M00S00524.ver +++| ZJN RCM6 IF UEM NOT PRESENT
Line S00525 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00641 M01S00525.ns2633 ---| RCM1.2 UJN RCM4 SET NOT AVAILABLE
Line S00004 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
00642 M01S00004.ns2633 +++| UJN RCM4 SET NOT AVAILABLE
00643 M00S00526.ver +++|
00644 M00S00527.ver +++| RCM2 RJM SBA SET BOUNDS ADDRESS
Line S00528 Modification History
M01 (Removed by) ns2709
Seq # *Modification Id* Act
----------------------------+
00645 M01S00528.ns2709 ---| RJM SDA SET *EICB* CM ADDRESSES
Line S00002 Modification History
M01 (Added by) ns2709
Seq # *Modification Id* Act
----------------------------+
00646 M01S00002.ns2709 +++| RCM2.1 RJM SDA SET *EICB* CM ADDRESSES
00647 M00S00529.ver +++| LDN 0 SET REPLY WORD
00648 M00S00530.ver +++| STD CL
00649 M00S00531.ver +++| STD CL+1
00650 M00S00532.ver +++| RJM CPA SET REPLY
00651 M00S00533.ver +++| ADN 1
00652 M00S00534.ver +++| CWD CL
00653 M00S00535.ver +++| ADN 1
00654 M00S00536.ver +++| CWD CN
00655 M00S00537.ver +++| LDC /COMSDFS/HS0110 SET SYMPTOM CODE
00656 M00S00538.ver +++| STD T1
00657 M00S00539.ver +++| LDC /COMSDFS/HM0240 SET MESSAGE ID
00658 M00S00540.ver +++| RJM IBM ISSUE BML MESSAGE
00659 M00S00541.ver +++| RCM3 LJM RCMX RETURN
00660 M00S00542.ver +++|
00661 M00S00543.ver +++| RCM4 LDN ESCM SET CM NOT AVAILABLE STATUS
00662 M00S00544.ver +++| RCM5 STD PB+4
00663 M00S00545.ver +++| UJN RCM3 RETURN
00664 M00S00546.ver +++|
00665 M00S00547.ver +++|* DYNAMIC CASE. (UEM NOT PRESENT).
00666 M00S00548.ver +++|
00667 M00S00549.ver +++|* DETERMINE IF BLOCK IS ALREADY COMPLETELY USED.
00668 M00S00550.ver +++|* COMPARE CURRENT NOS/VE MEMORY TO RESERVED BLOCK SIZE.
00669 M00S00551.ver +++|
Line S00552 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00670 M01S00552.ns2633 ---| RCM6 LDD CN+3
00671 M01S00553.ns2633 ---| SBD CM+3
00672 M01S00554.ns2633 ---| MJN RCM7 IF ALREADY USING MORE THAN BLOCK
00673 M01S00555.ns2633 ---| SHN 14
00674 M01S00556.ns2633 ---| LMD CN+4
Line S00005 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
00675 M01S00005.ns2633 +++| RCM6 LDD CM+3
00676 M01S00006.ns2633 +++| STD T1
00677 M01S00007.ns2633 +++| LDD CN+4
00678 M00S00557.ver +++| SBD CM+4
Line S00008 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
00679 M01S00008.ns2633 +++| PJN RCM6.1 IF NO BORROW
00680 M01S00009.ns2633 +++| AOD T1 ADJUST FOR BORROW
00681 M01S00010.ns2633 +++| RCM6.1 LDD CN+3
00682 M01S00011.ns2633 +++| SBD T1
00683 M00S00558.ver +++| MJN RCM7 IF ALREADY USING MORE THAN BLOCK
00684 M00S00559.ver +++|
00685 M00S00560.ver +++|* SET AMOUNT TO REQUEST DYNAMICALLY.
00686 M00S00561.ver +++|* (REQUEST + CURRENT SIZE - BLOCK SIZE).
00687 M00S00562.ver +++|
Line S00563 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00688 M01S00563.ns2633 ---| LDD CL+3
00689 M01S00564.ns2633 ---| ADD CM+3
00690 M01S00565.ns2633 ---| SBD CN+3
00691 M01S00566.ns2633 ---| SHN 14
00692 M01S00567.ns2633 ---| LMD CL+4
Line S00012 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
00693 M01S00012.ns2633 +++| LDD CN+3
00694 M01S00013.ns2633 +++| STD T1
00695 M01S00014.ns2633 +++| LDD CL+4
00696 M00S00568.ver +++| ADD CM+4
00697 M00S00569.ver +++| SBD CN+4
00698 M00S00570.ver +++| STD T7
Line S00571 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
00699 M01S00571.ns2633 ---| SHN -14
Line S00015 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
00700 M01S00015.ns2633 +++| PJN RCM6.2 IF NO BORROW
00701 M01S00016.ns2633 +++| AOD T1 ADJUST FOR BORROW
00702 M01S00017.ns2633 +++| AOD T7
00703 M01S00018.ns2633 +++| LDN 0
00704 M01S00019.ns2633 +++| RCM6.2 SHN -14
00705 M01S00020.ns2633 +++| ADD CL+3
00706 M01S00021.ns2633 +++| ADD CM+3
00707 M01S00022.ns2633 +++| SBD T1
00708 M00S00572.ver +++| STD T6
00709 M00S00573.ver +++| RCM7 RJM CMS CHECK MEMORY SIZE
00710 M00S00574.ver +++| MJN RCM4 IF NOT ENOUGH LEFT
00711 M00S00575.ver +++| LDD T6 SAVE TOTAL REQUEST
00712 M00S00576.ver +++| STM RCMA
00713 M00S00577.ver +++| LDD T7
00714 M00S00578.ver +++| STM RCMA+1
00715 M00S00579.ver +++| LDN 0 SET REQUEST FUNCTION
00716 M00S00580.ver +++| RJM RST REQUEST MEMORY
00717 M00S00581.ver +++| NJN RCM8 IF TOTAL REQUEST NOT AVAILABLE
00718 M00S00582.ver +++| LJM RCM2 SET *EICB* AND REPLY
00719 M00S00583.ver +++|
00720 M00S00584.ver +++|* RETURN MEMORY ALREADY ASSIGNED.
00721 M00S00585.ver +++|
00722 M00S00586.ver +++| RCM8 STD T7
00723 M00S00587.ver +++| SHN -14
00724 M00S00588.ver +++| STD T6
00725 M00S00589.ver +++| LDM RCMA
00726 M00S00590.ver +++| SBD T6
00727 M00S00591.ver +++| SHN 14
00728 M00S00592.ver +++| LMM RCMA+1
00729 M00S00593.ver +++| SBD T7
00730 M00S00594.ver +++| STD T7
00731 M00S00595.ver +++| SHN -14
00732 M00S00596.ver +++| STD T6
Line S00597 Modification History
M01 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
00733 M01S00597.271l716 ---| LDC 4000 RETURN MEMORY
Line S00009 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
00734 M01S00009.271l716 +++| LDD HN RETURN MEMORY
00735 M00S00598.ver +++| RJM RST
00736 M00S00599.ver +++| LJM RCM4 SET NOT AVAILABLE STATUS
00737 M00S00600.ver +++|
00738 M00S00601.ver +++| RCMA CON 0,0 TOTAL DYNAMIC MEMORY REQUEST
00739 M00S00602.ver +++| RPP SPACE 4,15
00740 M00S00603.ver +++|** FUNCTION 1 - RSPP - RESERVE PP-S.
00741 M00S00604.ver +++|*
00742 M00S00605.ver +++|* ON 20 PP 810/830 CONFIGURATIONS, PP-S MUST BE ASSIGNED
00743 M00S00606.ver +++|* TO NOS/VE IN PARTNER PAIRS. IF NOS/VE REQUESTS AN ODD
00744 M00S00607.ver +++|* NUMBER OF PP-S OR RETURNS ONE MEMBER OF A PARTNER PAIR,
00745 M00S00608.ver +++|* THE EXTRA PP MUST NOT BE USED BY NOS, BUT NOS/VE MUST
00746 M00S00609.ver +++|* NOT KNOW ABOUT IT EITHER. THESE PP-S ARE CALLED PSEUDO-
00747 M00S00610.ver +++|* ASSIGNED. AS FAR AS NOS IS CONCERNED, THEY ARE IN AN
00748 M00S00611.ver +++|* IDENTICAL STATUS AS OTHERS ASSIGNED TO NOS/VE. THEIR
00749 M00S00612.ver +++|* INPUT REGISTERS CONTAIN *VP AND THEY ARE IDLE AND MARKED
00750 M00S00613.ver +++|* AS UPPER PP-S IN THE OS BOUNDS REGISTER. THE ONLY
00751 M00S00614.ver +++|* DISTINCTION IS THAT BYTE 4 OF THE INPUT REGISTER IS ZERO
00752 M00S00615.ver +++|* FOR PP-S THAT ARE ACTUALLY ASSIGNED, AND NON-ZERO FOR
00753 M00S00616.ver +++|* THOSE THAT ARE PSEUDO-ASSIGNED. IN ORDER TO ASSIGN THEM
00754 M00S00617.ver +++|* TO NOS/VE ALL THAT MUST BE DONE IS TO CLEAR BYTE 4 OF THE
00755 M00S00618.ver +++|* INPUT REGISTER AND ENTER THE PP NUMBER IN THE REPLY BLOCK
00756 M00S00619.ver +++|* FOR A REQUEST PP FUNCTION.
00757 M00S00620.ver +++|*
00758 M00S00621.ver +++|* EXIT (PB LIST ENTRY) = 6/PP NUMBER, 54/0.
00759 M00S00622.ver +++|* = 6/77B, 42/0, 12/ERROR CODE
00760 M00S00623.ver +++|* IF PP UNAVAILABLE.
00761 M00S00624.ver +++|* (PB+4) = ERROR STATUS.
00762 M00S00625.ver +++|* BML MESSAGE ISSUED.
00763 M00S00626.ver +++|*
00764 M00S00627.ver +++|* USES DA, DB, DC, EC, LO, PB+4, T3, T6, CL - CL+4,
00765 M00S00628.ver +++|* CM - CM+4, CN - CN+4.
00766 M00S00629.ver +++|*
00767 M00S00630.ver +++|* CALLS ARC, CPA, GCP, IBM, IPP, SPB.
00768 M00S00631.ver +++|*
00769 M00S00632.ver +++|* MACROS DELAY, EXECUTE, MONITOR, PAUSE.
00770 M00S00633.ver +++|
00771 M00S00634.ver +++|
00772 M00S00635.ver +++| RPP SUBR ENTRY/EXIT
00773 M00S00636.ver +++| LDN ZERL INITIALIZE RESPONSE LIST ENTRY
00774 M00S00637.ver +++| CRD CL
00775 M00S00638.ver +++| LDN 1 INITIALIZE LIST OFFSET
00776 M00S00639.ver +++| STD LO
00777 M00S00640.ver +++| LDD PB+3 GET NUMBER REQUESTED
00778 M00S00641.ver +++| ZJN RPPX IF NONE REQUESTED
00779 M00S00642.ver +++| STD T6
00780 M00S00643.ver +++| RJM GCP GET CURRENT STATUS OF PP-S
00781 M00S00644.ver +++| RJM ARC ADJUST REQUEST COUNT
00782 M00S00645.ver +++| LDD T6
00783 M00S00646.ver +++| ZJN RPPX IF REQUEST SATISFIED
00784 M00S00647.ver +++| LDD CM+2 TOTAL PP-S IN SYSTEM
00785 M00S00648.ver +++| SBD T6
00786 M00S00649.ver +++| SBD T5
00787 M00S00650.ver +++| SBN MINP
00788 M00S00651.ver +++| PJN RPP1 IF ENOUGH LEFT FOR NOS
00789 M00S00652.ver +++| RAD T6 SET NUMBER OF PP-S AVAILABLE TO NOS/VE
00790 M00S00653.ver +++| MJN RPP0 IF NONE AVAILABLE
00791 M00S00654.ver +++| NJN RPP1 IF NOS/VE DOES NOT ALREADY HAVE MAXIMUM
00792 M00S00655.ver +++| RPP0 UJN RPP2.2 SET PP NOT AVAILABLE STATUS
00793 M00S00656.ver +++|
00794 M00S00657.ver +++|* REQUEST PP FOR *1VP*.
00795 M00S00658.ver +++|
00796 M00S00659.ver +++| RPP1 LDD MA SET INPUT REGISTER
00797 M00S00660.ver +++| CWM RPPA,ON
00798 M00S00661.ver +++| EXECUTE 1VP,=
00799 M00S00662.ver +++| LDN 5 INITIALIZE ATTEMPT COUNT
00800 M00S00663.ver +++| STD DC
00801 M00S00664.ver +++| RPP2 LDN ZERL
00802 M00S00665.ver +++| CRD CM
00803 M00S00666.ver +++| LDD CF
00804 M00S00667.ver +++| ZJN RPP2.1 IF NOT 810/830 WITH 20 PP-S
00805 M00S00668.ver +++| LDN 4 SET PARTNER PAIR FLAG
00806 M00S00669.ver +++| RPP2.1 LMN 1 SET PRIORITY REQUEST
00807 M00S00670.ver +++| STD CM+1
00808 M00S00671.ver +++| MONITOR RPPM REQUEST PP
00809 M00S00672.ver +++| LDD CM+1
00810 M00S00673.ver +++| NJN RPP3 IF PP AVAILABLE
00811 M00S00674.ver +++| PAUSE NE
00812 M00S00675.ver +++| DELAY
00813 M00S00676.ver +++| SOD DC DECREMENT ATTEMPT COUNT
00814 M00S00677.ver +++| NJN RPP2 IF ANOTHER ATTEMPT TO BE MADE
00815 M00S00678.ver +++| RPP2.2 LJM RPP6 SET PP NOT AVAILABLE STATUS
00816 M00S00679.ver +++|
00817 M00S00680.ver +++| RPP3 STD T3 SAVE INPUT REGISTER ADDRESS
00818 M00S00681.ver +++| LDD CM+2 SAVE SECOND INPUT REGISTER ADDRESS
00819 M00S00682.ver +++| STD DA
00820 M00S00683.ver +++| RPP4 LDD T3 GET INPUT REGISTER OF *1VP*
00821 M00S00684.ver +++| CRD CM
00822 M00S00685.ver +++| LDD CM
00823 M00S00686.ver +++| LMC 2R*V
00824 M00S00687.ver +++| ZJN RPP4.0 IF *1VP* READY
00825 M00S00688.ver +++| PAUSE NE
00826 M00S00689.ver +++| DELAY
00827 M00S00690.ver +++| UJN RPP4 RECHECK CALL
00828 M00S00691.ver +++|
00829 M00S00692.ver +++|RPP4.0 RJM IPP IDLE PP
00830 M00S00693.ver +++| MJN RPP4.1 IF PP NOT IDLED
00831 M00S00694.ver +++| LDD T5
00832 M00S00695.ver +++| RJM SPB SET UPPER PP BIT
00833 M00S00696.ver +++| LDC /COMSDFS/HS0112 SET SYMPTOM CODE
00834 M00S00697.ver +++| STD T1
00835 M00S00698.ver +++| LDN ZERL CLEAR DATA WORD
00836 M00S00699.ver +++| CRD CN
00837 M00S00700.ver +++| LDD T5 SET PP NUMBER
00838 M00S00701.ver +++| STD CN+4
00839 M00S00702.ver +++| LDC /COMSDFS/HM0240 SET MESSAGE ID
00840 M00S00703.ver +++| RJM IBM ISSUE BML MESSAGE
00841 M00S00704.ver +++| LDD DB
00842 M00S00705.ver +++| NJN RPP4.2 IF PSEUDO-ASSIGNMENT
00843 M00S00706.ver +++| LDD T5 SET PP NUMBER
00844 M00S00707.ver +++| SHN 6
00845 M00S00708.ver +++| STD CL
00846 M00S00709.ver +++| RJM CPA WRITE PARAMETER LIST ENTRY
00847 M00S00710.ver +++| ADD LO
00848 M00S00711.ver +++| CWD CL
00849 M00S00712.ver +++| AOD LO INCREMENT LIST OFFSET
00850 M00S00713.ver +++| RPP4.1 UJN RPP5 CHECK IF REQUEST SATISFIED
00851 M00S00714.ver +++|
00852 M00S00715.ver +++| RPP4.2 LDN 0 CLEAR PSEUDO-ASSIGNMENT NEEDED
00853 M00S00716.ver +++| STD DB
00854 M00S00717.ver +++| LDD T3 SET PSEUDO-ASSIGNED STATUS IN *IR*
00855 M00S00718.ver +++| CRD CM
00856 M00S00719.ver +++| AOD CM+4
00857 M00S00720.ver +++| LDD T3
00858 M00S00721.ver +++| CWD CM
00859 M00S00722.ver +++| RPP5 SOD T6
00860 M00S00723.ver +++| ZJN RPP6 IF REQUEST SATISFIED
00861 M00S00724.ver +++| LDD DA
00862 M00S00725.ver +++| STD T3
00863 M00S00726.ver +++| ZJP RPP1 IF NO SECOND PP ASSIGNED
00864 M00S00727.ver +++| LDN 0 CLEAR SECOND PP ASSIGNED
00865 M00S00728.ver +++| STD DA
00866 M00S00729.ver +++| UJP RPP4 PROCESS SECOND PP
00867 M00S00730.ver +++|
00868 M00S00731.ver +++|* SET ERROR STATUS IN ALL REMAINING LIST ENTRIES.
00869 M00S00732.ver +++|
00870 M00S00733.ver +++| RPP6 LDD LO
00871 M00S00734.ver +++| RPP7 SBD PB+3
00872 M00S00735.ver +++| SBN 1
00873 M00S00736.ver +++| PJN RPP8 IF END OF PARAMETER BLOCK LIST
00874 M00S00737.ver +++| LDN ESPP SET PP NOT AVAILABLE STATUS
00875 M00S00738.ver +++| STD PB+4
00876 M00S00739.ver +++| STD CL+4
00877 M00S00740.ver +++| LDC 7700 SET ERROR RESPONSE
00878 M00S00741.ver +++| STD CL
00879 M00S00742.ver +++| RJM CPA WRITE PARAMETER LIST ENTRY
00880 M00S00743.ver +++| ADD LO
00881 M00S00744.ver +++| CWD CL
00882 M00S00745.ver +++| AOD LO INCREMENT LIST OFFSET
00883 M00S00746.ver +++| UJN RPP7 CHECK FOR ANOTHER ENTRY
00884 M00S00747.ver +++|
00885 M00S00748.ver +++| RPP8 LJM RPPX RETURN
00886 M00S00749.ver +++|
00887 M00S00750.ver +++| RPPA VFD 18/0L1VP,42/0 *1VP* INPUT REGISTER
00888 M00S00751.ver +++| RCL SPACE 4,10
00889 M00S00752.ver +++|** FUNCTION 2 - RSCH - RESERVE CHANNELS.
00890 M00S00753.ver +++|*
00891 M00S00754.ver +++|* ENTRY (PB LIST ENTRY) = 6/CH, 54/0.
00892 M00S00755.ver +++|*
00893 M00S00756.ver +++|* EXIT (PB+4) = ERROR STATUS.
00894 M00S00757.ver +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR CODE.
00895 M00S00758.ver +++|*
00896 M00S00759.ver +++|* USES LO, T2, CL - CL+4.
00897 M00S00760.ver +++|*
00898 M00S00761.ver +++|* CALLS CPA, DCA.
00899 M00S00762.ver +++|
00900 M00S00763.ver +++|
00901 M00S00764.ver +++| RCL7 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
00902 M00S00765.ver +++| STD PB+4
00903 M00S00766.ver +++|
00904 M00S00767.ver +++| RCL SUBR ENTRY/EXIT
00905 M00S00768.ver +++| LDD PB+3 CHECK BLOCK LENGTH
00906 M00S00769.ver +++| ZJN RCLX IF NONE REQUESTED
00907 M00S00770.ver +++| SBN NCTAL*5+1
00908 M00S00771.ver +++| PJN RCL7 IF TOO MANY CHANNELS REQUESTED
00909 M00S00772.ver +++| LDN NCTAL
00910 M00S00773.ver +++| STD T2
00911 M00S00774.ver +++| LDC ** FWA CHANNEL STATUS TABLE
00912 M00S00775.ver +++| RCLA EQU *-2
00913 M00S00776.ver +++| CRM RBUF,T2
00914 M00S00777.ver +++| LDN 1 INITIALIZE LIST OFFSET
00915 M00S00778.ver +++| STD LO
00916 M00S00779.ver +++| RCL1 RJM CPA READ NEXT CHANNEL NUMBER
00917 M00S00780.ver +++| ADD LO
00918 M00S00781.ver +++| CRD CL
00919 M00S00782.ver +++| LDN 0 CLEAR ERROR FLAG
00920 M00S00783.ver +++| STD CL+4
00921 M00S00784.ver +++| LDD CL
00922 M00S00785.ver +++| SHN -6
00923 M00S00786.ver +++| STD T2
00924 M00S00787.ver +++| SBN MXNC+1
00925 M00S00788.ver +++| MJN RCL2 IF VALID CHANNEL NUMBER
00926 M00S00789.ver +++| LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
00927 M00S00790.ver +++| UJN RCL3 WRITE PARAMETER LIST ENTRY
00928 M00S00791.ver +++|
00929 M00S00792.ver +++| RCL2 RJM DCA DETERMINE CHANNEL AVAILABILITY
00930 M00S00793.ver +++| ZJN RCL4 IF CHANNEL WAS PREVIOUSLY NOS/VE RESERVED
00931 M00S00794.ver +++| LDD CM+1
00932 M00S00795.ver +++| NJN RCL4 IF CHANNEL ASSIGNED
00933 M00S00796.ver +++| LDN ESCH SET CHANNEL NOT AVAILABLE STATUS
00934 M00S00797.ver +++| RCL3 STD PB+4
00935 M00S00798.ver +++| STD CL+4
00936 M00S00799.ver +++| RCL4 RJM CPA WRITE PARAMETER LIST ENTRY
00937 M00S00800.ver +++| ADD LO
00938 M00S00801.ver +++| CWD CL
00939 M00S00802.ver +++| LDD CL+4
00940 M00S00803.ver +++| LMD TH CHECK IF *ESIR*
00941 M00S00804.ver +++| NJN RCL6 IF LEGAL REQUEST
00942 M00S00805.ver +++| RCL5 LJM RCLX RETURN
00943 M00S00806.ver +++|
00944 M00S00807.ver +++| RCL6 AOD LO INCREMENT LIST OFFSET
00945 M00S00808.ver +++| SBD PB+3
00946 M00S00809.ver +++| SBN 1
00947 M00S00810.ver +++| PJN RCL5 IF END OF LIST
00948 M00S00811.ver +++| LJM RCL1 PROCESS NEXT LIST ENTRY
Line S00812 Modification History
M01 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
00949 M01S00812.ver13 ---| REQ SPACE 4,20
00950 M01S00813.ver13 ---|** FUNCTION 3 - RSEQ - RESERVE EQUIPMENT.
00951 M01S00814.ver13 ---|*
00952 M01S00815.ver13 ---|* ENTRY (PB LIST ENTRY) = 6/CH, 6/EQ, 6/UN, 42/0.
00953 M01S00816.ver13 ---|* = 60/0.
00954 M01S00817.ver13 ---|*
00955 M01S00818.ver13 ---|* EXIT (PB+4) = ERROR STATUS.
00956 M01S00819.ver13 ---|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR CODE.
00957 M01S00820.ver13 ---|* = 24/0, 12/EQ/UN TYPE, 15/0,
00958 M01S00821.ver13 ---|* 9/EST ORDINAL.
00959 M01S00822.ver13 ---|*
00960 M01S00823.ver13 ---|* USES DA, LO, T2, CL - CL+4, CM - CM+4.
00961 M01S00824.ver13 ---|*
00962 M01S00825.ver13 ---|* CALLS CPA, CUA, DVC, SEE, VET, VRC, VTC.
00963 M01S00826.ver13 ---|*
00964 M01S00827.ver13 ---|* MACROS MONITOR.
00965 M01S00828.ver13 ---|
00966 M01S00829.ver13 ---|
00967 M01S00830.ver13 ---| REQ17 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
00968 M01S00831.ver13 ---| STD PB+4
00969 M01S00832.ver13 ---|
00970 M01S00833.ver13 ---| REQ SUBR ENTRY/EXIT
00971 M01S00834.ver13 ---| LDD PB+3 CHECK BLOCK LENGTH
00972 M01S00835.ver13 ---| ZJN REQX IF NONE REQUESTED
00973 M01S00836.ver13 ---| SBN 2
00974 M01S00837.ver13 ---| MJN REQ17 IF BLOCK TOO SHORT
00975 M01S00838.ver13 ---| LDD PB+3
00976 M01S00839.ver13 ---| SHN -1
00977 M01S00840.ver13 ---| SBD LE
00978 M01S00841.ver13 ---| PJN REQ17 IF BLOCK LONGER THAN 2 * EST LENGTH
00979 M01S00842.ver13 ---| LDD PB+3
00980 M01S00843.ver13 ---| LPN 1
00981 M01S00844.ver13 ---| NJN REQ17 IF BLOCK LENGTH NOT EVEN NUMBER OF WORDS
00982 M01S00845.ver13 ---| LDN 1 INITIALIZE LIST OFFSET
00983 M01S00846.ver13 ---| STD LO
00984 M01S00847.ver13 ---| REQ1 RJM CPA READ NEXT LIST ENTRY
00985 M01S00848.ver13 ---| ADD LO
00986 M01S00849.ver13 ---| CRD CL
00987 M01S00850.ver13 ---| RJM SEE SEARCH EST FOR EQUIPMENT
00988 M01S00851.ver13 ---| PJN REQ3 IF EST ENTRY FOUND
00989 M01S00852.ver13 ---| LDN ESNE SET EST ENTRY NOT FOUND STATUS
00990 M01S00853.ver13 ---| REQ2 LJM REQ13 WRITE RESPONSE
00991 M01S00854.ver13 ---|
00992 M01S00855.ver13 ---| REQ3 RJM VET VALIDATE EQUIPMENT TRANSFERABILITY
00993 M01S00856.ver13 ---| ZJN REQ6 IF EQUIPMENT TRANSFERABLE
00994 M01S00857.ver13 ---| PJN REQ2 IF NOT DOWN
00995 M01S00858.ver13 ---| LDD CL
00996 M01S00859.ver13 ---| SHN -6
00997 M01S00860.ver13 ---| STD T2
00998 M01S00861.ver13 ---| RJM VRC INSURE CHANNEL IS RESERVED
00999 M01S00862.ver13 ---| LDD T4
01000 M01S00863.ver13 ---| ZJN REQ4 IF CHANNEL ALREADY ASSIGNED
01001 M01S00864.ver13 ---| LDD CM+1
01002 M01S00865.ver13 ---| ZJN REQ7 SET CHANNEL NOT AVAILABLE STATUS
01003 M01S00866.ver13 ---| REQ4 RJM CUA CHECK IF MASS STORAGE UNIT ASSIGNED
01004 M01S00867.ver13 ---| ZJN REQ5 IF NOT ASSIGNED
01005 M01S00868.ver13 ---| LDN ESAA
01006 M01S00869.ver13 ---| UJN REQ2 WRITE RESPONSE
01007 M01S00870.ver13 ---|
01008 M01S00871.ver13 ---| REQ5 LJM REQ12 SET UNIT ASSIGNED BIT IN MST
01009 M01S00872.ver13 ---|
01010 M01S00873.ver13 ---|* ENSURE CHANNEL IS RESERVED BY NOS/VE.
01011 M01S00874.ver13 ---|
01012 M01S00875.ver13 ---| REQ6 STD DA CLEAR CHANNEL JUST RESERVED FLAG
01013 M01S00876.ver13 ---| LDD CL GET CHANNEL NUMBER
01014 M01S00877.ver13 ---| SHN -6
01015 M01S00878.ver13 ---| STD T2
01016 M01S00879.ver13 ---| RJM VRC VE RESERVE CHANNEL
01017 M01S00880.ver13 ---| LDD T4
01018 M01S00881.ver13 ---| ZJN REQ9 IF CHANNEL WAS PREVIOUSLY ASSIGNED
01019 M01S00882.ver13 ---| LDD CM+1
01020 M01S00883.ver13 ---| NJN REQ8 IF CHANNEL ASSIGNED
01021 M01S00884.ver13 ---| REQ7 LDN ESCH SET CHANNEL NOT AVAILABLE STATUS
01022 M01S00885.ver13 ---| UJN REQ11 WRITE RESPONSE
01023 M01S00886.ver13 ---|
01024 M01S00887.ver13 ---|* RESERVE EQUIPMENT FOR NOS/VE.
01025 M01S00888.ver13 ---|
01026 M01S00889.ver13 ---| REQ8 LDN 1 SET CHANNEL JUST ASSIGNED FLAG
01027 M01S00890.ver13 ---| STD DA
01028 M01S00891.ver13 ---| REQ9 LDD T7 SET EST ORDINAL
01029 M01S00892.ver13 ---| LMC 4000 SET ALTERNATE EJT FLAG
01030 M01S00893.ver13 ---| STD CM+1
01031 M01S00894.ver13 ---| LDK RDES REQUEST DOWNED EQUIPMENT
01032 M01S00895.ver13 ---| STD CM+2
01033 M01S00896.ver13 ---| LDM NEJT SET EJT ORDINAL
01034 M01S00897.ver13 ---| STD CM+3
01035 M01S00898.ver13 ---| MONITOR REQM REQUEST EQUIPMENT
01036 M01S00899.ver13 ---| LDD CM+1
01037 M01S00900.ver13 ---| NJN REQ12 IF EQUIPMENT ASSIGNED
01038 M01S00901.ver13 ---| LDD DA
01039 M01S00902.ver13 ---| ZJN REQ10 IF CHANNEL NOT JUST ASSIGNED
01040 M01S00903.ver13 ---| RJM VTC VE RETURN CHANNEL
01041 M01S00904.ver13 ---| REQ10 LDN ESEQ SET EQUIPMENT NOT AVAILABLE STATUS
01042 M01S00905.ver13 ---| REQ11 UJN REQ13 WRITE RESPONSE
01043 M01S00906.ver13 ---|
01044 M01S00907.ver13 ---|* IF EQUIPMENT IS MASS STORAGE DEVICE, SET BIT CORRESPONDING
01045 M01S00908.ver13 ---|* TO *DDLL* UNIT LIST POSITION IN MST BIT MAP.
01046 M01S00909.ver13 ---|
01047 M01S00910.ver13 ---| REQ12 BSS 0
01048 M01S00911.ver13 ---|* RJM CCL CHECK CONTROLWARE LOAD
01049 M01S00912.ver13 ---| LDD CN
01050 M01S00913.ver13 ---| SHN 0-13
01051 M01S00914.ver13 ---| ZJN REQ14 IF NOT MASS STORAGE DEVICE
01052 M01S00915.ver13 ---| LDD CN+4 READ BIT MAP
01053 M01S00916.ver13 ---| SHN 3
01054 M01S00917.ver13 ---| ADN NVGL
01055 M01S00918.ver13 ---| CRD CM
01056 M01S00919.ver13 ---| ERRNZ SHNI-1000 CANNOT USE DIRECT CELL *TH*
01057 M01S00920.ver13 ---| LDD TH SET SHIFT COUNT
01058 M01S00921.ver13 ---| ADD DC
01059 M01S00922.ver13 ---| STM REQA
01060 M01S00923.ver13 ---| LDN 1
01061 M01S00924.ver13 ---| REQA SHN **
01062 M01S00925.ver13 ---| RAD CM+4 SET BIT
01063 M01S00926.ver13 ---| LDD CN+4 UPDATE BIT MAP
01064 M01S00927.ver13 ---| SHN 3
01065 M01S00928.ver13 ---| ADN NVGL
01066 M01S00929.ver13 ---| CWD CM
01067 M01S00930.ver13 ---| LDN 0 SET NO ERROR STATUS
01068 M01S00931.ver13 ---|
01069 M01S00932.ver13 ---|* WRITE TWO WORD RESPONSE.
01070 M01S00933.ver13 ---|
01071 M01S00934.ver13 ---| REQ13 STD PB+4 SET ERROR STATUS
01072 M01S00935.ver13 ---| REQ14 STD CL+4
01073 M01S00936.ver13 ---| RJM CPA WRITE FIRST WORD OF RESPONSE
01074 M01S00937.ver13 ---| ADD LO
01075 M01S00938.ver13 ---| CWD CL
01076 M01S00939.ver13 ---| AOD LO INCREMENT LIST OFFSET
01077 M01S00940.ver13 ---| LDD CL+4
01078 M01S00941.ver13 ---| LPC 7677
01079 M01S00942.ver13 ---| NJN REQ15 IF ERROR STATUS SET
01080 M01S00943.ver13 ---| LDN ZERL CLEAR SECOND WORD
01081 M01S00944.ver13 ---| CRD CL
01082 M01S00945.ver13 ---| RJM DVC GET DEVICE CODE
01083 M01S00946.ver13 ---| STD CL+2 SET *EQ/UN* TYPE
01084 M01S00947.ver13 ---| LDD T7 SET EST ORDINAL
01085 M01S00948.ver13 ---| STD CL+4
01086 M01S00949.ver13 ---| RJM CPA WRITE SECOND WORD OF RESPONSE
01087 M01S00950.ver13 ---| ADD LO
01088 M01S00951.ver13 ---| CWD CL
01089 M01S00952.ver13 ---| REQ15 AOD LO INCREMENT LIST OFFSET
01090 M01S00953.ver13 ---| SBD PB+3
01091 M01S00954.ver13 ---| MJN REQ16 IF NOT END OF LIST
01092 M01S00955.ver13 ---| LJM REQX RETURN
01093 M01S00956.ver13 ---|
01094 M01S00957.ver13 ---| REQ16 LJM REQ1 PROCESS NEXT REQUEST
Line S00958 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01095 M01S00958.ns2633 ---| TCM SPACE 4,15
Line S00023 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01096 M01S00023.ns2633 +++| TCM SPACE 4,20
01097 M00S00959.ver +++|** FUNCTION 4 - RNCM - RETURN CM.
01098 M00S00960.ver +++|*
01099 M00S00961.ver +++|* ENTRY (PB LIST ENTRY) = 42/0, 18/NUMBER OF WORDS/1000B TO
01100 M00S00962.ver +++|* RETURN.
01101 M00S00963.ver +++|*
01102 M00S00964.ver +++|* EXIT *EICB* WORD *D7CM+1* = 12/0, 24/FWA/1000B,
01103 M00S00965.ver +++|* 24/LWA+1/1000B.
01104 M00S00966.ver +++|* (PB LIST ENTRY) = 42/0, 18/NUMBER OF WORDS/1000B TO
01105 M00S00967.ver +++|* RETURN ROUNDED DOWN TO NEAREST 2000B BOUNDARY.
01106 M00S00968.ver +++|* MACHINE FL IS ADJUSTED IF ANY DYNAMIC MEMORY RETURNED.
01107 M00S00969.ver +++|* (PB+4) = ERROR STATUS.
01108 M00S00970.ver +++|* BML MESSAGE ISSUED.
01109 M00S00971.ver +++|*
Line S00972 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01110 M01S00972.ns2633 ---|* USES CL - CL+1, CM - CM+4, CN - CN+1.
Line S00024 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01111 M01S00024.ns2633 +++|* USES T1, CL - CL+1, CM - CM+4, CN - CN+1.
01112 M00S00973.ver +++|*
01113 M00S00974.ver +++|* CALLS CPA, GCC, IBM, RDM, SDA.
01114 M00S00975.ver +++|
01115 M00S00976.ver +++|
01116 M00S00977.ver +++| TCM2 LDN 0 SET TOTAL NUMBER OF WORDS = 0
01117 M00S00978.ver +++| STD CL
01118 M00S00979.ver +++| STD CL+1
01119 M00S00980.ver +++| LDD CN SET AMOUNT TO RETURN = CURRENT VALUE
01120 M00S00981.ver +++| STD CM+3
01121 M00S00982.ver +++| LDD CN+1
01122 M00S00983.ver +++| STD CM+4
01123 M00S00984.ver +++| TCM3 RJM RDM RETURN DYNAMIC MEMORY
01124 M00S00985.ver +++| RJM SDA SET CM ADDRESSES IN *EICB*
01125 M00S00986.ver +++| LDC /COMSDFS/HS0111 SET SYMPTOM CODE
01126 M00S00987.ver +++| STD T1
01127 M00S00988.ver +++| LDC /COMSDFS/HM0240 SET MESSAGE ID
01128 M00S00989.ver +++| RJM IBM ISSUE BML MESSAGE
01129 M00S00990.ver +++|
01130 M00S00991.ver +++| TCM SUBR ENTRY/EXIT
01131 M00S00992.ver +++| RJM GCC GET CURRENT NUMBER OF NOS/VE CM WORDS
Line S00025 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01132 M01S00025.ns2633 +++| LDD CM+3
01133 M01S00026.ns2633 +++| STD CN
01134 M01S00027.ns2633 +++| LDD CM+4
01135 M00S00993.ver +++| STD CN+1
Line S00994 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01136 M01S00994.ns2633 ---| SHN -14
01137 M01S00995.ns2633 ---| STD CN
01138 M00S00996.ver +++| RJM CPA GET NUMBER OF WORDS TO BE RETURNED
01139 M00S00997.ver +++| ADN 1
01140 M00S00998.ver +++| CRD CM
01141 M00S00999.ver +++| LDD PB
01142 M00S01000.ver +++| SHN 21-13
Line S01001 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01143 M01S01001.ns2633 ---| MJN TCM2 IF REQUEST TO RETURN ALL MEMORY
Line S00028 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01144 M01S00028.ns2633 +++| MJP TCM2 IF REQUEST TO RETURN ALL MEMORY
01145 M00S01002.ver +++| LDD CM+4 ROUND DOWN TO NEAREST 2000B
01146 M00S01003.ver +++| SCN 1
01147 M00S01004.ver +++| STD CM+4
01148 M00S01005.ver +++| RJM CPA SET ROUNDED VALUE IN REPLY BLOCK
01149 M00S01006.ver +++| ADN 1
01150 M00S01007.ver +++| CWD CM
Line S01008 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01151 M01S01008.ns2633 ---| LDD CN FIND NEW TOTAL
01152 M01S01009.ns2633 ---| SBD CM+3
01153 M01S01010.ns2633 ---| MJN TCM1 IF NUMBER TO RETURN .GT. CURRENT NUMBER
01154 M01S01011.ns2633 ---| SHN 14
01155 M01S01012.ns2633 ---| LMD CN+1
Line S00029 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01156 M01S00029.ns2633 +++| LDD CM+3 FIND NEW TOTAL
01157 M01S00030.ns2633 +++| STD T1
01158 M01S00031.ns2633 +++| LDD CN+1
01159 M00S01013.ver +++| SBD CM+4
Line S01014 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01160 M01S01014.ns2633 ---| MJN TCM1 IF NUMBER TO RETURN .GT. CURRENT NUMBER
01161 M00S01015.ver +++| STD CL+1
Line S01016 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01162 M01S01016.ns2633 ---| SHN -14
Line S00032 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01163 M01S00032.ns2633 +++| PJN TCM1 IF NO BORROW
01164 M01S00033.ns2633 +++| AOD T1 ADJUST FOR BORROW
01165 M01S00034.ns2633 +++| AOD CL+1
01166 M01S00035.ns2633 +++| TCM1 LDD CN
01167 M01S00036.ns2633 +++| SBD T1
01168 M00S01017.ver +++| STD CL
Line S01018 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01169 M01S01018.ns2633 ---| LJM TCM3 SET ADDRESSES IN *EICB*
01170 M01S01019.ns2633 ---|
01171 M01S01020.ns2633 ---| TCM1 LDN ESCM SET CM NOT ASSIGNED ERROR STATUS
Line S00037 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01172 M01S00037.ns2633 +++| PJP TCM3 IF NUMBER TO RETURN .LE. CURRENT NUMBER
01173 M01S00038.ns2633 +++| LDN ESCM SET CM NOT ASSIGNED ERROR STATUS
01174 M00S01021.ver +++| STD PB+4
01175 M00S01022.ver +++| LJM TCMX RETURN
01176 M00S01023.ver +++| TPP SPACE 4,15
01177 M00S01024.ver +++|** FUNCTION 5 - RNPP - RETURN PP.
01178 M00S01025.ver +++|*
01179 M00S01026.ver +++|* ENTRY (PB LIST ENTRY) = 6/PP NUMBER, 54/0.
01180 M00S01027.ver +++|*
01181 M00S01028.ver +++|* EXIT (PB LIST ENTRY) = 6/UNCHANGED, 42/0, 12/ERROR STATUS.
01182 M00S01029.ver +++|* (PB+4) = ERROR STATUS.
01183 M00S01030.ver +++|*
01184 M00S01031.ver +++|* USES DA, EC, LO, PB+4, CL - CL+4, CN - CN+4.
01185 M00S01032.ver +++|*
01186 M00S01033.ver +++|* CALLS CPA, CPS, DPL, LPR, SPB, VPN.
01187 M00S01034.ver +++|*
01188 M00S01035.ver +++|* MACROS MONITOR.
01189 M00S01036.ver +++|
01190 M00S01037.ver +++|
01191 M00S01038.ver +++| TPP13 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
01192 M00S01039.ver +++| STD PB+4
01193 M00S01040.ver +++|
01194 M00S01041.ver +++| TPP SUBR ENTRY/EXIT
01195 M00S01042.ver +++| RJM LPR LOAD PP RESIDENT
01196 M00S01043.ver +++| LDN PPUL GET NUMBER OF SYSTEM PP-S
01197 M00S01044.ver +++| CRD CN
01198 M00S01045.ver +++| LDD CN+2
01199 M00S01046.ver +++| STD DA
01200 M00S01047.ver +++| LDD PB
01201 M00S01048.ver +++| SHN 21-13
01202 M00S01049.ver +++| PJN TPP1 IF RETURN SPECIFIED PP-S REQUEST
01203 M00S01050.ver +++| LJM TPP7 RETURN ALL NOS/VE PP-S
01204 M00S01051.ver +++|
01205 M00S01052.ver +++|* RETURN SPECIFIED PP-S.
01206 M00S01053.ver +++|
01207 M00S01054.ver +++| TPP1 LDD PB+3
01208 M00S01055.ver +++| ZJN TPPX IF NONE TO RETURN
01209 M00S01056.ver +++| SBD DA
01210 M00S01057.ver +++| SBN 1
01211 M00S01058.ver +++| PJN TPP13 IF REQUEST TOO LARGE
01212 M00S01059.ver +++|
01213 M00S01060.ver +++| TPP2 LDN 1 INITIALIZE LIST OFFSET
01214 M00S01061.ver +++| STD LO
01215 M00S01062.ver +++| TPP3 RJM CPA READ NEXT LIST ENTRY
01216 M00S01063.ver +++| ADD LO
01217 M00S01064.ver +++| CRD CL
01218 M00S01065.ver +++| LDD CL
01219 M00S01066.ver +++| SHN -6
01220 M00S01067.ver +++| RJM VPN VALIDATE PP NUMBER
01221 M00S01068.ver +++| NJN TPP6 IF NOT ASSIGNED TO NOS/VE
01222 M00S01069.ver +++| RJM CPS CHECK PARTNER STATUS
01223 M00S01070.ver +++| MJN TPP4 IF ONLY REPLY NEEDED (PARTNER IS ASSIGNED)
01224 M00S01071.ver +++| NJN TPP6 IF PP IS PSEUDO-ASSIGNED
01225 M00S01072.ver +++| LDD T4 PP NUMBER
01226 M00S01073.ver +++| LMC 10000
01227 M00S01074.ver +++| RJM SPB SET LOWER PP BIT
01228 M00S01075.ver +++| RJM DPL DEADSTART PP AND LOAD *PPR*
01229 M00S01076.ver +++| TPP4 LDN 0 CLEAR ERROR FLAG
01230 M00S01077.ver +++| STD CL+4
01231 M00S01078.ver +++| TPP5 RJM CPA WRITE LIST ENTRY
01232 M00S01079.ver +++| ADD LO
01233 M00S01080.ver +++| CWD CL
01234 M00S01081.ver +++| LDD CL+4
01235 M00S01082.ver +++| LMD TH CHECK IF *ESIR*
01236 M00S01083.ver +++| ZJN TPP9 IF ILLEGAL REQUEST
01237 M00S01084.ver +++| AOD LO INCREMENT OFFSET
01238 M00S01085.ver +++| SBD PB+3
01239 M00S01086.ver +++| SBN 1
01240 M00S01087.ver +++| PJN TPP9 IF END OF LIST
01241 M00S01088.ver +++| LJM TPP3 PROCESS NEXT PP
01242 M00S01089.ver +++|
01243 M00S01090.ver +++| TPP6 STD PB+4
01244 M00S01091.ver +++| STD CL+4
01245 M00S01092.ver +++| UJN TPP5 WRITE LIST ENTRY
01246 M00S01093.ver +++|
01247 M00S01094.ver +++|* RETURN ALL NOS/VE RESERVED PP-S.
01248 M00S01095.ver +++|
01249 M00S01096.ver +++| TPP7 LDN 0 INITIALIZE PP NUMBER
01250 M00S01097.ver +++| STD CL
01251 M00S01098.ver +++| TPP8 LDD CL
01252 M00S01099.ver +++| RJM VPN VALIDATE PP NUMBER
01253 M00S01100.ver +++| ZJN TPP10 IF ASSIGNED TO NOS/VE
01254 M00S01101.ver +++| LMN ESPP
01255 M00S01102.ver +++| ZJN TPP11 IF NOT END OF PP-S
01256 M00S01103.ver +++| TPP9 UJN TPP12 RETURN
01257 M00S01104.ver +++|
01258 M00S01105.ver +++| TPP10 LDD T4 RETURN NOS/VE PP
01259 M00S01106.ver +++| LMC 10000
01260 M00S01107.ver +++| RJM SPB SET LOWER PP BIT
01261 M00S01108.ver +++| RJM DPL DEADSTART PP AND LOAD PPR
01262 M00S01109.ver +++| TPP11 AOD CL INCREMENT PP NUMBER
01263 M00S01110.ver +++| SBN 12
01264 M00S01111.ver +++| NJN TPP8 IF NOT PP 20
01265 M00S01112.ver +++| LDN 20 SET START OF UPPER BANK
01266 M00S01113.ver +++| STD CL
01267 M00S01114.ver +++| UJN TPP8 PROCESS NEXT PP
01268 M00S01115.ver +++|
01269 M00S01116.ver +++| TPP12 LJM TPPX RETURN
01270 M00S01117.ver +++| TCH SPACE 4,15
01271 M00S01118.ver +++|** FUNCTION 6 - RNCH - RETURN CHANNEL.
01272 M00S01119.ver +++|*
01273 M00S01120.ver +++|* ENTRY (PB LIST ENTRY) = 6/CH, 54/0.
01274 M00S01121.ver +++|*
01275 M00S01122.ver +++|* EXIT (PB+4) = ERROR STATUS.
01276 M00S01123.ver +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR STATUS.
01277 M00S01124.ver +++|*
01278 M00S01125.ver +++|* USES LO, PB+4, T2, CL - CL+4.
01279 M00S01126.ver +++|*
01280 M00S01127.ver +++|* CALLS CPA, VTC.
01281 M00S01128.ver +++|
01282 M00S01129.ver +++|
01283 M00S01130.ver +++| TCH11 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
01284 M00S01131.ver +++| STD PB+4
01285 M00S01132.ver +++|
01286 M00S01133.ver +++| TCH SUBR ENTRY/EXIT
01287 M00S01134.ver +++| LDN NCTAL READ EJT ASSIGNMENT TABLE
01288 M00S01135.ver +++| STD T2
01289 M00S01136.ver +++| LDC ** FWA OF CHANNEL EJT ASSIGNMENT TABLE
01290 M00S01137.ver +++| TCHA EQU *-2
01291 M00S01138.ver +++| CRM CBUF,T2
01292 M00S01139.ver +++| LDD PB
01293 M00S01140.ver +++| SHN 21-13
01294 M00S01141.ver +++| PJN TCH1 IF TO RETURN SPECIFIED CHANNELS
01295 M00S01142.ver +++| LJM TCH7 RETURN ALL NOS/VE CHANNELS
01296 M00S01143.ver +++|
01297 M00S01144.ver +++| TCH1 LDD PB+3 CHECK BLOCK LENGTH
01298 M00S01145.ver +++| ZJN TCHX IF NONE TO BE RETURNED
01299 M00S01146.ver +++| SBN NCTAL*5+1
01300 M00S01147.ver +++| PJN TCH11 IF TOO MANY CHANNELS TO BE RETURNED
01301 M00S01148.ver +++| LDN 1 INITIALIZE LIST OFFSET
01302 M00S01149.ver +++| STD LO
01303 M00S01150.ver +++| TCH2 RJM CPA GET NEXT CHANNEL TO RETURN
01304 M00S01151.ver +++| ADD LO
01305 M00S01152.ver +++| CRD CL
01306 M00S01153.ver +++| LDD CL
01307 M00S01154.ver +++| SHN -6
01308 M00S01155.ver +++| STD T2
01309 M00S01156.ver +++| SBN MXNC+1
01310 M00S01157.ver +++| MJN TCH3 IF VALID CHANNEL NUMBER
01311 M00S01158.ver +++| LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
01312 M00S01159.ver +++| UJN TCH4 WRITE PARAMETER LIST ENTRY
01313 M00S01160.ver +++|
01314 M00S01161.ver +++| TCH3 LDM NEJT
01315 M00S01162.ver +++| LMM CBUF,T2
01316 M00S01163.ver +++| ZJN TCH5 IF CHANNEL IS NOS/VE RESERVED
01317 M00S01164.ver +++| LDN ESCH SET CHANNEL NOT NOS/VE RESERVED STATUS
01318 M00S01165.ver +++| TCH4 STD PB+4
01319 M00S01166.ver +++| UJN TCH6 WRITE PARAMETER LIST ENTRY
01320 M00S01167.ver +++|
01321 M00S01168.ver +++| TCH5 RJM VTC VE RETURN CHANNEL
01322 M00S01169.ver +++|* LDN 0 CLEAR ERROR STATUS
01323 M00S01170.ver +++| TCH6 STD CL+4
01324 M00S01171.ver +++| RJM CPA WRITE PARAMETER LIST ENTRY
01325 M00S01172.ver +++| ADD LO
01326 M00S01173.ver +++| CWD CL
01327 M00S01174.ver +++| LDD CL+4
01328 M00S01175.ver +++| LMD TH CHECK IF *ESIR*
01329 M00S01176.ver +++| ZJN TCH10 IF ILLEGAL REQUEST
01330 M00S01177.ver +++| AOD LO INCREMENT LIST OFFSET
01331 M00S01178.ver +++| SBD PB+3
01332 M00S01179.ver +++| SBN 1
01333 M00S01180.ver +++| PJN TCH10 IF END OF LIST
01334 M00S01181.ver +++| LJM TCH2 PROCESS NEXT LIST ENTRY
01335 M00S01182.ver +++|
01336 M00S01183.ver +++|* RETURN ALL NOS/VE RESERVED CHANNELS.
01337 M00S01184.ver +++|
01338 M00S01185.ver +++| TCH7 LDN 0 INITIALIZE CHANNEL TABLE OFFSET
01339 M00S01186.ver +++| STD T2
01340 M00S01187.ver +++| TCH8 LDM NEJT
01341 M00S01188.ver +++| LMM CBUF,T2
01342 M00S01189.ver +++| NJN TCH9 IF CHANNEL NOT NOS/VE RESERVED
01343 M00S01190.ver +++| RJM VTC VE RETURN CHANNEL
01344 M00S01191.ver +++| TCH9 AOD T2 INCREMENT CHANNEL TABLE OFFSET
01345 M00S01192.ver +++| SBN MXNC+1
01346 M00S01193.ver +++| MJN TCH8 IF NOT END OF TABLE
01347 M00S01194.ver +++| TCH10 LJM TCHX RETURN
Line S01195 Modification History
M01 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01348 M01S01195.ver13 ---| TEQ SPACE 4,15
01349 M01S01196.ver13 ---|** FUNCTION 7 - RNEQ - RETURN EQUIPMENT.
01350 M01S01197.ver13 ---|*
01351 M01S01198.ver13 ---|* ENTRY (PB LIST ENTRY) = 6/CH, 6/EQ, 6/UN, 42/0.
01352 M01S01199.ver13 ---|* (NEJT) = NOS/VE EJT ORDINAL.
01353 M01S01200.ver13 ---|*
01354 M01S01201.ver13 ---|* EXIT (PB+4) = ERROR STATUS.
01355 M01S01202.ver13 ---|* (PB LIST ENTRY) = 18/UNCHANGED, 30/0, 12/ERROR STATUS.
01356 M01S01203.ver13 ---|*
01357 M01S01204.ver13 ---|* USES LO, PB+4, T2, CL - CL+4, CM - CM+4, CN - CN+4.
01358 M01S01205.ver13 ---|*
Line S01206 Modification History
M01 (Removed by) 271l716
M02 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01359 M02S01206.ver13 ---|* CALLS CCA, CPA, CUA, SEE, VET.
Line S00010 Modification History
M01 (Added by) 271l716
M02 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01360 M02S00010.ver13 ---|* CALLS CHA, CPA, CUA, SEE, VET.
Line S01207 Modification History
M01 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01361 M01S01207.ver13 ---|*
01362 M01S01208.ver13 ---|* MACROS MONITOR, SFA.
01363 M01S01209.ver13 ---|
01364 M01S01210.ver13 ---|
01365 M01S01211.ver13 ---| TEQ15 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
01366 M01S01212.ver13 ---| STD PB+4
01367 M01S01213.ver13 ---|
01368 M01S01214.ver13 ---| TEQ SUBR ENTRY/EXIT
01369 M01S01215.ver13 ---| LDD PB
01370 M01S01216.ver13 ---| SHN 21-13
01371 M01S01217.ver13 ---| PJN TEQ1 IF TO RETURN SPECIFIED EQUIPMENT
01372 M01S01218.ver13 ---| LJM TEQ13 RETURN ALL NOS/VE EQUIPMENT
01373 M01S01219.ver13 ---|
01374 M01S01220.ver13 ---| TEQ1 LDD PB+3 CHECK BLOCK LENGTH
01375 M01S01221.ver13 ---| ZJN TEQX IF NONE TO RETURN
01376 M01S01222.ver13 ---| SBD LE
01377 M01S01223.ver13 ---| PJN TEQ15 IF BLOCK LONGER THAN EST LENGTH
01378 M01S01224.ver13 ---| LDN 1 INITIALIZE LIST OFFSET
01379 M01S01225.ver13 ---| STD LO
01380 M01S01226.ver13 ---| TEQ2 RJM CPA READ NEXT LIST ENTRY
01381 M01S01227.ver13 ---| ADD LO
01382 M01S01228.ver13 ---| CRD CL
01383 M01S01229.ver13 ---| RJM SEE SEARCH EST FOR EQUIPMENT
01384 M01S01230.ver13 ---| PJN TEQ3 IF EST ENTRY FOUND
01385 M01S01231.ver13 ---| LDN ESNE SET NOT IN EST STATUS
01386 M01S01232.ver13 ---| UJN TEQ5 WRITE LIST ENTRY
01387 M01S01233.ver13 ---|
01388 M01S01234.ver13 ---| TEQ3 RJM VET CHECK EQUIPMENT ASSIGNMENT
01389 M01S01235.ver13 ---| MJN TEQ4 IF EQUIPMENT ASSIGNED TO NOS/VE
01390 M01S01236.ver13 ---| LDN ESEQ SET EQUIPMENT NOT ASSIGNED STATUS
01391 M01S01237.ver13 ---| UJN TEQ5 WRITE LIST ENTRY
01392 M01S01238.ver13 ---|
01393 M01S01239.ver13 ---| TEQ4 LDD CL
01394 M01S01240.ver13 ---| SHN -6
01395 M01S01241.ver13 ---| STD T2
Line S01242 Modification History
M01 (Removed by) 271l716
M02 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01396 M02S01242.ver13 ---| RJM CCA CHECK CHANNEL ASSIGNMENT
Line S00011 Modification History
M01 (Added by) 271l716
M02 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01397 M02S00011.ver13 ---| RJM CHA CHECK CHANNEL ASSIGNMENT
Line S01243 Modification History
M01 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01398 M01S01243.ver13 ---| ZJN TEQ4.1 IF CHANNEL ASSIGNED
01399 M01S01244.ver13 ---| LDN ESCH SET CHANNEL NOT ASSIGNED STATUS
01400 M01S01245.ver13 ---| UJN TEQ5 WRITE RESPONSE
01401 M01S01246.ver13 ---|
01402 M01S01247.ver13 ---| TEQ4.1 RJM CUA CHECK UNIT ASSIGNMENT
01403 M01S01248.ver13 ---| MJN TEQ7 IF NOT MASS STORAGE
01404 M01S01249.ver13 ---| SBN ESAA
01405 M01S01250.ver13 ---| ZJN TEQ6 IF UNIT ASSIGNED
01406 M01S01251.ver13 ---| LDN ESUN SET UNIT NOT ASSIGNED STATUS
01407 M01S01252.ver13 ---| TEQ5 LJM TEQ9 WRITE RESPONSE
01408 M01S01253.ver13 ---|
01409 M01S01254.ver13 ---|* RETURN NOS/VE EQUIPMENT.
01410 M01S01255.ver13 ---|
01411 M01S01256.ver13 ---| TEQ6 LDD CN+4 CLEAR UNIT ASSIGNED STATUS
01412 M01S01257.ver13 ---| SHN 3
01413 M01S01258.ver13 ---| ADN NVGL
01414 M01S01259.ver13 ---| CRD CM
01415 M01S01260.ver13 ---| ERRNZ SHNI-1000 CANNOT USE DIRECT CELL *TH*
01416 M01S01261.ver13 ---| LDD TH SET SHIFT COUNT
01417 M01S01262.ver13 ---| ADD DC
01418 M01S01263.ver13 ---| STM TEQA
01419 M01S01264.ver13 ---| LDN 1
01420 M01S01265.ver13 ---| TEQA SHN **
01421 M01S01266.ver13 ---| LMD CM+4 CLEAR BIT
01422 M01S01267.ver13 ---| STD CM+4
01423 M01S01268.ver13 ---| LDD CN+4 UPDATE UNIT STATUS
01424 M01S01269.ver13 ---| SHN 3
01425 M01S01270.ver13 ---| ADN NVGL
01426 M01S01271.ver13 ---| CWD CM
01427 M01S01272.ver13 ---| LDD CM+4 CHECK FOR OTHER UNIT ASSIGNMENTS
01428 M01S01273.ver13 ---| NJN TEQ8 IF ANOTHER UNIT ASSIGNED
01429 M01S01274.ver13 ---| TEQ7 LDD T7 SET EST ORDINAL
01430 M01S01275.ver13 ---| LMC 4000 SET ALTERNATE EJT FLAG
01431 M01S01276.ver13 ---| STD CM+1
01432 M01S01277.ver13 ---| LDM NEJT SET EJT ORDINAL
01433 M01S01278.ver13 ---| STD CM+3
01434 M01S01279.ver13 ---| MONITOR DEQM RELEASE EQUIPMENT
01435 M01S01280.ver13 ---| TEQ8 LDN 0 CLEAR ERROR FLAG
01436 M01S01281.ver13 ---| UJN TEQ10 WRITE RESPONSE
01437 M01S01282.ver13 ---|
01438 M01S01283.ver13 ---|* WRITE LIST RESPONSE.
01439 M01S01284.ver13 ---|
01440 M01S01285.ver13 ---| TEQ9 STD PB+4 SET STATUS
01441 M01S01286.ver13 ---| TEQ10 STD CL+4
01442 M01S01287.ver13 ---| RJM CPA WRITE RESPONSE
01443 M01S01288.ver13 ---| ADD LO
01444 M01S01289.ver13 ---| CWD CL
01445 M01S01290.ver13 ---| AOD LO INCREMENT OFFSET
01446 M01S01291.ver13 ---| SBD PB+3
01447 M01S01292.ver13 ---| SBN 1
01448 M01S01293.ver13 ---| MJN TEQ12 IF NOT END OF LIST
01449 M01S01294.ver13 ---| TEQ11 LJM TEQX RETURN
01450 M01S01295.ver13 ---|
01451 M01S01296.ver13 ---| TEQ12 LJM TEQ2 PROCESS NEXT LIST ENTRY
01452 M01S01297.ver13 ---|
01453 M01S01298.ver13 ---|* RETURN ALL EQUIPMENT.
01454 M01S01299.ver13 ---|
01455 M01S01300.ver13 ---| TEQ13 LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH
01456 M01S01301.ver13 ---| STD LO
01457 M01S01302.ver13 ---| TEQ14 AOD LO ADVANCE EST ORDINAL
01458 M01S01303.ver13 ---| LMD LE
01459 M01S01304.ver13 ---| ZJN TEQ11 IF END OF EST
01460 M01S01305.ver13 ---| SFA EST,LO
01461 M01S01306.ver13 ---| ADK EQDE
01462 M01S01307.ver13 ---| CRD CN READ EST ENTRY
01463 M01S01308.ver13 ---| ADK EQAE-EQDE READ JOB ASSIGNMENT WORD
01464 M01S01309.ver13 ---| CRD CM
01465 M01S01310.ver13 ---| LDM NEJT
01466 M01S01311.ver13 ---| LMD CM+4
01467 M01S01312.ver13 ---| NJN TEQ14 IF NOT NOS/VE RESERVED
01468 M01S01313.ver13 ---| LDD LO SET EST ORDINAL
01469 M01S01314.ver13 ---| LMC 4000 SET ALTERNATE EJT FLAG
01470 M01S01315.ver13 ---| STD CM+1
01471 M01S01316.ver13 ---| LDM NEJT SET EJT ORDINAL
01472 M01S01317.ver13 ---| STD CM+3
01473 M01S01318.ver13 ---| MONITOR DEQM RELEASE EQUIPMENT
01474 M01S01319.ver13 ---| LDD CN CHECK FOR MASS STORAGE
01475 M01S01320.ver13 ---| SHN 21-13
01476 M01S01321.ver13 ---| PJN TEQ14 IF NOT MASS STORAGE
01477 M01S01322.ver13 ---| LDN ZERL CLEAR ALL UNIT ASSIGNMENTS
01478 M01S01323.ver13 ---| CRD CM
01479 M01S01324.ver13 ---| LDD CN+4
01480 M01S01325.ver13 ---| SHN 3
01481 M01S01326.ver13 ---| ADN NVGL
01482 M01S01327.ver13 ---| CWD CM
01483 M01S01328.ver13 ---| UJP TEQ14 PROCESS NEXT EST ENTRY
Line S01329 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01484 M01S01329.ns2633 ---| SCM SPACE 4,10
Line S00039 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01485 M01S00039.ns2633 +++| SCM SPACE 4,15
01486 M00S01330.ver +++|** FUNCTION 10 - STCM - STATUS OF NOS/VE CM.
01487 M00S01331.ver +++|*
01488 M00S01332.ver +++|* ENTRY (EIBA - EIBA+1) = *EICB* ADDRESS.
01489 M00S01333.ver +++|*
01490 M00S01334.ver +++|* EXIT (PB LIST ENTRY) = 42/0, 18/NUMBER OF WORDS/1000B.
01491 M00S01335.ver +++|* = 12/0, 24/FWA/1000B, 24/LWA+1/1000B.
01492 M00S01336.ver +++|* (PB+4) = ERROR STATUS.
01493 M00S01337.ver +++|*
01494 M00S01338.ver +++|* USES PB+4, CL - CL+4, CM - CM+4.
01495 M00S01339.ver +++|*
01496 M00S01340.ver +++|* CALLS CPA, GCC, SEA.
01497 M00S01341.ver +++|
01498 M00S01342.ver +++|
01499 M00S01343.ver +++| SCM1 LDC ESIL SET INSUFFICIENT LENGTH STATUS
01500 M00S01344.ver +++| STD PB+4
01501 M00S01345.ver +++|
01502 M00S01346.ver +++| SCM SUBR ENTRY/EXIT
01503 M00S01347.ver +++| LDD PB+3 CHECK LENGTH
01504 M00S01348.ver +++| SBN 2
01505 M00S01349.ver +++| MJN SCM1 IF INSUFFICIENT LENGTH
01506 M00S01350.ver +++| LDN ZERL CLEAR RESPONSE
01507 M00S01351.ver +++| CRD CL
01508 M00S01352.ver +++| RJM GCC GET CURRENT NUMBER OF NOS/VE CM WORDS
Line S00040 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01509 M01S00040.ns2633 +++| LDD CM+3
01510 M01S00041.ns2633 +++| STD CL+3
01511 M01S00042.ns2633 +++| LDD CM+4
01512 M00S01353.ver +++| STD CL+4
Line S01354 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01513 M01S01354.ns2633 ---| SHN -14
01514 M01S01355.ns2633 ---| STD CL+3
01515 M00S01356.ver +++| RJM SEA GET ADDRESSES FROM *EICB*
01516 M00S01357.ver +++| ADN D7CM+1
01517 M00S01358.ver +++| CRD CM
01518 M00S01359.ver +++| RJM CPA WRITE RESPONSE
01519 M00S01360.ver +++| ADN 1
01520 M00S01361.ver +++| CWD CL
01521 M00S01362.ver +++| ADN 1
01522 M00S01363.ver +++| CWD CM
01523 M00S01364.ver +++| UJN SCMX RETURN
Line S01365 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01524 M01S01365.ns2633 ---| SPP SPACE 4,10
Line S00043 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01525 M01S00043.ns2633 +++| SPP SPACE 4,15
01526 M00S01366.ver +++|** FUNCTION 11 - STPP - STATUS OF NOS/VE PP-S.
01527 M00S01367.ver +++|*
01528 M00S01368.ver +++|* ENTRY (PB LIST ENTRY) = 6/PP NUMBER, 54/0.
01529 M00S01369.ver +++|* (PPCA) = PP COMMUNICATION AREA ADDRESS.
01530 M00S01370.ver +++|*
01531 M00S01371.ver +++|* EXIT (PB+4) = ERROR STATUS.
01532 M00S01372.ver +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR STATUS.
01533 M00S01373.ver +++|*
01534 M00S01374.ver +++|* USES DA, LO, PB+4, CL - CL+4, CN - CN+4.
01535 M00S01375.ver +++|*
01536 M00S01376.ver +++|* CALLS CPA, VPN.
01537 M00S01377.ver +++|
01538 M00S01378.ver +++|
01539 M00S01379.ver +++| SPP5 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
01540 M00S01380.ver +++| STD PB+4
01541 M00S01381.ver +++|
01542 M00S01382.ver +++| SPP SUBR ENTRY/EXIT
01543 M00S01383.ver +++| LDN PPUL GET NUMBER OF SYSTEM PP-S
01544 M00S01384.ver +++| CRD CN
01545 M00S01385.ver +++| LDD CN+2
01546 M00S01386.ver +++| STD DA
01547 M00S01387.ver +++| LDD PB+3 CHECK PARAMETER BLOCK LENGTH
01548 M00S01388.ver +++| ZJN SPPX IF NO REQUEST
01549 M00S01389.ver +++| SBN 21D
01550 M00S01390.ver +++| PJN SPP5 IF LENGTH .GT. NUMBER OF SYSTEM PP-S
01551 M00S01391.ver +++| LDN 1 INITIALIZE LIST OFFSET
01552 M00S01392.ver +++| STD LO
01553 M00S01393.ver +++| SPP1 RJM CPA READ NEXT LIST ENTRY
01554 M00S01394.ver +++| ADD LO
01555 M00S01395.ver +++| CRD CL
01556 M00S01396.ver +++| LDD CL
01557 M00S01397.ver +++| SHN -6
01558 M00S01398.ver +++| RJM VPN VALIDATE PP NUMBER
01559 M00S01399.ver +++| NJN SPP2 IF NOT ASSIGNED TO NOS/VE
01560 M00S01400.ver +++| LDD CM+4
01561 M00S01401.ver +++| ZJN SPP3 IF NOT PSEUDO-ASSIGNED TO NOS/VE
01562 M00S01402.ver +++| SPP2 LDN ESPP SET PP NOT ASSIGNED STATUS
01563 M00S01403.ver +++| STD PB+4
01564 M00S01404.ver +++| SPP3 STD CL+4 SET ERROR STATUS
01565 M00S01405.ver +++| RJM CPA WRITE RESPONSE
01566 M00S01406.ver +++| ADD LO
01567 M00S01407.ver +++| CWD CL
01568 M00S01408.ver +++| AOD LO INCREMENT LIST OFFSET
01569 M00S01409.ver +++| SBD PB+3
01570 M00S01410.ver +++| SBN 1
01571 M00S01411.ver +++| MJN SPP1 IF NOT END OF LIST
01572 M00S01412.ver +++| LJM SPPX RETURN
01573 M00S01413.ver +++| SCH SPACE 4,10
01574 M00S01414.ver +++|** FUNCTION 12 - STCH - STATUS OF NOS/VE CHANNELS.
01575 M00S01415.ver +++|*
01576 M00S01416.ver +++|* ENTRY (PB LIST ENTRY) = 6/CH, 54/0.
01577 M00S01417.ver +++|* (NEJT) = NOS/VE EJT ORDINAL.
01578 M00S01418.ver +++|*
01579 M00S01419.ver +++|* EXIT (PB+4) = ERROR STATUS.
01580 M00S01420.ver +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR STATUS.
01581 M00S01421.ver +++|*
01582 M00S01422.ver +++|* USES LO, PB+4, T2, CL - CL+4.
01583 M00S01423.ver +++|*
01584 M00S01424.ver +++|* CALLS CPA.
01585 M00S01425.ver +++|
01586 M00S01426.ver +++|
01587 M00S01427.ver +++| SCH5 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
01588 M00S01428.ver +++| STD PB+4
01589 M00S01429.ver +++|
01590 M00S01430.ver +++| SCH SUBR ENTRY/EXIT
01591 M00S01431.ver +++| LDD PB+3 CHECK PARAMETER BLOCK LENGTH
01592 M00S01432.ver +++| ZJN SCHX IF NO REQUEST
01593 M00S01433.ver +++| SBN NCTAL*5
01594 M00S01434.ver +++| PJN SCH5 IF LENGTH .GT. NUMBER OF CHANNELS
01595 M00S01435.ver +++| LDN NCTAL
01596 M00S01436.ver +++| STD LO
01597 M00S01437.ver +++| LDC ** FWA OF CHANNEL EJT ASSIGNMENT TABLE
01598 M00S01438.ver +++| SCHA EQU *-2
01599 M00S01439.ver +++| CRM CBUF,LO
01600 M00S01440.ver +++| LDN 1 INITIALIZE LIST OFFSET
01601 M00S01441.ver +++| STD LO
01602 M00S01442.ver +++| SCH1 RJM CPA READ NEXT LIST ENTRY
01603 M00S01443.ver +++| ADD LO
01604 M00S01444.ver +++| CRD CL
01605 M00S01445.ver +++| LDD CL
01606 M00S01446.ver +++| SHN -6
01607 M00S01447.ver +++| STD T2
01608 M00S01448.ver +++| SBN MXNC+1
01609 M00S01449.ver +++| MJN SCH2 IF VALID CHANNEL NUMBER
01610 M00S01450.ver +++| LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
01611 M00S01451.ver +++| STD PB+4
01612 M00S01452.ver +++| UJN SCH3 WRITE RESPONSE
01613 M00S01453.ver +++|
01614 M00S01454.ver +++| SCH2 LDM NEJT
01615 M00S01455.ver +++| LMM CBUF,T2
01616 M00S01456.ver +++| ZJN SCH3 IF CHANNEL RESERVED BY NOS/VE
01617 M00S01457.ver +++| LDN ESCH SET CHANNEL NOT RESERVED STATUS
01618 M00S01458.ver +++| STD PB+4
01619 M00S01459.ver +++| SCH3 STD CL+4 SET ERROR STATUS
01620 M00S01460.ver +++| RJM CPA WRITE RESPONSE
01621 M00S01461.ver +++| ADD LO
01622 M00S01462.ver +++| CWD CL
01623 M00S01463.ver +++| LDD CL+4
01624 M00S01464.ver +++| LMD TH CHECK IF *ESIR*
01625 M00S01465.ver +++| ZJN SCH4 IF ILLEGAL REQUEST
01626 M00S01466.ver +++| AOD LO INCREMENT LIST OFFSET
01627 M00S01467.ver +++| SBD PB+3
01628 M00S01468.ver +++| SBN 1
01629 M00S01469.ver +++| PJN SCH4 IF END OF LIST
01630 M00S01470.ver +++| LJM SCH1 PROCESS NEXT LIST ENTRY
01631 M00S01471.ver +++|
01632 M00S01472.ver +++| SCH4 LJM SCHX RETURN
Line S01473 Modification History
M01 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01633 M01S01473.ver13 ---| SEQ SPACE 4,10
01634 M01S01474.ver13 ---|** FUNCTION 13 - STEQ - STATUS NOS/VE EQUIPMENT.
01635 M01S01475.ver13 ---|*
01636 M01S01476.ver13 ---|* ENTRY (PB LIST ENTRY) = 6/CH, 6/EQ, 6/UN, 42/0.
01637 M01S01477.ver13 ---|*
01638 M01S01478.ver13 ---|* EXIT (PB+4) = ERROR STATUS.
01639 M01S01479.ver13 ---|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR STATUS.
01640 M01S01480.ver13 ---|*
01641 M01S01481.ver13 ---|* USES LO, PB+4, T2, CL - CL+4.
01642 M01S01482.ver13 ---|*
Line S01483 Modification History
M01 (Removed by) 271l716
M02 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01643 M02S01483.ver13 ---|* CALLS CCA, CPA, CUA, SEE, VET.
Line S00012 Modification History
M01 (Added by) 271l716
M02 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01644 M02S00012.ver13 ---|* CALLS CHA, CPA, CUA, SEE, VET.
Line S01484 Modification History
M01 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01645 M01S01484.ver13 ---|
01646 M01S01485.ver13 ---|
01647 M01S01486.ver13 ---| SEQ9 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*)
01648 M01S01487.ver13 ---| STD PB+4
01649 M01S01488.ver13 ---|
01650 M01S01489.ver13 ---| SEQ SUBR ENTRY/EXIT
01651 M01S01490.ver13 ---| LDD PB+3 CHECK BLOCK LENGTH
01652 M01S01491.ver13 ---| ZJN SEQX IF NO REQUEST
01653 M01S01492.ver13 ---| SBD LE
01654 M01S01493.ver13 ---| PJN SEQ9 IF BLOCK LONGER THAN EST LENGTH
01655 M01S01494.ver13 ---| LDN 1 INITIALIZE LIST OFFSET
01656 M01S01495.ver13 ---| STD LO
01657 M01S01496.ver13 ---| SEQ1 RJM CPA READ NEXT LIST ENTRY
01658 M01S01497.ver13 ---| ADD LO
01659 M01S01498.ver13 ---| CRD CL
01660 M01S01499.ver13 ---| RJM SEE SEARCH EST FOR EQUIPMENT
01661 M01S01500.ver13 ---| PJN SEQ2 IF EST ENTRY FOUND
01662 M01S01501.ver13 ---| LDN ESNE SET NOT IN EST STATUS
01663 M01S01502.ver13 ---| UJN SEQ5 WRITE RESPONSE
01664 M01S01503.ver13 ---|
01665 M01S01504.ver13 ---| SEQ2 RJM VET CHECK EQUIPMENT ASSIGNMENT
01666 M01S01505.ver13 ---| MJN SEQ4 IF EQUIPMENT ASSIGNED TO NOS/VE
01667 M01S01506.ver13 ---| SEQ3 LDN ESEQ SET EQUIPMENT NOT ASSIGNED STATUS
01668 M01S01507.ver13 ---| UJN SEQ5 WRITE RESPONSE
01669 M01S01508.ver13 ---|
01670 M01S01509.ver13 ---| SEQ4 LDD CL
01671 M01S01510.ver13 ---| SHN -6
01672 M01S01511.ver13 ---| STD T2
Line S01512 Modification History
M01 (Removed by) 271l716
M02 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01673 M02S01512.ver13 ---| RJM CCA CHECK CHANNEL ASSIGNMENT
Line S00013 Modification History
M01 (Added by) 271l716
M02 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01674 M02S00013.ver13 ---| RJM CHA CHECK CHANNEL ASSIGNMENT
Line S01513 Modification History
M01 (Removed by) ver13
Seq # *Modification Id* Act
----------------------------+
01675 M01S01513.ver13 ---| ZJN SEQ4.1 IF CHANNEL ASSIGNED
01676 M01S01514.ver13 ---| LDN ESCH SET CHANNEL NOT ASSIGNED STATUS
01677 M01S01515.ver13 ---| UJN SEQ5 WRITE RESPONSE
01678 M01S01516.ver13 ---|
01679 M01S01517.ver13 ---| SEQ4.1 RJM CUA CHECK UNIT ASSIGNMENT
01680 M01S01518.ver13 ---| MJN SEQ6 IF NOT MASS STORAGE DEVICE
01681 M01S01519.ver13 ---| SBN ESAA
01682 M01S01520.ver13 ---| ZJN SEQ7 IF UNIT ASSIGNED
01683 M01S01521.ver13 ---| LDN ESUN SET UNIT NOT ASSIGNED STATUS
01684 M01S01522.ver13 ---| SEQ5 STD PB+4
01685 M01S01523.ver13 ---| UJN SEQ7 WRITE RESPONSE
01686 M01S01524.ver13 ---|
01687 M01S01525.ver13 ---| SEQ6 LDN 0 CLEAR ERROR STATUS
01688 M01S01526.ver13 ---| SEQ7 STD CL+4
01689 M01S01527.ver13 ---| RJM CPA
01690 M01S01528.ver13 ---| ADD LO
01691 M01S01529.ver13 ---| CWD CL WRITE RESPONSE
01692 M01S01530.ver13 ---| AOD LO INCREMENT LIST OFFSET
01693 M01S01531.ver13 ---| SBD PB+3
01694 M01S01532.ver13 ---| SBN 1
01695 M01S01533.ver13 ---| PJN SEQ8 IF END OF LIST
01696 M01S01534.ver13 ---| LJM SEQ1 PROCESS NEXT LIST ENTRY
01697 M01S01535.ver13 ---|
01698 M01S01536.ver13 ---| SEQ8 LJM SEQX RETURN
01699 M00S01537.ver +++| SMR SPACE 4,15
01700 M00S01538.ver +++|** FUNCTION 14 - STMR - STATUS AVAILABLE RESOURCES.
01701 M00S01539.ver +++|*
01702 M00S01540.ver +++|* EXIT (PB LIST ENTRY) = 42/0, 18/NUMBER OF CM WORDS/1000B
01703 M00S01541.ver +++|* AVAILABLE.
01704 M00S01542.ver +++|* = 54/0, 6/NUMBER OF PP-S AVAILABLE.
01705 M00S01543.ver +++|*
Line S01544 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01706 M01S01544.ns2633 ---|* USES DA, DB, PB+4, CL - CL+4, CM - CM+4.
Line S00044 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01707 M01S00044.ns2633 +++|* USES DA, DB, PB+4, T1, CL - CL+4, CM - CM+4.
01708 M00S01545.ver +++|*
01709 M00S01546.ver +++|* CALLS CPA, GCC, GCP.
01710 M00S01547.ver +++|
01711 M00S01548.ver +++|
Line S01549 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01712 M01S01549.ns2633 ---| SMR3 LDC ESIL SET INSUFFICIENT LENGTH STATUS
Line S00045 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01713 M01S00045.ns2633 +++| SMR6 LDC ESIL SET INSUFFICIENT LENGTH STATUS
01714 M00S01550.ver +++| STD PB+4
01715 M00S01551.ver +++|
01716 M00S01552.ver +++| SMR SUBR ENTRY/EXIT
01717 M00S01553.ver +++| LDD PB+3 CHECK BLOCK LENGTH
01718 M00S01554.ver +++| SBN 2
Line S01555 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01719 M01S01555.ns2633 ---| MJN SMR3 IF INSUFFICIENT LENGTH FOR REPLY
Line S00046 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01720 M01S00046.ns2633 +++| MJN SMR6 IF INSUFFICIENT LENGTH FOR REPLY
01721 M00S01556.ver +++| LDN ZERL CLEAR RESPONSE
01722 M00S01557.ver +++| CRD CL
01723 M00S01558.ver +++| RJM GCC GET CURRENT NUMBER OF NOS/VE CM WORDS
Line S00047 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01724 M01S00047.ns2633 +++| LDD CM+3
01725 M01S00048.ns2633 +++| STD DA
01726 M01S00049.ns2633 +++| STD T1
01727 M01S00050.ns2633 +++| LDD CM+4
01728 M00S01559.ver +++| STD DB
Line S01560 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01729 M01S01560.ns2633 ---| SHN -14
01730 M01S01561.ns2633 ---| STD DA
01731 M00S01562.ver +++| LDC UEML CHECK FOR UEM
01732 M00S01563.ver +++| CRD CM
01733 M00S01564.ver +++| LDD CM+4
01734 M00S01565.ver +++| LPN 2
Line S01566 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01735 M01S01566.ns2633 ---| ZJN SMR1 IF UEM NOT PRESENT
01736 M01S01567.ns2633 ---| LDD CN+3 SUBTRACT CURRENT FROM BLOCK SIZE
01737 M01S01568.ns2633 ---| SBD DA
01738 M01S01569.ns2633 ---| SHN 14
01739 M01S01570.ns2633 ---| LMD CN+4
Line S00051 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01740 M01S00051.ns2633 +++| ZJN SMR2 IF UEM NOT PRESENT
01741 M01S00052.ns2633 +++| LDD CN+4 SUBTRACT CURRENT FROM BLOCK SIZE
01742 M00S01571.ver +++| SBD DB
01743 M00S01572.ver +++| STD CL+4
Line S01573 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01744 M01S01573.ns2633 ---| SHN -14
Line S00053 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01745 M01S00053.ns2633 +++| PJN SMR1 IF NO BORROW
01746 M01S00054.ns2633 +++| AOD T1 ADJUST FOR BORROW
01747 M01S00055.ns2633 +++| AOD CL+4
01748 M01S00056.ns2633 +++| SMR1 LDD CN+3
01749 M01S00057.ns2633 +++| SBD T1
01750 M00S01574.ver +++| STD CL+3
Line S01575 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01751 M01S01575.ns2633 ---| UJN SMR2 SET RESPONSE
Line S00058 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01752 M01S00058.ns2633 +++| LJM SMR5 SET RESPONSE
01753 M00S01576.ver +++|
Line S01577 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01754 M01S01577.ns2633 ---| SMR1 LDC MABL GET MACHINE FL/100B
Line S00059 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01755 M01S00059.ns2633 +++| SMR2 LDC MABL GET MACHINE FL/100B
01756 M00S01578.ver +++| CRD CM
01757 M00S01579.ver +++| LDD CM+2 FORM MACHINE FL/1000B
Line S00060 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01758 M01S00060.ns2633 +++| LPN 7
01759 M00S01580.ver +++| SHN 14
01760 M00S01581.ver +++| LMD CM+3
01761 M00S01582.ver +++| ADN 7
01762 M00S01583.ver +++| SHN -3
Line S01584 Modification History
M01 (Removed by) ns2633
Seq # *Modification Id* Act
----------------------------+
01763 M01S01584.ns2633 ---| SBD CN+2 FORM MACHINE FL - MINCM
Line S00061 Modification History
M01 (Added by) ns2633
Seq # *Modification Id* Act
----------------------------+
01764 M01S00061.ns2633 +++| STD CM+3
01765 M01S00062.ns2633 +++| SHN -14
01766 M01S00063.ns2633 +++| SHN 3
01767 M01S00064.ns2633 +++| ADD CM+2