Seq # *Modification Id* Act
----------------------------+
| Line S01481 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di13 |
Seq # *Modification Id* Act
----------------------------+
01626 M02S01481.6di13 ---| NJN DDI11 IF NOT MEDIA ERROR IN DATA
| Line S01482 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di13 |
Seq # *Modification Id* Act
----------------------------+
01627 M02S01482.6di13 ---| DDI10 LJM DDI21 SET *7EI* PROCESSOR INDEX
| Line S01483 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di13 |
Seq # *Modification Id* Act
----------------------------+
01628 M02S01483.6di13 ---|
| Line S01484 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di13 |
Seq # *Modification Id* Act
----------------------------+
01629 M02S01484.6di13 ---| DDI11 LDN 40 SET *EXECUTE DIAGNOSTICS* FLAG
| Line S01485 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di13 |
Seq # *Modification Id* Act
----------------------------+
01630 M02S01485.6di13 ---| RAI T1
| Line S01486 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01631 M02S01486.ns2509 ---|
| Line S01487 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01632 M02S01487.ns2509 ---|* CHECK FOR INVALID 885 STATUS.
| Line S01488 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01633 M02S01488.ns2509 ---|
| Line S01489 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di13 |
M03 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01634 M03S01489.ns2509 ---| DDI12 UJN DDI13 CONTINUE FOR NON-885
| Line S00003 Modification History |
M01 (Added by) | 6di13 |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01635 M02S00003.ns2509 ---| UJN DDI13 CONTINUE FOR NON-885
| Line S01490 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01636 M02S01490.ns2509 ---|* PSN (885)
| Line S01491 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01637 M02S01491.ns2509 ---| DDIB EQU *-1
| Line S01492 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01638 M02S01492.ns2509 ---| LDM OFFW+10
| Line S01493 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01639 M02S01493.ns2509 ---| LPN 40
| Line S01494 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01640 M02S01494.ns2509 ---| NJN DDI13 IF STATUS IS VALID
| Line S01495 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act
----------------------------+
01641 M02S01495.ns2509 ---| LJM DDI20 SET *7EI* PROCESSOR INDEX
01642 M01S01496.6di +++|
01643 M01S01497.6di +++|* CHECK FOR DATA WRITTEN TO DISK.
01644 M01S01498.6di +++|
01645 M01S01499.6di +++| DDI13 UJN DDI15 CONTINUE FOR NON-844/885 DEVICE
01646 M01S01500.6di +++|* PSN (844/885)
01647 M01S01501.6di +++| DDIC EQU *-1
01648 M01S01502.6di +++| LDM OFFW+20
01649 M01S01503.6di +++| LPN 2
01650 M01S01504.6di +++| ZJN DDI14 IF NOT DATA FIELD ERROR
01651 M01S01505.6di +++| LDM DERW
01652 M01S01506.6di +++| ZJN DDI14 IF READ REQUEST
01653 M01S01507.6di +++| STM DEWR SET *DATA WRITTEN/READ* FLAG
01654 M01S01508.6di +++|
01655 M01S01509.6di +++|* CHECK FOR DRIVE NOT READY.
01656 M01S01510.6di +++|
01657 M01S01511.6di +++| DDI14 UJN DDI15 CONTINUE FOR NON-885
01658 M01S01512.6di +++|* PSN (885)
01659 M01S01513.6di +++| DDID EQU *-1
01660 M01S01514.6di +++| LDM OFFW+7
01661 M01S01515.6di +++| SHN 21-0
01662 M01S01516.6di +++| MJN DDI17 IF NOT *NOT READY*
| Line S01517 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di12 |
Seq # *Modification Id* Act
----------------------------+
01663 M02S01517.6di12 ---| DDI15 LDM OFFW+10
01664 M01S00012.6di12 +++| DDI15 LDI T2
01665 M01S00013.6di12 +++| LMC 5020
01666 M01S00014.6di12 +++| NJN DDI17 IF NOT *NOT READY*
01667 M01S00015.6di12 +++| LDM OFFW+10
01668 M01S01518.6di +++|* LDM OFFW (FSC)
01669 M01S01519.6di +++|* LDM OFFW+12 (ISD)
01670 M01S01520.6di +++| DDIE EQU *-1
01671 M01S01521.6di +++| SHN 0-7
01672 M01S01522.6di +++|* SHN 0-12 (FSC)
01673 M01S01523.6di +++|* SHN 0-3 (ISD)
01674 M01S01524.6di +++| DDIF EQU *-1
01675 M01S01525.6di +++| LPN 1
01676 M01S01526.6di +++| DDIG PSN
01677 M01S01527.6di +++|* LMN 1 (FSC)
01678 M01S01528.6di +++| NJN DDI17 IF NOT *NOT READY*
01679 M01S01529.6di +++| LDN EI6 SET *7EI* PROCESSOR INDEX
01680 M01S01530.6di +++| UJN DDI18 EXECUTE *7EI*
01681 M01S01531.6di +++|
01682 M01S01532.6di +++|* CHECK FOR ERROR ON PREVIOUS SECTOR.
01683 M01S01533.6di +++|
01684 M01S01534.6di +++| DDI17 LDM OFFW+14
01685 M01S01535.6di +++|* LDM OFFW+21 (FSC)
| Line S01536 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di13 |
Seq # *Modification Id* Act
----------------------------+
01686 M02S01536.6di13 ---|* UJN DDI20 (ISD)
01687 M01S00004.6di13 +++|* UJN DDI18.1 (ISD)
01688 M01S01537.6di +++| DDIH EQU *-2
01689 M01S01538.6di +++| SHN 0-13
01690 M01S01539.6di +++| ZJN DDI19 IF NOT ERROR ON PREVIOUS SECTOR
01691 M01S00001.6di31 +++| LDM DERW
01692 M01S00002.6di31 +++| ZJN DDI18.2 IF NOT A WRITE
01693 M01S01540.6di +++| AOI T1 SET *ERROR ON PREVIOUS SECTOR* FLAG
01694 M01S01541.6di +++| LDN EI1 SET *7EI* PROCESSOR INDEX
| Line S01542 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di13 |
Seq # *Modification Id* Act
----------------------------+
01695 M02S01542.6di13 ---| DDI18 UJN DDI22 EXECUTE *7EI*
01696 M01S00005.6di13 +++| DDI18 LJM DDI22 EXECUTE *7EI*
01697 M01S00006.6di13 +++|
01698 M01S00007.6di13 +++|* CHECK FOR ISD MEDIA ERROR.
01699 M01S00008.6di13 +++|
01700 M01S00009.6di13 +++| DDI18.1 LDM OFFW+20 CHECK BOX ISOLATION STATUS
01701 M01S00010.6di13 +++| SHN 21-5
01702 M01S00011.6di13 +++| PJN DDI20 IF NOT DRIVE/MEDIA FAULT
01703 M01S00012.6di13 +++| LDM OFFW+10
01704 M01S00013.6di13 +++| SHN 0-4
01705 M01S00014.6di13 +++| LMC 101
| Line S00015 Modification History |
M01 (Added by) | 6di13 |
M02 (Updated by) | 6di31 |
Seq # *Modification Id* Act
----------------------------+
01706 M02S00015.6di31 ---| ZJN DDI18.2 IF MEDIA ERROR IN HEADER
01707 M01S00003.6di31 +++| ZJN DDI21 IF MEDIA ERROR IN HEADER
01708 M01S00016.6di13 +++| LMN 101&103
| Line S00017 Modification History |
M01 (Added by) | 6di13 |
M02 (Updated by) | 6di31 |
Seq # *Modification Id* Act
----------------------------+
01709 M02S00017.6di31 ---| NJN DDI18.3 IF NOT MEDIA ERROR IN DATA
| Line S00018 Modification History |
M01 (Added by) | 6di13 |
M02 (Updated by) | 6di31 |
Seq # *Modification Id* Act
----------------------------+
01710 M02S00018.6di31 ---| DDI18.2 UJN DDI21 SET *7EI* PROCESSOR INDEX
| Line S00019 Modification History |
M01 (Added by) | 6di13 |
M02 (Updated by) | 6di31 |
Seq # *Modification Id* Act
----------------------------+
01711 M02S00019.6di31 ---|
| Line S00020 Modification History |
M01 (Added by) | 6di13 |
M02 (Updated by) | 6di31 |
Seq # *Modification Id* Act
----------------------------+
01712 M02S00020.6di31 ---| DDI18.3 LDN 40 SET *EXECUTE DIAGNOSTICS* FLAG
01713 M01S00004.6di31 +++| ZJN DDI21 IF MEDIA ERROR IN DATA
01714 M01S00005.6di31 +++| LDN 40 SET *EXECUTE DIAGNOSTICS* FLAG
01715 M01S00021.6di13 +++| RAI T1
| Line S00022 Modification History |
M01 (Added by) | 6di13 |
M02 (Updated by) | 6di31 |
Seq # *Modification Id* Act
----------------------------+
01716 M02S00022.6di31 ---| UJN DDI20 EXECUTE *7EI*
01717 M01S00006.6di31 +++| DDI18.2 UJN DDI20 SET *7EI* PROCESSOR INDEX (STATUS ERROR)
01718 M01S01543.6di +++|
01719 M01S01544.6di +++|* CHECK FOR 844/885 MEDIA ERROR.
01720 M01S01545.6di +++|
01721 M01S01546.6di +++| DDI19 LDM OFFW
01722 M01S01547.6di +++|* UJN DDI23 (FSC)
01723 M01S01548.6di +++| DDII EQU *-2
01724 M01S01549.6di +++| LPN 17
01725 M01S01550.6di +++| LMN 10
01726 M01S01551.6di +++| ZJN DDI21 IF MEDIA ERROR
01727 M01S01552.6di +++| LDM OFFW+1
01728 M01S01553.6di +++| SHN 21-13
01729 M01S01554.6di +++| MJN DDI21 IF MEDIA ERROR
01730 M01S01555.6di +++| SHN 13-11
01731 M01S01556.6di +++| MJN DDI21 IF MEDIA ERROR
01732 M01S01557.6di +++| LDM OFFW+20
01733 M01S01558.6di +++| SHN 21-10
01734 M01S01559.6di +++| MJN DDI21 IF MEDIA ERROR
01735 M01S01560.6di +++| DDI20 SOM DDIJ
01736 M01S01561.6di +++| ERRNZ EI5-EI4-1 CODE ASSUMES *EI5* = *EI4* + 1
01737 M01S01562.6di +++| DDI21 LDN EI5 SET *7EI* PROCESSOR INDEX
01738 M01S01563.6di +++|* LDN EI4 (NOT A MEDIA ERROR)
01739 M01S01564.6di +++| DDIJ EQU *-1
01740 M01S01565.6di +++| DDI22 STD T2
01741 M01S01566.6di +++| MSERR 7EI EXECUTE *7EI*
01742 M01S01567.6di +++|
01743 M01S01568.6di +++|* CHECK FOR FSC MEDIA ERROR.
01744 M01S01569.6di +++|
01745 M01S01570.6di +++| DDI23 LDI T2
01746 M01S01571.6di +++| SHN 21-4
01747 M01S01572.6di +++| PJN DDI20 IF NOT MEDIA ERROR
01748 M01S01573.6di +++| LDM OFFW
01749 M01S01574.6di +++| SHN 21-7
01750 M01S01575.6di +++| PJN DDI20 IF NOT MEDIA ERROR
01751 M01S01576.6di +++| LDM OFFW+1
01752 M01S01577.6di +++| SHN 21-6
01753 M01S01578.6di +++| PJN DDI20 IF NOT MEDIA ERROR
01754 M01S01579.6di +++| UJN DDI21 EXECUTE *7EI*
01755 M01S01580.6di +++| SPACE 4,10
01756 M01S01581.6di +++| ERRNG 10000-* *7DI* HAS OVERFLOWED
01757 M01S01582.6di +++| BSS 10000-* SPARES
01758 M01S01583.6di +++| CON DDI-1 (T0) = ENTRY ADDRESS - 1
01759 M01S01584.6di +++| CON DEST (T1) = DEST
01760 M01S01585.6di +++| CON DEGS (T2) = DEGS
01761 M01S01586.6di +++| ERRNZ LN-* INCORRECT *7DI* OVERLAY LENGTH
01762 M01S01587.6di +++| QUAL *
| Line S01588 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di20 |
Seq # *Modification Id* Act
----------------------------+
01763 M02S01588.6di20 ---| 7EI MSOVL 7566,T1,DEXA,(SET ERROR CODE.)
| Line S00005 Modification History |
M01 (Added by) | 6di20 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
01764 M02S00005.252l678 ---| 7EI MSOVL 7542,T1,DEXA,(SET ERROR CODE.)
| Line S00008 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | 6di30 |
Seq # *Modification Id* Act
----------------------------+
01765 M02S00008.6di30 ---| 7EI MSOVL 7547,T1,DEXA,(SET ERROR CODE.)
01766 M01S00001.6di30 +++| 7EI MSOVL 7542,T1,DEXA,(SET ERROR CODE.)
01767 M01S01589.6di +++| SPACE 4
01768 M01S01590.6di +++|*** SET ERROR CODE.
01769 M01S01591.6di +++|* R. J. THIELEN. 75/11/20.
01770 M01S01592.6di +++|* W. E. GOEBEL. 77/01/24.
01771 M01S01593.6di +++| SPACE 4
01772 M01S01594.6di +++|* *7EI* IS CALLED BY *7CI*, *7DI* OR *7FI* TO PERFORM
01773 M01S01595.6di +++|* ADDITIONAL CHECKS ON GENERAL STATUS AND TO ASSIGN AN ERROR
01774 M01S01596.6di +++|* CODE FOR THE CURRENT ERROR. FOR COUPLER TO DISK ERRORS,
01775 M01S01597.6di +++|* *7EI* WILL READ BACK THE PREVIOUS SECTOR FROM THE CONTROLLER
01776 M01S01598.6di +++|* SO THAT THE DRIVER CAN RE-WRITE IT.
01777 M01S01599.6di +++| MSE SPACE 4
01778 M01S01600.6di +++|** DEI - SET ERROR CODE.
01779 M01S01601.6di +++|*
01780 M01S01602.6di +++|* ENTRY (T1) = DEST.
| Line S01603 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di30 |
Seq # *Modification Id* Act
----------------------------+
01781 M02S01603.6di30 ---|* (T2 = INDEX TO PROCESSING ADDRESS IN *7EI*.
01782 M01S00002.6di30 +++|* (T2) = INDEX TO PROCESSING ADDRESS IN *7EI*.
01783 M01S01604.6di +++|* (T4 - T7) = DRIVER PARAMETERS.
01784 M01S01605.6di +++|* (DEAI) = ALGORITHM INDEX.
01785 M01S01606.6di +++|* (DEEC) = ERROR CODE IF CALLED BY *7CI* OR *7FI*.
01786 M01S01607.6di +++|* (DEGS) = GENERAL STATUS.
01787 M01S01608.6di +++|* (DERW) = 1 IF WRITE REQUEST, 0 IF READ REQUEST.
01788 M01S01609.6di +++|* (DEST) = ERROR PROCESSING CONTROL WORD.
01789 M01S01610.6di +++|* (RDSB) = ADDRESS OF DATA BUFFER FOR READ.
01790 M01S01611.6di +++|* (WDSC) = ADDRESS OF DATA BUFFER FOR WRITE.
01791 M01S01612.6di +++|* (WDSE) = ADDRESS OF BUFFER FOR WRITE ERROR RETRY (IF
01792 M01S01613.6di +++|* SPECIFIED ON *SETMS*).
01793 M01S01614.6di +++|* (MB+1) = PHYSICAL DISK ADDRESS FROM *LDAM*.
01794 M01S01615.6di +++|* (MB+2 - MB+5) = DETAILED STATUS, IF ERROR WAS REPORTED
01795 M01S01616.6di +++|* BY CONTROLLER (NOT A *DSWM*/*LDAM*/
01796 M01S01617.6di +++|* CHANNEL PARITY ERROR.
01797 M01S01618.6di +++|*
| Line S01619 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2741 |
Seq # *Modification Id* Act
----------------------------+
01798 M02S01619.ns2741 ---|* EXIT TO *7EL*
01799 M01S00001.ns2741 +++|* EXIT TO *7EK*
01800 M01S01620.6di +++|* (T2) = READ BUFFER ADDRESS.
01801 M01S01621.6di +++|* (T4 - T7) = UNCHANGED.
01802 M01S01622.6di +++|* (DEEC) = ERROR CODE.
01803 M01S01623.6di +++|* (DENR) = 1 IF NON-RECOVERABLE ERROR.
01804 M01S01624.6di +++|* (DEST) = ERROR PROCESSING CONTROL WORD.
01805 M01S01625.6di +++|* BITS AFFECTED BY THIS OVERLAY -
01806 M01S01626.6di +++|* BIT 12 = 1 IF NO RETRIES ARE ALLOWED.
01807 M01S01627.6di +++|* BIT 4 = 1 IF RECOVERY IN PROGRESS (BIT 10
01808 M01S01628.6di +++|* OF GENERAL STATUS IS SET).
01809 M01S01629.6di +++|* BIT 3 = 1 IF BUFFER READBACK FAILED.
01810 M01S01630.6di +++|* (DEWR) = 1 IF DATA MAY HAVE BEEN WRITTEN TO DISK.
01811 M01S01631.6di +++|* (DEXA) = ADDRESS AT WHICH TO RETRY OPERATION.
01812 M01S01632.6di +++|* *LDA1*, IF *7SI* WILL NOT BE CALLED.
01813 M01S01633.6di +++|* *ERR2*, IF *7SI* TO BE CALLED.
01814 M01S01634.6di +++|* (MB+1) = UNCHANGED.
01815 M01S01635.6di +++|* (MB+2 - MB+5) = UNCHANGED.
01816 M01S01636.6di +++|*
01817 M01S01637.6di +++|* USES T2, T7, CM.
01818 M01S01638.6di +++|*
| Line S01639 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di30 |
Seq # *Modification Id* Act
----------------------------+
01819 M02S01639.6di30 ---|* MACROS MSERR.
01820 M01S00003.6di30 +++|* MACROS ISTORE, MSERR.
01821 M01S01640.6di +++|
01822 M01S01641.6di +++|
01823 M01S01642.6di +++| DEI ENTRY *7EI* ENTRY
01824 M01S01643.6di +++|
01825 M01S01644.6di +++| LDM TDEI,T2
01826 M01S01645.6di +++| STD CM
01827 M01S01646.6di +++| LDN 0
01828 M01S01647.6di +++| LJM 0,CM ENTER PROCESSOR
01829 M01S01648.6di +++|
01830 M01S01649.6di +++|* *EI0* - GENERAL STATUS .NE. 5XXX.
01831 M01S01650.6di +++|
01832 M01S01651.6di +++| DEI1 LDM DEGS
01833 M01S01652.6di +++| SHN 21-10
| Line S01653 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
01834 M02S01653.252l678 ---| MJN DEI2 IF RECOVERY IN PROGRESS
| Line S01654 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
01835 M02S01654.252l678 ---| LJM DEI9 SET *DSTE* ERROR CODE
| Line S01655 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
01836 M02S01655.252l678 ---|
| Line S01656 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
01837 M02S01656.252l678 ---| DEI2 SHN 10-5
01838 M01S00009.252l678 +++| PJN DEI4 IF NO RECOVERY IN PROGRESS
01839 M01S00010.252l678 +++| SHN 10-5
01840 M01S01657.6di +++| PJN DEI3 IF NOT A CORRECTABLE ERROR
01841 M01S01658.6di +++| LDM RDSB
01842 M01S01659.6di +++| SBK EPFW-502+1
01843 M01S01660.6di +++| PJN DEI4 IF ERROR PROCESSOR OVERLAYS BUFFER
01844 M01S01661.6di +++| DEI3 LDC ERR2 CAUSE *7EP* TO CALL *7SI*
01845 M01S01662.6di +++| STM DEXA
01846 M01S01663.6di +++| LDN 20 SET IMMEDIATE EXIT FLAG FOR *7EP*
01847 M01S01664.6di +++| RAI T1
| Line S01665 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
01848 M02S01665.252l678 ---| DEI4 LDK DSTE
| Line S01666 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 251l664 |
M03 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
01849 M03S01666.252l678 ---| LJM DEI14 SET *PARE* ERROR CODE
| Line S00001 Modification History |
M01 (Added by) | 251l664 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
01850 M02S00001.252l678 ---| LJM DEI14 SET ERROR CODE
01851 M01S00011.252l678 +++| DEI4 LJM DEI9 SET *DSTE* ERROR CODE
01852 M01S01667.6di +++|
01853 M01S01668.6di +++|* *EI1* - WRITE ERROR ON PREVIOUS SECTOR.
01854 M01S01669.6di +++|
| Line S01670 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
01855 M02S01670.251l664 ---| DEI5 STM WDSB FORCE *WITE LAST SECTOR*
| Line S00002 Modification History |
M01 (Added by) | 251l664 |
M02 (Updated by) | 6di30 |
Seq # *Modification Id* Act
----------------------------+
01856 M02S00002.6di30 ---| DEI5 STM WDSB FORCE *WRITE LAST SECTOR*
01857 M01S00004.6di30 +++| DEI5 LDM ERXA
01858 M01S00005.6di30 +++| NJP DEI8 IF ERROR ON A RETRY
01859 M01S00006.6di30 +++| STM WDSB FORCE *WRITE LAST SECTOR*
01860 M01S01671.6di +++| ERRNZ WLSF CODE ASSUMES VALUE
01861 M01S01672.6di +++| LDM WDSE
01862 M01S01673.6di +++| NJN DEI6 IF WRITE BUFFER SPECIFIED
01863 M01S01674.6di +++| LDM WDSC DESTROY CURRENT SECTOR BUFFER
01864 M01S01675.6di +++| DEI6 STM RDSB
01865 M01S01676.6di +++| STD T2
01866 M01S01677.6di +++| SBK EPFW-502+1
01867 M01S01678.6di +++| PJN DEI6.1 IF BUFFER IN ERROR PROCESSOR AREA
01868 M01S01679.6di +++| LDC DEI7 SET RETURN FROM READ OF COUPLER BUFFER
01869 M01S01680.6di +++| STM RDS
01870 M01S01681.6di +++| LDC DEI6.1 SET ERROR RETURN
01871 M01S01682.6di +++| STM ERRA
01872 M01S00006.6di20 +++| LDD HN
01873 M01S00007.6di20 +++| ERRNZ LJMI-100 CODE DEPENDS ON VALUE
01874 M01S00008.6di20 +++| STM RDSD
01875 M01S00009.6di20 +++| LDC DEI6.0
01876 M01S00010.6di20 +++| STM RDSD+1
01877 M01S01683.6di +++| LDN FCRB READ BACK COUPLER BUFFER
01878 M01S01684.6di +++| LJM RDS3 USE READ PROCESSOR
01879 M01S01685.6di +++|
01880 M01S01686.6di +++|* RETURN HERE ON ERROR IN COUPLER BUFFER READ ATTEMPT.
01881 M01S01687.6di +++|
01882 M01S01688.6di +++| DEI6.1 LDC UJNI+DEI17-DEIA
01883 M01S01689.6di +++| ERRPL DEI17-DEIA-40 RANGE ERROR
01884 M01S01690.6di +++| STM DEIA
01885 M01S01691.6di +++| LDN 10 SET *ERROR ON BUFFER READBACK* FLAG
01886 M01S01692.6di +++| RAI T1
01887 M01S01693.6di +++| UJN DEI8 CONTINUE
01888 M01S00011.6di20 +++|
01889 M01S00012.6di20 +++|* RETURN HERE TO DELAY DURING COUPLER READ BACK.
01890 M01S00013.6di20 +++|
01891 M01S00014.6di20 +++| DEI6.0 STD T0 SAVE (A)
01892 M01S00015.6di20 +++| LDC LDMI RESTORE DRIVER CODE
01893 M01S00016.6di20 +++| STM RDSD+1
01894 M01S00017.6di20 +++| ISTORE RDSD,(NJN WDS5)
01895 M01S00018.6di20 +++| SBN 1 DELAY AT LEAST 128 MICROSECONDS
01896 M01S00019.6di20 +++| NJN *-1 IF DELAY NOT EXPIRED
01897 M01S00020.6di20 +++| LDD T0 RESTORE (A)
01898 M01S00021.6di20 +++| LJM RDS3.1 RE-ENTER DRIVER
01899 M01S01694.6di +++|
01900 M01S01695.6di +++|* SET UP RETRY OF PREVIOUS SECTOR.
01901 M01S01696.6di +++|
01902 M01S01697.6di +++| DEI7 LDM WDS SAVE *WDS* RETURN IN *RDS*
01903 M01S01698.6di +++| STM RDS
01904 M01S01699.6di +++| LDC WEP RETURN TO WEP AFTER RETRY
01905 M01S01700.6di +++| STM WDS
01906 M01S01701.6di +++| LDM WDSC SAVE CURRENT BUFFER ADDRESS
01907 M01S01702.6di +++| STM RDSB
01908 M01S01703.6di +++| LDD T2 SET RETRY BUFFER ADDRESS
01909 M01S01704.6di +++| STM WDSC
01910 M01S01705.6di +++| SOD T7
01911 M01S01706.6di +++|
01912 M01S01707.6di +++|* *EI2* - FUNCTION TIMEOUT / CONTROLLER MEMORY ERROR.
01913 M01S01708.6di +++|
01914 M01S01709.6di +++| DEI8 LDI T1
01915 M01S01710.6di +++| LPC 101
01916 M01S01711.6di +++| ZJN DEI11 IF FUNCTION TIMEOUT
01917 M01S01712.6di +++| LPN 1
01918 M01S01713.6di +++| ZJN DEI10 IF CONTROLLER MEMORY ERROR
01919 M01S01714.6di +++|
01920 M01S01715.6di +++|* *EI4* - STATUS ERROR.
01921 M01S01716.6di +++|
01922 M01S01717.6di +++| DEI9 LDK DSTE&RAME SET *DSTE* ERROR CODE
01923 M01S01718.6di +++| DEI10 LMK RAME&FTOE SET *RAME* ERROR CODE
01924 M01S01719.6di +++| DEI11 LMK FTOE&PARE SET *FTOE* ERROR CODE
01925 M01S01720.6di +++|
01926 M01S01721.6di +++|* *EI5* - MEDIA ERROR.
01927 M01S01722.6di +++|
01928 M01S01723.6di +++| DEI12 LMK PARE&NRDE SET *PARE* ERROR CODE
01929 M01S01724.6di +++|
01930 M01S01725.6di +++|* *EI6* - DEVICE NOT READY.
01931 M01S01726.6di +++|
01932 M01S01727.6di +++| DEI13 LMK NRDE SET *NRDE* ERROR CODE
01933 M01S01728.6di +++| DEI14 STM DEEC
01934 M01S01729.6di +++|
01935 M01S01730.6di +++|* *EI3* - ERROR CODE ALREADY SET.
01936 M01S01731.6di +++|
01937 M01S01732.6di +++| DEI15 LDM DEEC
01938 M01S01733.6di +++|* UJN DEI17 (ERROR ON COUPLER BUFFER READ)
01939 M01S01734.6di +++| DEIA EQU *-2
01940 M01S01735.6di +++| SBK RESE
01941 M01S01736.6di +++| PJN DEI18 IF RESERVE ERROR
01942 M01S01737.6di +++|
01943 M01S01738.6di +++|* CHECK FOR A WRITE REQUEST ON AN ISD DEVICE. THIS IS
01944 M01S01739.6di +++|* CONSIDERED A NON-RECOVERABLE CASE FOR CONTROLLER REPORTED
01945 M01S01740.6di +++|* ERRORS DUE TO THE DATA BUFFERING IN THE 7255 ADAPTER AND
01946 M01S01741.6di +++|* CONTROL MODULE. THE ERROR IS ALSO FORCED UNRECOVERED TO
01947 M01S01742.6di +++|* PREVENT RETRYING THE OPERATION.
01948 M01S01743.6di +++|
01949 M01S01744.6di +++| LDM DEAI
01950 M01S01745.6di +++| SBK AIIB
01951 M01S01746.6di +++| MJN DEI18 IF NOT ISD
01952 M01S01747.6di +++| SBK AIIE-AIIB
01953 M01S01748.6di +++| PJN DEI18 IF NOT ISD
| Line S01749 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
01954 M02S01749.251l664 ---| LDC 200 SET ISD FLAG
01955 M01S00003.251l664 +++| LDC 600 SET ISD/WRITE BUFFERING FLAGS
01956 M01S01750.6di +++| RAI T1
01957 M01S01751.6di +++| SHN 21-4
01958 M01S01752.6di +++| MJN DEI18 IF *CONTINUE* TO BE ISSUED
01959 M01S01753.6di +++| DEI17 LDM DERW
01960 M01S01754.6di +++| ZJN DEI18 IF READ REQUEST
01961 M01S01755.6di +++| STM DEWR SET *DATA WRITTEN/READ* FLAG
01962 M01S01756.6di +++| STM DENR SET *NON-RECOVERABLE* FLAG
01963 M01S01757.6di +++| LDC 2000 SET *UNRECOVERED* FLAG
01964 M01S01758.6di +++| RAI T1
01965 M01S01759.6di +++| DEI18 LDC LEP1 RESET *FNC* TIMEOUT EXIT ADDRESS
01966 M01S01760.6di +++| STM ERRA
01967 M01S01761.6di +++| LDM RDSB
01968 M01S01762.6di +++| STD T2
| Line S01763 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2741 |
Seq # *Modification Id* Act
----------------------------+
01969 M02S01763.ns2741 ---| MSERR 7EL EXECUTE *7EL*
01970 M01S00002.ns2741 +++| MSERR 7EK EXECUTE *7EK*
01971 M01S01764.6di +++|
01972 M01S01765.6di +++|
01973 M01S01766.6di +++| QUAL
01974 M01S01767.6di +++| TDEI BSS 0 PROCESSOR ADDRESS TABLE
01975 M01S01768.6di +++| LOC 0
01976 M01S01769.6di +++| EI0 CON /7EI/DEI1
01977 M01S01770.6di +++| EI1 CON /7EI/DEI5
01978 M01S01771.6di +++| EI2 CON /7EI/DEI8
01979 M01S01772.6di +++| EI3 CON /7EI/DEI15
01980 M01S01773.6di +++| EI4 CON /7EI/DEI9
01981 M01S01774.6di +++| EI5 CON /7EI/DEI12
01982 M01S01775.6di +++| EI6 CON /7EI/DEI13
01983 M01S01776.6di +++| CON 0 FORCE LAST ENTRY OF TABLE .LT. 7777B
01984 M01S01777.6di +++| LOC *O
01985 M01S01778.6di +++| QUAL *
01986 M01S01779.6di +++| SPACE 4
01987 M01S01780.6di +++| ERRNG 10000-* *7EI* HAS OVERFLOWED
01988 M01S01781.6di +++| BSS 10000-* (SPARES)
01989 M01S01782.6di +++| CON DEI-1 (T0) = ENTRY ADDRESS - 1
01990 M01S01783.6di +++| CON DEST (T1) = DEST
01991 M01S01784.6di +++| ERRNZ LN-* INCORRECT *7EI* OVERLAY LENGTH
01992 M01S01785.6di +++| QUAL *
| Line S01786 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
01993 M02S01786.6di24 ---| 7FI MSOVL 7524,T2,DEXA,(FUNCTION TIMEOUT PROCESSOR.)
| Line S00001 Modification History |
M01 (Added by) | 6di24 |
M02 (Updated by) | 6di25 |
Seq # *Modification Id* Act
----------------------------+
01994 M02S00001.6di25 ---| 7FI MSOVL 7531,T2,DEXA,(FUNCTION TIMEOUT PROCESSOR.)
| Line S00001 Modification History |
M01 (Added by) | 6di25 |
M02 (Updated by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
01995 M02S00001.ns2776 ---| 7FI MSOVL 7524,T2,DEXA,(FUNCTION TIMEOUT PROCESSOR.)
01996 M01S00046.ns2776 +++| 7FI MSOVL 7517,T2,DEXA,(FUNCTION TIMEOUT PROCESSOR.)
01997 M01S01787.6di +++| FTO SPACE 4,10
01998 M01S01788.6di +++|*** PROCESS FUNCTION TIMEOUT.
01999 M01S01789.6di +++|* R. M. DANISCH 83/01/03.
02000 M01S01790.6di +++|* P. D. HAAS. 83/04/29.
02001 M01S01791.6di +++| FTO SPACE 4,10
02002 M01S01792.6di +++|*** THE FUNCTION TIMEOUT PROCESSOR IS CALLED BY *7CI*
02003 M01S01793.6di +++|* WHEN ONE OF THE FOLLOWING OCCURS - THE GENERAL STATUS
02004 M01S01794.6di +++|* FUNCTION ISSUED BY *7CI* TIMES OUT, THE DETAILED
02005 M01S01795.6di +++|* STATUS FUNCTION ISSUED BY *7CI* TIMES OUT, OR THERE
02006 M01S01796.6di +++|* IS AN INCOMPLETE DATA TRANSFER ON THE INPUT OF GENERAL
02007 M01S01797.6di +++|* OR DETAILED STATUS IN *7CI*.
02008 M01S01798.6di +++|*
02009 M01S01799.6di +++|* THIS OVERLAY PERFORMS THE FOLLOWING FUNCTIONS -
02010 M01S01800.6di +++|* 1. RESTART A 7054 CONTROLLER HUNG ON A COUPLER LOCKUP
02011 M01S01801.6di +++|* VIA A SHORT AUTOLOAD.
02012 M01S01802.6di +++|* 2. DETERMINE IF A RAM PARITY ERROR OR CONTROLLER STOP
02013 M01S01803.6di +++|* OCCURRED ON A 7155 CONTROLLER.
02014 M01S01804.6di +++| 7FI SPACE 4,10
02015 M01S01805.6di +++|* REDEFINE CHANNEL INSTRUCTIONS TO PRODUCE A LINKED LIST.
02016 M01S01806.6di +++|
02017 M01S01807.6di +++| FWDL$ EQU 1 SELECT FORWARD LINKING
02018 M01S01808.6di +++| RICHL
02019 M01S01809.6di +++| FTO SPACE 4,10
02020 M01S01810.6di +++|** FTO - FUNCTION TIMEOUT PROCESSOR.
02021 M01S01811.6di +++|*
02022 M01S01812.6di +++|* ENTRY (T1) = DEST.
02023 M01S01813.6di +++|* (T2) = FIRST CHANNEL INSTRUCTION ADDRESS.
02024 M01S01814.6di +++|* (T4) = CHANNEL NUMBER.
| Line S01815 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
02025 M02S01815.6di24 ---|* (CHRV) = CHANNEL STATUS.
02026 M01S01816.6di +++|* (DEAI) = ALGORITHM INDEX.
02027 M01S01817.6di +++|* (DEEC) = *CSTE* ERROR CODE.
02028 M01S01818.6di +++|* (DEGS) = GENERAL STATUS.
02029 M01S01819.6di +++|* 5002 IF 7255 MEMORY ERROR.
02030 M01S01820.6di +++|* 5017 IF ISD CONTROL MODULE MEMORY ERROR.
02031 M01S01821.6di +++|* (DERW) = 1 IF WRITE REQUEST, 0 IF READ REQUEST.
02032 M01S01822.6di +++|* (MB, BYTES 0-3) = T4 - T7.
02033 M01S01823.6di +++|* (MB, BYTE 4) = ADDRESS OF LAST *FNC* CALL.
02034 M01S01824.6di +++|* (MB+1) = PHYSICAL DISK ADDRESS FROM *LDAM*.
02035 M01S01825.6di +++|* (MB+2 - MB+5) = DETAILED STATUS, IF ONE TAKEN.
02036 M01S01826.6di +++|*
02037 M01S01827.6di +++|* EXIT TO *7EI*.
02038 M01S01828.6di +++|* (T2) = INDEX TO PROCESSING ADDRESS IN *7EI*
02039 M01S01829.6di +++|* (T4 - T7) = RESTORED FROM *MB*.
02040 M01S01830.6di +++|* (DENR) = 1 IF ALL OF THE FOLLOWING CONDITIONS HOLD -
02041 M01S01831.6di +++|* A. THE CONTROLLER IS CONNECTED.
02042 M01S01832.6di +++|* B. NOT AN ISD DEVICE.
02043 M01S01833.6di +++|* C. THE OPERATION IS A WRITE.
02044 M01S01834.6di +++|* D. TIMEOUT OCCURRED BEFORE THE PREVIOUS
02045 M01S01835.6di +++|* SECTOR WAS WRITTEN TO DISK.
02046 M01S01836.6di +++|* (DERC) = *FTRT* IF ALL OF THE FOLLOWING ARE TRUE -
02047 M01S01837.6di +++|* A. THE CONTROLLER IS CONNECTED.
02048 M01S01838.6di +++|* B. THE DRIVE IS NOT AN ISD.
02049 M01S01839.6di +++|* C. THE CONTROLLER TYPE IS NOT A 7155 MODEL
02050 M01S01840.6di +++|* B OR C.
02051 M01S01841.6di +++|* D. TIMEOUT OCCURRED BEFORE THE PREVIOUS
02052 M01S01842.6di +++|* SECTOR WAS WRITTEN TO DISK.
02053 M01S01843.6di +++|* E. THE ERROR IS NOT A RAM PARITY ERROR.
02054 M01S01844.6di +++|* (DEST) = ERROR PROCESSING CONTROL WORD.
02055 M01S01845.6di +++|* BITS AFFECTED BY THIS OVERLAY -
02056 M01S01846.6di +++|* BIT 6 = 1 IF RAM PARITY ERROR.
02057 M01S01847.6di +++|* BITS 2-1 = CONTROLLER TYPE.
02058 M01S01848.6di +++|* 0 7155 MODEL A.
02059 M01S01849.6di +++|* 1 7155 MODEL B OR C.
02060 M01S01850.6di +++|* 2 7255 ADAPTER.
02061 M01S01851.6di +++|* 3 CONTROL MODULE.
02062 M01S01852.6di +++|* (DEWR) = 1 IF WRITE OPERATION ON NON-ISD DEVICE AND
02063 M01S01853.6di +++|* THE CONTROLLER IS CONNECTED.
02064 M01S01854.6di +++|*
02065 M01S01855.6di +++|* USES T0 - T2, T4 - T7, CM - CM+4.
02066 M01S01856.6di +++|*
02067 M01S01857.6di +++|* CALLS FNC, RCM.
02068 M01S01858.6di +++|*
02069 M01S01859.6di +++|* MACROS MSERR, RICHL.
02070 M01S01860.6di +++|
02071 M01S01861.6di +++|
02072 M01S01862.6di +++| DFI ENTRY *7FI* ENTRY
02073 M01S01863.6di +++|
02074 M01S01864.6di +++| FTO LDN 0
02075 M01S01865.6di +++| FTO1 RAD T2 MODIFY CHANNEL INSTRUCTIONS
02076 M01S01866.6di +++| LDI T2
02077 M01S01867.6di +++| LPN 37
02078 M01S01868.6di +++| STD CM
02079 M01S01869.6di +++| LDD T4
02080 M01S01870.6di +++| SBD CM
02081 M01S01871.6di +++| RAI T2
02082 M01S01872.6di +++| LDD CM
02083 M01S01873.6di +++| NJN FTO1 IF MORE INSTRUCTIONS
02084 M01S01874.6di +++| ERRNZ WLSF CODE DEPENDS ON VALUE
02085 M01S01875.6di +++| STM WDSB
02086 M01S01876.6di +++| LDN EI3 PRESET *7EI* PROCESSOR INDEX
02087 M01S01877.6di +++| STD T2
02088 M01S01878.6di +++| DCN CH+40
| Line S01879 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
02089 M02S01879.6di24 ---| LDM CHRV
| Line S01880 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
02090 M02S01880.6di24 ---| LPN 10
| Line S01881 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
02091 M02S01881.6di24 ---| NJN FTO2 IF CONTROLLER CONNECTED
| Line S01882 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
02092 M02S01882.6di24 ---| LJM FTO17 CALL *7EI*
| Line S01883 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
02093 M02S01883.6di24 ---|
| Line S01884 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
02094 M02S01884.6di24 ---| FTO2 LDM DEAI
02095 M01S00002.6di24 +++| LDM DEAI
02096 M01S01885.6di +++| SBK AIIB
02097 M01S01886.6di +++| MJN FTO4 IF NOT ISD DEVICE
02098 M01S01887.6di +++| SBK AIIE-AIIB
02099 M01S01888.6di +++| PJN FTO4 IF NOT ISD DEVICE
02100 M01S01889.6di +++| LDD HN SET *MEMORY ERROR* FLAG
02101 M01S01890.6di +++| RAI T1
02102 M01S01891.6di +++| LDM DEGS SET CONTROLLER TYPE
02103 M01S01892.6di +++| LMC 5017
02104 M01S01893.6di +++| ZJN FTO3 IF ISD CONTROL MODULE MEMORY ERROR
02105 M01S01894.6di +++| LDN 1S1
02106 M01S01895.6di +++| FTO3 LMN 3S1
02107 M01S01896.6di +++| RAI T1
02108 M01S01897.6di +++| LJM FTO15 CALL *7EI*
02109 M01S01898.6di +++|
02110 M01S01899.6di +++|* ISSUE A SHORT AUTOLOAD TO RESTART THE CONTROLLER IN CASE IT
02111 M01S01900.6di +++|* IS HUNG, AND WAIT UNTIL THE FUNCTION HAS COMPLETED.
02112 M01S01901.6di +++|* DETERMINE WHETHER OR NOT THE ERROR COULD HAVE OCCURRED ON A
02113 M01S01902.6di +++|* PREVIOUS SECTOR.
02114 M01S01903.6di +++|
02115 M01S00047.ns2776 +++| FTO3.1 ADN AIDR-AIDQ
02116 M01S00048.ns2776 +++| ZJN FTO6 IF 885 *DQ* DRIVE
02117 M01S00049.ns2776 +++| ADN AIDQ-AIDM
02118 M01S00050.ns2776 +++| UJN FTO4.1 CHECK FOR 885 *DM* DRIVE
02119 M01S00051.ns2776 +++|
02120 M01S01904.6di +++| FTO4 FNC FCAL,CH ISSUE SHORT AUTOLOAD FUNCTION
02121 M01S01905.6di +++| LDM DERW
02122 M01S01906.6di +++| ZJN FTO5 IF READ SEQUENCE
02123 M01S01907.6di +++| STM DEWR SET *DATA WRITTEN* FLAG
02124 M01S01908.6di +++| LDM DEAI
| Line S01909 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
02125 M02S01909.ns2776 ---| LMN AIDQ
| Line S01910 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
02126 M02S01910.ns2776 ---| ZJN FTO6 IF 885 DRIVE
| Line S01911 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
02127 M02S01911.ns2776 ---| LMN AIDM&AIDQ
| Line S01912 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
02128 M02S01912.ns2776 ---| ZJN FTO6 IF 885 DRIVE
02129 M01S00052.ns2776 +++| SBK AIDR
02130 M01S00053.ns2776 +++| MJN FTO3.1 IF POSSIBLE 885 *DQ* OR *DM* DRIVE
02131 M01S00054.ns2776 +++| FTO4.1 ZJN FTO6 IF CDSS II *DR* OR 885 *DM* DRIVE
02132 M01S01913.6di +++| LDM LDAA
02133 M01S01914.6di +++| LPN 77 EXTRACT INTERLACE
02134 M01S01915.6di +++| FTO5 LMN FCS1
02135 M01S01916.6di +++| ERRZR FCS1 CODE DEPENDS ON VALUE
02136 M01S01917.6di +++| FTO6 STD T7
| Line S01918 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di25 |
Seq # *Modification Id* Act
----------------------------+
02137 M02S01918.6di25 ---| LDN 12 SET AUTOLOAD TIMEOUT COUNTER
02138 M01S00002.6di25 +++| LDD TH SET 5 SECOND TIMEOUT
02139 M01S01919.6di +++| STD T5
| Line S01920 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di25 |
Seq # *Modification Id* Act
----------------------------+
02140 M02S01920.6di25 ---| FTO7 SOD T5
02141 M01S00003.6di25 +++| FTO7 DELAY 10D*8D DELAY FOR 10 MS
02142 M01S00004.6di25 +++| SOD T5
02143 M01S01921.6di +++| MJN RCM1 IF AUTOLOAD TIMEOUT
| Line S01922 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di25 |
Seq # *Modification Id* Act
----------------------------+
02144 M02S01922.6di25 ---| ADN 1
| Line S01923 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di25 |
Seq # *Modification Id* Act
----------------------------+
02145 M02S01923.6di25 ---| PJN *-1 IF NOT ROLL OVER
02146 M01S01924.6di +++| AJM FTO7,CH IF AUTOLOAD NOT PROCESSED
02147 M01S00001.6di25a +++|
02148 M01S00002.6di25a +++|* ACTIVATE THE CHANNEL FOR 25 - 750 MICROSECONDS.
02149 M01S00003.6di25a +++|
02150 M01S00004.6di25a +++|* LDC ** 0 .LE. (A) .LT. 1000B
02151 M01S01925.6di +++| ACN CH
| Line S01926 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di25a |
Seq # *Modification Id* Act
----------------------------+
02152 M02S01926.6di25a ---| SBD MA DELAY
| Line S01927 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di25a |
Seq # *Modification Id* Act
----------------------------+
02153 M02S01927.6di25a ---| PJN *-1 IF DELAY INCOMPLETE
02154 M01S00005.6di25a +++| SBD MA 1022B .LE. (MA) .LE. 7632B
02155 M01S00006.6di25a +++| MJN *-1 IF DELAY INCOMPLETE
02156 M01S01928.6di +++| DCN CH+40
02157 M01S01929.6di +++|
02158 M01S01930.6di +++|* DETERMINE IF RAM PARITY ERROR OCCURRED. THE METHOD FOR
02159 M01S01931.6di +++|* DOING THIS IS TO ISSUE A MANIPULATE PROCESSOR FUNCTION
02160 M01S01932.6di +++|* AND SEE IF IT TIMES OUT. IF IT DOESN-T, THE CONTROLLER
02161 M01S01933.6di +++|* TYPE IS ESTABLISHED AS A 7155, OTHER MODELS WILL NOT ACCEPT
02162 M01S01934.6di +++|* THE FUNCTION. THE INPUT DISPLAY DATA FUNCTION IS USED
02163 M01S01935.6di +++|* TO REFERENCE EACH RAM ADDRESS IN THE CONTROLLER AND WILL
02164 M01S01936.6di +++|* NOT HALT IF A PARITY ERROR IS DETECTED, RATHER A BIT WILL
02165 M01S01937.6di +++|* BE SET IN THE CONTROLLER-S PROCESSOR STATUS THAT INDICATES
02166 M01S01938.6di +++|* THE ERROR. THIS BIT WILL BE INTERROGATED BY THE PP.
02167 M01S01939.6di +++|
02168 M01S01940.6di +++| LDN ZERL
02169 M01S01941.6di +++| CRD CM
02170 M01S01942.6di +++| LDC FTO13 SET ERROR EXIT FOR FUNCTION TIMEOUT
02171 M01S01943.6di +++| STM ERRA
02172 M01S01944.6di +++| LDC 8192DS-5 SET LOOP COUNT FOR 16384 BYTE DUMP
02173 M01S01945.6di +++| STD T5
02174 M01S01946.6di +++|
02175 M01S01947.6di +++| BUF EQU OFFW SCRATCH BUFFER
02176 M01S01948.6di +++| ERRPL BUF+77-* BUFFER OVERLAYS CODE
02177 M01S01949.6di +++| RCM SPACE 4,10
02178 M01S01950.6di +++|** RCM - READ CONTROLLER MEMORY.
02179 M01S01951.6di +++|*
02180 M01S01952.6di +++|* ENTRY (CM+1 - CM+2) = ADDRESS IN CONTROLLER MEMORY.
02181 M01S01953.6di +++|*
02182 M01S01954.6di +++|* EXIT (CM) = 2.
02183 M01S01955.6di +++|* *FCID* FUNCTION ISSUED TO CONTROLLER.
02184 M01S01956.6di +++|* (ERRA) = *FTO16*.
02185 M01S01957.6di +++|*
02186 M01S01958.6di +++|* CALLS FNC.
02187 M01S01959.6di +++|
02188 M01S01960.6di +++|
02189 M01S01961.6di +++| RCMX LJM FTO8 ENTRY/EXIT
02190 M01S01962.6di +++| RCM EQU *-1
02191 M01S01963.6di +++| LDN 2 SET READ MODE
02192 M01S01964.6di +++| STD CM
02193 M01S01965.6di +++| LDN FCMP ISSUE *MANIPULATE PROCESSOR* FUNCTION
02194 M01S01966.6di +++| RJM FNC
02195 M01S01967.6di +++| LDN 5 OUTPUT PARAMETERS
02196 M01S01968.6di +++| OAM CM,CH
02197 M01S01969.6di +++| RCM1 NJN FTO9 IF INCOMPLETE TRANSFER
02198 M01S01970.6di +++| DCN CH+40
02199 M01S01971.6di +++| LDC FTO16 SET ERROR EXIT FOR FUNCTION TIMEOUT
02200 M01S01972.6di +++| STM ERRA
02201 M01S01973.6di +++| LDN FCID ISSUE *INPUT DISPLAY DATA* FUNCTION
02202 M01S01974.6di +++| RJM FNC
02203 M01S01975.6di +++| UJN RCMX RETURN
02204 M01S01976.6di +++|
02205 M01S01977.6di +++|* READ OUT CONTROLLER MEMORY.
02206 M01S01978.6di +++|
02207 M01S01979.6di +++| FTO8 RJM RCM
02208 M01S01980.6di +++| LDD HN INPUT 64 BYTES
02209 M01S01981.6di +++| IAM BUF,CH
02210 M01S01982.6di +++| FTO9 NJN FTO11 IF INCOMPLETE TRANSFER
02211 M01S01983.6di +++| LDN 40
02212 M01S01984.6di +++| RAD CM+2 ADVANCE CONTROLLER ADDRESS
02213 M01S01985.6di +++| SHN 21-10
02214 M01S01986.6di +++| PJN FTO10 IF NOT 8 BIT OVERFLOW
02215 M01S01987.6di +++| STD CM+2
02216 M01S01988.6di +++| AOD CM+1 ADJUST CONTROLLER ADDRESS
02217 M01S01989.6di +++| FTO10 SOD T5
02218 M01S01990.6di +++| NJN FTO8 IF MORE TO READ
02219 M01S01991.6di +++|
02220 M01S01992.6di +++|* OBTAIN PROCESSOR STATUS.
02221 M01S01993.6di +++|
02222 M01S01994.6di +++| LDN FCST ISSUE *INPUT PROCESSOR STATUS* FUNCTION
02223 M01S01995.6di +++| RJM FNC
02224 M01S01996.6di +++| LDN 40 INPUT STATUS
02225 M01S01997.6di +++| IAM BUF,CH
02226 M01S01998.6di +++| FTO11 NJN FTO12 IF INCOMPLETE TRANSFER
02227 M01S01999.6di +++| LDM BUF+23
02228 M01S02000.6di +++| LPN 20
02229 M01S02001.6di +++| SHN 1-4 SET 7155 CONTROLLER TYPE, MODEL A OR/B/C
02230 M01S02002.6di +++| RAI T1
02231 M01S02003.6di +++| LDM BUF SET *RAM PARITY ERROR* FLAG
02232 M01S02004.6di +++| LPN 20
02233 M01S02005.6di +++| SHN 6-4
02234 M01S02006.6di +++| RAI T1
02235 M01S02007.6di +++| LDD MA
02236 M01S02008.6di +++| CRD CM
02237 M01S02009.6di +++| LDD CM+4 CHECK LAST CALL TO *FNC*
02238 M01S02010.6di +++| LMC WDS4+2
02239 M01S02011.6di +++| NJN FTO15 IF NOT WRITE FUNCTION TIMEOUT
02240 M01S02012.6di +++| STD CM+1
02241 M01S02013.6di +++| LDC 321
02242 M01S02014.6di +++| STD CM+2 READ CONTROLLER MEMORY
02243 M01S02015.6di +++| RJM RCM
02244 M01S02016.6di +++| LDN 2 INPUT *WRITE BUFFER TO DISK* FLAG
02245 M01S02017.6di +++| IAM T6,CH
02246 M01S02018.6di +++| FTO12 NJN FTO16 IF INCOMPLETE TRANSFER
02247 M01S02019.6di +++| FTO13 LDD T7
02248 M01S02020.6di +++| NJN FTO15 IF NOT ERROR AFFECTING PREVIOUS SECTOR
02249 M01S02021.6di +++| LDN 1 FORCE ERROR NON-RECOVERABLE
02250 M01S02022.6di +++| STM DENR
02251 M01S02023.6di +++| LDI T1
02252 M01S02024.6di +++| SHN 21-1
02253 M01S02025.6di +++| PJN FTO14 IF NOT B/C MODEL 7155 CONTROLLER
02254 M01S02026.6di +++| SOD T2
02255 M01S02027.6di +++| ERRNZ EI1+1-EI2 CODE DEPENDS ON VALUES
02256 M01S02028.6di +++| UJN FTO15 ADJUST *7EI* PROCESSOR INDEX
02257 M01S02029.6di +++|
| Line S02030 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
02258 M02S02030.251l664 ---| FTO14 SHN 2+1-6
| Line S02031 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
02259 M02S02031.251l664 ---| LPN 2
| Line S02032 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
02260 M02S02032.251l664 ---| LMN 2
| Line S02033 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
02261 M02S02033.251l664 ---| ERRNZ FTRT-3 CODE DEPENDS ON VALUE
| Line S02034 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
02262 M02S02034.251l664 ---| RAM DERC
02263 M01S00004.251l664 +++| FTO14 LPN 20
02264 M01S00005.251l664 +++| NJN FTO15 IF RAM PARITY ERROR
02265 M01S00006.251l664 +++| LDK FTRT-1 FORCE UNRECOVERED
02266 M01S00007.251l664 +++| STM DERC
02267 M01S02035.6di +++| FTO15 SOD T2
02268 M01S02036.6di +++| ERRNZ EI2+1-EI3 CODE DEPENDS ON VALUES
02269 M01S02037.6di +++| FTO16 DCN CH+40
| Line S02038 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di24 |
Seq # *Modification Id* Act
----------------------------+
02270 M02S02038.6di24 ---| FTO17 LDD MA RESTORE DRIVER PARAMETERS
02271 M01S00003.6di24 +++| LDD MA RESTORE DRIVER PARAMETERS
02272 M01S02039.6di +++| CRD T4
02273 M01S02040.6di +++| MSERR 7EI CALL *7EI*
02274 M01S02041.6di +++| FTO SPACE 4,10
02275 M01S02042.6di +++| HERE TERMINATE LINKED CHANNEL INSTRUCTIONS
02276 M01S02043.6di +++| SPACE 4,10
02277 M01S02044.6di +++| ERRNG 10000-* OVERFLOW
02278 M01S02045.6di +++| BSS 10000-* SPARES
02279 M01S02046.6di +++| CON DFI-1 (T0) = ENTRY ADDRESS - 1
02280 M01S02047.6di +++| CON DEST (T1) = DEST
02281 M01S02048.6di +++| CON CH01$ (T2) = FIRST CHANNEL INSTRUCTION ADDRESS
02282 M01S02049.6di +++| ERRNZ LN-* INCORRECT *7FI* OVERLAY LENGTH
02283 M01S02050.6di +++| QUAL *
| Line S02051 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di17 |
Seq # *Modification Id* Act
----------------------------+
02284 M02S02051.6di17 ---| 7GI MSOVL 7620,T2,HEDR+16,(CHANNEL/CONTROLLER ERROR PROCESSOR.)
| Line S00001 Modification History |
M01 (Added by) | 6di17 |
M02 (Updated by) | 6di21 |
Seq # *Modification Id* Act
----------------------------+
02285 M02S00001.6di21 ---| 7GI MSOVL 7613,T2,HEDR+16,(CHANNEL/CONTROLLER ERROR PROCESSOR.)
| Line S00001 Modification History |
M01 (Added by) | 6di21 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02286 M02S00001.252l678 ---| 7GI MSOVL 7606,T2,HEDR+16,(CHANNEL/CONTROLLER ERROR PROCESSOR.)
| Line S00012 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02287 M02S00012.ns2507 ---| 7GI MSOVL 7574,T2,DSFA+4,(CHANNEL/CONTROLLER ERROR PROCESSOR.)
| Line S00001 Modification History |
M01 (Added by) | ns2507 |
M02 (Updated by) | ns2632 |
Seq # *Modification Id* Act
----------------------------+
02288 M02S00001.ns2632 ---| 7GI MSOVL 7625,T2,DSFA+4,(CHANNEL/CONTROLLER ERROR PROCESSOR.)
02289 M01S00001.ns2632 +++| 7GI MSOVL 7613,T2,DSFA+4,(CHANNEL/CONTROLLER ERROR PROCESSOR.)
02290 M01S02052.6di +++| DCP SPACE 4,10
02291 M01S02053.6di +++|*** PROCESS CHANNEL/CONTROLLER ERROR.
02292 M01S02054.6di +++|* R. M. DANISCH 83/01/03.
02293 M01S02055.6di +++| DCP SPACE 4,10
| Line S02056 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02294 M02S02056.ns2507 ---|*** THE CHANNEL/CONTROLLER ERROR PROCESSOR IS CALLED BY
| Line S02057 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02295 M02S02057.ns2507 ---|* *7HI* WHEN IT DETERMINES AN ATTEMPT MUST BE MADE TO
| Line S02058 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02296 M02S02058.ns2507 ---|* DOWN THE CHANNEL. IF THE CHANNEL CANNOT BE DOWNED
| Line S02059 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02297 M02S02059.ns2507 ---|* OR IF DRIVES CANNOT BE RELEASED, THE ERROR IS CONSIDERED
| Line S02060 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02298 M02S02060.ns2507 ---|* UNRECOVERABLE. IN THIS CASE IT MAY BE NECESSARY TO
| Line S02061 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02299 M02S02061.ns2507 ---|* REMOVE DRIVE RESERVATIONS MANUALLY IN ORDER TO GAIN
| Line S02062 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02300 M02S02062.ns2507 ---|* ACCESS THRU A DIFFERENT CONTROLLER.
02301 M01S00002.ns2507 +++|* THE CHANNEL/CONTROLLER ERROR PROCESSOR IS CALLED BY *7HI*.
02302 M01S00003.ns2507 +++|* IF *7HI* WAS UNSUCCESSFUL IN ATTEMPTING THE CONTROLWARE
02303 M01S00004.ns2507 +++|* RELOAD, *7GI* WILL ATTEMPT TO RELEASE DRIVES RESERVED TO THE
02304 M01S00005.ns2507 +++|* FAILING CONTROLLER SO THEY MAY BE ACCESSED THROUGH AN
02305 M01S00006.ns2507 +++|* ALTERNATE CHANNEL. IF THE CONTROLLER IS UNABLE TO RELEASE
02306 M01S00007.ns2507 +++|* DRIVES, IT MAY BE NECESSARY TO REMOVE DRIVE RESERVATIONS
02307 M01S00008.ns2507 +++|* MANUALLY IN ORDER TO GAIN ACCESS THROUGH AN ALTERNATE
02308 M01S00009.ns2507 +++|* CHANNEL.
02309 M01S02063.6di +++| SPACE 4,10
02310 M01S02064.6di +++|* GENERATE LINKED LIST OF CHANNEL INSTRUCTIONS.
02311 M01S02065.6di +++|
02312 M01S02066.6di +++| FWDL$ EQU 1 SELECT FORWARD LINKING
02313 M01S02067.6di +++| RICHL
02314 M01S02068.6di +++| SPACE 4,10
02315 M01S02069.6di +++|* LIST OF PROCESSOR INDICES.
02316 M01S02070.6di +++|
02317 M01S02071.6di +++|
02318 M01S02072.6di +++| QUAL
02319 M01S02073.6di +++| DC1 EQU 0 *DCP1* INDEX
02320 M01S02074.6di +++| DC6 EQU 1 *DCP6* INDEX
02321 M01S02075.6di +++| DC9 EQU 2 *DCP9* INDEX
02322 M01S02076.6di +++| DC11 EQU 3 *DCP11* INDEX
02323 M01S02077.6di +++| QUAL *
02324 M01S02078.6di +++| DCP SPACE 4,10
02325 M01S02079.6di +++|** DCP - PROCESS CHANNEL/CONTROLLER ERROR.
02326 M01S02080.6di +++|*
02327 M01S02081.6di +++|* ENTRY (A) = 0.
02328 M01S02082.6di +++|* (T1) = RDCT.
02329 M01S02083.6di +++|* (T2) = CH01$.
02330 M01S02084.6di +++|* (T4) = CHANNEL NUMBER.
02331 M01S02085.6di +++|* (T5) = EST ORDINAL.
02332 M01S02086.6di +++|*
| Line S02087 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02333 M02S02087.ns2507 ---|* USES T2, CM - CM+4.
02334 M01S00010.ns2507 +++|* USES CM, T2.
02335 M01S02088.6di +++|*
02336 M01S02089.6di +++|* CALLS FNC.
02337 M01S02090.6di +++|*
| Line S02091 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02338 M02S02091.252l678 ---|* MACROS ENDMS, MONITOR.
| Line S00013 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02339 M02S00013.ns2507 ---|* MACROS ENDMS, EXECUTE, MONITOR.
02340 M01S00011.ns2507 +++|* MACROS ENDMS.
02341 M01S02092.6di +++|
02342 M01S02093.6di +++|
02343 M01S02094.6di +++| DCP1 RAD T2
02344 M01S02095.6di +++| LDI T2 MODIFY CHANNEL INSTRUCTIONS
02345 M01S02096.6di +++| LPN 37
02346 M01S02097.6di +++| STD CM
02347 M01S02098.6di +++| LDD T4
02348 M01S02099.6di +++| SBD CM
02349 M01S02100.6di +++| RAI T2
02350 M01S02101.6di +++| LDD CM
02351 M01S02102.6di +++| NJN DCP1 IF MORE INSTRUCTIONS
| Line S02103 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di27 |
Seq # *Modification Id* Act
----------------------------+
02352 M02S02103.6di27 ---| LCN 10 PREVENT OPERATION COMPLETE
| Line S02104 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di27 |
Seq # *Modification Id* Act
----------------------------+
02353 M02S02104.6di27 ---| RAM CHRV
02354 M01S00001.6di27 +++| LDM CHRV PREVENT OPERATION COMPLETE
02355 M01S00002.6di27 +++| SCN 10
02356 M01S00003.6di27 +++| STM CHRV
| Line S02105 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di17 |
Seq # *Modification Id* Act
----------------------------+
02357 M02S02105.6di17 ---| AOM DCPA SET TIME-OUT FLAG
02358 M01S00002.6di17 +++| LDM DEST
02359 M01S00003.6di17 +++| LPN 40
02360 M01S00004.6di17 +++| ZJN DCP2 IF NOT AN ISD DEVICE
02361 M01S00005.6di17 +++| LJM DCP6 AVOID DROP SEEKS AND CONTROLLER HANG
02362 M01S00006.6di17 +++|
02363 M01S00007.6di17 +++| DCP2 AOM DCPA SET TIME-OUT FLAG
02364 M01S02106.6di +++| LDM UERR
02365 M01S02107.6di +++| ERRNZ EPDE-400-EPSM CODE ASSUMES VALUES
02366 M01S02108.6di +++| SHN 21-10
02367 M01S02109.6di +++| MJN DCP4 IF *ENDMS* IS DISABLED
02368 M01S02110.6di +++| LDC DCP3 SET ERROR EXIT ADDRESS
02369 M01S02111.6di +++| STM ERRA
02370 M01S02112.6di +++|
02371 M01S02113.6di +++|* RELEASE ALL UNITS RESERVED TO CONTROLLER.
02372 M01S02114.6di +++|
02373 M01S02115.6di +++| LDN FCDK RELEASE ALL BUT LAST DRIVE ACCESSED
02374 M01S02116.6di +++| RJM FNC
02375 M01S02117.6di +++| DCN CH+40
02376 M01S02118.6di +++| LDN FCDR RELEASE LAST DRIVE ACCESSED
02377 M01S02119.6di +++| RJM FNC
02378 M01S02120.6di +++| SOM DCPA CLEAR TIME-OUT FLAG
02379 M01S02121.6di +++| DCP3 DCN CH+40
02380 M01S02122.6di +++|
02381 M01S02123.6di +++|* SINCE IT IS KNOWN THE CONTROLLER CONTAINS A RAM PARITY
02382 M01S02124.6di +++|* ERROR, IT IS DESIRABLE TO LEAVE THE CONTROLLER IN SUCH A
02383 M01S02125.6di +++|* STATE THAT THE NEXT PP TO ACCESS IT DISCOVERS THE ERROR
02384 M01S02126.6di +++|* ALSO. THE METHOD USED TO ACCOMPLISH THIS IS TO ISSUE A
02385 M01S02127.6di +++|* PROCESSOR MANIPULATION FUNCTION TO CAUSE THE CONTROLLER TO
02386 M01S02128.6di +++|* HANG ON A ZERO INSTRUCTION.
02387 M01S02129.6di +++|
02388 M01S02130.6di +++| DCP4 LDC DCP5 SET ERROR EXIT ADDRESS
02389 M01S02131.6di +++| STM ERRA
02390 M01S02132.6di +++| LDN FCMP HANG CONTROLLER
02391 M01S02133.6di +++| RJM FNC
02392 M01S02134.6di +++| LDN 5
02393 M01S02135.6di +++| OAM DCPB,CH
02394 M01S02136.6di +++| DCP5 LDC LEP1 RESET ERROR EXIT ADDRESS
02395 M01S02137.6di +++| STM ERRA
02396 M01S02138.6di +++| DCN CH+40
| Line S02139 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02397 M02S02139.ns2507 ---|
| Line S02140 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02398 M03S02140.ns2507 ---|* ATTEMPT TO DOWN THE CHANNEL ON THE DRIVE. IF THE CHANNEL
| Line S02141 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02399 M03S02141.ns2507 ---|* CAN BE DOWNED, *MTR* WILL CALL *1MP* TO NOTIFY THE OPERATOR
| Line S02142 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02400 M03S02142.ns2507 ---|* THAT THE CHANNEL WAS DOWNED.
| Line S00014 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02401 M02S00014.ns2507 ---|* CALL *1DS* TO DOWN THE CHANNEL ON THIS DEVICE.
| Line S02143 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02402 M02S02143.ns2507 ---|
| Line S02144 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02403 M02S02144.ns2507 ---| DCP6 LDD T4
| Line S02145 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02404 M03S02145.ns2507 ---| STD CM+3
| Line S02146 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02405 M03S02146.ns2507 ---| LDN DCCS
| Line S02147 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02406 M03S02147.ns2507 ---| STD CM+2
| Line S02148 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02407 M03S02148.ns2507 ---| LDD T5
| Line S02149 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02408 M03S02149.ns2507 ---| STD CM+1
| Line S02150 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02409 M03S02150.ns2507 ---| MONITOR SEQM
| Line S02151 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02410 M03S02151.ns2507 ---| LDD CM+1
| Line S02152 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02411 M03S02152.ns2507 ---| STD T2
| Line S02153 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02412 M03S02153.ns2507 ---| LDM UERR
| Line S00015 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02413 M02S00015.ns2507 ---| STM DCPC+3
| Line S00016 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02414 M02S00016.ns2507 ---| LDD T5
| Line S00017 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02415 M02S00017.ns2507 ---| RAM DCPC+4
| Line S00018 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02416 M02S00018.ns2507 ---| LDD MA PLACE *1DS* CALL IN MESSAGE BUFFER
| Line S00019 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02417 M02S00019.ns2507 ---| CWM DCPC,ON
| Line S00020 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02418 M02S00020.ns2507 ---| LDN 0 INITIALIZE RETRY COUNT
| Line S00021 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02419 M02S00021.ns2507 ---| STD T2
| Line S00022 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02420 M02S00022.ns2507 ---| DCP7 STD CM+1
| Line S00023 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02421 M02S00023.ns2507 ---| EXECUTE 1DS,=
| Line S00024 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02422 M02S00024.ns2507 ---| MONITOR RPPM
| Line S00025 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02423 M02S00025.ns2507 ---| LDD CM+1
| Line S00026 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02424 M02S00026.ns2507 ---| NJN DCP7.1 IF PP ASSIGNED OR REQUEST QUEUED
| Line S00027 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02425 M02S00027.ns2507 ---| AOD T2 INCREMENT RETRY COUNT
| Line S00028 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02426 M02S00028.ns2507 ---| SHN -3
| Line S00029 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02427 M02S00029.ns2507 ---| ZJN DCP7 IF RETRY LIMIT NOT YET REACHED
| Line S00030 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02428 M02S00030.ns2507 ---| DCP7.1 LDM UERR
02429 M01S00012.ns2507 +++| DCP6 LDM UERR
02430 M01S02154.6di +++| ERRNZ EPDE-400-EPSM CODE ASSUMES VALUES
02431 M01S02155.6di +++| SHN 21-10
02432 M01S02156.6di +++| MJN DCP8 IF *ENDMS* DISABLED
02433 M01S02157.6di +++| ENDMS
| Line S02158 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02434 M02S02158.252l678 ---| LDD T2
| Line S02159 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02435 M02S02159.252l678 ---| ZJN DCP11 IF CHANNEL NOT DOWNED
02436 M01S00002.6di21 +++| LDM CHRV
02437 M01S00003.6di21 +++| SHN 21-4
02438 M01S00004.6di21 +++| MJN DCP11 IF CALLER SELECTED CHANNEL
02439 M01S02160.6di +++| DCPA LDN 0
02440 M01S02161.6di +++|* LDN 1 (*FCDK*/*FCDR* TIMED OUT)
02441 M01S02162.6di +++| DCP8 NJN DCP11 IF DRIVES NOT RELEASED
| Line S02163 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02442 M02S02163.ns2507 ---| DCP9 STM DERC CLEAR RETRY COUNT TO ALLOW RECOVERY
| Line S00016 Modification History |
M01 (Added by) | 6di12 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02443 M02S00016.ns2507 ---| STD CM
02444 M01S00013.ns2507 +++| DCP9 STD CM
02445 M01S02164.6di +++| LDI T1
| Line S02165 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
02446 M02S02165.253l688 ---| LPC 420
02447 M01S00005.253l688 +++| LPC 500
02448 M01S02166.6di +++| STI T1
| Line S02167 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di12 |
Seq # *Modification Id* Act
----------------------------+
02449 M02S02167.6di12 ---| STD CM
02450 M01S02168.6di +++| SOM HEDR+6
| Line S02169 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di22 |
Seq # *Modification Id* Act
----------------------------+
02451 M02S02169.6di22 ---| LDC -2000
| Line S02170 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di22 |
Seq # *Modification Id* Act
----------------------------+
02452 M02S02170.6di22 ---| RAM DEST
02453 M01S00001.6di22 +++| LDM DEST
02454 M01S00002.6di22 +++| LPC -3000
02455 M01S00003.6di22 +++| STM DEST
02456 M01S02171.6di +++| LDD CP CLEAR CONTROL POINT MESSAGE
02457 M01S02172.6di +++| ADN MS2W
02458 M01S02173.6di +++| CWD CM
02459 M01S02174.6di +++| LJM LDA1 RETRY I/O
02460 M01S02175.6di +++|
| Line S02176 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02461 M02S02176.ns2507 ---|* ONE OF THE FOLLOWING IS TRUE -
| Line S02177 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02462 M02S02177.ns2507 ---|* A. THE ATTEMPT TO DOWN THE CHANNEL FAILED.
| Line S02178 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02463 M02S02178.ns2507 ---|* B. THE CHANNEL WAS DOWNED BUT THE ATTEMPT TO RELEASE
| Line S02179 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02464 M02S02179.ns2507 ---|* THE DRIVES FAILED AND EITHER THE STATE OF THE
| Line S02180 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02465 M02S02180.ns2507 ---|* UNIT RESERVE IS UNCERTAIN OR THE DRIVE IS SHARED
| Line S02181 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02466 M02S02181.ns2507 ---|* AND THE ERROR IS UNRECOVERED.
| Line S02182 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02467 M02S02182.ns2507 ---|
| Line S02183 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | ns2632 |
Seq # *Modification Id* Act
----------------------------+
02468 M02S02183.ns2632 ---| DCP11 LJM LEP EXECUTE *7EQ*
02469 M01S00002.ns2632 +++| DCP11 LDM DEST SET UNRECOVERED FLAG
02470 M01S00003.ns2632 +++| LPC -2000
02471 M01S00004.ns2632 +++| LMC 2000
02472 M01S00005.ns2632 +++| STM DEST
02473 M01S00006.ns2632 +++| LJM LEP EXECUTE *7EQ*
02474 M01S02184.6di +++|
02475 M01S02185.6di +++| DCPB CON 4,0,27,0,0
| Line S00031 Modification History |
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act
----------------------------+
02476 M02S00031.ns2507 ---| DCPC VFD 18/3R1DS,6/,6/0,6/DWNF,12/0,12/4000
02477 M01S02186.6di +++| PCE SPACE 4,20
02478 M01S02187.6di +++|** PCE - PROCESS CHANNEL/CONTROLLER ERROR.
02479 M01S02188.6di +++|*
02480 M01S02189.6di +++|* ENTRY (T3) = PROCESSOR INDEX.
02481 M01S02190.6di +++|* = 0 FOR *DCP1*.
02482 M01S02191.6di +++|* = 1 FOR *DCP6*.
02483 M01S02192.6di +++|* = 2 FOR *DCP9*.
02484 M01S02193.6di +++|* = 3 FOR *DCP11*.
02485 M01S02194.6di +++|* (MB+2) = ORIGINAL CELLS (T3 - T7).
02486 M01S02195.6di +++|* (MB+3 - MB+5) = LAST THREE WORDS OF DETAILED STATUS.
02487 M01S02196.6di +++|*
02488 M01S02197.6di +++|* EXIT (A) = 0.
02489 M01S02198.6di +++|* (T3 - T7) = RESTORED FROM (MB+2).
02490 M01S02199.6di +++|* (MB+3 - MB+5) = UNCHANGED.
02491 M01S02200.6di +++|*
02492 M01S02201.6di +++|* USES CM.
02493 M01S02202.6di +++|*
02494 M01S02203.6di +++|* NOTE IF THE TAGS IN *7GI* ARE RENAMED OR RENUMBERED,
02495 M01S02204.6di +++|* THE TABLE INDEX MNEMONICS DEFINED ABOVE SHOULD ALSO
02496 M01S02205.6di +++|* BE UPDATED TO REFLECT THOSE CHANGES (FOR CLARITY).
02497 M01S02206.6di +++|
02498 M01S02207.6di +++|
02499 M01S02208.6di +++| DGI ENTRY *7GI* ENTRY
02500 M01S02209.6di +++|
02501 M01S02210.6di +++| PCE BSS 0
02502 M01S02211.6di +++| LDM TPCE,T3 SET PROCESSOR ADDRESS
02503 M01S02212.6di +++| STD CM
02504 M01S02213.6di +++| LDD MA RESTORE DIRECT CELLS
02505 M01S02214.6di +++| ADN 2
02506 M01S02215.6di +++| CRD T3
02507 M01S02216.6di +++| LDN 0
02508 M01S02217.6di +++| LJM 0,CM EXIT TO PROCESSOR
02509 M01S02218.6di +++|
02510 M01S02219.6di +++|
02511 M01S02220.6di +++| TPCE BSS 0 PROCESSOR ADDRESSES
02512 M01S02221.6di +++| LOC 0
02513 M01S02222.6di +++| DC1 CON DCP1
02514 M01S02223.6di +++| DC6 CON DCP6
02515 M01S02224.6di +++| DC9 CON DCP9
02516 M01S02225.6di +++| DC11 CON DCP11
02517 M01S02226.6di +++| LOC *O
02518 M01S02227.6di +++| DCP SPACE 4,10
02519 M01S02228.6di +++| HERE TERMINATE LINKED CHANNEL INSTRUCTIONS
02520 M01S02229.6di +++| SPACE 4,10
02521 M01S02230.6di +++| ERRNG 10000-* OVERFLOW
02522 M01S02231.6di +++| BSS 10000-* SPARES
02523 M01S02232.6di +++| CON DGI-1 (T0) = ENTRY ADDRESS - 1
02524 M01S02233.6di +++| CON RDCT (T1) = RDCT
02525 M01S02234.6di +++| CON CH01$ (T2) = CH01$
02526 M01S02235.6di +++| ERRNZ LN-* INCORRECT *7GI* OVERLAY LENGTH
02527 M01S02236.6di +++| QUAL *
| Line S02237 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02528 M02S02237.252l678 ---| 7HI MSOVL 7567,T2,HEDR+16,(CONTROLWARE RELOAD PROCESSOR.)
02529 M01S00032.252l678 +++| 7HI MSOVL 7574,T2,DSFA+4,(CONTROLWARE RELOAD PROCESSOR.)
02530 M01S02238.6di +++| SPACE 4,10
02531 M01S02239.6di +++|*** PROCESS CONTROLWARE RELOAD.
02532 M01S02240.6di +++|* P. D. HAAS. 83/04/29.
02533 M01S02241.6di +++| 7HI SPACE 4,10
02534 M01S02242.6di +++|* *7HI* IS CALLED BY *7JI* TO RELOAD CHANNEL OR CONTROL
02535 M01S02243.6di +++|* MODULE CONTROLWARE. *7HI* SETS THE RELOAD FLAG FOR THE
02536 M01S02244.6di +++|* CHANNEL OR CONTROL MODULE AND THEN CALLS *1DS* TO START A
02537 M01S02245.6di +++|* *LOADBC* JOB WHICH RELOADS THE CONTROLWARE. *7HI* WILL WAIT
02538 M01S02246.6di +++|* UP TO *CRTO* SECONDS FOR THE RELOAD TO COMPLETE BEFORE GIVING
02539 M01S02247.6di +++|* UP.
02540 M01S02248.6di +++| SPACE 4,10
02541 M01S02249.6di +++|** COMMON DECKS.
02542 M01S02250.6di +++|
02543 M01S02251.6di +++|
02544 M01S02252.6di +++|*CALL COMS1DS
02545 M01S02253.6di +++| RCW SPACE 4,25
02546 M01S02254.6di +++|** RCW - RELOAD CONTROLWARE PROCESSOR.
02547 M01S02255.6di +++|*
02548 M01S02256.6di +++|* ENTRY (T1) = DEST.
02549 M01S02257.6di +++|* (T2) = RELOAD TIMEOUT VALUE.
02550 M01S02258.6di +++|* (T3) = ADDRESS + *CM* OF BYTE CONTAINING
02551 M01S02259.6di +++|* RELOAD FLAGS.
02552 M01S02260.6di +++|* (T4) = CONTROL MODULE ACCESS INDICATOR. FOR C/M
02553 M01S02261.6di +++|* RELOADS, 1 INDICATES PRIMARY CHANNEL SHOULD
02554 M01S02262.6di +++|* BE USED FOR RELOAD. 0 INDICATES SECONDARY
02555 M01S02263.6di +++|* CHANNEL SHOULD BE USED. THIS CELL IS
02556 M01S02264.6di +++|* UNUSED FOR NON-C/M RELOADS.
02557 M01S02265.6di +++|* (T5) = SYSTEM CP *MS2W* ADDRESS.
02558 M01S02266.6di +++|* (T6 - T7) = ADDRESS OF RELOAD INTERLOCK WORD.
02559 M01S02267.6di +++|* (DEST) = ERROR PROCESSING CONTROL WORD.
02560 M01S02268.6di +++|* (MB+2) = ORIGINAL CELLS (T3 - T7)
02561 M01S02269.6di +++|* (MB+3 - MB+5) = LAST THREE WORDS OF DETAILED STATUS.
02562 M01S02270.6di +++|*
02563 M01S02271.6di +++|* EXIT TO *7GI*.
02564 M01S02272.6di +++|* (T3) = *7GI* PROCESSOR INDEX.
| Line S02273 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02565 M02S02273.252l678 ---|* (DEDT) = BML MESSAGE CONTROL WORD.
| Line S02274 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02566 M02S02274.252l678 ---|* BITS AFFECTED BY THIS OVERLAY -
| Line S02275 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02567 M02S02275.252l678 ---|* BIT 5 = 1 IF CONTROL MODULE RELOADED.
| Line S02276 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02568 M02S02276.252l678 ---|* BIT 4 = 1 IF CONTROLLER/ADAPTER RELOADED.
02569 M01S02277.6di +++|* (MB+2) = UNCHANGED.
02570 M01S02278.6di +++|* (MB+3 - MB+5) = UNCHANGED.
02571 M01S02279.6di +++|*
02572 M01S02280.6di +++|* USES CM - CM+4, T0 - T7.
02573 M01S02281.6di +++|*
02574 M01S02282.6di +++|* CALLS FTN, SCT.
02575 M01S02283.6di +++|*
02576 M01S02284.6di +++|* MACROS DELAY, MONITOR, MSERR, PAUSE.
02577 M01S02285.6di +++|
02578 M01S02286.6di +++|
02579 M01S02287.6di +++| DHI ENTRY *7HI* ENTRY
02580 M01S02288.6di +++|
02581 M01S02289.6di +++| RCW LDI T1
02582 M01S02290.6di +++| SHN 0-1
02583 M01S02291.6di +++| LPN 3
02584 M01S02292.6di +++| LMN 3
02585 M01S02293.6di +++| NJN RCW0 IF NOT CONTROL MODULE RELOAD
02586 M01S02294.6di +++| LDD T4 STORE C/M ACCESS INDICATOR
02587 M01S02295.6di +++| RAM SCTC+4 SET PRIMARY OR SECONDARY CHANNEL
| Line S02296 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02588 M02S02296.252l678 ---| AOM RCWE CHANGE RECOVERY MESSAGE FOR C/M RELOAD
02589 M01S02297.6di +++| SOM RCWD AVOID DOWNING CHANNEL IF RELOAD FAILS
02590 M01S02298.6di +++| ERRNZ RCW8-RCW7-1 CODE ASSUMES *RCW8* = RCW7* + 1
02591 M01S02299.6di +++| AOM RCWC+4 INDICATE CONTROL MODULE RELOAD TO *1DS*
02592 M01S02300.6di +++| UJN RCW0.1 BEGIN RELOAD
02593 M01S02301.6di +++|
02594 M01S02302.6di +++| RCW0 LDM SCTA-CM,T3 DEFINE LOCATION OF LOAD FLAGS
02595 M01S02303.6di +++| STM SCTC+1
02596 M01S02304.6di +++| STM SCTB+1
02597 M01S02305.6di +++| SOM SCTC SET CORRECT FIELD WIDTH FOR NON-C/M LOAD
02598 M01S02306.6di +++| STM SCTC+4 SET CORRECT FIELD VALUE
02599 M01S02307.6di +++|
02600 M01S02308.6di +++|* SET THE CONTROLWARE RELOAD FLAG FOR THE APPROPRIATE CHANNEL
02601 M01S02309.6di +++|* OR CONTROL MODULE.
02602 M01S02310.6di +++|
02603 M01S02311.6di +++| RCW0.1 LDN 2 SET *UTEM* PARAMETER COUNT FOR *SCT*
02604 M01S02312.6di +++| STD T4
02605 M01S02313.6di +++| RJM SCT
02606 M01S02314.6di +++| NJN RCW3 IF RELOAD ALREADY REQUESTED OR IN PROGRESS
02607 M01S02315.6di +++|
02608 M01S02316.6di +++|* INITIATE A CONTROLWARE RELOAD *1DS* CALL. *1DS* WILL START A
02609 M01S02317.6di +++|* *LOADBC* JOB TO RELOAD THE CONTROLWARE.
02610 M01S02318.6di +++|
02611 M01S02319.6di +++| RCW1 RJM FTN
02612 M01S02320.6di +++|* PAUSE NE PAUSE FOR MOVE
02613 M01S02321.6di +++| LDD MA
02614 M01S02322.6di +++| CWM RCWC,ON STORE *1DS* CALL
02615 M01S02323.6di +++| MONITOR RPPM
02616 M01S02324.6di +++| LDD CM+1
02617 M01S02325.6di +++| ZJN RCW1 IF PP NOT ASSIGNED
02618 M01S02326.6di +++|
02619 M01S02327.6di +++|* WAIT *CRTO* SECONDS FOR THE RELOAD TO COMPLETE.
02620 M01S02328.6di +++|
02621 M01S02329.6di +++| LDN 0
02622 M01S02330.6di +++| RCW2 LPN 1
02623 M01S02331.6di +++| RCWA ZJN RCW3 IF RELOAD NOT INITIATED
02624 M01S02332.6di +++| STM RCWA
02625 M01S02333.6di +++| ZJN RCW4 IF RELOAD ABORTED
02626 M01S02334.6di +++| RCW3 SOD T2
02627 M01S02335.6di +++| NJN RCW5 IF NOT RELOAD TIMEOUT
02628 M01S02336.6di +++| RCW4 RJM SCT CLEAR LOAD REQUESTED FLAG
02629 M01S02337.6di +++| NJN RCW5 IF RELOAD REQUEST NOT CLEARED
02630 M01S02338.6di +++| LJM RCW8 CONTINUE
02631 M01S02339.6di +++| RCWD EQU *-1
02632 M01S02340.6di +++|
02633 M01S02341.6di +++| RCW5 DELAY 100D*8D 100 MILLISECOND DELAY LOOP
02634 M01S02342.6di +++| RJM FTN
02635 M01S02343.6di +++|* PAUSE NE
02636 M01S02344.6di +++| LDD T6 CHECK RELOAD FLAGS
02637 M01S02345.6di +++| SHN 14
02638 M01S02346.6di +++| LMD T7
02639 M01S02347.6di +++| CRD CM
02640 M01S02348.6di +++| LDI T3
02641 M01S02349.6di +++| SHN 0-12
02642 M01S02350.6di +++| NJN RCW2 IF RELOAD NOT COMPLETE
| Line S02351 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02643 M02S02351.252l678 ---|
| Line S02352 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02644 M02S02352.252l678 ---|* THE CONTROLWARE RELOAD HAS SUCCESSFULLY COMPLETED. SET A
| Line S02353 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02645 M02S02353.252l678 ---|* FLAG TO TELL *7EQ* THAT THE BML MESSAGE SHOULD INDICATE
| Line S02354 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02646 M02S02354.252l678 ---|* CONTROLWARE WAS RELOADED.
| Line S02355 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02647 M02S02355.252l678 ---|
| Line S02356 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02648 M02S02356.252l678 ---| LDN 1
| Line S02357 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02649 M02S02357.252l678 ---|* LDN 2 (CONTROL MODULE RELOAD)
| Line S02358 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02650 M02S02358.252l678 ---| RCWE EQU *-1
| Line S02359 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02651 M02S02359.252l678 ---| SHN 4-0
| Line S02360 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02652 M02S02360.252l678 ---| RAM DEDT
02653 M01S02361.6di +++| LDI T1
02654 M01S02362.6di +++| SHN 0-1
02655 M01S02363.6di +++| LPN 7
02656 M01S02364.6di +++| LMN 1
02657 M01S02365.6di +++| ZJN RCW6 IF 7155 B OR C AND READBACK WORKED
02658 M01S02366.6di +++| LDM DENR
02659 M01S02367.6di +++| LMN 1
02660 M01S02368.6di +++| ZJN RCW7 IF UNRECOVERABLE WITH CONTROLWARE RELOAD
02661 M01S02369.6di +++| RCW6 LDN DC9&DC11
02662 M01S02370.6di +++| RCW7 LMN DC11
02663 M01S02371.6di +++| ERRNZ DC1 CODE DEPENDS ON VALUE
02664 M01S02372.6di +++| RCW8 STD T3
02665 M01S02373.6di +++| LDN 0
02666 M01S02374.6di +++| STD CM
02667 M01S02375.6di +++| LDD T5 CLEAR SYSTEM CP MESSAGE
02668 M01S02376.6di +++| CWD CM
02669 M01S02377.6di +++| MSERR 7GI EXECUTE *7GI*
02670 M01S02378.6di +++|
02671 M01S02379.6di +++|
02672 M01S02380.6di +++| RCWC VFD 18/0L1DS,6/0,6/0,6/ILJF,24/0
02673 M01S02381.6di +++| SCT SPACE 4,15
02674 M01S02382.6di +++|** SCT - SET (CLEAR) CONTROLWARE LOAD REQUEST FLAG.
02675 M01S02383.6di +++|*
02676 M01S02384.6di +++|* ENTRY (T4) = 2.
02677 M01S02385.6di +++|* (T6 - T7) = ADDRESS OF WORD CONTAINING CONTROLWARE
02678 M01S02386.6di +++|* LOAD FLAGS.
02679 M01S02387.6di +++|*
02680 M01S02388.6di +++|* EXIT (A) = RESPONSE FROM *UTEM* REQUEST.
02681 M01S02389.6di +++|*
02682 M01S02390.6di +++|* USES CM - CM+4.
02683 M01S02391.6di +++|*
02684 M01S02392.6di +++|* MACROS MONITOR.
02685 M01S02393.6di +++|
02686 M01S02394.6di +++|
02687 M01S02395.6di +++| SCT SUBR ENTRY/EXIT
02688 M01S02396.6di +++| LDD MA SETUP OUTPUT REGISTER
02689 M01S02397.6di +++| CWD T7-4
02690 M01S02398.6di +++| CRD CM
02691 M01S02399.6di +++| CWM SCTB,CM+1 STORE *UTEM* PARAMETERS
02692 M01S02400.6di +++| MONITOR UTEM
02693 M01S02401.6di +++|* LDN 0 RESET PARAMETERS FOR ERROR PROCESSING
02694 M01S02402.6di +++| STM SCTC+4
02695 M01S02403.6di +++| LDN 2
02696 M01S02404.6di +++| STM SCTB+4
02697 M01S02405.6di +++| LDD CM+1
02698 M01S02406.6di +++| UJN SCTX RETURN
02699 M01S02407.6di +++|
02700 M01S02408.6di +++|
02701 M01S02409.6di +++| SCTA BSS 0 TABLE OF RELOAD FLAG BIT POSITIONS
02702 M01S02410.6di +++| CON 58DS6
02703 M01S02411.6di +++| CON 46DS6
02704 M01S02412.6di +++| CON 34DS6
02705 M01S02413.6di +++| CON 22DS6
02706 M01S02414.6di +++| CON 10DS6
02707 M01S02415.6di +++|
02708 M01S02416.6di +++| SCTB VFD 1/1,5/0,6/2,6/34D,42/0
02709 M01S02417.6di +++|* VFD 1/1,5/0,6/2,6/34D,42/2
02710 M01S02418.6di +++| SCTC VFD 1/0,5/0,6/3,6/33D,42/4
02711 M01S02419.6di +++|* VFD 1/0,5/0,6/3,6/33D,42/0
02712 M01S02420.6di +++| SPACE 4,10
02713 M01S02421.6di +++| ERRNG 10000-* OVERFLOW
02714 M01S02422.6di +++| BSS 10000-* SPARES
02715 M01S02423.6di +++| CON DHI-1 (T0) = ENTRY ADDRESS - 1
02716 M01S02424.6di +++| CON DEST (T1) = DEST
02717 M01S02425.6di +++| CON CRTO*10D+1 (T2) = RELOAD TIMEOUT VALUE
02718 M01S02426.6di +++| ERRNZ LN-* INCORRECT *7HI* OVERLAY LENGTH
02719 M01S02427.6di +++| QUAL *
| Line S02428 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02720 M02S02428.252l678 ---| 7II MSOVL 7613,T2,HEDR+16,(INITIATE CONTROLWARE RELOAD.)
02721 M01S00033.252l678 +++| 7II MSOVL 7613,T2,DSFA+4,(INITIATE CONTROLWARE RELOAD.)
02722 M01S02429.6di +++| SPACE 4,10
02723 M01S02430.6di +++|*** INITIATE CONTROLWARE RELOAD.
02724 M01S02431.6di +++|* P. D. HAAS. 83/04/29.
02725 M01S02432.6di +++|* R. M. DANISCH. 83/10/17.
02726 M01S02433.6di +++| SPACE 4,10
02727 M01S02434.6di +++|*** *7II* IS CALLED BY *7EP* TO DETERMINE WHETHER OR NOT
02728 M01S02435.6di +++|* A CONTROLWARE RELOAD IS POSSIBLE. IF SO, *7JI* IS CALLED TO
02729 M01S02436.6di +++|* BEGIN THE RELOAD PROCESS. IF NOT, *7GI* IS CALLED TO TRY AND
02730 M01S02437.6di +++|* DOWN THE CHANNEL ON WHICH THE ERROR OCCURRED.
02731 M01S02438.6di +++| 7II SPACE 4,10
02732 M01S02439.6di +++|** ICR - INITIATE CONTROLWARE RELOAD.
02733 M01S02440.6di +++|*
02734 M01S02441.6di +++|* ENTRY (T1) = DEST.
02735 M01S02442.6di +++|* (T2) = DEEC.
02736 M01S02443.6di +++|* (T4) = CHANNEL NUMBER.
02737 M01S02444.6di +++|* (DEEC) = ERROR CODE.
02738 M01S02445.6di +++|* (DEST) = ERROR PROCESSING CONTROL WORD.
02739 M01S02446.6di +++|* (MB+3 - MB+5) = LAST THREE WORDS OF DETAILED STATUS.
02740 M01S02447.6di +++|*
02741 M01S02448.6di +++|* EXIT TO *7GI* IF NO CONTROLWARE RELOAD.
02742 M01S02449.6di +++|* (T3) = *7GI* PROCESSOR INDEX.
02743 M01S02450.6di +++|* (MB+2) = ORIGINAL CELLS (T3 - T7).
02744 M01S02451.6di +++|* (MB+3 - MB+5) = UNCHANGED.
02745 M01S02452.6di +++|*
02746 M01S02453.6di +++|* TO *7JI* IF CONTROLWARE RELOAD.
02747 M01S02454.6di +++|* (T3) = ADDRESS OF BYTE CONTAINING RELOAD FLAGS.
02748 M01S02455.6di +++|* (T4) = CONTROL MODULE ACCESS INDICATOR. FOR C/M
02749 M01S02456.6di +++|* RELOADS, 1 INDICATES PRIMARY CHANNEL SHOULD BE
02750 M01S02457.6di +++|* USED FOR RELOAD. 0 INDICATES SECONDARY CHANNEL
02751 M01S02458.6di +++|* SHOULD BE USED. THIS CELL IS UNUSED FOR
02752 M01S02459.6di +++|* NON-C/M RELOADS.
02753 M01S02460.6di +++|* (T5) = CONTROL MODULE EST ORDINAL IF C/M RELOAD.
02754 M01S02461.6di +++|* (T6-T7) = ADDRESS OF RELOAD INTERLOCK WORD.
02755 M01S02462.6di +++|* (MB+2) = ORIGINAL CELLS (T3 - T7).
02756 M01S02463.6di +++|* (MB+3 - MB+5) = UNCHANGED.
02757 M01S02464.6di +++|*
02758 M01S02465.6di +++|* USES CM - CM+4, T0 - T7.
02759 M01S02466.6di +++|*
02760 M01S02467.6di +++|* CALLS FCM, FCT.
02761 M01S02468.6di +++|*
02762 M01S02469.6di +++|* MACROS MSERR.
02763 M01S02470.6di +++|
02764 M01S02471.6di +++|
02765 M01S02472.6di +++| DII ENTRY *7II* ENTRY
02766 M01S02473.6di +++|
02767 M01S02474.6di +++|* IF THE ERROR IS EITHER A CHANNEL PARITY ERROR OR A CONTROLLER
02768 M01S02475.6di +++|* STOP, PROCEED TO *7GI* TO TRY AND DOWN THE CHANNEL.
02769 M01S02476.6di +++|
02770 M01S02477.6di +++| ICR LDD MA SAVE DRIVER PARAMETERS
02771 M01S02478.6di +++| ADN 2
02772 M01S02479.6di +++| CWD T3
02773 M01S02480.6di +++| LDI T2
02774 M01S02481.6di +++| SBN RAME
02775 M01S02482.6di +++| PJN ICR2 IF FUNCTION TIMEOUT / RAM PARITY
02776 M01S02483.6di +++| LDN DC6&DC11
02777 M01S02484.6di +++| ICR0 LMN DC11
02778 M01S02485.6di +++| ERRNZ DC1 CODE DEPENDS ON VALUE
02779 M01S02486.6di +++| ICR1 STD T3
02780 M01S02487.6di +++| MSERR 7GI EXECUTE *7GI*
02781 M01S02488.6di +++|
02782 M01S02489.6di +++|
02783 M01S02490.6di +++|* FOR RAM PARITY ERRORS AND FUNCTION TIMEOUTS, CHECK IF THE
02784 M01S02491.6di +++|* CONTROLWARE RELOAD LIMIT HAS ALREADY BEEN REACHED. IF NOT,
02785 M01S02492.6di +++|* CALL *7JI* TO BEGIN THE RELOAD.
02786 M01S02493.6di +++|
02787 M01S02494.6di +++| ICR2 LDI T1
02788 M01S02495.6di +++| SHN 0-1
02789 M01S02496.6di +++| LPN 3
02790 M01S02497.6di +++| LMN 3
02791 M01S02498.6di +++| ZJN ICR3 IF CONTROL MODULE RELOAD
02792 M01S02499.6di +++| ERRNZ ICR1-ICR0-1 CODE REQUIRES *ICR1* = *ICR0* + 1
02793 M01S02500.6di +++| AOM ICRB
02794 M01S02501.6di +++| LDC FCT STORE ADDRESS OF NON-C/M PROCESSOR
02795 M01S02502.6di +++| STM ICRA
02796 M01S02503.6di +++| ICR3 RJM FCM FIND CONTROL MODULE EST ENTRY
02797 M01S02504.6di +++|* RJM FCT (NOT CONTROL MODULE RELOAD)
02798 M01S02505.6di +++| ICRA EQU *-1
02799 M01S02506.6di +++| LDD CM+1
02800 M01S02507.6di +++| RAD T7 SET CONTROLWARE TABLE WORD ADDRESS
02801 M01S02508.6di +++| SHN -14
02802 M01S02509.6di +++| ADD CM
02803 M01S02510.6di +++| STD T6
02804 M01S02511.6di +++| SHN 14 READ RELOAD FLAGS WORD
02805 M01S02512.6di +++| LMD T7
02806 M01S02513.6di +++| CRD CM
02807 M01S02514.6di +++| LDI T3
02808 M01S02515.6di +++| SHN -6
02809 M01S02516.6di +++| LPN 7
02810 M01S02517.6di +++| LMN CRTH
02811 M01S02518.6di +++| ZJN ICR0 IF RELOAD THRESHOLD REACHED
02812 M01S02519.6di +++|* ZJN ICR1 (NOT CONTROL MODULE ERROR)
02813 M01S02520.6di +++| ICRB EQU *-1
02814 M01S02521.6di +++| MSERR 7JI EXECUTE *7JI*
02815 M01S02522.6di +++| FCM SPACE 4,15
02816 M01S02523.6di +++|** FCM - FIND CONTROL MODULE EST ENTRY.
02817 M01S02524.6di +++|*
02818 M01S02525.6di +++|* ENTRY (T4) = CHANNEL NUMBER.
02819 M01S02526.6di +++|* (HEDR+3) = ISD UNIT NUMBER.
02820 M01S02527.6di +++|*
02821 M01S02528.6di +++|* EXIT (T3) = *CM* + 2.
02822 M01S02529.6di +++|* (T4) = 1 IF PRIMARY CHANNEL SHOULD BE USED FOR RELOAD.
02823 M01S02530.6di +++|* 0 IF SECONDARY CHANNEL SHOULD BE USED.
02824 M01S02531.6di +++|* (T5) = CONTROL MODULE EST ORDINAL.
| Line S02532 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di29 |
Seq # *Modification Id* Act
----------------------------+
02825 M02S02532.6di29 ---|* (T7) = EST ENTRY OFFSET FROM FWA OF EST.
02826 M01S00001.6di29 +++|* (T7) = RELOAD INTERLOCK WORD OFFSET FROM FWA OF EST.
02827 M01S02533.6di +++|* (CM - CM+1) = FWA OF EST.
02828 M01S02534.6di +++|*
02829 M01S02535.6di +++|* USES T2 - CM+4.
02830 M01S02536.6di +++|*
02831 M01S02537.6di +++|* MACROS MONITOR, SFA.
02832 M01S02538.6di +++|
02833 M01S02539.6di +++|
02834 M01S02540.6di +++| FCM CON 0 ENTRY
02835 M01S02541.6di +++| LDD T4 STORE CHANNEL FOR COMPARISON
02836 M01S02542.6di +++| RAM FCMA
02837 M01S02543.6di +++| STM FCMB
02838 M01S02544.6di +++| LDK ESTP
02839 M01S02545.6di +++| CRD CM
02840 M01S02546.6di +++| FCM1 SOD CM+2 DECREMENT EST ORDINAL
| Line S02547 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di28 |
Seq # *Modification Id* Act
----------------------------+
02841 M02S02547.6di28 ---| SHN 1 SAVE EST ENTRY OFFSET
| Line S02548 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 6di28 |
Seq # *Modification Id* Act
----------------------------+
02842 M02S02548.6di28 ---| ERRNZ ESTE-2 CODE ASSUMES *ESTE* = 2
02843 M01S00001.6di28 +++| CFI EST SAVE EST ENTRY OFFSET
02844 M01S02549.6di +++| STD T7
02845 M01S02550.6di +++| NJN FCM3 IF NOT END OF SCAN
02846 M01S02551.6di +++| FCM2 MONITOR HNGM
02847 M01S02552.6di +++| UJN FCM2 HANG PP
02848 M01S02553.6di +++|
02849 M01S02554.6di +++| FCM3 SFA EST,CM+2 READ NEXT ENTRY
02850 M01S02555.6di +++| ADK EQDE
02851 M01S02556.6di +++| CRD T2
02852 M01S02557.6di +++| LDD T2+3
| Line S02558 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02853 M02S02558.252l678 ---| LPC 3777
02854 M01S02559.6di +++| LMC 2RCM
02855 M01S02560.6di +++| NJN FCM1 IF NOT CONTROL MODULE EST ENTRY
02856 M01S02561.6di +++| LDD T2+4
02857 M01S02562.6di +++| SHN 0-6
02858 M01S02563.6di +++| LMM HEDR+3
02859 M01S02564.6di +++| SCN 7
02860 M01S02565.6di +++| NJN FCM1 IF WRONG EQUIPMENT
| Line S02566 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02861 M02S02566.252l678 ---| LDD T2+1 SET CHANNEL INDICATOR FOR *7HI*
| Line S02567 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02862 M02S02567.252l678 ---| SHN -6
| Line S02568 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02863 M02S02568.252l678 ---| LPN 37
02864 M01S00034.252l678 +++| LDD T2+2 SET CHANNEL INDICATOR FOR *7HI*
02865 M01S02569.6di +++| ZJN FCM4 IF NO SECONDARY CHANNEL
02866 M01S00035.252l678 +++| LPN 37
02867 M01S02570.6di +++| LMN **
02868 M01S02571.6di +++| FCMA EQU *-1
02869 M01S02572.6di +++| ZJN FCM5 IF SECONDARY CHANNEL IN USE
02870 M01S02573.6di +++| FCM4 LDD T2+1
02871 M01S02574.6di +++| LPN 37
02872 M01S02575.6di +++| LMN **
02873 M01S02576.6di +++| FCMB EQU *-1
02874 M01S02577.6di +++| NJN FCM2 IF CHANNEL NOT IN EST ENTRY
02875 M01S02578.6di +++| LDN 1
02876 M01S02579.6di +++| FCM5 STD T4
02877 M01S02580.6di +++| LDD CM+2 SAVE EST ORDINAL FOR *7HI*
02878 M01S02581.6di +++| STD T5
02879 M01S02582.6di +++| LDN CM+2 SET BYTE NUMBER
02880 M01S02583.6di +++| STD T3
02881 M01S00002.6di29 +++| AOD T7 ADVANCE TO *EQAE* WORD OF EST ENTRY
02882 M01S00003.6di29 +++| ERRNZ EQAE-1 CODE ASSUMES *EQAE* = 1
02883 M01S02584.6di +++| FCM6 LJM ICRA+1 RETURN
02884 M01S02585.6di +++| FCT SPACE 4,10
02885 M01S02586.6di +++|** FCT - FIND CONTROLWARE TABLE ENTRY.
02886 M01S02587.6di +++|*
02887 M01S02588.6di +++|* ENTRY (T4) = CHANNEL NUMBER.
02888 M01S02589.6di +++|*
02889 M01S02590.6di +++|* EXIT (T3) = CHANNEL NUMBER MODULO 5 + *CM*.
02890 M01S02591.6di +++|* (T7) = WORD OFFSET RELATIVE TO FWA OF CONTROLWARE
02891 M01S02592.6di +++|* TABLE.
02892 M01S02593.6di +++|* (CM - CM+1) = FWA OF CONTROLWARE TABLE.
02893 M01S02594.6di +++|*
02894 M01S02595.6di +++|* USES T3, T4, T6 - CM+2.
02895 M01S02596.6di +++|
02896 M01S02597.6di +++|
02897 M01S02598.6di +++| FCT CON 0 ENTRY
02898 M01S02599.6di +++| LDD T4 STORE CHANNEL NUMBER
02899 M01S02600.6di +++| RAM FCTA
02900 M01S02601.6di +++| FNC FCAL,CH ISSUE SHORT AUTOLOAD
02901 M01S02602.6di +++| FCTA EQU *-2
02902 M01S02603.6di +++| LDC CHTP READ CHANNEL TABLE POINTER
02903 M01S02604.6di +++| CRD CM-2
02904 M01S02605.6di +++| LDN 2*CTALL-1 INITIALIZE WORD OFFSET
02905 M01S02606.6di +++| STD T7
02906 M01S02607.6di +++| FCT1 AOD T7 INCREMENT WORD OFFSET
02907 M01S02608.6di +++| LCN 5
02908 M01S02609.6di +++| RAD T4
02909 M01S02610.6di +++| PJN FCT1 IF CORRECT WORD NOT REACHED
02910 M01S02611.6di +++| ADN CM+5 SAVE BYTE NUMBER + *CM*
02911 M01S02612.6di +++| STD T3
02912 M01S02613.6di +++| UJN FCM6 RETURN
02913 M01S02614.6di +++| SPACE 4,10
02914 M01S02615.6di +++| ERRNG 10000-* OVERFLOW
02915 M01S02616.6di +++| BSS 10000-* SPARES
02916 M01S02617.6di +++| CON DII-1 (T0) = ENTRY ADDRESS - 1
02917 M01S02618.6di +++| CON DEST (T1) = DEST
02918 M01S02619.6di +++| CON DEEC (T2) = DEEC
02919 M01S02620.6di +++| ERRNZ LN-* INCORRECT *7II* OVERLAY LENGTH
02920 M01S02621.6di +++| QUAL *
| Line S02622 Modification History |
M01 (Added by) | 6di |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
02921 M02S02622.252l678 ---| 7JI MSOVL 7702,T2,HEDR+16,(ISSUE RELOAD MESSAGE.)
02922 M01S00036.252l678 +++| 7JI MSOVL 7702,T2,DSFA+4,(ISSUE RELOAD MESSAGE.)
02923 M01S02623.6di +++| SPACE 4,10
02924 M01S02624.6di +++|*** ISSUE RELOAD MESSAGE.
02925 M01S02625.6di +++|* R. M. DANISCH. 83/10/11.
02926 M01S02626.6di +++| 7JI SPACE 4,10
02927 M01S02627.6di +++|*** *7JI* IS CALLED BY *7II* TO ISSUE A MESSAGE TO THE
02928 M01S02628.6di +++|* SYSTEM CONTROL POINT TO SHOW THE OPERATOR WHAT CHANNEL OR
02929 M01S02629.6di +++|* CONTROL MODULE IS HAVING ITS CONTROLWARE RELOADED. *7JI*
02930 M01S02630.6di +++|* THEN CALLS *7HI* TO BEGIN THE ACTUAL RELOAD.
02931 M01S02631.6di +++| IRM SPACE 4,30
02932 M01S02632.6di +++|** IRM - ISSUE RELOAD MESSAGE.
02933 M01S02633.6di +++|*
02934 M01S02634.6di +++|* ENTRY (T1) = DEST.
02935 M01S02635.6di +++|* (T2) = HEDR+7.
02936 M01S02636.6di +++|* (T3) = ADDRESS + *CM* OF BYTE CONTAINING RELOAD FLAGS.
02937 M01S02637.6di +++|* (T4) = CONTROL MODULE ACCESS INDICATOR. FOR CONTROL
02938 M01S02638.6di +++|* MODULE RELOADS, 1 INDICATES THE PRIMARY CHANNEL
02939 M01S02639.6di +++|* SHOULD BE USED FOR RELOAD. 0 INDICATES
02940 M01S02640.6di +++|* SECONDARY CHANNEL SHOULD BE USED. THIS CELL IS
02941 M01S02641.6di +++|* UNUSED FOR NON-CONTROL MODULE RELOADS.
02942 M01S02642.6di +++|* (T5) = CONTROL MODULE EST ORDINAL IF C/M RELOAD.
02943 M01S02643.6di +++|* (T6 - T7) = ADDRESS OF RELOAD INTERLOCK WORD.
02944 M01S02644.6di +++|* (DEST) = ERROR PROCESSING CONTROL WORD.
02945 M01S02645.6di +++|* (MB+2) = ORIGINAL (T3 - T7).
02946 M01S02646.6di +++|* (MB+3 - MB+5) = LAST THREE WORDS OF DETAILED STATUS.
02947 M01S02647.6di +++|*
02948 M01S02648.6di +++|* EXIT TO *7HI*.
02949 M01S02649.6di +++|* (T3) = UNCHANGED.
02950 M01S02650.6di +++|* (T4) = UNCHANGED.
02951 M01S02651.6di +++|* (T5) = SYSTEM CP *MS2W* ADDRESS.
02952 M01S02652.6di +++|* (T6 - T7) = UNCHANGED.
02953 M01S02653.6di +++|* (MB+2) = UNCHANGED.
02954 M01S02654.6di +++|* (MB+3 - MB+5) = UNCHANGED.
02955 M01S02655.6di +++|*
02956 M01S02656.6di +++|* USES T5, CM - CM+4.
02957 M01S02657.6di +++|*