cdc:nos2.source:opl.opl871:common:compdts
Common COMPDTS
3 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.compdts +++| CTEXT COMPDTS - DETERMINE TRACK INTERLOCK STATUS. 00002 M01S00002.compdts +++| SPACE 4 00003 M01S00003.compdts +++| IF -DEF,QUAL$,1 00004 M01S00004.compdts +++| QUAL COMPDTS
Line S00005 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00005 M02S00005.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORP. 1972. 00006 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00007 M01S00006.compdts +++| SPACE 4 00008 M01S00007.compdts +++|*** DTS - DETERMINE TRACK INTERLOCK STATUS. 00009 M01S00008.compdts +++|* J. L. WARDELL. 72/06/01. 00010 M01S00009.compdts +++|* S. L. KSANDER. 75/04/28. 00011 M01S00010.compdts +++| SPACE 4
Line S00011 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00012 M02S00011.253l688 ---|*** COMPDTS DETERMINES IF WRITE INTERLOCK IS SET FOR 00013 M01S00001.253l688 +++|*** COMPDTS DETERMINES IF THE TRACK INTERLOCK IS SET FOR THE 00014 M01S00012.compdts +++|* TRACK SPECIFIED. 00015 M01S00013.compdts +++|* 00016 M01S00002.253l688 +++|* IF *DTS$* IS DEFINED, CHECK FOR INACCESSIBLE DEVICE. 00017 M01S00003.253l688 +++|*
Line S00014 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00018 M02S00014.ns22000 ---|* ENTRY (T5) = EQUIPMENT NUMBER. 00019 M01S00001.ns22000 +++|* ENTRY (T5) = EST ORDINAL. 00020 M01S00015.compdts +++|* (T6) = TRACK. 00021 M01S00016.compdts +++|*
Line S00017 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00022 M02S00017.253l688 ---|* EXIT (A) .LT. 0 IF WRITE INTERLOCK SET FOR TRACK. 00023 M01S00004.253l688 +++|* EXIT (A) .LT. 0 IF TRACK INTERLOCK SET. 00024 M01S00005.253l688 +++|* (A) = 0 IF INACCESSIBLE DEVICE (DTS$ DEFINED). 00025 M01S00018.compdts +++|* 00026 M01S00019.compdts +++|* USES CM - CM+4.
Line S00020 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00027 M02S00020.ns22000 ---|* FIRST WORD OF THE MESSAGE BUFFER IS USED IF ECS
Line S00021 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00028 M02S00021.ns22000 ---|* TRANSFER IS REQUIRED.
Line S00022 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00029 M02S00022.ns22000 ---|*
Line S00023 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00030 M02S00023.ns22000 ---|* REQUIRES COMMON DECK *COMPMMF*. 00031 M01S00002.ns22000 +++|* 00032 M01S00003.ns22000 +++|* MACROS MONITOR, SFA. 00033 M01S00024.compdts +++| SPACE 4 00034 M01S00025.compdts +++|** INSTRUCTIONS USED AS CONSTANTS. 00035 M01S00026.compdts +++| 00036 M01S00027.compdts +++| 00037 M01S00028.compdts +++| SHNI EQU 1000 SHN 00038 M01S00029.compdts +++| 00039 M01S00030.compdts +++| 00040 M01S00006.253l688 +++| DTS$ IF DEF,DTS$ 00041 M01S00007.253l688 +++| DTS4 LDN 0 RETURN INACCESSIBLE-DEVICE FLAG 00042 M01S00008.253l688 +++| DTS$ ENDIF 00043 M01S00009.253l688 +++| 00044 M01S00031.compdts +++| DTS SUBR ENTRY/EXIT
Line S00032 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00045 M02S00032.ns22000 ---| LDM ESTS READ EST ENTRY
Line S00033 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00046 M02S00033.ns22000 ---| ADD T5 00047 M01S00004.ns22000 +++| SFA EST,T5 READ EST ENTRY 00048 M01S00005.ns22000 +++| ADK EQDE 00049 M01S00034.compdts +++| CRD CM 00050 M01S00035.compdts +++| LDD CM 00051 M01S00036.compdts +++| SHN 21-11 00052 M01S00037.compdts +++| PJN DTS1 IF NOT SHARED DEVICE 00053 M01S00038.compdts +++| LDD T5 REQUEST UP-TO-DATE TRT 00054 M01S00010.253l688 +++| DTS$ IF DEF,DTS$ 00055 M01S00011.253l688 +++| ADD TH 00056 M01S00012.253l688 +++| DTS$ ENDIF 00057 M01S00039.compdts +++| STD CM+1 00058 M01S00040.compdts +++| LDN UTRS 00059 M01S00041.compdts +++| STD CM+3 00060 M01S00042.compdts +++| MONITOR STBM 00061 M01S00013.253l688 +++| DTS$ IF DEF,DTS$ 00062 M01S00014.253l688 +++| LDD CM+1 00063 M01S00015.253l688 +++| SHN 21-11 00064 M01S00016.253l688 +++| MJN DTS4 IF DEVICE IS INACCESSIBLE 00065 M01S00017.253l688 +++| DTS$ ENDIF 00066 M01S00043.compdts +++| DTS1 LDD T6 GET WORD OFFSET 00067 M01S00044.compdts +++| LPC 3774 00068 M01S00045.compdts +++| SHN -2 00069 M01S00046.compdts +++| STD T0
Line S00047 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00070 M02S00047.ns22000 ---| LDD CM+4 READ TRT WORD 00071 M01S00006.ns22000 +++| LDD CM+4 GET FWA OF TRT 00072 M01S00048.compdts +++| SHN 3
Line S00049 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00073 M02S00049.ns22000 ---| ADN MSTL ADD MST LENGTH 00074 M01S00007.ns22000 +++| ADN TRLL 00075 M01S00008.ns22000 +++| CRD CM 00076 M01S00009.ns22000 +++| LDD CM+3 00077 M01S00010.ns22000 +++| LPN 77 00078 M01S00011.ns22000 +++| SHN 14 00079 M01S00012.ns22000 +++| LMD CM+4 00080 M01S00050.compdts +++| ADD T0 ADD TRT WORD OFFSET 00081 M01S00051.compdts +++| CRD CM READ TRT WORD 00082 M01S00052.compdts +++| LDD T6 SET SHIFT COUNT 00083 M01S00053.compdts +++| LPN 3 00084 M01S00054.compdts +++| ADC SHNI+12 00085 M01S00055.compdts +++| STM DTSA 00086 M01S00056.compdts +++| LDD CM+4 00087 M01S00057.compdts +++| DTSA SHN 12
Line S00058 Modification History | |
---|---|
M01 (Added by) | compdts |
M02 (Updated by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00088 M02S00058.253l688 ---| DTS3 LJM DTSX 00089 M01S00018.253l688 +++| DTS3 UJP DTSX RETURN 00090 M01S00059.compdts +++| SPACE 4 00091 M01S00060.compdts +++| QUAL$ IF -DEF,QUAL$ 00092 M01S00061.compdts +++| QUAL * 00093 M01S00062.compdts +++| DTS EQU /COMPDTS/DTS 00094 M01S00063.compdts +++| QUAL$ ENDIF 00095 M01S00064.compdts +++| ENDX
cdc/nos2.source/opl.opl871/common/compdts.txt ยท Last modified: by 127.0.0.1