cdc:nos2.source:opl.opl871:deck:1ri.001
Deck 1RI Part 001
15 Modifications
Listing Sections
- Deck 1RI Start
- Deck 1RI Part 1 (Line 1308)
- Deck 1RI Part 2 (Line 2599)
Source
Seq # *Modification Id* Act ----------------------------+
| Line S00130 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
M03 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01308 M03S00130.271l750 ---| LDM EJBF+SCLE*5 GET SERVICE CLASS
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
M03 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01309 M03S00131.271l750 ---| SHN -6
| Line S00132 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
M03 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01310 M03S00132.271l750 ---| RJM RJC GET JCB ADDRESS
| Line S00133 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
M03 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01311 M03S00133.271l750 ---| ADK SVJT GET UPPER BOUND CPU PRIORITY
| Line S00134 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
M03 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01312 M03S00134.271l750 ---| CRD CM
| Line S00135 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
M03 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01313 M03S00135.271l750 ---| LDD CM SET UPPER BOUND CPU PRIORITY
| Line S00136 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
M03 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01314 M03S00136.271l750 ---| LPN 77
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01315 M02S00008.271l750 ---| SHN -10
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01316 M02S00009.271l750 ---| NJN RCP3 IF NON-DECREMENTING CPU PRIORITY SET
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01317 M02S00010.271l750 ---| RCPH LDN 0 SET SERVICE CLASS UPPER BOUND PRIORITY
| Line S00137 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01318 M02S00137.271l750 ---| STM CBUF+5*JCIW 01319 M01S00138.271l716 +++| RCP3 LDC ** 01320 M01S01110.1ri +++| RCPA EQU *-1 (OLD CM FL SIZE)
| Line S01111 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01321 M02S01111.271l716 ---| NJN RCP1 IF CM FL WAS PREVIOUSLY ASSIGNED 01322 M01S00139.271l716 +++| NJN RCP4 IF CM FL WAS PREVIOUSLY ASSIGNED 01323 M01S01112.1ri +++|* LDN 0 (ON-LINE INTERACTIVE JOB STEP INITIATION) 01324 M01S01113.1ri +++| RCPB EQU *-1 01325 M01S01114.1ri +++| STM CBUF+5*EECW+1 CLEAR REPRIEVE OPTIONS 01326 M01S01115.1ri +++| STM CBUF+5*EECW+4 CLEAR ERROR EXIT ADDRESS 01327 M01S01116.1ri +++| LDM CBUF+5*EECW+3 01328 M01S01117.1ri +++| SCN 77 01329 M01S01118.1ri +++| STM CBUF+5*EECW+3 01330 M01S01119.1ri +++| LDM CBUF+5*CSPW CLEAR SUPPRESS ERROR MESSAGE FLAG 01331 M01S01120.1ri +++| SCN 40 01332 M01S01121.1ri +++| STM CBUF+5*CSPW 01333 M01S00140.271l716 +++| RCP4 LDM RCPF+1 COMPUTE CM SLICE TIME 01334 M01S00141.271l716 +++| ADD FS+1 01335 M01S00142.271l716 +++| STD CN+1 01336 M01S00143.271l716 +++| SHN -14 01337 M01S00144.271l716 +++| ADD FS 01338 M01S00145.271l716 +++| STD CN 01339 M01S00146.271l716 +++| LDD FS+1 COMPUTE CP SLICE TIME 01340 M01S00147.271l716 +++| ADM RCPF+4 01341 M01S00148.271l716 +++| STD CN+4 01342 M01S00149.271l716 +++| SHN -14 01343 M01S00150.271l716 +++| ADD FS 01344 M01S00151.271l716 +++| STD CN+3 01345 M01S00152.271l716 +++| LDD CP 01346 M01S00153.271l716 +++| ADK TSCW 01347 M01S00154.271l716 +++| CWD CN 01348 M01S00155.271l716 +++| LDM CBUF+5*STSW+2 SAVE CPU STATUS FLAG 01349 M01S00156.271l716 +++| LPN 2 01350 M01S00157.271l716 +++| RAM RIJF 01351 M01S00158.271l716 +++| LDM CBUF+5*STSW+4 SAVE PP RECALL COUNT 01352 M01S00159.271l716 +++| SHN -4 01353 M01S00160.271l716 +++| LPN 17 01354 M01S00161.271l716 +++| STM ERSF
| Line S00162 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01355 M02S00162.1ri30 ---| LDK ZERL
| Line S00163 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01356 M02S00163.1ri30 ---| CRM CBUF+5*STSW,ON 01357 M01S00011.1ri30 +++| 01358 M01S00012.1ri30 +++|* UPDATE STATUS WORD. 01359 M01S00013.1ri30 +++| 01360 M01S00014.1ri30 +++| LDN 0 01361 M01S00015.1ri30 +++| STM CBUF+5*STSW+1 01362 M01S00016.1ri30 +++| STM CBUF+5*STSW+3 01363 M01S00164.271l716 +++| LDN 1 SET PP ACTIVITY 01364 M01S00165.271l716 +++| STM CBUF+5*STSW 01365 M01S00166.271l716 +++| STM CBUF+5*STSW+4 SET RECALL COUNT
| Line S01122 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01366 M02S01122.1ri30 ---|
| Line S01123 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01367 M02S01123.1ri30 ---|* UPDATE ROLLOUT CONTROL FLAGS IN CASE JOB SUSPENSION REQUIRED.
| Line S01124 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01368 M02S01124.1ri30 ---|
| Line S01125 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
M03 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01369 M03S01125.1ri30 ---| RCP1 LDM CBUF+5*STSW+2
| Line S01126 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
M03 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01370 M03S01126.1ri30 ---| LPC 7777
| Line S01127 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
M03 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01371 M03S01127.1ri30 ---| RCPC EQU *-1 (ROLLOUT CONTROL FLAG MASK)
| Line S01128 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
M03 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01372 M03S01128.1ri30 ---| LMC **
| Line S00167 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01373 M02S00167.1ri30 ---| LDC ** 01374 M01S00017.1ri30 +++| LDC 0 01375 M01S01129.1ri +++| RCPD EQU *-1 (ROLLOUT CONTROL FLAGS TO BE SET)
| Line S01130 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01376 M02S01130.1ri30 ---| STM CBUF+5*STSW+2 01377 M01S00018.1ri30 +++| ZJN RCP4.1 IF NO ROLLOUT FLAGS TO SET 01378 M01S00019.1ri30 +++| LDM CBUF+5*STSW+2 01379 M01S00020.1ri30 +++| LPN 2 PRESERVE ROLLOUT CPU STATUS 01380 M01S00021.1ri30 +++| LMN 1 SET ROLLOUT REQUESTED 01381 M01S00022.1ri30 +++| LMM RCPD MERGE ROLLOUT FLAGS 01382 M01S00023.1ri30 +++| RCP4.1 STM CBUF+5*STSW+2 01383 M01S01131.1ri +++| 01384 M01S01132.1ri +++|* WRITE FIRST HALF OF CONTROL POINT AREA. 01385 M01S01133.1ri +++|
| Line S01134 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01386 M02S01134.271l716 ---| LDD CP 01387 M01S00168.271l716 +++| RCP5 LDD CP ENSURE *1SJ* *CCAM* IS COMPLETE 01388 M01S00169.271l716 +++| ADK STSW 01389 M01S00170.271l716 +++| CRD CM 01390 M01S00171.271l716 +++| SOD CM 01391 M01S00172.271l716 +++| ZJN RCP6 IF NO OTHER PP-S ASSIGNED
| Line S00173 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01392 M02S00173.273l780 ---|
| Line S00174 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01393 M02S00174.273l780 ---|* WARNING - IN THE CASE OF A PSEUDO-ROLLIN, IT IS NECESSARY
| Line S00175 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01394 M02S00175.273l780 ---|* THAT MODIFICATION OF THE CONTROL POINT FIELD LENGTH CONTROL
| Line S00176 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01395 M02S00176.273l780 ---|* WORDS BE INHIBITED BETWEEN THE TIME ROUTINE *UEP* READS
| Line S00177 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01396 M02S00177.273l780 ---|* THEM INTO THE PP AND THE TIME THE FIRST CPA SECTOR IS
| Line S00178 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01397 M02S00178.273l780 ---|* WRITTEN TO CM. THIS REQUIREMENT IMPLIES PROHIBITION OF
| Line S00179 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01398 M02S00179.273l780 ---|* STORAGE MOVING (OR RA/FL MODIFICATION) THE CP. TO MEET
| Line S00180 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01399 M02S00180.273l780 ---|* THIS REQUIREMENT, NO MOVABLE MONITOR FUNCTIONS MAY BE ISSUED
| Line S00181 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01400 M02S00181.273l780 ---|* AND THE *PAUSE* MACRO MUST NOT BE USED UNTIL AFTER THE CPA
| Line S00182 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01401 M02S00182.273l780 ---|* SECTOR IS WRITTEN TO CM.
| Line S00183 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01402 M02S00183.273l780 ---|* 01403 M01S00184.271l716 +++| DELAY 01404 M01S00185.271l716 +++| UJN RCP5 CHECK FOR COMPLETION OF *1SJ* *CCAM* 01405 M01S00186.271l716 +++| 01406 M01S00187.271l716 +++| RCP6 LDD CP 01407 M01S01135.1ri +++| CWM CBUF,HN 01408 M01S00188.271l716 +++| LDD PR 01409 M01S00189.271l716 +++| ZJN RCP8 IF PSEUDO-ROLLIN 01410 M01S01136.1ri +++| 01411 M01S01137.1ri +++|* UPDATE MASS STORAGE PRU LIMIT. 01412 M01S01138.1ri +++| 01413 M01S01139.1ri +++| LDM RCPE+3 01414 M01S01140.1ri +++| ADM RCPE+4
| Line S01141 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01415 M02S01141.271l716 ---| ZJN RCP2 IF NO PRUS RELEASED 01416 M01S00190.271l716 +++| ZJN RCP7 IF NO PRU-S RELEASED 01417 M01S01142.1ri +++| LDD MA STORE REQUEST IN MESSAGE BUFFER 01418 M01S01143.1ri +++| CWM RCPE,ON 01419 M01S01144.1ri +++| LDN 1 SET NUMBER OF REQUESTS AND NO DROP FLAG 01420 M01S01145.1ri +++| STD CM+1 01421 M01S01146.1ri +++| STD CM+2 01422 M01S01147.1ri +++| MONITOR UADM 01423 M01S01148.1ri +++| 01424 M01S01149.1ri +++|* CLEAR SECURE MEMORY IF NECESSARY. 01425 M01S01150.1ri +++|
| Line S01151 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01426 M02S01151.271l716 ---| RCP2 RJM CSM CLEAR SECURE MEMORY 01427 M01S00191.271l716 +++| RCP7 RJM CSM CLEAR SECURE MEMORY 01428 M01S01152.1ri +++| 01429 M01S01153.1ri +++|* FORCE SRU MULTIPLIER CALCULATION. 01430 M01S01154.1ri +++| 01431 M01S01155.1ri +++| LDN /CPS/ABSF 01432 M01S01156.1ri +++| STD CM+1 01433 M01S01157.1ri +++| MONITOR ACTM
| Line S01158 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01434 M02S01158.271l716 ---| LJM RCPX RETURN 01435 M01S00192.271l716 +++| RCP8 LJM RCPX RETURN 01436 M01S01159.1ri +++| 01437 M01S01160.1ri +++|* *UADM* PARAMETER BLOCK. 01438 M01S01161.1ri +++| 01439 M01S01162.1ri +++| RCPE CON /CPS/CICS 01440 M01S01163.1ri +++| CON ACLW 01441 M01S01164.1ri +++| CON 0*100+18D 01442 M01S01165.1ri +++| CON 0,0 01443 M01S01166.1ri +++| 01444 M01S01167.1ri +++| RCPF BSS 5 *TSCW* BUFFER 01445 M01S01168.1ri +++| RIM SPACE 4,15 01446 M01S01169.1ri +++|** RIM - ROLLIN MEMORY. 01447 M01S01170.1ri +++|* 01448 M01S01171.1ri +++|* ENTRY (A) = LWA TO ROLLIN. 01449 M01S01172.1ri +++|* (CI) = FWA TO ROLLIN. 01450 M01S01173.1ri +++|* (T5) = EQUIPMENT. 01451 M01S01174.1ri +++|* (T6) = CURRENT TRACK. 01452 M01S01175.1ri +++|* (T7) = CURRENT SECTOR. 01453 M01S01176.1ri +++|* 01454 M01S01177.1ri +++|* USES CI. 01455 M01S01178.1ri +++|* 01456 M01S01179.1ri +++|* CALLS RNS. 01457 M01S01180.1ri +++|* 01458 M01S01181.1ri +++|* NOTE ROUTINE *RIM* IS OVERWRITTEN WITH ROUTINE *RID* 01459 M01S01182.1ri +++|* IF THE ROLLOUT DEVICE SUPPORTS DIRECT DISK TRANSFERS. 01460 M01S01183.1ri +++| 01461 M01S01184.1ri +++| 01462 M01S01185.1ri +++| RIM SUBR ENTRY/EXIT 01463 M01S01186.1ri +++| STM RIMA 01464 M01S01187.1ri +++| SBD FL 01465 M01S01188.1ri +++| MJN RIM1 IF LWA .LT. FL 01466 M01S01189.1ri +++| LDD FL OVERRIDE ROLLIN FL 01467 M01S01190.1ri +++| STM RIMA 01468 M01S01191.1ri +++| RIM1 LDC BFMS READ A SECTOR 01469 M01S01192.1ri +++| RS1. RJM RNS 01470 M01S01193.1ri +++| ZJN RIM2 IF EOF 01471 M01S01194.1ri +++| LDD RA SET CM ADDRESS 01472 M01S01195.1ri +++| ADD CI 01473 M01S01196.1ri +++| SHN 6 01474 M01S01197.1ri +++| CWM BFMS+2,HN 01475 M01S01198.1ri +++| AOD CI 01476 M01S01199.1ri +++| LMC * 01477 M01S01200.1ri +++| RIMA EQU *-1 01478 M01S01201.1ri +++| NJN RIM1 IF LWA NOT REACHED 01479 M01S01202.1ri +++| RIM2 STM RNS CLEAR *RNS* SO *3RF* WILL NOT BE CONFUSED 01480 M01S01203.1ri +++| UJN RIMX RETURN 01481 M01S01204.1ri +++| 01482 M01S01205.1ri +++| RIML EQU *-RIMX LENGTH OF *RIM*
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01483 M02S00193.273l780 ---| RPC SPACE 4,15 01484 M01S00031.273l780 +++| RPC SPACE 4,10 01485 M01S00194.271l716 +++|** RPC - RELEASE PSEUDO-CONTROL POINT. 01486 M01S00195.271l716 +++|*
| Line S00196 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01487 M02S00196.273l780 ---|* THIS SUBROUTINE IS CALLED ONLY IF *1AJ* IS TO BE CALLED
| Line S00197 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01488 M02S00197.273l780 ---|* (RATHER THAN ISSUING A *JACM*) FOLLOWING A PSEUDO-ROLLIN.
| Line S00198 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01489 M02S00198.273l780 ---|*
| Line S00199 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01490 M02S00199.273l780 ---|* ENTRY (T6) = PCP NUMBER.
| Line S00200 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01491 M02S00200.273l780 ---|* 01492 M01S00201.271l716 +++|* USES CM - CM+4.
| Line S00202 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01493 M02S00202.273l780 ---|*
| Line S00203 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01494 M02S00203.273l780 ---|* MACROS LCPA. 01495 M01S00204.271l716 +++| 01496 M01S00205.271l716 +++| 01497 M01S00206.271l716 +++| RPC SUBR ENTRY/EXIT
| Line S00207 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01498 M02S00207.273l780 ---| LCPA TFSW,T6 01499 M01S00032.273l780 +++| TLDC TFSW,PCAD 01500 M01S00208.271l716 +++| CRD CM 01501 M01S00209.271l716 +++| LDN 0 CLEAR PCP ASSIGNMENT 01502 M01S00210.271l716 +++| STD CM
| Line S00211 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01503 M02S00211.273l780 ---| LCPA STSW,T6 01504 M01S00033.273l780 +++| TLDC STSW,PCAD 01505 M01S00212.271l716 +++| CWD ZR CLEAR PP/PCP ASSIGNMENT 01506 M01S00213.271l716 +++| ADK TFSW-STSW 01507 M01S00214.271l716 +++| CWD CM 01508 M01S00215.271l716 +++| UJP RPCX RETURN
| Line S01206 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01509 M02S01206.273l780 ---| SNS SPACE 4,15 01510 M01S00034.273l780 +++| SNS SPACE 4,20 01511 M01S01207.1ri +++|** SNS - SEND NOTIFICATION OF ROLLIN TO SCP. 01512 M01S01208.1ri +++|* 01513 M01S01209.1ri +++|* *SNS* NOTIFIES A PARTICULAR SCP TYPE SUBSYSTEM THAT A USER 01514 M01S01210.1ri +++|* JOB (UCP) HAS ROLLED IN. THIS RESPONSE OCCURS AS A RESULT 01515 M01S01211.1ri +++|* OF A PREVIOUS *SF.SWPI* FUNCTION ISSUED FROM A SYSTEM 01516 M01S01212.1ri +++|* CONTROL POINT (SCP). 01517 M01S01213.1ri +++|*
| Line S01214 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 1ri27 |
Seq # *Modification Id* Act ----------------------------+ 01518 M02S01214.1ri27 ---|* ENTRY (CJSB - CJSB+4) = *SCHE* WORD OF EJT ENTRY. 01519 M01S00002.1ri27 +++|* ENTRY (A) = REPLY CODE.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1ri27 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01520 M02S00003.273l780 ---|* (CJSB - CJSB+4) = *SCHE* WORD OF EJT ENTRY. 01521 M01S00035.273l780 +++|* (CJSC - CJSC+4) = SUBSYSTEM PARAMETERS. 01522 M01S01215.1ri +++|* *SCHE* FORMAT IS 30/,18/ ADDR,12/ SSID 01523 M01S01216.1ri +++|* ADDR = ADDRESS OF COMPLETION BIT WORD 01524 M01S01217.1ri +++|* SSID = SUBSYSTEM IDENTIFICATION NUMBER. 01525 M01S01218.1ri +++|* (EO) = EJT ORDINAL. 01526 M01S01219.1ri +++|* 01527 M01S01220.1ri +++|* USES T1, EF, CM - CM+4. 01528 M01S01221.1ri +++|*
| Line S01222 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01529 M02S01222.273l780 ---|* MACROS DELAY, MONITOR, SFA. 01530 M01S00036.273l780 +++|* MACROS DELAY, MONITOR PAUSE, SFA. 01531 M01S01223.1ri +++| 01532 M01S01224.1ri +++| 01533 M01S01225.1ri +++| SNS SUBR ENTRY/EXIT 01534 M01S00004.1ri27 +++| SHN 6 SAVE REPLY CODE 01535 M01S00005.1ri27 +++| STM SNSA 01536 M01S00006.1ri27 +++| NJN SNS1 IF ERROR RESPONSE 01537 M01S01226.1ri +++| LDD CP READ SCP CONTROL WORD 01538 M01S01227.1ri +++| ADK SSCW 01539 M01S01228.1ri +++| CRD CM 01540 M01S01229.1ri +++| LDN 5 INITIALIZE BYTE INDEX 01541 M01S01230.1ri +++| STD T1 01542 M01S01231.1ri +++| SNS0.1 SOD T1 01543 M01S01232.1ri +++| MJN SNSX IF SUBSYSTEM NOT FOUND 01544 M01S01233.1ri +++| LDM CM,T1 CHECK NEXT BYTE 01545 M01S01234.1ri +++| SHN -6 01546 M01S01235.1ri +++| ADC LSSI CALCULATE SUBSYSTEM ID
| Line S01236 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01547 M02S01236.271l716 ---| LMM CJSB+4 01548 M01S00216.271l716 +++| LMM CJSC+4 01549 M01S01237.1ri +++| NJN SNS0.1 IF NOT THIS SUBSYSTEM 01550 M01S01238.1ri +++| LDM CM,T1 CLEAR ROLLOUT ALLOWABLE FLAG 01551 M01S01239.1ri +++| SCN 20 01552 M01S01240.1ri +++| STM CM,T1 01553 M01S01241.1ri +++| LDD CP 01554 M01S01242.1ri +++| ADC SSCW 01555 M01S01243.1ri +++| CWD CM 01556 M01S01244.1ri +++| 01557 M01S01245.1ri +++|* ISSUE *TDAM* FUNCTION TO SET COMPLETION BIT. 01558 M01S01246.1ri +++|
| Line S01247 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01559 M02S01247.271l716 ---| SNS1 LDM CJSB+4 SET SUBSYSTEM ID FOR *TDAM* 01560 M01S00217.271l716 +++| SNS1 LDM CJSC+4 SET SUBSYSTEM ID FOR *TDAM* 01561 M01S01248.1ri +++| STD CM+2
| Line S01249 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01562 M02S01249.271l716 ---| LDM CJSB+3 SET COMPLETION BIT ADDRESS FOR *TDAM* 01563 M01S00218.271l716 +++| LDM CJSC+3 SET COMPLETION BIT ADDRESS FOR *TDAM* 01564 M01S01250.1ri +++| STD CM+4
| Line S01251 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01565 M02S01251.271l716 ---| LDM CJSB+2 01566 M01S00219.271l716 +++| LDM CJSC+2 01567 M01S01252.1ri +++| LPN 77 01568 M01S00007.1ri27 +++| LMC ** 01569 M01S00008.1ri27 +++| SNSA EQU *-1 01570 M01S01253.1ri +++| STD CM+3 01571 M01S01254.1ri +++| LDN 2 SET *TDAM* SUBFUNCTION 01572 M01S01255.1ri +++| STD CM+1 01573 M01S01256.1ri +++| MONITOR TDAM 01574 M01S01257.1ri +++| LDD CM+1 01575 M01S01258.1ri +++| ZJN SNS3 IF NO REJECT 01576 M01S01259.1ri +++| SBN 4 01577 M01S01260.1ri +++| ZJN SNS3 IF SCP INACTIVE 01578 M01S01261.1ri +++| PJN SNS2 IF INCORRECT COMPLETION ADDRESS 01579 M01S01262.1ri +++| PAUSE ST 01580 M01S01263.1ri +++| DELAY 01581 M01S01264.1ri +++| SFA EJT,EO READ ERROR FLAG WORD OF EJT ENTRY 01582 M01S01265.1ri +++| ADN PRFE 01583 M01S01266.1ri +++| CRD CM 01584 M01S01267.1ri +++| LDD CM+1 01585 M01S01268.1ri +++| LMN ORET 01586 M01S01269.1ri +++| ZJN SNS3 IF OPERATOR INTERVENTION 01587 M01S01270.1ri +++| LJM SNS1 REISSUE REQUEST 01588 M01S01271.1ri +++| 01589 M01S01272.1ri +++| SNS2 LDN ITET SET INCORRECT TRANSFER ADDRESS ERROR FLAG 01590 M01S01273.1ri +++| SBD EF 01591 M01S01274.1ri +++| MJN SNS3 IF LARGER ERROR FLAG ALREADY SET 01592 M01S01275.1ri +++| LDN ITET SET INCORRECT TRANSFER ADDRESS ERROR FLAG 01593 M01S01276.1ri +++| STD EF 01594 M01S01277.1ri +++| SNS3 LJM SNSX RETURN 01595 M01S01278.1ri +++| SYS SPACE 4,10 01596 M01S01279.1ri +++|** SYS - READ SYSTEM SECTOR. 01597 M01S01280.1ri +++|* 01598 M01S01281.1ri +++|* ENTRY I/O SEQUENCE INITIATED. 01599 M01S01282.1ri +++|* 01600 M01S01283.1ri +++|* USES T7. 01601 M01S01284.1ri +++|* 01602 M01S01285.1ri +++|* CALLS MSR, RNS. 01603 M01S01286.1ri +++|* 01604 M01S01287.1ri +++|* ERROR TO *MSR* IF INVALID SYSTEM SECTOR. 01605 M01S01288.1ri +++| 01606 M01S01289.1ri +++| 01607 M01S01290.1ri +++| SYS SUBR ENTRY 01608 M01S01291.1ri +++| LDC SBUF-2 READ SYSTEM SECTOR 01609 M01S01292.1ri +++| RJM RNS 01610 M01S01293.1ri +++| LDN FSMS SET FIRST SECTOR 01611 M01S01294.1ri +++| STD T7 01612 M01S01295.1ri +++| LDD T1 CHECK WORD COUNT 01613 M01S01296.1ri +++| LMN 77 01614 M01S01297.1ri +++| NJN SYS1 IF NOT SYSTEM SECTOR 01615 M01S01298.1ri +++| LDI T3 01616 M01S01299.1ri +++| LMC 3777
| Line S01300 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01617 M02S01300.271l716 ---| ZJN SYSX IF VALID SYSTEM SECTOR 01618 M01S00220.271l716 +++| NJN SYS1 IF NOT VALID SYSTEM SECTOR 01619 M01S00221.271l716 +++| LDM SBUF+TYSS*5+4 01620 M01S00222.271l716 +++| SHN -6
| Line S00223 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01621 M02S00223.ns2685 ---| SYSA LMN ROFT
| Line S00224 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01622 M02S00224.ns2685 ---|* LMN LOFT (*DMP=* ROLLIN)
| Line S00225 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01623 M02S00225.ns2685 ---| ZJN SYSX IF CORRECT FILE TYPE 01624 M01S00002.ns2685 +++| LMN ROFT 01625 M01S00003.ns2685 +++| NJN SYS1 IF NOT ROLLOUT FILE 01626 M01S00004.ns2685 +++| LDM SBUF+DMFA 01627 M01S00005.ns2685 +++| SYSA ZJN SYSX IF NOT DM* ROLLOUT FILE (NORMAL ROLLIN) 01628 M01S00006.ns2685 +++|* NJN SYSX IF DM* ROLLOUT FILE (*DMP=* ROLLIN) 01629 M01S01301.1ri +++| SYS1 RJM MSR PROCESS ERROR - NO RETURN 01630 M01S01302.1ri +++| RJM HNG HANG PP 01631 M01S00226.271l716 +++| TCP SPACE 4,10 01632 M01S00227.271l716 +++|** TCP - TRANSFER PCPA TO CPA. 01633 M01S00228.271l716 +++|*
| Line S00229 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01634 M02S00229.273l780 ---|* ENTRY (T6) = PCP NUMBER.
| Line S00230 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01635 M02S00230.273l780 ---|*
| Line S00231 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01636 M02S00231.273l780 ---|* MACROS LCPA. 01637 M01S00037.273l780 +++|* EXIT CONTROL POINT AREA SET FROM PCP. 01638 M01S00232.271l716 +++| 01639 M01S00233.271l716 +++| 01640 M01S00234.271l716 +++| TCP SUBR ENTRY/EXIT
| Line S00235 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01641 M02S00235.273l780 ---| LCPA 0,T6 COMPUTE PCPA ADDRESS 01642 M01S00038.273l780 +++| TLDC 0,PCAD COMPUTE PCPA ADDRESS 01643 M01S00236.271l716 +++| CRM CBUF,HN READ FIRST HALF OF PCPA 01644 M01S00237.271l716 +++| CRM BFMS+2,HN READ SECOND HALF OF PCPA 01645 M01S00238.271l716 +++| LDD CP WRITE SECOND HALF OF PCPA TO CPA 01646 M01S00239.271l716 +++| ADD HN 01647 M01S00240.271l716 +++| CWM BFMS+2,HN 01648 M01S00241.271l716 +++| UJN TCPX RETURN 01649 M01S01303.1ri +++| UEP SPACE 4,10 01650 M01S01304.1ri +++|** UEP - UPDATE EXCHANGE PACKAGE. 01651 M01S01305.1ri +++|* 01652 M01S01306.1ri +++|* ENTRY (RA) = ADJUSTED RA. 01653 M01S01307.1ri +++|* (FL) = ADJUSTED CM FL. 01654 M01S01308.1ri +++| 01655 M01S01309.1ri +++| 01656 M01S01310.1ri +++| UEP SUBR ENTRY/EXIT
| Line S01311 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01657 M02S01311.271l716 ---| LDD CP READ *FLSW* AND *FLSW+1*
| Line S01312 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01658 M02S01312.271l716 ---| ADN FLSW
| Line S01313 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01659 M02S01313.271l716 ---| CRM CBUF+5*FLSW,TW
| Line S01314 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01660 M02S01314.271l716 ---| ADN ECSW-FLSW-2
| Line S01315 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01661 M02S01315.271l716 ---| CRM CBUF+5*ECSW,ON 01662 M01S00242.271l716 +++| LDD CP READ FIELD LENGTH CONTROL WORDS 01663 M01S00243.271l716 +++| ADK FLSW 01664 M01S00244.271l716 +++| CRM CBUF+5*FLSW,TR 01665 M01S00245.271l716 +++| ERRNZ ECSW-FLSW-2 CODE DEPENDS ON VALUE 01666 M01S01316.1ri +++| LDM CBUF+5*FLSW+3 SET RA IN EXCHANGE PACKAGE 01667 M01S01317.1ri +++| SHN 6 01668 M01S01318.1ri +++| STM CBUF+5*1+1 01669 M01S01319.1ri +++| LMM CBUF+5*FLSW+2 01670 M01S01320.1ri +++| SHN 6 01671 M01S01321.1ri +++| STM CBUF+5*1 01672 M01S01322.1ri +++| LDD FL STORE FL IN EXCHANGE PACKAGE 01673 M01S01323.1ri +++| SHN 6 01674 M01S01324.1ri +++| STM CBUF+5*2+1 01675 M01S01325.1ri +++| SHN -14 01676 M01S01326.1ri +++| STM CBUF+5*2 01677 M01S01327.1ri +++| LDM CBUF+5*3 ENSURE MONITOR MODE NOT SET (CYBER 176) 01678 M01S01328.1ri +++| LPC 7627 01679 M01S01329.1ri +++| STM CBUF+5*3 01680 M01S01330.1ri +++| LDM CBUF+5*ECSW+4 01681 M01S01331.1ri +++| ZJP UEP3 IF NO EXTENDED MEMORY ASSIGNED 01682 M01S01332.1ri +++| LDK UEML READ UEM BASE ADDRESS/1000B 01683 M01S01333.1ri +++| CRD CM 01684 M01S01334.1ri +++| LDD CM+4 01685 M01S01335.1ri +++| LPN 2 01686 M01S01336.1ri +++| ZJN UEP1 IF NO UEM 01687 M01S01337.1ri +++| LDD CM 01688 M01S01338.1ri +++| UEP1 STD T0 01689 M01S01339.1ri +++| LDM CBUF+5*ECSW+2 SET RAE 01690 M01S01340.1ri +++| SHN 14 01691 M01S01341.1ri +++| ADM CBUF+5*ECSW+3 01692 M01S01342.1ri +++| UEPA SHN 0 01693 M01S01343.1ri +++|* SHN UESC (CONVERT TO 1000B-WORD BLOCKS) 01694 M01S01344.1ri +++| ADD T0 01695 M01S01345.1ri +++| SHN 17 01696 M01S01346.1ri +++| STM CBUF+5*4 01697 M01S01347.1ri +++| SHN -6 01698 M01S01348.1ri +++| SCN 77 01699 M01S01349.1ri +++| STM CBUF+5*4+1 01700 M01S01350.1ri +++| LDM CBUF+5*ECSW+4 SET FLE 01701 M01S01351.1ri +++| UEPB SHN 17 01702 M01S01352.1ri +++|* SHN 17+UESC (ALLOW FOR USER EM SHIFT) 01703 M01S01353.1ri +++| STM CBUF+5*5 01704 M01S01354.1ri +++| SHN -6 01705 M01S01355.1ri +++| SCN 77 01706 M01S01356.1ri +++| STM CBUF+5*5+1 01707 M01S01357.1ri +++| UEPC UJN UEP3 CONTINUE (STANDARD ADDRESSING) 01708 M01S01358.1ri +++|* PSN (IF EXPANDED ADDRESSING MODE) 01709 M01S01359.1ri +++| 01710 M01S01360.1ri +++| LDM CBUF+5*4 RESET RAE 01711 M01S01361.1ri +++| SHN 14 01712 M01S01362.1ri +++| STM CBUF+5*4 01713 M01S01363.1ri +++| SCN 77 01714 M01S01364.1ri +++| ADM CBUF+5*4+1 01715 M01S01365.1ri +++| SHN -6 01716 M01S01366.1ri +++| STM CBUF+5*4+1 01717 M01S01367.1ri +++| LDM CBUF+5*5 RESET FLE 01718 M01S01368.1ri +++| SHN 14 01719 M01S01369.1ri +++| STM CBUF+5*5 01720 M01S01370.1ri +++| SCN 77 01721 M01S01371.1ri +++| ADM CBUF+5*5+1 01722 M01S01372.1ri +++| SHN -6 01723 M01S01373.1ri +++| STM CBUF+5*5+1 01724 M01S01374.1ri +++| UEP3 LDD CP STORE MA IN EXCHANGE PACKAGE 01725 M01S01375.1ri +++| STM CBUF+5*6+1 01726 M01S01376.1ri +++| STM CBUF+5*7+1 STORE EA IN EXCHANGE PACKAGE 01727 M01S01377.1ri +++| SHN -14 01728 M01S01378.1ri +++| STM CBUF+5*6 01729 M01S01379.1ri +++| STM CBUF+5*7 01730 M01S01380.1ri +++| LJM UEPX RETURN 01731 M01S01381.1ri +++| SPACE 4,10 01732 M01S01382.1ri +++|* COMMON DECKS. 01733 M01S01383.1ri +++| 01734 M01S01384.1ri +++| 01735 M01S01385.1ri +++| EOR$ EQU 0 SET TO POSITION AFTER EOR,S ON READ 01736 M01S01386.1ri +++| MSR$ EQU 0 SET FOR PROCESSSING MASS STORAGE ERRORS 01737 M01S00246.271l716 +++| LIST X 01738 M01S01387.1ri +++|*CALL COMPDDT 01739 M01S00247.271l716 +++| LIST * 01740 M01S01388.1ri +++| EJT$ EQU 1 ASSEMBLE EJT ADDRESSING (COMPGFP) 01741 M01S01389.1ri +++| IFP$ EQU 1 ASSEMBLE REMOTE INITIALIZATION (COMPGFP) 01742 M01S01390.1ri +++|*CALL COMPGFP
| Line S00248 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01743 M02S00248.273l780 ---|*CALL COMPPCP
| Line S00249 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01744 M02S00249.1ri30 ---|*CALL COMPRJC 01745 M01S01391.1ri +++|*CALL COMPRNS 01746 M01S01392.1ri +++| USE OVERLAY 01747 M01S01393.1ri +++| SPACE 4,10 01748 M01S01394.1ri +++|** BUFFER ASIGNMENTS. 01749 M01S01395.1ri +++| 01750 M01S01396.1ri +++| 01751 M01S01397.1ri +++| SBUF EQU *+2 SYSTEM SECTOR 01752 M01S01398.1ri +++| CBUF EQU SBUF+502 FIRST PART OF CONTROL POINT AREA 01753 M01S01399.1ri +++| EJBF EQU CBUF+502 EJT ENTRY 01754 M01S01400.1ri +++| EBUF EQU EJBF+5*EJTE 01755 M01S01401.1ri +++| E1RI EQU EBUF+5 OVERLAYS ORIGIN 01756 M01S01402.1ri +++| TITLE PRESET. 01757 M01S01403.1ri +++| PRS SPACE 4,25 01758 M01S01404.1ri +++|** PRS - PRESET. 01759 M01S01405.1ri +++|* 01760 M01S01406.1ri +++|* EXIT (T5) = ROLLOUT/DM* FILE EQUIPMENT. 01761 M01S01407.1ri +++|* (T6) = ROLLOUT/DM* FILE FIRST TRACK.
| Line S00250 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01762 M02S00250.273l780 ---|* = PCP NUMBER IF PSEUDO-ROLLIN. 01763 M01S01408.1ri +++|* (T7) = 0. 01764 M01S01409.1ri +++|* (DI) = *UJNI*+2. 01765 M01S00251.271l716 +++|* (PR) = 0 IF PSEUDO-ROLLIN. 01766 M01S01410.1ri +++|* (TW) = 2. 01767 M01S01411.1ri +++|* (ZR - ZR+4) = 0. 01768 M01S01412.1ri +++|* (EO) = EJT ORDINAL (NON-DMP= CALL). 01769 M01S01413.1ri +++|* (EJBF - EJBF+5*EJTE-1) = EJT ENTRY (NON-DMP= CALL). 01770 M01S01414.1ri +++|* (EF) = ERROR FLAG FROM EJT (NON-DMP= CALL) / CPA 01771 M01S01415.1ri +++|* (DMP= CALL). 01772 M01S01416.1ri +++|* (EP) = SPECIAL ENTRY POINT FLAGS. 01773 M01S01417.1ri +++|* (FA) = DM* FILE FNT ADDRESS/OFFSET (DMP= CALL).
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01774 M02S00024.271l750 ---|* (RCPH) = SERVICE CLASS UPPER BOUND CPU PRIORITY. 01775 M01S01418.1ri +++|* 01776 M01S01419.1ri +++|* USES T1, T5 - T7, CM - CM+4, CN - CN+4, FS - FS+4, EO, DI, 01777 M01S01420.1ri +++|* EF, EP, FA, ZR - ZR+4. 01778 M01S01421.1ri +++|*
| Line S01422 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01779 M02S01422.1ri30 ---|* CALLS IFP, 3RG, 3RH.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01780 M02S00025.273l780 ---|* CALLS IFP, RJC, 3RG, 3RH. 01781 M01S00039.273l780 +++|* CALLS IFP, SIC, 3RG, 3RH. 01782 M01S01423.1ri +++|*
| Line S01424 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01783 M02S01424.271l716 ---|* MACROS CFI, EXECUTE, NFA, SFA.
| Line S00252 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01784 M02S00252.273l780 ---|* MACROS CFI, DELAY, EXECUTE, IPCP, ISTORE, NFA, SFA. 01785 M01S00040.273l780 +++|* MACROS CFI, DELAY, EXECUTE, ISTORE, NFA, SFA, SIC. 01786 M01S01425.1ri +++| 01787 M01S01426.1ri +++| 01788 M01S01427.1ri +++| PRS SUBR ENTRY/EXIT
| Line S01428 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01789 M02S01428.271l716 ---| LDK MEFL 01790 M01S00253.271l716 +++| RJM IFP INITIALIZE ROUTINE *CEA* OF *COMPGFP* 01791 M01S00254.271l716 +++| LDC UJNI+2 01792 M01S00255.271l716 +++| STD DI 01793 M01S00256.271l716 +++| LDN 2 SET CONSTANT 2 01794 M01S00257.271l716 +++| STD TW 01795 M01S00258.271l716 +++| LDN ZERL CLEAR CM ZERO WORD 01796 M01S00259.271l716 +++| CRD ZR 01797 M01S00260.271l716 +++| LDD CP 01798 M01S00261.271l716 +++| ADK TFSW GET EJT ORDINAL 01799 M01S00262.271l716 +++| CRD CM 01800 M01S00263.271l716 +++| ADK SEPW-TFSW 01801 M01S00264.271l716 +++| CRD CN 01802 M01S00265.271l716 +++| ADK TSCW-SEPW SAVE *TSCW* 01803 M01S00266.271l716 +++| CRM RCPF,ON 01804 M01S00267.271l716 +++| LDN EJTE 01805 M01S00268.271l716 +++| STD T1 01806 M01S00269.271l716 +++| LDD CM SAVE EJT ORDINAL 01807 M01S00270.271l716 +++| STD EO 01808 M01S00271.271l716 +++| SFA EJT,EO READ EJT ENTRY 01809 M01S00272.271l716 +++| CRM EJBF,T1
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01810 M02S00273.273l780 ---| LDM EJBF+5*PRFE+1 SAVE ERROR FLAG 01811 M01S00041.273l780 +++| LDM EJBF+5*JSNE+4 SET PSEUDO-ROLLIN FLAG 01812 M01S00042.273l780 +++| LPN 76 01813 M01S00043.273l780 +++| LMK PCJS*2 01814 M01S00044.273l780 +++| STD PR 01815 M01S00045.273l780 +++| NJN PRS0.1 IF NOT PSEUDO-ROLLIN 01816 M01S00046.273l780 +++| LDK NCPL GET NUMBER OF CONTROL POINTS 01817 M01S00047.273l780 +++| CRD T1 01818 M01S00048.273l780 +++| ADK PCPP-NCPL GET PCP AREA POINTER 01819 M01S00049.273l780 +++| CRD CM 01820 M01S00050.273l780 +++| LDM EJBF+5*SCHE+1 PCP NUMBER 01821 M01S00051.273l780 +++| SBD T1+1 01822 M01S00052.273l780 +++| SBN 2 01823 M01S00053.273l780 +++| SHN 7 PCP AREA OFFSET 01824 M01S00054.273l780 +++| RAD CM+4 SET PCP ADDRESS 01825 M01S00055.273l780 +++| SHN -14 01826 M01S00056.273l780 +++| RAD CM+3 01827 M01S00057.273l780 +++| LDC TSIC SET INSTRUCTION RELOCATION TABLE ADDRESS 01828 M01S00058.273l780 +++| RJM SIC RELOCATE INSTRUCTIONS 01829 M01S00059.273l780 +++| PRS0.1 LDM EJBF+5*PRFE+1 SAVE ERROR FLAG 01830 M01S00274.271l716 +++| STD EF
| Line S00275 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01831 M02S00275.273l780 ---| LDD CP STORE CP NUMBER IN *RCXM* REQUEST
| Line S00276 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01832 M02S00276.273l780 ---| SHN -7
| Line S00277 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01833 M02S00277.273l780 ---| STM JECB+2 01834 M01S00278.271l716 +++| LDK MEFL 01835 M01S01429.1ri +++| CRD CM 01836 M01S01430.1ri +++| LDD CM+2 GET USER EM SHIFT COUNT (UESC) 01837 M01S01431.1ri +++| SHN -11 01838 M01S01432.1ri +++| RAM JECC 01839 M01S01433.1ri +++| STM UEPA 01840 M01S01434.1ri +++| ADN 17 01841 M01S01435.1ri +++| STM UEPB 01842 M01S01436.1ri +++| LDD CM+2
| Line S01437 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01843 M02S01437.271l716 ---| LPC 200
| Line S01438 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01844 M02S01438.271l716 ---| ZJP PRS0 IF STANDARD ADDRESSING MODE 01845 M01S00279.271l716 +++| SHN 21-7 01846 M01S00280.271l716 +++| PJN PRS1 IF STANDARD ADDRESSING MODE 01847 M01S01439.1ri +++| LDN PSNI 01848 M01S01440.1ri +++| STM UEPC ENABLE EXPANDED ADDRESSING MODE
| Line S01441 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01849 M02S01441.271l716 ---| PRS0 RJM IFP INITIALIZE ROUTINE *CEA* OF *COMPGFP*
| Line S01442 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01850 M02S01442.271l716 ---| LDC UJNI+2
| Line S01443 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01851 M02S01443.271l716 ---| STD DI
| Line S01444 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01852 M02S01444.271l716 ---| LDN 2 SET CONSTANT 2
| Line S01445 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01853 M02S01445.271l716 ---| STD TW
| Line S01446 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01854 M02S01446.271l716 ---| LDN ZERL CLEAR CM ZERO WORD
| Line S01447 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01855 M02S01447.271l716 ---| CRD ZR
| Line S01448 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01856 M02S01448.271l716 ---| LDD CP
| Line S01449 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01857 M02S01449.271l716 ---| ADK TFSW READ EJT ORDINAL WORD
| Line S01450 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01858 M02S01450.271l716 ---| CRD CM
| Line S01451 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01859 M02S01451.271l716 ---| ADK SEPW-TFSW
| Line S01452 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01860 M02S01452.271l716 ---| CRD CN
| Line S01453 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01861 M02S01453.271l716 ---| ADK TSCW-SEPW SAVE *TSCW*
| Line S01454 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01862 M02S01454.271l716 ---| CRM RCPF,ON
| Line S01455 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01863 M02S01455.271l716 ---| LDN EJTE SET EJT ENTRY LENGTH
| Line S01456 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01864 M02S01456.271l716 ---| STD T1
| Line S01457 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01865 M02S01457.271l716 ---| LDD CM SAVE EJT ORDINAL
| Line S01458 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01866 M02S01458.271l716 ---| STD EO
| Line S01459 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01867 M02S01459.271l716 ---| SFA EJT,EO
| Line S01460 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01868 M02S01460.271l716 ---| CRM EJBF,T1
| Line S01461 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01869 M02S01461.271l716 ---| LDD CN SAVE SPECIAL ENTRY POINT FLAGS 01870 M01S00281.271l716 +++| PRS1 LDD CN SAVE SPECIAL ENTRY POINT FLAGS 01871 M01S01462.1ri +++| STD EP
| Line S01463 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | ns2738 |
Seq # *Modification Id* Act ----------------------------+ 01872 M02S01463.ns2738 ---| LDD IR+2 01873 M01S00010.ns2738 +++| LDN ACPL CHECK DUAL CPU AVAILABILITY 01874 M01S00011.ns2738 +++| CRD CM 01875 M01S00012.ns2738 +++| ADN 1 01876 M01S00013.ns2738 +++| CRD FS 01877 M01S00014.ns2738 +++| LDD CM 01878 M01S00015.ns2738 +++| LMD FS 01879 M01S00016.ns2738 +++| SHN 6 01880 M01S00017.ns2738 +++| MJN PRS1.1 IF ONLY ONE CPU AVAILABLE 01881 M01S00018.ns2738 +++| ISTORE PCSA,(UJN PCSX) SET TO PRESERVE CPU SELECTION 01882 M01S00019.ns2738 +++| PRS1.1 LDD IR+2
| Line S01464 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01883 M02S01464.271l716 ---| ZJN PRS1 IF NOT DMP= CALL 01884 M01S00282.271l716 +++| ZJN PRS2 IF NOT *DMP=* CALL 01885 M01S01465.1ri +++| AOM CJSA SET *DMP=* FLAG 01886 M01S01466.1ri +++| LDD IR+4 SAVE DM* FILE FNT ADDRESS/OFFSET 01887 M01S01467.1ri +++| STD FA 01888 M01S01468.1ri +++| NFA FA,R READ DM* FILE FST ENTRY 01889 M01S01469.1ri +++| ADN FSTL 01890 M01S01470.1ri +++| CRM EJBF+5*SCHE,ON
| Line S00283 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01891 M02S00283.ns2685 ---| LDN LOFT-ROFT
| Line S00284 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01892 M02S00284.ns2685 ---| ERRNG LOFT-ROFT CODE DEPENDS ON VALUE
| Line S00285 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01893 M02S00285.ns2685 ---| RAM SYSA SET LOCAL FILE TYPE FOR VERIFICATION 01894 M01S00007.ns2685 +++| ISTORE SYSA,(NJN SYSX) SET DM* FILE TEST
| Line S01471 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01895 M02S01471.271l716 ---| LJM PRS2 CONTINUE 01896 M01S00286.271l716 +++| LJM PRS4 CONTINUE 01897 M01S01472.1ri +++|
| Line S01473 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01898 M02S01473.271l716 ---| PRS1 LDD CP 01899 M01S00287.271l716 +++| PRS2 LDD CP
| Line S01474 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01900 M02S01474.271l716 ---| CRM CJSB,ON READ POSSIBLE *SIJS* PARAMETER 01901 M01S00288.271l716 +++| CRM CJSC,ON READ *SIJS* PARAMETERS 01902 M01S01475.1ri +++| LDM EJBF+5*JSNE+4 SAVE CONNECTION STATUS 01903 M01S01476.1ri +++| LPC 3600
| Line S01477 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01904 M02S01477.271l716 ---| SHN -1
| Line S01478 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01905 M02S01478.271l716 ---| RAM CJSC+5*0+4 01906 M01S00289.271l716 +++| RAM CJSD
| Line S01479 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01907 M02S01479.271l716 ---| LDM EJBF+5*PRFE+1 SAVE ERROR FLAG
| Line S01480 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01908 M02S01480.271l716 ---| STD EF
| Line S01481 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01909 M02S01481.271l716 ---| LDM EJBF+5*SCLE
| Line S00290 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01910 M02S00290.273l780 ---| LDM EJBF+5*JSNE+4 SET PSEUDO-ROLLIN FLAG
| Line S00291 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01911 M02S00291.273l780 ---| LPN 76
| Line S00292 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01912 M02S00292.273l780 ---| LMK PCJS*2
| Line S00293 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01913 M02S00293.273l780 ---| STD PR 01914 M01S00060.273l780 +++| LDD PR 01915 M01S00294.271l716 +++| NJP PRS3 IF NOT PSEUDO-ROLLIN
| Line S00295 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01916 M02S00295.273l780 ---| IPCP INITIALIZE *COMPPCP* ROUTINES 01917 M01S00296.271l716 +++| ISTORE RIJG,(UJN RIJ1) 01918 M01S00297.271l716 +++| LDC TCP 01919 M01S00298.271l716 +++| STM CPAI*2+SEQ+1 01920 M01S00299.271l716 +++| ISTORE TOPI*2+SEQ,(UJN RIJ2.1)
| Line S00300 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01921 M02S00300.273l780 ---| LDD DI 01922 M01S00061.273l780 +++| LDC RPC 01923 M01S00301.271l716 +++| STM CJSB 01924 M01S00302.271l716 +++| ISTORE RIJJ,(UJN RIJ3)
| Line S00303 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01925 M02S00303.273l780 ---| LDC RJMI
| Line S00304 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01926 M02S00304.273l780 ---| STM RIJK
| Line S00305 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01927 M02S00305.273l780 ---| LDC 4000 SELECT ALTERNATE CP/PCP *JACM* OPTION
| Line S00306 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01928 M02S00306.273l780 ---| STM JECB+1
| Line S00307 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01929 M02S00307.273l780 ---| RAM RIJH
| Line S00308 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01930 M02S00308.273l780 ---| LDM EJBF+5*SCHE+1 SET PSEUDO-CONTROL POINT
| Line S00309 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01931 M02S00309.273l780 ---| STD T6
| Line S00310 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01932 M02S00310.273l780 ---| STM JECB+2
| Line S00311 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01933 M02S00311.273l780 ---| LDK NCPL SET NUMBER OF CONTROL POINTS
| Line S00312 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01934 M02S00312.273l780 ---| CRD CM
| Line S00313 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01935 M02S00313.273l780 ---| AOD CM+1
| Line S00314 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01936 M02S00314.273l780 ---| STD NC 01937 M01S00315.271l716 +++| LJM PRSX EXIT 01938 M01S00316.271l716 +++| 01939 M01S00317.271l716 +++| PRS3 LDM EJBF+5*SCLE
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01940 M02S00026.271l750 ---| SHN -6
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01941 M02S00027.271l750 ---| RJM RJC GET JCB ENTRY ADDRESS
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01942 M02S00028.271l750 ---| ADK SVJT GET CPU PRIORITY BOUNDS
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01943 M02S00029.271l750 ---| CRD CM
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01944 M02S00030.271l750 ---| LDD CM SET UPPER BOUND CPU PRIORITY
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01945 M02S00031.271l750 ---| LPN 77
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01946 M02S00032.271l750 ---| RAM RCPH
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01947 M02S00033.271l750 ---| LDM EJBF+5*SCLE 01948 M01S01482.1ri +++| LPN 17 01949 M01S01483.1ri +++| LMN TXOT
| Line S01484 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01950 M02S01484.271l716 ---| NJN PRS2 IF NON-INTERACTIVE JOB 01951 M01S00318.271l716 +++| NJN PRS4 IF NON-INTERACTIVE JOB 01952 M01S01485.1ri +++| EXECUTE 3RH LOAD INTERACTIVE JOB PROCESSING OVERLAY 01953 M01S01486.1ri +++| LDM EJBF+5*JSNE+4 CHECK CONNECTION STATUS 01954 M01S01487.1ri +++| SHN 0-7 01955 M01S01488.1ri +++| LPN 17 01956 M01S01489.1ri +++| LMN OLCS
| Line S01490 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01957 M02S01490.271l716 ---| ZJN PRS4 IF ON-LINE INTERACTIVE JOB 01958 M01S00319.271l716 +++| ZJN PRS6 IF ON-LINE INTERACTIVE JOB 01959 M01S01491.1ri +++| LDD DI
| Line S01492 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01960 M02S01492.271l716 ---| UJN PRS3 DISABLE ON-LINE INTERACTIVE ROUTINES 01961 M01S00320.271l716 +++| UJN PRS5 DISABLE ON-LINE INTERACTIVE ROUTINES 01962 M01S01493.1ri +++|
| Line S01494 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01963 M02S01494.271l716 ---| PRS2 LDD DI DISABLE ON-LINE INTERACTIVE ROUTINES 01964 M01S00321.271l716 +++| PRS4 LDD DI DISABLE ON-LINE INTERACTIVE ROUTINES 01965 M01S01495.1ri +++| STM TOPI*2+SEQ
| Line S01496 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01966 M02S01496.271l716 ---| PRS3 STM RIJC 01967 M01S00322.271l716 +++| PRS5 STM RIJC 01968 M01S01497.1ri +++| STM RIJB 01969 M01S01498.1ri +++| STM RIJE 01970 M01S01499.1ri +++| LDD IR+2
| Line S01500 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01971 M02S01500.271l716 ---| NJN PRS5 IF DMP= CALL
| Line S01501 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01972 M02S01501.271l716 ---| PRS4 PAUSE CHECK PP COUNT
| Line S01502 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01973 M02S01502.271l716 ---| LDD CM
| Line S01503 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01974 M02S01503.271l716 ---| SBN 1
| Line S01504 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01975 M02S01504.271l716 ---| NJN PRS4 IF OTHER PP-S ASSIGNED
| Line S01505 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01976 M02S01505.271l716 ---| LJM PRS6 CONTINUE PROCESSING 01977 M01S00323.271l716 +++| NJN PRS7 IF *DMP=* CALL 01978 M01S00324.271l716 +++| PRS6 LJM PRS8 SET MASS STORAGE ADDRESS 01979 M01S01506.1ri +++|
| Line S01507 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01980 M02S01507.271l716 ---| PRS5 EXECUTE 3RG LOAD *3RG* 01981 M01S00325.271l716 +++| PRS7 EXECUTE 3RG 01982 M01S01508.1ri +++| LDC /3RG/RBFF CHANGE BUFFER ADDRESS 01983 M01S01509.1ri +++| STM CPAA 01984 M01S01510.1ri +++| LDC ** 01985 M01S01511.1ri +++| ORG *-1 01986 M01S01512.1ri +++| LOC DRFB 01987 M01S01513.1ri +++| UJN DRF2 01988 M01S01514.1ri +++| 01989 M01S01515.1ri +++| LOC *O 01990 M01S01516.1ri +++| STM DRFB 01991 M01S01517.1ri +++| LDC /3RG/RCP 01992 M01S01518.1ri +++| STM RIJD 01993 M01S01519.1ri +++| LDD DI DISABLE RA/FL ADJUSTMENT 01994 M01S01520.1ri +++| STM RIJA 01995 M01S01521.1ri +++| LDN PSNI AVOID INCLUDING NFL INCREASE ON ROLLIN 01996 M01S01522.1ri +++| STM JFLC 01997 M01S01523.1ri +++| LDD CP 01998 M01S01524.1ri +++| ADN STSW 01999 M01S01525.1ri +++| CRD CM 02000 M01S01526.1ri +++| LDD CM+1 SAVE ERROR FLAG 02001 M01S01527.1ri +++| STD EF 02002 M01S01528.1ri +++| LDD CN+2 02003 M01S01529.1ri +++| SHN 21-13
| Line S01530 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02004 M02S01530.271l716 ---| MJN PRS6 IF RESTART CALL 02005 M01S00326.271l716 +++| MJN PRS8 IF RESTART CALL 02006 M01S01531.1ri +++| AOM JFLB SET DMP= FLAG 02007 M01S01532.1ri +++| 02008 M01S01533.1ri +++|* SET ROLLOUT/DM* FILE MASS STORAGE ADDRESS. 02009 M01S01534.1ri +++|
| Line S01535 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02010 M02S01535.271l716 ---| PRS6 LDN 0 CLEAR ROLLOUT FILE SECTOR 02011 M01S00327.271l716 +++| PRS8 LDN 0 CLEAR ROLLOUT FILE SECTOR 02012 M01S01536.1ri +++| STD T7 02013 M01S01537.1ri +++| LDM EJBF+5*SCHE+1 SET ROLLOUT FILE FIRST TRACK 02014 M01S01538.1ri +++| STD T6 02015 M01S01539.1ri +++| LDM EJBF+5*SCHE SET ROLLOUT FILE EQUIPMENT 02016 M01S01540.1ri +++| STD T5 02017 M01S01541.1ri +++| SFA EST READ EST ENTRY 02018 M01S01542.1ri +++| ADK EQDE 02019 M01S01543.1ri +++| CRD CM 02020 M01S01544.1ri +++| LDD CM+4 READ WORD *DILL* OF MST ENTRY 02021 M01S01545.1ri +++| SHN 3 02022 M01S01546.1ri +++| ADN DILL 02023 M01S01547.1ri +++| CRD CM 02024 M01S01548.1ri +++| LDD CM+3 02025 M01S01549.1ri +++| SHN 21-13
| Line S01550 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02026 M02S01550.271l716 ---| PJN PRS8 IF NOT AN EXTENDED MEMORY BUFFERED DEVICE 02027 M01S00328.271l716 +++| PJN PRS12 IF NOT A BUFFERED DEVICE 02028 M01S01551.1ri +++| SHN 13-21-6 CHECK FOR UEM 02029 M01S01552.1ri +++| LPN 7 02030 M01S01553.1ri +++| LMN 4
| Line S01554 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02031 M02S01554.271l716 ---| ZJN PRS6.0 IF UEM 02032 M01S00329.271l716 +++| ZJN PRS9 IF UEM 02033 M01S01555.1ri +++| LDD CM+3 02034 M01S01556.1ri +++| LPN 7
| Line S01557 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02035 M02S01557.271l716 ---| ZJN PRS6.1 IF NO DDP PATH
| Line S01558 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02036 M02S01558.271l716 ---| PRS6.0 LDK SSTL 02037 M01S00330.271l716 +++| ZJN PRS10 IF NO DDP PATH 02038 M01S00331.271l716 +++| PRS9 LDK SSTL 02039 M01S01559.1ri +++| CRD CN 02040 M01S01560.1ri +++| LDD CN+3 02041 M01S01561.1ri +++| SHN 21-11
| Line S01562 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02042 M02S01562.271l716 ---| PJN PRS8 IF DDP ROLLOUT PATH ENABLED
| Line S01563 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02043 M02S01563.271l716 ---| PRS6.1 LDN RIDL-1 MOVE *RID* TO *RIM* 02044 M01S00332.271l716 +++| PJN PRS12 IF DDP PATH ENABLED 02045 M01S00333.271l716 +++| PRS10 LDN RIDL-1 MOVE *RID* TO *RIM* 02046 M01S01564.1ri +++| STD T1 INITIALIZE INDEX
| Line S01565 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02047 M02S01565.271l716 ---| PRS7 LDM RIDA,T1 02048 M01S00334.271l716 +++| PRS11 LDM RIDA,T1 02049 M01S01566.1ri +++| STM RIMX,T1 02050 M01S01567.1ri +++| SOD T1 DECREMENT INDEX
| Line S01568 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02051 M02S01568.271l716 ---| PJN PRS7 IF MOVE INCOMPLETE 02052 M01S00335.271l716 +++| PJN PRS11 IF MOVE INCOMPLETE 02053 M01S01569.1ri +++| LDD CM+3 02054 M01S01570.1ri +++| SHN 21-12
| Line S01571 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02055 M02S01571.271l716 ---| MJN PRS8 IF BUFFERED DEVICE 02056 M01S00336.271l716 +++| MJN PRS12 IF BUFFERED DEVICE 02057 M01S01572.1ri +++| LDC RJMI ENABLE *ENDMS* IN *JFL* 02058 M01S01573.1ri +++| STM JFLA
| Line S01574 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02059 M02S01574.271l716 ---| PRS8 LDD CP PRESET ALTERNATE RESPONSE ADDRESS
| Line S01575 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02060 M02S01575.271l716 ---| STM JECB+2 02061 M01S00337.271l716 +++| PRS12 LDD CP PRESET ALTERNATE RESPONSE ADDRESS 02062 M01S00338.271l716 +++| STM JECB+4 02063 M01S01576.1ri +++| LDN SSTL SET MEMORY CLEARING STATUS 02064 M01S01577.1ri +++| CRD CM 02065 M01S01578.1ri +++| LDD CM 02066 M01S01579.1ri +++| SHN 0-12 02067 M01S01580.1ri +++| LPN 1 02068 M01S01581.1ri +++| ADC LDNI 02069 M01S01582.1ri +++| STM AFLA 02070 M01S01583.1ri +++| STM CSMC 02071 M01S01584.1ri +++| LJM PRSX RETURN 02072 M01S01585.1ri +++| RID SPACE 4,15 02073 M01S01586.1ri +++|** RID - ROLLIN USING DIRECT TRANSFER TO CM. 02074 M01S01587.1ri +++|* 02075 M01S01588.1ri +++|* ENTRY (A) = LWA TO ROLLIN. 02076 M01S01589.1ri +++|* (CI) = FWA TO ROLLIN. 02077 M01S01590.1ri +++|* (T4) = CHANNEL. 02078 M01S01591.1ri +++|* (T5) = EQUIPMENT. 02079 M01S01592.1ri +++|* (T6) = CURRENT TRACK. 02080 M01S01593.1ri +++|* (T7) = CURRENT SECTOR. 02081 M01S01594.1ri +++|* 02082 M01S01595.1ri +++|* EXIT TO *MSR* IF MASS STORAGE ERROR 02083 M01S01596.1ri +++|* 02084 M01S01597.1ri +++|* USES CM - CM+4. 02085 M01S01598.1ri +++|* 02086 M01S01599.1ri +++|* CALLS DDT. 02087 M01S01600.1ri +++| 02088 M01S01601.1ri +++| 02089 M01S01602.1ri +++| RIDA EQU * 02090 M01S01603.1ri +++| LOC RIMX 02091 M01S01604.1ri +++| 02092 M01S01605.1ri +++| RID SUBR ENTRY/EXIT 02093 M01S01606.1ri +++| STD CM 02094 M01S01607.1ri +++| SBD FL 02095 M01S01608.1ri +++| MJN RID1 IF LWA .LT. FL 02096 M01S01609.1ri +++| LDD FL SET LWA .EQ. FL 02097 M01S01610.1ri +++| STD CM 02098 M01S01611.1ri +++| RID1 LDD CI SET RELATIVE CM ADDRESS 02099 M01S01612.1ri +++| SHN 6 02100 M01S01613.1ri +++| STD CM+4 02101 M01S01614.1ri +++| SHN -14 02102 M01S01615.1ri +++| STD CM+3 02103 M01S01616.1ri +++| LDD CM SET SECTOR COUNT 02104 M01S01617.1ri +++| SBD CI 02105 M01S01618.1ri +++| LMC /CPS/RDDS*10000 SET READ FUNCTION 02106 M01S01619.1ri +++| RJM DDT READ DIRECT TO CM 02107 M01S01620.1ri +++| PJN RIDX IF NO READ ERRORS 02108 M01S01621.1ri +++| RJM MSR PROCESS ERROR - NO RETURN 02109 M01S01622.1ri +++| RJM HNG HANG PP 02110 M01S01623.1ri +++| 02111 M01S01624.1ri +++| LOC *O 02112 M01S01625.1ri +++| RIDL EQU *-RIDA LENGTH OF *RID* 02113 M01S01626.1ri +++| 02114 M01S01627.1ri +++| ERRNG RIML-RIDL ROUTINE *RID* OVERFLOWS *RIM* 02115 M01S01628.1ri +++| SPACE 4,10 02116 M01S00062.273l780 +++|** PRESET COMMON DECKS. 02117 M01S00063.273l780 +++| 02118 M01S00064.273l780 +++| 02119 M01S00065.273l780 +++|*CALL COMPSIC 02120 M01S00066.273l780 +++| SPACE 4,10
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02121 M02S00034.271l750 ---|** PRESET COMMON DECKS.
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02122 M02S00035.271l750 ---|
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02123 M02S00036.271l750 ---|
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02124 M02S00037.271l750 ---|*CALL COMPRJC
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Updated by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02125 M02S00038.271l750 ---| SPACE 4,10 02126 M01S01629.1ri +++| IFP HERE 02127 M01S00067.273l780 +++| TSIC SPACE 4,10 02128 M01S00068.273l780 +++|** INSTRUCTION RELOCATION TABLE AND ASSOCIATED DATA. 02129 M01S00069.273l780 +++| 02130 M01S00070.273l780 +++| 02131 M01S00071.273l780 +++| PCAD EQU CM+3 PCP ADDRESS 02132 M01S00072.273l780 +++| 02133 M01S00073.273l780 +++| TSIC BSS 0 INSTRUCTION RELOCATION TABLE 02134 M01S00074.273l780 +++| LIST D 02135 M01S00075.273l780 +++| SIC HERE 02136 M01S00076.273l780 +++| LIST * 02137 M01S00077.273l780 +++| CON 0 TERMINATE ENTRIES 02138 M01S01630.1ri +++| SPACE 4,10
| Line S01631 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02139 M02S01631.271l716 ---|* OVERFLOW CHECKS. 02140 M01S00339.271l716 +++|* CHECK FOR OVERFLOW. 02141 M01S01632.1ri +++|
| Line S01633 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02142 M02S01633.271l716 ---| USE OVERFLOW
| Line S01634 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02143 M02S01634.271l716 ---| OVERFLOW 02144 M01S00340.271l716 +++| 02145 M01S00341.271l716 +++| OVERFLOW PPFW,EPFW 02146 M01S01635.1ri +++| TTL 1RI/3RJ - PROCESS DELAYED *ALTER* FUNCTIONS. 02147 M01S01636.1ri +++| TITLE 02148 M01S01637.1ri +++| QUAL 3RJ 02149 M01S01638.1ri +++| IDENT 3RJ,E1RI PROCESS DELAYED *ALTER* FUNCTIONS. 02150 M01S01639.1ri +++| BASE M
| Line S01640 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02151 M02S01640.271l716 ---| LIST F,X 02152 M01S01641.1ri +++| SST 02153 M01S01642.1ri +++|*COMMENT 1RI - PROCESS DELAYED *ALTER* FUNCTIONS.
| Line S01643 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02154 M02S01643.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1982. 02155 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02156 M01S01644.1ri +++| ORG E1RI 02157 M01S01645.1ri +++| 3RJ SPACE 4,15 02158 M01S01646.1ri +++|** PGA - PROCESS DELAYED *ALTER* FUNCTIONS. 02159 M01S01647.1ri +++|* 02160 M01S01648.1ri +++|* ENTRY (ZR - ZR+4) = 0. 02161 M01S01649.1ri +++|* 02162 M01S01650.1ri +++|* USES T4 - T7, CM - CM+4, CN - CN+4. 02163 M01S01651.1ri +++|* 02164 M01S01652.1ri +++|* CALLS CHG, DFM. 02165 M01S01653.1ri +++|* 02166 M01S01654.1ri +++|* MACROS MONITOR. 02167 M01S01655.1ri +++| 02168 M01S01656.1ri +++| 02169 M01S01657.1ri +++| PGA SUBR ENTRY/EXIT 02170 M01S01658.1ri +++| LDM SBUF+QBSS 02171 M01S01659.1ri +++| STD T7 02172 M01S01660.1ri +++| LDN 5 02173 M01S01661.1ri +++| STD T4 02174 M01S01662.1ri +++| LCN 0 INITIALIZE FUNCTION INDEX 02175 M01S01663.1ri +++| STD T5 02176 M01S01664.1ri +++| PGA1 AOD T5 INCREMENT FUNCTION INDEX 02177 M01S01665.1ri +++| LDD T7 02178 M01S01666.1ri +++| ZJN PGAX IF ALL FUNCTIONS WERE PROCESSED 02179 M01S01667.1ri +++| SHN 21-0 02180 M01S01668.1ri +++| STD T7 02181 M01S01669.1ri +++| PJN PGA1 IF FUNCTION NOT SELECTED 02182 M01S01670.1ri +++| LDM TGAP,T5 SET PROCESSOR ADDRESS 02183 M01S01671.1ri +++| NJN PGA2 IF PROCESSOR EXISTS FOR FUNCTION 02184 M01S01672.1ri +++| RJM CHG CONDITIONAL HANG 02185 M01S01673.1ri +++| UJN PGA1 PROCESS NEXT FUNCTION 02186 M01S01674.1ri +++| 02187 M01S01675.1ri +++| PGA2 STD T6 02188 M01S01676.1ri +++| LJM 0,T6 ENTER FUNCTION PROCESSOR 02189 M01S01677.1ri +++| 02190 M01S01678.1ri +++|* DAYFILE MESSAGE PROCESSOR. 02191 M01S01679.1ri +++| 02192 M01S01680.1ri +++| PGA3 LDC SBUF+QBSS+1*5 ISSUE MESSAGE 02193 M01S01681.1ri +++| RJM DFM 02194 M01S01682.1ri +++| PGA4 UJN PGA1 CONTINUE 02195 M01S01683.1ri +++| 02196 M01S01684.1ri +++|* *JSN,CFO* PROCESSOR. 02197 M01S01685.1ri +++| 02198 M01S01686.1ri +++| PGA5 LDD FL 02199 M01S01687.1ri +++| ZJN PGA4 IF NO CM FL ASSIGNED 02200 M01S01688.1ri +++| LDD RA 02201 M01S01689.1ri +++| SHN 6 02202 M01S01690.1ri +++| CRD CN 02203 M01S01691.1ri +++| LDD CN+3 02204 M01S01692.1ri +++| LPN 4 02205 M01S01693.1ri +++| ZJN PGA4 IF JOB IS NOT READY FOR DATA 02206 M01S01694.1ri +++| LDC SBUF+QBSS+1*5 ISSUE MESSAGE 02207 M01S01695.1ri +++| RJM DFM 02208 M01S01696.1ri +++| LDD MA REMOVE PREFIX 02209 M01S01697.1ri +++| CWM SBUF+QBSS+1*5+3,T4 02210 M01S01698.1ri +++| SBD T4 02211 M01S01699.1ri +++| CRM SBUF+QBSS+1*5,T4 02212 M01S01700.1ri +++| LDN 0 02213 M01S01701.1ri +++| STM SBUF+QBSS+5*5+2 02214 M01S01702.1ri +++| STM SBUF+QBSS+5*5+3 02215 M01S01703.1ri +++| STM SBUF+QBSS+5*5+4 02216 M01S01704.1ri +++| LDD RA MOVE DATA TO JOB CM FL 02217 M01S01705.1ri +++| SHN 6 02218 M01S01706.1ri +++| ADN 70 02219 M01S01707.1ri +++| CWM SBUF+QBSS+1*5,T4 02220 M01S01708.1ri +++| LDD CN+3 CLEAR CFO AND PAUSE FLAGS IN RA+0 02221 M01S01709.1ri +++| SCN 5 02222 M01S01710.1ri +++| STD CN+3 02223 M01S01711.1ri +++| LDD RA 02224 M01S01712.1ri +++| SHN 6 02225 M01S01713.1ri +++| CWD CN 02226 M01S01714.1ri +++| PGA6 UJP PGA4 CONTINUE 02227 M01S01715.1ri +++| 02228 M01S01716.1ri +++|* *JSN,GO* PROCESSOR. 02229 M01S01717.1ri +++| 02230 M01S01718.1ri +++| PGA7 LDC =C* GO.* SET DAYFILE MESSAGE ADDRESS 02231 M01S01719.1ri +++| STM PGAA 02232 M01S01720.1ri +++| LDN 0 02233 M01S01721.1ri +++| UJN PGA9 CAUSE PAUSE FLAG NOT TO BE SET 02234 M01S01722.1ri +++| 02235 M01S01723.1ri +++|* *JSN,PAUSE* PROCESSOR. 02236 M01S01724.1ri +++| 02237 M01S01725.1ri +++| PGA8 LDN 1 CAUSE PAUSE FLAG TO BE SET 02238 M01S01726.1ri +++| PGA9 STD T6 02239 M01S01727.1ri +++| LDC =C* PAUSE.* ISSUE DAYFILE MESSAGE 02240 M01S01728.1ri +++|* LDC =C* GO.* (PROCESSING *JSN,GO*) 02241 M01S01729.1ri +++| PGAA EQU *-1 02242 M01S01730.1ri +++| RJM DFM 02243 M01S01731.1ri +++| LDD CP CLEAR NOGO AND/OR PAUSE FLAG 02244 M01S01732.1ri +++| ADN SNSW 02245 M01S01733.1ri +++| CRD CM 02246 M01S01734.1ri +++| LDD CM+3 02247 M01S01735.1ri +++| SCN 3 02248 M01S01736.1ri +++| LMD T6 02249 M01S01737.1ri +++| STD CM+3 02250 M01S01738.1ri +++| LDD CP 02251 M01S01739.1ri +++| ADN SNSW 02252 M01S01740.1ri +++| CWD CM 02253 M01S01741.1ri +++| ADN MS2W-SNSW CLEAR MESSAGE AT *MS2W* 02254 M01S01742.1ri +++| CWD ZR 02255 M01S01743.1ri +++| LDD FL 02256 M01S01744.1ri +++| ZJN PGA10 IF NO CM FL ASSIGNED 02257 M01S01745.1ri +++| LDD RA SET/CLEAR *PAUSE* FLAG IN RA+0 02258 M01S01746.1ri +++| SHN 6 02259 M01S01747.1ri +++| CRD CM 02260 M01S01748.1ri +++| LDD CM+3 02261 M01S01749.1ri +++| SCN 3 02262 M01S01750.1ri +++| LMD T6 02263 M01S01751.1ri +++| STD CM+3 02264 M01S01752.1ri +++| LDD RA 02265 M01S01753.1ri +++| SHN 6 02266 M01S01754.1ri +++| CWD CM 02267 M01S01755.1ri +++| PGA10 LJM PGA1 CONTINUE 02268 M01S01756.1ri +++| 02269 M01S01757.1ri +++|* *JSN,ONSW* PROCESSOR. 02270 M01S01758.1ri +++| 02271 M01S01759.1ri +++| PGA11 LDM SBUF+QBSS+2 02272 M01S01760.1ri +++| SHN 6 02273 M01S01761.1ri +++| UJN PGA13 CONTINUE 02274 M01S01762.1ri +++| 02275 M01S01763.1ri +++|* *JSN,OFFSW* PROCESSOR. 02276 M01S01764.1ri +++| 02277 M01S01765.1ri +++| PGA12 LDN 0 BUILD SETTING MASK 02278 M01S01766.1ri +++| PGA13 STD T6 02279 M01S01767.1ri +++| LCN 0 BUILD CLEARING MASK 02280 M01S01768.1ri +++| LMM SBUF+QBSS+2 02281 M01S01769.1ri +++| SHN 6 02282 M01S01770.1ri +++| STM PGAC 02283 M01S01771.1ri +++| LDD CP READ SENSE SWITCH WORD 02284 M01S01772.1ri +++| ADK SNSW 02285 M01S01773.1ri +++| CRD CN 02286 M01S01774.1ri +++| LDD CN+4 SET/CLEAR SENSE SWITCHES 02287 M01S01775.1ri +++| LPC ** 02288 M01S01776.1ri +++| PGAC EQU *-1 02289 M01S01777.1ri +++| LMD T6 02290 M01S01778.1ri +++| STD CN+4 02291 M01S01779.1ri +++| LDD CP 02292 M01S01780.1ri +++| ADN SNSW 02293 M01S01781.1ri +++| CWD CN 02294 M01S01782.1ri +++| LDD FL 02295 M01S01783.1ri +++| ZJN PGA14 IF NO CM FL ASSIGNED 02296 M01S01784.1ri +++| LDD RA SET/CLEAR SWITCH IN RA+0 02297 M01S01785.1ri +++| SHN 6 02298 M01S01786.1ri +++| CRD CM 02299 M01S01787.1ri +++| LDD CM+4 02300 M01S01788.1ri +++| LMD CN+4 02301 M01S01789.1ri +++| LPN 77 02302 M01S01790.1ri +++| LMD CN+4 02303 M01S01791.1ri +++| STD CM+4 02304 M01S01792.1ri +++| LDD RA 02305 M01S01793.1ri +++| SHN 6 02306 M01S01794.1ri +++| CWD CM 02307 M01S01795.1ri +++| PGA14 LJM PGA1 CONTINUE 02308 M01S01796.1ri +++| TGAP SPACE 4,10 02309 M01S01797.1ri +++|** TGAP - TABLE OF DELAYED *ALTER* FUNCTION PROCESSORS. 02310 M01S01798.1ri +++|* 02311 M01S01799.1ri +++|* EACH ENTRY CONTAINS THE ADDRESS OF THE PROCESSOR ASSOCIATED 02312 M01S01800.1ri +++|* WITH THE FUNCTION. 02313 M01S01801.1ri +++| 02314 M01S01802.1ri +++| 02315 M01S01803.1ri +++| TGAP INDEX 02316 M01S01804.1ri +++| INDEX SSSF,PGA11 SET SENSE SWITCHES 02317 M01S01805.1ri +++| INDEX CSSF,PGA12 CLEAR SENSE SWITCHES 02318 M01S01806.1ri +++| INDEX GOSF,PGA7 PROCESS *GO* COMMAND 02319 M01S01807.1ri +++| INDEX DYSF,PGA3 PROCESS *COMMENT* COMMAND 02320 M01S01808.1ri +++| INDEX CFSF,PGA5 PROCESS *CFO* COMMAND 02321 M01S01809.1ri +++| INDEX EMSF,PGA3 ISSUE ERROR MESSAGE 02322 M01S01810.1ri +++| INDEX PASF,PGA8 PROCESS *PAUSE* COMMAND 02323 M01S01811.1ri +++| INDEX 14 02324 M01S01812.1ri +++| SPACE 4,10
| Line S01813 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02325 M02S01813.271l716 ---|* OVERFLOW CHECKS. 02326 M01S00342.271l716 +++|* CHECK FOR OVERFLOW. 02327 M01S01814.1ri +++| 02328 M01S01815.1ri +++|
| Line S01816 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02329 M02S01816.271l716 ---| USE OVERFLOW
| Line S01817 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02330 M02S01817.271l716 ---| OVERFLOW E1RI,7772 02331 M01S00343.271l716 +++| OVERFLOW E1RI,EPFW 02332 M01S01818.1ri +++| TTL 1RI/3RI - PROCESS SERVICE CLASS CHANGE. 02333 M01S01819.1ri +++| TITLE 02334 M01S01820.1ri +++| QUAL 3RI 02335 M01S01821.1ri +++| IDENT 3RI,E1RI PROCESS SERVICE CLASS CHANGE. 02336 M01S01822.1ri +++| BASE M
| Line S01823 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02337 M02S01823.271l716 ---| LIST F,X 02338 M01S01824.1ri +++| SST 02339 M01S01825.1ri +++|*COMMENT 1RI - PROCESS SERVICE CLASS CHANGE.
| Line S01826 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02340 M02S01826.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1982. 02341 M01S00003.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02342 M01S01827.1ri +++| ORG E1RI 02343 M01S01828.1ri +++| QUAL$ SET 1 02344 M01S01829.1ri +++| 3RI SPACE 4,10 02345 M01S01830.1ri +++|** PSC - PROCESS SERVICE CLASS CHANGE. 02346 M01S01831.1ri +++|* 02347 M01S01832.1ri +++|* ENTRY (CN) = NEW SERVICE CLASS. 02348 M01S01833.1ri +++|* 02349 M01S01834.1ri +++|* CALLS CSC. 02350 M01S01835.1ri +++| 02351 M01S01836.1ri +++| 02352 M01S01837.1ri +++| PSC SUBR ENTRY/EXIT 02353 M01S01838.1ri +++| LDD CN 02354 M01S01839.1ri +++| RJM CSC CHANGE SERVICE CLASS 02355 M01S01840.1ri +++| UJN PSCX RETURN 02356 M01S01841.1ri +++| SPACE 4,10 02357 M01S01842.1ri +++|* COMMON DECKS. 02358 M01S01843.1ri +++| 02359 M01S01844.1ri +++| 02360 M01S01845.1ri +++| VCPT EQU /REM/VCPT 02361 M01S01846.1ri +++| VCHT EQU /REM/VCHT 02362 M01S01847.1ri +++| CPRS EQU /CPS/CPRS 02363 M01S01848.1ri +++| ABSR EQU /CPS/ABSR 02364 M01S01849.1ri +++| ABCP EQU /CPS/ABCP 02365 M01S01850.1ri +++| ABMS EQU /CPS/ABMS 02366 M01S01851.1ri +++| ABMT EQU /CPS/ABMT 02367 M01S01852.1ri +++| ABPF EQU /CPS/ABPF 02368 M01S01853.1ri +++| ABAD EQU /CPS/ABAD 02369 M01S01854.1ri +++| ABNA EQU /CPS/ABNA 02370 M01S01855.1ri +++| ABCS EQU /CPS/ABCS 02371 M01S01856.1ri +++| ABCF EQU /CPS/ABCF 02372 M01S01857.1ri +++| ABVF EQU /CPS/ABVF 02373 M01S01858.1ri +++| ABNB EQU /CPS/ABNB 02374 M01S01859.1ri +++| ABMP EQU /CPS/ABMP 02375 M01S01860.1ri +++| ABAC EQU /CPS/ABAC 02376 M01S01861.1ri +++| ABOF EQU /CPS/ABOF 02377 M01S01862.1ri +++| SSIS EQU /CPS/SSIS SET SUBSYSTEM IDENTIFICATION FIELD 02378 M01S01863.1ri +++| AST$ SET 1 ASSEMBLE SSCT/SSAT UPDATE FUNCTIONS 02379 M01S01864.1ri +++|*CALL COMPAST 02380 M01S01865.1ri +++|*CALL COMPCSC 02381 M01S01866.1ri +++|*CALL COMPRJC 02382 M01S01867.1ri +++|*CALL COMPSTA 02383 M01S01868.1ri +++| SPACE 4,10
| Line S01869 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02384 M02S01869.271l716 ---|* OVERFLOW CHECKS. 02385 M01S00344.271l716 +++|* CHECK FOR OVERFLOW. 02386 M01S01870.1ri +++| 02387 M01S01871.1ri +++|
| Line S01872 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02388 M02S01872.271l716 ---| USE OVERFLOW
| Line S01873 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02389 M02S01873.271l716 ---| OVERFLOW E1RI,7772 02390 M01S00345.271l716 +++| OVERFLOW E1RI,EPFW 02391 M01S01874.1ri +++| SPACE 4,10 02392 M01S01875.1ri +++| QUAL 02393 M01S01876.1ri +++| TTL 1RI/3RH - PROCESS ON-LINE INTERACTIVE JOBS. 02394 M01S01877.1ri +++| TITLE MAIN ROUTINES. 02395 M01S01878.1ri +++| QUAL 3RH 02396 M01S01879.1ri +++| IDENT 3RH,PRHX 02397 M01S01880.1ri +++|*COMMENT 1RI - PROCESS INTERACTIVE JOBS.
| Line S01881 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02398 M02S01881.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1982. 02399 M01S00004.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02400 M01S01882.1ri +++| SPACE 4,10 02401 M01S01883.1ri +++|** 3RH - PROCESS ON-LINE INTERACTIVE JOBS. 02402 M01S01884.1ri +++| SPACE 4,10 02403 M01S01885.1ri +++| ORG E1RI 02404 M01S01886.1ri +++| PRH SUBR ENTRY/EXIT 02405 M01S01887.1ri +++| UJN PRHX RETURN 02406 M01S01888.1ri +++| EDA SPACE 4,10 02407 M01S01889.1ri +++|** EDA - ENTER JOB COMMAND. 02408 M01S01890.1ri +++|* 02409 M01S01891.1ri +++|* EXIT JOB INITIATION COMMAND MOVED TO THE COMMAND BUFFER. 02410 M01S01892.1ri +++|* *1MI* TERMINAL I/O DRIVER IS INHIBITED FROM 02411 M01S01893.1ri +++|* RECIEVING INPUT AHEAD ON COMPLETION OF ROLLIN 02412 M01S01894.1ri +++|* IF USER BREAK AND EXTENDED REPRIEVE PROCESSING 02413 M01S01895.1ri +++|* ARE CURRENT. *1AJ* WILL REISSUE THE INPUT REQUEST 02414 M01S01896.1ri +++|* SUBSEQUENT TO ERROR FLAG PROCESSING. 02415 M01S01897.1ri +++|* 02416 M01S01898.1ri +++|* USES PP, T1, CM - CM+4, CN - CN+4. 02417 M01S01899.1ri +++|*
| Line S01900 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02418 M02S01900.ns2748 ---|* CALLS EJP. 02419 M01S00001.ns2748 +++|* CALLS EJP, RRR, SRR. 02420 M01S01901.1ri +++|* 02421 M01S01902.1ri +++|* MACROS DELAY, MONITOR, PAUSE. 02422 M01S01903.1ri +++| 02423 M01S01904.1ri +++| 02424 M01S01905.1ri +++| EDA SUBR ENTRY/EXIT 02425 M01S00002.ns2748 +++| RJM SRR SET R-REGISTER TO IAF RA 02426 M01S01906.1ri +++| LDD TT 02427 M01S01907.1ri +++| SHN 14 02428 M01S01908.1ri +++| LMD TT+1 02429 M01S01909.1ri +++| ADN /REM/VROT 02430 M01S01910.1ri +++| CRD CN 02431 M01S00003.ns2748 +++| RJM RRR RESTORE R-REGISTER 02432 M01S01911.1ri +++| LDD CN+1 SET COMMAND POT MEMORY POINTER 02433 M01S01912.1ri +++| STD PP 02434 M01S01913.1ri +++| LDD CN+4 CLEAR JOB CONTINUATION 02435 M01S01914.1ri +++| SCN 4 02436 M01S01915.1ri +++| STD CN+4 02437 M01S01916.1ri +++| 02438 M01S01917.1ri +++|* ENTER COMMAND AND PARAMETERS. 02439 M01S01918.1ri +++| 02440 M01S01919.1ri +++| LDC ** 02441 M01S01920.1ri +++| EDAA EQU *-1 (ZERO IF JOB STEP INITIATION) 02442 M01S01921.1ri +++| ZJN EDA2 IF JOB STEP INITIATION 02443 M01S01922.1ri +++| 02444 M01S01923.1ri +++|* INHIBIT *1MI* TERMINAL I/O DRIVER INPUT AHEAD PROCESSING 02445 M01S01924.1ri +++|* ON USER BREAK AND EXTENDED REPRIEVE PROCESSING. 02446 M01S01925.1ri +++| 02447 M01S01926.1ri +++| LDD EF OUTSTANDING ERROR FLAG 02448 M01S01927.1ri +++| LMN TIET 02449 M01S01928.1ri +++| ZJN EDA1 IF USER BREAK ONE 02450 M01S01929.1ri +++| LMN TIET&TAET 02451 M01S01930.1ri +++| NJP EDA4 IF NOT USER BREAK TWO 02452 M01S01931.1ri +++| EDA1 LDM CBUF+EECW*5 02453 M01S01932.1ri +++| SHN 21-12 02454 M01S01933.1ri +++| MJN EDA3 IF EXTENDED REPRIEVE PROCESSING 02455 M01S01934.1ri +++| LJM EDA4 COMPLETE *EDA* PROCESS 02456 M01S01935.1ri +++| 02457 M01S01936.1ri +++|* SET COMMAND BUFFER. 02458 M01S01937.1ri +++| 02459 M01S01938.1ri +++| EDA2 RJM EJP ENTER JOB PARAMETERS 02460 M01S01939.1ri +++| 02461 M01S01940.1ri +++|* RELEASE COMMAND POT MEMORY AND COMPLETE. 02462 M01S01941.1ri +++| 02463 M01S01942.1ri +++| EDA3 LDN 0 CLEAR POT MEMORY POINTER 02464 M01S01943.1ri +++| STD CN+1 02465 M01S01944.1ri +++| LDD PP COMMAND POT POINTER 02466 M01S01945.1ri +++| ZJP EDA4 IF NO COMMAND 02467 M01S01946.1ri +++| LDN ZERL DROP POT MEMORY 02468 M01S01947.1ri +++| CRD CM 02469 M01S01948.1ri +++| LDC /REM/VDPO DROP POT MEMORY REQUEST 02470 M01S01949.1ri +++| STD CM 02471 M01S01950.1ri +++| LDD PP 02472 M01S01951.1ri +++| STD CM+3 SET TO DROP ENTIRE POT CHAIN 02473 M01S01952.1ri +++| LDD TN TERMINAL CONNECTION NUMBER TO REQUEST 02474 M01S01953.1ri +++| STD CM+4 02475 M01S01954.1ri +++| LDD MA 02476 M01S01955.1ri +++| CWD CM
| Line S01956 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02477 M02S01956.271l716 ---| EDA3.1 MONITOR TSEM DROP POT MEMORY 02478 M01S00346.271l716 +++| EDA3.1 LDK ZERL 02479 M01S00347.271l716 +++| CRD CM 02480 M01S00348.271l716 +++| MONITOR TSEM 02481 M01S01957.1ri +++| LDD CM+1 02482 M01S01958.1ri +++| ZJN EDA4 IF *IAF* INACCESSIBLE OR ERROR 02483 M01S01959.1ri +++| LMC 7777 02484 M01S01960.1ri +++| NJN EDA4 IF REQUEST COMPLETE 02485 M01S01961.1ri +++| PAUSE ST 02486 M01S01962.1ri +++| LDC 3600 *TSEM* QUEUE FULL - DELAY AND RETRY 02487 M01S01963.1ri +++| STD T1 02488 M01S01964.1ri +++| EDA3.2 DELAY 02489 M01S01965.1ri +++| SOD T1 02490 M01S01966.1ri +++| ZJN EDA3.1 IF TIME TO REISSUE REQUEST 02491 M01S01967.1ri +++| UJN EDA3.2 CONTINUE TO DELAY 02492 M01S01968.1ri +++| 02493 M01S01969.1ri +++|* COMPLETE *EDA* PROCESS. 02494 M01S01970.1ri +++|
| Line S01971 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02495 M02S01971.ns2748 ---| EDA4 LDD TT TERMINAL TABLE ADDRESS 02496 M01S00004.ns2748 +++| EDA4 RJM SRR SET R-REGISTER TO IAF RA 02497 M01S00005.ns2748 +++| LDD TT TERMINAL TABLE ADDRESS 02498 M01S01972.1ri +++| SHN 14 02499 M01S01973.1ri +++| LMD TT+1 02500 M01S01974.1ri +++| ADN /REM/VROT 02501 M01S01975.1ri +++| CWD CN REWRITE *VROT* 02502 M01S00006.ns2748 +++| RJM RRR RESTORE R-REGISTER 02503 M01S01976.1ri +++| UJP EDAX RETURN 02504 M01S01977.1ri +++| TOP SPACE 4,10 02505 M01S01978.1ri +++|** TOP - SKIP TERMINAL OUTPUT. 02506 M01S01979.1ri +++|* 02507 M01S01980.1ri +++|* CALLS RNS. 02508 M01S01981.1ri +++| 02509 M01S01982.1ri +++| 02510 M01S01983.1ri +++| TOP SUBR 02511 M01S01984.1ri +++| LDM SBUF+EJRO+JSNE*5+4 02512 M01S01985.1ri +++| SHN -7 02513 M01S01986.1ri +++| LPN 17 02514 M01S01987.1ri +++| LMK NICS 02515 M01S01988.1ri +++| ZJN TOPX IF NOT INTERACTIVE STATUS AT ROLLOUT 02516 M01S01989.1ri +++| TOP1 LDC BFMS+DTSF 02517 M01S01990.1ri +++| RS2. RJM RNS 02518 M01S01991.1ri +++| SHN -6 02519 M01S01992.1ri +++| NJN TOP1 IF NOT EOR 02520 M01S01993.1ri +++| STM RNS CLEAR *RNS* SO *3RF* WILL NOT BE CONFUSED 02521 M01S01994.1ri +++| UJN TOPX RETURN 02522 M01S01995.1ri +++| TITLE SUBROUTINES. 02523 M01S01996.1ri +++| EJP SPACE 4,10 02524 M01S01997.1ri +++|** EJP - ENTER JOB PARAMETERS. 02525 M01S01998.1ri +++|* 02526 M01S01999.1ri +++|* ENTRY (PP) = POT POINTER OF TERMINAL COMMAND. 02527 M01S02000.1ri +++|* 02528 M01S02001.1ri +++|* USES T1, T2, T7, T8, CM - CM+4, PP. 02529 M01S02002.1ri +++|*
| Line S02003 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02530 M02S02003.ns2748 ---|* CALLS SPA, TCL, UPP. 02531 M01S00007.ns2748 +++|* CALLS RRR, SPA, SRR, TCL, UPP. 02532 M01S02004.1ri +++|*
| Line S02005 Modification History | |
|---|---|
M01 (Added by) | 1ri |
M02 (Updated by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02533 M02S02005.ns2748 ---|* MACROS MONITOR. 02534 M01S00008.ns2748 +++|* MACROS MONITOR, NFA. 02535 M01S02006.1ri +++| 02536 M01S02007.1ri +++| 02537 M01S02008.1ri +++| EJP SUBR 02538 M01S02009.1ri +++| LDN 0 02539 M01S02010.1ri +++| STM CBUF+CSPW*5+2 CLEAR COMMAND COUNT 02540 M01S02011.1ri +++| LDM CBUF+SRUW*5 CLEAR TIME AND SRU LIMITS 02541 M01S02012.1ri +++| LPC 301 02542 M01S02013.1ri +++| STM CBUF+SRUW*5 02543 M01S02014.1ri +++| LDC 4000 SET EOR ON INPUT 02544 M01S02015.1ri +++| STM CBUF+CSPW*5+1 02545 M01S02016.1ri +++| LDD CP READ *CCL* DATA 02546 M01S02017.1ri +++| ADC JCDW 02547 M01S02018.1ri +++| CRD CM 02548 M01S02019.1ri +++| STD T8 SAVE ADDRESS OF *JCDW* 02549 M01S02020.1ri +++| LDD CM+2 CLEAR PROCEDURE NESTING LEVEL 02550 M01S02021.1ri +++| LPC 6000 02551 M01S02022.1ri +++| STD CM+2 02552 M01S02023.1ri +++| LDD T8 02553 M01S02024.1ri +++| CWD CM 02554 M01S02025.1ri +++| LDM CBUF+TXSW*5 SET SUBSYSTEM 02555 M01S02026.1ri +++| LPN 77 02556 M01S02027.1ri +++| SHN 14 02557 M01S02028.1ri +++| EJPA LMN 0 02558 M01S02029.1ri +++|* LMN XX (SUBSYSTEM CODE) 02559 M01S02030.1ri +++| SHN 6 02560 M01S02031.1ri +++| STM CBUF+TXSW*5 02561 M01S02032.1ri +++| LDC ** CHECK FOR PREPROCESSOR 02562 M01S02033.1ri +++| EJPB EQU *-1 (PREPROCESSOR COMMAND WORD COUNT) 02563 M01S02034.1ri +++| STD T1 02564 M01S02035.1ri +++| ZJN EJP1 IF NO COMMAND TO TRANSFER 02565 M01S02036.1ri +++| NFA CSBN 02566 M01S02037.1ri +++| CWM EJPC,T1 TRANSFER PREPROCESSOR COMMAND 02567 M01S02038.1ri +++| EJP1 LDD PP 02568 M01S02039.1ri +++| NJN EJP2 IF DATA TO TRANSFER 02569 M01S02040.1ri +++| STD T1 02570 M01S02041.1ri +++| LJM EJP5 NO DATA TO TRANSFER, CONTINUE 02571 M01S02042.1ri +++| 02572 M01S02043.1ri +++| EJP2 LDN /REM/VCPC READ COMMAND BUFFER 02573 M01S02044.1ri +++| STD T1 02574 M01S00009.ns2748 +++| RJM SRR SET R-REGISTER TO IAF RA 02575 M01S02045.1ri +++| RJM SPA 02576 M01S02046.1ri +++| CRM CLBF,T1 02577 M01S00010.ns2748 +++| RJM RRR RESTORE R-REGISTER 02578 M01S02047.1ri +++| NFA CSBN 02579 M01S02048.1ri +++| ADM EJPB 02580 M01S02049.1ri +++| CWM CLBF,T1 02581 M01S02050.1ri +++| LDC CLBF+/REM/VCPC*5-5 FIND COMMAND LENGTH 02582 M01S02051.1ri +++| STD T2 02583 M01S02052.1ri +++| EJP3 LDI T2 02584 M01S02053.1ri +++| NJN EJP4 IF LAST WORD FOUND 02585 M01S02054.1ri +++| LCN 5 02586 M01S02055.1ri +++| RAD T2 02587 M01S02056.1ri +++| SOD T1 02588 M01S02057.1ri +++| NJN EJP3 IF NOT AT MAXIMUM 02589 M01S02058.1ri +++| EJP4 LDM 4,T2 02590 M01S02059.1ri +++| ZJN EJP5 IF TERMINATOR WORD 02591 M01S02060.1ri +++| AOD T1 02592 M01S02061.1ri +++| EJP5 LDC CSBN SET FWA OF COMMAND BUFFER 02593 M01S02062.1ri +++| STM CBUF+CSPW*5+3 02594 M01S02063.1ri +++| SBD T1 SET LWA+1 02595 M01S02064.1ri +++| SBM EJPB 02596 M01S02065.1ri +++| STM CBUF+CSPW*5+4 02597 M01S02066.1ri +++| 02598 M01S02067.1ri +++|* IF A PROCEDURE FILE EXISTS, DROP TRACKS.
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/1ri.001.txt · Last modified: by 127.0.0.1