Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:ver.002
Deck VER Part 002
9 Modifications
Listing Sections
- Deck VER Start
- Deck VER Part 1 (Line 1768)
- Deck VER Part 2 (Line 3377)
- Deck VER Part 3 (Line 5162)
Source
Seq # *Modification Id* Act ----------------------------+ 03377 M00S02918.ver +++| ZJN SEC1 IF NULL ENTRY
| Line S02919 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 03378 M01S02919.252l678 ---| LDD CM CHECK CIO CHANNEL FLAG 03379 M01S02920.252l678 ---| LPN 40 03380 M01S02921.252l678 ---| NJN SEC1 IF NOT RIGHT TYPE OF CHANNEL 03381 M01S02922.252l678 ---| LDD CM+1 CHECK PRIMARY CHANNEL 03382 M01S02923.252l678 ---| LMD T2 03383 M01S02924.252l678 ---| LPN 37 03384 M01S02925.252l678 ---| ZJN SEC5 IF CHANNEL MATCHES 03385 M01S02926.252l678 ---| LDD T2 03386 M01S02927.252l678 ---| LPN 37 03387 M01S02928.252l678 ---| ZJN SEC1 IF CHECKING CHANNEL 0 03388 M01S02929.252l678 ---| LDD CM+1 CHECK SECONDARY CHANNEL 03389 M01S02930.252l678 ---| SHN -6 03390 M01S02931.252l678 ---| LMD T2 03391 M01S02932.252l678 ---| LPN 37 03392 M01S02933.252l678 ---| SEC2 ZJN SEC6 IF CHANNEL MATCHES 03393 M01S02934.252l678 ---| LDD CM+3 03394 M01S02935.252l678 ---| LPC 3777 03395 M01S02936.252l678 ---| LMC 2RNT 03396 M01S02937.252l678 ---| ZJN SEC3 IF *NT* 03397 M01S02938.252l678 ---| LMC 2RMT&2RNT 03398 M01S02939.252l678 ---| NJN SEC4 IF NOT *MT* 03399 M01S02940.252l678 ---| SEC3 LDD CM+2 CHECK THIRD CHANNEL 03400 M01S02941.252l678 ---| LMD T2 03401 M01S02942.252l678 ---| LPN 37 03402 M01S02943.252l678 ---| ZJN SEC2 IF CHANNEL MATCHES 03403 M01S02944.252l678 ---| LDD CM+2 CHECK FOURTH CHANNEL 03404 M01S02945.252l678 ---| SHN -6 03405 M01S02946.252l678 ---| LMD T2 03406 M01S02947.252l678 ---| LPN 37 03407 M01S02948.252l678 ---| ZJN SEC2 IF CHANNEL MATCHES 03408 M01S02949.252l678 ---| SEC4 LJM SEC1 TRY NEXT EQUIPMENT
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 03409 M01S00018.252l678 +++| LMC 2RDE 03410 M01S00019.252l678 +++| ZJN SEC1 IF *DE* EQUIPMENT 03411 M01S00020.252l678 +++| LDN CM 03412 M01S00021.252l678 +++| STD T1 03413 M01S00022.252l678 +++| SEC2 AOD T1 03414 M01S00023.252l678 +++| LMN CM+3 03415 M01S00024.252l678 +++| ZJN SEC1 IF BOTH CHANNELS CHECKED 03416 M01S00025.252l678 +++| LDI T1 03417 M01S00026.252l678 +++| ZJN SEC2 IF CHANNEL NOT PRESENT 03418 M01S00027.252l678 +++| LMD T2 03419 M01S00028.252l678 +++| LPN 77 03420 M01S00029.252l678 +++| ZJN SEC3 IF CHANNEL MATCH 03421 M01S00030.252l678 +++| UJN SEC2 CHECK NEXT CHANNEL
| Line S02950 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03422 M01S02950.ver13 ---| SEE SPACE 4,20 03423 M01S02951.ver13 ---|** SEE - SEARCH EST FOR EQUIPMENT. 03424 M01S02952.ver13 ---|* 03425 M01S02953.ver13 ---|* ENTRY (CL - CL+4) = 6/CH, 6/EQ, 6/UN, 42/0. 03426 M01S02954.ver13 ---|* CH = CHANNEL TO BE MATCHED. 03427 M01S02955.ver13 ---|* EQ = EQUIPMENT (CONTROLLER) NUMBER TO BE MATCHED. 03428 M01S02956.ver13 ---|* UN = UNIT NUMBER TO BE MATCHED. 03429 M01S02957.ver13 ---|* 03430 M01S02958.ver13 ---|* EXIT (A) .LT. 0 IF EST ENTRY NOT FOUND. 03431 M01S02959.ver13 ---|* (T7) = EST ORDINAL IF ENTRY FOUND. 03432 M01S02960.ver13 ---|* (CN - CN+4) = EST ENTRY. 03433 M01S02961.ver13 ---|* (DC) = BIT NUMBER OF UNIT CORRESPONDING TO POSITION 03434 M01S02962.ver13 ---|* IN *DDLL* UNIT LIST. 03435 M01S02963.ver13 ---|*
| Line S02964 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03436 M02S02964.ver13 ---|* USES DA, DB, DC, T3 - T5, T7, CM - CM+4, CN - CN+4.
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03437 M02S00031.ver13 ---|* USES DA, DB, DC, T1, T3 - T5, T7, CM - CM+4, CN - CN+4.
| Line S02965 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03438 M01S02965.ver13 ---|* 03439 M01S02966.ver13 ---|* MACROS SFA. 03440 M01S02967.ver13 ---| 03441 M01S02968.ver13 ---| SEE10 LCN 0 RETURN NOT FOUND FLAG 03442 M01S02969.ver13 ---| 03443 M01S02970.ver13 ---| SEE SUBR ENTRY/EXIT 03444 M01S02971.ver13 ---| LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH 03445 M01S02972.ver13 ---| STD T7 03446 M01S02973.ver13 ---| LDD CL SAVE CHANNEL NUMBER 03447 M01S02974.ver13 ---| SHN 14 03448 M01S02975.ver13 ---| STD T4 03449 M01S02976.ver13 ---| SHN -14 03450 M01S02977.ver13 ---| STD T5 SAVE EQUIPMENT (CONTROLLER) NUMBER 03451 M01S02978.ver13 ---| LDD CL+1 SAVE UNIT NUMBER 03452 M01S02979.ver13 ---| SHN -6 03453 M01S02980.ver13 ---| STD T3 03454 M01S02981.ver13 ---| SEE1 AOD T7 ADVANCE EST ORDINAL 03455 M01S02982.ver13 ---| LMD LE 03456 M01S02983.ver13 ---| ZJN SEE10 IF END OF EST 03457 M01S02984.ver13 ---| SFA EST,T7 03458 M01S02985.ver13 ---| ADK EQDE 03459 M01S02986.ver13 ---| CRD CN READ EST ENTRY 03460 M01S02987.ver13 ---| LDD CN+3 03461 M01S02988.ver13 ---| ZJN SEE1 IF NULL ENTRY
| Line S02989 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03462 M02S02989.ver13 ---| LDD CN+1 CHECK FOR MATCHING CHANNEL 03463 M02S02990.ver13 ---| LPN 37 03464 M02S02991.ver13 ---| LMD T4 03465 M02S02992.ver13 ---| ZJN SEE2 IF PRIMARY CHANNEL MATCHES 03466 M02S02993.ver13 ---| LDD CN+1 03467 M02S02994.ver13 ---| SHN -6 03468 M02S02995.ver13 ---| LPN 37 03469 M02S02996.ver13 ---| LMD T4 03470 M02S02997.ver13 ---| NJN SEE1 IF SECONDARY CHANNEL DOES NOT MATCH 03471 M02S02998.ver13 ---| SEE2 LDD CN
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03472 M02S00032.ver13 ---| LMC 2RDE 03473 M02S00033.ver13 ---| ZJN SEE1 IF *DE* EQUIPMENT 03474 M02S00034.ver13 ---| LDN CN 03475 M02S00035.ver13 ---| STD T1 03476 M02S00036.ver13 ---| SEE2 AOD T1 03477 M02S00037.ver13 ---| LMN CN+3 03478 M02S00038.ver13 ---| ZJN SEE1 IF BOTH CHANNELS CHECKED 03479 M02S00039.ver13 ---| LDI T1 03480 M02S00040.ver13 ---| ZJN SEE2 IF CHANNEL NOT PRESENT 03481 M02S00041.ver13 ---| LMD T4 03482 M02S00042.ver13 ---| LPN 77 03483 M02S00043.ver13 ---| NJN SEE2 IF CHANNEL DOESN-T MATCH 03484 M02S00044.ver13 ---| LDD CN
| Line S02999 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03485 M01S02999.ver13 ---| SHN 21-13 03486 M01S03000.ver13 ---| MJN SEE4 IF MASS STORAGE DEVICE 03487 M01S03001.ver13 ---| 03488 M01S03002.ver13 ---|* CHECK NON-MASS STORAGE DEVICE. 03489 M01S03003.ver13 ---| 03490 M01S03004.ver13 ---| LDD CN+4 CHECK EQUIPMENT (CONTROLLER) NUMBER 03491 M01S03005.ver13 ---| SHN -11 03492 M01S03006.ver13 ---| LMD T5
| Line S03007 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03493 M02S03007.ver13 ---| NJN SEE1 IF EQUIPMENT (CONTROLLER) NUMBERS DIFFER
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03494 M02S00045.ver13 ---| SEE2.1 NJN SEE1 IF DIFFERENT EQUIPMENT NUMBER
| Line S03008 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03495 M01S03008.ver13 ---| LDD CN+4 CHECK FOR MATCHING UNIT NUMBER 03496 M01S03009.ver13 ---| LPN 17 03497 M01S03010.ver13 ---| LMD T3
| Line S03011 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03498 M02S03011.ver13 ---| SEE3 NJN SEE1 IF UNIT NUMBER DOES NOT MATCH
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03499 M02S00046.ver13 ---| SEE3 NJN SEE2.1 IF DIFFERENT UNIT NUMBER
| Line S03012 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03500 M01S03012.ver13 ---| LJM SEEX RETURN 03501 M01S03013.ver13 ---| 03502 M01S03014.ver13 ---|* CHECK MASS STORAGE DEVICE. 03503 M01S03015.ver13 ---| 03504 M01S03016.ver13 ---| SEE4 LDD CN 03505 M01S03017.ver13 ---| SHN 21-7 03506 M01S03018.ver13 ---| PJN SEE5 IF NOT *LDAM* TYPE 03507 M01S03019.ver13 ---| LDD T5 03508 M01S03020.ver13 ---| NJN SEE3 IF NON-ZERO EQUIPMENT (CONTROLLER) NUMBER 03509 M01S03021.ver13 ---| UJN SEE6 CHECK FOR MATCHING UNIT NUMBER 03510 M01S03022.ver13 ---| 03511 M01S03023.ver13 ---| SEE5 LDD CN+2 03512 M01S03024.ver13 ---| SHN -11 03513 M01S03025.ver13 ---| LMD T5 03514 M01S03026.ver13 ---| NJN SEE3 IF EQUIPMENT (CONTROLLER) NUMBERS DIFFER 03515 M01S03027.ver13 ---| 03516 M01S03028.ver13 ---|* CHECK UNIT NUMBER. 03517 M01S03029.ver13 ---| 03518 M01S03030.ver13 ---| SEE6 LDD CN+4 READ UNIT LIST FROM MST 03519 M01S03031.ver13 ---| SHN 3 03520 M01S03032.ver13 ---| ADN DDLL 03521 M01S03033.ver13 ---| CRD CM 03522 M01S03034.ver13 ---| LDD CM 03523 M01S03035.ver13 ---| LPN 7 03524 M01S03036.ver13 ---| STD DA SAVE NUMBER OF UNITS 03525 M01S03037.ver13 ---| LDN 4 INITIALIZE NUMBER OF BYTES IN UNIT LIST 03526 M01S03038.ver13 ---| STD DB 03527 M01S03039.ver13 ---| LDN 0 INITIALIZE CORRESPONDING *NVGL* BIT NUMBE 03528 M01S03040.ver13 ---| STD DC 03529 M01S03041.ver13 ---| SEE7 LDM CM,DB CHECK FOR MATCHING UNIT NUMBERS 03530 M01S03042.ver13 ---| LPN 77 03531 M01S03043.ver13 ---| LMD T3 03532 M01S03044.ver13 ---| ZJN SEE9 IF UNIT NUMBERS MATCH 03533 M01S03045.ver13 ---| AOD DC INCREMENT CORRESPONDING BIT NUMBER 03534 M01S03046.ver13 ---| SOD DA DECREMENT NUMBER OF UNITS 03535 M01S03047.ver13 ---| SEE8 MJN SEE3 IF END OF UNIT LIST 03536 M01S03048.ver13 ---| LDM CM,DB 03537 M01S03049.ver13 ---| SHN -6 03538 M01S03050.ver13 ---| LMD T3 03539 M01S03051.ver13 ---| ZJN SEE9 IF UNIT NUMBERS MATCH 03540 M01S03052.ver13 ---| SOD DB 03541 M01S03053.ver13 ---| AOD DC INCREMENT CORRESPONDING BIT NUMBER 03542 M01S03054.ver13 ---| SOD DA DECREMENT NUMBER OF UNITS 03543 M01S03055.ver13 ---| MJN SEE8 IF END OF UNIT LIST 03544 M01S03056.ver13 ---| UJN SEE7 CHECK NEXT UNIT IN LIST 03545 M01S03057.ver13 ---| 03546 M01S03058.ver13 ---| SEE9 LJM SEEX RETURN 03547 M00S03059.ver +++| SRR SPACE 4,10 03548 M00S03060.ver +++|** SRR - SET ROLLOUT REQUEST. 03549 M00S03061.ver +++|*
| Line S03062 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03550 M01S03062.271l716 ---|* ENTRY (T1) = CONTROL POINT TO ROLL.
| Line S00094 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03551 M01S00094.271l716 +++|* ENTRY (DB) = NUMBER OF CP/PCP TO ROLL. 03552 M00S03063.ver +++|*
| Line S03064 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03553 M01S03064.271l716 ---|* EXIT (A) .LT. 0 IF ROLLOUT REQUEST NOT SET.
| Line S00095 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03554 M01S00095.271l716 +++|* EXIT (A) .GE. 0 IF ROLLOUT REQUEST ACCEPTED. 03555 M00S03065.ver +++|*
| Line S03066 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03556 M01S03066.271l716 ---|* USES T3, CM - CM+4.
| Line S00096 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03557 M01S00096.271l716 +++|* USES T1, CM - CM+4. 03558 M00S03067.ver +++|*
| Line S03068 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03559 M01S03068.271l716 ---|* MACROS MONITOR.
| Line S00097 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03560 M01S00097.271l716 +++|* MACROS DELAY, MONITOR, PAUSE. 03561 M00S03069.ver +++| 03562 M00S03070.ver +++|
| Line S03071 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03563 M01S03071.271l716 ---| SRR2 SOD T3 03564 M01S03072.271l716 ---| NJN SRR1 IF NOT END OF RETRIES 03565 M01S03073.271l716 ---| SRR3 LCN 0
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03566 M01S00098.271l716 +++| SRR2 PAUSE NE 03567 M01S00099.271l716 +++| DELAY 1*8D 1 MS DELAY 03568 M01S00100.271l716 +++| SOD T1 DECREMENT RETRY COUNT 03569 M01S00101.271l716 +++| PJN SRR1 IF NOT END OF RETRIES 03570 M00S03074.ver +++| 03571 M00S03075.ver +++| SRR SUBR ENTRY/EXIT
| Line S03076 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03572 M01S03076.271l716 ---| LDN 4 SET RETRY COUNT 03573 M01S03077.271l716 ---| STD T3 03574 M01S03078.271l716 ---| LDD CP 03575 M01S03079.271l716 ---| SHN -7 03576 M01S03080.271l716 ---| LMD T1 03577 M01S03081.271l716 ---| ZJN SRR3 IF THIS CONTROL POINT 03578 M01S03082.271l716 ---| SRR1 LDD T1 SET CONTROL POINT
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03579 M01S00102.271l716 +++| LDD HN SET RETRY LIMIT 03580 M01S00103.271l716 +++| STD T1 03581 M01S00104.271l716 +++| SRR1 LDD DB SET CP/PCP NUMBER IN *ROCM* REQUEST 03582 M00S03083.ver +++| STD CM+2
| Line S03084 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03583 M01S03084.271l716 ---| LDC 4000+ROSR SET SCHEDULER ROLLOUT
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03584 M01S00105.271l716 +++| LDC 4000+ROSR SELECT ALTERNATE CP/PCP, SCHEDULER ROLLOUT 03585 M00S03085.ver +++| STD CM+1 03586 M00S03086.ver +++| MONITOR ROCM ROLLOUT JOB 03587 M00S03087.ver +++| LDD CM+1 03588 M00S03088.ver +++| NJN SRR2 IF REQUEST REJECTED 03589 M00S03089.ver +++| UJN SRRX RETURN
| Line S03090 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03590 M01S03090.ver13 ---| VET SPACE 4,15 03591 M01S03091.ver13 ---|** VET - VALIDATE EQUIPMENT TRANSFERABILITY. 03592 M01S03092.ver13 ---|* 03593 M01S03093.ver13 ---|* ENTRY (CN - CN+4) = EST ENTRY. 03594 M01S03094.ver13 ---|* (T7) = EST ORDINAL. 03595 M01S03095.ver13 ---|* (NEJT) = NOS/VE EJT ORDINAL. 03596 M01S03096.ver13 ---|* 03597 M01S03097.ver13 ---|* EXIT (A) = 0 IF EQUIPMENT DOWN AND NOT ASSIGNED TO NOS/VE. 03598 M01S03098.ver13 ---|* .LT. 0 IF ALREADY ASSIGNED TO NOS/VE. 03599 M01S03099.ver13 ---|* = *ESEQ* ERROR STATUS IF NOT DOWN. 03600 M01S03100.ver13 ---|* 03601 M01S03101.ver13 ---|* USES CM - CM+4. 03602 M01S03102.ver13 ---|* 03603 M01S03103.ver13 ---|* MACROS SFA. 03604 M01S03104.ver13 ---| 03605 M01S03105.ver13 ---| 03606 M01S03106.ver13 ---| VET2 LCN 0 SET STATUS 03607 M01S03107.ver13 ---| 03608 M01S03108.ver13 ---| VET SUBR ENTRY/EXIT 03609 M01S03109.ver13 ---| LDD CN 03610 M01S03110.ver13 ---| LPN 3 03611 M01S03111.ver13 ---| LMN 3 03612 M01S03112.ver13 ---| NJN VET1 IF EQUIPMENT NOT DOWN 03613 M01S03113.ver13 ---| SFA EST,T7 CHECK EQUIPMENT ASSIGNMENT 03614 M01S03114.ver13 ---| ADK EQAE 03615 M01S03115.ver13 ---| CRD CM 03616 M01S03116.ver13 ---| LDM NEJT 03617 M01S03117.ver13 ---| LMD CM+4 03618 M01S03118.ver13 ---| ZJN VET2 IF ASSIGNED TO NOS/VE 03619 M01S03119.ver13 ---| LDN 0 SET NOT ASSIGNED STATUS 03620 M01S03120.ver13 ---| UJN VETX RETURN 03621 M01S03121.ver13 ---| 03622 M01S03122.ver13 ---| VET1 LDN ESEQ SET EQUIPMENT NOT AVAILABLE STATUS 03623 M01S03123.ver13 ---| UJN VETX RETURN 03624 M01S03124.ver13 ---| VRC SPACE 4,15 03625 M01S03125.ver13 ---|** VRC - VE RESERVE CHANNEL. 03626 M01S03126.ver13 ---|* 03627 M01S03127.ver13 ---|* ENTRY (T2) = CHANNEL NUMBER. 03628 M01S03128.ver13 ---|* 03629 M01S03129.ver13 ---|* EXIT (T4) = 0 IF CHANNEL PREVIOUSLY NOS/VE RESERVED. 03630 M01S03130.ver13 ---|* (CM+1) = NONZERO VALUE IF CHANNEL ASSIGNED. 03631 M01S03131.ver13 ---|* CHANNEL DISCONNECTED IF ASSIGNED. 03632 M01S03132.ver13 ---|* 03633 M01S03133.ver13 ---|* USES T4, CM - CM+4. 03634 M01S03134.ver13 ---|*
| Line S03135 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03635 M02S03135.ver13 ---|* CALLS CCA.
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03636 M02S00106.ver13 ---|* CALLS CHA.
| Line S03136 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03637 M01S03136.ver13 ---|* 03638 M01S03137.ver13 ---|* MACROS MONITOR. 03639 M01S03138.ver13 ---| 03640 M01S03139.ver13 ---| 03641 M01S03140.ver13 ---| VRC SUBR ENTRY/EXIT
| Line S03141 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03642 M02S03141.ver13 ---| RJM CCA CHECK CHANNEL ASSIGNMENT
| Line S00107 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03643 M02S00107.ver13 ---| RJM CHA CHECK CHANNEL ASSIGNMENT
| Line S03142 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03644 M01S03142.ver13 ---| NJN VRC2 IF CHANNEL NOT ALREADY NOS/VE RESERVED 03645 M01S03143.ver13 ---| STD T4 03646 M01S03144.ver13 ---| VRC1 UJN VRCX RETURN 03647 M01S03145.ver13 ---| 03648 M01S03146.ver13 ---| VRC2 LDD T2 SET CHANNEL NUMBER 03649 M01S03147.ver13 ---| STD CM+3 03650 M01S03148.ver13 ---| LDM NEJT SET ALTERNATE EJT ORDINAL 03651 M01S03149.ver13 ---| STD CM+4 03652 M01S03150.ver13 ---| LDC 4001 SET DUMMY EST ORDINAL 03653 M01S03151.ver13 ---| STD CM+1 03654 M01S03152.ver13 ---| LDN ICNS SET SUBFUNCTION 03655 M01S03153.ver13 ---| STD CM+2 03656 M01S03154.ver13 ---| MONITOR SEQM REQUEST CHANNEL 03657 M01S03155.ver13 ---| LDD CM+1 03658 M01S03156.ver13 ---| ZJN VRC1 IF CHANNEL NOT AVAILABLE 03659 M01S03157.ver13 ---| LDC DCNI+40 DISCONNECT CHANNEL 03660 M01S03158.ver13 ---| ADD T2 03661 M01S03159.ver13 ---| STM VRCA 03662 M01S03160.ver13 ---| VRCA DCN 0 03663 M01S03161.ver13 ---| UJN VRC1 RETURN 03664 M01S03162.ver13 ---| VTC SPACE 4,10 03665 M01S03163.ver13 ---|** VTC - VE RETURN CHANNEL. 03666 M01S03164.ver13 ---|* 03667 M01S03165.ver13 ---|* ENTRY (T2) = CHANNEL NUMBER. 03668 M01S03166.ver13 ---|* 03669 M01S03167.ver13 ---|* EXIT (A) = 0. 03670 M01S03168.ver13 ---|* CHANNEL RETURNED. 03671 M01S03169.ver13 ---|* 03672 M01S03170.ver13 ---|* USES CM - CM+4. 03673 M01S03171.ver13 ---|* 03674 M01S03172.ver13 ---|* MACROS MONITOR. 03675 M01S03173.ver13 ---| 03676 M01S03174.ver13 ---| 03677 M01S03175.ver13 ---| VTC SUBR ENTRY/EXIT 03678 M01S03176.ver13 ---| LDD T2 SET CHANNEL NUMBER 03679 M01S03177.ver13 ---| STD CM+3 03680 M01S03178.ver13 ---| LDM NEJT SET ALTERNATE EJT ORDINAL 03681 M01S03179.ver13 ---| STD CM+4 03682 M01S03180.ver13 ---| LDC 4001 SET DUMMY EST ORDINAL 03683 M01S03181.ver13 ---| STD CM+1 03684 M01S03182.ver13 ---| LDN CCNS SET SUBFUNCTION 03685 M01S03183.ver13 ---| STD CM+2 03686 M01S03184.ver13 ---| MONITOR SEQM RETURN CHANNEL 03687 M01S03185.ver13 ---|* LDN 0 03688 M01S03186.ver13 ---| UJN VTCX RETURN
| Line S03187 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03689 M01S03187.273l780 ---| SPACE 4,10 03690 M01S03188.273l780 ---|* OVERLAID COMMON DECKS. 03691 M01S03189.273l780 ---| 03692 M01S03190.273l780 ---| 03693 M01S03191.273l780 ---|
| Line S03192 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03694 M02S03192.273l780 ---| LIST X 03695 M02S03193.273l780 ---| DVC$ EQU 1 03696 M02S03194.273l780 ---|*CALL COMPDVC 03697 M02S03195.273l780 ---| LIST *
| Line S00108 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03698 M02S00108.273l780 ---|*CALL COMPPCP 03699 M00S03196.ver +++| TITLE PRESET. 03700 M00S03197.ver +++| PRS SPACE 4,10 03701 M00S03198.ver +++|** PRS - PRESET VIRTUAL ENVIRONMENT REQUEST PROCESSOR. 03702 M00S03199.ver +++|* 03703 M00S03200.ver +++|* EXIT (PB - PB+4) = FIRST WORD OF PARAMETER BLOCK. 03704 M00S03201.ver +++|* (VERA) = FUNCTION PROCESSOR ADDRESS. 03705 M00S03202.ver +++|* (A) = 0 IF DUAL STATE ENABLED. 03706 M00S03203.ver +++|* = ERROR CODE IF DUAL STATE NOT ENABLED. 03707 M00S03204.ver +++|* (EC) = IOU CONNECT CODE. 03708 M00S03205.ver +++|* (CF) .NE. 0, IF CYBER 180-810/830 WITH 20 PP-S. 03709 M00S03206.ver +++|* = 0 FOR ALL OTHER CONFIGURATIONS. 03710 M00S03207.ver +++|* (LE) = LAST EST ORDINAL.
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03711 M01S00109.271l716 +++|* (CAMA) = NUMBER OF CP-S + PCP-S + 2. 03712 M00S03208.ver +++|* (SEAA - SEAA+1) = FWA OF *EICB*. 03713 M00S03209.ver +++|* (NEJT) = NOS/VE EJT ORDINAL.
| Line S03210 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03714 M01S03210.271l716 ---|* (CCAA - CCAA+1) = (SCHA - SCHA+1) = (TCHA - TCHA+1) =
| Line S00110 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03715 M01S00110.271l716 +++|* (CHAA - CHAA+1) = (SCHA - SCHA+1) = (TCHA - TCHA+1) = 03716 M00S03211.ver +++|* FWA OF CHANNEL EJT ASSIGNMENT TABLE. 03717 M00S03212.ver +++|* (PPCA) = ADDRESS OF PP COMMUNICATION AREA. 03718 M00S03213.ver +++|* CALLER AND PARAMETER BLOCK VALIDATED. 03719 M00S03214.ver +++|* 03720 M00S03215.ver +++|* ERROR ABORT IF ANY OF THE FOLLOWING IS NOT TRUE - 03721 M00S03216.ver +++|* CALLER-S SUBSYSTEM IDENTIFICATION NUMBER = *NVSI*. 03722 M00S03217.ver +++|* AUTO RECALL SPECIFIED. 03723 M00S03218.ver +++|* COMPLETION BIT IN PARAMETER BLOCK NOT SET. 03724 M00S03219.ver +++|* PARAMETER BLOCK WITHIN FIELD LENGTH. 03725 M00S03220.ver +++|* LEGAL *VER* FUNCTION CODE SPECIFIED. 03726 M00S03221.ver +++|* 03727 M00S03222.ver +++|* USES CF, LE, CM - CM+4, CN - CN+4, PB - PB+4. 03728 M00S03223.ver +++|* 03729 M00S03224.ver +++|* CALLS CPA, CRS, SRI. 03730 M00S03225.ver +++|*
| Line S03226 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03731 M01S03226.271l716 ---|* MACROS ABORT, MONITOR.
| Line S00111 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03732 M02S00111.273l780 ---|* MACROS ABORT, IPCP, MONITOR.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03733 M01S00025.273l780 +++|* MACROS ABORT, MONITOR. 03734 M00S03227.ver +++| 03735 M00S03228.ver +++| 03736 M00S03229.ver +++| PRS SUBR ENTRY/EXIT
| Line S00112 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03737 M02S00112.273l780 ---| IPCP INITIALIZE PCP ACCESS CODE
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03738 M01S00026.273l780 +++| LDK PCPP SET FWA OF PCPA-S 03739 M01S00027.273l780 +++| CRD CM 03740 M01S00028.273l780 +++| LDD CM+3 03741 M01S00029.273l780 +++| SHN 14 03742 M01S00030.273l780 +++| LMD CM+4 03743 M01S00031.273l780 +++| SBK 200B 03744 M01S00032.273l780 +++| STM CCAA+1 03745 M01S00033.273l780 +++| SHN -14 03746 M01S00034.273l780 +++| RAM CCAA
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03747 M01S00113.271l716 +++| LDD CM+2 SET NUMBER OF CP-S + PCP-S + 2 03748 M01S00114.271l716 +++| STM CAMA 03749 M00S03230.ver +++| LDD CP CHECK SUBSYSTEM ID OF CALLER 03750 M00S03231.ver +++| ADN JCIW 03751 M00S03232.ver +++| CRD CN 03752 M00S03233.ver +++| LDD CN+2 03753 M00S03234.ver +++| ADC -NVSI 03754 M00S03235.ver +++| ZJN PRS1 IF CORRECT SUBSYSTEM 03755 M00S03236.ver +++| ABORT ERIR * VER - ILLEGAL USER ACCESS.* 03756 M00S03237.ver +++| 03757 M00S03238.ver +++| PRS1 RJM CRS CHECK RECALL STATUS 03758 M00S03239.ver +++| ZJN PRS2 IF NO AUTO RECALL 03759 M00S03240.ver +++| LDN 1 VALIDATE FWA 03760 M00S03241.ver +++| STD PB+3 03761 M00S03242.ver +++| RJM CPA CHECK PARAMETER BLOCK ADDRESS 03762 M00S03243.ver +++| CRD PB 03763 M00S03244.ver +++| RJM CPA VERIFY BLOCK LENGTH WITHIN FL 03764 M00S03245.ver +++| LDD PB+4 CHECK COMPLETION BIT 03765 M00S03246.ver +++| LPN 1 03766 M00S03247.ver +++| ZJN PRS3 IF COMPLETION BIT NOT SET 03767 M00S03248.ver +++| PRS2 ABORT ERAE * VER - ARGUMENT ERROR.* 03768 M00S03249.ver +++| 03769 M00S03250.ver +++| PRS3 LDD IR+2 CHECK FUNCTION CODE 03770 M00S03251.ver +++| SBN TFCNL 03771 M00S03252.ver +++| PJN PRS2 IF ILLEGAL FUNCTION CODE 03772 M00S03253.ver +++| LDK ESTP SET EST SIZE 03773 M00S03254.ver +++| CRD CM 03774 M00S03255.ver +++| LDD CM+2 03775 M00S03256.ver +++| STD LE 03776 M00S03257.ver +++| LDN EIBP READ *EICB* POINTER 03777 M00S03258.ver +++| CRD CN 03778 M00S03259.ver +++| LDD CN+3 03779 M00S03260.ver +++| RAM SEAA 03780 M00S03261.ver +++| LDD CN+4 03781 M00S03262.ver +++| STM SEAA+1 03782 M00S03263.ver +++| LDN SSTL 03783 M00S03264.ver +++| CRD CM 03784 M00S03265.ver +++| LDD CM+3 03785 M00S03266.ver +++| SHN 21-13 03786 M00S03267.ver +++| PJN PRS4 IF DUAL STATE ENABLED 03787 M00S03268.ver +++| LDC ESNR SET DUAL STATE NOT ENABLED 03788 M00S03269.ver +++| LJM PRSX RETURN 03789 M00S03270.ver +++| 03790 M00S03271.ver +++| PRS4 LDK CHTP 03791 M00S03272.ver +++| CRD CN 03792 M00S03273.ver +++| LDD CN+2 SAVE EJT ASSIGNMENT TABLE ADDRESS 03793 M00S03274.ver +++| SHN 14 03794 M00S03275.ver +++| LMD CN+3 03795 M00S03276.ver +++| ADN CTALL 03796 M00S03277.ver +++| STM TCHA+1 03797 M00S03278.ver +++| STM SCHA+1
| Line S03279 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03798 M01S03279.271l716 ---| STM CCAA+1
| Line S00115 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03799 M01S00115.271l716 +++| STM CHAA+1 03800 M00S03280.ver +++| SHN -14 03801 M00S03281.ver +++| RAM TCHA 03802 M00S03282.ver +++| STM SCHA
| Line S03283 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03803 M01S03283.271l716 ---| STM CCAA
| Line S00116 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03804 M01S00116.271l716 +++| STM CHAA 03805 M00S03284.ver +++| LDD CN+2 SAVE CHANNEL STATUS TABLE ADDRESS 03806 M00S03285.ver +++| RAM RCLA 03807 M00S03286.ver +++| LDD CN+3 03808 M00S03287.ver +++| STM RCLA+1 03809 M00S03288.ver +++| LDD CN+4 CHECK FOR EJT ORDINAL 03810 M00S03289.ver +++| STM NEJT 03811 M00S03290.ver +++| NJN PRS6 IF EJT ALREADY ASSIGNED TO NOS/VE 03812 M00S03291.ver +++| STD CM+1 03813 M00S03292.ver +++| LDN PEJT 03814 M00S03293.ver +++| STD CM+2 03815 M00S03294.ver +++| LDD MA 03816 M00S03295.ver +++| CWM PRSA,ON 03817 M00S03296.ver +++| MONITOR MTRM 03818 M00S03297.ver +++| LDD CM+1 03819 M00S03298.ver +++| NJN PRS5 IF EJT ENTRY AVAILABLE 03820 M00S03299.ver +++| ABORT EREU * VER - EJT ENTRY UNAVAILABLE* 03821 M00S03300.ver +++| 03822 M00S03301.ver +++| PRS5 STD CN+4 SAVE EJT ORDINAL 03823 M00S03302.ver +++| STM NEJT 03824 M00S03303.ver +++| LDC NVOL REWRITE *NVOL* 03825 M00S03304.ver +++| CWD CN 03826 M00S03305.ver +++| PRS6 LDN PPCP SAVE PP COMMUNICATION AREA ADDRESS 03827 M00S03306.ver +++| CRD CN 03828 M00S03307.ver +++| LDD CN+4 03829 M00S03308.ver +++| STM PPCA 03830 M00S03309.ver +++| LDK EABL+IOEI SET IOU CONNECT CODE 03831 M00S03310.ver +++| CRD CN 03832 M00S03311.ver +++| LDD CN+3 03833 M00S03312.ver +++| STD EC
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03834 M01S00109.ver13 +++| LDK PPUL GET PP/CPP CONFIGURATION 03835 M01S00110.ver13 +++| CRD CM 03836 M00S03313.ver +++| RJM SRI SET RECONFIGURATION INFORMATION 03837 M00S03314.ver +++| LDN 0 03838 M00S03315.ver +++| STD CF
| Line S03316 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03839 M01S03316.ver13 ---| LDK PPUL CHECK CONFIGURATION 03840 M01S03317.ver13 ---| CRD CM 03841 M00S03318.ver +++| LDD CM+2 03842 M00S03319.ver +++| LMN 20D 03843 M00S03320.ver +++| NJN PRS8 IF NOT 20 PP-S 03844 M00S03321.ver +++| LDK EABL+CPEI READ CPU DESCRIPTOR 03845 M00S03322.ver +++| CRD CM 03846 M00S03323.ver +++| LDD CM+1 03847 M00S03324.ver +++| SHN -6 03848 M00S03325.ver +++| SHN 14 03849 M00S03326.ver +++| LMD CM 03850 M00S03327.ver +++| SHN 6 03851 M00S03328.ver +++| CRD CM 03852 M00S03329.ver +++| LDD CM+2 GET MODEL NUMBER 03853 M00S03330.ver +++| SHN -4 03854 M00S03331.ver +++| LMN 23 03855 M00S03332.ver +++| ZJN PRS7 IF CYBER 180-830 03856 M00S03333.ver +++| LMN 23&24 03857 M00S03334.ver +++| NJN PRS8 IF NOT CYBER 180-810 03858 M00S03335.ver +++| PRS7 AOD CF SET CONFIGURATION FLAG 03859 M00S03336.ver +++| PRS8 LDM TFCN,IR+2 SET FUNCTION PROCESSOR ADDRESS 03860 M00S03337.ver +++| STM VERA 03861 M00S03338.ver +++| LDN 0 SET NO ERROR 03862 M00S03339.ver +++| LJM PRSX RETURN 03863 M00S03340.ver +++| 03864 M00S03341.ver +++| PRSA VFD 24/0LVER,24/0,1/0,4/NICS,1/0,5/NVJS,1/0 03865 M00S03342.ver +++| SRI SPACE 4,10 03866 M00S03343.ver +++|** SRI - SET RECONFIGURATION INFORMATION. 03867 M00S03344.ver +++|* 03868 M00S03345.ver +++|* ENTRY (EC) = IOU CONNECT CODE. 03869 M00S03346.ver +++|* 03870 M00S03347.ver +++|* EXIT (SPBA) = BARREL CONFIGURATION. 03871 M00S03348.ver +++|* (SPBB) = NUMBER OF BARRELS PRESENT.
| Line S00111 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03872 M01S00111.ver13 +++|* (CM - CM+4) = (PPUL) = NUMBER OF PP-S / CPP-S. 03873 M00S03349.ver +++|*
| Line S03350 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03874 M01S03350.ver13 ---|* USES T1, T2, CM - CM+4.
| Line S00112 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03875 M01S00112.ver13 +++|* USES T1, T2, CN - CN+4. 03876 M00S03351.ver +++|* 03877 M00S03352.ver +++|* MACROS READMR. 03878 M00S03353.ver +++| 03879 M00S03354.ver +++| 03880 M00S03355.ver +++| SRI SUBR ENTRY/EXIT
| Line S03356 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03881 M01S03356.ver13 ---| READMR SRIB,,ISTR 03882 M00S03357.ver +++| LDN 0 INITIALIZE BARREL COUNT 03883 M00S03358.ver +++| STD T1 03884 M00S03359.ver +++| LDN 2 SET WORD COUNT 03885 M00S03360.ver +++| STD T2 03886 M00S03361.ver +++| LDK EABL+IOEI READ IOU INFORMATION
| Line S03362 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03887 M01S03362.ver13 ---| CRD CM 03888 M01S03363.ver13 ---| LDD CM+1
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03889 M01S00113.ver13 +++| CRD CN 03890 M01S00114.ver13 +++| LDD CN+1 03891 M00S03364.ver +++| SCN 77 03892 M00S03365.ver +++| SHN 6
| Line S03366 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03893 M01S03366.ver13 ---| ADD CM
| Line S00115 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03894 M01S00115.ver13 +++| ADD CN 03895 M00S03367.ver +++| SHN 6 03896 M00S03368.ver +++| CRM SRIA,T2 03897 M00S03369.ver +++| LDM SRIA+/DSL/PPP0 CHECK ALL PP-S PRESENT IN BARREL 1 03898 M00S03370.ver +++| NJN SRI3 IF ONLY ONE BARREL 03899 M00S03371.ver +++| LDM SRIA+/DSL/PPP1 03900 M00S03372.ver +++| SHN 21-4 03901 M00S03373.ver +++| MJN SRI2 IF ONLY TWO BARRELS 03902 M00S03374.ver +++| NJN SRI1 IF THREE BARRELS 03903 M00S03375.ver +++| AOD T1 03904 M00S03376.ver +++| SRI1 AOD T1 03905 M00S03377.ver +++| SRI2 AOD T1 03906 M00S03378.ver +++| SRI3 AOD T1
| Line S03379 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03907 M01S03379.ver13 ---| ADC SBNI 03908 M01S03380.ver13 ---| STM SPBB SET NUMBER OF BARRELS
| Line S00116 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03909 M01S00116.ver13 +++| RAM SPBB SET NUMBER OF BARRELS 03910 M00S03381.ver +++| LDM SRIA+/DSL/HDMN GET IOU MODEL NUMBER
| Line S03382 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03911 M01S03382.ver13 ---| SHN -10 03912 M01S03383.ver13 ---| SBN 2 03913 M01S03384.ver13 ---| PJN SRI3.1 IF NOT IOU MODEL I1 03914 M01S03385.ver13 ---| LDM SRIB+7 03915 M01S03386.ver13 ---| SHN -3 03916 M01S03387.ver13 ---| LPN 2 03917 M01S03388.ver13 ---| UJN SRI5 SET BARREL RECONFIGURATION 03918 M01S03389.ver13 ---| 03919 M01S03390.ver13 ---| SRI3.1 NJN SRI4 IF NOT IOU MODEL I2 03920 M01S03391.ver13 ---| LDN 40 MODIFY EC REGISTER SETTINGS FOR I2
| Line S00117 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03921 M01S00117.ver13 +++| SHN -4 03922 M01S00118.ver13 +++| LMC 0#42 03923 M01S00119.ver13 +++| ZJN SRI5 IF IOU MODEL 42 03924 M01S00120.ver13 +++| SHN -4 03925 M01S00121.ver13 +++| SBN 1 03926 M01S00122.ver13 +++| ZJN SRI6 IF IOU MODEL I1 03927 M01S00123.ver13 +++| PJN SRI4 IF IOU MODEL I2 03928 M01S00124.ver13 +++| LDD CM+3 03929 M01S00125.ver13 +++| LPN 77 03930 M01S00126.ver13 +++| ZJN SRI5 IF NO CPP-S IN SYSTEM 03931 M01S00127.ver13 +++| LDK PSNI ENABLE READ/WRITE OF *ECCR* 03932 M01S00128.ver13 +++| STM SBAA 03933 M01S00129.ver13 +++| STM SBAB 03934 M01S00130.ver13 +++| UJN SRI5 CONTINUE RECONFIGURATION 03935 M01S00131.ver13 +++| 03936 M01S00132.ver13 +++| SRI4 LDN 40 MODIFY EC REGISTER SETTINGS FOR I2 03937 M00S03392.ver +++| RAM NECA 03938 M00S03393.ver +++| STM DPLI 03939 M00S03394.ver +++| STM IPPA 03940 M00S03395.ver +++| LDN 40 03941 M00S03396.ver +++| RAM DPLJ 03942 M00S03397.ver +++| STM IPPB
| Line S03398 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03943 M01S03398.ver13 ---| SRI4 LDM SRIB+7
| Line S00133 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03944 M01S00133.ver13 +++| SRI5 AOM SRIB MODIFY FOR IOU MODEL I2 OR I4 03945 M01S00134.ver13 +++| SRI6 READMR SRIA,,ISTR 03946 M01S00135.ver13 +++| LDM SRIA+7 03947 M00S03399.ver +++| SHN -3
| Line S03400 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03948 M01S03400.ver13 ---| LPN 3 03949 M01S03401.ver13 ---| SRI5 ADC ADNI 03950 M01S03402.ver13 ---| STM SPBA SET BARREL RECONFIGURATION
| Line S00136 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03951 M01S00136.ver13 +++| SRIB LPN 2 (IOU MODEL I1) 03952 M01S00137.ver13 +++|* LPN 3 (IOU MODEL I2 OR I4) 03953 M01S00138.ver13 +++| RAM SPBA SET BARREL RECONFIGURATION 03954 M00S03403.ver +++| LJM SRIX RETURN 03955 M00S03404.ver +++| 03956 M00S03405.ver +++| SRIA BSS 2*5 IOU INFORMATION
| Line S03406 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03957 M01S03406.ver13 ---| SRIB BSS 12 IOU STATUS REGISTER BUFFER 03958 M00S03407.ver +++| TFCN SPACE 4,10 03959 M00S03408.ver +++|** TFCN - TABLE OF FUNCTION PROCESSOR ADDRESSES. 03960 M00S03409.ver +++|* 03961 M00S03410.ver +++|* ONE WORD INDEXED BY FUNCTION CODE. 03962 M00S03411.ver +++|* 03963 M00S03412.ver +++|*T, 12/ADDR
Figure
03964 M00S03413.ver +++|* 03965 M00S03414.ver +++|* ADDR ADDRESS OF FUNCTION PROCESSOR. 03966 M00S03415.ver +++| 03967 M00S03416.ver +++| 03968 M00S03417.ver +++| TFCN BSS 0 TABLE OF FUNCTION PROCESSOR ADDRESSES 03969 M00S03418.ver +++| LOC 0 03970 M00S03419.ver +++| 03971 M00S03420.ver +++| RSCM FCN RCM RESERVE CM 03972 M00S03421.ver +++| RSPP FCN RPP RESERVE PP 03973 M00S03422.ver +++| RSCH FCN RCL RESERVE CHANNEL
| Line S03423 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03974 M01S03423.ver13 ---| RSEQ FCN REQ RESERVE EQUIPMENT
| Line S00139 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03975 M01S00139.ver13 +++| RSEQ FCN POF RESERVE EQUIPMENT 03976 M00S03424.ver +++| RNCM FCN TCM RETURN CM 03977 M00S03425.ver +++| RNPP FCN TPP RETURN PP 03978 M00S03426.ver +++| RNCH FCN TCH RETURN CHANNEL
| Line S03427 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03979 M01S03427.ver13 ---| RNEQ FCN TEQ RETURN EQUIPMENT
| Line S00140 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03980 M01S00140.ver13 +++| RNEQ FCN POF RETURN EQUIPMENT 03981 M00S03428.ver +++| STCM FCN SCM STATUS CM 03982 M00S03429.ver +++| STPP FCN SPP STATUS PP 03983 M00S03430.ver +++| STCH FCN SCH STATUS CHANNELS
| Line S03431 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03984 M01S03431.ver13 ---| STEQ FCN SEQ STATUS EQUIPMENT
| Line S00141 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 03985 M01S00141.ver13 +++| STEQ FCN POF STATUS EQUIPMENT 03986 M00S03432.ver +++| STMR FCN SMR STATUS AVAILABLE RESOURCES 03987 M00S03433.ver +++| SFRC FCN POF SET FREE-RUNNING COUNTER TO VALUE 03988 M00S03434.ver +++| RSPT FCN POF RESERVE NPP, NPP PARTNER PAIR OR CPP 03989 M00S03435.ver +++| RSCT FCN POF RESERVE NIO OR CIO CHANNEL 03990 M00S03436.ver +++| RNPT FCN POF RETURN NPP, CPP OR ALL PP-S 03991 M00S03437.ver +++| RNCT FCN POF RETURN NIO OR CIO CHANNEL OR ALL CHANNELS 03992 M00S03438.ver +++| STPT FCN POF STATUS NPP-S AND/OR CPP-S 03993 M00S03439.ver +++| STCT FCN POF STATUS NIO AND/OR CIO CHANNELS 03994 M00S03440.ver +++| 03995 M00S03441.ver +++| MXVR BSS 0 MAXIMUM *VER* REQUEST + 1 03996 M00S03442.ver +++| LOC *O 03997 M00S03443.ver +++| TFCNL EQU *-TFCN LENGTH OF FUNCTION CODE TABLE 03998 M00S03444.ver +++| POF SPACE 4,10 03999 M00S03445.ver +++|** POF - PROCESS OVERLAID FUNCTIONS. 04000 M00S03446.ver +++|* 04001 M00S03447.ver +++|* ENTRY INITIAL PRESET COMPLETED. 04002 M00S03448.ver +++|* CALLS OVERLAY *2VR*, WHICH DOES NOT RETURN. 04003 M00S03449.ver +++|* 04004 M00S03450.ver +++|* EXIT OVERLAY *2VR* EXITS TO *PPR* WHEN FINISHED. 04005 M00S03451.ver +++| 04006 M00S03452.ver +++| 04007 M00S03453.ver +++| POF SUBR ENTRY (NO EXIT) 04008 M00S03454.ver +++| EXECUTE 2VR 04009 M00S03455.ver +++| SPACE 4,10 04010 M00S03456.ver +++|** COMMON DECKS. 04011 M00S03457.ver +++| 04012 M00S03458.ver +++|*CALL COMPCRS
| Line S03459 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 04013 M01S03459.ver13 ---| OVERFLOW
| Line S00142 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 04014 M01S00142.ver13 +++| SPACE 4,10 04015 M01S00143.ver13 +++|* CHECK FOR OVERFLOW. 04016 M01S00144.ver13 +++| 04017 M01S00145.ver13 +++| 04018 M01S00146.ver13 +++| OVERFLOW PPFW,EPFW 04019 M00S03460.ver +++| TTL VER/2VR - VIRTUAL ENVIRONMENT REQUEST OVERLAY. 04020 M00S03461.ver +++| TITLE MAIN PROGRAM. 04021 M00S03462.ver +++| QUAL 2VR 04022 M00S03463.ver +++| IDENT 2VR,POFX 04023 M00S03464.ver +++|*COMMENT VER - PROCESS OVERLAID *VER* FUNCTIONS.
| Line S03465 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 04024 M01S03465.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION, 1985.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 04025 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 04026 M00S03466.ver +++| ORG OVLA 04027 M00S03467.ver +++| POF SPACE 4,10 04028 M00S03468.ver +++|** POF - PROCESS OVERLAID FUNCTIONS. 04029 M00S03469.ver +++|* 04030 M00S03470.ver +++|* ENTRY MAIN PRESET COMPLETED. 04031 M00S03471.ver +++|* 04032 M00S03472.ver +++|* EXIT TO PP RESIDENT. 04033 M00S03473.ver +++| 04034 M00S03474.ver +++| 04035 M00S03475.ver +++| POF SUBR ENTRY (NO EXIT) 04036 M00S03476.ver +++| RJM PRS PRESET VIRTUAL ENVIRONMENT 04037 M00S03477.ver +++| 04038 M00S03478.ver +++|* TO FUNCTION PROCESSOR WITH 04039 M00S03479.ver +++|* (PB - PB+4) = FIRST WORD OF PARAMETER BLOCK, 04040 M00S03480.ver +++|* = 1/F, 35/0, 12/LENGTH, 12/0. 04041 M00S03481.ver +++|* F = FLAG USED ONLY IN RETURN FUNCTIONS. 04042 M00S03482.ver +++|* = 0 - RETURN SPECIFIED RESOURCES. 04043 M00S03483.ver +++|* = 1 - RETURN ALL. 04044 M00S03484.ver +++|* LENGTH = LENGTH (IN CM WORDS) OF PARAMETER BLOCK. 04045 M00S03485.ver +++|* (IR+3 - IR+4) = ADDRESS OF PARAMETER BLOCK. 04046 M00S03486.ver +++| 04047 M00S03487.ver +++| RJM ** 04048 M00S03488.ver +++| POFA EQU *-1 (FUNCTION PROCESSOR ADDRESS) 04049 M00S03489.ver +++| AOD PB+4 SET COMPLETION BIT 04050 M00S03490.ver +++| RJM CPA GET PARAMETER BLOCK ADDRESS 04051 M00S03491.ver +++| CWD PB WRITE RESPONSE 04052 M00S03492.ver +++| MONITOR DPPM DROP PP 04053 M00S03493.ver +++| LJM PPR EXIT TO PP RESIDENT 04054 M00S03494.ver +++| SPACE 4,20 04055 M00S03495.ver +++|** ASSUMED TYPE CODE VALUES AND RELATIONSHIPS. 04056 M00S03496.ver +++|* 04057 M00S03497.ver +++|* THE FOLLOWING TYPE CODE VALUES AND RELATIONSHIPS 04058 M00S03498.ver +++|* ARE ASSUMED IN THE FUNCTION PROCESSING ROUTINES FOR 04059 M00S03499.ver +++|* FUNCTIONS *RSPT*, *RNPT*, AND *STPT*. IF THESE VALUES 04060 M00S03500.ver +++|* OR RELATIONSHIPS CHANGE, ALL REFERENCES TO THESE SYMBOLS 04061 M00S03501.ver +++|* SHOULD BE EXAMINED CAREFULLY. 04062 M00S03502.ver +++| 04063 M00S03503.ver +++| 04064 M00S03504.ver +++| ERRNG VPPT-VCPT-VUPT CODE ASSUMES VPPT .GT. VCPT+VUPT 04065 M00S03505.ver +++| ERRNG VCPT-VNPT-VUPT CODE ASSUMES VCPT .GT. VNPT+VUPT 04066 M00S03506.ver +++| ERRNG VUPT-VLPT CODE ASSUMES VUPT .GT. VLPT 04067 M00S03507.ver +++| ERRNZ VPPT-4 CODE ASSUMES VALUE 04068 M00S03508.ver +++| ERRNZ VCPT-2 CODE ASSUMES VALUE 04069 M00S03509.ver +++| ERRNZ VUPT-1 CODE ASSUMES VALUE 04070 M00S03510.ver +++| ERRNZ VLPT CODE ASSUMES VALUE
| Line S00147 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 04071 M01S00147.ver13 +++| TITLE OVERLAY *2VR* COMMON DECKS. 04072 M01S00148.ver13 +++| 04073 M01S00149.ver13 +++| 04074 M01S00150.ver13 +++| LIST X 04075 M01S00151.ver13 +++| DVC$ EQU 1 04076 M01S00152.ver13 +++| QUAL$ EQU 1 04077 M01S00153.ver13 +++|*CALL COMPDVC 04078 M01S00154.ver13 +++| LIST * 04079 M00S03511.ver +++| TITLE FUNCTION PROCESSORS.
| Line S00155 Modification History | |
|---|---|
M01 (Added by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 04080 M01S00155.ver13 +++| REQ SPACE 4,20 04081 M01S00156.ver13 +++|** FUNCTION 3 - RSEQ - RESERVE EQUIPMENT. 04082 M01S00157.ver13 +++|* 04083 M01S00158.ver13 +++|* ENTRY (PB LIST ENTRY) = 6/CH, 6/EQ, 6/UN, 42/0. 04084 M01S00159.ver13 +++|* = 60/0. 04085 M01S00160.ver13 +++|* 04086 M01S00161.ver13 +++|* EXIT (PB+4) = ERROR STATUS. 04087 M01S00162.ver13 +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR CODE. 04088 M01S00163.ver13 +++|* = 24/0, 12/EQ/UN TYPE, 15/0, 04089 M01S00164.ver13 +++|* 9/EST ORDINAL. 04090 M01S00165.ver13 +++|* 04091 M01S00166.ver13 +++|* USES DA, LO, T2, CL - CL+4, CM - CM+4. 04092 M01S00167.ver13 +++|* 04093 M01S00168.ver13 +++|* CALLS CPA, CUA, DVC, SEE, VET, VRC, VTC. 04094 M01S00169.ver13 +++|* 04095 M01S00170.ver13 +++|* MACROS MONITOR. 04096 M01S00171.ver13 +++| 04097 M01S00172.ver13 +++| 04098 M01S00173.ver13 +++| REQ17 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*) 04099 M01S00174.ver13 +++| STD PB+4 04100 M01S00175.ver13 +++| 04101 M01S00176.ver13 +++| REQ SUBR ENTRY/EXIT 04102 M01S00177.ver13 +++| LDD PB+3 CHECK BLOCK LENGTH 04103 M01S00178.ver13 +++| ZJN REQX IF NONE REQUESTED 04104 M01S00179.ver13 +++| SBN 2 04105 M01S00180.ver13 +++| MJN REQ17 IF BLOCK TOO SHORT 04106 M01S00181.ver13 +++| LDD PB+3 04107 M01S00182.ver13 +++| SHN -1 04108 M01S00183.ver13 +++| SBD LE 04109 M01S00184.ver13 +++| PJN REQ17 IF BLOCK LONGER THAN 2 * EST LENGTH 04110 M01S00185.ver13 +++| LDD PB+3 04111 M01S00186.ver13 +++| LPN 1 04112 M01S00187.ver13 +++| NJN REQ17 IF BLOCK LENGTH NOT EVEN NUMBER OF WORDS 04113 M01S00188.ver13 +++| LDN 1 INITIALIZE LIST OFFSET 04114 M01S00189.ver13 +++| STD LO 04115 M01S00190.ver13 +++| REQ1 RJM CPA READ NEXT LIST ENTRY 04116 M01S00191.ver13 +++| ADD LO 04117 M01S00192.ver13 +++| CRD CL 04118 M01S00193.ver13 +++| RJM SEE SEARCH EST FOR EQUIPMENT 04119 M01S00194.ver13 +++| PJN REQ3 IF EST ENTRY FOUND 04120 M01S00195.ver13 +++| LDN ESNE SET EST ENTRY NOT FOUND STATUS 04121 M01S00196.ver13 +++| REQ2 LJM REQ13 WRITE RESPONSE 04122 M01S00197.ver13 +++| 04123 M01S00198.ver13 +++| REQ3 RJM VET VALIDATE EQUIPMENT TRANSFERABILITY 04124 M01S00199.ver13 +++| ZJN REQ6 IF EQUIPMENT TRANSFERABLE 04125 M01S00200.ver13 +++| PJN REQ2 IF NOT DOWN 04126 M01S00201.ver13 +++| LDD CL 04127 M01S00202.ver13 +++| SHN -6 04128 M01S00203.ver13 +++| STD T2 04129 M01S00204.ver13 +++| RJM VRC INSURE CHANNEL IS RESERVED 04130 M01S00205.ver13 +++| LDD T4 04131 M01S00206.ver13 +++| ZJN REQ4 IF CHANNEL ALREADY ASSIGNED 04132 M01S00207.ver13 +++| LDD CM+1 04133 M01S00208.ver13 +++| ZJN REQ7 IF CHANNEL NOT AVAILABLE 04134 M01S00209.ver13 +++| REQ4 RJM CUA CHECK IF MASS STORAGE UNIT ASSIGNED 04135 M01S00210.ver13 +++| ZJN REQ5 IF NOT ASSIGNED 04136 M01S00211.ver13 +++| LDN ESAA 04137 M01S00212.ver13 +++| UJN REQ2 WRITE RESPONSE 04138 M01S00213.ver13 +++| 04139 M01S00214.ver13 +++| REQ5 LJM REQ12 SET UNIT ASSIGNED BIT IN MST 04140 M01S00215.ver13 +++| 04141 M01S00216.ver13 +++|* ENSURE CHANNEL IS RESERVED BY NOS/VE. 04142 M01S00217.ver13 +++| 04143 M01S00218.ver13 +++| REQ6 STD DA CLEAR CHANNEL JUST RESERVED FLAG 04144 M01S00219.ver13 +++| LDD CL GET CHANNEL NUMBER 04145 M01S00220.ver13 +++| SHN -6 04146 M01S00221.ver13 +++| STD T2 04147 M01S00222.ver13 +++| RJM VRC VE RESERVE CHANNEL 04148 M01S00223.ver13 +++| LDD T4 04149 M01S00224.ver13 +++| ZJN REQ9 IF CHANNEL WAS PREVIOUSLY ASSIGNED 04150 M01S00225.ver13 +++| LDD CM+1 04151 M01S00226.ver13 +++| NJN REQ8 IF CHANNEL ASSIGNED 04152 M01S00227.ver13 +++| REQ7 LDN ESCH SET CHANNEL NOT AVAILABLE STATUS 04153 M01S00228.ver13 +++| UJN REQ11 WRITE RESPONSE 04154 M01S00229.ver13 +++| 04155 M01S00230.ver13 +++|* RESERVE EQUIPMENT FOR NOS/VE. 04156 M01S00231.ver13 +++| 04157 M01S00232.ver13 +++| REQ8 LDN 1 SET CHANNEL JUST ASSIGNED FLAG 04158 M01S00233.ver13 +++| STD DA 04159 M01S00234.ver13 +++| REQ9 LDD T7 SET EST ORDINAL 04160 M01S00235.ver13 +++| LMC 4000 SET ALTERNATE EJT FLAG 04161 M01S00236.ver13 +++| STD CM+1 04162 M01S00237.ver13 +++| LDK RDES REQUEST DOWNED EQUIPMENT 04163 M01S00238.ver13 +++| STD CM+2 04164 M01S00239.ver13 +++| LDM NEJT SET EJT ORDINAL 04165 M01S00240.ver13 +++| STD CM+3 04166 M01S00241.ver13 +++| MONITOR REQM REQUEST EQUIPMENT 04167 M01S00242.ver13 +++| LDD CM+1 04168 M01S00243.ver13 +++| NJN REQ12 IF EQUIPMENT ASSIGNED 04169 M01S00244.ver13 +++| LDD DA 04170 M01S00245.ver13 +++| ZJN REQ10 IF CHANNEL NOT JUST ASSIGNED 04171 M01S00246.ver13 +++| RJM VTC VE RETURN CHANNEL 04172 M01S00247.ver13 +++| REQ10 LDN ESEQ SET EQUIPMENT NOT AVAILABLE STATUS 04173 M01S00248.ver13 +++| REQ11 UJN REQ13 WRITE RESPONSE 04174 M01S00249.ver13 +++| 04175 M01S00250.ver13 +++|* IF EQUIPMENT IS MASS STORAGE DEVICE, SET BIT CORRESPONDING 04176 M01S00251.ver13 +++|* TO *DDLL* UNIT LIST POSITION IN MST BIT MAP. 04177 M01S00252.ver13 +++| 04178 M01S00253.ver13 +++| REQ12 BSS 0 04179 M01S00254.ver13 +++|* RJM CCL CHECK CONTROLWARE LOAD 04180 M01S00255.ver13 +++| LDD CN 04181 M01S00256.ver13 +++| SHN 0-13 04182 M01S00257.ver13 +++| ZJN REQ14 IF NOT MASS STORAGE DEVICE 04183 M01S00258.ver13 +++| LDD CN+4 READ BIT MAP 04184 M01S00259.ver13 +++| SHN 3 04185 M01S00260.ver13 +++| ADN NVGL 04186 M01S00261.ver13 +++| CRD CM 04187 M01S00262.ver13 +++| ERRNZ SHNI-1000 CANNOT USE DIRECT CELL *TH* 04188 M01S00263.ver13 +++| LDD TH SET SHIFT COUNT 04189 M01S00264.ver13 +++| ADD DC 04190 M01S00265.ver13 +++| STM REQA 04191 M01S00266.ver13 +++| LDN 1 04192 M01S00267.ver13 +++| REQA SHN ** 04193 M01S00268.ver13 +++| RAD CM+4 SET BIT 04194 M01S00269.ver13 +++| LDD CN+4 UPDATE BIT MAP 04195 M01S00270.ver13 +++| SHN 3 04196 M01S00271.ver13 +++| ADN NVGL 04197 M01S00272.ver13 +++| CWD CM 04198 M01S00273.ver13 +++| LDN 0 SET NO ERROR STATUS 04199 M01S00274.ver13 +++| 04200 M01S00275.ver13 +++|* WRITE TWO WORD RESPONSE. 04201 M01S00276.ver13 +++| 04202 M01S00277.ver13 +++| REQ13 STD PB+4 SET ERROR STATUS 04203 M01S00278.ver13 +++| REQ14 STD CL+4 04204 M01S00279.ver13 +++| RJM CPA WRITE FIRST WORD OF RESPONSE 04205 M01S00280.ver13 +++| ADD LO 04206 M01S00281.ver13 +++| CWD CL 04207 M01S00282.ver13 +++| AOD LO INCREMENT LIST OFFSET 04208 M01S00283.ver13 +++| LDD CL+4 04209 M01S00284.ver13 +++| LPC 7677 04210 M01S00285.ver13 +++| NJN REQ15 IF ERROR STATUS SET 04211 M01S00286.ver13 +++| LDN ZERL CLEAR SECOND WORD 04212 M01S00287.ver13 +++| CRD CL 04213 M01S00288.ver13 +++| RJM DVC GET DEVICE CODE 04214 M01S00289.ver13 +++| STD CL+2 SET *EQ/UN* TYPE 04215 M01S00290.ver13 +++| LDD T7 SET EST ORDINAL 04216 M01S00291.ver13 +++| STD CL+4 04217 M01S00292.ver13 +++| RJM CPA WRITE SECOND WORD OF RESPONSE 04218 M01S00293.ver13 +++| ADD LO 04219 M01S00294.ver13 +++| CWD CL 04220 M01S00295.ver13 +++| REQ15 AOD LO INCREMENT LIST OFFSET 04221 M01S00296.ver13 +++| SBD PB+3 04222 M01S00297.ver13 +++| MJN REQ16 IF NOT END OF LIST 04223 M01S00298.ver13 +++| LJM REQX RETURN 04224 M01S00299.ver13 +++| 04225 M01S00300.ver13 +++| REQ16 LJM REQ1 PROCESS NEXT REQUEST 04226 M01S00301.ver13 +++| TEQ SPACE 4,15 04227 M01S00302.ver13 +++|** FUNCTION 7 - RNEQ - RETURN EQUIPMENT. 04228 M01S00303.ver13 +++|* 04229 M01S00304.ver13 +++|* ENTRY (PB LIST ENTRY) = 6/CH, 6/EQ, 6/UN, 42/0. 04230 M01S00305.ver13 +++|* (NEJT) = NOS/VE EJT ORDINAL. 04231 M01S00306.ver13 +++|* 04232 M01S00307.ver13 +++|* EXIT (PB+4) = ERROR STATUS. 04233 M01S00308.ver13 +++|* (PB LIST ENTRY) = 18/UNCHANGED, 30/0, 12/ERROR STATUS. 04234 M01S00309.ver13 +++|* 04235 M01S00310.ver13 +++|* USES LO, PB+4, T2, CL - CL+4, CM - CM+4, CN - CN+4. 04236 M01S00311.ver13 +++|* 04237 M01S00312.ver13 +++|* CALLS CHA, CPA, CUA, SEE, VET. 04238 M01S00313.ver13 +++|* 04239 M01S00314.ver13 +++|* MACROS MONITOR, SFA. 04240 M01S00315.ver13 +++| 04241 M01S00316.ver13 +++| 04242 M01S00317.ver13 +++| TEQ15 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*) 04243 M01S00318.ver13 +++| STD PB+4 04244 M01S00319.ver13 +++| 04245 M01S00320.ver13 +++| TEQ SUBR ENTRY/EXIT 04246 M01S00321.ver13 +++| LDD PB 04247 M01S00322.ver13 +++| SHN 21-13 04248 M01S00323.ver13 +++| PJN TEQ1 IF TO RETURN SPECIFIED EQUIPMENT 04249 M01S00324.ver13 +++| LJM TEQ13 RETURN ALL NOS/VE EQUIPMENT 04250 M01S00325.ver13 +++| 04251 M01S00326.ver13 +++| TEQ1 LDD PB+3 CHECK BLOCK LENGTH 04252 M01S00327.ver13 +++| ZJN TEQX IF NONE TO RETURN 04253 M01S00328.ver13 +++| SBD LE 04254 M01S00329.ver13 +++| PJN TEQ15 IF BLOCK LONGER THAN EST LENGTH 04255 M01S00330.ver13 +++| LDN 1 INITIALIZE LIST OFFSET 04256 M01S00331.ver13 +++| STD LO 04257 M01S00332.ver13 +++| TEQ2 RJM CPA READ NEXT LIST ENTRY 04258 M01S00333.ver13 +++| ADD LO 04259 M01S00334.ver13 +++| CRD CL 04260 M01S00335.ver13 +++| RJM SEE SEARCH EST FOR EQUIPMENT 04261 M01S00336.ver13 +++| PJN TEQ3 IF EST ENTRY FOUND 04262 M01S00337.ver13 +++| LDN ESNE SET NOT IN EST STATUS 04263 M01S00338.ver13 +++| UJN TEQ5 WRITE LIST ENTRY 04264 M01S00339.ver13 +++| 04265 M01S00340.ver13 +++| TEQ3 RJM VET CHECK EQUIPMENT ASSIGNMENT 04266 M01S00341.ver13 +++| MJN TEQ4 IF EQUIPMENT ASSIGNED TO NOS/VE 04267 M01S00342.ver13 +++| LDN ESEQ SET EQUIPMENT NOT ASSIGNED STATUS 04268 M01S00343.ver13 +++| UJN TEQ5 WRITE LIST ENTRY 04269 M01S00344.ver13 +++| 04270 M01S00345.ver13 +++| TEQ4 LDD CL 04271 M01S00346.ver13 +++| SHN -6 04272 M01S00347.ver13 +++| STD T2 04273 M01S00348.ver13 +++| RJM CHA CHECK CHANNEL ASSIGNMENT 04274 M01S00349.ver13 +++| ZJN TEQ4.1 IF CHANNEL ASSIGNED 04275 M01S00350.ver13 +++| LDN ESCH SET CHANNEL NOT ASSIGNED STATUS 04276 M01S00351.ver13 +++| UJN TEQ5 WRITE RESPONSE 04277 M01S00352.ver13 +++| 04278 M01S00353.ver13 +++| TEQ4.1 RJM CUA CHECK UNIT ASSIGNMENT 04279 M01S00354.ver13 +++| MJN TEQ7 IF NOT MASS STORAGE 04280 M01S00355.ver13 +++| SBN ESAA 04281 M01S00356.ver13 +++| ZJN TEQ6 IF UNIT ASSIGNED 04282 M01S00357.ver13 +++| LDN ESUN SET UNIT NOT ASSIGNED STATUS 04283 M01S00358.ver13 +++| TEQ5 LJM TEQ9 WRITE RESPONSE 04284 M01S00359.ver13 +++| 04285 M01S00360.ver13 +++|* RETURN NOS/VE EQUIPMENT. 04286 M01S00361.ver13 +++| 04287 M01S00362.ver13 +++| TEQ6 LDD CN+4 CLEAR UNIT ASSIGNED STATUS 04288 M01S00363.ver13 +++| SHN 3 04289 M01S00364.ver13 +++| ADN NVGL 04290 M01S00365.ver13 +++| CRD CM 04291 M01S00366.ver13 +++| ERRNZ SHNI-1000 CANNOT USE DIRECT CELL *TH* 04292 M01S00367.ver13 +++| LDD TH SET SHIFT COUNT 04293 M01S00368.ver13 +++| ADD DC 04294 M01S00369.ver13 +++| STM TEQA 04295 M01S00370.ver13 +++| LDN 1 04296 M01S00371.ver13 +++| TEQA SHN ** 04297 M01S00372.ver13 +++| LMD CM+4 CLEAR BIT 04298 M01S00373.ver13 +++| STD CM+4 04299 M01S00374.ver13 +++| LDD CN+4 UPDATE UNIT STATUS 04300 M01S00375.ver13 +++| SHN 3 04301 M01S00376.ver13 +++| ADN NVGL 04302 M01S00377.ver13 +++| CWD CM 04303 M01S00378.ver13 +++| LDD CM+4 CHECK FOR OTHER UNIT ASSIGNMENTS 04304 M01S00379.ver13 +++| NJN TEQ8 IF ANOTHER UNIT ASSIGNED 04305 M01S00380.ver13 +++| TEQ7 LDD T7 SET EST ORDINAL 04306 M01S00381.ver13 +++| LMC 4000 SET ALTERNATE EJT FLAG 04307 M01S00382.ver13 +++| STD CM+1 04308 M01S00383.ver13 +++| LDM NEJT SET EJT ORDINAL 04309 M01S00384.ver13 +++| STD CM+3 04310 M01S00385.ver13 +++| MONITOR DEQM RELEASE EQUIPMENT 04311 M01S00386.ver13 +++| TEQ8 LDN 0 CLEAR ERROR FLAG 04312 M01S00387.ver13 +++| UJN TEQ10 WRITE RESPONSE 04313 M01S00388.ver13 +++| 04314 M01S00389.ver13 +++|* WRITE LIST RESPONSE. 04315 M01S00390.ver13 +++| 04316 M01S00391.ver13 +++| TEQ9 STD PB+4 SET STATUS 04317 M01S00392.ver13 +++| TEQ10 STD CL+4 04318 M01S00393.ver13 +++| RJM CPA WRITE RESPONSE 04319 M01S00394.ver13 +++| ADD LO 04320 M01S00395.ver13 +++| CWD CL 04321 M01S00396.ver13 +++| AOD LO INCREMENT OFFSET 04322 M01S00397.ver13 +++| SBD PB+3 04323 M01S00398.ver13 +++| SBN 1 04324 M01S00399.ver13 +++| MJN TEQ12 IF NOT END OF LIST 04325 M01S00400.ver13 +++| TEQ11 LJM TEQX RETURN 04326 M01S00401.ver13 +++| 04327 M01S00402.ver13 +++| TEQ12 LJM TEQ2 PROCESS NEXT LIST ENTRY 04328 M01S00403.ver13 +++| 04329 M01S00404.ver13 +++|* RETURN ALL EQUIPMENT. 04330 M01S00405.ver13 +++| 04331 M01S00406.ver13 +++| TEQ13 LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH 04332 M01S00407.ver13 +++| STD LO 04333 M01S00408.ver13 +++| TEQ14 AOD LO ADVANCE EST ORDINAL 04334 M01S00409.ver13 +++| LMD LE 04335 M01S00410.ver13 +++| ZJN TEQ11 IF END OF EST 04336 M01S00411.ver13 +++| SFA EST,LO 04337 M01S00412.ver13 +++| ADK EQDE 04338 M01S00413.ver13 +++| CRD CN READ EST ENTRY 04339 M01S00414.ver13 +++| ADK EQAE-EQDE READ JOB ASSIGNMENT WORD 04340 M01S00415.ver13 +++| CRD CM 04341 M01S00416.ver13 +++| LDM NEJT 04342 M01S00417.ver13 +++| LMD CM+4 04343 M01S00418.ver13 +++| NJN TEQ14 IF NOT NOS/VE RESERVED 04344 M01S00419.ver13 +++| LDD LO SET EST ORDINAL 04345 M01S00420.ver13 +++| LMC 4000 SET ALTERNATE EJT FLAG 04346 M01S00421.ver13 +++| STD CM+1 04347 M01S00422.ver13 +++| LDM NEJT SET EJT ORDINAL 04348 M01S00423.ver13 +++| STD CM+3 04349 M01S00424.ver13 +++| MONITOR DEQM RELEASE EQUIPMENT 04350 M01S00425.ver13 +++| LDD CN CHECK FOR MASS STORAGE 04351 M01S00426.ver13 +++| SHN 21-13 04352 M01S00427.ver13 +++| PJN TEQ14 IF NOT MASS STORAGE 04353 M01S00428.ver13 +++| LDN ZERL CLEAR ALL UNIT ASSIGNMENTS 04354 M01S00429.ver13 +++| CRD CM 04355 M01S00430.ver13 +++| LDD CN+4 04356 M01S00431.ver13 +++| SHN 3 04357 M01S00432.ver13 +++| ADN NVGL 04358 M01S00433.ver13 +++| CWD CM 04359 M01S00434.ver13 +++| UJP TEQ14 PROCESS NEXT EST ENTRY 04360 M01S00435.ver13 +++| SEQ SPACE 4,10 04361 M01S00436.ver13 +++|** FUNCTION 13 - STEQ - STATUS NOS/VE EQUIPMENT. 04362 M01S00437.ver13 +++|* 04363 M01S00438.ver13 +++|* ENTRY (PB LIST ENTRY) = 6/CH, 6/EQ, 6/UN, 42/0. 04364 M01S00439.ver13 +++|* 04365 M01S00440.ver13 +++|* EXIT (PB+4) = ERROR STATUS. 04366 M01S00441.ver13 +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR STATUS. 04367 M01S00442.ver13 +++|* 04368 M01S00443.ver13 +++|* USES LO, PB+4, T2, CL - CL+4. 04369 M01S00444.ver13 +++|* 04370 M01S00445.ver13 +++|* CALLS CHA, CPA, CUA, SEE, VET. 04371 M01S00446.ver13 +++| 04372 M01S00447.ver13 +++| 04373 M01S00448.ver13 +++| SEQ9 LDD TH SET ILLEGAL REQUEST STATUS (*ESIR*) 04374 M01S00449.ver13 +++| STD PB+4 04375 M01S00450.ver13 +++| 04376 M01S00451.ver13 +++| SEQ SUBR ENTRY/EXIT 04377 M01S00452.ver13 +++| LDD PB+3 CHECK BLOCK LENGTH 04378 M01S00453.ver13 +++| ZJN SEQX IF NO REQUEST 04379 M01S00454.ver13 +++| SBD LE 04380 M01S00455.ver13 +++| PJN SEQ9 IF BLOCK LONGER THAN EST LENGTH 04381 M01S00456.ver13 +++| LDN 1 INITIALIZE LIST OFFSET 04382 M01S00457.ver13 +++| STD LO 04383 M01S00458.ver13 +++| SEQ1 RJM CPA READ NEXT LIST ENTRY 04384 M01S00459.ver13 +++| ADD LO 04385 M01S00460.ver13 +++| CRD CL 04386 M01S00461.ver13 +++| RJM SEE SEARCH EST FOR EQUIPMENT 04387 M01S00462.ver13 +++| PJN SEQ2 IF EST ENTRY FOUND 04388 M01S00463.ver13 +++| LDN ESNE SET NOT IN EST STATUS 04389 M01S00464.ver13 +++| UJN SEQ5 WRITE RESPONSE 04390 M01S00465.ver13 +++| 04391 M01S00466.ver13 +++| SEQ2 RJM VET CHECK EQUIPMENT ASSIGNMENT 04392 M01S00467.ver13 +++| MJN SEQ4 IF EQUIPMENT ASSIGNED TO NOS/VE 04393 M01S00468.ver13 +++| SEQ3 LDN ESEQ SET EQUIPMENT NOT ASSIGNED STATUS 04394 M01S00469.ver13 +++| UJN SEQ5 WRITE RESPONSE 04395 M01S00470.ver13 +++| 04396 M01S00471.ver13 +++| SEQ4 LDD CL 04397 M01S00472.ver13 +++| SHN -6 04398 M01S00473.ver13 +++| STD T2 04399 M01S00474.ver13 +++| RJM CHA CHECK CHANNEL ASSIGNMENT 04400 M01S00475.ver13 +++| ZJN SEQ4.1 IF CHANNEL ASSIGNED 04401 M01S00476.ver13 +++| LDN ESCH SET CHANNEL NOT ASSIGNED STATUS 04402 M01S00477.ver13 +++| UJN SEQ5 WRITE RESPONSE 04403 M01S00478.ver13 +++| 04404 M01S00479.ver13 +++| SEQ4.1 RJM CUA CHECK UNIT ASSIGNMENT 04405 M01S00480.ver13 +++| MJN SEQ6 IF NOT MASS STORAGE DEVICE 04406 M01S00481.ver13 +++| SBN ESAA 04407 M01S00482.ver13 +++| ZJN SEQ7 IF UNIT ASSIGNED 04408 M01S00483.ver13 +++| LDN ESUN SET UNIT NOT ASSIGNED STATUS 04409 M01S00484.ver13 +++| SEQ5 STD PB+4 04410 M01S00485.ver13 +++| UJN SEQ7 WRITE RESPONSE 04411 M01S00486.ver13 +++| 04412 M01S00487.ver13 +++| SEQ6 LDN 0 CLEAR ERROR STATUS 04413 M01S00488.ver13 +++| SEQ7 STD CL+4 04414 M01S00489.ver13 +++| RJM CPA 04415 M01S00490.ver13 +++| ADD LO 04416 M01S00491.ver13 +++| CWD CL WRITE RESPONSE 04417 M01S00492.ver13 +++| AOD LO INCREMENT LIST OFFSET 04418 M01S00493.ver13 +++| SBD PB+3 04419 M01S00494.ver13 +++| SBN 1 04420 M01S00495.ver13 +++| PJN SEQ8 IF END OF LIST 04421 M01S00496.ver13 +++| LJM SEQ1 PROCESS NEXT LIST ENTRY 04422 M01S00497.ver13 +++| 04423 M01S00498.ver13 +++| SEQ8 LJM SEQX RETURN 04424 M00S03512.ver +++| FRC SPACE 4,10 04425 M00S03513.ver +++|** FUNCTION 15 - SFRC - SET FREE-RUNNING COUNTER TO VALUE. 04426 M00S03514.ver +++|* 04427 M00S03515.ver +++|* ENTRY (PB LIST ENTRY) = 12/,48/ DESIRED *FRC* VALUE. 04428 M00S03516.ver +++|* 04429 M00S03517.ver +++|* EXIT REQUEST WRITTEN TO NOS REQUEST AREA. 04430 M00S03518.ver +++| 04431 M00S03519.ver +++| 04432 M00S03520.ver +++| FRC SUBR ENTRY/EXIT 04433 M00S03521.ver +++| 04434 M00S03522.ver +++|* OBTAIN INTERLOCK ON NOS REQUEST AREA. 04435 M00S03523.ver +++| 04436 M00S03524.ver +++| FRC1 RJM SRA SET ADDRESS OF NOS REQUEST HEADER 04437 M00S03525.ver +++| STD CM+4 SAVE ADDRESS FOR *UTEM* 04438 M00S03526.ver +++| SHN -14 04439 M00S03527.ver +++| STD CM+3 04440 M00S03528.ver +++| LDN 2 SET NUMBER OF REQUESTS 04441 M00S03529.ver +++| STD CM+1 04442 M00S03530.ver +++| LDD MA WRITE REQUESTS TO MESSAGE BUFFER 04443 M00S03531.ver +++| CWM FRCA,CM+1 04444 M00S03532.ver +++| MONITOR UTEM ATTEMPT TO GET INTERLOCK 04445 M00S03533.ver +++| LDD CM+1 CHECK STATUS 04446 M00S03534.ver +++| ZJN FRC2 IF INTERLOCK OBTAINED 04447 M00S03535.ver +++| DELAY 04448 M00S03536.ver +++| UJN FRC1 RETRY INTERLOCK ATTEMPT 04449 M00S03537.ver +++| 04450 M00S03538.ver +++|* FORMAT REQUEST. 04451 M00S03539.ver +++| 04452 M00S03540.ver +++| FRC2 RJM CPA READ REQUEST 04453 M00S03541.ver +++| ADN 1 04454 M00S03542.ver +++| CRD T1 04455 M00S03543.ver +++| LDN RQSF SET TASKID FOR *FRC* UPDATE 04456 M00S03544.ver +++| STD T1 04457 M00S03545.ver +++| 04458 M00S03546.ver +++|* THE FOLLOWING CODE ASSUMES THERE IS ONLY ONE REQUEST BUFFER 04459 M00S03547.ver +++|* WHICH IMMEDIATELY FOLLOWS THE REQUEST HEADER. 04460 M00S03548.ver +++| 04461 M00S03549.ver +++| RJM SRA SET ADDRESS OF NOS REQUEST HEADER 04462 M00S03550.ver +++| CRD CN 04463 M00S03551.ver +++| ADN 1 04464 M00S03552.ver +++| CWD T1 WRITE REQUEST TO BUFFER 04465 M00S03553.ver +++| LDN STRY SET STATUS = *READY* 04466 M00S03554.ver +++| STD CN+4 04467 M00S03555.ver +++| RJM SRA SET ADDRESS OF NOS REQUEST HEADER 04468 M00S03556.ver +++| CWD CN 04469 M00S03557.ver +++| LJM FRCX RETURN 04470 M00S03558.ver +++| 04471 M00S03559.ver +++| 04472 M00S03560.ver +++|* *UTEM* REQUEST PARAMETERS. 04473 M00S03561.ver +++| 04474 M00S03562.ver +++| FRCA VFD 1/1,5/0,6/12D,6/0,42/STIN VERIFY INACTIVE REQUEST 04475 M00S03563.ver +++| VFD 1/0,5/0,6/12D,6/0,42/STIK SET INTERLOCK ON REQUEST 04476 M00S03564.ver +++| RSP SPACE 4,30 04477 M00S03565.ver +++|** FUNCTION 16 - RSPT - RESERVE PP-S. 04478 M00S03566.ver +++|* 04479 M00S03567.ver +++|* ENTRY (PB LIST ENTRY) = 12/0, 12/TYPE, 36/0. 04480 M00S03568.ver +++|* TYPE = TYPE OF PP REQUIRED. 04481 M00S03569.ver +++|* = 0 - NPP 0-11B ON 810/830 SYSTEM, 04482 M00S03570.ver +++|* 0-31B ON OTHER SYSTEMS. 04483 M00S03571.ver +++|* = 1 - NPP 20B-31B ON 810/830 WITH OVER 10 NPP-S, 04484 M00S03572.ver +++|* 0-31B ON OTHER SYSTEMS. 04485 M00S03573.ver +++|* = 2 - CPP 0-4. 04486 M00S03574.ver +++|* = 3 - CPP 5-11B. 04487 M00S03575.ver +++|* = 4 - NPP PARTNER PAIR ON 810/830 WITH MORE THAN 04488 M00S03576.ver +++|* 10 NPP-S, ANY TWO NPP-S ON OTHER SYSTEMS. 04489 M00S03577.ver +++|* 04490 M00S03578.ver +++|* EXIT (PB LIST ENTRY) = 6/PP, 6/PPP, 12/TYPE, 36/0. 04491 M00S03579.ver +++|* = 6/77B, 42/0, 12/ERROR CODE 04492 M00S03580.ver +++|* IF PP UNAVAILABLE. 04493 M00S03581.ver +++|* PP - ASSIGNED PP NUMBER. 04494 M00S03582.ver +++|* PPP - SECOND ASSIGNED PP NUMBER IF TYPE = 4. 04495 M00S03583.ver +++|* 04496 M00S03584.ver +++|* (PB+4) = ERROR STATUS. 04497 M00S03585.ver +++|* BML MESSAGE ISSUED. 04498 M00S03586.ver +++|* 04499 M00S03587.ver +++|* USES DA, DB, DC, EC, LO, PB+4, T3, T6, CL - CL+4, 04500 M00S03588.ver +++|* CM - CM+4, CN - CN+4. 04501 M00S03589.ver +++|* 04502 M00S03590.ver +++|* CALLS CPA, GCP, IBM, IPP, SPB. 04503 M00S03591.ver +++|* 04504 M00S03592.ver +++|* MACROS DELAY, EXECUTE, MONITOR, PAUSE. 04505 M00S03593.ver +++| 04506 M00S03594.ver +++| 04507 M00S03595.ver +++| RSP23 LDD TH SET INCORRECT REQUEST STATUS (*ESIR*) 04508 M00S03596.ver +++| STD PB+4 04509 M00S03597.ver +++| 04510 M00S03598.ver +++| RSP SUBR ENTRY/EXIT 04511 M00S03599.ver +++| LDD PB+3 GET NUMBER REQUESTED 04512 M00S03600.ver +++| ZJN RSPX IF NONE REQUESTED 04513 M00S03601.ver +++| SBN 1 04514 M00S03602.ver +++| NJN RSP23 IF LENGTH EXCEEDS ONE 04515 M00S03603.ver +++| RJM CPA 04516 M00S03604.ver +++| ADN 1 04517 M00S03605.ver +++| CRD CL 04518 M00S03606.ver +++| LDN VPPT 04519 M00S03607.ver +++| SBD CL+1 04520 M00S03608.ver +++| MJN RSP23 IF NOT A VALID PP TYPE 04521 M00S03609.ver +++| RJM GCP GET CURRENT STATUS OF PP-S 04522 M00S03610.ver +++| LDD CL+1 04523 M00S03611.ver +++| SBK VCPT+VLPT 04524 M00S03612.ver +++| ZJN RSP1 IF LOWER BANK CPP REQUEST 04525 M00S03613.ver +++| SBK VUPT-VLPT 04526 M00S03614.ver +++| NJN RSP2 IF REQUEST IS FOR ONE OR MORE NPP-S 04527 M00S03615.ver +++| LDN 5 UPPER BANK CPP REQUEST 04528 M00S03616.ver +++| RSP1 SBD DB 04529 M00S03617.ver +++| MJN RSP5 IF SYSTEM HAS CPP-S OF THE RIGHT TYPE 04530 M00S03618.ver +++| LDK ESCP SET CONCURRENT PP NOT PRESENT (*ESCP*) 04531 M00S03619.ver +++| LJM RSP21 SET STATUS AND RETURN 04532 M00S03620.ver +++| 04533 M00S03621.ver +++| RSP2 PJN RSP3 IF REQUEST IS FOR A PAIR OF NPP-S 04534 M00S03622.ver +++| SBK VNPT-VCPT 04535 M00S03623.ver +++| NJN RSP4 IF REQUEST IS FOR A LOWER BANK NPP 04536 M00S03624.ver +++| RSP3 LDD CF 04537 M00S03625.ver +++| ZJN RSP4 IF NOT 810/830 WITH 20 NPP-S 04538 M00S03626.ver +++| LDN MINDP 04539 M00S03627.ver +++| SBD T4 AVAILABLE UPPER BANK NPP-S 04540 M00S03628.ver +++| PJP RSP20 IF INSUFFICIENT UPPER BANK NPP-S 04541 M00S03629.ver +++| RSP4 LDD DA NUMBER OF PP-S IN SYSTEM 04542 M00S03630.ver +++| SBN MINP LESS MINIMUM FOR NOS 04543 M00S03631.ver +++| STD DB SAVE PP-S ALLOWABLE TO USE 04544 M00S03632.ver +++| RSP5 LDD CL+1 04545 M00S03633.ver +++| LPN VPPT 04546 M00S03634.ver +++| SHN -2 04547 M00S03635.ver +++| ADN 1 04548 M00S03636.ver +++| STD T6 NUMBER OF PP-S REQUESTED 04549 M00S03637.ver +++| LDD DB TOTAL PP-S ALLOWABLE TO USE 04550 M00S03638.ver +++| SBD T6 REQUESTED PP-S 04551 M00S03639.ver +++| SBD T5 DEDICATED PP-S 04552 M00S03640.ver +++| MJP RSP20 IF NOT ENOUGH LEFT FOR NOS 04553 M00S03641.ver +++| LDC 4000 INITIALIZE PP NUMBER FIELD 04554 M00S03642.ver +++| STD CL 04555 M00S03643.ver +++| LDD CL+1 04556 M00S03644.ver +++| SBN VNPT+VUPT 04557 M00S03645.ver +++| ZJN RSP7 IF REQUEST FOR UPPER BANK NPP 04558 M00S03646.ver +++| MJN RSP6 IF REQUEST FOR LOWER BANK NPP 04559 M00S03647.ver +++| SBK VPPT-VNPT-VUPT 04560 M00S03648.ver +++| ZJN RSP8 IF REQUEST FOR A PAIR OF NPP-S 04561 M00S03649.ver +++| 04562 M00S03650.ver +++|* REQUEST CPP FOR /*VP/. 04563 M00S03651.ver +++| 04564 M00S03652.ver +++| LDD MA SET INPUT REGISTER 04565 M00S03653.ver +++| CWM RSPA,ON 04566 M00S03654.ver +++| UJN RSP9 PROCESS PP REQUEST 04567 M00S03655.ver +++| 04568 M00S03656.ver +++|* REQUEST NPP FOR *1VN*. 04569 M00S03657.ver +++| 04570 M00S03658.ver +++| RSP6 LDD MA SET INPUT REGISTER 04571 M00S03659.ver +++| CWM RSPB,ON 04572 M00S03660.ver +++| EXECUTE 1VN,= 04573 M00S03661.ver +++| UJN RSP9 PROCESS PP REQUEST 04574 M00S03662.ver +++| 04575 M00S03663.ver +++|* REQUEST NPP FOR *1VO*. 04576 M00S03664.ver +++| 04577 M00S03665.ver +++| RSP7 LDD MA SET INPUT REGISTER 04578 M00S03666.ver +++| CWM RSPC,ON 04579 M00S03667.ver +++| EXECUTE 1VO,= 04580 M00S03668.ver +++| UJN RSP9 PROCESS PP REQUEST 04581 M00S03669.ver +++| 04582 M00S03670.ver +++|* REQUEST NPP FOR *1VP*. 04583 M00S03671.ver +++| 04584 M00S03672.ver +++| RSP8 LDD MA SET INPUT REGISTER 04585 M00S03673.ver +++| CWM RSPD,ON 04586 M00S03674.ver +++| EXECUTE 1VP,= 04587 M00S03675.ver +++| 04588 M00S03676.ver +++| RSP9 LDN 10 INITIALIZE ATTEMPT COUNT 04589 M00S03677.ver +++| STD DC 04590 M00S03678.ver +++| RSP10 LDN ZERL 04591 M00S03679.ver +++| CRD CM 04592 M00S03680.ver +++| LDD CL+1 04593 M00S03681.ver +++| LPN VCPT 04594 M00S03682.ver +++| ZJN RSP11 IF NPP REQUEST 04595 M00S03683.ver +++| LDD CL+1 04596 M00S03684.ver +++| STD CM+4 SET BARREL DESIGNATION 04597 M00S03685.ver +++| MONITOR CPRM REQUEST CPP 04598 M00S03686.ver +++| UJN RSP13 CHECK IF SUCCESSFUL 04599 M00S03687.ver +++| 04600 M00S03688.ver +++| RSP11 LDD CF 04601 M00S03689.ver +++| ZJN RSP12 IF NOT 810/830 WITH 20 NPP-S 04602 M00S03690.ver +++| LDD CL+1 04603 M00S03691.ver +++| LPN VPPT 04604 M00S03692.ver +++| RSP12 LMN 1 SET PRIORITY REQUEST 04605 M00S03693.ver +++| STD CM+1 04606 M00S03694.ver +++| MONITOR RPPM REQUEST NPP 04607 M00S03695.ver +++| RSP13 LDD CM+1 04608 M00S03696.ver +++| NJN RSP14 IF PP AVAILABLE 04609 M00S03697.ver +++| PAUSE NE 04610 M00S03698.ver +++| DELAY 04611 M00S03699.ver +++| SOD DC DECREMENT ATTEMPT COUNT 04612 M00S03700.ver +++| NJN RSP10 IF ANOTHER ATTEMPT TO BE MADE 04613 M00S03701.ver +++| LJM RSP20 SET PP NOT AVAILABLE STATUS 04614 M00S03702.ver +++| 04615 M00S03703.ver +++| RSP14 STD T3 SAVE INPUT REGISTER ADDRESS 04616 M00S03704.ver +++| LDD CM+2 SAVE SECOND INPUT REGISTER ADDRESS 04617 M00S03705.ver +++| RSP15 STD DA 04618 M00S03706.ver +++| RSP16 LDD T3 GET INPUT REGISTER OF ASSIGNED PP 04619 M00S03707.ver +++| CRD CM 04620 M00S03708.ver +++| LDD CM 04621 M00S03709.ver +++| LMC 2R*V 04622 M00S03710.ver +++| ZJN RSP17 IF PP READY 04623 M00S03711.ver +++| PAUSE NE 04624 M00S03712.ver +++| DELAY 04625 M00S03713.ver +++| UJN RSP16 RECHECK CALL 04626 M00S03714.ver +++| 04627 M00S03715.ver +++| RSP17 RJM IPP IDLE PP 04628 M00S03716.ver +++| MJN RSP19 IF PP NOT IDLED 04629 M00S03717.ver +++| STD T1 BML SYMPTOM CODE 04630 M00S03718.ver +++| LDD T5 04631 M00S03719.ver +++| RJM SPB SET UPPER PP BIT 04632 M00S03720.ver +++| LDN ZERL CLEAR DATA WORD 04633 M00S03721.ver +++| CRD CN 04634 M00S03722.ver +++| LDD T5 SET PP NUMBER 04635 M00S03723.ver +++| LPN 37 04636 M00S03724.ver +++| STD CN+4 04637 M00S03725.ver +++| ADD CL 04638 M00S03726.ver +++| SHN 6 04639 M00S03727.ver +++| MJN RSP18 IF FIRST OR ONLY PP 04640 M00S03728.ver +++| SHN -6 04641 M00S03729.ver +++| RSP18 STD CL 04642 M00S03730.ver +++| LDC /COMSDFS/HM0240 SET MESSAGE ID 04643 M00S03731.ver +++| RJM IBM ISSUE BML MESSAGE 04644 M00S03732.ver +++| RSP19 SOD T6 04645 M00S03733.ver +++| ZJN RSP21 IF REQUEST SATISFIED 04646 M00S03734.ver +++| LDD DA 04647 M00S03735.ver +++| ZJP RSP8 IF NO SECOND PP ASSIGNED 04648 M00S03736.ver +++| STD T3 04649 M00S03737.ver +++| LDN 0 CLEAR SECOND PP ASSIGNED 04650 M00S03738.ver +++| UJP RSP15 PROCESS SECOND PP 04651 M00S03739.ver +++| 04652 M00S03740.ver +++| RSP20 LDN ESPP SET PP NOT AVAILABLE STATUS (*ESPP*) 04653 M00S03741.ver +++| RSP21 STD PB+4 04654 M00S03742.ver +++| STD CL+4 04655 M00S03743.ver +++| ZJN RSP22 IF NO ERROR 04656 M00S03744.ver +++| LDC 7700 04657 M00S03745.ver +++| STD CL 04658 M00S03746.ver +++| RSP22 RJM CPA WRITE PARAMETER LIST ENTRY 04659 M00S03747.ver +++| ADN 1 04660 M00S03748.ver +++| CWD CL 04661 M00S03749.ver +++| LJM RSPX RETURN 04662 M00S03750.ver +++| 04663 M00S03751.ver +++| 04664 M00S03752.ver +++| RSPA VFD 18/3L*VP,42/0 /*VP/ INPUT REGISTER 04665 M00S03753.ver +++| RSPB VFD 18/0L1VN,42/0 *1VN* INPUT REGISTER 04666 M00S03754.ver +++| RSPC VFD 18/0L1VO,42/0 *1VO* INPUT REGISTER 04667 M00S03755.ver +++| RSPD VFD 18/0L1VP,42/0 *1VP* INPUT REGISTER 04668 M00S03756.ver +++| RSC SPACE 4,15 04669 M00S03757.ver +++|** FUNCTION 17 - RSCT - RESERVE NIO OR CIO CHANNEL. 04670 M00S03758.ver +++|* 04671 M00S03759.ver +++|* ENTRY (PB LIST ENTRY) = 6/CH, 6/0, 12/TYPE, 36/0. 04672 M00S03760.ver +++|* CH - CHANNEL NUMBER REQUIRED. 04673 M00S03761.ver +++|* TYPE - TYPE OF CHANNEL. 04674 M00S03762.ver +++|* 0 = NIO CHANNEL. 04675 M00S03763.ver +++|* 1 = CIO CHANNEL. 04676 M00S03764.ver +++|* 04677 M00S03765.ver +++|* EXIT (PB+4) = ERROR STATUS. 04678 M00S03766.ver +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR CODE. 04679 M00S03767.ver +++|* 04680 M00S03768.ver +++|* USES LO, T2, CL - CL+4. 04681 M00S03769.ver +++|* 04682 M00S03770.ver +++|* CALLS CPA, DCA. 04683 M00S03771.ver +++| 04684 M00S03772.ver +++| 04685 M00S03773.ver +++| RSC3 LDD TH SET INCORRECT REQUEST STATUS (*ESIR*) 04686 M00S03774.ver +++| STD PB+4 04687 M00S03775.ver +++| 04688 M00S03776.ver +++| RSC SUBR ENTRY/EXIT 04689 M00S03777.ver +++| LDD PB+3 CHECK BLOCK LENGTH 04690 M00S03778.ver +++| ZJN RSCX IF NONE REQUESTED 04691 M00S03779.ver +++| SBN 1 04692 M00S03780.ver +++| NJN RSC3 IF LENGTH NOT 1 04693 M00S03781.ver +++| LDN CTALL 04694 M00S03782.ver +++| STD T2 04695 M00S03783.ver +++| LDC ** FWA CHANNEL STATUS TABLE 04696 M00S03784.ver +++| RSCA EQU *-2 04697 M00S03785.ver +++| CRM RBUF,T2 04698 M00S03786.ver +++| RJM CPA READ CHANNEL NUMBER AND TYPE 04699 M00S03787.ver +++| ADN 1 04700 M00S03788.ver +++| CRD CL 04701 M00S03789.ver +++| LDN 0 CLEAR ERROR FLAG 04702 M00S03790.ver +++| STD CL+4 04703 M00S03791.ver +++| RJM VCN VALIDATE CHANNEL NUMBER 04704 M00S03792.ver +++| PJN RSC1 IF CHANNEL NUMBER INCORRECT 04705 M00S03793.ver +++| RJM DCA DETERMINE CHANNEL AVAILABILITY 04706 M00S03794.ver +++| ZJN RSC2 IF CHANNEL WAS PREVIOUSLY NOS/VE RESERVED 04707 M00S03795.ver +++| LDD CM+1 04708 M00S03796.ver +++| NJN RSC2 IF CHANNEL ASSIGNED 04709 M00S03797.ver +++| LDN ESCH SET CHANNEL NOT AVAILABLE STATUS 04710 M00S03798.ver +++| RSC1 STD PB+4 04711 M00S03799.ver +++| STD CL+4 04712 M00S03800.ver +++| RSC2 RJM CPA WRITE PARAMETER LIST ENTRY 04713 M00S03801.ver +++| ADN 1 04714 M00S03802.ver +++| CWD CL 04715 M00S03803.ver +++| LJM RSCX RETURN 04716 M00S03804.ver +++| RNP SPACE 4,20 04717 M00S03805.ver +++|** FUNCTION 20 - RNPT - RETURN PP. 04718 M00S03806.ver +++|* 04719 M00S03807.ver +++|* ENTRY (PB LIST ENTRY) = 6/PP NUMBER, 6/0, 12/TYPE, 04720 M00S03808.ver +++|* 1/BAD, 35/0. 04721 M00S03809.ver +++|* TYPE - TYPE OF PP BEING RETURNED. 04722 M00S03810.ver +++|* 0 OR 1 = NPP. 04723 M00S03811.ver +++|* 2 OR 3 = CPP. 04724 M00S03812.ver +++|* BAD - PP MALFUNCTION FLAG. 04725 M00S03813.ver +++|* 0 = PP IS OK. 04726 M00S03814.ver +++|* 1 = PP IS MALFUNCTIONING. 04727 M00S03815.ver +++|* 04728 M00S03816.ver +++|* EXIT (PB LIST ENTRY) = 24/UNCHANGED, 24/0, 12/ERROR STATUS. 04729 M00S03817.ver +++|* (PB+4) = ERROR STATUS. 04730 M00S03818.ver +++|* 04731 M00S03819.ver +++|* USES DA, DB, LO, T4, PB+4, CL - CL+4, CN - CN+4. 04732 M00S03820.ver +++|* 04733 M00S03821.ver +++|* CALLS CPA, DPL, LPR, SPB, VPN. 04734 M00S03822.ver +++|* 04735 M00S03823.ver +++|* MACROS MONITOR. 04736 M00S03824.ver +++| 04737 M00S03825.ver +++| 04738 M00S03826.ver +++| RNP10 LDD TH SET INCORRECT REQUEST STATUS (*ESIR*) 04739 M00S03827.ver +++| STD PB+4 04740 M00S03828.ver +++| 04741 M00S03829.ver +++| RNP SUBR ENTRY/EXIT 04742 M00S03830.ver +++| RJM LPR LOAD PP RESIDENT 04743 M00S03831.ver +++| LDD PB 04744 M00S03832.ver +++| SHN 21-13 04745 M00S03833.ver +++| MJP RNP4 IF RETURNING ALL PP-S 04746 M00S03834.ver +++| 04747 M00S03835.ver +++|* RETURN SPECIFIED PP. 04748 M00S03836.ver +++| 04749 M00S03837.ver +++| RNP1 LDD PB+3 04750 M00S03838.ver +++| ZJN RNPX IF NONE TO RETURN 04751 M00S03839.ver +++| SBN 1 04752 M00S03840.ver +++| NJN RNP10 IF REQUEST TOO LARGE 04753 M00S03841.ver +++| RNP2 RJM CPA READ NEXT LIST ENTRY 04754 M00S03842.ver +++| ADN 1 04755 M00S03843.ver +++| CRD CL 04756 M00S03844.ver +++| LDD CL+1 04757 M00S03845.ver +++| SBN VPPT 04758 M00S03846.ver +++| PJN RNP10 IF TYPE CODE INCORRECT 04759 M00S03847.ver +++| LDD CL+1 GET PP TYPE FLAG 04760 M00S03848.ver +++| LPN VCPT 04761 M00S03849.ver +++| SHN 13-1 04762 M00S03850.ver +++| LMD CL 04763 M00S03851.ver +++| SHN -6 04764 M00S03852.ver +++| RJM VPN VALIDATE PP NUMBER 04765 M00S03853.ver +++| NJN RNP3 IF NOT ASSIGNED TO NOS/VE 04766 M00S03854.ver +++| LDD T4 PP NUMBER 04767 M00S03855.ver +++| LMC 10000 04768 M00S03856.ver +++| RJM SPB SET LOWER PP BIT 04769 M00S03857.ver +++| RJM DPL DEADSTART PP AND LOAD *PPR* 04770 M00S03858.ver +++| LDN 0 CLEAR ERROR FLAG 04771 M00S03859.ver +++| RNP3 STD PB+4 04772 M00S03860.ver +++| STD CL+4 04773 M00S03861.ver +++| RJM CPA WRITE LIST ENTRY 04774 M00S03862.ver +++| ADN 1 04775 M00S03863.ver +++| CWD CL 04776 M00S03864.ver +++| UJN RNP7 RETURN 04777 M00S03865.ver +++| 04778 M00S03866.ver +++|* RETURN ALL NOS/VE RESERVED PP-S. 04779 M00S03867.ver +++| 04780 M00S03868.ver +++| RNP4 LDN 0 INITIALIZE PP NUMBER AND BAD PP FLAG 04781 M00S03869.ver +++| STD T4 04782 M00S03870.ver +++| STD CL+2 04783 M00S03871.ver +++| RNP5 LDD T4 04784 M00S03872.ver +++| RNP6 RJM VPN VALIDATE PP NUMBER 04785 M00S03873.ver +++| ZJN RNP8 IF ASSIGNED TO NOS/VE 04786 M00S03874.ver +++| LMN ESPP 04787 M00S03875.ver +++| ZJN RNP9 IF NOT END OF PP-S 04788 M00S03876.ver +++| RNP7 LJM RNPX RETURN 04789 M00S03877.ver +++| 04790 M00S03878.ver +++| RNP8 LDD T4 RETURN NOS/VE PP 04791 M00S03879.ver +++| LMC 10000 04792 M00S03880.ver +++| RJM SPB SET LOWER PP BIT 04793 M00S03881.ver +++| RJM DPL DEADSTART PP AND LOAD PPR 04794 M00S03882.ver +++| RNP9 AOD T4 INCREMENT PP NUMBER 04795 M00S03883.ver +++| LPN 17 04796 M00S03884.ver +++| SBN 12 04797 M00S03885.ver +++| NJN RNP5 IF NOT END OF PP BANK 04798 M00S03886.ver +++| LDN 6 SET START OF NEXT BANK 04799 M00S03887.ver +++| RAD T4 04800 M00S03888.ver +++| UJN RNP6 PROCESS NEXT PP 04801 M00S03889.ver +++| RNC SPACE 4,15 04802 M00S03890.ver +++|** FUNCTION 21 - RNCT - RETURN CIO OR NIO CHANNEL. 04803 M00S03891.ver +++|* 04804 M00S03892.ver +++|* ENTRY (PB LIST ENTRY) = 6/CH, 6/0, 12/TYPE, 36/0. 04805 M00S03893.ver +++|* CH - CHANNEL NUMBER BEING RETURNED. 04806 M00S03894.ver +++|* TYPE - TYPE OF CHANNEL. 04807 M00S03895.ver +++|* 0 = NIO CHANNEL. 04808 M00S03896.ver +++|* 1 = CIO CHANNEL. 04809 M00S03897.ver +++|* 04810 M00S03898.ver +++|* EXIT (PB+4) = ERROR STATUS. 04811 M00S03899.ver +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR STATUS. 04812 M00S03900.ver +++|* 04813 M00S03901.ver +++|* USES PB+4, T2, CL - CL+4, CN - CN+4. 04814 M00S03902.ver +++|* 04815 M00S03903.ver +++|* CALLS CPA, VTC. 04816 M00S03904.ver +++| 04817 M00S03905.ver +++| 04818 M00S03906.ver +++| RNC7 LDD TH SET INCORRECT REQUEST STATUS (*ESIR*) 04819 M00S03907.ver +++| STD PB+4 04820 M00S03908.ver +++| 04821 M00S03909.ver +++| RNC SUBR ENTRY/EXIT 04822 M00S03910.ver +++| LDN CTALL READ EJT ASSIGNMENT TABLE 04823 M00S03911.ver +++| STD T2 04824 M00S03912.ver +++| LDC ** FWA OF CHANNEL EJT ASSIGNMENT TABLE 04825 M00S03913.ver +++| RNCA EQU *-2 04826 M00S03914.ver +++| CRM CBUF,T2 04827 M00S03915.ver +++| LDD PB 04828 M00S03916.ver +++| SHN 21-13 04829 M00S03917.ver +++| MJP RNC3 IF RETURNING ALL NOS/VE CHANNELS 04830 M00S03918.ver +++| LDD PB+3 CHECK BLOCK LENGTH 04831 M00S03919.ver +++| ZJN RNCX IF NONE TO BE RETURNED 04832 M00S03920.ver +++| SBN 1 04833 M00S03921.ver +++| NJN RNC7 IF TOO MANY CHANNELS TO BE RETURNED 04834 M00S03922.ver +++| RJM CPA GET CHANNEL TO RETURN 04835 M00S03923.ver +++| ADN 1 04836 M00S03924.ver +++| CRD CL 04837 M00S03925.ver +++| RJM VCN VALIDATE CHANNEL NUMBER 04838 M00S03926.ver +++| PJN RNC2 IF CHANNEL NUMBER INCORRECT 04839 M00S03927.ver +++| LDM NEJT 04840 M00S03928.ver +++| LMM CBUF,T2 04841 M00S03929.ver +++| ZJN RNC1 IF CHANNEL IS NOS/VE RESERVED 04842 M00S03930.ver +++| LDN ESCH SET CHANNEL NOT NOS/VE RESERVED STATUS 04843 M00S03931.ver +++| UJN RNC2 WRITE PARAMETER LIST ENTRY 04844 M00S03932.ver +++| 04845 M00S03933.ver +++| RNC1 RJM VTC VE RETURN CHANNEL 04846 M00S03934.ver +++|* LDN 0 CLEAR ERROR STATUS 04847 M00S03935.ver +++| RNC2 STD PB+4 04848 M00S03936.ver +++| STD CL+4 04849 M00S03937.ver +++| RJM CPA WRITE PARAMETER LIST ENTRY 04850 M00S03938.ver +++| ADN 1 04851 M00S03939.ver +++| CWD CL 04852 M00S03940.ver +++| UJN RNC6 RETURN 04853 M00S03941.ver +++| 04854 M00S03942.ver +++|* RETURN ALL NOS/VE RESERVED CHANNELS. 04855 M00S03943.ver +++| 04856 M00S03944.ver +++| RNC3 LDN 0 INITIALIZE CHANNEL TABLE OFFSET 04857 M00S03945.ver +++| STD T2 04858 M00S03946.ver +++| RNC4 LDM NEJT 04859 M00S03947.ver +++| LMM CBUF,T2 04860 M00S03948.ver +++| NJN RNC5 IF CHANNEL NOT NOS/VE RESERVED 04861 M00S03949.ver +++| RJM VTC VE RETURN CHANNEL 04862 M00S03950.ver +++| RNC5 AOD T2 INCREMENT CHANNEL TABLE OFFSET 04863 M00S03951.ver +++| SBN MXCH+1 04864 M00S03952.ver +++| MJN RNC4 IF NOT END OF TABLE 04865 M00S03953.ver +++| RNC6 LJM RNCX RETURN 04866 M00S03954.ver +++| STP SPACE 4,15 04867 M00S03955.ver +++|** FUNCTION 22 - STPT - STATUS OF NOS/VE PP-S. 04868 M00S03956.ver +++|* 04869 M00S03957.ver +++|* ENTRY (PB LIST ENTRY) = 6/PP NUMBER, 6/0, 12/TYPE, 36/0. 04870 M00S03958.ver +++|* TYPE - TYPE OF PP. 04871 M00S03959.ver +++|* 0 OR 1 = NPP. 04872 M00S03960.ver +++|* 2 OR 3 = CPP. 04873 M00S03961.ver +++|* 04874 M00S03962.ver +++|* (PPCA) = PP COMMUNICATION AREA ADDRESS. 04875 M00S03963.ver +++|* 04876 M00S03964.ver +++|* EXIT (PB+4) = ERROR STATUS. 04877 M00S03965.ver +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR STATUS. 04878 M00S03966.ver +++|* 04879 M00S03967.ver +++|* USES DA, DB, LO, PB+4, CL - CL+4, CN - CN+4. 04880 M00S03968.ver +++|* 04881 M00S03969.ver +++|* CALLS CPA, VPN. 04882 M00S03970.ver +++| 04883 M00S03971.ver +++| 04884 M00S03972.ver +++| STP4 LDD TH SET INCORRECT REQUEST STATUS (*ESIR*) 04885 M00S03973.ver +++| STD PB+4 04886 M00S03974.ver +++| 04887 M00S03975.ver +++| STP SUBR ENTRY/EXIT 04888 M00S03976.ver +++| LDD PB+3 CHECK PARAMETER BLOCK LENGTH 04889 M00S03977.ver +++| ZJN STPX IF NO REQUEST 04890 M00S03978.ver +++| SBK 31D 04891 M00S03979.ver +++| PJN STP4 IF LENGTH .GT. MAXIMUM LIST LENGTH 04892 M00S03980.ver +++| LDN 1 INITIALIZE LIST OFFSET 04893 M00S03981.ver +++| STD LO 04894 M00S03982.ver +++| STP1 RJM CPA READ NEXT LIST ENTRY 04895 M00S03983.ver +++| ADD LO 04896 M00S03984.ver +++| CRD CL 04897 M00S03985.ver +++| LDD CL+1 04898 M00S03986.ver +++| SBN VPPT 04899 M00S03987.ver +++| PJN STP4 IF TYPE CODE INCORRECT 04900 M00S03988.ver +++| LDD CL+1 GET PP TYPE FLAG 04901 M00S03989.ver +++| LPN VCPT 04902 M00S03990.ver +++| SHN 13-1 04903 M00S03991.ver +++| LMD CL 04904 M00S03992.ver +++| SHN -6 04905 M00S03993.ver +++| RJM VPN VALIDATE PP NUMBER 04906 M00S03994.ver +++| ZJN STP3 IF ASSIGNED TO NOS/VE 04907 M00S03995.ver +++| STP2 STD PB+4 04908 M00S03996.ver +++| STP3 STD CL+4 SET ERROR STATUS 04909 M00S03997.ver +++| RJM CPA WRITE RESPONSE 04910 M00S03998.ver +++| ADD LO 04911 M00S03999.ver +++| CWD CL 04912 M00S04000.ver +++| AOD LO INCREMENT LIST OFFSET 04913 M00S04001.ver +++| SBD PB+3 04914 M00S04002.ver +++| SBN 1 04915 M00S04003.ver +++| MJN STP1 IF NOT END OF LIST 04916 M00S04004.ver +++| LJM STPX RETURN 04917 M00S04005.ver +++| STC SPACE 4,15 04918 M00S04006.ver +++|** FUNCTION 23 - STCT - STATUS OF NOS/VE CHANNELS. 04919 M00S04007.ver +++|* 04920 M00S04008.ver +++|* ENTRY (PB LIST ENTRY) = 6/CH, 6/0, 12/TYPE, 36/0. 04921 M00S04009.ver +++|* TYPE - TYPE OF CHANNEL. 04922 M00S04010.ver +++|* 0 = NIO CHANNEL. 04923 M00S04011.ver +++|* 1 = CIO CHANNEL. 04924 M00S04012.ver +++|* 04925 M00S04013.ver +++|* (NEJT) = NOS/VE EJT ORDINAL. 04926 M00S04014.ver +++|* 04927 M00S04015.ver +++|* EXIT (PB+4) = ERROR STATUS. 04928 M00S04016.ver +++|* (PB LIST ENTRY) = 48/UNCHANGED, 12/ERROR STATUS. 04929 M00S04017.ver +++|* 04930 M00S04018.ver +++|* USES LO, PB+4, T2, CL - CL+4, CN - CN+4. 04931 M00S04019.ver +++|* 04932 M00S04020.ver +++|* CALLS CPA. 04933 M00S04021.ver +++| 04934 M00S04022.ver +++| 04935 M00S04023.ver +++| STC5 LDD TH SET INCORRECT REQUEST STATUS (*ESIR*) 04936 M00S04024.ver +++| STD PB+4 04937 M00S04025.ver +++| 04938 M00S04026.ver +++| STC SUBR ENTRY/EXIT 04939 M00S04027.ver +++| LDD PB+3 CHECK PARAMETER BLOCK LENGTH 04940 M00S04028.ver +++| ZJN STCX IF NO REQUEST 04941 M00S04029.ver +++| SBK 35D 04942 M00S04030.ver +++| PJN STC5 IF LENGTH .GT. MAXIMUM LIST LENGTH 04943 M00S04031.ver +++| LDN CTALL 04944 M00S04032.ver +++| STD T2 04945 M00S04033.ver +++| LDC ** FWA OF CHANNEL EJT ASSIGNMENT TABLE 04946 M00S04034.ver +++| STCA EQU *-2 04947 M00S04035.ver +++| CRM CBUF,T2 04948 M00S04036.ver +++| LDN 1 INITIALIZE LIST OFFSET 04949 M00S04037.ver +++| STD LO 04950 M00S04038.ver +++| STC1 RJM CPA READ NEXT LIST ENTRY 04951 M00S04039.ver +++| ADD LO 04952 M00S04040.ver +++| CRD CL 04953 M00S04041.ver +++| RJM VCN VALIDATE CHANNEL NUMBER 04954 M00S04042.ver +++| PJN STC2 IF CHANNEL NUMBER INCORRECT 04955 M00S04043.ver +++| LDM NEJT 04956 M00S04044.ver +++| LMM CBUF,T2 04957 M00S04045.ver +++| ZJN STC3 IF CHANNEL RESERVED BY NOS/VE 04958 M00S04046.ver +++| LDN ESCH SET CHANNEL NOT RESERVED STATUS 04959 M00S04047.ver +++| STC2 STD PB+4 04960 M00S04048.ver +++| STC3 STD CL+4 SET ERROR STATUS 04961 M00S04049.ver +++| RJM CPA WRITE RESPONSE 04962 M00S04050.ver +++| ADD LO 04963 M00S04051.ver +++| CWD CL 04964 M00S04052.ver +++| LDD CL+4 04965 M00S04053.ver +++| LMD TH CHECK IF *ESIR* 04966 M00S04054.ver +++| ZJN STC4 IF INCORRECT REQUEST 04967 M00S04055.ver +++| AOD LO INCREMENT LIST OFFSET 04968 M00S04056.ver +++| SBD PB+3 04969 M00S04057.ver +++| SBN 1 04970 M00S04058.ver +++| MJP STC1 IF NOT END OF LIST 04971 M00S04059.ver +++| STC4 LJM STCX RETURN 04972 M00S04060.ver +++| TITLE SUBROUTINES. 04973 M00S04061.ver +++| DPL SPACE 4,25 04974 M00S04062.ver +++|** DPL - DEADSTART PP AND LOAD *PPR*. 04975 M00S04063.ver +++|* 04976 M00S04064.ver +++|* ENTRY (T3) = OFFSET INTO PP COMMUNICATION AREA. 04977 M00S04065.ver +++|* (T4) = PP NUMBER. 04978 M00S04066.ver +++|* (EC) = ELEMENT CONNECT CODE. 04979 M00S04067.ver +++|* (CL+2) = BAD PP FLAG IN UPPERMOST BIT. 04980 M00S04068.ver +++|* (PPCA) = PP COMMUNICATION AREA ADDRESS. 04981 M00S04069.ver +++|* *PPR* AT PBUF+5. 04982 M00S04070.ver +++|* 04983 M00S04071.ver +++|* EXIT (A) .GT. 0 IF *PPR* SUCCESSFULLY LOADED. 04984 M00S04072.ver +++|* OR IF REQUEST WAS FOR A CONCURRENT PP. 04985 M00S04073.ver +++|* .EQ. 0 IF *PPR* NOT SUCCESSFULLY LOADED. 04986 M00S04074.ver +++|* BML MESSAGE ISSUED WITH PP NUMBER (SYMPTOM 04987 M00S04075.ver +++|* CODE INDICATES WHETHER OPERATION WAS SUCCESSFUL). 04988 M00S04076.ver +++|* IF UNABLE TO COMPLETE DEADSTART/LOAD, THE PP 04989 M00S04077.ver +++|* IS IDLED AND ITS INPUT REGISTER SET TO ***. 04990 M00S04078.ver +++|* 04991 M00S04079.ver +++|* USES T1 - T3, T6, T7, CN - CN+4. 04992 M00S04080.ver +++|* 04993 M00S04081.ver +++|* CALLS IBM, IPP, NEC, PSC, SDC. 04994 M00S04082.ver +++|* 04995 M00S04083.ver +++|* MACROS DCHAN, DELAY, PAUSE, READMR, WRITMR. 04996 M00S04084.ver +++| 04997 M00S04085.ver +++| 04998 M00S04086.ver +++| DPL11 LDD T7 04999 M00S04087.ver +++| DCHAN DROP CHANNEL 05000 M00S04088.ver +++| LDN 0 CLEAR CHANNEL ASSIGNED FLAG 05001 M00S04089.ver +++| STM CHFL 05002 M00S04090.ver +++| LDC /COMSDFS/HS0113 SET NPP RETURNED SYMPTOM CODE 05003 M00S04091.ver +++| DPL12 STD T1 05004 M00S04092.ver +++| LDN ZERL CLEAR DATA WORD 05005 M00S04093.ver +++| CRD CN 05006 M00S04094.ver +++| LDD T4 SET PP NUMBER 05007 M00S04095.ver +++| LPN 37 05008 M00S04096.ver +++| STD CN+4 05009 M00S04097.ver +++| LDC /COMSDFS/HM0240 SET MESSAGE ID 05010 M00S04098.ver +++| RJM IBM ISSUE BML MESSAGE 05011 M00S04099.ver +++| LDN 1 SET SUCCESSFUL LOAD STATUS 05012 M00S04100.ver +++| 05013 M00S04101.ver +++| DPL SUBR ENTRY/EXIT 05014 M00S04102.ver +++| LDM PPCA SET PP INPUT REGISTER ADDRESS 05015 M00S04103.ver +++| RAD T3 05016 M00S04104.ver +++| LDD CL+2 CHECK BAD PP BEING RETURNED 05017 M00S04105.ver +++| SHN 21-13 05018 M00S04106.ver +++| PJN DPL2 IF PP IS OK 05019 M00S04107.ver +++| LDD T4 05020 M00S04108.ver +++| LPN 40 05021 M00S04109.ver +++| ZJN DPL1 IF BAD NPP 05022 M00S04110.ver +++| LDK /COMSDFS/HS0124-/COMSDFS/HS0123 05023 M00S04111.ver +++| DPL1 ADC /COMSDFS/HS0123 SET BAD PP RETURNED SYMPTOM CODE 05024 M00S04112.ver +++| STD T1 05025 M00S04113.ver +++| LDN ZERL CLEAR DATA WORD 05026 M00S04114.ver +++| CRD CN 05027 M00S04115.ver +++| LDD T4 SET PP NUMBER 05028 M00S04116.ver +++| LPN 37 05029 M00S04117.ver +++| STD CN+4 05030 M00S04118.ver +++| LDC /COMSDFS/HM0240 SET MESSAGE ID 05031 M00S04119.ver +++| RJM IBM ISSUE BML MESSAGE 05032 M00S04120.ver +++| LJM DPL10 FLAG DISABLED PP AND RETURN 05033 M00S04121.ver +++| 05034 M00S04122.ver +++| DPL2 LDD T4 05035 M00S04123.ver +++| LPN 40 05036 M00S04124.ver +++| ZJN DPL3 IF NOT CONCURRENT PP 05037 M00S04125.ver +++| LDN ZERL 05038 M00S04126.ver +++| CRD CM 05039 M00S04127.ver +++| LDN 2 SET RETURN CPP SUBFUNCTION 05040 M00S04128.ver +++| STD CM+1 05041 M00S04129.ver +++| LDD T4 05042 M00S04130.ver +++| LPN 37 05043 M00S04131.ver +++| STD CM+4 SET CPP NUMBER 05044 M00S04132.ver +++| MONITOR CPRM RETURN CPP 05045 M00S04133.ver +++| LDC /COMSDFS/HS0115 SET CPP RETURNED SYMPTOM CODE 05046 M00S04134.ver +++| UJP DPL12 ISSUE BML MESSAGE AND RETURN 05047 M00S04135.ver +++| 05048 M00S04136.ver +++| DPL3 LDN 10 INITIALIZE DEADSTART/LOAD ATTEMPT COUNT 05049 M00S04137.ver +++| STD T2 05050 M00S04138.ver +++| LDD T3 SET UP *IA*, *OA*, *MA*, *CP* FOR THIS PP 05051 M00S04139.ver +++| STM PBUF+IA+5 05052 M00S04140.ver +++| ADN 1 05053 M00S04141.ver +++| STM PBUF+OA+5 05054 M00S04142.ver +++| ADN 1 05055 M00S04143.ver +++| STM PBUF+MA+5 05056 M00S04144.ver +++| LDN NCPL SET SYSTEM CONTROL POINT ADDRESS 05057 M00S04145.ver +++| CRD CN 05058 M00S04146.ver +++| AOD CN+1 05059 M00S04147.ver +++| SHN 7 05060 M00S04148.ver +++| STM PBUF+CP+5 05061 M00S04149.ver +++| DPL4 RJM SDC SELECT DEADSTART CHANNEL 05062 M00S04150.ver +++| RJM PSC PRESET CHANNEL INSTRUCTIONS 05063 M00S04151.ver +++| DPLA ACN **+40 ACTIVATE CHANNEL 05064 M00S04152.ver +++| 05065 M00S04153.ver +++|* DEADSTART PP. 05066 M00S04154.ver +++| 05067 M00S04155.ver +++| READMR RBUF,,DEMR READ EC REGISTER 05068 M00S04156.ver +++| LDM RBUF+4 SET PP NUMBER 05069 M00S04157.ver +++| DPLB SCN 37 05070 M00S04158.ver +++|* SCN 77 (IF IOU MODEL I2) 05071 M00S04159.ver +++| LMD T4 05072 M00S04160.ver +++| DPLC LMN 0 05073 M00S04161.ver +++|* LMN 40 (SET AUTO MODE BIT IF IOU MODEL I2) 05074 M00S04162.ver +++| STM RBUF+4 05075 M00S04163.ver +++| LDM RBUF+5 SET CHANNEL NUMBER 05076 M00S04164.ver +++| SCN 37 05077 M00S04165.ver +++| LMD T7 05078 M00S04166.ver +++| STM RBUF+5 05079 M00S04167.ver +++| LDM RBUF+6 SET LOAD MODE BIT 05080 M00S04168.ver +++| SCN 37 05081 M00S04169.ver +++| ADN 20 05082 M00S04170.ver +++| STM RBUF+6 05083 M00S04171.ver +++| LDM RBUF+7 SET ENABLE BIT 05084 M00S04172.ver +++| SCN 40 05085 M00S04173.ver +++| ADN 40 05086 M00S04174.ver +++| STM RBUF+7 05087 M00S04175.ver +++| WRITMR RBUF,,DEMR WRITE EC REGISTER 05088 M00S04176.ver +++| RJM NEC NORMALIZE EC REGISTER 05089 M00S04177.ver +++| 05090 M00S04178.ver +++|* LOAD *PPR*. 05091 M00S04179.ver +++| 05092 M00S04180.ver +++| LDC MSFW+1 OUTPUT START ADDRESS 05093 M00S04181.ver +++| DPLD OAN **+40 05094 M00S04182.ver +++| DELAY 05095 M00S04183.ver +++| DPLE EJM DPL5,0 IF CHANNEL ACCEPTED WORD 05096 M00S04184.ver +++| LJM DPL7 PROCESS TIME OUT 05097 M00S04185.ver +++| 05098 M00S04186.ver +++| DPL5 LDC PPFW-1 05099 M00S04187.ver +++| DPLF OAM PBUF+6,0 OUTPUT *PPR* 05100 M00S04188.ver +++| DPLG SFM DPL7,0 IF PARITY ERRORS 05101 M00S04189.ver +++| DPLH DCN **+40 DISCONNECT CHANNEL TO START PP 05102 M00S04190.ver +++| 05103 M00S04191.ver +++|* WAIT FOR PP TO INITIALIZE. 05104 M00S04192.ver +++|* 05105 M00S04193.ver +++|* NOTE - THE DELAY MUST BE LONG ENOUGH TO ALLOW *PPR* 05106 M00S04194.ver +++|* PRESET TO COMPLETE (AND ISSUE THE *DPPM* TO CLEAR 05107 M00S04195.ver +++|* THE INPUT REGISTER). IF A TIME OUT OCCURS HERE, 05108 M00S04196.ver +++|* AND THE PP IS DEADSTARTED AGAIN AFTER IT IS ALREADY 05109 M00S04197.ver +++|* EXECUTING, THE RESULTS ARE UNPREDICTABLE. 05110 M00S04198.ver +++| 05111 M00S04199.ver +++| LDD TH SET DELAY LOOP COUNT 05112 M00S04200.ver +++| STD T6 05113 M00S04201.ver +++| DPL6 PAUSE NE 05114 M00S04202.ver +++| DELAY 05115 M00S04203.ver +++| SOD T6 05116 M00S04204.ver +++| ZJN DPL8 IF TIME OUT 05117 M00S04205.ver +++| LDD T3 CHECK PP INPUT REGISTER 05118 M00S04206.ver +++| CRD CN 05119 M00S04207.ver +++| LDD CN+1 05120 M00S04208.ver +++| SCN 77 05121 M00S04209.ver +++| SHN 6 05122 M00S04210.ver +++| LMD CN 05123 M00S04211.ver +++| LMC 3RP*V 05124 M00S04212.ver +++| ZJN DPL6 IF PP STILL ASSIGNED TO NOS/VE 05125 M00S04213.ver +++| LJM DPL11 RETURN 05126 M00S04214.ver +++| 05127 M00S04215.ver +++|* PROCESS TIME OUT AND PARITY ERRORS. 05128 M00S04216.ver +++| 05129 M00S04217.ver +++| DPL7 BSS 0 05130 M00S04218.ver +++| DPLI DCN **+40 DISCONNECT CHANNEL 05131 M00S04219.ver +++| DPL8 LDD T7 05132 M00S04220.ver +++| DCHAN DROP CHANNEL 05133 M00S04221.ver +++| LDN 0 CLEAR CHANNEL RESERVED FLAG 05134 M00S04222.ver +++| STM CHFL 05135 M00S04223.ver +++| SOD T2 DECREMENT DEADSTART ATTEMPT COUNT 05136 M00S04224.ver +++| ZJN DPL9 IF DEADSTART NOT TO BE RETRIED 05137 M00S04225.ver +++| LJM DPL4 ATTEMPT DEADSTART AGAIN 05138 M00S04226.ver +++| 05139 M00S04227.ver +++|* IDLE PP AND SET UNUSABLE IF UNABLE TO DEADSTART. 05140 M00S04228.ver +++| 05141 M00S04229.ver +++| DPL9 LDC /COMSDFS/HS0120 SET SYMPTOM CODE 05142 M00S04230.ver +++| STD T1 05143 M00S04231.ver +++| LDN ZERL CLEAR DATA WORD 05144 M00S04232.ver +++| CRD CN 05145 M00S04233.ver +++| LDD T4 SET PP NUMBER 05146 M00S04234.ver +++| STD CN+4 05147 M00S04235.ver +++| LDC /COMSDFS/HM0240 SET MESSAGE ID 05148 M00S04236.ver +++| RJM IBM ISSUE BML MESSAGE 05149 M00S04237.ver +++| RJM IPP IDLE PP 05150 M00S04238.ver +++| DPL10 LDD T3 05151 M00S04239.ver +++| CWM DPLJ,ON SET INPUT REGISTER TO *** 05152 M00S04240.ver +++| LDN 0 05153 M00S04241.ver +++| LJM DPLX RETURN
| Line S04242 Modification History | |
|---|---|
M01 (Removed by) | ver13 |
Seq # *Modification Id* Act ----------------------------+ 05154 M01S04242.ver13 ---| 05155 M01S04243.ver13 ---| GCP SPACE 4,10 05156 M00S04244.ver +++| GCP SPACE 4,25 05157 M00S04245.ver +++|** GCP - GET CURRENT STATUS OF PP-S. 05158 M00S04246.ver +++|* 05159 M00S04247.ver +++|* ENTRY (PPCA) = ADDRESS OF PP COMMUNICATION AREA. 05160 M00S04248.ver +++|* (CL+1) = TYPE OF PP BEING REQUESTED. 05161 M00S04249.ver +++|* = 0 - NPP 0-11B ON 810/830 SYSTEMS,
Proceed to Part 3
cdc/nos2.source/opl.opl871/deck/ver.002.txt · Last modified: by 127.0.0.1