Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:ppr.001
Deck PPR Part 001
17 Modifications
Listing Sections
- Deck PPR Start
- Deck PPR Part 1 (Line 1852)
- Deck PPR Part 2 (Line 3533)
- Deck PPR Part 3 (Line 5080)
Source
Seq # *Modification Id* Act ----------------------------+ 01852 M00S01733.ppr +++|*** *3RU* IS CALLED BY *1RU* TO SET THE SOFTWARE RESERVE 01853 M00S01734.ppr +++|* ON THE DEVICE. 01854 M00S01735.ppr +++| SPACE 4,10 01855 M00S01736.ppr +++|*** ENTRY CONDITIONS. 01856 M00S01737.ppr +++|* 01857 M00S01738.ppr +++|* 01858 M00S01739.ppr +++|* (TL) = LENGTH OF TRT IN CM WORDS. 01859 M00S01740.ppr +++|* (T5) = MS EST ORDINAL. 01860 M00S01741.ppr +++|* (MS) = MST ADDRESS/10B. 01861 M00S01742.ppr +++|* (EF) = ERROR FLAG. 01862 M00S01743.ppr +++| SPACE 4,10 01863 M00S01744.ppr +++|*** EXIT CONDITIONS. 01864 M00S01745.ppr +++|* 01865 M00S01746.ppr +++|* 01866 M00S01747.ppr +++|* TO URPX IF NO WRITE ERROR. 01867 M00S01748.ppr +++|* TO ERR IF LABEL WRITE ERROR. 01868 M00S01749.ppr +++| SPACE 4,10 01869 M00S01750.ppr +++|*** NOTE - THIS OVERLAY MUST RESIDE IN *RPL*. 01870 M00S01751.ppr +++| EJECT 01871 M00S01752.ppr +++|*** RID - RESERVE ISHARED DEVICE. 01872 M00S01753.ppr +++| 01873 M00S01754.ppr +++| 01874 M00S01755.ppr +++| RID SUBR 01875 M00S01756.ppr +++| LDD EA 01876 M00S01757.ppr +++| NJN RID3 IF NOT A REPAIR CALL 01877 M00S01758.ppr +++| LDD EF 01878 M00S01759.ppr +++| NJN RID1 IF ERRORS OCCURRED 01879 M00S01760.ppr +++| 01880 M00S01761.ppr +++|* CHECK FOR SIMULTANEOUS UPDATE BY ANOTHER MAINFRAME. 01881 M00S01762.ppr +++| 01882 M00S01763.ppr +++| LDD CN+2 01883 M00S01764.ppr +++| SBM N4SS+5*SDGL+2 01884 M00S01765.ppr +++| MJN RID2 IF SIMULTANEOUS UPDATE 01885 M00S01766.ppr +++| NJN RID1 IF DISK COPY IS OLDER THAN CM COPY 01886 M00S01767.ppr +++| LDD CN+3 01887 M00S01768.ppr +++| SBM N4SS+5*SDGL+3 01888 M00S01769.ppr +++| MJN RID2 IF SIMULTANEOUS UPDATE 01889 M00S01770.ppr +++| NJN RID1 IF DISK COPY IS OLDER THAN CM COPY 01890 M00S01771.ppr +++| LDD CN+4 01891 M00S01772.ppr +++| SCN 77 IGNORE INTERLOCK BITS 01892 M00S01773.ppr +++| LMN 77 01893 M00S01774.ppr +++| SBM N4SS+5*SDGL+4
| Line S01775 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01894 M01S01775.ns2579 ---| SHN -6 01895 M00S01776.ppr +++| RID1 PJP RID6 IF NOT SIMULTANEOUS UPDATE 01896 M00S01777.ppr +++| RID2 ERROR ESUP *SIMULTANEOUS UPDATE* 01897 M00S01778.ppr +++| 01898 M00S01779.ppr +++| RID3 LDD EF 01899 M00S01780.ppr +++| NJP RIS IF ERROR PROCESSING 01900 M00S01781.ppr +++| 01901 M00S01782.ppr +++|* VERIFY THAT THE MAINFRAME IS IN THE DIT. 01902 M00S01783.ppr +++| 01903 M00S01784.ppr +++| LDD TA GET TRT ADDRESS 01904 M00S01785.ppr +++| SHN 14 01905 M00S01786.ppr +++| LMD TA+1 01906 M00S01787.ppr +++| ADD DO 01907 M00S01788.ppr +++| ADD MI 01908 M00S01789.ppr +++| SBN 1 01909 M00S01790.ppr +++| CRD CM GET THIS MAINFRAME-S ID 01910 M00S01791.ppr +++| LDD CM+4 01911 M00S01792.ppr +++| LMD ID 01912 M00S01793.ppr +++| ZJN RID4 IF ID MATCHES 01913 M00S01794.ppr +++| ERROR EMND *MACHINE NOT IN DIT ERROR* 01914 M00S01795.ppr +++| 01915 M00S01796.ppr +++|* RESERVE THE DEVICE. 01916 M00S01797.ppr +++| 01917 M00S01798.ppr +++| RID4 STD T7 RESET SECTOR NUMBER 01918 M00S01799.ppr +++| RJM RLS RECREATE LABEL SECTOR 01919 M00S01800.ppr +++| LDD MI SET SOFTWARE RESERVE 01920 M00S01801.ppr +++| SHN 1 01921 M00S01802.ppr +++| LMM N4SS+SDGL*5+4 01922 M00S01803.ppr +++| LPN 76 01923 M00S01804.ppr +++| ZJN RID5 IF THIS MAINFRAME ALREADY HAS INTERLOCK 01924 M00S01805.ppr +++| RAM N4SS+SDGL*5+4 01925 M00S01806.ppr +++| RJM CLC UPDATE CHECKSUM 01926 M00S01807.ppr +++| STM CKSS 01927 M00S01808.ppr +++| LDC BFMS+WLSF WRITE LABEL SECTOR WITH SOFTWARE RESERVE 01928 M00S01809.ppr +++| RJM WDS 01929 M00S01810.ppr +++| PJN RID5 IF NO WRITE ERROR
| Line S01811 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01930 M01S01811.ns2579 ---| ERROR EWEL *LABEL WRITE ERROR*
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01931 M01S00050.ns2579 +++| ERROR ESIN *LABEL WRITE ERROR* SETTING INTERLOCK 01932 M00S01812.ppr +++| 01933 M00S01813.ppr +++| RID5 LDK RTCL GET CURRENT TIME 01934 M00S01814.ppr +++| CRD TM
| Line S01815 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01935 M01S01815.ns2579 ---| LDC 2000 SET TABLES CURRENT FLAG 01936 M01S01816.ns2579 ---| RAM N4SS+SDGL*5
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01937 M01S00051.ns2579 +++| LDM N4SS+SDGL*5 SET TABLES CURRENT FLAG 01938 M01S00052.ns2579 +++| LPC -2000 01939 M01S00053.ns2579 +++| LMC 2000 01940 M01S00054.ns2579 +++| STM N4SS+SDGL*5 01941 M00S01817.ppr +++| LDD MS 01942 M00S01818.ppr +++| SHN 3 01943 M00S01819.ppr +++| ADN SDGL 01944 M00S01820.ppr +++| CWM N4SS+SDGL*5,ON 01945 M00S01821.ppr +++| RJM SRB SET REISSUE BIT 01946 M00S01822.ppr +++| RID6 EXECUTE 3RV WRITE TABLES BACK AND RETURN TO CALLER 01947 M00S01823.ppr +++| RIS SPACE 4,10 01948 M00S01824.ppr +++|*** RIS - RETURN INACCESSIBLE STATUS. 01949 M00S01825.ppr +++|* 01950 M00S01826.ppr +++|* *RIS* CAUSES THE PP-S REQUESTING RETURN-ON-INACCESSIBLE 01951 M00S01827.ppr +++|* DEVICE TO REISSUE THEIR MONITOR FUNCTIONS. *CPUMTR* WILL 01952 M00S01828.ppr +++|* DETECT THE INACCESSIBLE DEVICE STATUS, CLEAR THE PP-S BIT IN
| Line S01829 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01953 M01S01829.ns2579 ---|* *MCLL*, AND CLEAR BYTE 0 OF ITS OUPUT REGISTER.
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01954 M01S00055.ns2579 +++|* *MCLL*, AND CLEAR BYTE 0 OF ITS OUTPUT REGISTER. 01955 M01S00056.ns2579 +++|* 01956 M01S00057.ns2579 +++|* ENTRY (A) = (EF) = ERROR FLAG. 01957 M00S01830.ppr +++| 01958 M00S01831.ppr +++|
| Line S01832 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01959 M01S01832.ns2579 ---| RIS LDK PSNI PRESET *SRB* 01960 M01S01833.ns2579 ---| STM SRBA 01961 M01S01834.ns2579 ---| STM SRBE
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01962 M01S00058.ns2579 +++| 01963 M01S00059.ns2579 +++| RIS SBN EPRO 01964 M01S00060.ns2579 +++| ZJN RIS2 IF PROCESSING ERROR 01965 M01S00061.ns2579 +++| ERRNZ EWRC-EPRO CODE ASSUMES VALUE 01966 M01S00062.ns2579 +++| PJN RIS1 IF WRITE-TIME ERROR 01967 M01S00063.ns2579 +++| LDD RI CHECK RETURN-ON-INACCESSIBLE IN CALL 01968 M01S00064.ns2579 +++| SHN 21-11 01969 M01S00065.ns2579 +++| PJN RIS2 IF RETURN-ON-INACCESSIBLE NOT SET 01970 M01S00066.ns2579 +++| 01971 M01S00067.ns2579 +++|* RETURN TO CALLER. 01972 M01S00068.ns2579 +++| 01973 M01S00069.ns2579 +++| LDN 0 CLEAR OUTPUT REGISTER 01974 M01S00070.ns2579 +++| STD OR 01975 M01S00071.ns2579 +++| RIS1 LDN C1AS CLEAR *1RU* ACTIVITY IN *MCLL* 01976 M01S00072.ns2579 +++| STD CM+3 01977 M01S00073.ns2579 +++| LDD T5 01978 M01S00074.ns2579 +++| STD CM+1 01979 M01S00075.ns2579 +++| MONITOR SMDM 01980 M01S00076.ns2579 +++|* LDN PSNI 01981 M01S00077.ns2579 +++| STM SRBA MAKE ONLY ONE PASS IN *SRB* 01982 M01S00078.ns2579 +++| RJM SRB SET REISSUE BIT FOR ALL PP-S 01983 M01S00079.ns2579 +++| UJP RID6 RETURN TO CALLER 01984 M01S00080.ns2579 +++| 01985 M01S00081.ns2579 +++|* REPLY TO WAITING PP-S, DELAY, THEN RETRY THE REQUEST. 01986 M01S00082.ns2579 +++| 01987 M01S00083.ns2579 +++| RIS2 LDK PSNI 01988 M01S00084.ns2579 +++| STM SRBA MAKE ONLY ONE PASS IN *SRB* 01989 M01S00085.ns2579 +++| STM SRBE REQUIRE RET-ON-INACCESSIBLE TO SET REISSUE 01990 M01S00086.ns2579 +++| STD T8 INITIALIZE TIMEOUT COUNTER 01991 M01S00087.ns2579 +++| ERRNZ PSNI-77 CODE ASSUMES VALUE 01992 M00S01835.ppr +++| RJM SRB SET REISSUE BIT FOR PP-S REQUESTING RETURN
| Line S01836 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 01993 M01S01836.ns2553 ---| LDD SA
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
M02 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01994 M02S00041.ns2579 ---| LDK INWL CHECK FOR DEADSTART IN PROGRESS
| Line S00088 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01995 M01S00088.ns2579 +++| RIS2.1 LDD MS CHECK SUSPECT FLAG 01996 M01S00089.ns2579 +++| SHN 3 01997 M01S00090.ns2579 +++| ADN DALL
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 01998 M01S00042.ns2553 +++| CRD CM
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
M02 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 01999 M02S00043.ns2579 ---| LDD CM+3 02000 M02S00044.ns2579 ---| LPN 12 02001 M02S00045.ns2579 ---| ZJN RIS0 IF DEADSTART COMPLETE, SCHEDULING ENABLED 02002 M02S00046.ns2579 ---| STM RISB FORCE RETRY 02003 M02S00047.ns2579 ---| UJN RIS1 DELAY 02004 M02S00048.ns2579 ---| 02005 M02S00049.ns2579 ---| RIS0 LDD SA
| Line S01837 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02006 M01S01837.ns2579 ---| SHN 14 02007 M01S01838.ns2579 ---| LMD SA+1 02008 M01S01839.ns2579 ---| ZJN RID6 IF STANDALONE 02009 M01S01840.ns2579 ---| SBN 7 CHECK RETURN-ON-INACCESSIBLE IN CALL 02010 M01S01841.ns2579 ---| CRD CM 02011 M01S01842.ns2579 ---| LDD CM+1 CHECK THIS PP 02012 M01S01843.ns2579 ---| SHN 21-11 02013 M01S01844.ns2579 ---| MJN RID6 IF RETURN-ON-INACCESSIBLE SET 02014 M01S01845.ns2579 ---| RIS1 DELAY 4
| Line S00091 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02015 M01S00091.ns2579 +++| LDD CM 02016 M01S00092.ns2579 +++| SHN 21-7 02017 M01S00093.ns2579 +++| PJN RIS3 IF SUSPECT HAS CLEARED 02018 M01S00094.ns2579 +++| DELAY 8D*16D 16 MILLISECONDS 02019 M00S01846.ppr +++| PAUSE 02020 M00S01847.ppr +++| LDD CM+1 02021 M00S01848.ppr +++| LMN ORET
| Line S01849 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02022 M01S01849.ns2579 ---| NJN RIS2 IF NOT OPERATOR *OVERRIDE* 02023 M01S01850.ns2579 ---| MONITOR DPPM 02024 M01S01851.ns2579 ---| LJM PPR EXIT 02025 M01S01852.ns2579 ---| 02026 M01S01853.ns2579 ---| RIS2 LDD MS 02027 M01S01854.ns2579 ---| SHN 3 02028 M01S01855.ns2579 ---| ADN DALL 02029 M01S01856.ns2579 ---| CRD CM 02030 M01S01857.ns2579 ---| LDD CM 02031 M01S01858.ns2579 ---| SHN 21-7
| Line S01859 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
M02 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02032 M02S01859.ns2579 ---| MJN RIS1 IF STILL INACCESSIBLE
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
M02 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02033 M02S00050.ns2579 ---| RISB MJN RIS1 IF STILL INACCESSIBLE 02034 M02S00051.ns2579 ---|* PSN (DEADSTART IN PROGRESS)
| Line S00095 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02035 M01S00095.ns2579 +++| ZJN RIS5 IF OPERATOR *OVERRIDE* 02036 M01S00096.ns2579 +++| SOD T8 DECREMENT TIMEOUT COUNTER 02037 M01S00097.ns2579 +++| PJN RIS2.1 IF NOT TIMED OUT 02038 M00S01860.ppr +++| 02039 M00S01861.ppr +++|* RESTART REQUEST. 02040 M00S01862.ppr +++|
| Line S01863 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02041 M01S01863.ns2579 ---| LDD EF 02042 M01S01864.ns2579 ---| SBN 77 02043 M01S01865.ns2579 ---| MJN RIS3 IF NO MESSAGE TO CLEAR 02044 M01S01866.ns2579 ---| LDN 0 02045 M01S01867.ns2579 ---| STD CM 02046 M01S01868.ns2579 ---| LDD EF 02047 M01S01869.ns2579 ---| CWD CM CLEAR ERROR MESSAGE 02048 M01S01870.ns2579 ---| RIS3 LDN 1 SET LATENCY ACTIVITY BIT IN *MCLL* 02049 M01S01871.ns2579 ---| STD CM+1
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02050 M01S00098.ns2579 +++| RIS3 LDD EM 02051 M01S00099.ns2579 +++| ZJN RIS4 IF NO MESSAGE TO CLEAR 02052 M01S00100.ns2579 +++| CWM RISA,ON CLEAR ERROR MESSAGE 02053 M01S00101.ns2579 +++| RIS4 LDD EF 02054 M01S00102.ns2579 +++| SBN EWRC 02055 M01S00103.ns2579 +++| PJP RID6 IF WRITE ERROR 02056 M01S00104.ns2579 +++| 02057 M01S00105.ns2579 +++|* RETRY REQUEST FROM THE READ. 02058 M01S00106.ns2579 +++| 02059 M01S00107.ns2579 +++| LDN 1
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02060 M01S00052.ns2553 +++| STD IR+3 SET RETRY FUNCTION CODE FOR *1RU*
| Line S01872 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02061 M01S01872.ns2579 ---| LDD MS 02062 M01S01873.ns2579 ---| SHN 3 02063 M01S01874.ns2579 ---| STD CM+4 02064 M01S01875.ns2579 ---| SHN -14 02065 M01S01876.ns2579 ---| STD CM+3 02066 M01S01877.ns2579 ---| LDD MA 02067 M01S01878.ns2579 ---| CWM RISA,CM+1
| Line S00108 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02068 M01S00108.ns2579 +++| ADD MA 02069 M00S01879.ppr +++| CWD SA-1 REWRITE SAVE AREA ADDRESS IN MB+1
| Line S01880 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02070 M01S01880.ns2579 ---| MONITOR UTEM
| Line S01881 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02071 M01S01881.ns2553 ---| LDN 1 RETRY REQUEST 02072 M01S01882.ns2553 ---| STD IR+4 02073 M00S01883.ppr +++| EXECUTE 1RU 02074 M00S01884.ppr +++|
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02075 M01S00109.ns2579 +++| RIS5 MONITOR DPPM 02076 M01S00110.ns2579 +++| LJM PPR EXIT 02077 M00S01885.ppr +++|
| Line S01886 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02078 M01S01886.ns2579 ---| RISA VFD 1/0,5/MCLL,6/1,6/0,42/1
| Line S00111 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02079 M01S00111.ns2579 +++| 02080 M01S00112.ns2579 +++| RISA CON 0 02081 M00S01887.ppr +++| SRB SPACE 4,10 02082 M00S01888.ppr +++|*** SRB - SET REISSUE BIT FOR PP-S WITH REQUESTS PENDING. 02083 M00S01889.ppr +++|* 02084 M00S01890.ppr +++|* CHECK OUTSTANDING FUNCTIONS MASK AND CAUSE WAITING PPS TO 02085 M00S01891.ppr +++|* REISSUE THEIR FUNCTION. 02086 M00S01892.ppr +++|*
| Line S01893 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02087 M01S01893.ns2579 ---|* ENTRY (SRBA) IS CHANGED TO A *PSN* INSTRUCTION IF THE 02088 M01S01894.ns2579 ---|* RETURN-ON-INACCESSIBLE BIT MUST ALSO BE SET.
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02089 M01S00113.ns2579 +++|* ENTRY (SRBA) = *PSN*, ONLY ONE PASS IS TO BE MADE. 02090 M01S00114.ns2579 +++|* (SRBE) = *PSN*, IF THE RETURN-ON-INACCESSIBLE BIT 02091 M01S00115.ns2579 +++|* MUST ALSO BE SET BEFORE THE REISSUE BIT WILL 02092 M01S00116.ns2579 +++|* BE SET. 02093 M00S01895.ppr +++|* 02094 M00S01896.ppr +++|* USES T1, T3, CM - CM+4, CN - CN+4. 02095 M00S01897.ppr +++| 02096 M00S01898.ppr +++| 02097 M00S01899.ppr +++| SRB6 UJN SRB1 RECHECK 02098 M00S01900.ppr +++|* PSN (PROCESS RETURN-ON-INACCESSIBLE FLAG) 02099 M00S01901.ppr +++| SRBA EQU *-1 02100 M00S01902.ppr +++| 02101 M00S01903.ppr +++| 02102 M00S01904.ppr +++| SRB SUBR ENTRY/EXIT 02103 M00S01905.ppr +++| LDK PPCP GET PP COMMUNICATION AREA ADDRESS 02104 M00S01906.ppr +++| CRD CM 02105 M00S01907.ppr +++| AOD CM+4 02106 M00S01908.ppr +++| STD T3 02107 M00S01909.ppr +++| SRB1 LDN 2 SET PP COUNTER 02108 M00S01910.ppr +++| STD T1 02109 M00S01911.ppr +++| LDD MS GET OUTSTANDING FUNCTION MASK BITS 02110 M00S01912.ppr +++| SHN 3 02111 M00S01913.ppr +++| ADN MCLL 02112 M00S01914.ppr +++| CRD CN 02113 M00S01915.ppr +++| LDD CN+1 IGNORE PPS 0 AND 1 02114 M00S01916.ppr +++| LPN 77 02115 M00S01917.ppr +++| ADD CN+2 02116 M00S01918.ppr +++| ZJN SRBX IF NO BITS ARE SET 02117 M00S01919.ppr +++| SRB2 LDD CN+1 02118 M00S01920.ppr +++| LPN 77 02119 M00S01921.ppr +++| SHN 14 02120 M00S01922.ppr +++| ADD CN+2 02121 M00S01923.ppr +++| SHN 21-0 02122 M00S01924.ppr +++| STD CN+2 02123 M00S01925.ppr +++| SHN -14 02124 M00S01926.ppr +++| STD CN+1 02125 M00S01927.ppr +++| SHN 14 02126 M00S01928.ppr +++| PJN SRB3 IF BIT NOT SET FOR PP 02127 M00S01929.ppr +++| LDD T1 SET UP BIT FOR PP MASK 02128 M00S01930.ppr +++| SBN 2 02129 M00S01931.ppr +++| LMD TH+SHNI* 02130 M00S01932.ppr +++| STM SRBB 02131 M00S01933.ppr +++| STM SRBD 02132 M00S01934.ppr +++| LDN 1 02133 M00S01935.ppr +++| SRBB SHN ** 02134 M00S01936.ppr +++| SRBC LPC 0 02135 M00S01937.ppr +++| NJN SRB5 IF PP ALREADY PROCESSED 02136 M00S01938.ppr +++| LDN 1 SET PP PROCESSED BIT 02137 M00S01939.ppr +++| SRBD SHN ** 02138 M00S01940.ppr +++| RAM SRBC+1 02139 M00S01941.ppr +++| SHN -14 02140 M00S01942.ppr +++| RAM SRBC 02141 M00S01943.ppr +++| LDD T1 GET PP REQUEST 02142 M00S01944.ppr +++| SHN 3 02143 M00S01945.ppr +++| ADD T3 02144 M00S01946.ppr +++| STD T0 02145 M00S01947.ppr +++| CRD CM 02146 M00S01948.ppr +++| SRBE UJN SRB4 TELL PP TO REISSUE FUNCTION 02147 M00S01949.ppr +++|* PSN (PROCESS RETURN-ON-INACCESSIBLE FLAG) 02148 M00S01950.ppr +++| 02149 M00S01951.ppr +++| LDD CM+1 02150 M00S01952.ppr +++| SHN 21-11 02151 M00S01953.ppr +++| SRB3 PJN SRB5 IF RETURN-ON-INACCESSIBLE FLAG IS NOT SET
| Line S01954 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02152 M01S01954.ns2579 ---| SRB4 LDC 5000 TELL PP TO REISSUE ITS FUNCTION 02153 M01S01955.ns2579 ---| RAD CM
| Line S00117 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02154 M01S00117.ns2579 +++| SRB4 LDD CM TELL PP TO REISSUE ITS FUNCTION 02155 M01S00118.ns2579 +++| LPC -5000 02156 M01S00119.ns2579 +++| LMC 5000 02157 M01S00120.ns2579 +++| STD CM 02158 M00S01956.ppr +++| LDD T0 02159 M00S01957.ppr +++| CWD CM 02160 M00S01958.ppr +++| SRB5 AOD T1 ADVANCE TO NEXT PP 02161 M00S01959.ppr +++| SBN 20D+1 02162 M00S01960.ppr +++| MJP SRB2 IF MORE PPS TO CHECK 02163 M00S01961.ppr +++| LJM SRB6 RECHECK IF NECESSARY
| Line S00121 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02164 M01S00121.ns2579 +++| 02165 M00S01962.ppr +++| 02166 M00S01963.ppr +++| OVERFLOW RIDX,MSFW+/1BP/PPSA2*5,CMR 02167 M00S01964.ppr +++| OVERLAY (WRITE MST/TRT/MRT PROCESSOR.),URSW 02168 M00S01965.ppr +++| SPACE 4,10 02169 M00S01966.ppr +++|*** 3RV - WRITE MST/TRT/MRT PROCESSOR. 02170 M00S01967.ppr +++|* G. A. SCHUMACHER. 79/08/03. 02171 M00S01968.ppr +++|* J. J. EIKUM. 81/05/18. 02172 M00S01969.ppr +++| SPACE 4,10 02173 M00S01970.ppr +++|*** *3RV* IS CALLED BY *3RU* WHEN THE MST/TRT 02174 M00S01971.ppr +++|* MUST BE WRITTEN BACK TO THE DEVICE. 02175 M00S01972.ppr +++| SPACE 4,10 02176 M00S01973.ppr +++|*** ENTRY CONDITIONS. 02177 M00S01974.ppr +++|* 02178 M00S01975.ppr +++|* 02179 M00S01976.ppr +++|* (TL) = LENGTH OF TRT IN CM WORDS. 02180 M00S01977.ppr +++|* (T5) = MS EST ORDINAL. 02181 M00S01978.ppr +++|* (MS) = MST ADDRESS/10B. 02182 M00S01979.ppr +++|* (EF) = ZERO. 02183 M00S01980.ppr +++| SPACE 4,10 02184 M00S01981.ppr +++|*** EXIT CONDITIONS. 02185 M00S01982.ppr +++|* 02186 M00S01983.ppr +++|* 02187 M00S01984.ppr +++|* TO URPX IF NO WRITE ERROR. 02188 M00S01985.ppr +++|* TO ERR IF LABEL WRITE ERROR. 02189 M00S01986.ppr +++| SPACE 4,10 02190 M00S01987.ppr +++|*** NOTE - THIS OVERLAY MUST RESIDE IN *RPL*. 02191 M00S01988.ppr +++| EJECT 02192 M00S01989.ppr +++|*** WID - WRITE ISHARED DEVICE. 02193 M00S01990.ppr +++|* 02194 M00S01991.ppr +++|* ENTRY (CN - CN+4) = (*SDGL*), FOR REPAIR CALL ONLY. 02195 M00S01992.ppr +++| 02196 M00S01993.ppr +++| 02197 M00S01994.ppr +++| WID SUBR
| Line S01995 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02198 M01S01995.ns2579 ---| LDD EA
| Line S00122 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02199 M01S00122.ns2579 +++| LDD EF 02200 M01S00123.ns2579 +++| ZJN WID3 IF NO ERRORS ENCOUNTERED 02201 M01S00124.ns2579 +++| SBN EPRO 02202 M01S00125.ns2579 +++| NJP WID15 IF A READ OR WRITE ERROR 02203 M01S00126.ns2579 +++| STD EF 02204 M01S00127.ns2579 +++| LJM WID7 RETRY WRITE 02205 M01S00128.ns2579 +++| 02206 M01S00129.ns2579 +++| WID3 LDD EA 02207 M00S01996.ppr +++| ZJP WID8 IF REPAIR CALL
| Line S01997 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02208 M01S01997.ns2579 ---| LDD EF 02209 M01S01998.ns2579 ---| NJP WID15 IF ERROR ENCOUNTERED 02210 M01S01999.ns2579 ---| WID4 DELAY
| Line S00130 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02211 M01S00130.ns2579 +++| WID4 DELAY WAIT WHILE DISK REVOLVES 02212 M00S02000.ppr +++| LDK RTCL 02213 M00S02001.ppr +++| CRD CM 02214 M00S02002.ppr +++| LDD CM+4 02215 M00S02003.ppr +++| SBD TM+4 02216 M00S02004.ppr +++| PJN WID5 IF TIME HASN-T WRAPPED 02217 M00S02005.ppr +++| ADC 10000 02218 M00S02006.ppr +++| WID5 SBN 14 02219 M00S02007.ppr +++| MJN WID4 IF NOT NEAR END OF REVOLUTION 02220 M00S02008.ppr +++| LDD SA 02221 M00S02009.ppr +++| SHN 14 02222 M00S02010.ppr +++| ADD SA+1 02223 M00S02011.ppr +++| ZJN WID6 IF RUNNING IN STAND-ALONE PP 02224 M00S02012.ppr +++| SBN 6
| Line S02013 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02225 M01S02013.ns2579 ---| WID6 CRM MBSA,SX
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02226 M01S00131.ns2579 +++| WID6 CRM BFMS,SX 02227 M00S02014.ppr +++| LDD MA MOVE REQUEST PARAMETERS TO CM - CM+4 02228 M00S02015.ppr +++| CWD OR 02229 M00S02016.ppr +++| CRD CM
| Line S02017 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02230 M01S02017.ns2579 ---| CWM MBSA,SX RESTORE REQUEST TIME MESSAGE BUFFER
| Line S00132 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02231 M01S00132.ns2579 +++| CWM BFMS,SX RESTORE REQUEST TIME MESSAGE BUFFER 02232 M00S02018.ppr +++| LDD OR ISSUE FUNCTION 02233 M00S02019.ppr +++| RJM FTN
| Line S02020 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02234 M01S02020.ns2579 ---| LDD OA SAVE RESPONSE
| Line S00133 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02235 M01S00133.ns2579 +++| LDD CM+1 CHECK RETURN-ON-INACCESSIBLE-DEVICE 02236 M01S00134.ns2579 +++| SHN 21-11 02237 M01S00135.ns2579 +++| PJN WID6.1 IF STANDALONE *1RU* OR ACCESSIBLE DEVICE 02238 M01S00136.ns2579 +++| LDC 4000 SET REISSUE BIT 02239 M01S00137.ns2579 +++| RAD OR 02240 M01S00138.ns2579 +++| LDD RI 02241 M01S00139.ns2579 +++| STD OR+1 02242 M01S00140.ns2579 +++| SHN 21-11 02243 M01S00141.ns2579 +++| PJN WID7 IF RETURN-ON-INACCESSIBLE NOT REQUESTED 02244 M01S00142.ns2579 +++| WID6.1 LDD OA SAVE RESPONSE 02245 M00S02021.ppr +++| CRD OR 02246 M00S02022.ppr +++| ADN 1
| Line S02023 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02247 M01S02023.ns2579 ---| CRM MBSA,SX
| Line S00143 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02248 M01S00143.ns2579 +++| CRM BFMS,SX 02249 M01S00144.ns2579 +++| LDD SA 02250 M01S00145.ns2579 +++| SHN 14 02251 M01S00146.ns2579 +++| ADD SA+1 02252 M01S00147.ns2579 +++| ZJN WID7 IF RUNNING IN STAND-ALONE PP 02253 M01S00148.ns2579 +++| SBN 6 02254 M01S00149.ns2579 +++| CWM BFMS,SX 02255 M00S02024.ppr +++| 02256 M00S02025.ppr +++|* WRITE MST/DIT/TRT/MRT TO THE DISK. 02257 M00S02026.ppr +++|
| Line S02027 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02258 M01S02027.ns2579 ---| WID7 LDD MS CHECK TABLES CURRENT FLAG
| Line S00150 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
M02 (Removed by) | ppr17 |
Seq # *Modification Id* Act ----------------------------+ 02259 M02S00150.ppr17 ---| WID7 LDN 77 SET TABLES-CURRENT TIMEOUT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ppr17 |
Seq # *Modification Id* Act ----------------------------+ 02260 M01S00001.ppr17 +++| WID7 LCN 0 SET TABLES-CURRENT TIMEOUT
| Line S00151 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02261 M01S00151.ns2579 +++| STD T8 02262 M01S00152.ns2579 +++| WID7.1 DELAY 4 02263 M01S00153.ns2579 +++| SOD T8 DECREMENT TIMEOUT COUNTER 02264 M01S00154.ns2579 +++| MJN WID7.2 IF TIMED OUT 02265 M01S00155.ns2579 +++| LDD MS 02266 M00S02028.ppr +++| SHN 3 02267 M00S02029.ppr +++| ADN SDGL
| Line S02030 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02268 M01S02030.ns2579 ---| CRD CN
| Line S00156 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02269 M01S00156.ns2579 +++| CRD CN GET TABLES-CURRENT FLAG 02270 M01S00157.ns2579 +++| ADK MCLL-SDGL 02271 M01S00158.ns2579 +++| CRD CM GET LONG-TERM INTERLOCK 02272 M00S02031.ppr +++| LDD CN 02273 M00S02032.ppr +++| SHN 21-12
| Line S02033 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02274 M01S02033.ns2579 ---| MJN WID7 IF TABLES STILL BEING USED 02275 M01S02034.ns2579 ---| SETMS =,IO,(NS,DF,SM) ENABLE ENDMS FOR ERROR PROCESSING
| Line S00159 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02276 M01S00159.ns2579 +++| MJN WID7.1 IF SOME MONITOR FUNCTIONS NOT COMPLETE 02277 M01S00160.ns2579 +++| LDD CN+4 02278 M01S00161.ns2579 +++| SHN 21-0 02279 M01S00162.ns2579 +++| PJN WID7.3 IF MST/TRT INTERLOCK NOT SET 02280 M01S00163.ns2579 +++| LDD CM+1 02281 M01S00164.ns2579 +++| SHN 0-13 02282 M01S00165.ns2579 +++| NJP WID14 IF LONG-TERM INTERLOCK SET 02283 M01S00166.ns2579 +++| WID7.2 ERROR EPRO SET PROCESSING ERROR 02284 M01S00167.ns2579 +++| 02285 M01S00168.ns2579 +++| WID7.3 SETMS =,IO,(NS,DF,SM) ENABLE ENDMS FOR ERROR PROCESSING 02286 M00S02035.ppr +++| LDM UERR 02287 M00S02036.ppr +++| LPC -EPDE+EPSM 02288 M00S02037.ppr +++| STM UERR 02289 M00S02038.ppr +++| WID8 LDD TL CALCULATE SECTOR INCREMENT FROM TRT TO MRT 02290 M00S02039.ppr +++| ADD HN 02291 M00S02040.ppr +++| SHN -6 02292 M00S02041.ppr +++| STD T0 02293 M00S02042.ppr +++| LDN MRTL-1-1 02294 M00S02043.ppr +++| SBD T0 02295 M00S02044.ppr +++| ADD MI 02296 M00S02045.ppr +++| RAM WIDA 02297 M00S02046.ppr +++| LDN LSLT RESET SECTOR NUMBER 02298 M00S02047.ppr +++| STD T7 02299 M00S02048.ppr +++| WID9 RAD T7 02300 M00S02049.ppr +++| RJM RLS RECREATE LABEL SECTOR 02301 M00S02050.ppr +++| LDM N4SS+DULL*5 SET SECTOR FOR SECOND COPY OF TABLES 02302 M00S02051.ppr +++| STD TM 02303 M00S02052.ppr +++| LDC BFMS+WCSF 02304 M00S02053.ppr +++| RJM WDS 02305 M00S02054.ppr +++| MJN WID11 IF ERROR 02306 M00S02055.ppr +++|* LDN 0 02307 M00S02056.ppr +++| STD CO CLEAR TRT OFFSET 02308 M00S02057.ppr +++| LDD TL LOAD NUMBER OF WORDS TO BE WRITTEN 02309 M00S02058.ppr +++| RJM WLT WRITE TRT TO LABEL TRACK 02310 M00S02059.ppr +++| WIDA LDN ** ADVANCE TO MRT SECTOR 02311 M00S02060.ppr +++| RAD T7 02312 M00S02061.ppr +++| LDD CN 02313 M00S02062.ppr +++| SHN 21-10 02314 M00S02063.ppr +++| PJN WID10 IF MRT NOT UPDATED 02315 M00S02064.ppr +++| LDD TL SET NUMBER OF CM WORDS TO BE WRITTEN 02316 M00S02065.ppr +++| ADN 7 02317 M00S02066.ppr +++| SHN -3 (TRT LENGTH+7)/10B = MRT LENGTH 02318 M00S02067.ppr +++| RJM WLT WRITE MRT TO LABEL TRACK 02319 M00S02068.ppr +++| WID10 LDD TM 02320 M00S02069.ppr +++| SBD T7 02321 M00S02070.ppr +++| PJN WID9 IF SECOND COPY NOT WRITTEN 02322 M00S02071.ppr +++| UJN WID12 CLEAR SOFTWARE RESERVE 02323 M00S02072.ppr +++| 02324 M00S02073.ppr +++| WID11 ERROR EWET *WRITE ERROR WRITING TABLES.* 02325 M00S02074.ppr +++| 02326 M00S02075.ppr +++|* REWRITE LABEL TO CLEAR SOFTWARE RESERVE. 02327 M00S02076.ppr +++|
| Line S02077 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02328 M01S02077.ns2579 ---| WID12 LDD CN+4 CLEAR MST/TRT INTERLOCK IN CENTRAL MEMORY
| Line S00169 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02329 M01S00169.ns2579 +++| WID12 LDD EA 02330 M01S00170.ns2579 +++| ZJP WID15 IF REPAIR CALL 02331 M01S00171.ns2579 +++| LDC 4000 CLEAR TABLE UPDATE FLAGS 02332 M01S00172.ns2579 +++| STD CN 02333 M01S00173.ns2579 +++| LDD CN+4 CLEAR MST/TRT INTERLOCK IN CENTRAL MEMORY 02334 M00S02078.ppr +++| SCN 76 02335 M00S02079.ppr +++| STD CN+4
| Line S02080 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02336 M01S02080.ns2579 ---| SHN 21-0 02337 M01S02081.ns2579 ---| PJN WID13 IF MONITOR/PROGRAM MODE INTERLOCK NOT SET 02338 M01S02082.ns2579 ---| LDD MS 02339 M01S02083.ns2579 ---| SHN 3 02340 M01S02084.ns2579 ---| ADN MCLL 02341 M01S02085.ns2579 ---| CRD CM 02342 M01S02086.ns2579 ---| LDD CM+1 02343 M01S02087.ns2579 ---| SHN 21-13 02344 M01S02088.ns2579 ---| MJN WID14 IF LONG-TERM INTERLOCK SET 02345 M01S02089.ns2579 ---| MONITOR HNGM 02346 M01S02090.ns2579 ---| 02347 M01S02091.ns2579 ---| WID13 LDC 4000 CLEAR TABLE UPDATE FLAGS 02348 M01S02092.ns2579 ---| STD CN 02349 M00S02093.ppr +++| LDD MS 02350 M00S02094.ppr +++| SHN 3 02351 M00S02095.ppr +++| ADN SDGL 02352 M00S02096.ppr +++| CWD CN 02353 M00S02097.ppr +++| SETMS IO,(NS,DE,DF)
| Line S02098 Modification History | |
|---|---|
M01 (Removed by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 02354 M01S02098.ns2776 ---|* LDC XX0000
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 02355 M01S00001.ns2776 +++|* LDN 0 02356 M00S02099.ppr +++| ADK LSLT REWRITE LABEL 02357 M00S02100.ppr +++| STD T7 02358 M00S02101.ppr +++| RJM RLS 02359 M00S02102.ppr +++| LDC BFMS+WLSF 02360 M00S02103.ppr +++| RJM WDS 02361 M00S02104.ppr +++| PJN WID14 IF NO ERROR 02362 M00S02105.ppr +++| ERROR EWEL *LABEL WRITE ERROR* 02363 M00S02106.ppr +++|
| Line S02107 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02364 M01S02107.ns2579 ---| WID14 ENDMS
| Line S00174 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02365 M01S00174.ns2579 +++|* COMPLETE UPDATE PROCESSING. 02366 M00S02108.ppr +++|
| Line S00175 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02367 M01S00175.ns2579 +++| WID14 LDD MS CLEAR PP OUTPUT REGISTER ADDRESS 02368 M01S00176.ns2579 +++| SHN 3 02369 M01S00177.ns2579 +++| ADN MCLL 02370 M01S00178.ns2579 +++| CRD CN 02371 M01S00179.ns2579 +++| LDN 0 02372 M01S00180.ns2579 +++| STD CN 02373 M01S00181.ns2579 +++| LDD MS 02374 M01S00182.ns2579 +++| SHN 3 02375 M01S00183.ns2579 +++| ADN MCLL 02376 M01S00184.ns2579 +++| CWD CN 02377 M01S00185.ns2579 +++| WID15 ENDMS 02378 M01S00186.ns2579 +++| 02379 M00S02109.ppr +++|* RETURN TO CALLER.
| Line S02110 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02380 M01S02110.ns2579 ---| 02381 M01S02111.ns2579 ---| WID15 LDD OR+1 CHECK FOR INACCESSIBLE DEVICE 02382 M01S02112.ns2579 ---| SHN 21-11 02383 M01S02113.ns2579 ---| PJN WID16 IF DEVICE IS ACCESSIBLE 02384 M01S02114.ns2579 ---| SHN 5-11-21-11 02385 M01S02115.ns2579 ---| STD EF (EF) .GE. 40 02386 M01S02116.ns2579 ---| EXECUTE 3RU WAIT FOR STATUS TO CHANGE 02387 M00S02117.ppr +++| 02388 M00S02118.ppr +++| WID16 LDD EA RESTORE EXIT ADDRESS FOR FTN 02389 M00S02119.ppr +++| STM FTN 02390 M00S02120.ppr +++| NJN WID17 IF NOT REPAIR CALL 02391 M00S02121.ppr +++| LDD IA SET REPAIR-ATTEMPTED FOR *1MV* 02392 M00S02122.ppr +++| CRD IR 02393 M00S02123.ppr +++| LDD IR+3 02394 M00S02124.ppr +++| SCN 40 02395 M00S02125.ppr +++| LMN 40 02396 M00S02126.ppr +++| STD IR+3 02397 M00S02127.ppr +++| LDD IA 02398 M00S02128.ppr +++| CWD IR 02399 M00S02129.ppr +++| UJN WID18 RECALL *1MV* 02400 M00S02130.ppr +++|
| Line S02131 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02401 M01S02131.ns2579 ---| WID17 LDD MS CLEAR PP OUTPUT REGISTER ADDRESS 02402 M01S02132.ns2579 ---| SHN 3 02403 M01S02133.ns2579 ---| ADN MCLL 02404 M01S02134.ns2579 ---| CRD CN 02405 M01S02135.ns2579 ---| LDN 0 02406 M01S02136.ns2579 ---| STD CN 02407 M01S02137.ns2579 ---| LDD MS 02408 M01S02138.ns2579 ---| SHN 3 02409 M01S02139.ns2579 ---| ADN MCLL 02410 M01S02140.ns2579 ---| CWD CN 02411 M01S02141.ns2579 ---| LDD SA CHECK FOR STAND-ALONE CALL 02412 M01S02142.ns2579 ---| ADD SA+1
| Line S00187 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02413 M01S00187.ns2579 +++| WID17 LDD SA CHECK FOR STAND-ALONE CALL 02414 M01S00188.ns2579 +++| SHN 14 02415 M01S00189.ns2579 +++| LMD SA+1 02416 M00S02143.ppr +++| NJN WID19 IF NOT STAND-ALONE CALL 02417 M00S02144.ppr +++| MONITOR DPPM DROP PP 02418 M00S02145.ppr +++| WID18 LJM PPR EXIT TO PPR 02419 M00S02146.ppr +++| 02420 M00S02147.ppr +++|* RESTORE PP MEMORY AND RETURN TO CALLING ROUTINE. 02421 M00S02148.ppr +++|
| Line S02149 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02422 M01S02149.ns2579 ---| WID19 LDD OA SET RESPONSE TO FUNCTION
| Line S00190 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02423 M01S00190.ns2579 +++| WID19 SBN 6 GET MESSAGE BUFFER DATA 02424 M01S00191.ns2579 +++| CRM BFMS,SX 02425 M01S00192.ns2579 +++| LDD OA SET RESPONSE TO FUNCTION 02426 M00S02150.ppr +++| CWD OR 02427 M00S02151.ppr +++| LDD MA RESTORE THE MESSAGE BUFFER
| Line S02152 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02428 M01S02152.ns2579 ---| CWM MBSA,SX
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02429 M01S00193.ns2579 +++| CWM BFMS,SX 02430 M00S02153.ppr +++| LDC /1BP/PPSA1 02431 M00S02154.ppr +++| STD T1 02432 M00S02155.ppr +++| LDD SA 02433 M00S02156.ppr +++| SHN 14 02434 M00S02157.ppr +++| ADD SA+1 02435 M00S02158.ppr +++| CRM /1BP/FBB1,T1 02436 M00S02159.ppr +++|* LJM RST 02437 M00S02160.ppr +++| WLT SPACE 4,10 02438 M00S02161.ppr +++|*** WLT - WRITE LABEL TRACK SECTOR TO MS. 02439 M00S02162.ppr +++|* 02440 M00S02163.ppr +++|* ENTRY (A) = NUMBER OF CM WORDS TO BE WRITTEN TO DISK. 02441 M00S02164.ppr +++|* (CO) = OFFSET FROM TRT FWA OF DATA TO BE WRITTEN. 02442 M00S02165.ppr +++|* (T7) = SECTOR NUMBER TO BE WRITTEN. 02443 M00S02166.ppr +++|* (TA - TA+1) = TRT ADDRESS. 02444 M00S02167.ppr +++|* 02445 M00S02168.ppr +++|* EXIT (T7) = SECTOR NUMBER OF LAST SECTOR WRITTEN. 02446 M00S02169.ppr +++|* (CO) = OFFSET +1 OF LAST DATA WRITTEN. 02447 M00S02170.ppr +++|* 02448 M00S02171.ppr +++|* USES TM+1, TM+2. 02449 M00S02172.ppr +++|* 02450 M00S02173.ppr +++|* CALLS WDS. 02451 M00S02174.ppr +++| 02452 M00S02175.ppr +++| 02453 M00S02176.ppr +++| WLT7 LDN WCSF/10000-WLSF/10000 RESTORE WCSF FUNCTION 02454 M00S02177.ppr +++| RAM WLTA 02455 M00S02178.ppr +++| 02456 M00S02179.ppr +++| WLT SUBR ENTRY/EXIT 02457 M00S02180.ppr +++| STD TM+2 SAVE WORD COUNT 02458 M00S02181.ppr +++| LDD HN 02459 M00S02182.ppr +++| STD TM+1 02460 M00S02183.ppr +++| STM BFMS+1 02461 M00S02184.ppr +++| WLT1 LDC -100 DECREMENT COUNT OF WORDS TO BE WRITTEN 02462 M00S02185.ppr +++| RAD TM+2 02463 M00S02186.ppr +++| PJN WLT3 IF 100 OR MORE WORDS LEFT 02464 M00S02187.ppr +++| RAD TM+1 SET COUNT OF WORDS LEFT 02465 M00S02188.ppr +++| MJN WLT7 IF ALL WORDS WRITTEN 02466 M00S02189.ppr +++| LDN 0 02467 M00S02190.ppr +++| STD TM+2 02468 M00S02191.ppr +++| LDD TM+1 02469 M00S02192.ppr +++| STM BFMS+1 02470 M00S02193.ppr +++| LDD MS GET CURRENT COUNTER VALUE 02471 M00S02194.ppr +++| SHN 3 02472 M00S02195.ppr +++| ADN SDGL 02473 M00S02196.ppr +++| CRM BFMS+2+77*5,ON 02474 M00S02197.ppr +++| LCN WCSF/10000-WLSF/10000 SET WLSF FUNCTION 02475 M00S02198.ppr +++| RAM WLTA 02476 M00S02199.ppr +++| WLT3 AOD T7 02477 M00S02200.ppr +++| WLT4 ADN 1 02478 M00S02201.ppr +++| STM BFMS 02479 M00S02202.ppr +++| LDD TA READ SECTOR OF TRT DATA FROM CM 02480 M00S02203.ppr +++| SHN 14 02481 M00S02204.ppr +++| ADD TA+1 02482 M00S02205.ppr +++| ADD CO 02483 M00S02206.ppr +++| CRM BFMS+2,TM+1 02484 M00S02207.ppr +++| LDD TM+1 02485 M00S02208.ppr +++| RAD CO 02486 M00S02209.ppr +++| WLTA LDC WCSF+BFMS WRITE SECTOR OF TRT TO DISK 02487 M00S02210.ppr +++| RJM WDS 02488 M00S02211.ppr +++| PJP WLT1 IF NO WRITE ERROR 02489 M00S02212.ppr +++| SHN 21-11 02490 M00S02213.ppr +++| PJN WLT6 IF REISSUE OF CURRENT SECTOR NOT POSSIBLE 02491 M00S02214.ppr +++| LDD TM+1 BACKUP CM ADDRESS 02492 M00S02215.ppr +++| STM BFMS+1 02493 M00S02216.ppr +++| LMC -0 02494 M00S02217.ppr +++| RAD CO
| Line S02218 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02495 M01S02218.ns2553 ---| WLT5 LDD T7
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02496 M01S00053.ns2553 +++| LDD T7 02497 M00S02219.ppr +++| UJN WLT4 RELOAD BUFFER 02498 M00S02220.ppr +++| 02499 M00S02221.ppr +++| WLT6 ERROR EWET *WRITE ERROR WRITING TABLES.* 02500 M00S02222.ppr +++| 02501 M00S02223.ppr +++| OVERFLOW WIDX,MSFW+/1BP/PPSA2*5,CMR 02502 M00S02224.ppr +++| OVERLAY (R/W LABEL ERROR PROCESSOR.),N4SS+PFGL*5+12 02503 M00S02225.ppr +++| SPACE 4,10 02504 M00S02226.ppr +++|*** 3RW - UNIT RESERVE PROCESSOR. 02505 M00S02227.ppr +++|* G. A. SCHUMACHER. 79/08/03. 02506 M00S02228.ppr +++|* J. J. EIKUM. 81/05/18. 02507 M00S02229.ppr +++| SPACE 4,10 02508 M00S02230.ppr +++|*** *3RW* IS CALLED BY *1RU* OR *3RU* WHEN AN ERROR 02509 M00S02231.ppr +++|* IS DETECTED IN READING OR WRITING THE MS DEVICE LABEL. 02510 M00S02232.ppr +++| SPACE 4,10 02511 M00S02233.ppr +++|*** OPERATOR MESSAGES. 02512 M00S02234.ppr +++|* 02513 M00S02235.ppr +++|* 02514 M00S02236.ppr +++|* *1RU LABEL ERROR, M, EQXXX.* 02515 M00S02237.ppr +++|* M = MODE. 02516 M00S02238.ppr +++|* D = DIT ERROR. 02517 M00S02239.ppr +++|* R = READ. 02518 M00S02240.ppr +++|* W = WRITE. 02519 M00S02241.ppr +++|* XXX = EST ORDINAL OF DEVICE ON WHICH ERROR OCCURRED. 02520 M00S02242.ppr +++| SPACE 4,10 02521 M00S02243.ppr +++|*** ENTRY CONDITIONS. 02522 M00S02244.ppr +++|* 02523 M00S02245.ppr +++|* (EF) = ERROR CODE. 02524 M00S02246.ppr +++|* (T5) = MS EST ORDINAL. 02525 M00S02247.ppr +++| SPACE 4,10 02526 M00S02248.ppr +++|*** EXIT CONDITIONS. 02527 M00S02249.ppr +++|* 02528 M00S02250.ppr +++|* TO *URPX*. 02529 M00S02251.ppr +++| SPACE 4,10 02530 M00S02252.ppr +++|*** NOTE - THIS OVERLAY MUST RESIDE IN *RPL*. 02531 M00S02253.ppr +++| EJECT 02532 M00S02254.ppr +++|*** LEP - LABEL ERROR PROCESSOR FOR 1RU. 02533 M00S02255.ppr +++| 02534 M00S02256.ppr +++| 02535 M00S02257.ppr +++| ORG N4SS+PFGL*5+12 02536 M00S02258.ppr +++| LEP SUBR 02537 M00S02259.ppr +++| LDM TERP-1,EF GET PROCESSOR ADDRESS 02538 M00S02260.ppr +++| STM LEPB 02539 M00S02261.ppr +++| LDM TERP,EF GET MESSAGE ADDRESS 02540 M00S02262.ppr +++| ZJN LEP3 IF NO MESSAGE 02541 M00S02263.ppr +++| STD T1 02542 M00S02264.ppr +++| STM LEPA 02543 M00S02265.ppr +++| LDC 2REQ 02544 M00S02266.ppr +++| STI T1 02545 M00S02267.ppr +++| LDD T5 CONVERT UPPER TWO DIGITS OF EST ORDINAL 02546 M00S02268.ppr +++| SHN -3 02547 M00S02269.ppr +++| RJM C2D 02548 M00S02270.ppr +++| STM 1,T1 02549 M00S02271.ppr +++| LDD T5 CONVERT LOWER DIGIT OF EST ORDINAL 02550 M00S02272.ppr +++| LPN 7 02551 M00S02273.ppr +++| SHN 6 02552 M00S02274.ppr +++| ADC 2R0, 02553 M00S02275.ppr +++| STM 2,T1 02554 M00S02276.ppr +++| LEP1 LDN NCPL 02555 M00S02277.ppr +++| CRD CM 02556 M00S02278.ppr +++| AOD CM+1 DISPLAY MESSAGE AT SYSTEM CP
| Line S02279 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02557 M01S02279.ns2553 ---| LEP2 SHN 7
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02558 M01S00054.ns2553 +++| SHN 7 02559 M00S02280.ppr +++| ADN MS2W
| Line S02281 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02560 M01S02281.ns2579 ---| STD EF SAVE ADDRESS OF *MS2W* BUFFER
| Line S00194 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02561 M01S00194.ns2579 +++| STD EM SAVE ADDRESS OF *MS2W* BUFFER 02562 M00S02282.ppr +++| CWM **,TR 02563 M00S02283.ppr +++| LEPA EQU *-1 02564 M00S02284.ppr +++| LEP3 LJM ** JUMP TO PROCESSOR 02565 M00S02285.ppr +++| LEPB EQU *-1 02566 M00S02286.ppr +++| TERP SPACE 4,10 02567 M00S02287.ppr +++|** TERP - TABLE OF ERROR PROCESSORS. 02568 M00S02288.ppr +++| 02569 M00S02289.ppr +++| 02570 M00S02290.ppr +++| TERP BSS 0 02571 M00S02291.ppr +++| LOC 1
| Line S00195 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02572 M01S00195.ns2579 +++| ERDC BSS 0 READ TIME ERROR CODES 02573 M00S02292.ppr +++| ECDM CON RME,=C* HARDWARE RESERVE ERROR.*-3 02574 M00S02293.ppr +++| ECKS CON CKS,=C* LABEL CHECKSUM ERROR.*-3 02575 M00S02294.ppr +++| EMND CON MND,=C* MACHINE NOT IN DIT.*-3 02576 M00S02295.ppr +++| EPNE CON PNE,0 PACK NAME ERROR 02577 M00S02296.ppr +++| ERDE CON RDE,=C* LABEL READ ERROR.*-3 02578 M00S02297.ppr +++| ERES CON RES,=C* INTERLOCKED BY .*-3
| Line S00196 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02579 M01S00196.ns2579 +++| ESIN CON RME,=C* LABEL WRITE ERROR.*-3 02580 M01S00197.ns2579 +++| 02581 M01S00198.ns2579 +++| EWRC BSS 0 WRITE TIME ERROR CODES 02582 M01S00199.ns2579 +++| EPRO CON RME,=C* PROCESSING ERROR.*-3 02583 M00S02298.ppr +++| ESUP CON SUP,0 SIMULTANEOUS UPDATE 02584 M00S02299.ppr +++| EWEL CON RME,=C* LABEL WRITE ERROR.*-3 02585 M00S02300.ppr +++| EWET CON SIS,=C* TABLE WRITE ERROR.*-3 02586 M00S02301.ppr +++| LOC *O 02587 M00S02302.ppr +++| 02588 M00S02303.ppr +++| USE LITERALS FORCE LITERALS HERE 02589 M00S02304.ppr +++| CKS SPACE 4,10 02590 M00S02305.ppr +++|** CKS - BAD CHECKSUM. 02591 M00S02306.ppr +++| 02592 M00S02307.ppr +++| 02593 M00S02308.ppr +++| CKS LDD EA 02594 M00S02309.ppr +++| ZJN CKS1 IF REPAIR CALL 02595 M00S02310.ppr +++| LJM RME RELEASE MASS STORAGE EQUIPMENT 02596 M00S02311.ppr +++|
| Line S02312 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02597 M01S02312.ns2553 ---| CKS1 STD EF CLEAR ERROR FLAG
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
M02 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02598 M02S00055.ns2579 ---| CKS1 LDD EF CLEAR ERROR MESSAGE
| Line S00200 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02599 M01S00200.ns2579 +++| CKS1 LDD EM CLEAR ERROR MESSAGE
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02600 M01S00056.ns2553 +++| CWD EA 02601 M01S00057.ns2553 +++| LDN 0 CLEAR ERROR FLAG 02602 M01S00058.ns2553 +++| STD EF
| Line S00201 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02603 M01S00201.ns2579 +++| STD EM 02604 M00S02313.ppr +++| EXECUTE 3RV REWRITE THE LABEL TABLES 02605 M00S02314.ppr +++| MND SPACE 4,10 02606 M00S02315.ppr +++|** MND - MACHINE NOT IN DIT. 02607 M00S02316.ppr +++| 02608 M00S02317.ppr +++| 02609 M00S02318.ppr +++| MND MONITOR HNGM HANG ON DIT ERROR 02610 M00S02319.ppr +++| UJP LEP1 LOOP ON HANG 02611 M00S02320.ppr +++| PNE SPACE 4,10 02612 M00S02321.ppr +++|** PNE - PACK NAME ERROR. 02613 M00S02322.ppr +++| 02614 M00S02323.ppr +++| 02615 M00S02324.ppr +++| PNE LDC BFMS 02616 M00S02325.ppr +++| STD IR+2 SET LABEL BUFFER ADDRESS 02617 M00S02326.ppr +++| LDD T5 02618 M00S02327.ppr +++| STD IR+3 SET EST ORDINAL
| Line S02328 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02619 M01S02328.ns2553 ---| ISTORE PRSB,(LDN 0) IGNORE CHANNEL RESERVE 02620 M01S02329.ns2553 ---| LDC RUR
| Line S00059 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02621 M01S00059.ns2553 +++| LDC /1RU/RDI 02622 M00S02330.ppr +++| STM EXR SET RETURN ADDRESS 02623 M00S02331.ppr +++| EXECUTE 5ME,* ISSUE ERROR MESSAGE AND WAIT FOR RESPONSE 02624 M00S02332.ppr +++| LJM EXR+1 LOAD *5ME* 02625 M00S02333.ppr +++| RDE SPACE 4,10 02626 M00S02334.ppr +++|** RDE - READ ERROR. 02627 M00S02335.ppr +++| 02628 M00S02336.ppr +++| 02629 M00S02337.ppr +++| RDE LDD EA 02630 M00S02338.ppr +++| ZJN CKS1 IF REPAIR CALL 02631 M00S02339.ppr +++| LDM UERR ENABLE ENDMS FOR ERROR PROCESSING 02632 M00S02340.ppr +++| LMC EPDE-EPSM 02633 M00S02341.ppr +++| STM UERR 02634 M00S02342.ppr +++| SETMS =,IO,(NS,DF,SM)
| Line S02343 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02635 M01S02343.ns2553 ---| LPC EPDE-EPSM 02636 M01S02344.ns2553 ---| NJN SIS IF *ENDMS* ALREADY ENABLED 02637 M01S02345.ns2553 ---|* LDN 0 02638 M01S02346.ns2553 ---| LJM CID RETRY READ
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02639 M01S00060.ns2553 +++| SHN 21-10 02640 M01S00061.ns2553 +++| ERRNZ EPDE-EPSM-1S8 CODE ASSUMES VALUE
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
M02 (Removed by) | ppr18 |
Seq # *Modification Id* Act ----------------------------+ 02641 M02S00062.ppr18 ---| MJN SIS IF *ENDMS* ALREADY ENABLED
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ppr18 |
Seq # *Modification Id* Act ----------------------------+ 02642 M01S00001.ppr18 +++| MJN SDS IF *ENDMS* ALREADY ENABLED
| Line S00063 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02643 M01S00063.ns2553 +++| LJM /1RU/RDI RETRY READ 02644 M00S02347.ppr +++| RES SPACE 4,10 02645 M00S02348.ppr +++|** SOFTWARE RESERVE SET BY ANOTHER MACHINE. 02646 M00S02349.ppr +++| 02647 M00S02350.ppr +++| 02648 M00S02351.ppr +++| RES LDM RESA GET MID OF MACHINE WITH RESERVE 02649 M00S02352.ppr +++| STM 13,T1 02650 M00S02353.ppr +++| LDN RME-RES CHANGE ERROR PROCESSOR 02651 M00S02354.ppr +++| RAM LEPB 02652 M00S02355.ppr +++| LJM LEP1 DISPLAY MESSAGE 02653 M00S02356.ppr +++| 02654 M00S02357.ppr +++| 02655 M00S02358.ppr +++| RESA EQU RESA BUFFER FOR MID OF MACHINE WITH RESERVE 02656 M00S02359.ppr +++| RME SPACE 4,10
| Line S02360 Modification History | |
|---|---|
M01 (Removed by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02657 M01S02360.ns2579 ---|** RME - RELEASE MASS STORAGE EPQUIMENT.
| Line S00202 Modification History | |
|---|---|
M01 (Added by) | ns2579 |
Seq # *Modification Id* Act ----------------------------+ 02658 M01S00202.ns2579 +++|** RME - RELEASE MASS STORAGE EQUIPMENT. 02659 M00S02361.ppr +++| 02660 M00S02362.ppr +++| 02661 M00S02363.ppr +++| RME ENDMS 02662 M00S02364.ppr +++|* UJN SDS SET DEVICE SUSPECT 02663 M00S02365.ppr +++| SDS SPACE 4,10 02664 M00S02366.ppr +++|** SDS - SET DEVICE SUSPECT. 02665 M00S02367.ppr +++| 02666 M00S02368.ppr +++| 02667 M00S02369.ppr +++| SDS LDD T5 SET SUSPECT 02668 M00S02370.ppr +++| STD CM+1 02669 M00S02371.ppr +++| LDN SSES 02670 M00S02372.ppr +++| STD CM+2 02671 M00S02373.ppr +++| MONITOR SEQM 02672 M00S02374.ppr +++|* UJN SIS 02673 M00S02375.ppr +++| SIS SPACE 4,10 02674 M00S02376.ppr +++|** SIS - SET INACCESSIBLE STATUS. 02675 M00S02377.ppr +++| 02676 M00S02378.ppr +++| 02677 M00S02379.ppr +++| SIS EXECUTE 3RU PROCESS RETURN-ON-INACCESSIBLE STATUS 02678 M00S02380.ppr +++| SUP SPACE 4,10 02679 M00S02381.ppr +++|** SUP - SIMULTANEOUS UPDATE. 02680 M00S02382.ppr +++| 02681 M00S02383.ppr +++| 02682 M00S02384.ppr +++| SUP MONITOR HNGM SET ERROR ON DEVICE 02683 M00S02385.ppr +++| UJN SUP LOOP 02684 M00S02386.ppr +++| SPACE 4,10 02685 M00S02387.ppr +++|* COMMON DECKS. 02686 M00S02388.ppr +++| 02687 M00S02389.ppr +++| 02688 M00S02390.ppr +++|*QUAL$ EQU 0 02689 M00S02391.ppr +++|*CALL COMPC2D 02690 M00S02392.ppr +++| 02691 M00S02393.ppr +++| OVERFLOW LEPX,EPFW,CMR 02692 M00S02394.ppr +++| OVERLAY (SET INACCESSIBLE STATUS.),10001-3*5 02693 M00S02395.ppr +++| SIA SPACE 4,10
| Line S02396 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02694 M01S02396.273l780 ---|*** SIA - SET INACCESSIBLE STATUS.
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02695 M01S00023.273l780 +++|*** 3RX - SET INACCESSIBLE STATUS. 02696 M00S02397.ppr +++|* 02697 M00S02398.ppr +++|* J. M. MAREK. 87/04/30. 02698 M00S02399.ppr +++| SIA SPACE 4,10
| Line S02400 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02699 M01S02400.273l780 ---|*** *SIA* IS USED TO SET THE STATUSES NECESSARY TO HANDLE 02700 M01S02401.273l780 ---|* AN INACCESSIBLE STATUS FROM *AFAM*, *DLKM*, *DTKM*, *RTCM*, 02701 M01S02402.273l780 ---|* *STBM*, *VMSM*. IT IS INITIATED BY *CPUMTR* VIA A *BOTM* 02702 M01S02403.273l780 ---|* AND RETURNS TO *FTN1*.
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02703 M01S00024.273l780 +++|*** *3RX* IS CALLED BY *CPUMTR* WHEN AN INACCESSIBLE 02704 M01S00025.273l780 +++|* STATUS ON AN *ISHARE* DEVICE PREVENTS NORMAL COMPLETION OF 02705 M01S00026.273l780 +++|* THE *AFAM*, *DLKM*, *DTKM*, *RTCM*, *STBM*, OR *VMSM* 02706 M01S00027.273l780 +++|* FUNCTION. *3RX* IS EXECUTED VIA THE *BOTM* *PPR* FUNCTION 02707 M01S00028.273l780 +++|* AND SETS STATUS FLAGS TO BE USED BY THE CALLER IN PROCESSING 02708 M01S00029.273l780 +++|* THE INACCESSIBLE DEVICE ERROR. 02709 M01S00030.273l780 +++|* 02710 M01S00031.273l780 +++|* NOTE - THIS PROGRAM MUST BE CM RESIDENT. 02711 M00S02404.ppr +++| SIA SPACE 4,10 02712 M00S02405.ppr +++|*** ENTRY CONDITIONS. 02713 M00S02406.ppr +++|*
| Line S02407 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02714 M01S02407.273l780 ---|* (CM+3) = *MSD*. 02715 M01S02408.273l780 ---|* (CM+4) = SUBSYSTEM AND DEVICE STATUS FOR *MSD* BYTE.
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02716 M01S00032.273l780 +++|* (CM+1 - CM+2) = FWA OF *3RX* IN *RPL*. 02717 M01S00033.273l780 +++|* (CM+3 - CM+4) = *SBFP + 2* ADDRESS IN EXTENDED PP 02718 M01S00034.273l780 +++|* COMMUNCATION BLOCK. 02719 M00S02409.ppr +++| SIA SPACE 4,10 02720 M00S02410.ppr +++|*** EXIT CONDITIONS. 02721 M00S02411.ppr +++|*
| Line S02412 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02722 M01S02412.273l780 ---|* (MSD) = BITS 6 AND 11 SET FROM (CM+4).
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02723 M01S00035.273l780 +++|* (MSD) SUBSYSTEM STATUS UPDATED. 02724 M00S02413.ppr +++|* (RDCT) = 0. 02725 M00S02414.ppr +++|* (CM - CM+4) = OUTPUT REGISTER.
| Line S02415 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02726 M01S02415.273l780 ---|* TO *FTN1*. 02727 M01S02416.273l780 ---| SIA SPACE 4,10 02728 M01S02417.273l780 ---|*** NOTE - THIS PROGRAM MUST BE CM RESIDENT. 02729 M01S02418.273l780 ---| SIA SPACE 4,10 02730 M01S02419.273l780 ---|** SIA - MAIN PROGRAM.
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02731 M01S00036.273l780 +++|* TO *FTN1.0* TO RETURN TO CALLER OF *FTN*. 02732 M00S02420.ppr +++| 02733 M00S02421.ppr +++| 02734 M00S02422.ppr +++| SIA BSS 0 ENTRY
| Line S02423 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02735 M01S02423.273l780 ---| LDI CM+3 SET SUBSYSTEM STATUS 02736 M01S02424.273l780 ---| LPN 77 02737 M01S02425.273l780 ---| LMD CM+4 02738 M01S02426.273l780 ---| STI CM+3 02739 M01S02427.273l780 ---| LDD OA RESTORE OUTPUT REGISTER 02740 M01S02428.273l780 ---| SHN -3 02741 M01S02429.273l780 ---| ADC ** (ADDRESS OF OR SAVE BUFFER IN *CPUMTR*)
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02742 M01S00037.273l780 +++| LDD CM+3 SET DIRECT CELL SAVE ADDRESS 02743 M01S00038.273l780 +++| SHN 14 02744 M01S00039.273l780 +++| ADD CM+4 02745 M01S00040.273l780 +++| CWD CN SAVE (CN - CN+4) 02746 M01S00041.273l780 +++| SBN 1 02747 M01S00042.273l780 +++| CRD CN READ *MSD* PARAMETERS 02748 M01S00043.273l780 +++| LDN 0 02749 M01S00044.273l780 +++| STM RDCT 02750 M01S00045.273l780 +++| LDC 3*100 SET READ OFFSET 02751 M01S00046.273l780 +++| LJM FTN1.2 READ AND EXECUTE NEXT SEGMENT 02752 M01S00047.273l780 +++| BSSZ 10000B-* SPARE SPACE 02753 M01S00048.273l780 +++| CON SIA-1 (T0+1) BECOMES (P) 02754 M01S00049.273l780 +++| 02755 M01S00050.273l780 +++| LOC 10001-3*5 02756 M01S00051.273l780 +++| 02757 M01S00052.273l780 +++| SIA1 LDM MSD GET *MSD* 02758 M01S00053.273l780 +++| LPN 77 PRESERVE DRIVER INDENTIFIER 02759 M01S00054.273l780 +++| LMD CN UPDATE SUBSYSTEM STATUS 02760 M01S00055.273l780 +++| STM MSD 02761 M01S00056.273l780 +++| LDD CM+3 SET DIRECT CELL SAVE ADDRESS 02762 M01S00057.273l780 +++| SHN 14 02763 M01S00058.273l780 +++| ADD CM+4 02764 M01S00059.273l780 +++| CRD CN RESTORE (CN - CN+4) 02765 M01S00060.273l780 +++| SBN 2 READ OUTPUT REGISTER 02766 M00S02430.ppr +++| CRD CM
| Line S02431 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02767 M01S02431.273l780 ---| LDN 0 SET DRIVER ERROR STATUS 02768 M01S02432.273l780 ---| STM RDCT 02769 M01S02433.273l780 ---| LJM FTN1 RETURN TO CALLER 02770 M01S02434.273l780 ---| BSSZ 10000B-* (SPARE SPACE) 02771 M01S02435.273l780 ---| CON SIA-1 (T0)+1 BECOMES (P) 02772 M01S02436.273l780 ---| 02773 M01S02437.273l780 ---|* THE FOLLOWING BYTES ARE PARAMETERS USED BY *CPUMTR*. THEY 02774 M01S02438.273l780 ---|* ARE NOT READ INTO THE PP. 02775 M01S02439.273l780 ---| 02776 M01S02440.273l780 ---| CON 2000B PRESET INDEX + 2000B 02777 M01S02441.273l780 ---| CON 0,0 ZERO 02778 M01S02442.273l780 ---| CON 0,0 UNUSED
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02779 M01S00061.273l780 +++| LJM FTN1.0 RETURN TO *FTN* CALLER 02780 M01S00062.273l780 +++| BSSZ 10000B-* SPARE SPACE 02781 M01S00063.273l780 +++| CON SIA1-1 (T0+1) BECOMES (P) 02782 M00S02443.ppr +++| 1FA TTL PPR/1FA FAST ATTACH SUBFUNCTION PROCESSOR. 02783 M00S02444.ppr +++| EJECT 02784 M00S02445.ppr +++| QUAL 1FA 02785 M00S02446.ppr +++| IDENT 1FA,PPFW 02786 M00S02447.ppr +++|*COMMENT PPR - FAST ATTACH SUBFUNCTION PROCESSOR.
| Line S02448 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02787 M01S02448.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02788 M01S00008.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02789 M00S02449.ppr +++| SPACE 4,10 02790 M00S02450.ppr +++|*** 1FA - FAST ATTACH SUBFUNCTION PROCESSOR. 02791 M00S02451.ppr +++|* G. A. SCHUMACHER. 79/08/03. 02792 M00S02452.ppr +++|* J. J. EIKUM. 81/05/18. 02793 M00S02453.ppr +++|* J. J. EIKUM. 86/11/21. 02794 M00S02454.ppr +++| SPACE 4,10 02795 M00S02455.ppr +++|*** *1FA* IS CALLED BY PP RESIDENT WHEN AN *AFAM* MONITOR 02796 M00S02456.ppr +++|* FUNCTION IS ISSUED ON AN INDEPENDENT SHARED DEVICE. 02797 M00S02457.ppr +++| SPACE 4,10 02798 M00S02458.ppr +++|*** OPERATOR MESSAGES. 02799 M00S02459.ppr +++|* 02800 M00S02460.ppr +++|*
| Line S02461 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02801 M01S02461.ns2553 ---|* *1FA ERROR, M, EQXXX, FILENAM*
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02802 M01S00064.ns2553 +++|* *EQXXX, 1FA ERROR, M, FILENAM* 02803 M00S02462.ppr +++|* M = MODE. 02804 M00S02463.ppr +++|* R = READ. 02805 M00S02464.ppr +++|* W = WRITE. 02806 M00S02465.ppr +++|* XXX = EST ORDINAL. 02807 M00S02466.ppr +++|* FILENAM = FILENAME OF FAST ATTACH FILE INVOLVED. 02808 M00S02467.ppr +++| SPACE 4,10 02809 M00S02468.ppr +++|*** ENTRY CONDITIONS. 02810 M00S02469.ppr +++|* 02811 M00S02470.ppr +++|* 02812 M00S02471.ppr +++|* LOCATIONS *FAFW* THROUGH *MSD* AND *MSFW* THROUGH *MSFW*+500 02813 M00S02472.ppr +++|* ARE SAVED IN THIS PP-S SAVE AREA. 02814 M00S02473.ppr +++| SPACE 4,10 02815 M00S02474.ppr +++|*** EXIT CONDITIONS. 02816 M00S02475.ppr +++|* 02817 M00S02476.ppr +++|* 02818 M00S02477.ppr +++|* PP MEMORY IS RESTORED FROM THE PP SAVE AREA. 02819 M00S02478.ppr +++|* MESSAGE BUFFER IS UPDATED TO INFORMATION RETURNED 02820 M00S02479.ppr +++|* BY CPUMTR WHEN THE FUNCTION WAS PROCESSED. 02821 M00S02480.ppr +++| SPACE 4,10 02822 M00S02481.ppr +++|*** NOTE - THIS OVERLAY MUST RESIDE IN *RPL*. 02823 M00S02482.ppr +++| SPACE 4,10 02824 M00S02483.ppr +++|* COMMON DECKS. 02825 M00S02484.ppr +++| 02826 M00S02485.ppr +++| 02827 M00S02486.ppr +++|*CALL COMSPFM 02828 M00S02487.ppr +++|*CALL COMS1DS 02829 M00S02488.ppr +++| SPACE 4,10 02830 M00S02489.ppr +++|**** DIRECT LOCATION ASSIGNMENTS. 02831 M00S02490.ppr +++| 02832 M00S02491.ppr +++|
| Line S02492 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02833 M01S02492.ns2553 ---| CN EQU 20 - 24 CM WORD BUFFER 02834 M01S02493.ns2553 ---| SA EQU 25 - 26 PP SAVE AREA ADDRESS 02835 M01S02494.ns2553 ---| OR EQU 30 - 34 OUTPUT REGISTER 02836 M01S02495.ns2553 ---| EA EQU 41 EXIT ADDRESS
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02837 M01S00065.ns2553 +++| BEGIN BSSN 20 02838 M01S00066.ns2553 +++| CN BSSN 5 CM WORD BUFFER 02839 M01S00067.ns2553 +++| MS BSSN 1 MST ADDRESS 02840 M01S00068.ns2553 +++| SA BSSN 2 PP SAVE AREA ADDRESS 02841 M01S00069.ns2553 +++| OR BSSN 5 OUTPUT REGISTER 02842 M01S00070.ns2553 +++| EA BSSN 1 EXIT ADDRESS 02843 M01S00071.ns2553 +++| EF BSSN 1 ERROR FLAG 02844 M01S00072.ns2553 +++| ERRNG IR-* DIRECT CELLS OVERFLOW INTO *IR* 02845 M00S02496.ppr +++|**** 02846 M00S02497.ppr +++| SPACE 4,10 02847 M00S02498.ppr +++| FAP TITLE MAIN ROUTINE. 02848 M00S02499.ppr +++| SPACE 4,10 02849 M00S02500.ppr +++| ORG PPFW 02850 M00S02501.ppr +++| SPACE 4,10 02851 M00S02502.ppr +++|** FAP - MAIN ROUTINE. 02852 M00S02503.ppr +++| 02853 M00S02504.ppr +++|
| Line S02505 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02854 M01S02505.ns2553 ---| FAP BSS 0
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02855 M01S00073.ns2553 +++| FAP BSS 0 ENTRY 02856 M00S02506.ppr +++| 02857 M00S02507.ppr +++|* SET UP SAVE AREA. 02858 M00S02508.ppr +++|
| Line S02509 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02859 M01S02509.ns2553 ---| FAP LDM FTN SAVE EXIT ADDRESS
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02860 M01S00074.ns2553 +++| LDM FTN SAVE EXIT ADDRESS 02861 M00S02510.ppr +++| STD EA 02862 M00S02511.ppr +++| LDC FTN RESTORE *PAUSE* MACRO IN *PLL* 02863 M00S02512.ppr +++| STM PLLD 02864 M00S02513.ppr +++| LDD MA GET SAVE AREA ADDRESS 02865 M00S02514.ppr +++| ADN 1 02866 M00S02515.ppr +++| CRD SA-1 02867 M00S02516.ppr +++| LDD SA GET ORIGINAL OUTPUT REGISTER 02868 M00S02517.ppr +++| SHN 14 02869 M00S02518.ppr +++| ADD SA+1 02870 M00S02519.ppr +++| SBN 7 02871 M00S02520.ppr +++| CRD OR 02872 M00S02521.ppr +++| ADC .RST+7 WRITE *RST* TO PP SAVE AREA 02873 M00S02522.ppr +++| CWM PRSA,TR 02874 M00S02523.ppr +++| 02875 M00S02524.ppr +++|* CHECK FUNCTION PARAMETERS. 02876 M00S02525.ppr +++| 02877 M00S02526.ppr +++| LDD OR+3 02878 M00S02527.ppr +++| SBN 2 02879 M00S02528.ppr +++| PJN FAP1 IF ILLEGAL SUBFUNCTION 02880 M00S02529.ppr +++| LDD OR+2 02881 M00S02530.ppr +++| LPC 3777 02882 M00S02531.ppr +++| SBN PTLM 02883 M00S02532.ppr +++| PJN FAP1 IF ILLEGAL MODE 02884 M00S02533.ppr +++| LDM CHRV 02885 M00S02534.ppr +++| LPN 1 02886 M00S02535.ppr +++| ZJN FAP1.1 IF CHANNEL NOT RESERVED 02887 M00S02536.ppr +++| FAP1 MONITOR CHGM 02888 M00S02537.ppr +++| UJN FAP1 HANG 02889 M00S02538.ppr +++| 02890 M00S02539.ppr +++|* SET RETURN ADDRESS IN CM COPY OF PP ADDRESS ZERO. 02891 M00S02540.ppr +++| 02892 M00S02541.ppr +++|* READ FNT/FST. 02893 M00S02542.ppr +++| 02894 M00S02543.ppr +++| FAP1.1 RJM IFP INITIALIZE *COMPGFP* 02895 M00S02544.ppr +++| SFA FNT,OR+4 02896 M00S02545.ppr +++| CRM ERRA+13,ON 02897 M00S02546.ppr +++| CRD T5 SET EST ORDINAL AND TRACK 02898 M00S02547.ppr +++| 02899 M00S02548.ppr +++|* READ SYSTEM SECTOR OF REQUESTED FILE. 02900 M00S02549.ppr +++| 02901 M00S02550.ppr +++| FAP1.2 LDN 0 SET SYSTEM SECTOR ADDRESS 02902 M00S02551.ppr +++| STD T7
| Line S02552 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02903 M01S02552.ns2553 ---| SETMS IO,(DE,DF) 02904 M01S02553.ns2553 ---| LDC BFMS
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02905 M01S00075.ns2553 +++| SETMS IO,(NS,DE,DF) 02906 M01S00076.ns2553 +++| LDD CM+4 SET MST ADDRESS 02907 M01S00077.ns2553 +++| STD MS 02908 M01S00078.ns2553 +++| FAP1.3 LDC BFMS READ SYSTEM SECTOR 02909 M00S02554.ppr +++| RJM RDS 02910 M00S02555.ppr +++| PJN FAP2 IF NO UNRECOVERED ERROR 02911 M00S02556.ppr +++| ERROR 1RR 02912 M00S02557.ppr +++|
| Line S02558 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02913 M01S02558.ns2553 ---| FAP2 RJM CFM CHECK FILE MODE
| Line S00079 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 02914 M01S00079.ns2553 +++| FAP2 LDM UERR CHECK *ENDMS* DISABLED FLAG 02915 M01S00080.ns2553 +++| SHN 21-10 02916 M01S00081.ns2553 +++| ERRNZ EPDE-EPSM-400 02917 M01S00082.ns2553 +++| PJN FAP1.2 IF *ENDMS* ENABLED 02918 M01S00083.ns2553 +++| RJM CFM CHECK FILE MODE 02919 M00S02559.ppr +++| NJN FAP4 IF ACCESS NOT ALLOWED 02920 M00S02560.ppr +++| FAP3 LDC WLSF+BFMS WRITE SECTOR 02921 M00S02561.ppr +++| RJM WDS 02922 M00S02562.ppr +++| PJN FAP5 IF NO WRITE ERROR 02923 M00S02563.ppr +++| ERROR 1RW 02924 M00S02564.ppr +++| 02925 M00S02565.ppr +++| FAP4 LDM CASS RETURN NON-ROLLABLE FLAG 02926 M00S02566.ppr +++| SHN 1-7 02927 M00S02567.ppr +++| STD OR+4 02928 M00S02568.ppr +++| FAP5 ENDMS 02929 M00S02569.ppr +++| 02930 M00S02570.ppr +++|* RESTORE PP MEMORY AND RETURN TO CALLING PROGRAM. 02931 M00S02571.ppr +++| 02932 M00S02572.ppr +++|* LDN 0 SET RESPONSE 02933 M00S02573.ppr +++| STD OR 02934 M00S02574.ppr +++| LDD OA 02935 M00S02575.ppr +++| CWD OR 02936 M00S02576.ppr +++|* LDD MA RESTORE THE MESSAGE BUFFER 02937 M00S02577.ppr +++|* CWM MBSA,SX 02938 M00S02578.ppr +++| LDD EA RESTORE EXIT ADDRESS FOR FTN 02939 M00S02579.ppr +++| STM FTN 02940 M00S02580.ppr +++| LDC /1BP/PPSA1 02941 M00S02581.ppr +++| STD T1 02942 M00S02582.ppr +++| LDD SA 02943 M00S02583.ppr +++| SHN 14 02944 M00S02584.ppr +++| ADD SA+1 02945 M00S02585.ppr +++| CRM /1BP/FBB1,T1 02946 M00S02586.ppr +++|* LJM RST 02947 M00S02587.ppr +++| 02948 M00S02588.ppr +++| PRSA BSS 0 02949 M00S02589.ppr +++| LOC 10001-3*5 02950 M00S02590.ppr +++| RST CRM /1BP/FBB2,CM+4 02951 M00S02591.ppr +++| SBK PPSA CLEAR SAVE AREA INTERLOCK 02952 M00S02592.ppr +++| CWM RSTA,ON 02953 M00S02593.ppr +++| LJM FTN11 RETURN TO *FTN* 02954 M00S02594.ppr +++| 02955 M00S02595.ppr +++| 02956 M00S02596.ppr +++| RSTA BSSZ 5 ZERO WORD 02957 M00S02597.ppr +++| BSS 10000-* 02958 M00S02598.ppr +++| LOC *-10000 SPARES 02959 M00S02599.ppr +++| T0 CON RST-1 02960 M00S02600.ppr +++| LOC *O 02961 M00S02601.ppr +++| 02962 M00S02602.ppr +++| .A SET RST-/1BP/FBB1 02963 M00S02603.ppr +++| .RST EQU .A/5 WORD ADDRESS OF *RST* IN PP SAVE AREA 02964 M00S02604.ppr +++| ERRNZ .A-.RST*5 *RST* MUST BEGIN ON A WORD BOUNDARY 02965 M00S02605.ppr +++| CFM SPACE 4,10 02966 M00S02606.ppr +++|** CFM - CHECK FILE MODE. 02967 M00S02607.ppr +++|* 02968 M00S02608.ppr +++|* ENTRY (BFMS) = SYSTEM SECTOR. 02969 M00S02609.ppr +++|* (OR+2) = ACCESS MODE. 02970 M00S02610.ppr +++|* (OR+3) = SUBFUNCTION. 02971 M00S02611.ppr +++|* (T5) = EST ORDINAL. 02972 M00S02612.ppr +++|* 02973 M00S02613.ppr +++|* EXIT SYSTEM SECTOR UPDATED FOR NEW ACCESS MODE. 02974 M00S02614.ppr +++|* (OR+1) = 0, IF FILE ACCESS ALLOWED. 02975 M00S02615.ppr +++|* (OR+1) = 1, IF FILE ACCESS NOT ALLOWED. 02976 M00S02616.ppr +++|* (A) = (OR+1). 02977 M00S02617.ppr +++|* 02978 M00S02618.ppr +++|* USES CN, OR+1, T1, T2, T3, CM - CM+4. 02979 M00S02619.ppr +++|* 02980 M00S02620.ppr +++|* MACROS MONITOR, SFA. 02981 M00S02621.ppr +++| 02982 M00S02622.ppr +++| 02983 M00S02623.ppr +++| CFM22 MONITOR HNGM 02984 M00S02624.ppr +++| 02985 M00S02625.ppr +++| CFM SUBR ENTRY/EXIT 02986 M00S02626.ppr +++| LDM CASS SET CURRENT ACCESS MODE 02987 M00S02627.ppr +++| LPN 32 02988 M00S02628.ppr +++| STD T3 02989 M00S02629.ppr +++| SFA EST,T5 GET MST ADDRESS 02990 M00S02630.ppr +++| ADK EQDE 02991 M00S02631.ppr +++| CRD CM 02992 M00S02632.ppr +++| LDD CM+4 GET MACHINE INDEX FROM MST 02993 M00S02633.ppr +++| SHN 3 02994 M00S02634.ppr +++| ADN DULL 02995 M00S02635.ppr +++| CRD CM 02996 M00S02636.ppr +++| LDD CM+2 02997 M00S02637.ppr +++| LPN 17 02998 M00S02638.ppr +++| ADN 1 02999 M00S02639.ppr +++| STD CN 03000 M00S02640.ppr +++| SHN 2 03001 M00S02641.ppr +++| ADC UCSS 03002 M00S02642.ppr +++| RAD CN 03003 M00S02643.ppr +++| LDD OR+2 03004 M00S02644.ppr +++| LPN 17 03005 M00S02645.ppr +++| STD T1 03006 M00S02646.ppr +++| LDM CFMA,T1 SET PROCESSOR ADDRESS 03007 M00S02647.ppr +++| NJN CFM2 IF LEGAL MODE 03008 M00S02648.ppr +++| CFM1 UJN CFM22 HANG 03009 M00S02649.ppr +++| 03010 M00S02650.ppr +++| CFM2 STD T2 03011 M00S02651.ppr +++| SFA FNT,OR+4 READ FST ENTRY 03012 M00S02652.ppr +++| ADN FSTG 03013 M00S02653.ppr +++| CRD CM 03014 M00S02654.ppr +++| LDM CFMB,T1 SET BYTE NUMBERS 03015 M00S02655.ppr +++| STD T1 03016 M00S02656.ppr +++| LDD OR+3 03017 M00S02657.ppr +++|* LMN AFAS 03018 M00S02658.ppr +++| ERRNZ AFAS 03019 M00S02659.ppr +++| ZJN CFM4 IF *ATTACH* SUBFUNCTION 03020 M00S02660.ppr +++| 03021 M00S02661.ppr +++|* PROCESS *RETURN* SUBFUNCTION. 03022 M00S02662.ppr +++| 03023 M00S02663.ppr +++| LDD T1 03024 M00S02664.ppr +++| ZJN CFM3 IF A WRITEABLE MODE 03025 M00S02665.ppr +++| RAD CN 03026 M00S02666.ppr +++| SOI CN DECREMENT LOCAL COUNT 03027 M00S02667.ppr +++| SOM UCSS,T1 DECREMENT GLOBAL COUNT 03028 M00S02668.ppr +++| MJN CFM1 IF UNDERFLOW 03029 M00S02669.ppr +++| UJN CFM7 SET RESPONSE 03030 M00S02670.ppr +++| 03031 M00S02671.ppr +++| CFM3 LDD T3 03032 M00S02672.ppr +++| ZJN CFM1 IF WRITE BITS NOT SET 03033 M00S02673.ppr +++| SOI CN CLEAR LOCAL WRITE BIT 03034 M00S02674.ppr +++| LDN 0 CLEAR GLOBAL WRITE BITS 03035 M00S02675.ppr +++| STM CASS 03036 M00S02676.ppr +++| STD CM+4 CLEAR NON-ROLLABLE FLAG 03037 M00S02677.ppr +++| UJN CFM8 SET RESPONSE 03038 M00S02678.ppr +++| 03039 M00S02679.ppr +++|* PROCESS *ATTACH* SUBFUNCTION. 03040 M00S02680.ppr +++| 03041 M00S02681.ppr +++| CFM4 LDD T3 03042 M00S02682.ppr +++| LJM 0,T2 JUMP TO PROCESSOR 03043 M00S02683.ppr +++| 03044 M00S02684.ppr +++|* WRITE ACCESS REQUESTED. 03045 M00S02685.ppr +++| 03046 M00S02686.ppr +++| CFM5 ADM UCSS+1 CHECK IF ANY ACTIVE USERS ON FILE 03047 M00S02687.ppr +++| ADM UCSS+2 03048 M00S02688.ppr +++| ADM UCSS+3 03049 M00S02689.ppr +++| ADM UCSS+4 03050 M00S02690.ppr +++| NJN CFM11 IF ACCESS NOT ALLOWED 03051 M00S02691.ppr +++| LDN 32 SET WRITE USER 03052 M00S02692.ppr +++| 03053 M00S02693.ppr +++|* SET NEW FILE MODE. 03054 M00S02694.ppr +++| 03055 M00S02695.ppr +++| CFM6 RAM CASS SET NEW FILE MODE 03056 M00S02696.ppr +++| AOI CN SET LOCAL WRITE FLAG 03057 M00S02697.ppr +++| LDD OR+2 03058 M00S02698.ppr +++| SHN 21-13 03059 M00S02699.ppr +++| CFM7 PJN CFM9 IF NON-ROLLABLE OPTION NOT SPECIFIED 03060 M00S02700.ppr +++| LDN 2 SET NON-ROLLABLE FLAG 03061 M00S02701.ppr +++| STD CM+4 03062 M00S02702.ppr +++| SHN 6 03063 M00S02703.ppr +++| RAM CASS 03064 M00S02704.ppr +++| CFM8 SFA FNT,OR+4 UPDATE FST ENTRY 03065 M00S02705.ppr +++| ADN FSTG 03066 M00S02706.ppr +++| CWD CM 03067 M00S02707.ppr +++| CFM9 LDN 0 03068 M00S02708.ppr +++| UJN CFM16 SET RESPONSE 03069 M00S02709.ppr +++| 03070 M00S02710.ppr +++|* MODIFY ACCESS REQUESTED. 03071 M00S02711.ppr +++| 03072 M00S02712.ppr +++| CFM10 ADM UCSS+1 CHECK FOR W, M, A, U, R/A, R/U OR R USERS 03073 M00S02713.ppr +++| ADM UCSS+2 03074 M00S02714.ppr +++| ADM UCSS+3 03075 M00S02715.ppr +++| CFM11 NJN CFM15 IF ACCESS NOT ALLOWED 03076 M00S02716.ppr +++| LDN 12 SET MODIFY USER 03077 M00S02717.ppr +++| CFM12 UJN CFM6 SET FILE MODE 03078 M00S02718.ppr +++| 03079 M00S02719.ppr +++|* APPEND ACCESS REQUESTED. 03080 M00S02720.ppr +++| 03081 M00S02721.ppr +++| CFM13 ADM UCSS+1 CHECK FOR W, M, A, U, R/U OR R USERS 03082 M00S02722.ppr +++| ADM UCSS+2 03083 M00S02723.ppr +++| NJN CFM15 IF ACCESS NOT ALLOWED 03084 M00S02724.ppr +++| LDN 2 SET APPEND USER 03085 M00S02725.ppr +++| UJN CFM12 SET NEW FILE MODE 03086 M00S02726.ppr +++| 03087 M00S02727.ppr +++|* UPDATE ACCESS REQUESTED. 03088 M00S02728.ppr +++| 03089 M00S02729.ppr +++| CFM14 ADM UCSS+1 CHECK FOR W, M, A, U, R/A OR R USERS 03090 M00S02730.ppr +++| ADM UCSS+3 03091 M00S02731.ppr +++| NJN CFM15 IF ACCESS NOT ALLOWED 03092 M00S02732.ppr +++| LDN 10 03093 M00S02733.ppr +++| UJN CFM12 SET NEW FILE MODE 03094 M00S02734.ppr +++| 03095 M00S02735.ppr +++|* ACCESS NOT ALLOWED. 03096 M00S02736.ppr +++| 03097 M00S02737.ppr +++| CFM15 LDN 1 SET FILE BUSY RESPONSE 03098 M00S02738.ppr +++| CFM16 STD OR+1 03099 M00S02739.ppr +++| LJM CFMX RETURN 03100 M00S02740.ppr +++| 03101 M00S02741.ppr +++|* READ OR EXECUTE ACCESS REQUESTED. 03102 M00S02742.ppr +++| 03103 M00S02743.ppr +++|* LPN 32 DO NOT ALLOW W, M, A OR U USERS 03104 M00S02744.ppr +++| CFM17 NJN CFM15 IF ACCESS NOT ALLOWED 03105 M00S02745.ppr +++| 03106 M00S02746.ppr +++|* INCREMENT USER COUNTS. 03107 M00S02747.ppr +++| 03108 M00S02748.ppr +++| CFM18 LDD T1 GET BYTE NUMBERS 03109 M00S02749.ppr +++| RAD CN 03110 M00S02750.ppr +++| LDM UCSS,T1 03111 M00S02751.ppr +++| LMC 7777 03112 M00S02752.ppr +++| ZJN CFM15 IF USER COUNT OVERFLOW 03113 M00S02753.ppr +++| AOM UCSS,T1 INCREMENT GLOBAL COUNT 03114 M00S02754.ppr +++| AOI CN INCREMENT LOCAL COUNT 03115 M00S02755.ppr +++| LDN 0 RETURN FILE ATTACHED RESPONSE 03116 M00S02756.ppr +++| UJN CFM16 RETURN 03117 M00S02757.ppr +++| 03118 M00S02758.ppr +++| 03119 M00S02759.ppr +++|* READ / ALLOW MODIFY ACCESS REQUESTED. 03120 M00S02760.ppr +++| 03121 M00S02761.ppr +++| CFM19 LPN 20 DO NOT ALLOW W USERS 03122 M00S02762.ppr +++| NJN CFM17 IF ACCESS NOT ALLOWED 03123 M00S02763.ppr +++| UJN CFM18 INCREMENT USER COUNTS 03124 M00S02764.ppr +++| 03125 M00S02765.ppr +++|* READ / ALLOW APPEND ACCESS REQUESTED. 03126 M00S02766.ppr +++| 03127 M00S02767.ppr +++| CFM20 LPN 30 DO NOT ALLOW W, M OR U USERS 03128 M00S02768.ppr +++| NJN CFM17 IF ACCESS NOT ALLOWED 03129 M00S02769.ppr +++| UJN CFM18 INCREMENT USER COUNTS 03130 M00S02770.ppr +++| 03131 M00S02771.ppr +++|* READ / ALLOW UPDATE ACCESS REQUESTED. 03132 M00S02772.ppr +++| 03133 M00S02773.ppr +++| CFM21 LPN 22 DO NOT ALLOW W, M OR A USERS 03134 M00S02774.ppr +++| NJN CFM17 IF ACCESS NOT ALLOWED 03135 M00S02775.ppr +++| UJN CFM18 INCREMENT USER COUNTS 03136 M00S02776.ppr +++| 03137 M00S02777.ppr +++| 03138 M00S02778.ppr +++| CFMA BSS 0 FILE ATTACH PROCESSORS 03139 M00S02779.ppr +++| LOC 0 03140 M00S02780.ppr +++| CON CFM5 WRITE 03141 M00S02781.ppr +++| CON CFM17 READ 03142 M00S02782.ppr +++| CON CFM13 APPEND 03143 M00S02783.ppr +++| CON CFM17 EXECUTE 03144 M00S02784.ppr +++| CON 0 NULL 03145 M00S02785.ppr +++| CON CFM10 MODIFY 03146 M00S02786.ppr +++| CON CFM19 READ / ALLOW MODIFY 03147 M00S02787.ppr +++| CON CFM20 READ / ALLOW APPEND 03148 M00S02788.ppr +++| CON CFM14 UPDATE 03149 M00S02789.ppr +++| CON CFM21 READ / ALLOW UPDATE 03150 M00S02790.ppr +++| ERRNZ *-PTLM 03151 M00S02791.ppr +++| LOC *O 03152 M00S02792.ppr +++| 03153 M00S02793.ppr +++| 03154 M00S02794.ppr +++| CFMB BSS 0 FILE RETURN FLAGS 03155 M00S02795.ppr +++| LOC 0 03156 M00S02796.ppr +++| CON 0 WRITE 03157 M00S02797.ppr +++| CON 1 READ 03158 M00S02798.ppr +++| CON 0 APPEND 03159 M00S02799.ppr +++| CON 1 EXECUTE 03160 M00S02800.ppr +++| CON 0 NULL 03161 M00S02801.ppr +++| CON 0 MODIFY 03162 M00S02802.ppr +++| CON 4 READ / ALLOW MODIFY 03163 M00S02803.ppr +++| CON 3 READ / ALLOW APPEND 03164 M00S02804.ppr +++| CON 0 UPDATE 03165 M00S02805.ppr +++| CON 2 READ / ALLOW UPDATE 03166 M00S02806.ppr +++| ERRNZ *-PTLM 03167 M00S02807.ppr +++| LOC *O 03168 M00S02808.ppr +++| ERR SPACE 4,10 03169 M00S02809.ppr +++|*** ERR - READ/WRITE ERROR HANDLER. 03170 M00S02810.ppr +++|* 03171 M00S02811.ppr +++|* ENTRY (A) = R, IF READ ERROR. 03172 M00S02812.ppr +++|* (A) = W, IF WRITE ERROR. 03173 M00S02813.ppr +++|* (T5) = EQUIPMENT. 03174 M00S02814.ppr +++|* 03175 M00S02815.ppr +++|* EXIT TO MAIN PROGRAM TO RETRY. 03176 M00S02816.ppr +++| 03177 M00S02817.ppr +++| 03178 M00S02818.ppr +++| ERR BSS 0 ENTRY
| Line S02819 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03179 M01S02819.ns2553 ---| STD T1 03180 M01S02820.ns2553 ---| ADC 2L 03181 M01S02821.ns2553 ---| STM ERRA+5 03182 M01S02822.ns2553 ---| LDD T5 CONVERT UPPER TWO DIGITS OF EST ORDINAL
| Line S00084 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03183 M01S00084.ns2553 +++| STD EF 03184 M01S00085.ns2553 +++| SHN 6 03185 M01S00086.ns2553 +++| LMN 1R, 03186 M01S00087.ns2553 +++| STM ERRA+11 03187 M01S00088.ns2553 +++| LMC 2RR, 03188 M01S00089.ns2553 +++| NJN ERR1 IF NOT READ ERROR 03189 M01S00090.ns2553 +++| LDM UERR ENABLE *ENDMS* FOR ERROR PROCESSING 03190 M01S00091.ns2553 +++| LMC EPDE-EPSM 03191 M01S00092.ns2553 +++| STM UERR 03192 M01S00093.ns2553 +++| SETMS =,IO,(NS,DF,SM) 03193 M01S00094.ns2553 +++| SHN 21-10 03194 M01S00095.ns2553 +++| ERRNZ EPDE-EPSM-1S8 CODE ASSUMES VALUE 03195 M01S00096.ns2553 +++| PJP FAP1.3 IF *ENDMS* NOW ENABLED 03196 M01S00097.ns2553 +++| ERR1 ENDMS 03197 M01S00098.ns2553 +++| LDD T5 CONVERT UPPER TWO DIGITS OF EST ORDINAL 03198 M00S02823.ppr +++| SHN -3 03199 M00S02824.ppr +++| RJM C2D
| Line S02825 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03200 M01S02825.ns2553 ---| STM ERRA+10
| Line S00099 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03201 M01S00099.ns2553 +++| STM ERRA+1 03202 M00S02826.ppr +++| LDD T5 CONVERT LOWER DIGIT OF EST ORDINAL 03203 M00S02827.ppr +++| LPN 7 03204 M00S02828.ppr +++| SHN 6 03205 M00S02829.ppr +++| ADC 2R0,
| Line S02830 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03206 M01S02830.ns2553 ---| STM ERRA+11
| Line S00100 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03207 M01S00100.ns2553 +++| STM ERRA+2 03208 M00S02831.ppr +++| LDM ERRA+13+3 TERMINATE FILENAME 03209 M00S02832.ppr +++| SCN 17 03210 M00S02833.ppr +++| STM ERRA+13+3 03211 M00S02834.ppr +++| LDD IR+1 03212 M00S02835.ppr +++| LPN 37
| Line S02836 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03213 M01S02836.ns2553 ---| NJN ERR1 IF NOT AT CONTROL POINT 0
| Line S00101 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03214 M01S00101.ns2553 +++| NJN ERR2 IF NOT AT CONTROL POINT 0 03215 M00S02837.ppr +++| LDN NCPL 03216 M00S02838.ppr +++| CRD CM 03217 M00S02839.ppr +++| AOD CM+1
| Line S02840 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03218 M01S02840.ns2553 ---| ERR1 SHN 7
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03219 M01S00102.ns2553 +++| ERR2 SHN 7 03220 M01S00103.ns2553 +++| STD CP 03221 M00S02841.ppr +++| ADN MS2W 03222 M00S02842.ppr +++| CWM ERRA,TR
| Line S02843 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03223 M01S02843.ns2553 ---| LDD T1 03224 M01S02844.ns2553 ---| LMN 1RR 03225 M01S02845.ns2553 ---| ZJN ERR2 IF READ ERROR 03226 M01S02846.ns2553 ---| LJM FAP3 RETRY WRITE
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03227 M01S00104.ns2553 +++| LDK INWL CHECK FOR DEADSTART IN PROGRESS 03228 M01S00105.ns2553 +++| CRD CM 03229 M01S00106.ns2553 +++| LDD CM+3 03230 M01S00107.ns2553 +++| LPN 12 03231 M01S00108.ns2553 +++| ZJN ERR3 IF DEADSTART COMPLETE, SCHEDULING ENABLED 03232 M01S00109.ns2553 +++| STM ERRB FORCE RETRY 03233 M01S00110.ns2553 +++| UJN ERR4 DELAY 03234 M01S00111.ns2553 +++| 03235 M01S00112.ns2553 +++| ERR3 LDD SA 03236 M01S00113.ns2553 +++| SHN 14 03237 M01S00114.ns2553 +++| LMD SA+1 03238 M01S00115.ns2553 +++| SBN 7 CHECK RETURN-ON-INACCESSIBLE IN CALL 03239 M01S00116.ns2553 +++| CRD CM 03240 M01S00117.ns2553 +++| LDD CM+1 03241 M01S00118.ns2553 +++| SHN 21-11 03242 M01S00119.ns2553 +++| MJP FAP5 IF RETURN-ON-INACCESSIBLE SET 03243 M01S00120.ns2553 +++| ERR4 DELAY 4 03244 M01S00121.ns2553 +++| PAUSE 03245 M01S00122.ns2553 +++| LDD CM+1 03246 M01S00123.ns2553 +++| LMN ORET 03247 M01S00124.ns2553 +++| NJN ERR5 IF NOT OPERATOR *OVERRIDE* 03248 M01S00125.ns2553 +++| MONITOR DPPM 03249 M01S00126.ns2553 +++| LJM PPR EXIT 03250 M01S00127.ns2553 +++| 03251 M01S00128.ns2553 +++| ERR5 LDD MS 03252 M01S00129.ns2553 +++| SHN 3 03253 M01S00130.ns2553 +++| ADN DALL 03254 M01S00131.ns2553 +++| CRD CM 03255 M01S00132.ns2553 +++| LDD CM 03256 M01S00133.ns2553 +++| SHN 21-7 03257 M01S00134.ns2553 +++| ERRB MJN ERR4 IF STILL INACCESSIBLE 03258 M01S00135.ns2553 +++|* PSN (DEADSTART IN PROGRESS) 03259 M01S00136.ns2553 +++| 03260 M01S00137.ns2553 +++|* RESTART REQUEST. 03261 M01S00138.ns2553 +++| 03262 M01S00139.ns2553 +++| LDN 0 03263 M01S00140.ns2553 +++| STD CM 03264 M01S00141.ns2553 +++| LDD CP 03265 M01S00142.ns2553 +++| ADN MS2W 03266 M01S00143.ns2553 +++| CWD CM CLEAR ERROR MESSAGE 03267 M01S00144.ns2553 +++| LJM FAP1.2 RETRY REQUEST 03268 M00S02847.ppr +++|
| Line S02848 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03269 M01S02848.ns2553 ---| ERR2 ENDMS 03270 M01S02849.ns2553 ---| LJM FAP1.2 RETRY READ 03271 M00S02850.ppr +++|
| Line S02851 Modification History | |
|---|---|
M01 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03272 M01S02851.ns2553 ---| ERRA DATA C*1FA ERROR, M, EQXXX, FILENAM*
| Line S00145 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 03273 M01S00145.ns2553 +++| ERRA DATA C*EQXXX, 1FA ERROR, M, FILENAM* 03274 M00S02852.ppr +++| SPACE 4,10 03275 M00S02853.ppr +++| QUAL$ SET 0 03276 M00S02854.ppr +++| COMMON SPACE 4,10 03277 M00S02855.ppr +++|** COMMON DECKS. 03278 M00S02856.ppr +++| 03279 M00S02857.ppr +++| 03280 M00S02858.ppr +++|*CALL COMPC2D 03281 M00S02859.ppr +++| FNT$ SET 1 ASSEMBLE FNT ADDRESSING IN *COMPGFP* 03282 M00S02860.ppr +++| IFP$ EQU 1 ASSEMBLE REMOTE INITIALIZATION 03283 M00S02861.ppr +++|*CALL COMPGFP 03284 M00S02862.ppr +++| SPACE 4,10 03285 M00S02863.ppr +++|** ASSEMBLE *COMPGFP* INITIALIZATION CODE. 03286 M00S02864.ppr +++| 03287 M00S02865.ppr +++| IFP HERE 03288 M00S02866.ppr +++| OVERFLOW PPFW,MSFW+/1BP/PPSA2*5,CMR
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03289 M01S00064.273l780 +++| 1CP TTL PPR/1CP - SET CONTROL POINT ASSIGNMENT. 03290 M01S00065.273l780 +++| TITLE 03291 M01S00066.273l780 +++| QUAL 1CP 03292 M01S00067.273l780 +++| IDENT 1CP,CCP 03293 M01S00068.273l780 +++|*COMMENT PPR - SET CONTROL POINT ASSIGNMENT.
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
M02 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 03294 M02S00069.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1986.
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 03295 M01S00009.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 03296 M01S00070.273l780 +++| 1CP SPACE 4,10 03297 M01S00071.273l780 +++|*** 1CP - SET CONTROL POINT ASSIGNMENT. 03298 M01S00072.273l780 +++|* 03299 M01S00073.273l780 +++|* G. S. YODER 90/06/04. 03300 M01S00074.273l780 +++| 1CP SPACE 4,10 03301 M01S00075.273l780 +++|*** *1CP* IS CALLED BY *CPUMTR* TO COMPLETE THE PROCESSING 03302 M01S00076.273l780 +++|* OF THE *CCAM* FUNCTION. *1CP* IS EXECUTED VIA THE *BOTM* 03303 M01S00077.273l780 +++|* *PPR* FUNCTION AND SETS ADDRESSES IN *PPR* FOR THE NEW 03304 M01S00078.273l780 +++|* CONTROL POINT BEFORE RETURNING TO THE CALLER. 03305 M01S00079.273l780 +++|* 03306 M01S00080.273l780 +++|* NOTE - THIS PROGRAM MUST BE CM RESIDENT. 03307 M01S00081.273l780 +++| 1CP SPACE 4,10 03308 M01S00082.273l780 +++|*** ENTRY CONDITIONS. 03309 M01S00083.273l780 +++|* 03310 M01S00084.273l780 +++|* (CM+1 - CM+2) = FWA OF *1CP* IN *RPL*. 03311 M01S00085.273l780 +++|* (CM+3 - CM+4) = *SBFP + 2* ADDRESS IN EXTENDED PP 03312 M01S00086.273l780 +++|* COMMUNICATION BLOCK. 03313 M01S00087.273l780 +++| 1CP SPACE 4,10 03314 M01S00088.273l780 +++|*** EXIT CONDITIONS. 03315 M01S00089.273l780 +++|* 03316 M01S00090.273l780 +++|* CONTROL POINT ACCESS ADDRESSES UPDATED. 03317 M01S00091.273l780 +++|* (CM - CM+4) = OUTPUT REGISTER. 03318 M01S00092.273l780 +++|* TO *FTN1.0* TO RETURN TO CALLER OF *FTN*. 03319 M01S00093.273l780 +++| 1CP SPACE 4,10 03320 M01S00094.273l780 +++|**** DIRECT LOCATION ASSIGNMENTS. 03321 M01S00095.273l780 +++| 03322 M01S00096.273l780 +++| 03323 M01S00097.273l780 +++| CN EQU 20 CM WORD BUFFER (5 LOCATIONS) 03324 M01S00098.273l780 +++| 03325 M01S00099.273l780 +++|**** 03326 M01S00100.273l780 +++| 03327 M01S00101.273l780 +++| 03328 M01S00102.273l780 +++| ORG 10001-3*5 03329 M01S00103.273l780 +++| 03330 M01S00104.273l780 +++| 03331 M01S00105.273l780 +++| CCP BSS 0 ENTRY 03332 M01S00106.273l780 +++| LDD CM+3 SET DIRECT CELL SAVE ADDRESS 03333 M01S00107.273l780 +++| SHN 14 03334 M01S00108.273l780 +++| ADD CM+4 03335 M01S00109.273l780 +++| CWD CN SAVE (CN - CN+4) 03336 M01S00110.273l780 +++| SBN 1 READ PARAMETERS 03337 M01S00111.273l780 +++| CRD CN 03338 M01S00112.273l780 +++| LDD CN SET CP/PCP NUMBER FOR MOVE CHECK 03339 M01S00113.273l780 +++| STM FTNG 03340 M01S00114.273l780 +++| LDC 3*100 SET READ OFFSET 03341 M01S00115.273l780 +++| LJM FTN1.2 READ AND EXECUTE NEXT SEGMENT 03342 M01S00116.273l780 +++| BSSZ 10000B-* SPARE SPACE 03343 M01S00117.273l780 +++| CON CCP-1 (T0+1) BECOMES (P) 03344 M01S00118.273l780 +++| 03345 M01S00119.273l780 +++| LOC 10001-3*5 03346 M01S00120.273l780 +++| 03347 M01S00121.273l780 +++| CCP1 LDD CN+1 SET *FLSW* ADDRESS 03348 M01S00122.273l780 +++| LMC LDCI 03349 M01S00123.273l780 +++| STM FTNC 03350 M01S00124.273l780 +++| LDD CN+2 03351 M01S00125.273l780 +++| STM FTNC+1 03352 M01S00126.273l780 +++| LDD CN+4 SET *CP* 03353 M01S00127.273l780 +++| STD CP 03354 M01S00128.273l780 +++| LDC 6*100 SET READ OFFSET 03355 M01S00129.273l780 +++| LJM FTN1.2 READ AND EXECUTE NEXT SEGMENT 03356 M01S00130.273l780 +++| BSSZ 10000B-* SPARE SPACE 03357 M01S00131.273l780 +++| CON CCP1-1 (T0)+1 BECOMES (P) 03358 M01S00132.273l780 +++| 03359 M01S00133.273l780 +++| LOC 10001-3*5 03360 M01S00134.273l780 +++| 03361 M01S00135.273l780 +++| CCP2 LDD CM+3 SET DIRECT CELL SAVE ADDRESS 03362 M01S00136.273l780 +++| SHN 14 03363 M01S00137.273l780 +++| ADD CM+4 03364 M01S00138.273l780 +++| CRD CN RESTORE (CN - CN+4) 03365 M01S00139.273l780 +++| SBN 2 READ OUTPUT REGISTER 03366 M01S00140.273l780 +++| CRD CM 03367 M01S00141.273l780 +++| LJM FTN1.0 RETURN TO *FTN* CALLER 03368 M01S00142.273l780 +++| BSSZ 10000B-* SPARE SPACE 03369 M01S00143.273l780 +++| CON CCP2-1 (T0)+1 BECOMES (P) 03370 M00S02867.ppr +++| TTL PPR/1RP - RELOAD PP RESIDENT. 03371 M00S02868.ppr +++| TITLE 03372 M00S02869.ppr +++| QUAL 1RP 03373 M00S02870.ppr +++| IDENT 1RP,RLP 03374 M00S02871.ppr +++|*COMMENT PPR - RELOAD PP RESIDENT.
| Line S02872 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 03375 M01S02872.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1973.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 03376 M01S00010.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 03377 M00S02873.ppr +++| SPACE 4 03378 M00S02874.ppr +++|*** 1RP - RELOAD PP RESIDENT. 03379 M00S02875.ppr +++|* G. R. MANSFIELD. 70/07/17. 03380 M00S02876.ppr +++|* R. E. TATE. 73/01/05. 03381 M00S02877.ppr +++| SPACE 4 03382 M00S02878.ppr +++|*** 1RP MAY BE CALLED BY A PP TO RESTORE THAT PP-S COPY 03383 M00S02879.ppr +++|* OF PP RESIDENT. WHEN 1RP IS READY TO TRANSMIT PP RESIDENT, 03384 M00S02880.ppr +++|* BYTE 2 OF 1RP-S INPUT REGISTER IS SET TO 7777B. 1RP THEN 03385 M00S02881.ppr +++|* WAITS FOR BYTE 2 OF THE INPUT REGISTER TO BE SET TO 0. 03386 M00S02882.ppr +++|* IF THIS DOES NOT TAKE PLACE WITHIN 1 SECOND, 1RP EXITS, 03387 M00S02883.ppr +++|* THUS ABORTING THE LOAD. THE DATA TRANSFER IS MADE 6 CM WORDS 03388 M00S02884.ppr +++|* AT A TIME THROUGH THE MESSAGE BUFFER. BYTE 4 OF THE CALLING 03389 M00S02885.ppr +++|* PPU,S OUTPUT REGISTER IS USED AS THE FULL/EMPTY FLAG. END 03390 M00S02886.ppr +++|* OF DATA IS SIGNIFIED BY A LESS THAN 6 WORD TRANSFER. 03391 M00S02887.ppr +++|* THE CALLING PROGRAM CLEARS THE OUTPUT REGISTER TO INDICATE 03392 M00S02888.ppr +++|* EMPTY BUFFER AND *1RP* SETS BYTE 4 TO INDICATE FULL BUFFER. 03393 M00S02889.ppr +++| SPACE 4 03394 M00S02890.ppr +++|*** CALL. 03395 M00S02891.ppr +++|* 03396 M00S02892.ppr +++|* 03397 M00S02893.ppr +++|*T 18/1RP,6/0,12/0,12/0,12/IA
Figure
03398 M00S02894.ppr +++|* IA = CALLER-S INPUT REGISTER ADDRESS. 03399 M00S02895.ppr +++|* 03400 M00S02896.ppr +++|* CALLER,S OUTPUT REGISTER. 03401 M00S02897.ppr +++|* 03402 M00S02898.ppr +++|*T OR 12/0,12/0,12/0,12/0,12/NOOC
Figure OR
03403 M00S02899.ppr +++|* 03404 M00S02900.ppr +++|* N = 4 - BUFFER FULL. 03405 M00S02901.ppr +++|* C = NUMBER OF WORDS. 03406 M00S02902.ppr +++| SPACE 4 03407 M00S02903.ppr +++|*** DAYFILE MESSAGES. 03408 M00S02904.ppr +++|* 03409 M00S02905.ppr +++|* 03410 M00S02906.ppr +++|* NONE. 03411 M00S02907.ppr +++| SPACE 4 03412 M00S02908.ppr +++|*** OPERATOR MESSAGES. 03413 M00S02909.ppr +++|* 03414 M00S02910.ppr +++|* 03415 M00S02911.ppr +++|* NONE. 03416 M00S02912.ppr +++| SPACE 4 03417 M00S02913.ppr +++|**** DIRECT LOCATION ASSIGNMENTS. 03418 M00S02914.ppr +++| 03419 M00S02915.ppr +++| 03420 M00S02916.ppr +++| CN EQU 20 CM WORD BUFFER (5 LOCATIONS) 03421 M00S02917.ppr +++| 03422 M00S02918.ppr +++|**** 03423 M00S02919.ppr +++| RLP TITLE MAIN PROGRAM. 03424 M00S02920.ppr +++|*** RLP - MAIN PROGRAM. 03425 M00S02921.ppr +++| 03426 M00S02922.ppr +++| 03427 M00S02923.ppr +++| ORG PPFW 03428 M00S02924.ppr +++| RLP RJM PRS PRESET PROGRAM 03429 M00S02925.ppr +++| 03430 M00S02926.ppr +++|* INITIATE TRANSMISSION. 03431 M00S02927.ppr +++| 03432 M00S02928.ppr +++| 03433 M00S02929.ppr +++| LCN 0 SET TRANSMIT REQUEST 03434 M00S02930.ppr +++| STD IR+2 03435 M00S02931.ppr +++| LDD IA 03436 M00S02932.ppr +++| CWD IR 03437 M00S02933.ppr +++| LCN 0 SET TIMER 03438 M00S02934.ppr +++| STD T1 03439 M00S02935.ppr +++| RLP1 SOD T1 03440 M00S02936.ppr +++| ZJN RLP4 IF TIME UP 03441 M00S02937.ppr +++| LDD IA READ RESPONSE 03442 M00S02938.ppr +++| CRD CM 03443 M00S02939.ppr +++| LDD CM+2 03444 M00S02940.ppr +++| NJN RLP1 IF RECEIVE NOT READY 03445 M00S02941.ppr +++| 03446 M00S02942.ppr +++|* TRANSMIT *PPR*. 03447 M00S02943.ppr +++| 03448 M00S02944.ppr +++| RLP2 LDN 77 DELAY 03449 M00S02945.ppr +++| SBN 1 03450 M00S02946.ppr +++| NJN *-1 03451 M00S02947.ppr +++| LDD IR+3 CHECK OUTPUT REGISTER 03452 M00S02948.ppr +++| CRD CM 03453 M00S02949.ppr +++| LDD CM+4 03454 M00S02950.ppr +++| NJN RLP2 IF NOT READY FOR NEXT WORD 03455 M00S02951.ppr +++| LDN 5*6 UPDATE BUFFER ADDRESS 03456 M00S02952.ppr +++| RAM RLPA 03457 M00S02953.ppr +++| ADC -MSFW 03458 M00S02954.ppr +++| PJN RLP3 IF TRANSFER COMPLETE 03459 M00S02955.ppr +++| LDD T6 TRANSFER DATA BLOCK TO MESSAGE BUFFER 03460 M00S02956.ppr +++| CWM 100-5*6,T7 03461 M00S02957.ppr +++| RLPA EQU *-1 03462 M00S02958.ppr +++| SBN 7 SET FULL FLAG 03463 M00S02959.ppr +++| CWM RLPD,ON 03464 M00S02960.ppr +++| UJN RLP2 LOOP 03465 M00S02961.ppr +++| RLP3 LCN 6 SET LAST TRANSFER FLAG 03466 M00S02962.ppr +++| RAM RLPD+4 03467 M00S02963.ppr +++| LDD IR+3 SET RANSFER COMPLETE FLAG 03468 M00S02964.ppr +++| CWM RLPD,ON 03469 M00S02965.ppr +++| 03470 M00S02966.ppr +++| RLP4 LDC * RESET EXCHANGE ADDRESS 03471 M00S02967.ppr +++| RLPB EQU *-1 03472 M00S02968.ppr +++| STM XJ3 03473 M00S02969.ppr +++| STM XJ4 03474 M00S02970.ppr +++| LDC * 03475 M00S02971.ppr +++| RLPC EQU *-1 03476 M00S02972.ppr +++| STM XJ3+1 03477 M00S02973.ppr +++| STM XJ4+1 03478 M00S02974.ppr +++| ADN 6 RESET EXCHANGE PACKAGE MA ADDRESS 03479 M00S02975.ppr +++| STM XJ2+1 03480 M00S02976.ppr +++| SHN -14 03481 M00S02977.ppr +++| ADM RLPB 03482 M00S02978.ppr +++| STM XJ2 03483 M00S02979.ppr +++| 03484 M00S02980.ppr +++|* DROP PP. 03485 M00S02981.ppr +++| 03486 M00S02982.ppr +++| MONITOR DPPM DROP PP 03487 M00S02983.ppr +++| LJM PPR EXIT TO PP RESIDENT 03488 M00S02984.ppr +++| 03489 M00S02985.ppr +++| RLPD CON 0 FULL FLAG WORD 03490 M00S02986.ppr +++| CON 0 03491 M00S02987.ppr +++| CON 0 03492 M00S02988.ppr +++| CON 0 03493 M00S02989.ppr +++| CON 4006 03494 M00S02990.ppr +++| PRS SPACE 4 03495 M00S02991.ppr +++|** PRS - PRESET PROGRAM. 03496 M00S02992.ppr +++| 03497 M00S02993.ppr +++| 03498 M00S02994.ppr +++| PRS SUBR ENTRY/EXIT 03499 M00S02995.ppr +++| LDN 6 SET CONSTANT 03500 M00S02996.ppr +++| STD T7 03501 M00S02997.ppr +++| LDD IR+4 SET OUTPUT REGISTER ADDRESS 03502 M00S02998.ppr +++| ADN 1 03503 M00S02999.ppr +++| STD IR+3 03504 M00S03000.ppr +++| ADN 1 SET MESSAGE BUFFER ADDRESS 03505 M00S03001.ppr +++| STD T6 03506 M00S03002.ppr +++| LDM XJ3 SAVE EXCHANGE PACKAGE 03507 M00S03003.ppr +++| STM RLPB 03508 M00S03004.ppr +++| LDM XJ3+1 03509 M00S03005.ppr +++| STM RLPC 03510 M00S03006.ppr +++| LDN PXPP READ PP EXCHANGE STATUS 03511 M00S03007.ppr +++| CRD CN 03512 M00S03008.ppr +++| LDN PPCP READ PP COMMUNICATION POINTER 03513 M00S03009.ppr +++| CRD CM 03514 M00S03010.ppr +++| LDD IR+4 SET PP NUMBER * 21 03515 M00S03011.ppr +++| SBD CM+4 03516 M00S03012.ppr +++| SBN 20 03517 M00S03013.ppr +++| SHN -3 03518 M00S03014.ppr +++| STD T1 03519 M00S03015.ppr +++| SHN 4 03520 M00S03016.ppr +++| ADD T1 03521 M00S03017.ppr +++| RAD CN+4 SET EXCHANGE ADDRESS 03522 M00S03018.ppr +++| STM XJ3+1 03523 M00S03019.ppr +++| STM XJ4+1 03524 M00S03020.ppr +++| SHN -14 03525 M00S03021.ppr +++| RAD CN+3 03526 M00S03022.ppr +++| LMC LDCI 03527 M00S03023.ppr +++| STM XJ3 03528 M00S03024.ppr +++| STM XJ4 03529 M00S03025.ppr +++| LDD CN+4 SET EXCHANGE PACKAGE MA ADDRESS 03530 M00S03026.ppr +++| ADN 6 03531 M00S03027.ppr +++| STM XJ2+1 03532 M00S03028.ppr +++| SHN -14
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/ppr.001.txt · Last modified: by 127.0.0.1