cdc:nos2.source:opl.opl871:deck:rec.001
Deck REC Part 001
29 Modifications
Listing Sections
- Deck REC Start
- Deck REC Part 1 (Line 1777)
- Deck REC Part 2 (Line 3691)
- Deck REC Part 3 (Line 5164)
Source
Seq # *Modification Id* Act ----------------------------+ 01777 M00S01601.rec +++| LDD T3 01778 M00S01602.rec +++| STM FLSS+1 01779 M00S01603.rec +++| RJM TLM TERMINATE LAST MESSAGE 01780 M00S01604.rec +++| LDC SBUF 01781 M00S01605.rec +++| RJM RDS READ EOI SECTOR 01782 M00S01606.rec +++| MJN IDF9 IF READ ERROR 01783 M00S01607.rec +++| LDM SBUF 01784 M00S01608.rec +++| ADM SBUF+1 01785 M00S01609.rec +++| IDF8 NJN IDF9 IF NOT EOI 01786 M00S01610.rec +++| RJM FMM FORMAT MESSAGES 01787 M00S01611.rec +++| LJM IDF15 01788 M00S01612.rec +++| 01789 M00S01613.rec +++|* IF NO TRACK ASSIGNED, ERROR IN SYSTEM SECTOR 01790 M00S01614.rec +++|* OR ERROR IN EOI SECTOR. 01791 M00S01615.rec +++| 01792 M00S01616.rec +++| IDF9 ENDMS 01793 M00S01617.rec +++| IDF10 RJM IEM ISSUE ERROR MESSAGE 01794 M00S01618.rec +++| 01795 M00S01619.rec +++|* CREATE A NEW DAYFILE. 01796 M00S01620.rec +++| 01797 M00S01621.rec +++| IDF11 LDM IDFD,CN+3 01798 M00S01622.rec +++| ZJN IDF12 IF NO TRACK ASSIGNED 01799 M00S01623.rec +++| STD CM+2 01800 M00S01624.rec +++| LDD T5 01801 M00S01625.rec +++| STD CM+1 01802 M00S01626.rec +++| MONITOR DTKM DROP TRACKS 01803 M00S01627.rec +++| IDF12 LDN ZERL 01804 M00S01628.rec +++| CRD CM 01805 M00S01629.rec +++| LDD T5 SET EST ORDINAL 01806 M00S01630.rec +++| STD CM+1 01807 M00S01631.rec +++| LMC 4000 01808 M00S01632.rec +++| STM USST,QS 01809 M00S01633.rec +++| MONITOR RTCM RESERVE TRACK CHAIN 01810 M00S01634.rec +++| LDD CM+4 SET TRACK 01811 M00S01635.rec +++| STD T6 01812 M00S01636.rec +++| STM RDBF,CN+3 01813 M00S01637.rec +++| NJN IDF13 IF TRACK ASSIGNED 01814 M00S01638.rec +++| LDD T5 CONVERT UPPER TWO DIGITS OF EST ORDINAL 01815 M00S01639.rec +++| SHN -3 01816 M00S01640.rec +++| RJM C2D 01817 M00S01641.rec +++| STM IDFC+1 01818 M00S01642.rec +++| LDD T5 CONVERT LOWER DIGIT OF EST ORDINAL 01819 M00S01643.rec +++| LPN 7 01820 M00S01644.rec +++| SHN 6 01821 M00S01645.rec +++| ADC 2R0, 01822 M00S01646.rec +++| STM IDFC+2 01823 M00S01647.rec +++| LDC IDFC *EQXXX, DAYFILE TRACK LIMIT.* 01824 M00S01648.rec +++| LJM ERR 01825 M00S01649.rec +++| 01826 M00S01650.rec +++| IDF13 STM USST+1,QS 01827 M00S01651.rec +++| STD CM+2 SET PRESERVED FILE BIT 01828 M00S01652.rec +++| LDD T5 01829 M00S01653.rec +++| STD CM+1 01830 M00S01654.rec +++| LDN SPFS 01831 M00S01655.rec +++| STD CM+3 01832 M00S01656.rec +++| MONITOR STBM 01833 M00S01657.rec +++|* LDN 0 FORCE DEADSTART CHECKPOINT 01834 M00S01658.rec +++| STM RECB 01835 M00S01659.rec +++| LDN 2 ADVANCE SYSTEM SECTOR UPDATE INDEX 01836 M00S01660.rec +++| RAD QS 01837 M00S01661.rec +++| LDM IDFB,CN+3 SET DAYFILE NAME 01838 M00S01662.rec +++| STM IDFA 01839 M00S01663.rec +++| LDC 501-ETEI 01840 M00S01664.rec +++| STD T1 01841 M00S01665.rec +++| IDF14 LDN 0 CLEAR SYSTEM SECTOR / EOI BUFFER 01842 M00S01666.rec +++| STM BFMS+ETEI,T1 01843 M00S01667.rec +++| SOD T1 01844 M00S01668.rec +++| PJN IDF14 LOOP UNTIL CLEAR 01845 M00S01669.rec +++| LDD MA 01846 M00S01670.rec +++| CWM *,ON 01847 M00S01671.rec +++| IDFA EQU *-1 01848 M00S01672.rec +++| SBN 1 01849 M00S01673.rec +++| CRM FNSS,ON 01850 M00S01674.rec +++| RJM WSS WRITE SYSTEM SECTOR 01851 M00S01675.rec +++| RJM WEI WRITE EOI 01852 M00S01676.rec +++| ENDMS 01853 M00S01677.rec +++| LDD T5 SET EQUIPMENT 01854 M00S01678.rec +++| STD FS 01855 M00S01679.rec +++| LMC 4000 01856 M00S01680.rec +++| STD CM+1 01857 M00S01681.rec +++| LDD T6 SET TRACK 01858 M00S01682.rec +++| STD FS+1 01859 M00S01683.rec +++| STD FS+2 01860 M00S01684.rec +++| LPC 3777 01861 M00S01685.rec +++| STD CM+2 01862 M00S01686.rec +++| LDD T7 SET SECTOR 01863 M00S01687.rec +++| STD FS+3 01864 M00S01688.rec +++| STD CM+3 01865 M00S01689.rec +++| MONITOR DTKM SET EOI IN TRT 01866 M00S01690.rec +++| 01867 M00S01691.rec +++|* COMPLETE PROCESSING FOR THIS DAYFILE. 01868 M00S01692.rec +++| 01869 M00S01693.rec +++| IDF15 ENDMS 01870 M00S01694.rec +++| LDD CN STORE DAYFILE FST 01871 M00S01695.rec +++| SHN 14 01872 M00S01696.rec +++| ADD CN+1 01873 M00S01697.rec +++| CWD FS 01874 M00S01698.rec +++| LJM IDF1 LOOP FOR NEXT DAYFILE 01875 M00S01699.rec +++| 01876 M00S01700.rec +++|* TABLE OF ADDRESSES FOR DAYFILE FNT ENTRIES. 01877 M00S01701.rec +++| 01878 M00S01702.rec +++| IDFB BSS 0 01879 M00S01703.rec +++| CON NDYF 01880 M00S01704.rec +++| CON NACF 01881 M00S01705.rec +++| CON NERL 01882 M00S01706.rec +++| CON NBML 01883 M00S01707.rec +++| 01884 M00S01708.rec +++| IDFC DATA C*EQXXX, DAYFILE TRACK LIMIT.* 01885 M00S01709.rec +++| IDFD BSS 5 DAYFILES FIRST TRACK BUFFER 01886 M00S01710.rec +++| 01887 M00S01711.rec +++|* DAYFILE FNT ENTRIES. 01888 M00S01712.rec +++| 01889 M00S01713.rec +++| NDYF VFD 42/0LDAYFILE,6/1,6/LIFT,6/0 01890 M00S01714.rec +++| NACF VFD 42/0LACCOUNT,6/1,6/LIFT,6/0 01891 M00S01715.rec +++| NERL VFD 42/0LERRLOG,6/1,6/LIFT,6/0 01892 M00S01716.rec +++| NBML VFD 42/0LMAINLOG,6/1,6/LIFT,6/0 01893 M00S01717.rec +++| IEM SPACE 4 01894 M00S01718.rec +++|** IEM - ISSUE ERROR MESSAGE. 01895 M00S01719.rec +++|* 01896 M00S01720.rec +++|* ENTRY (CN+3) = DAYFILE INDEX. 01897 M00S01721.rec +++|* 01898 M00S01722.rec +++|* USES CM - CM+4. 01899 M00S01723.rec +++| 01900 M00S01724.rec +++| 01901 M00S01725.rec +++| IEM SUBR ENTRY/EXIT 01902 M00S01726.rec +++| LDM IDFB,CN+3 01903 M00S01727.rec +++| STM IEMA 01904 M00S01728.rec +++| LDD MA 01905 M00S01729.rec +++| CWM *,ON FILENAME FOR MESSAGE 01906 M00S01730.rec +++| IEMA EQU *-1 01907 M00S01731.rec +++| SBN 1 01908 M00S01732.rec +++| CRM IEMB,ON 01909 M00S01733.rec +++| LDC 2R BLANK FILE NAME 01910 M00S01734.rec +++| STM IEMB+4 01911 M00S01735.rec +++| LDM IEMB+3 01912 M00S01736.rec +++| SCN 77 01913 M00S01737.rec +++| LMN 1R 01914 M00S01738.rec +++| STM IEMB+3 01915 M00S01739.rec +++| 01916 M00S01740.rec +++|* SET PAUSE BIT. 01917 M00S01741.rec +++| 01918 M00S01742.rec +++| LDD NC SYSTEM CONTROL POINT 01919 M00S01743.rec +++| SHN 7 01920 M00S01744.rec +++| ADN SNSW SENSE SWITCH WORD 01921 M00S01745.rec +++| CRD CM 01922 M00S01746.rec +++| STD T1 01923 M00S01747.rec +++| 01924 M00S01748.rec +++|* SET PAUSE BIT AND WAIT FOR OPERATOR ACTION. 01925 M00S01749.rec +++| 01926 M00S01750.rec +++| LDD CM+3 01927 M00S01751.rec +++| SCN 1 01928 M00S01752.rec +++| LMN 1 01929 M00S01753.rec +++| STD CM+3 01930 M00S01754.rec +++| LDD T1 01931 M00S01755.rec +++| CWD CM 01932 M00S01756.rec +++| ADN MS2W-SNSW 01933 M00S01757.rec +++| CWM IEMB,TR 01934 M00S01758.rec +++| IEM1 LDN 77 01935 M00S01759.rec +++| SBN 1 01936 M00S01760.rec +++| NJN *-1 DELAY 01937 M00S01761.rec +++| LDD T1 01938 M00S01762.rec +++| CRD CM 01939 M00S01763.rec +++| LDD CM+3 01940 M00S01764.rec +++| LPN 1 01941 M00S01765.rec +++| NJN IEM1 IF PAUSE BIT STILL SET 01942 M00S01766.rec +++| LJM IEMX RETURN 01943 M00S01767.rec +++| 01944 M00S01768.rec +++| 01945 M00S01769.rec +++| IEMB DATA C*DAYFILE UNRECOVERABLE.* 01946 M00S01770.rec +++| FMM SPACE 4,15 01947 M00S01771.rec +++|** FMM - FORMAT MESSAGES. 01948 M00S01772.rec +++|* 01949 M00S01773.rec +++|* ENTRY CHANNEL RESERVED. 01950 M00S01774.rec +++|* (T5) = EST ORDINAL. 01951 M00S01775.rec +++|* (QS) = INDEX TO *USST* LIST. 01952 M00S01776.rec +++|* SYSTEM SECTOR AT BFMS. 01953 M00S01777.rec +++|* EOI SECTOR AT SBUF. 01954 M00S01778.rec +++|* (CN+3) = DAYFILE INDEX. 01955 M00S01779.rec +++|* (FS - FS+4) = DAYFILE STATUS WORD. 01956 M01S00002.ns2669 +++|* *SETMS IO,RW* PERFORMED. 01957 M00S01780.rec +++|* 01958 M00S01781.rec +++|* EXIT SYSTEM SECTOR UPDATED. 01959 M00S01782.rec +++|* MESSAGE INFORMATION SAVED. 01960 M00S01783.rec +++|* 01961 M00S01784.rec +++|* USES T1, T2, T6, T7. 01962 M00S01785.rec +++|* 01963 M00S01786.rec +++|* CALLS WSS. 01964 M00S01787.rec +++| 01965 M00S01788.rec +++| 01966 M00S01789.rec +++| FMM SUBR ENTRY/EXIT 01967 M00S01790.rec +++| LDD CN+3 SAVE DATE AND TIME 01968 M00S01791.rec +++| SHN 2 01969 M00S01792.rec +++| ADD CN+3 01970 M00S01793.rec +++| ADC RDBA 01971 M00S01794.rec +++| STM FMMA 01972 M00S01795.rec +++| ADN RDBB-RDBA 01973 M00S01796.rec +++| STM FMMC 01974 M00S01797.rec +++| ADN RDBC-RDBB 01975 M00S01798.rec +++| STM FMMB 01976 M00S01799.rec +++| 01977 M00S01800.rec +++|* SAVE SYSTEM SECTOR CREATION DATE. 01978 M00S01801.rec +++| 01979 M00S01802.rec +++| LDD MA 01980 M00S01803.rec +++| CWM BFMS+DTEI+2*5,ON 01981 M00S01804.rec +++| SBN 1 01982 M00S01805.rec +++| CRM **,ON 01983 M00S01806.rec +++| FMMA EQU *-1 01984 M00S01807.rec +++| 01985 M00S01808.rec +++|* SAVE UPDATE TIME. 01986 M00S01809.rec +++| 01987 M00S01810.rec +++| SBN 1 01988 M00S01811.rec +++| CWM SBUF+DTEI+5,ON 01989 M00S01812.rec +++| SBN 1 01990 M00S01813.rec +++| CRM **,ON 01991 M00S01814.rec +++| FMMB EQU *-1 01992 M00S01815.rec +++| 01993 M00S01816.rec +++|* SAVE UPDATE DATE. 01994 M00S01817.rec +++| 01995 M00S01818.rec +++| SBN 1 01996 M00S01819.rec +++| CWM SBUF+DTEI+2*5,ON 01997 M00S01820.rec +++| SBN 1 01998 M00S01821.rec +++| CRM **,ON 01999 M00S01822.rec +++| FMMC EQU *-1 02000 M00S01823.rec +++| 02001 M00S01824.rec +++|* UPDATE SYSTEM SECTOR WITH NEW LENGTH. 02002 M00S01825.rec +++| 02003 M00S01826.rec +++| SETMS POSITION 02004 M00S01827.rec +++| LDM FTSS REWRITE SYSTEM SECTOR 02005 M00S01828.rec +++| STM USST+1,QS 02006 M00S01829.rec +++| STD T6 02007 M00S01830.rec +++| RJM WSS 02008 M00S01831.rec +++| LDD T5 SET RECOVERED DAYFILE IN *USST* 02009 M00S01832.rec +++| LMC 2000 02010 M00S01833.rec +++| STM USST,QS 02011 M00S01834.rec +++| LDN 2 02012 M00S01835.rec +++| RAD QS 02013 M00S01836.rec +++| LDD FS+1 CHECK STATUS OF DAYFILE 02014 M00S01837.rec +++| LMD FS+2 02015 M00S01838.rec +++| NJN FMM1 IF BUFFER DUMPED TO DISK 02016 M00S01839.rec +++| LDD FS+3 02017 M00S01840.rec +++| LMN FSMS 02018 M00S01841.rec +++| NJN FMM1 IF BUFFER DUMPED 02019 M00S01842.rec +++| LDD T6 SET FIRST TRACK IN CREATION TABLE 02020 M00S01843.rec +++| STM RDBF,CN+3 02021 M00S01844.rec +++| FMM1 LJM FMMX RETURN 02022 M00S01845.rec +++| GDT SPACE 4,10 02023 M00S01846.rec +++|** GDT - GET DAYFILE TRACKS. 02024 M00S01847.rec +++|* 02025 M00S01848.rec +++|* ENTRY (T5) = EST ORDINAL. 02026 M00S01849.rec +++|* 02027 M00S01850.rec +++|* EXIT (IDFD) = FIRST TRACKS OF EXCESS DAYFILES. 02028 M00S01851.rec +++|* = 0 IF NO DAYFILES ON DEVICE. 02029 M00S01852.rec +++|* 02030 M00S01853.rec +++|* EREXIT TO *ERR* IF ERROR READING SECTOR OF LOCAL AREAS. 02031 M00S01854.rec +++|* 02032 M00S01855.rec +++|* CALLS C2D, RLA. 02033 M00S01856.rec +++| 02034 M00S01857.rec +++| 02035 M00S01858.rec +++| GDT1 ZJN GDT2 IF NO SECTOR OF LOCAL AREAS 02036 M00S01859.rec +++| STM GDTA 02037 M00S01860.rec +++| LDD MA MOVE DAYFILE TRACKS TO DIRECT CELLS 02038 M00S01861.rec +++| CWM *,ON 02039 M00S01862.rec +++| GDTA EQU *-1 02040 M00S01863.rec +++| SBN 1 02041 M00S01864.rec +++| GDT2 CRM IDFD,ON 02042 M00S01865.rec +++| 02043 M00S01866.rec +++| GDT SUBR ENTRY/EXIT 02044 M00S01867.rec +++| RJM RLA READ LOCAL AREA SECTOR 02045 M00S01868.rec +++| PJN GDT1 IF NO ERRORS 02046 M00S01869.rec +++| LDD T5 CONVERT UPPER TWO DIGITS OF EST ORDINAL 02047 M00S01870.rec +++| SHN -3 02048 M00S01871.rec +++| RJM C2D 02049 M00S01872.rec +++| STM GDTB+1 STORE IN MESSAGE 02050 M00S01873.rec +++| LDD T5 CONVERT LOWER DIGIT OF EST ORDINAL 02051 M00S01874.rec +++| LPN 7 02052 M00S01875.rec +++| SHN 6 02053 M00S01876.rec +++| ADC 2R0, 02054 M00S01877.rec +++| STM GDTB+2 02055 M00S01878.rec +++| LDC GDTB *EQXXX, LOCAL AREA SECTOR ERROR.* 02056 M00S01879.rec +++| LJM ERR DISPLAY MESSAGE AND HANG 02057 M00S01880.rec +++| 02058 M00S01881.rec +++| GDTB DATA C*EQXXX, LOCAL AREA SECTOR ERROR.* 02059 M00S01882.rec +++| TLM SPACE 4,15 02060 M00S01883.rec +++|** TLM - TERMINATE LAST DAYFILE MESSAGE. 02061 M00S01884.rec +++|* 02062 M00S01885.rec +++|* ENTRY (T5) = EST ORDINAL. 02063 M00S01886.rec +++|* (T6) = (FS+2) = EOI TRACK FOR DAYFILE. 02064 M00S01887.rec +++|* (T7) = (FS+3) = EOI SECTOR. 02065 M00S01888.rec +++|* (FS+1) = FIRST TRACK OF DAYFILE. 02066 M00S01889.rec +++|* (CN+3) = DAYFILE INDEX. 02067 M00S01890.rec +++|* (CN - CN+1) = FWA OF DAYFILE POINTERS. 02068 M00S01891.rec +++|* (T2 - T3) = DAYFILE LENGTH (SECTOR COUNT). 02069 M00S01892.rec +++|* 02070 M00S01893.rec +++|* USES T2, CM - CM+4. 02071 M00S01894.rec +++|* 02072 M00S01895.rec +++|* CALLS RDS, SNT. 02073 M00S01896.rec +++| 02074 M00S01897.rec +++| 02075 M00S01898.rec +++| TLM SUBR ENTRY/EXIT 02076 M00S01899.rec +++| LDD CN+3 02077 M00S01900.rec +++| LMN MLDY 02078 M00S01901.rec +++| ZJN TLMX IF MAINTENANCE LOG 02079 M00S01902.rec +++| LDD T3 02080 M00S01903.rec +++| LMN FSMS 02081 M00S01904.rec +++| ADD T2 02082 M00S01905.rec +++| ZJN TLMX IF DAYFILE EMPTY 02083 M00S01906.rec +++| SOD T7 02084 M00S01907.rec +++| PJN TLM2 IF EOI NOT ON TRACK BOUNDARY 02085 M00S01908.rec +++| LDD FS+1 02086 M00S01909.rec +++| STD T6 02087 M00S01910.rec +++| TLM1 LDD T6 SAVE CURRENT TRACK 02088 M00S01911.rec +++| STD T2 02089 M00S01912.rec +++| RJM SNT SET NEXT TRACK 02090 M00S01913.rec +++| STD T6 02091 M00S01914.rec +++| LMD FS+2 02092 M00S01915.rec +++| NJN TLM1 IF NOT EOI TRACK 02093 M00S01916.rec +++| LDD T2 02094 M00S01917.rec +++| STD T6 02095 M00S01918.rec +++| LDM SLM SET LAST DATA SECTOR 02096 M00S01919.rec +++| SBN 1 02097 M00S01920.rec +++| STD T7 02098 M00S01921.rec +++| TLM2 LDC SBUF READ LAST SECTOR OF DAYFILE DATA 02099 M00S01922.rec +++| RJM RDS 02100 M00S01923.rec +++| MJN TLM3 IF READ ERROR 02101 M00S01924.rec +++| LDM SBUF+1 02102 M00S01925.rec +++| LMD HN 02103 M00S01926.rec +++| NJN TLM3 IF NOT FULL SECTOR (BUFFER FLUSHED) 02104 M00S01927.rec +++| LDM SBUF+501 02105 M00S01928.rec +++| ZJN TLM3 IF LAST MESSAGE COMPLETE 02106 M00S01929.rec +++| LDD CN 02107 M00S01930.rec +++| SHN 14 02108 M00S01931.rec +++| ADD CN+1 02109 M00S01932.rec +++| SBN 2 02110 M00S01933.rec +++| CRD CM 02111 M00S01934.rec +++| AOD CM+4 ADVANCE IN POINTER 02112 M00S01935.rec +++| LDD CN 02113 M00S01936.rec +++| SHN 14 02114 M00S01937.rec +++| ADD CN+1 02115 M00S01938.rec +++| SBN 2 02116 M00S01939.rec +++| CWD CM 02117 M00S01940.rec +++| TLM3 LDD FS+2 RESTORE EOI ADDRESS 02118 M00S01941.rec +++| STD T6 02119 M00S01942.rec +++| LDD FS+3 02120 M00S01943.rec +++| STD T7 02121 M00S01944.rec +++| LJM TLMX RETURN 02122 M00S01945.rec +++| USS SPACE 4 02123 M00S01946.rec +++|** USS - UPDATE SYSTEM SECTOR. 02124 M00S01947.rec +++|* 02125 M00S01948.rec +++|* ENTRY EST ORDINAL AND FIRST TRACK OF SELECTED DAYFILES 02126 M00S01949.rec +++|* STORED IN USST. 02127 M00S01950.rec +++|* 02128 M00S01951.rec +++|* EXIT DAYFILE SYSTEM SECTORS UPDATED WITH CURRENT TIME. 02129 M00S01952.rec +++|* 02130 M00S01953.rec +++|* USES T5, T6, QS. 02131 M00S01954.rec +++|* 02132 M00S01955.rec +++|* CALLS RSS, WSS. 02133 M00S01956.rec +++|* 02134 M00S01957.rec +++|* MACROS ENDMS, SETMS. 02135 M00S01958.rec +++| 02136 M00S01959.rec +++| 02137 M00S01960.rec +++| USS SUBR ENTRY/EXIT 02138 M00S01961.rec +++| LDN 0 CLEAR FILE INDEX 02139 M00S01962.rec +++| STD QS 02140 M00S01963.rec +++| STD FA 02141 M00S01964.rec +++| USS1 LDM USST,QS CHECK FOR SELECTED EQUIPMENT 02142 M00S01965.rec +++| ZJN USSX IF END OF FILES 02143 M00S01966.rec +++| LPC 777 02144 M00S01967.rec +++| STD T5 02145 M00S01968.rec +++| SETMS IO,RW 02146 M00S01969.rec +++| LDM USST+1,QS SET FIRST TRACK 02147 M00S01970.rec +++| STD T6 02148 M00S01971.rec +++| LDN 0 READ SYSTEM SECTOR 02149 M00S01972.rec +++| RJM RSS 02150 M00S01973.rec +++| NJN USS3 IF ERROR IN SYSTEM SECTOR 02151 M00S01974.rec +++| LDM USST,QS 02152 M00S01975.rec +++| SHN 21-12 02153 M00S01976.rec +++| MJN USS2 IF A RECOVERED DAYFILE 02154 M00S01977.rec +++| LDN PDTL ENTER CREATION DATE AND TIME 02155 M00S01978.rec +++| CRM DTSS,TR 02156 M00S01979.rec +++| USS2 RJM WSS UPDATE TIME IN SYSTEM SECTOR 02157 M00S01980.rec +++| USS3 ENDMS 02158 M00S01981.rec +++| LDN 2 02159 M00S01982.rec +++| RAD QS 02160 M00S01983.rec +++| LJM USS1 LOOP FOR NEXT FILE 02161 M00S01984.rec +++| 02162 M00S01985.rec +++| 02163 M00S01986.rec +++|** TABLE OF DAYFILE SYSTEM SECTORS TO UPDATE. 02164 M00S01987.rec +++|* ENTRY = 2 WORDS, ZERO WORD TERMINATES THE TABLE. 02165 M00S01988.rec +++|* 02166 M00S01989.rec +++|*T, USST 3/FLAGS, 9/ ESTORD, 12/ FIRST TRACK
Figure USST
02167 M00S01990.rec +++|* 02168 M00S01991.rec +++|* FLAGS - 02169 M00S01992.rec +++|* 4 = NEW DAYFILE. 02170 M00S01993.rec +++|* 2 = RECOVERED DAYFILE. 02171 M00S01994.rec +++| 02172 M00S01995.rec +++| 02173 M00S01996.rec +++| USST BSSZ 2*EXDF+1 02174 M00S01997.rec +++| SPACE 4 02175 M00S01998.rec +++|* COMMON DECKS. 02176 M00S01999.rec +++| 02177 M00S02000.rec +++| 02178 M00S02001.rec +++|*CALL COMPRLA 02179 M00S02002.rec +++| SPACE 4 02180 M00S02003.rec +++| USE LITERALS 02181 M00S02004.rec +++| 02182 M00S02005.rec +++| SBUF EQU * SCRATCH BUFFER 02183 M00S02006.rec +++| ERRNG BFMS-SBUF-502 SCRATCH BUFFER OVERFLOW INTO *BFMS* 02184 M00S02007.rec +++| TTL REC/4RB - ALLOCATE/RECOVER USER XM. 02185 M00S02008.rec +++| TITLE 02186 M00S02009.rec +++| QUAL ECS 02187 M00S02010.rec +++| IDENT 4RB,ECSX 02188 M00S02011.rec +++|*COMMENT REC - ALLOCATE/RECOVER USER XM.
| Line S02012 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02189 M01S02012.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1976.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02190 M01S00003.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02191 M00S02013.rec +++| 4RB SPACE 4,10 02192 M00S02014.rec +++|*** ECS - ALLOCATE/RECOVER USER EXTENDED MEMORY. 02193 M00S02015.rec +++|* 02194 M00S02016.rec +++|* *ECS* PERFORMS THE ALLOCATION AND RECOVERY OF USER 02195 M00S02017.rec +++|* ACCESS EXTENDED MEMORY. THE ALLOCATED XM FOR USER DIRECT 02196 M00S02018.rec +++|* ACCESS IS MAINTAINED AS A PRESERVED FILE OF TYPE *LIFT* AND 02197 M00S02019.rec +++|* IS NAMED -**UECS.-. THE FILE IS COMPOSED OF UP TO 5 02198 M00S02020.rec +++|* SUB-CHAINS. THE FIRST SUB-CHAIN IS ONE TRACK LONG AND IS 02199 M00S02021.rec +++|* TO GUARANTEE A SYSTEM SECTOR FOR THE ENTIRE CHAIN. EACH 02200 M00S02022.rec +++|* SUBSEQUENT SUB-CHAIN, UP TO 4, IS COMPOSED OF ENOUGH 02201 M00S02023.rec +++|* CONTINUOUS TRACKS TO MEET THE SPACE REQUIRMENTS OF ONE 02202 M00S02024.rec +++|* MACHINES DIRECT ACCESS AREA. THE SYSTEM SECTOR CONTAINS 02203 M00S02025.rec +++|* INFORMATION DESCRIBING EACH SUB-CHAIN PRESENT. 02204 M00S02026.rec +++| 4RB SPACE 4,10 02205 M00S02027.rec +++|*** OPERATOR MESSAGES.
| Line S00083 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02206 M01S00083.271l716 +++|* 02207 M01S00084.271l716 +++|* **ECSM* ERROR CLEARING USER XM.* = A HARDWARE ERROR OCCURRED 02208 M01S00085.271l716 +++|* WHILE ATTEMPTING TO CLEAR A JOB-S EXTENDED MEMORY FIELD 02209 M01S00086.271l716 +++|* LENGTH. 02210 M00S02028.rec +++|* 02211 M00S02029.rec +++|* *USER EXTENDED MEMORY IMPROPERLY ALLOCATED.* = AN 02212 M00S02030.rec +++|* INCONSISTENCY HAS BEEN DETECTED, BETWEEN THE REQUESTED USER 02213 M00S02031.rec +++|* EXTENDED MEMORY SPACE AND ALLOCATION INFORMATION IN THE 02214 M00S02032.rec +++|* SYSTEM SECTOR, WHILE ATTEMPTING TO RECOVER THE USER 02215 M00S02033.rec +++|* DIRECT ACCESS SPACE. 02216 M00S02034.rec +++|* 02217 M00S02035.rec +++|* *USER EM SPACE UNAVAILABLE.* = THE AMOUNT 02218 M00S02036.rec +++|* REQUESTED FOR USER EXTENDED MEMORY (VIA THE *XM* ENTRY IN 02219 M00S02037.rec +++|* *EQPDECK*) IS NOT AVAILABLE. 02220 M00S02038.rec +++|* 02221 M00S02039.rec +++|* *USER EXTENDED MEMORY SYSTEM SECTOR ERROR.* = AN ERROR WAS 02222 M00S02040.rec +++|* DETECTED WHILE READING THE SYSTEM SECTOR FOR THE USER 02223 M00S02041.rec +++|* EXTENDED MEMORY CHAIN.
| Line S02042 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02224 M01S02042.271l716 ---|* 02225 M00S02043.rec ---| 4RB SPACE 4,10 02226 M00S02044.rec ---|**** DIRECT CELL DEFINITIONS LOCAL TO *4RB*. 02227 M00S02045.rec ---| 02228 M00S02046.rec ---| 02229 M00S02047.rec ---| T8 EQU 26 POINTER TO SUB-CHAIN ENTRY 02230 M00S02048.rec ---| T9 EQU 27 CURRENT MACHINE ID
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02231 M01S00087.271l716 +++| KA EQU QS CP/PCP NUMBER 02232 M01S00088.271l716 +++| KB EQU QI MCT ENTRY COUNT 02233 M01S00089.271l716 +++| AB EQU FN CM WORD BUFFER 02234 M00S02049.rec +++| 02235 M00S02050.rec +++|**** 02236 M00S02051.rec +++| ECS TITLE MAIN PROCESSING ROUTINE. 02237 M00S02052.rec +++| ECS SPACE 4,10 02238 M00S02053.rec +++|** ECS - MAIN ROUTINE. 02239 M00S02054.rec +++| 02240 M00S02055.rec +++| 02241 M00S02056.rec +++| ORG OVLA 02242 M00S02057.rec +++| ECS SUBR ENTRY/EXIT 02243 M00S02058.rec +++| RJM PRS PRESET OVERLAY 02244 M00S02059.rec +++| LDM TAXM 02245 M00S02060.rec +++| ZJN ECS1 IF NO ENTRY FOR THIS MACHINE 02246 M00S02061.rec +++| LDM TAXM+2 GET LENGTH OF USER EXTENDED MEMORY 02247 M00S02062.rec +++| STD FS+2 02248 M00S02063.rec +++| ECS1 RJM SDI INTERLOCK ECS 02249 M00S02064.rec +++| LDM ECSE+ACGL*5+1 CHECK FOR FIRST TRACK OF UEC CHAIN 02250 M00S02065.rec +++| ZJN ECS2 IF MST NOT INITIALIZED 02251 M00S02066.rec +++| LJM ECS8 IF SOME USER ECS SPACE ALLOCATED 02252 M00S02067.rec +++| 02253 M00S02068.rec +++|* INITIALIZE USER EXTENDED MEMORY CHAIN AND MST. 02254 M00S02069.rec +++| 02255 M00S02070.rec +++| ECS2 LDD FS+2 02256 M00S02071.rec +++| ZJN ECS4 IF NO USER ECS REQUESTED FOR THIS MACHINE 02257 M00S02072.rec +++| LDD RS 02258 M00S02073.rec +++| NJN ECS6 IF NOT LEVEL 0 DEADSTART 02259 M00S02074.rec +++| RJM ISS INITIALIZE SYSTEM SECTOR 02260 M00S02075.rec +++| LDM ECSE+ACGL*5+1 END OF CURRENT CHAIN 02261 M00S02076.rec +++| STD FS+4 02262 M00S02077.rec +++| LDC BFMS+2+4*5 SET FIRST ENTRY POINTER 02263 M00S02078.rec +++| STD T8 02264 M00S02079.rec +++| 02265 M00S02080.rec +++|* ASSIGN USER EXTENDED MEMORY AREA. 02266 M00S02081.rec +++| 02267 M00S02082.rec +++| ECS3 RJM ACE ASSIGN TRACKS 02268 M00S02083.rec +++| RJM SSS STORE SYSTEM SECTOR 02269 M00S02084.rec +++| ECS4 RJM CDI CLEAR INTERLOCK 02270 M00S02085.rec +++| ECSA RJM SCP SETUP CONTROL POINT AREAS 02271 M00S02086.rec +++|* UJN *+2 (DURING MMF PROCESSING) 02272 M00S02087.rec +++| ECS5 LDC 0 02273 M00S02088.rec +++| ECSB EQU *-1 02274 M00S02089.rec +++| LMD FS 02275 M00S02090.rec +++| ZJN ECS7 IF ALLOCATING ON MMF LINK 02276 M00S02091.rec +++| ECS5.1 LJM ECSX RETURN 02277 M00S02092.rec +++| 02278 M00S02093.rec +++|* ERROR IN USER EXTENDED MEMORY ALLOCATION. 02279 M00S02094.rec +++| 02280 M00S02095.rec +++| ECS6 RJM CDI CLEAR INTERLOCK 02281 M00S02096.rec +++| LDC =C*USER EXTENDED MEMORY IMPROPERLY ALLOCATED.* 02282 M00S02097.rec +++| LJM HNG ISSUE ERROR AND HANG 02283 M00S02098.rec +++| 02284 M00S02099.rec +++|* SET UP TO PROCESS MULTIMAINFRAME ALLOCATION. 02285 M00S02100.rec +++| 02286 M00S02101.rec +++| ECS7 LDC UJNI+2 SET MMF SWITCHES 02287 M00S02102.rec +++| STM ECSA 02288 M00S02103.rec +++| LDD HN 02289 M00S02104.rec +++| ERRNZ 100-LJMI ADJUST IF VALUE CHANGES 02290 M00S02105.rec +++| STM ECSC 02291 M00S02106.rec +++| LDC ECS5 02292 M00S02107.rec +++| STM ECSC+1 02293 M00S02108.rec +++| RJM CAD CLEAR THIS MACHINES ID AND DATA 02294 M00S02109.rec +++| RJM FAD FETCH NEW MACHINE ID AND DATA 02295 M00S02110.rec +++| ZJN ECS5.1 IF NO MORE MACHINES TO ALLOCATE 02296 M00S02111.rec +++| STD T9 02297 M00S02112.rec +++| LDM 2,T1 SET NEW USER EXTENDED MEMORY AREA LENGTH 02298 M00S02113.rec +++| STD FS+2 02299 M00S02114.rec +++| LJM ECS1 PROCESS ANOTHER MACHINE 02300 M00S02115.rec +++| 02301 M00S02116.rec +++|* PROCESS EXISTING USER EXTENDED MEMORY CHAIN. 02302 M00S02117.rec +++| 02303 M00S02118.rec +++| ECS8 RJM CDI CLEAR INTERLOCK ON ECS 02304 M00S02119.rec +++| RJM FSS FETCH EXISTING SYSTEM SECTOR 02305 M00S02120.rec +++| RJM FTM FIND THIS MACHINES ENTRY 02306 M00S02121.rec +++| LDM 2,T8 02307 M00S02122.rec +++| NJN ECS9 IF SPACE EXISTS FOR THIS MACHINE 02308 M00S02123.rec +++| LDD FS+2 02309 M00S02124.rec +++| ZJN ECS12 IF SPACE NOT REQUESTED FOR THIS MACHINE 02310 M00S02125.rec +++| LDD RS 02311 M00S02126.rec +++| NJN ECS10 IF NOT LEVEL 0, THEN ERROR 02312 M00S02127.rec +++| UJN ECS14 LOCATE END OF USER EXTENDED MEMORY CHAIN 02313 M00S02128.rec +++| 02314 M00S02129.rec +++|* PROCESS EXISTING SUB-CHAIN. 02315 M00S02130.rec +++| 02316 M00S02131.rec +++| ECS9 LDM 3,T8 SET RAE FROM SYSTEM SECTOR 02317 M00S02132.rec +++| STD FS+3 02318 M00S02133.rec +++| LDM 1,T8 SET FIRST TRACK OF SUB CHAIN 02319 M00S02134.rec +++| STD FS+1 02320 M00S02135.rec +++| LDD FS+2 02321 M00S02136.rec +++| NJN ECS13 IF SPACE REQUESTED 02322 M00S02137.rec +++| LDD RS 02323 M00S02138.rec +++| ZJN ECS11 IF LEVEL 0 DEADSTART 02324 M00S02139.rec +++| ECS10 LJM ECS6 REPORT ERROR 02325 M00S02140.rec +++| 02326 M00S02141.rec +++|* RELEASE EXISTING SUB-CHAIN. 02327 M00S02142.rec +++| 02328 M00S02143.rec +++| ECS11 RJM RLS RELEASE SPACE 02329 M00S02144.rec +++| STD T9 CLEAR SUB-CHAIN ENTRY 02330 M00S02145.rec +++| STD FS+2 02331 M00S02146.rec +++| RJM SSS STORE UPDATED SYSTEM SECTOR 02332 M00S02147.rec +++| ECS12 LJM ECS4 COMPLETE PROCESSING 02333 M00S02148.rec +++| 02334 M00S02149.rec +++|* UPDATE EXISTING SUB-CHAIN. 02335 M00S02150.rec +++| 02336 M00S02151.rec +++| ECS13 LDM 2,T8 02337 M00S02152.rec +++| SBD FS+2 02338 M00S02153.rec +++| ZJN ECS12 IF SPACE MATCHES 02339 M00S02154.rec +++| LDD RS 02340 M00S02155.rec +++| NJN ECS10 IF NOT LEVEL 0 DEADSTART, THEN ERROR 02341 M00S02156.rec +++| ECSC RJM RLS RELEASE SPACE 02342 M00S02157.rec +++|* LJM ECS5 (DURING MMF PROCESSING) 02343 M00S02158.rec +++| 02344 M00S02159.rec +++|* FIND LAST TRACK OF USER EXTENDED MEMORY CHAIN. 02345 M00S02160.rec +++| 02346 M00S02161.rec +++| ECS14 LDD FS SET EQUIPMENT 02347 M00S02162.rec +++| STD T5 02348 M00S02163.rec +++| LDM ECSE+ACGL*5+1 SET FIRST TRACK 02349 M00S02164.rec +++| STD T6 02350 M00S02165.rec +++| RJM IRA INITIALIZE RANDOM ACCESS PROCESSORS 02351 M00S02166.rec +++| LDN 0 FORCE TRT UPDATE 02352 M00S02167.rec +++| RJM SEI SEARCH FOR EOI 02353 M00S02168.rec +++| LDD T6 SET LAST TRACK 02354 M00S02169.rec +++| STD FS+4 02355 M00S02170.rec +++| LJM ECS3 ASSIGN TRACKS 02356 M00S02171.rec +++| 02357 M00S02172.rec +++| 02358 M00S02173.rec +++| ECSE BSS 3*5 BUFFER FOR MST GLOBAL WORDS 02359 M00S02174.rec +++| ECSF VFD 42/7H**UECS.,6/0,6/SYFT,6/0 02360 M00S02175.rec +++| TITLE SUBROUTINES. 02361 M00S02176.rec +++| ACE SPACE 4,10 02362 M00S02177.rec +++|** ACE - ASSIGN CONTIGUOUS EXTENDED MEMORY TRACKS. 02363 M00S02178.rec +++|* 02364 M00S02179.rec +++|* ENTRY (FS) = EXTENDED MEMORY EST ORDINAL. 02365 M00S02180.rec +++|* (FS+2) = LENGTH OF USER EXTENDED MEMORY AREA / *EMBS*. 02366 M00S02181.rec +++|* (FS+4) = LAST TRACK OF CURRENT CHAIN. 02367 M00S02182.rec +++|* 02368 M00S02183.rec +++|* EXIT (FS+1) = FIRST TRACK OF SUB-CHAIN. 02369 M00S02184.rec +++|* (FS+3) = RA/*EMBS* OF USER EXTENDED MEMORY AREA. 02370 M00S02185.rec +++|* (FS+4) = LAST TRACK OF NEW SUB-CHAIN. 02371 M00S02186.rec +++|* 02372 M00S02187.rec +++|* USES CM - CM+7, CN - CN+4, FS+1 - FS+3, T0 - T7. 02373 M00S02188.rec +++|* 02374 M00S02189.rec +++|* CALLS CAT, CDI. 02375 M00S02190.rec +++| 02376 M00S02191.rec +++| 02377 M00S02192.rec +++| ACE17 LDN 0 CLEAR FIELDS 02378 M00S02193.rec +++| STD FS+1 02379 M00S02194.rec +++| STD FS+3 02380 M00S02195.rec +++| 02381 M00S02196.rec +++| ACE SUBR ENTRY/EXIT 02382 M00S02197.rec +++| LDD FS+2 02383 M00S02198.rec +++| ZJN ACE17 IF NO USER EXTENDED MEMORY TO BE ALLOCATED 02384 M00S02199.rec +++| ADN 2 02385 M00S02200.rec +++| SHN 5 02386 M00S02201.rec +++| STD T1 ALLOW FOR *EMBS* WORD BLOCKS 02387 M00S02202.rec +++| SHN -14 02388 M00S02203.rec +++| STD T6 02389 M00S02204.rec +++| LDN 0 TRACK COUNT = (FL*40) / 101 02390 M00S02205.rec +++| STD T7 02391 M00S02206.rec +++| ACE0 AOD T7 ADVANCE TRACK COUNT 02392 M00S02207.rec +++| LDC -101 02393 M00S02208.rec +++| RAD T1 02394 M00S02209.rec +++| PJN ACE0 IF NOT UNDERFLOW 02395 M00S02210.rec +++| AOD T1 02396 M00S02211.rec +++| SOD T6 02397 M00S02212.rec +++| PJN ACE0 IF NOT END OF CONVERSION 02398 M00S02213.rec +++| LDN 17 02399 M00S02214.rec +++| ACEB SHN -4 ADJUST FOR BLOCKING FACTOR 02400 M00S02215.rec +++|* SHN -4+UESC-EMSC 02401 M00S02216.rec +++| RAD T7 02402 M00S02217.rec +++| RJM CDI CLEAR INTERLOCK ON ECS 02403 M00S02218.rec +++| UJN ACE2 ENTER LOOP 02404 M00S02219.rec +++| 02405 M00S02220.rec +++| ACE1 LDD NC WRITE MESSAGE TO SYSTEM CONTROL POINT 02406 M00S02221.rec +++| SHN 7 02407 M00S02222.rec +++| ADN MS2W 02408 M00S02223.rec +++| CWM =C*USER EM SPACE UNAVAILABLE.*,TR 02409 M00S02224.rec +++| ACE2 PAUSE NE 02410 M00S02225.rec +++| LCN 1 SET TO REQUEST ALL TRACKS 02411 M00S02226.rec +++| STD CM+4 02412 M00S02227.rec +++| SHN -14 02413 M00S02228.rec +++| STD CM+3 02414 M00S02229.rec +++| LDD FS SET EST ORDINAL 02415 M00S02230.rec +++| STD CM+1 02416 M00S02231.rec +++| LDD FS+4 SET CURRENT TRACK 02417 M00S02232.rec +++| STD CM+2 02418 M00S02233.rec +++| MONITOR RTCM REQUEST ALL AVAILABLE ECS SPACE 02419 M00S02234.rec +++| LDD CM+4 02420 M00S02235.rec +++| ZJN ACE1 IF TRACKS NOT AVAILABLE 02421 M00S02236.rec +++| RJM CAT CALCULATE FWA OF TRT 02422 M00S02237.rec +++| STM ACEA+1 02423 M00S02238.rec +++| SHN -14 02424 M00S02239.rec +++| ADC ADCI 02425 M00S02240.rec +++| STM ACEA 02426 M00S02241.rec +++| 02427 M00S02242.rec +++|* FIND BEST FITTING CONTIGUOUS TRACK CHAIN. 02428 M00S02243.rec +++|* (T0) = POINTER TO FIRST TRACK OF CHAIN UNDER CONSIDERATION. 02429 M00S02244.rec +++|* (T1) = FIRST TRACK OF CHAIN UNDER CONSIDERATION. 02430 M00S02245.rec +++|* (T2) = LENGTH OF CHAIN UNDER CONSIDERATION. 02431 M00S02246.rec +++|* (T3) = POINTER TO FIRST TRACK OF BEST FIT SO FAR. 02432 M00S02247.rec +++|* (T4) = FIRST TRACK OF BEST FIT SO FAR. 02433 M00S02248.rec +++|* (T5) = LENGTH OF BEST FIT SO FAR. 02434 M00S02249.rec +++|* (T6) = BYTE INDEX. 02435 M00S02250.rec +++|* (T7) = LENGTH OF TRACK CHAIN REQUESTED. 02436 M00S02251.rec +++|* (CM) = POINTER TO FIRST TRACK OF LONGEST CHAIN SO FAR. 02437 M00S02252.rec +++|* (CM+1) = FIRST TRACK OF LONGEST CHAIN SO FAR. 02438 M00S02253.rec +++|* (CM+2) = LENGTH OF LONGEST CHAIN SO FAR. 02439 M00S02254.rec +++| 02440 M00S02255.rec +++| LDN ZERL 02441 M00S02256.rec +++| CRD T0 02442 M00S02257.rec +++| LDN 0 02443 M00S02258.rec +++| STD CM 02444 M00S02259.rec +++| STD CM+1 02445 M00S02260.rec +++| STD CM+2 02446 M00S02261.rec +++| LDD NC CLEAR MESSAGE AT SYSTEM CONTROL POINT 02447 M00S02262.rec +++| SHN 7 02448 M00S02263.rec +++| ADN MS2W 02449 M00S02264.rec +++| CWD CM 02450 M00S02265.rec +++| LCN 0 PRESET AMOUNT OF SLOP IN BEST FIT 02451 M00S02266.rec +++| STD T5 02452 M00S02267.rec +++| LDD CM+4 SET FIRST TRACK 02453 M00S02268.rec +++| LJM ACE9 02454 M00S02269.rec +++| 02455 M00S02270.rec +++|* SCAN TRT FOR CONTIGUOUS TRACKS. 02456 M00S02271.rec +++| 02457 M00S02272.rec +++| ACE4 AOD T2 INCREMENT LENGTH OF THIS CHAIN 02458 M00S02273.rec +++| LDD CM+3 SET BYTE INDEX 02459 M00S02274.rec +++| LPN 3 02460 M00S02275.rec +++| STD T6 02461 M00S02276.rec +++| NJN ACE6 IF NOT POINTER TO NEW WORD 02462 M00S02277.rec +++| ACE5 LDD CM+3 READ NEW TRT WORD 02463 M00S02278.rec +++| SHN -2 02464 M00S02279.rec +++| ACEA ADC TRTS 02465 M00S02280.rec +++| CRD CN 02466 M00S02281.rec +++| ACE6 AOD CM+3 02467 M00S02282.rec +++| LMM CN,T6 02468 M00S02283.rec +++| ZJN ACE4 IF CONTIGUOUS TRACK 02469 M00S02284.rec +++| LDD T2 CHECK FOR LONGEST CHAIN 02470 M00S02285.rec +++| SBD CM+2 02471 M00S02286.rec +++| MJN ACE7 IF OLD TRACK CHAIN LONGER 02472 M00S02287.rec +++| RAD CM+2 SET NEW LENGTH 02473 M00S02288.rec +++| LDD T0 SET POINTER TO FIRST TRACK 02474 M00S02289.rec +++| STD CM 02475 M00S02290.rec +++| LDD T1 SET FIRST TRACK 02476 M00S02291.rec +++| STD CM+1 02477 M00S02292.rec +++| ACE7 LDD T2 CHECK IF THIS CHAIN LONG ENOUGH 02478 M00S02293.rec +++| SBD T7 02479 M00S02294.rec +++| MJN ACE8 IF NOT LONG ENOUGH 02480 M00S02295.rec +++| SBD T5 COMPARE AMOUNT OF SLOP 02481 M00S02296.rec +++| PJN ACE8 IF OLD CHAIN HAS LESS SLOP 02482 M00S02297.rec +++| RAD T5 SET NEW AMOUNT OF SLOP 02483 M00S02298.rec +++| LDD T0 SET POINTER TO FIRST TRACK 02484 M00S02299.rec +++| STD T3 02485 M00S02300.rec +++| LDD T1 SET FIRST TRACK 02486 M00S02301.rec +++| STD T4 02487 M00S02302.rec +++| ACE8 SOD CM+3 SET POINTER TO FIRST TRACK OF NEXT CHAIN 02488 M00S02303.rec +++| STD T0 02489 M00S02304.rec +++| LDM CN,T6 CHECK FOR EOI 02490 M00S02305.rec +++| ACE9 SHN 6 02491 M00S02306.rec +++| PJN ACE10 IF EOI 02492 M00S02307.rec +++| SHN -6 02493 M00S02308.rec +++| STD CM+3 SET FIRST TRACK OF NEXT CHAIN TO CHECK 02494 M00S02309.rec +++| STD T1 02495 M00S02310.rec +++| LPN 3 SET BYTE INDEX 02496 M00S02311.rec +++| STD T6 02497 M00S02312.rec +++| LDN 1 02498 M00S02313.rec +++| STD T2 02499 M00S02314.rec +++| LJM ACE5 02500 M00S02315.rec +++| 02501 M00S02316.rec +++|* COMPLETE PROCESSING. 02502 M00S02317.rec +++| 02503 M00S02318.rec +++| ACE10 LDD T7 ADJUST TRACK CHAIN LENGTH 02504 M00S02319.rec +++| RAD T5 02505 M00S02320.rec +++| LDD T4 CHECK IF LARGE ENOUGH CHAIN FOUND 02506 M00S02321.rec +++| NJN ACE11 IF CHAIN FOUND 02507 M00S02322.rec +++| LDD FS+4 02508 M00S02323.rec +++| UJN ACE14 DROP SHORT TRACK TRAIN 02509 M00S02324.rec +++| 02510 M00S02325.rec +++|* DROP UNUSED TRACKS. 02511 M00S02326.rec +++| 02512 M00S02327.rec +++| ACE11 LMD CM+4 02513 M00S02328.rec +++| ZJN ACE12 IF ONLY NEED TO DROP TRACKS OFF END 02514 M00S02329.rec +++| LDD FS SET EXTENDED MEMORY EQ NUMBER 02515 M00S02330.rec +++| STD CM+1 02516 M00S02331.rec +++| LDD FS+4 SET TRACK TO LINK TO 02517 M00S02332.rec +++| LPC 3777 02518 M00S02333.rec +++| STD CM+2 02519 M00S02334.rec +++| LDD T4 SET FIRST TRACK OF CONTIGUOUS CHAIN 02520 M00S02335.rec +++| STD CM+3 02521 M00S02336.rec +++| LDD T3 SET LAST TRACK TO DROP 02522 M00S02337.rec +++| STD CM+4 02523 M00S02338.rec +++| MONITOR DLKM 02524 M00S02339.rec +++| ACE12 LDD T7 CHECK IF ALL REQUEST SPACE FOUND 02525 M00S02340.rec +++| SBD T5 02526 M00S02341.rec +++| PJN ACE13 DROP UNNEEDED TRACKS 02527 M00S02342.rec +++| RAD T5 02528 M00S02343.rec +++| ACE13 LDD T4 COMPUTE LAST TRACK NEEDED IN CHAIN 02529 M00S02344.rec +++| ADD T5 02530 M00S02345.rec +++| SBN 1 02531 M00S02346.rec +++| ACE14 LPC 3777 02532 M00S02347.rec +++| STD CM+2 02533 M00S02348.rec +++| LDD FS SET EXTENDED MEMORY EQ NUMBER 02534 M00S02349.rec +++| LMC 4000 02535 M00S02350.rec +++| STD CM+1 02536 M00S02351.rec +++| LDN 0 SET SECTOR NUMBER 02537 M00S02352.rec +++| STD CM+3 02538 M00S02353.rec +++| MONITOR DTKM DROP TRACKS 02539 M00S02354.rec +++| 02540 M00S02355.rec +++|* COMPUTE RA AND LAST TRACK OF USER EXTENDED MEMORY AREA. 02541 M00S02356.rec +++| 02542 M00S02357.rec +++| LDD T4 SET FIRST TRACK 02543 M00S02358.rec +++| NJN ACE15 IF USER EXTENDED MEMORY SPACE FOUND 02544 M00S02359.rec +++| LJM ISS2 REPORT ERROR 02545 M00S02360.rec +++| 02546 M00S02361.rec +++| ACE15 STD FS+1 02547 M00S02362.rec +++| LPC 3777 COMPUTE USER EXTENDED MEMORY RA 02548 M00S02363.rec +++| STD T6 02549 M00S02364.rec +++| SHN 6 *100 02550 M00S02365.rec +++| ADD T6 *101 02551 M00S02366.rec +++| SHN 1 *202 02552 M00S02367.rec +++| ADN 77 ROUND TO NEAREST *EMBS* WORDS 02553 M00S02368.rec +++| SHN -6 02554 M00S02369.rec +++| STD FS+3 SET USER EXTENDED MEMORY RA 02555 M00S02370.rec +++| LDN 17 ROUND TO NEAREST *UEBS* WORDS 02556 M00S02371.rec +++| ACEC SHN -4 02557 M00S02372.rec +++|* SHN -4+UESC-EMSC 02558 M00S02373.rec +++| RAD FS+3 02559 M00S02374.rec +++| LDD T5 COMPUTE USER EXTENDED MEMORY FL 02560 M00S02375.rec +++| RAD T6 02561 M00S02376.rec +++| STD FS+4 SET LAST TRACK 02562 M00S02377.rec +++| SHN 6 *100 02563 M00S02378.rec +++| ADD T6 *101 02564 M00S02379.rec +++| SHN -5 *202/100 02565 M00S02380.rec +++| SBD FS+3 SUBTRACT EXTENDED MEMORY RA 02566 M00S02381.rec +++| SBD FS+2 02567 M00S02382.rec +++| PJN ACE16 IF SUFFICIENT SPACE 02568 M00S02383.rec +++| LJM ECS6 REPORT ERROR 02569 M00S02384.rec +++| 02570 M00S02385.rec +++| ACE16 LDC 3777 POINT TO LAST TRACK 02571 M00S02386.rec +++| RAD FS+4 02572 M00S02387.rec +++| LJM ACEX RETURN 02573 M00S02388.rec +++| CAD SPACE 4,10 02574 M00S02389.rec +++|** CAD - CLEAR ALLOCATION DATA. 02575 M00S02390.rec +++|* 02576 M00S02391.rec +++|* ENTRY (T9) = ID OF MACHINE TO BE CLEARED. 02577 M00S02392.rec +++|* 02578 M00S02393.rec +++|* USES T1. 02579 M00S02394.rec +++| 02580 M00S02395.rec +++| 02581 M00S02396.rec +++| CAD2 STI T1 CLEAR ENTRY 02582 M00S02397.rec +++| 02583 M00S02398.rec +++| CAD SUBR ENTRY/EXIT 02584 M00S02399.rec +++| LDC TAXM 02585 M00S02400.rec +++| STD T1 02586 M00S02401.rec +++| CAD1 LDI T1 02587 M00S02402.rec +++| LMD T9 02588 M00S02403.rec +++| ZJN CAD2 IF MATCH FOUND 02589 M00S02404.rec +++| LDN 5 02590 M00S02405.rec +++| RAD T1 02591 M00S02406.rec +++| LMC TAXML 02592 M00S02407.rec +++| NJN CAD1 LOOP 02593 M00S02408.rec +++| UJN CADX RETURN 02594 M00S02409.rec +++| CAT SPACE 4,10 02595 M00S02410.rec +++|** CAT - CALCULATE ADDRESS OF TRT. 02596 M00S02411.rec +++|* 02597 M00S02412.rec +++|* ENTRY (CATA) = EXTENDED MEMORY MST ADDRESS / 10. 02598 M00S02413.rec +++|* 02599 M00S02414.rec +++|* EXIT (A) = FWA OF TRT - 1000. 02600 M00S02415.rec +++|* 02601 M00S02416.rec +++|* USES T0 - T4. 02602 M00S02417.rec +++| 02603 M00S02418.rec +++| 02604 M00S02419.rec +++| CAT SUBR ENTRY/EXIT 02605 M00S02420.rec +++| LDC ** READ TRT ADDRESS FROM EXTENDED MEMORY MST 02606 M00S02421.rec +++| CATA EQU *-1 (ECS MST ADDRESS) 02607 M00S02422.rec +++| SHN 3 02608 M00S02423.rec +++| ADN TRLL 02609 M00S02424.rec +++| CRD T0 02610 M00S02425.rec +++| LDD T0+3 02611 M00S02426.rec +++| LPN 77 02612 M00S02427.rec +++| SHN 14 02613 M00S02428.rec +++| LMD T0+4 02614 M00S02429.rec +++| SBD TH 4000/4 02615 M00S02430.rec +++| UJN CATX RETURN 02616 M00S02431.rec +++| CDI SPACE 4,10 02617 M00S02432.rec +++|** CDI - CLEAR DEVICE INTERLOCK ON ECS. 02618 M00S02433.rec +++|* 02619 M00S02434.rec +++|* ENTRY (FS) = EXTENDED MEMORY EST ORDINAL. 02620 M00S02435.rec +++|* 02621 M00S02436.rec +++|* EXIT (DIFL) = 0. 02622 M00S02437.rec +++|* 02623 M00S02438.rec +++|* USES CM - CM+4. 02624 M00S02439.rec +++| 02625 M00S02440.rec +++| 02626 M00S02441.rec +++| CDI SUBR ENTRY/EXIT 02627 M00S02442.rec +++| LDM DIFL 02628 M00S02443.rec +++| ZJN CDIX IF INTERLOCK NOT SET 02629 M00S02444.rec +++| LDD FS SET EQUIPMENT 02630 M00S02445.rec +++| STD CM+1 02631 M00S02446.rec +++| LDN CDIS SET FUNCTION 02632 M00S02447.rec +++| STD CM+3 02633 M00S02448.rec +++| LDN 0 02634 M00S02449.rec +++| STD CM+2 02635 M00S02450.rec +++| STD CM+4 02636 M00S02451.rec +++| MONITOR STBM 02637 M00S02452.rec +++|* LDN 0 CLEAR INTERLOCK FLAG 02638 M00S02453.rec +++| STM DIFL 02639 M00S02454.rec +++| UJN CDIX RETURN 02640 M01S00090.271l716 +++| CTE SPACE 4,10 02641 M01S00091.271l716 +++|** CTE - CREATE MEMORY CONTROL TABLE ENTRY. 02642 M01S00092.271l716 +++|* 02643 M01S00093.271l716 +++|* ENTRY (KA) = CP/PCP NUMBER. 02644 M01S00094.271l716 +++|* (CN) = RAX BACKWARD LINK. 02645 M01S00095.271l716 +++|* (CN+1) = RAX FORWARD LINK. 02646 M01S00096.271l716 +++|* 02647 M01S00097.271l716 +++|* USES AB - AB+4, CM - CM+4. 02648 M01S00098.271l716 +++|* 02649 M01S00099.271l716 +++|* CALLS SCA. 02650 M01S00100.271l716 +++| 02651 M01S00101.271l716 +++| 02652 M01S00102.271l716 +++| CTE SUBR ENTRY/EXIT 02653 M01S00103.271l716 +++| LDD KA 02654 M01S00104.271l716 +++| RJM SCA SET CURRENT CPA/PCPA ADDRESS 02655 M01S00105.271l716 +++| ADN ECSW 02656 M01S00106.271l716 +++| CRD CM READ MEMORY CONTROL WORD 02657 M01S00107.271l716 +++| LDD CM+4 02658 M01S00108.271l716 +++| RAD CM+3 FORM RAX + FLX 02659 M01S00109.271l716 +++| SHN -14 02660 M01S00110.271l716 +++| RAD CM+2 NEXT POTENTIAL RAX 02661 M01S00111.271l716 +++| LDD CN+1 02662 M01S00112.271l716 +++| ZJN CTE1 IF SYSTEM CP 02663 M01S00113.271l716 +++| LMD NC 02664 M01S00114.271l716 +++| NJN CTE2 IF NOT LINKED TO SYSTEM CP 02665 M01S00115.271l716 +++| CTE1 STD CM+2 02666 M01S00116.271l716 +++| UJN CTE3 SET NO UNASSIGNED MEMORY 02667 M01S00117.271l716 +++| 02668 M01S00118.271l716 +++| CTE2 LDD CN+1 GET FORWARD LINKED CP/PCP ADDRESS 02669 M01S00119.271l716 +++| RJM SCA 02670 M01S00120.271l716 +++| ADN ECSW READ FL CONTROL WORD 02671 M01S00121.271l716 +++| CRD AB 02672 M01S00122.271l716 +++| LDD AB+2 RAX OF FORWARD LINK 02673 M01S00123.271l716 +++| SHN 14 02674 M01S00124.271l716 +++| LMD AB+3 02675 M01S00125.271l716 +++| SBD CM+3 SUBTRACT CURRENT RAX + FLX 02676 M01S00126.271l716 +++| CTE3 STD CN+4 02677 M01S00127.271l716 +++| SHN -14 02678 M01S00128.271l716 +++| SBD CM+2 SET UNASSIGNED MEMORY 02679 M01S00129.271l716 +++| STD CN+3 02680 M01S00130.271l716 +++| LDD KA FORM CONTROL TABLE ADDRESS 02681 M01S00131.271l716 +++| SHN 1 02682 M01S00132.271l716 +++| ADC 1 STORE MCT WORD 02683 M01S00133.271l716 +++| CTEA EQU *-1 02684 M01S00134.271l716 +++| CWD CN 02685 M01S00135.271l716 +++| UJP CTEX RETURN 02686 M00S02455.rec +++| FAD SPACE 4,10 02687 M00S02456.rec +++|** FAD - FETCH ALLOCATION DATA. 02688 M00S02457.rec +++|* 02689 M00S02458.rec +++|* EXIT (A) = ((T1)) = MACHINE ID,IF ONE FOUND. 02690 M00S02459.rec +++|* = 0 IF NO ENTRIES IN ALLOCATION DATA. 02691 M00S02460.rec +++|* 02692 M00S02461.rec +++|* USES T1. 02693 M00S02462.rec +++| 02694 M00S02463.rec +++| 02695 M00S02464.rec +++| FAD SUBR ENTRY/EXIT 02696 M00S02465.rec +++| LDC TAXM 02697 M00S02466.rec +++| STD T1 02698 M00S02467.rec +++| FAD1 LDI T1 02699 M00S02468.rec +++| NJN FADX IF ENTRY FOUND 02700 M00S02469.rec +++| LDN 5 02701 M00S02470.rec +++| RAD T1 02702 M00S02471.rec +++| LMC TAXML 02703 M00S02472.rec +++| ZJN FADX IF END OF SEARCH 02704 M00S02473.rec +++| UJN FAD1 LOOP 02705 M00S02474.rec +++| FSS SPACE 4,10 02706 M00S02475.rec +++|** FSS - FETCH SYSTEM SECTOR FOR USER EXTENDED MEMORY CHAIN. 02707 M00S02476.rec +++|* 02708 M00S02477.rec +++|* ENTRY (ECSE) = MST GLOBAL WORDS. 02709 M00S02478.rec +++|* (FS) = EXTENDED MEMORY EST ORDINAL. 02710 M00S02479.rec +++|* 02711 M00S02480.rec +++|* EXIT (BFMS) = SYSTEM SECTOR FOR USER EXTENDED MEMORY CHAIN. 02712 M00S02481.rec +++|* 02713 M00S02482.rec +++|* USES T5, T6. 02714 M00S02483.rec +++|* 02715 M00S02484.rec +++|* CALLS CDI, RSS. 02716 M00S02485.rec +++| 02717 M00S02486.rec +++| 02718 M00S02487.rec +++| FSS1 ENDMS 02719 M00S02488.rec +++| 02720 M00S02489.rec +++| FSS SUBR ENTRY/EXIT 02721 M00S02490.rec +++| LDD FS SET EST ORDINAL 02722 M00S02491.rec +++| STD T5 02723 M00S02492.rec +++| LDM ECSE+ACGL*5+1 SET FIRST TRACK 02724 M00S02493.rec +++| STD T6 02725 M00S02494.rec +++| SETMS IO 02726 M00S02495.rec +++| LDC ECSF READ SYSTEM SECTOR 02727 M00S02496.rec +++| RJM RSS 02728 M00S02497.rec +++| ZJN FSS1 IF NO ERROR IN SYSTEM SECTOR 02729 M00S02498.rec +++| RJM CDI CLEAR DEVICE INTERLOCK 02730 M00S02499.rec +++| LDC =C*USER EXTENDED MEMORY SYSTEM SECTOR ERROR.* 02731 M00S02500.rec +++| UJN HNG ISSUE ERROR AND HANG 02732 M00S02501.rec +++| FTM SPACE 4,10 02733 M00S02502.rec +++|** FTM - FIND THIS MACHINES ID IN THE SYSTEM SECTOR. 02734 M00S02503.rec +++|* 02735 M00S02504.rec +++|* ENTRY (T9) = MACHINE ID TO BE FOUND. 02736 M00S02505.rec +++|* (BFMS) = SYSTEM SECTOR FOR USER EXTENDED MEMORY CHAIN. 02737 M00S02506.rec +++|* 02738 M00S02507.rec +++|* EXIT (T8) = POINTER TO THIS MACHINES ID OR POINTER TO THE 02739 M00S02508.rec +++|* FIRST EMPTY SUB-CHAIN ENTRY. 02740 M00S02509.rec +++|* IF NO MATCH AND NO EMPTY ENTRY THEN EXIT TO *ECS6* 02741 M00S02510.rec +++|* TO REPORT ERROR CONDITION. 02742 M00S02511.rec +++|* 02743 M00S02512.rec +++|* USES T1, T8. 02744 M00S02513.rec +++| 02745 M00S02514.rec +++| 02746 M00S02515.rec +++| FTM3 LDD T1 02747 M00S02516.rec +++| NJN FTM4 IF EMPTY ENTRY FOUND 02748 M00S02517.rec +++| LJM ECS6 REPORT ERROR 02749 M00S02518.rec +++| 02750 M00S02519.rec +++| FTM4 STD T8 SET POINTER TO EMPTY SUB-CHAIN 02751 M00S02520.rec +++| 02752 M00S02521.rec +++| FTM SUBR ENTRY/EXIT 02753 M00S02522.rec +++| LDC BFMS+2+3*5 INITIALIZE POINTERS 02754 M00S02523.rec +++| STD T8 02755 M00S02524.rec +++| LDN 0 02756 M00S02525.rec +++| STD T1 02757 M00S02526.rec +++| FTM1 LDN 5 INCREMENT POINTER 02758 M00S02527.rec +++| RAD T8 02759 M00S02528.rec +++| LMC BFMS+2+10*5 02760 M00S02529.rec +++| ZJN FTM3 IF END OF SUB-CHAIN ENTRIES 02761 M00S02530.rec +++| LDI T8 02762 M00S02531.rec +++| NJN FTM2 IF NOT AN EMPTY ENTRY 02763 M00S02532.rec +++| LDD T1 02764 M00S02533.rec +++| NJN FTM1 IF FIRST EMPTY ENTRY ALREADY FOUND 02765 M00S02534.rec +++| LDD T8 SET POINTER TO EMPTY ENTRY 02766 M00S02535.rec +++| STD T1 02767 M00S02536.rec +++| UJN FTM1 LOOP 02768 M00S02537.rec +++| 02769 M00S02538.rec +++| FTM2 LMD T9 02770 M00S02539.rec +++| ZJN FTMX IF MATCH FOUND 02771 M00S02540.rec +++| UJN FTM1 LOOP 02772 M00S02541.rec +++| HNG SPACE 4,10 02773 M00S02542.rec +++|** HNG - ISSUE MESSAGE AND HANG. 02774 M00S02543.rec +++|* 02775 M00S02544.rec +++|* ENTRY (A) = ERROR MESSAGE ADDRESS. 02776 M00S02545.rec +++| 02777 M00S02546.rec +++| 02778 M00S02547.rec +++| HNG STM HNGA SAVE MESSAGE ADDRESS 02779 M00S02548.rec +++| LDN 4 02780 M00S02549.rec +++| STD T1 02781 M00S02550.rec +++| LDD NC WRITE MESSAGE TO SYSTEM CONTROL POINT 02782 M00S02551.rec +++| SHN 7 02783 M00S02552.rec +++| ADN MS2W 02784 M00S02553.rec +++| CWM **,T1 02785 M00S02554.rec +++| HNGA EQU *-1 02786 M00S02555.rec +++| UJN * HANG 02787 M00S02556.rec +++| ISS SPACE 4,10 02788 M00S02557.rec +++|** ISS - INITIALIZE SYSTEM SECTOR FOR USER EXTENDED MEMORY AREA. 02789 M00S02558.rec +++|* 02790 M00S02559.rec +++|* ENTRY (FS) = EXTENDED MEMORY EST ORDINAL. 02791 M00S02560.rec +++|* (CATA) = EXTENDED MEMORY MST ADDRESS / 10. 02792 M00S02561.rec +++|* (ECSE) = GLOBAL MST WORDS. 02793 M00S02562.rec +++|* 02794 M00S02563.rec +++|* EXIT UPDATED GLOBAL MST STORED IN CENTRAL MEMORY. 02795 M00S02564.rec +++|* SYSTEM SECTOR INITIALIZED. 02796 M00S02565.rec +++|* 02797 M00S02566.rec +++|* USES CM - CM+4, FA, T1, T2, T5, T6. 02798 M00S02567.rec +++|* 02799 M00S02568.rec +++|* CALLS CDI, DCH, RCH, SDI, SMS, WEI, WSS. 02800 M00S02569.rec +++| 02801 M00S02570.rec +++| 02802 M00S02571.rec +++| ISS SUBR ENTRY/EXIT 02803 M00S02572.rec +++| LDC 500 INITIALIZE TO CLEAR SYSTEM SECTOR 02804 M00S02573.rec +++| STD T1 02805 M00S02574.rec +++| ISS1 LDN 0 CLEAR SYSTEM SECTOR 02806 M00S02575.rec +++| STM BFMS+2,T1 02807 M00S02576.rec +++| SOD T1 02808 M00S02577.rec +++| NJN ISS1 IF NOT TIME TO MOVE FNT ENTRY 02809 M00S02578.rec +++| STD FA 02810 M00S02579.rec +++| LDD MA SET FNT ENTRY IN SYSTEM SECTOR 02811 M00S02580.rec +++| CWM ECSF,ON 02812 M00S02581.rec +++| SBN 1 02813 M00S02582.rec +++| CRM FNSS,ON 02814 M00S02583.rec +++| RJM CDI CLEAR INTERLOCK ON ECS 02815 M00S02584.rec +++| LDN ZERL REQUEST FIRST TRACK OF USER ECS CHAIN 02816 M00S02585.rec +++| CRD CM 02817 M00S02586.rec +++| LDD FS 02818 M00S02587.rec +++| STD CM+1 02819 M00S02588.rec +++| STD T5 02820 M00S02589.rec +++| MONITOR RTCM 02821 M00S02590.rec +++| LDD CM+4 02822 M00S02591.rec +++| NJN ISS3 IF TRACK ASSIGNED 02823 M00S02592.rec +++| ISS2 LDC =C*USER EXTENDED MEMORY SPACE UNAVAILABLE.* 02824 M00S02593.rec +++| LJM HNG ISSUE ERROR AND HANG 02825 M00S02594.rec +++| 02826 M00S02595.rec +++| ISS3 STD T6 02827 M00S02596.rec +++| RJM SDI INTERLOCK ECS 02828 M00S02597.rec +++| LDD T6 02829 M00S02598.rec +++| STM ECSE+ACGL*5+1 SET FIRST TRACK IN GLOBAL DATA 02830 M00S02599.rec +++| LDM CATA SET FIRST TRACK IN MST 02831 M00S02600.rec +++| SHN 3 02832 M00S02601.rec +++| ADN ACGL 02833 M00S02602.rec +++| CWM ECSE+ACGL*5,ON 02834 M00S02603.rec +++| RJM CDI CLEAR INTERLOCK ON ECS 02835 M00S02604.rec +++| SETMS IO 02836 M00S02605.rec +++| RJM WSS WRITE SYSTEM SECTOR 02837 M00S02606.rec +++| RJM WEI WRITE EOI 02838 M00S02607.rec +++| ENDMS 02839 M00S02608.rec +++| LDD T6 PRESERVE USER EXTENDED MEMORY AREA 02840 M00S02609.rec +++| STD CM+2 02841 M00S02610.rec +++| LDN SPFS 02842 M00S02611.rec +++| STD CM+3 02843 M00S02612.rec +++| LDD FS SET EXTENDED MEMORY EQUIPMENT 02844 M00S02613.rec +++| ADC 4000 SET CHECKPOINT REQUEST 02845 M00S02614.rec +++| STD CM+1 02846 M00S02615.rec +++| MONITOR STBM 02847 M00S02616.rec +++| LJM ISSX RETURN 02848 M00S02617.rec +++| RLS SPACE 4,10 02849 M00S02618.rec +++|** RLS - RELEASE EXISTING USER EXTENDED MEMORY SUB-CHAIN. 02850 M00S02619.rec +++|* 02851 M00S02620.rec +++|* ENTRY (BFMS) = SYSTEM SECTOR FOR USER EXTENDED MEMORY CHAIN. 02852 M00S02621.rec +++|* (ECSE) = GLOBAL MST WORDS. 02853 M00S02622.rec +++|* (FS) = EXTENDED MEMORY EST ORDINAL. 02854 M00S02623.rec +++|* (T8) = POINTER TO SUB-CHAIN ENTRY TO BE RELEASED. 02855 M00S02624.rec +++|* 02856 M00S02625.rec +++|* EXIT (A) = (FS+1) = (FS+3) = (FS+4) = 0. 02857 M00S02626.rec +++|* TO *ECS6* IF UNABLE TO LOCATE PREDECESSOR TRACK FOR 02858 M00S02627.rec +++|* SUB-CHAIN TO BE RELEASED. 02859 M00S02628.rec +++|* 02860 M00S02629.rec +++|* USES CM - CM+4, T1, T3. 02861 M00S02630.rec +++|* 02862 M00S02631.rec +++|* CALLS CAT. 02863 M00S02632.rec +++| 02864 M00S02633.rec +++| 02865 M00S02634.rec +++| RLS SUBR ENTRY/EXIT 02866 M00S02635.rec +++| RJM CAT CALCULATE FWA OF TRT 02867 M00S02636.rec +++| STM RLSA+1 02868 M00S02637.rec +++| STM RLSB+1 02869 M00S02638.rec +++| SHN -14 02870 M00S02639.rec +++| LMC ADCI 02871 M00S02640.rec +++| STM RLSA 02872 M00S02641.rec +++| STM RLSB 02873 M00S02642.rec +++| LDC BFMS+2+3*5+4 INITIALIZE FOR SEARCH 02874 M00S02643.rec +++| STD T3 02875 M00S02644.rec +++| LDM ECSE+ACGL*5+1 02876 M00S02645.rec +++| STI T3 02877 M00S02646.rec +++| 02878 M00S02647.rec +++|* LOCATE PREDECESSOR TRACK OF SUB-CHAIN TO BE RELEASED. 02879 M00S02648.rec +++| 02880 M00S02649.rec +++| RLS1 LDI T3 READ TRT WORD CONTAINING THIS TRACK 02881 M00S02650.rec +++| SHN -2 02882 M00S02651.rec +++| RLSA ADC TRTS 02883 M00S02652.rec +++| CRD CM 02884 M00S02653.rec +++| LDI T3 SET BYTE INDEX 02885 M00S02654.rec +++| LPN 3 02886 M00S02655.rec +++| STD T1 02887 M00S02656.rec +++| LDM CM,T1 CHECK LINK 02888 M00S02657.rec +++| LMM 1,T8 02889 M00S02658.rec +++| ZJN RLS2 IF PREDECESSOR TRACK FOUND 02890 M00S02659.rec +++| LDN 5 02891 M00S02660.rec +++| RAD T3 02892 M00S02661.rec +++| LMC BFMS+2+10*5+4 02893 M00S02662.rec +++| NJN RLS1 IF MORE ENTRIES TO SEARCH 02894 M00S02663.rec +++| LJM ECS6 REPORT ERROR 02895 M00S02664.rec +++| 02896 M00S02665.rec +++|* LOCATE SUCCESSOR TRACK TO SUB-CHAIN TO BE RELEASED. 02897 M00S02666.rec +++| 02898 M00S02667.rec +++| RLS2 LDM 4,T8 FIND TRACK TO LINK TO 02899 M00S02668.rec +++| SHN -2 02900 M00S02669.rec +++| RLSB ADC TRTS 02901 M00S02670.rec +++| CRD CM 02902 M00S02671.rec +++| LDM 4,T8 02903 M00S02672.rec +++| LPN 3 02904 M00S02673.rec +++| STD T1 02905 M00S02674.rec +++| LDM CM,T1 02906 M00S02675.rec +++| SHN 21-13 02907 M00S02676.rec +++| PJN RLS3 IF LAST TRACK IN CHAIN 02908 M00S02677.rec +++| 02909 M00S02678.rec +++|* DELINK SUB-CHAIN. 02910 M00S02679.rec +++| 02911 M00S02680.rec +++| SHN -6 SET TRACK TO BE LINKED 02912 M00S02681.rec +++| STD CM+3 02913 M00S02682.rec +++| LDI T3 SET TRACK TO LINK TO 02914 M00S02683.rec +++| LPC 3777 02915 M00S02684.rec +++| STD CM+2 02916 M00S02685.rec +++| LDM 4,T8 SET LAST TRACK TO DROP 02917 M00S02686.rec +++| STD CM+4 02918 M00S02687.rec +++| LDD FS SET EST ORDINAL 02919 M00S02688.rec +++| ADC 4000 SET CHECKPOINT REQUEST 02920 M00S02689.rec +++| STD CM+1 02921 M00S02690.rec +++| MONITOR DLKM 02922 M00S02691.rec +++| UJN RLS4 COMPLETE PROCESSING 02923 M00S02692.rec +++| 02924 M00S02693.rec +++|* DROP LAST SUB-CHAIN. 02925 M00S02694.rec +++| 02926 M00S02695.rec +++| RLS3 LDI T3 GET PREDECESSOR TRACK 02927 M00S02696.rec +++| LPC 3777 SET TO DROP AFTER THIS TRACK 02928 M00S02697.rec +++| STD CM+2 02929 M00S02698.rec +++| LDN 0 02930 M00S02699.rec +++| STD CM+3 02931 M00S02700.rec +++| STD CM+4 02932 M00S02701.rec +++| LDD FS SET EST ORDINAL 02933 M00S02702.rec +++| ADC 4000 SET CHECKPOINT REQUEST 02934 M00S02703.rec +++| STD CM+1 02935 M00S02704.rec +++| MONITOR DTKM 02936 M00S02705.rec +++| 02937 M00S02706.rec +++|* COMPLETE RELEASE SUB-CHAIN PROCESSING. 02938 M00S02707.rec +++| 02939 M00S02708.rec +++| RLS4 LDN 0 CLEAR TRACK POINTERS 02940 M00S02709.rec +++| STD FS+1 02941 M00S02710.rec +++| STD FS+4 02942 M00S02711.rec +++| STD FS+3 CLEAR RA OF RELEASED SUB-CHAIN 02943 M00S02712.rec +++| LJM RLSX RETURN 02944 M00S02713.rec +++| SCP SPACE 4,10 02945 M00S02714.rec +++|** SCP - SETUP CONTROL POINT AREAS. 02946 M00S02715.rec +++|* 02947 M00S02716.rec +++|* ENTRY (FS+2) = LENGTH OF USER EXTENDED MEMORY AREA / *EMBS*. 02948 M00S02717.rec +++|* (FS+3) = RA/*EMBS* OF USER EXTENDED MEMORY AREA. 02949 M00S02718.rec +++|* (NC) = NUMBER OF CONTROL POINTS. 02950 M01S00136.271l716 +++|* (NS) = NUMBER OF CP-S + PCP-S. 02951 M00S02719.rec +++|* 02952 M00S02720.rec +++|* EXIT *ECRL* SETUP IN CMR, ALL CONTROL POINT AREAS SETUP. 02953 M00S02721.rec +++|*
| Line S02722 Modification History | |
|---|---|
M01 (Removed by) | rec26 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02954 M02S02722.271l716 ---|* USES T7, CM - CM+4, FS+1 - FS+4.
| Line S00137 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02955 M01S00137.271l716 +++|* USES T1, T2, T7, CM - CM+4, FS+1 - FS+4. 02956 M01S00138.271l716 +++|* 02957 M01S00139.271l716 +++|* CALLS SMT.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | rec26 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02958 M02S00001.271l716 ---|* USES T1, T2, T7, CM - CM+4, FS+1 - FS+4. 02959 M00S02723.rec ---| 02960 M00S02724.rec ---| 02961 M00S02725.rec ---| SCP SUBR ENTRY/EXIT 02962 M00S02726.rec ---| LDD FS+2 02963 M00S02727.rec ---| STD FS+1 02964 M00S02728.rec ---| LDN ECRL COMPLETE BUILD OF *ECRL* 02965 M00S02729.rec ---| CRD CM 02966 M00S02730.rec ---| LDN 0 CLEAR EXTENDED MEMORY EQUIPMENT 02967 M00S02731.rec ---| STD CM 02968 M00S02732.rec ---| LDD FS+3 SET USER EXTENDED MEMORY RA 02969 M00S02733.rec ---| SCPA SHN 0 02970 M00S02734.rec ---|* SHN EMSC-UESC 02971 M00S02735.rec ---| STD FS+3 02972 M00S02736.rec ---| STD CM+3 02973 M00S02737.rec ---| SHN -14 02974 M00S02738.rec ---| STD FS+2 02975 M00S02739.rec ---| STD CM+2 02976 M00S02740.rec ---| LDN ECRL 02977 M00S02741.rec ---| CWD CM 02978 M00S02742.rec ---| LDD FS+1 02979 M00S02743.rec ---| ZJN SCPX IF NO USER ECS IN ECS EQUIPMENT
| Line S02744 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02980 M01S02744.271l716 ---| LDD CM+4 SAVE USER ECS RESERVED FOR CP 0
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | rec26 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02981 M02S00002.271l716 ---| STD T2
| Line S02745 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02982 M01S02745.271l716 ---| STD FS+4 02983 M01S02746.271l716 ---| LDN ZERL CLEAR WORK AREAS
| Line S00140 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02984 M01S00140.271l716 +++| LDD CM+4 02985 M01S00141.271l716 +++| STD FS+4 SAVE USER XM RESERVED FOR CP 0 02986 M01S00142.271l716 +++| LDN ZERL 02987 M00S02747.rec +++| CRD CM 02988 M00S02748.rec +++| LDN CPNS SETUP CONTROL POINT AREAS 02989 M00S02749.rec +++| STD T7 02990 M00S02750.rec +++| LDD FS+2 02991 M00S02751.rec +++| SHN 14 02992 M00S02752.rec +++| ADD FS+3 SET XM RA IN CONTROL POINT WORK AREA 02993 M00S02753.rec +++| ADD FS+4 02994 M00S02754.rec +++| SCP2 STD CM+3 02995 M00S02755.rec +++| SHN -14 02996 M00S02756.rec +++| STD CM+2 02997 M00S02757.rec +++| SCP3 LDD T7 FORM CONTROL POINT ADDRESS 02998 M00S02758.rec +++| SHN 7 02999 M00S02759.rec +++| ADN ECSW SET ECS RA IN CONTROL POINT AREA 03000 M00S02760.rec +++| CWD CM 03001 M00S02761.rec +++| AOD T7 03002 M00S02762.rec +++| SBD NC
| Line S02763 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03003 M01S02763.271l716 ---| PJN SCP4 IF END OF CONTROL POINTS 03004 M01S02764.271l716 ---| ADN 1 03005 M01S02765.271l716 ---| MJN SCP3 IF NOT AT LAST CONTROL POINT 03006 M01S02766.271l716 ---| LDD FS+1 SET LAST CONTROL POINT RA = USER EM FL
| Line S00143 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03007 M01S00143.271l716 +++| ZJN SCP4 IF SYSTEM CP 03008 M01S00144.271l716 +++| ADD NC 03009 M01S00145.271l716 +++| LMN 2 03010 M01S00146.271l716 +++| NJN SCP3 IF NOT SECOND CP 03011 M01S00147.271l716 +++| LDD FS+1 03012 M00S02767.rec +++| SCPB SHN 0 03013 M00S02768.rec +++|* SHN EMSC-UESC
| Line S02769 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03014 M01S02769.271l716 ---| ADD FS+3
| Line S00148 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03015 M01S00148.271l716 +++| ADD FS+3 ALLOCATE XM FL BETWEEN 1ST AND 2ND CP-S 03016 M00S02770.rec +++| SHN 6 03017 M00S02771.rec +++| LMD FS+2 03018 M00S02772.rec +++| SHN 14
| Line S02773 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03019 M01S02773.271l716 ---| UJN SCP2 SETUP LAST CONTROL POINT
| Line S00149 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03020 M01S00149.271l716 +++| UJN SCP2 SETUP SECOND CP AREA 03021 M00S02774.rec +++| 03022 M00S02775.rec +++| SCP4 LDD FS+2 SETUP *ECSW* FOR SYSTEM CONTROL POINT 03023 M00S02776.rec +++| STD CM+2 03024 M00S02777.rec +++| LDD FS+3 03025 M00S02778.rec +++| STD CM+3 03026 M00S02779.rec +++| LDD FS+1 03027 M00S02780.rec +++| SCPC SHN 0 03028 M00S02781.rec +++|* SHN EMSC-UESC 03029 M00S02782.rec +++| STD CM+4
| Line S02783 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03030 M01S02783.271l716 ---| LDD T7
| Line S00150 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03031 M01S00150.271l716 +++| LDD NC 03032 M00S02784.rec +++| SHN 7 03033 M00S02785.rec +++| ADN ECSW 03034 M00S02786.rec +++| CWD CM 03035 M01S00151.271l716 +++| LDD NS SET NUMBER OF PSEUDO CONTROL POINTS 03036 M01S00152.271l716 +++| SBD NC 03037 M01S00153.271l716 +++| ZJN SCP6 IF NO PCP-S 03038 M01S00154.271l716 +++| STD T2 03039 M01S00155.271l716 +++| 03040 M01S00156.271l716 +++|* SET UP PSEUDO CONTROL POINT AREAS. 03041 M01S00157.271l716 +++| 03042 M01S00158.271l716 +++| LDD NC INITIALIZE PCP NUMBER 03043 M01S00159.271l716 +++| STD T1 03044 M01S00160.271l716 +++| SBN CPLK CP LINK TO PCP-S 03045 M01S00161.271l716 +++| SHN 7 03046 M01S00162.271l716 +++| ADN ECSW GET FLX CONTROL WORD 03047 M01S00163.271l716 +++| CRD CM 03048 M01S00164.271l716 +++| SCP5 AOD T1 ADVANCE AND SET PCPA ADDRESS 03049 M01S00165.271l716 +++| RJM SCA 03050 M01S00166.271l716 +++| ADN ECSW STORE FLX CONTROL WORD 03051 M01S00167.271l716 +++| CWD CM 03052 M01S00168.271l716 +++| SOD T2 03053 M01S00169.271l716 +++| NJN SCP5 IF MORE PCP-S 03054 M01S00170.271l716 +++| SCP6 RJM SMT 03055 M01S00171.271l716 +++| LDN ACML 03056 M01S00172.271l716 +++| CRD CM 03057 M01S00173.271l716 +++| LDD FS+1 SET UNASSIGNED USER XM
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | rec30 |
Seq # *Modification Id* Act ----------------------------+ 03058 M01S00001.rec30 +++| SCPF SHN 0 03059 M01S00002.rec30 +++|* SHN EMSC-UESC 03060 M01S00003.rec30 +++| SBD FS+4 ADJUST FOR USER XM RESERVED FOR CP 0
| Line S00174 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03061 M01S00174.271l716 +++| STD CM+3 03062 M01S00175.271l716 +++| LDN ACML STORE AVAILABLE USER XM 03063 M01S00176.271l716 +++| CWD CM
| Line S02787 Modification History | |
|---|---|
M01 (Removed by) | rec26 |
Seq # *Modification Id* Act ----------------------------+ 03064 M01S02787.rec26 ---| LJM SCPX RETURN
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | rec26 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03065 M02S00003.271l716 ---| LDD T2 03066 M02S00004.271l716 ---| ZJP SCP6 IF NO ECS FOR CONTROL POINT ZERO 03067 M02S00005.271l716 ---| SHN 11 CONVERT TO WORDS
| Line S00177 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03068 M01S00177.271l716 +++| LDD FS+4 03069 M01S00178.271l716 +++| NJN SCP8 IF USER XM FOR CP 0 03070 M01S00179.271l716 +++| SCP7 LJM SCPX RETURN 03071 M01S00180.271l716 +++| 03072 M01S00181.271l716 +++| SCP8 SHN 11 CONVERT TO WORD COUNT
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | rec26 |
Seq # *Modification Id* Act ----------------------------+ 03073 M01S00006.rec26 +++| SCPD SHN 0 03074 M01S00007.rec26 +++|* SHN EMSC-UESC 03075 M01S00008.rec26 +++| STD T2 03076 M01S00009.rec26 +++| SHN -14 03077 M01S00010.rec26 +++| STD T1 03078 M01S00011.rec26 +++| LDN ZERL CLEAR THE MESSAGE BUFFER 03079 M01S00012.rec26 +++| CRD CM 03080 M01S00013.rec26 +++| LDD MA 03081 M01S00014.rec26 +++| CWM CM,ON 03082 M01S00015.rec26 +++| CWM CM,ON 03083 M01S00016.rec26 +++| CWM CM,ON 03084 M01S00017.rec26 +++| CWM CM,ON
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | rec26 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03085 M02S00018.271l716 ---| SCP5 LDD T1 CLEAR THE ECS BUFFER
| Line S00182 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03086 M01S00182.271l716 +++| SCP9 LDD T1 CLEAR XM BUFFER
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | rec26 |
Seq # *Modification Id* Act ----------------------------+ 03087 M01S00019.rec26 +++| SHN 14 03088 M01S00020.rec26 +++| LMD T2 03089 M01S00021.rec26 +++| SBN 4
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | rec26 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03090 M02S00022.271l716 ---| MJN SCP6 IF END OF BUFFER
| Line S00183 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03091 M01S00183.271l716 +++| MJN SCP7 IF END OF BUFFER
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | rec26 |
Seq # *Modification Id* Act ----------------------------+ 03092 M01S00023.rec26 +++| STD CM+4 03093 M01S00024.rec26 +++| STD T2 03094 M01S00025.rec26 +++| SHN -14 03095 M01S00026.rec26 +++| STD T1 03096 M01S00027.rec26 +++| LMC WRES*1000 MERGE SUBFUNCTION 03097 M01S00028.rec26 +++| STD CM+3 03098 M01S00029.rec26 +++| LDD MA SET CM ADDRESS 03099 M01S00030.rec26 +++| STD CM+2 03100 M01S00031.rec26 +++| LDC 300 SET WORD COUNT-1 03101 M01S00032.rec26 +++| STD CM+1 03102 M01S00033.rec26 +++| MONITOR ECSM 03103 M01S00034.rec26 +++| LDD CM+1
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | rec26 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03104 M02S00035.271l716 ---| NJN * IF ERROR 03105 M02S00036.271l716 ---| UJN SCP5 LOOP ON CLEAR 03106 M02S00037.271l716 ---| 03107 M02S00038.271l716 ---| SCP6 LJM SCPX RETURN
| Line S00184 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03108 M01S00184.271l716 +++| ZJN SCP9 IF NO ERROR 03109 M01S00185.271l716 +++| LDC SCPE 03110 M01S00186.271l716 +++| RJM ERR DISPLAY MESSAGE AND HANG 03111 M01S00187.271l716 +++| 03112 M01S00188.271l716 +++| 03113 M01S00189.271l716 +++| SCPE DATA C+*ECSM* ERROR CLEARING USER XM.+ 03114 M00S02788.rec +++| SDI SPACE 4,10 03115 M00S02789.rec +++|** SDI - SET DEVICE INTERLOCK ON ECS. 03116 M00S02790.rec +++|* 03117 M00S02791.rec +++|* ENTRY (FS) = EXTENDED MEMORY EST ORDINAL. 03118 M00S02792.rec +++|* 03119 M00S02793.rec +++|* EXIT (ECSE) = MST GLOBAL WORDS. 03120 M00S02794.rec +++|* (CATA) = EXTENDED MEMORY MST ADDRESS / 10. 03121 M00S02795.rec +++|* (DIFL) = 1. 03122 M00S02796.rec +++|* 03123 M00S02797.rec +++|* USES CM - CM+4. 03124 M00S02798.rec +++|* 03125 M00S02799.rec +++|* MACROS MONITOR, SFA. 03126 M00S02800.rec +++| 03127 M00S02801.rec +++| 03128 M00S02802.rec +++| SDI1 SFA EST,FS 03129 M00S02803.rec +++| ADK EQDE 03130 M00S02804.rec +++| CRD CM 03131 M00S02805.rec +++| LDD CM+4 READ MST GLOBAL WORDS 03132 M00S02806.rec +++| STM CATA 03133 M00S02807.rec +++| SHN 3 03134 M00S02808.rec +++| ADK TDGL 03135 M00S02809.rec +++| CRM ECSE,TR 03136 M00S02810.rec +++| 03137 M00S02811.rec +++| SDI SUBR ENTRY/EXIT 03138 M00S02812.rec +++| LDC 0 03139 M00S02813.rec +++| DIFL EQU *-1 DEVICE INTERLOCKED FLAG (CLEARED BY *CDI*) 03140 M00S02814.rec +++| NJN SDI1 IF DEVICE INTERLOCKED 03141 M00S02815.rec +++| STD CM+2 03142 M00S02816.rec +++| STD CM+4 03143 M00S02817.rec +++| LDD FS SET EQUIPMENT 03144 M00S02818.rec +++| STD CM+1 03145 M00S02819.rec +++| LDN SDIS SET FUNCTION 03146 M00S02820.rec +++| STD CM+3 03147 M00S02821.rec +++| MONITOR STBM 03148 M00S02822.rec +++| AOM DIFL SET INTERLOCKED FLAG 03149 M00S02823.rec +++| UJN SDI1 READ MST GLOBAL WORDS 03150 M01S00190.271l716 +++| SMT SPACE 4,10 03151 M01S00191.271l716 +++|** SMT - SETUP MEMORY CONTROL TABLE. 03152 M01S00192.271l716 +++|* 03153 M01S00193.271l716 +++|* ENTRY (NC) = SYSTEM CP NUMBER. 03154 M01S00194.271l716 +++|* (NS) = NUMBER OF CP-S + PCP-S. 03155 M01S00195.271l716 +++|* 03156 M01S00196.271l716 +++|* USES T5, KA, KB, CN - CN+4. 03157 M01S00197.271l716 +++|* 03158 M01S00198.271l716 +++|* CALLS CTE. 03159 M01S00199.271l716 +++| 03160 M01S00200.271l716 +++| 03161 M01S00201.271l716 +++| SMT SUBR ENTRY/EXIT 03162 M01S00202.271l716 +++| LDN 0 03163 M01S00203.271l716 +++| STD KA INITIALIZE CP NUMBER 03164 M01S00204.271l716 +++| CRD CN 03165 M01S00205.271l716 +++| LDD NS SET MCT ENTRY COUNT 03166 M01S00206.271l716 +++| ADN 1 03167 M01S00207.271l716 +++| STD KB INCLUDE CP-0 03168 M01S00208.271l716 +++| STD T5 03169 M01S00209.271l716 +++| SMT1 LDD KA 03170 M01S00210.271l716 +++| STD CN SET BACKWARD LINK 03171 M01S00211.271l716 +++| LDD CN+1 03172 M01S00212.271l716 +++| STD KA CURRENT = PREVIOUS FORWARD LINK 03173 M01S00213.271l716 +++| LMD NC 03174 M01S00214.271l716 +++| ZJN SMT3 IF CREATING ENTRY FOR SYSTEM CP 03175 M01S00215.271l716 +++| AOD CN+1 03176 M01S00216.271l716 +++| ADN CPLK CHECK NEW FORWARD LINK 03177 M01S00217.271l716 +++| SBD NC 03178 M01S00218.271l716 +++| NJN SMT2 IF NOT CP TO LINK TO PCP-S 03179 M01S00219.271l716 +++| LDD NC 03180 M01S00220.271l716 +++| ADN 1 SET FIRST PCP NUMBER 03181 M01S00221.271l716 +++| STD CN+1 03182 M01S00222.271l716 +++| SMT2 LDD CN+1 CHECK NEW FORWARD LINK 03183 M01S00223.271l716 +++| LMD T5 03184 M01S00224.271l716 +++| NJN SMT4 IF NOT LINKING OUT OF PCP-S 03185 M01S00225.271l716 +++| LDD NC 03186 M01S00226.271l716 +++| SBN CPLK SET FORWARD LINK TO REAL CP 03187 M01S00227.271l716 +++| SMT3 STD CN+1 03188 M01S00228.271l716 +++| SMT4 RJM CTE CREATE TABLE ENTRY FOR XM 03189 M01S00229.271l716 +++| SOD KB 03190 M01S00230.271l716 +++| NJN SMT1 IF NOT END OF TABLE 03191 M01S00231.271l716 +++| UJP SMTX RETURN 03192 M00S02824.rec +++| SSS SPACE 4,10 03193 M00S02825.rec +++|** SSS - STORE SYSTEM SECTOR FOR USER EXTENDED MEMORY CHAIN. 03194 M00S02826.rec +++|* 03195 M00S02827.rec +++|* ENTRY (ECSE) = MST GLOBAL WORDS. 03196 M00S02828.rec +++|* (FS) = EXTENDED MEMORY EST ORDINAL. 03197 M00S02829.rec +++|* (FS+1) = FIRST TRACK OF SUB-CHAIN. 03198 M00S02830.rec +++|* (FS+2) = LENGTH OF USER EXTENDED MEMORY AREA. 03199 M00S02831.rec +++|* (FS+3) = RA OF USER EXTENDED MEMORY AREA. 03200 M00S02832.rec +++|* (FS+4) = LAST TRACK OF SUB-CHAIN. 03201 M00S02833.rec +++|* (T8) = POINTER TO SUB-CHAIN DESCRIPTOR ENTRY. 03202 M00S02834.rec +++|* (T9) = MMF MACHINE ID FOR CHAIN. 03203 M00S02835.rec +++|* = 0 IF SUB-CHAIN ENTRY TO BE CLEARED. 03204 M00S02836.rec +++|* 03205 M00S02837.rec +++|* EXIT SYSTEM SECTOR UPDATED WITH NEW INFORMATION. 03206 M00S02838.rec +++|* 03207 M00S02839.rec +++|* USES FA, T5, T6. 03208 M00S02840.rec +++|* 03209 M00S02841.rec +++|* CALLS WSS. 03210 M00S02842.rec +++|* 03211 M00S02843.rec +++|* MACROS ENDMS, SETMS. 03212 M00S02844.rec +++| 03213 M00S02845.rec +++| 03214 M00S02846.rec +++| SSS SUBR ENTRY/EXIT 03215 M00S02847.rec +++| LDD FS SET EST ORDINAL 03216 M00S02848.rec +++| STD T5 03217 M00S02849.rec +++| LDM ECSE+ACGL*5+1 SET FIRST TRACK 03218 M00S02850.rec +++| STD T6 03219 M00S02851.rec +++| LDD T9 SET MMF ID 03220 M00S02852.rec +++| NJN SSS1 IF NOT CLEARING ENTRY 03221 M00S02853.rec +++| LDD T8 03222 M00S02854.rec +++| STM SSSA 03223 M00S02855.rec +++| LDN ZERL 03224 M00S02856.rec +++| CRM **,ON 03225 M00S02857.rec +++| SSSA EQU *-1 03226 M00S02858.rec +++| UJN SSS2 WRITE SECTOR 03227 M00S02859.rec +++| 03228 M00S02860.rec +++| SSS1 STI T8 03229 M00S02861.rec +++| LDD FS+1 SET FIRST TRACK OF USER ECS AREA 03230 M00S02862.rec +++| STM 1,T8 03231 M00S02863.rec +++| LDD FS+2 SET LENGTH OF USER EXTENDED MEMORY AREA 03232 M00S02864.rec +++| STM 2,T8 03233 M00S02865.rec +++| LDD FS+3 SET RA OF USER EXTENDED MEMORY AREA 03234 M00S02866.rec +++| STM 3,T8 03235 M00S02867.rec +++| LDD FS+4 SET LAST TRACK OF USER ECS 03236 M00S02868.rec +++| STM 4,T8 03237 M00S02869.rec +++| SSS2 SETMS IO,DF 03238 M00S02870.rec +++| LDN 0 SET FNT DATA PRESTORED 03239 M00S02871.rec +++| STD FA 03240 M00S02872.rec +++| RJM WSS WRITE SYSTEM SECTOR 03241 M00S02873.rec +++| ENDMS 03242 M00S02874.rec +++| LJM SSSX RETURN 03243 M00S02875.rec +++| 03244 M00S02876.rec +++| SPACE 4,10 03245 M00S02877.rec +++| OVERFLOW ECSX,BFMS 03246 M00S02878.rec +++| PRS SPACE 4,10 03247 M00S02879.rec +++|** PRS - PRESET PROGRAM. 03248 M00S02880.rec +++|* 03249 M00S02881.rec +++|* ENTRY (FS) = BYTE 0 OF *ECRL* = EM EST ORDINAL FROM *SET*. 03250 M00S02882.rec +++|* (FS+1) = USER XM SIZE / *UEBS*. 03251 M00S02883.rec +++|* (FS+2 - FS+3) = USER XM RA / *UEBS*. 03252 M00S02884.rec +++|* (RS) = RECOVERY STATUS. 03253 M00S02885.rec +++|* TAXM = EM ALLOCATION TABLE GENERATED BY *SET*. 03254 M00S02886.rec +++|* 03255 M00S02887.rec +++|* EXIT (FS+2) = USER XM SIZE / *EMBS*. 03256 M00S02888.rec +++|* (FS+3) = USER XM RA / *EMBS*. 03257 M00S02889.rec +++|* (T9) = MACHINE ID. 03258 M00S02890.rec +++|*
| Line S02891 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03259 M01S02891.271l716 ---|* USES T0, CM - CM+4, CN - CN+4.
| Line S00232 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03260 M01S00232.271l716 +++|* USES CM - CM+4, CN - CN+4, T5 - T7. 03261 M00S02892.rec +++| 03262 M00S02893.rec +++| 03263 M00S02894.rec +++| PRS SUBR ENTRY/EXIT
| Line S02895 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03264 M01S02895.271l716 ---| LDK MEFL PRESET SHIFT INSTRUCTIONS 03265 M01S02896.271l716 ---| CRD CM 03266 M01S02897.271l716 ---| ADN MMFL-MEFL 03267 M01S02898.271l716 ---| CRD CN 03268 M01S02899.271l716 ---| LDD CM+2 GET USER EXTENDED SHIFT COUNT (*UESC*) 03269 M01S02900.271l716 ---| SHN -11 03270 M01S02901.271l716 ---| STD T9 SAVE *UESC* 03271 M01S02902.271l716 ---| LDD CM+2 GET XM SHIFT (EMSC)
| Line S00233 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03272 M01S00233.271l716 +++| LDN MEFL 03273 M01S00234.271l716 +++| CRD T5 GET XM SHIFT COUNTS 03274 M01S00235.271l716 +++| ADN MMFL-MEFL 03275 M01S00236.271l716 +++| CRD CN FETCH MMF STATUS 03276 M01S00237.271l716 +++| ADN MCTP-MMFL 03277 M01S00238.271l716 +++| CRD CM READ MCT POINTER 03278 M01S00239.271l716 +++| LDD CM+1 03279 M01S00240.271l716 +++| RAM CTEA 03280 M01S00241.271l716 +++| SHN -14 SET MCT ADDRESS 03281 M01S00242.271l716 +++| ADD CM 03282 M01S00243.271l716 +++| RAM CTEA-1 03283 M01S00244.271l716 +++| LDD T7 EXTRACT USER XM SHIFT COUNT *UESC* 03284 M01S00245.271l716 +++| SHN -11 03285 M01S00246.271l716 +++| STD T9 03286 M01S00247.271l716 +++| LDD T7 EXTRACT XM SHIFT COUNT *EMSC* 03287 M00S02903.rec +++| SHN -5 03288 M00S02904.rec +++| LPN 3 03289 M00S02905.rec +++| STD T0 03290 M00S02906.rec +++| SBD T9
| Line S02907 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03291 M01S02907.271l716 ---| LPN 77
| Line S00248 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03292 M01S00248.271l716 +++| LPN 77 PRESET SHIFT INSTRUCTIONS 03293 M00S02908.rec +++| RAM SCPA 03294 M00S02909.rec +++| STM SCPB 03295 M00S02910.rec +++| STM SCPC
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | rec26 |
Seq # *Modification Id* Act ----------------------------+ 03296 M01S00039.rec26 +++| STM SCPD
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | rec30 |
Seq # *Modification Id* Act ----------------------------+ 03297 M01S00004.rec30 +++| STM SCPF 03298 M00S02911.rec +++| LMN 77 03299 M00S02912.rec +++| STM PRSA 03300 M00S02913.rec +++| STM PRSB 03301 M00S02914.rec +++| LDD T9 03302 M00S02915.rec +++| SBD T0 03303 M00S02916.rec +++| RAM ACEB 03304 M00S02917.rec +++| STM ACEC 03305 M00S02918.rec +++| LDD FS+2 ADJUST USER XM RA 03306 M00S02919.rec +++| SHN 14 03307 M00S02920.rec +++| ADD FS+3 03308 M00S02921.rec +++| PRSA SHN 0 03309 M00S02922.rec +++|* SHN UESC-EMSC 03310 M00S02923.rec +++| STD FS+3 03311 M00S02924.rec +++| LDD FS+1 ADJUST USER XM FL VALUE 03312 M00S02925.rec +++| PRSB SHN 0 03313 M00S02926.rec +++|* SHN UESC-EMSC 03314 M00S02927.rec +++| STD FS+2 03315 M00S02928.rec +++| LDD CN+1 CHECK ALLOCATING ON LINK DEVICE 03316 M00S02929.rec +++| LPC 777 03317 M00S02930.rec +++| STM ECSB 03318 M00S02931.rec +++| LDD CN SAVE MACHINE ID 03319 M00S02932.rec +++| STD T9 03320 M00S02933.rec +++| UJP PRSX RETURN 03321 M00S02934.rec +++| 03322 M00S02935.rec +++| QUAL 03323 M00S02936.rec +++| TTL REC/4RC - RECOVER CHANNEL/EQUIPMENT STATUS. 03324 M00S02937.rec +++| TITLE 03325 M00S02938.rec +++| QUAL RCE 03326 M00S02939.rec +++| IDENT 4RC,RCEX 03327 M00S02940.rec +++|*COMMENT REC - RECOVER CHANNEL/EQUIPMENT STATUS.
| Line S02941 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 03328 M01S02941.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1981.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 03329 M01S00004.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 03330 M00S02942.rec +++| SPACE 4,10 03331 M00S02943.rec +++|*** RCE - RECOVER CHANNEL/EQUIPMENT STATUS. 03332 M00S02944.rec +++|* 03333 M00S02945.rec +++|* RCE WILL READ THE CHANNEL INTERLOCK TABLES AND THE 03334 M00S02946.rec +++|* EQUIPMENT STATUS TABLE (EST) FROM THE CHECKPOINT FILE. 03335 M00S02947.rec +++|* THE FOLLOWING ITEMS MUST BE RESTORED TO THE STATUS THAT 03336 M00S02948.rec +++|* EXISTED BEFORE THE RECOVERY. 03337 M00S02949.rec +++|* 1. CHANNELS THAT ARE GLOBALLY DOWN. 03338 M00S02950.rec +++|* 2. CHANNELS THAT ARE DOWN FOR A SPECIFIC EQUIPMENT, BUT 03339 M00S02951.rec +++|* ARE NOT GLOBALLY DOWN. 03340 M00S02952.rec +++|* 3. CHANNELS THAT ARE ASSIGNED TO EJT ORDINALS. 03341 M00S02953.rec +++|* 4. EQUIPMENTS THAT ARE DOWN. THE DATA TO BE RESTORED 03342 M00S02954.rec +++|* INCLUDES THE DOWN, UNAVAILABLE AND OFF BITS IN THE 03343 M00S02955.rec +++|* EST, AND GLOBAL DOWN, GLOBAL UNLOAD, UNLOAD 03344 M00S02956.rec +++|* REQUESTED AND UNLOADED BITS IN THE MST. 03345 M00S02957.rec +++| RCE SPACE 4,10 03346 M00S02958.rec +++|*** ENTRY CONDITIONS. 03347 M00S02959.rec +++|* 03348 M00S02960.rec +++|* (SE) = EST ORDINAL OF CHECKPOINT FILE. 03349 M00S02961.rec +++|* (RECE) = FIRST TRACK OF CHECKPOINT FILE. 03350 M00S02962.rec +++| SPACE 4,10 03351 M00S02963.rec +++| ORG OVLA 03352 M00S02964.rec +++| SPACE 4,10 03353 M00S02965.rec +++|** RCE - MAIN ROUTINE. 03354 M00S02966.rec +++| 03355 M00S02967.rec +++| 03356 M00S02968.rec +++| RCE SUBR ENTRY/EXIT 03357 M00S02969.rec +++| LDD RS 03358 M00S02970.rec +++| LPN SYMK CHECK RECOVERY LEVEL 03359 M00S02971.rec +++| LMN SYCM 03360 M00S02972.rec +++| ZJN RCE1 IF CM RECOVERY 03361 M00S02973.rec +++| LDD CE 03362 M00S02974.rec +++| STD T5 CHECKPOINT DEVICE EST ORDINAL 03363 M00S02975.rec +++| SETMS IO 03364 M00S02976.rec +++| LDM RECE SET FIRST TRACK OF CHECKPOINT FILE 03365 M00S02977.rec +++| STD T6 03366 M00S02978.rec +++| LDN 3 SET SECTOR OF EST 03367 M00S02979.rec +++| STD T7
| Line S02980 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03368 M01S02980.rec21 ---| RJM SKR SKIP EST
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03369 M01S00001.rec21 +++| RJM PET PROCESS EST 03370 M00S02981.rec +++| RJM PCH PROCESS CHANNEL TABLES
| Line S02982 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03371 M01S02982.rec21 ---| LDM RECE 03372 M01S02983.rec21 ---| STD T6 RESET FIRST TRACK 03373 M01S02984.rec21 ---| LDN 3 03374 M01S02985.rec21 ---| STD T7 03375 M01S02986.rec21 ---| SETMS POSITION PROCESS EST 03376 M01S02987.rec21 ---| RJM PET 03377 M00S02988.rec ---| RCE1 RJM RSE RELEASE SYSTEM ASSIGNED EQUIPMENT 03378 M00S02989.rec ---| UJP RCEX RETURN 03379 M01S02990.rec21 ---| 03380 M01S02991.rec21 ---| 03381 M01S02992.rec21 ---| RCEA DATA C*SYSTEM FILE PARITY ERROR.* 03382 M00S02993.rec ---| TITLE SUBROUTINES. 03383 M00S02994.rec ---| CDS SPACE 4,10 03384 M00S02995.rec ---|** CDS - CHECK DEVICE STATUS. 03385 M00S02996.rec ---|* 03386 M00S02997.rec ---|* ENTRY (T5) = EST ORDINAL. 03387 M00S02998.rec ---|* (CA) = BUFFER ADDRESS OF EST ENTRY. 03388 M00S02999.rec ---|* 03389 M00S03000.rec ---|* MACROS SMSTF. 03390 M00S03001.rec ---| 03391 M00S03002.rec ---| 03392 M00S03003.rec ---| CDS1 LDI CA CHECK PREVIOUS RECOVERY STATUS 03393 M00S03004.rec ---| SHN 21-6 03394 M00S03005.rec ---| PJN CDSX IF DEVICE AVAILABLE 03395 M00S03006.rec ---| CDS2 SMSTF LUNL SET UNLOAD REQUESTED 03396 M00S03007.rec ---| SMSTF LDUL SET DEVICE UNLOADED 03397 M00S03008.rec ---| 03398 M00S03009.rec ---| CDS SUBR ENTRY/EXIT 03399 M00S03010.rec ---| LDI CA 03400 M00S03011.rec ---| SHN 21-13 03401 M00S03012.rec ---| PJN CDSX IF NOT MS DEVICE 03402 M00S03013.rec ---| SHN 14 03403 M00S03014.rec ---| LPN 3 CHECK DEVICE STATE 03404 M00S03015.rec ---| LMN 3 03405 M00S03016.rec ---| NJN CDS1 IF NOT DOWN 03406 M00S03017.rec ---| SMSTF GUNL SET GLOBAL UNLOAD 03407 M00S03018.rec ---| UJN CDS2 SET LOCAL MST STATUS 03408 M00S03019.rec ---| DDC SPACE 4,10 03409 M00S03020.rec ---|** DDC - DETERMINE DOWN CHANNELS. 03410 M00S03021.rec ---|* 03411 M00S03022.rec ---|* ENTRY (CA) = ADDRESS OF EST ENTRY IN BUFFER. 03412 M00S03023.rec ---|* 03413 M00S03024.rec ---|* EXIT ANY CHANNEL MARKED AS DOWN ON THE CHECKPOINT FILE 03414 M00S03025.rec ---|* WILL BE SET DOWN IN THE CM COPY OF THE EST ENTRY. 03415 M00S03026.rec ---|* 03416 M00S03027.rec ---|* USES T1, T2, CM - CM+4. 03417 M00S03028.rec ---|* 03418 M00S03029.rec ---|* CALLS ISF. 03419 M00S03030.rec ---|* 03420 M00S03031.rec ---|* MACROS MONITOR. 03421 M00S03032.rec ---| 03422 M00S03033.rec ---| 03423 M00S03034.rec ---| DDC4 AOD T1 ADVANCE CHANNEL BYTE ADDRESS 03424 M00S03035.rec ---| LMD T2 03425 M00S03036.rec ---| NJN DDC1 IF ANOTHER CHANNEL TO CHECK 03426 M00S03037.rec ---| 03427 M00S03038.rec ---| DDC SUBR ENTRY/EXIT 03428 M00S03039.rec ---| LDD CA 03429 M00S03040.rec ---| ADN 1 SET CHANNEL BYTE ADDRESS 03430 M00S03041.rec ---| STD T1 03431 M00S03042.rec ---| ADN 2 SET END OF PATH DESCRIPTORS 03432 M00S03043.rec ---| STD T2 03433 M00S03044.rec ---| DDC1 LDI T1 03434 M00S03045.rec ---| ZJN DDC4 IF ACCESS UNDEFINED 03435 M00S03046.rec ---| SHN 0-11 03436 M00S03047.rec ---| LMN 4 03437 M00S03048.rec ---| DDC2 ZJN DDC4 IF CHANNEL PRESENT AND UP 03438 M00S03049.rec ---| LPN 3 03439 M00S03050.rec ---| ZJN DDC3 IF CHANNEL AVAILABLE 03440 M00S03051.rec ---| LDN DNCS 03441 M00S03052.rec ---| RJM ISF DOWN THE CHANNEL 03442 M00S03053.rec ---| DDC3 LDI T1 03443 M00S03054.rec ---| SHN 0-13 03444 M00S03055.rec ---| NJN DDC4 IF CHANNEL PRESENT 03445 M00S03056.rec ---| LDN DAPS 03446 M00S03057.rec ---| STD CM+3 03447 M00S03058.rec ---| LDD EO SET EST ORDINAL 03448 M00S03059.rec ---| STD CM+1 03449 M00S03060.rec ---| LDI T1 03450 M00S03061.rec ---| LPN 77 03451 M00S03062.rec ---| STD CM+2 03452 M00S03063.rec ---| MONITOR SCSM DISABLE ACCESS PATH 03453 M00S03064.rec ---|* LDN 0 03454 M00S03065.rec ---| UJP DDC4 CHECK FOR ALTERNATE ACCESS 03455 M00S03066.rec ---| IEQ SPACE 4,10 03456 M00S03067.rec ---|** IEQ - IDENTIFY EQUIPMENT. 03457 M00S03068.rec ---|* 03458 M00S03069.rec ---|* ENTRY (CA) = BUFFER ADDRESS OF EST ENTRY. 03459 M00S03070.rec ---|* (T5) = EST ORDINAL. 03460 M00S03071.rec ---|* (CN - CN+4) = EST ENTRY FROM CMR. 03461 M00S03072.rec ---|* 03462 M01S03073.rec21 ---|* EXIT (A) .LT. 0 IF NON-REMOVABLE MS DEVICE. 03463 M01S03074.rec21 ---|* .EQ. 0 IF REMOVABLE MS OR TAPE DEVICE. 03464 M01S03075.rec21 ---|* .GT. 0 IF NOT MASS STORAGE OR TAPE DEVICE. 03465 M01S03076.rec21 ---|* 03466 M00S03077.rec ---|* MACROS SFA. 03467 M00S03078.rec ---| 03468 M01S03079.rec21 ---| 03469 M01S03080.rec21 ---| IEQ1 SHN 13-10+1 03470 M01S03081.rec21 ---| LMN 1 COMPLEMENT REMOVABLE STATUS 03471 M01S03082.rec21 ---| LPN 1 03472 M01S03083.rec21 ---| SHN 21-0 SHIFT TO SIGN POSITION 03473 M00S03084.rec ---| 03474 M00S03085.rec ---| IEQ SUBR ENTRY/EXIT 03475 M00S03086.rec ---| LDD CA 03476 M00S03087.rec ---| ADN EQAE*5 03477 M00S03088.rec ---| STM IEQA 03478 M00S03089.rec ---| SFA EST,T5 REWRITE *EQAE* WORD OF EST ENTRY 03479 M00S03090.rec ---| ADK EQAE 03480 M00S03091.rec ---| CWM **,ON 03481 M00S03092.rec ---| IEQA EQU *-1 03482 M00S03093.rec ---| LDI CA 03483 M00S03094.rec ---| SHN 21-13 03484 M01S03095.rec21 ---| MJN IEQ1 IF MS DEVICE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03485 M01S00002.rec21 +++| MJN IEQX IF MS DEVICE 03486 M00S03096.rec +++| LDM 3,CA 03487 M00S03097.rec +++| STD CN+3 03488 M00S03098.rec +++| SFA EST,T5 PRESERVE DEVICE MNEMONIC 03489 M00S03099.rec +++| ADK EQDE 03490 M00S03100.rec +++| CWD CN
| Line S03101 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03491 M01S03101.rec21 ---| LDD CN+3 CHECK TAPE EQUIPMENT 03492 M01S03102.rec21 ---| LMC 2RMT 03493 M01S03103.rec21 ---| ZJN IEQX IF EQUIPMENT TYPE *MT* 03494 M01S03104.rec21 ---| LMC 2RNT&2RMT 03495 M00S03105.rec ---| UJP IEQX RETURN 03496 M00S03106.rec ---| ISF SPACE 4,10 03497 M00S03107.rec ---|** ISF - ISSUE *SEQM* FUNCTION. 03498 M00S03108.rec ---|* 03499 M00S03109.rec ---|* ENTRY (A) = *SEQM* SUBFUNCTION. 03500 M00S03110.rec ---|* (T1) = CHANNEL DESCRIPTOR ADDRESS. 03501 M00S03111.rec ---|* (EO) = EST ORDINAL. 03502 M00S03112.rec ---|* 03503 M00S03113.rec ---|* EXIT (A) = 0. 03504 M00S03114.rec ---|* (CM+1) = *SEQM* STATUS. 03505 M00S03115.rec ---|* 03506 M00S03116.rec ---|* USES CM - CM+4. 03507 M00S03117.rec ---|* 03508 M00S03118.rec ---|* MACROS MONITOR. 03509 M00S03119.rec ---| 03510 M00S03120.rec ---| 03511 M00S03121.rec ---| ISF SUBR ENTRY/EXIT 03512 M00S03122.rec ---| STD CM+2 03513 M00S03123.rec ---| LDD EO SET EST ORDINAL 03514 M00S03124.rec ---| STD CM+1 03515 M00S03125.rec ---| LDI T1 SET CHANNEL NUMBER 03516 M00S03126.rec ---| LPN 77 03517 M00S03127.rec ---| STD CM+3 03518 M00S03128.rec ---| LDN 0 CLEAR MUX CHANNEL INDICATOR 03519 M00S03129.rec ---| STD CM+4 03520 M00S03130.rec ---| MONITOR SEQM MODIFY PATH DESCRIPTOR 03521 M00S03131.rec ---|* LDN 0 03522 M00S03132.rec ---| UJN ISFX RETURN 03523 M00S03133.rec ---| PCH SPACE 4,10 03524 M00S03134.rec ---|** PCH - PROCESS CHANNEL TABLES. 03525 M00S03135.rec ---|* 03526 M00S03136.rec ---|* ENTRY SYSTEM FILE POSITIONED TO CHANNEL TABLES. 03527 M00S03137.rec ---|* 03528 M01S03138.rec21 ---|* EXIT CHANNEL STATUS TABLE (DOWN BIT ONLY) AND EJT 03529 M01S03139.rec21 ---|* ASSIGNMENT TABLE RESTORED.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03530 M01S00003.rec21 +++|* EXIT CHANNEL EJT ASSIGNMENT TABLE RESTORED. 03531 M00S03140.rec +++|*
| Line S03141 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03532 M01S03141.rec21 ---|* USES T1, FN, CM - CM+4.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03533 M01S00004.rec21 +++|* USES T1, CM - CM+4. 03534 M00S03142.rec +++|*
| Line S03143 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03535 M01S03143.rec21 ---|* CALLS RNS, SCD.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03536 M01S00005.rec21 +++|* CALLS RNS. 03537 M00S03144.rec +++|* 03538 M00S03145.rec +++|* MACROS ENDMS. 03539 M00S03146.rec +++| 03540 M00S03147.rec +++| 03541 M00S03148.rec +++| PCH SUBR ENTRY/EXIT 03542 M00S03149.rec +++| LDC BFMS READ CHANNEL TABLES 03543 M00S03150.rec +++| RJM RNS 03544 M00S03151.rec +++| ENDMS
| Line S03152 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03545 M01S03152.rec21 ---| LDN CTALL*2 SET TABLE LENGTH
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03546 M01S00006.rec21 +++| LDN CTALL SET TABLE LENGTH 03547 M00S03153.rec +++| STD T1 03548 M00S03154.rec +++| LDC CHTP GET CHANNEL TABLE POINTER 03549 M00S03155.rec +++| CRD CM 03550 M00S03156.rec +++| LDD CM+2 03551 M00S03157.rec +++| SHN 14 03552 M00S03158.rec +++| ADD CM+3
| Line S03159 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03553 M01S03159.rec21 ---| CWM BFMS+2,T1 RESTORE CHANNEL TABLES 03554 M01S03160.rec21 ---| LDN MXCH+1 03555 M01S03161.rec21 ---| STD FN 03556 M01S03162.rec21 ---| PCH1 LDM BFMS+2,FN CHECK CHANNEL STATUS 03557 M01S03163.rec21 ---| LPN 40 03558 M01S03164.rec21 ---| ZJN PCH2 IF CHANNEL NOT DOWN 03559 M01S03165.rec21 ---| RJM SCD SET CHANNEL DOWN 03560 M01S03166.rec21 ---| PCH2 SOD FN 03561 M01S03167.rec21 ---| PJN PCH1 IF MORE CHANNELS
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03562 M01S00007.rec21 +++| ADK CTALL 03563 M01S00008.rec21 +++| CWM BFMS+2+CTALL*5,T1 RESTORE CHANNEL ASSIGNMENT TABLE 03564 M00S03168.rec +++| UJN PCHX RETURN 03565 M00S03169.rec +++| PET SPACE 4,10 03566 M00S03170.rec +++|** PET - PROCESS EST. 03567 M00S03171.rec +++|* 03568 M00S03172.rec +++|* ENTRY SYSTEM FILE POSITIONED TO EST SECTOR. 03569 M00S03173.rec +++|* 03570 M00S03174.rec +++|* EXIT FOR ALL EQUIPMENTS WITH DOWN STATUS SET, 03571 M00S03175.rec +++|* THE DOWN, OFF, AND UNAVAILABLE BITS WILL BE 03572 M00S03176.rec +++|* SET IN THE EST, AND THE GLOBAL 03573 M00S03177.rec +++|* UNLOAD, UNLOAD REQUESTED, AND UNLOAD PROCESSED 03574 M00S03178.rec +++|* BITS WILL BE SET IN THE MST. 03575 M00S03179.rec +++|* FOR EQUIPMENTS WITH A CHANNEL DOWN ON THE CHECKPOINT 03576 M00S03180.rec +++|* FILE, BUT NOT IN THE CM EST (CHANNEL IS NOT GLOABALLY 03577 M00S03181.rec +++|* DOWN), THE CHANNEL DOWN STATUS IS RESET WITH A *SEQM* 03578 M00S03182.rec +++|* FUNCTION. 03579 M00S03183.rec +++|* 03580 M00S03184.rec +++|* USES CA, EO, LM, T3, T5, CN - CN+4. 03581 M00S03185.rec +++|* 03582 M00S03186.rec +++|* CALLS CDS, DDC, IEQ, RNS, SES. 03583 M00S03187.rec +++|* 03584 M00S03188.rec +++|* MACROS ENDMS, SETMS, SFA. 03585 M00S03189.rec +++| 03586 M00S03190.rec +++| 03587 M00S03191.rec +++| PET2 AOD EO ADVANCE EST ORDINAL 03588 M00S03192.rec +++| STD T5 03589 M00S03193.rec +++| ERRNZ ESTE/2*2-ESTE CODE ASSUMES INTEGRAL EST-S PER PRU 03590 M00S03194.rec +++| LDN 5*ESTE ADVANCE BUFFER ADDRESS 03591 M00S03195.rec +++| RAD CA 03592 M00S03196.rec +++| SFA EST,EO GET EST ENTRY FROM CMR 03593 M00S03197.rec +++| ADK EQDE 03594 M00S03198.rec +++| CRD CN 03595 M00S03199.rec +++| RJM IEQ IDENTIFY EQUIPMENT
| Line S03200 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03596 M01S03200.rec21 ---| MJN PET4 IF NON-REMOVABLE MS DEVICE 03597 M01S03201.rec21 ---| NJN PET3 IF NOT MASS STORAGE OR TAPE
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03598 M01S00009.rec21 +++| RJM SES 03599 M00S03202.rec +++| RJM DDC
| Line S03203 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03600 M01S03203.rec21 ---| PET3 RJM SES SET EQUIPMENT STATE 03601 M00S03204.rec ---| RJM CDS CHECK DEVICE STATUS 03602 M00S03205.rec ---| PET4 LCN ESTE DECREMENT WORD COUNT 03603 M00S03206.rec ---| RAD LM 03604 M00S03207.rec ---| PJN PET2 IF NOT END OF SECTOR 03605 M00S03208.rec ---| LDD CE RESET CHECKPOINT DEVICE EST ORDINAL 03606 M00S03209.rec ---| STD T5 03607 M00S03210.rec ---| LDD T3 CHECK EST SECTOR 03608 M00S03211.rec ---| SHN -6 03609 M00S03212.rec ---| NJN PET1 IF NOT EOR 03610 M00S03213.rec ---| 03611 M00S03214.rec ---| PET SUBR ENTRY/EXIT 03612 M00S03215.rec ---| LCN 0 03613 M00S03216.rec ---| STD EO 03614 M00S03217.rec ---| PET1 LDC BFMS+2-5*ESTE INITIALIZE BUFFER POINTER 03615 M00S03218.rec ---| STD CA 03616 M00S03219.rec ---| ADN 5*ESTE-2 READ NEXT SECTOR OF EST 03617 M00S03220.rec ---| RJM RNS 03618 M00S03221.rec ---| STD LM 03619 M00S03222.rec ---| ENDMS 03620 M00S03223.rec ---| LDD LM SET SECTOR WORD COUNT 03621 M00S03224.rec ---| STD T3 03622 M00S03225.rec ---| NJN PET4 IF NOT EMPTY SECTOR 03623 M00S03226.rec ---| UJN PETX RETURN 03624 M00S03227.rec ---| RSE SPACE 4,10 03625 M00S03228.rec ---|** RSE - RELEASE SYSTEM ASSIGNED EQUIPMENT. 03626 M00S03229.rec ---|* 03627 M00S03230.rec ---|* USES T5, T6, T7, CM - CM+4, FS - FS+4. 03628 M00S03231.rec ---|* 03629 M00S03232.rec ---|* MACROS SFA. 03630 M00S03233.rec ---| 03631 M00S03234.rec ---| 03632 M00S03235.rec ---| RSE2 LDD CP 03633 M00S03236.rec ---| ADN EACW UPDATE EQUIPMENT ASSIGNED COUNT WORD 03634 M00S03237.rec ---| CWD FS 03635 M00S03238.rec ---| 03636 M00S03239.rec ---| RSE SUBR ENTRY/EXIT 03637 M00S03240.rec ---| LDD CP 03638 M00S03241.rec ---| ADN EACW GET EQUIPMENT ASSIGNED COUNT WORD 03639 M00S03242.rec ---| CRD FS 03640 M00S03243.rec ---| LDN ESTP 03641 M00S03244.rec ---| CRD T7-2 FETCH EST POINTERS 03642 M00S03245.rec ---| RSE1 SOD T7 03643 M00S03246.rec ---| MJN RSE2 IF EST SCAN COMPLETE 03644 M00S03247.rec ---| SFA EST 03645 M00S03248.rec ---| ADK EQAE READ EST ASSIGNMENT WORD 03646 M00S03249.rec ---| CRD CM 03647 M00S03250.rec ---| LDD CM+4 CHECK ASSIGNMENT 03648 M00S03251.rec ---| LMC 7777 03649 M00S03252.rec ---| NJN RSE1 IF NOT SYSTEM 03650 M00S03253.rec ---| STD CM+4 03651 M00S03254.rec ---| STD FS CLEAR EQUIPMENT ASSIGNED COUNT 03652 M00S03255.rec ---| SFA EST,T7 03653 M00S03256.rec ---| ADK EQAE CLEAR SYSTEM ASSIGNMENT 03654 M00S03257.rec ---| CWD CM 03655 M00S03258.rec ---| UJN RSE1 CONTINUE EST SCAN 03656 M01S03259.rec21 ---| SCD SPACE 4,10 03657 M01S03260.rec21 ---|** SCD - SET CHANNEL DOWN. 03658 M01S03261.rec21 ---|* 03659 M01S03262.rec21 ---|* ENTRY (FN) = CHANNEL NUMBER. 03660 M01S03263.rec21 ---|* 03661 M01S03264.rec21 ---|* EXIT FOR EACH EQUIPMENT THAT HAS THIS CHANNEL 03662 M01S03265.rec21 ---|* DEFINED, AND FOR WHICH IT IS LEGAL TO DOWN 03663 M01S03266.rec21 ---|* THE CHANNEL, A *SEQM* FUNCTION WILL BE USED 03664 M01S03267.rec21 ---|* TO RESET THE CHANNEL DOWN STATUS. 03665 M01S03268.rec21 ---|*
| Line S03269 Modification History | |
|---|---|
M01 (Removed by) | rec20 |
M02 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03666 M02S03269.rec21 ---|* USES EO, T1, T6, T7, CM - CM+4.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | rec20 |
M02 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03667 M02S00001.rec21 ---|* USES EO, T1, T6, T7, CM - CM+4, CN - CN+4.
| Line S03270 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03668 M01S03270.rec21 ---|* 03669 M01S03271.rec21 ---|* CALLS ISF. 03670 M01S03272.rec21 ---|* 03671 M01S03273.rec21 ---|* MACROS MONITOR, PAUSE, SFA. 03672 M01S03274.rec21 ---| 03673 M01S03275.rec21 ---| 03674 M01S03276.rec21 ---| SCD SUBR ENTRY/EXIT 03675 M01S03277.rec21 ---| LDN ESTP 03676 M01S03278.rec21 ---| CRD T6 03677 M01S03279.rec21 ---| LDD T6+2 SET LAST EST ORDINAL + 1 03678 M01S03280.rec21 ---| STD T6 03679 M01S03281.rec21 ---| LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH 03680 M01S03282.rec21 ---| STD EO 03681 M01S03283.rec21 ---| SCD1 AOD EO ADVANCE EST ORDINAL 03682 M01S03284.rec21 ---| LMD T6 03683 M01S03285.rec21 ---| ZJN SCDX IF END OF EST 03684 M01S03286.rec21 ---| SFA EST,EO 03685 M01S03287.rec21 ---| ADK EQDE READ EST ENTRY
| Line S03288 Modification History | |
|---|---|
M01 (Removed by) | rec20 |
M02 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03686 M02S03288.rec21 ---| CRD CM 03687 M02S03289.rec21 ---| LDD CM
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | rec20 |
M02 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03688 M02S00002.rec21 ---| CRD CN 03689 M02S00003.rec21 ---| LDD CN
| Line S03290 Modification History | |
|---|---|
M01 (Removed by) | rec21 |
Seq # *Modification Id* Act ----------------------------+ 03690 M01S03290.rec21 ---| SHN 21-13
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/rec.001.txt · Last modified: (external edit)