Seq # *Modification Id* Act
----------------------------+
00001 M01S00001.comuest +++| #
00002 M01S00002.comuest +++| CTEXT COMUEST - EQUIPMENT STATUS TABLE DEFINITION.
00003 M01S00003.comuest +++| #
00004 M01S00004.comuest +++| CONTROL NOLIST;
00005 M01S00005.comuest +++| CONTROL IFEQ LISTCON,1;
00006 M01S00006.comuest +++| CONTROL LIST;
00007 M01S00007.comuest +++| CONTROL FI;
00008 M01S00008.comuest +++|
00009 M01S00009.comuest +++| BEGIN # COMUEST #
00010 M01S00010.comuest +++|
00011 M01S00011.comuest +++| #
00012 M01S00012.comuest +++|*** COMUEST - EQUIPMENT STATUS TABLE DEFINITION.
00013 M01S00001.281l803 +++|*
00014 M01S00002.281l803 +++|* COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00015 M01S00013.comuest +++|*
00016 M01S00014.comuest +++|* *COMUEST* PROVIDES A SYMPL DEFINITION OF THE EQUIPMENT
00017 M01S00015.comuest +++|* STATUS TABLE (EST) AS DEFINED IN *PPCOM*.
00018 M01S00016.comuest +++|
00019 M01S00017.comuest +++| COL 12
00020 M01S00018.comuest +++| #
00021 M01S00019.comuest +++|
00022 M01S00020.comuest +++|#EQDE #DEF# 0 # EQDE #0#; # EQUIPMENT DEFINITION WORD #
00023 M01S00021.comuest +++|#EQAE #DEF# 1 # EQAE #1#; # EQUIPMENT ASSIGNMENT WORD #
00024 M01S00022.comuest +++|#ESTE #DEF# 2 # ESTE #2#; # LENGTH OF EST ENTRY #
00025 M01S00023.comuest +++|
00026 M01S00024.comuest +++| #
00027 M01S00025.comuest +++|* MAXIMUM NUMBER OF MASS STORAGE EST ENTRIES.
00028 M01S00026.comuest +++| #
00029 M01S00027.comuest +++|
00030 M01S00028.comuest +++|#MSMX #DEF# 200D # MSMX #200#;
00031 M01S00029.comuest +++|
00032 M01S00030.comuest +++| #
00033 M01S00031.comuest +++|* MAXIMUM NUMBER (ORDINAL+1) OF EST ENTRIES.
00034 M01S00032.comuest +++| #
00035 M01S00033.comuest +++|
00036 M01S00034.comuest +++|#ESMX #DEF# 512D # ESMX #512#;
00037 M01S00035.comuest +++|
00038 M01S00036.comuest +++| BASED
00039 M01S00037.comuest +++| ARRAY EST [0:0] S(ESTE); # EQUIPMENT STATUS TABLE ENTRY #
00040 M01S00038.comuest +++| BEGIN # EST ENTRY #
00041 M01S00039.comuest +++|
00042 M01S00040.comuest +++| #
00043 M01S00041.comuest +++|* GENERAL FORMAT.
00044 M01S00042.comuest +++| #
00045 M01S00043.comuest +++|
00046 M01S00044.comuest +++| ITEM EST$EQDE U(EQDE,00,60); # EQUIPMENT DEFINITION #
00047 M01S00045.comuest +++| ITEM EST$LHDE U(EQDE,00,30); # *EQDE* LEFT HALF #
| Line S00046 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00048 M02S00046.252l678 ---| ITEM EST$FLAGS U(EQDE,00,12); # FLAGS #
00049 M01S00001.252l678 +++| ITEM EST$FLAGS U(EQDE,00,10); # FLAGS #
00050 M01S00047.comuest +++| ITEM EST$MS B(EQDE,00,01); # MASS STORAGE DEVICE #
00051 M01S00048.comuest +++| ITEM EST$ALLOC B(EQDE,01,01); # ALLOCATABLE DEVICE #
| Line S00049 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00052 M02S00049.252l678 ---| ITEM EST$DOWN B(EQDE,06,01); # DEVICE DOWN #
| Line S00050 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00053 M02S00050.252l678 ---| ITEM EST$DCHB B(EQDE,12,01); # CHANNEL B DOWN #
| Line S00051 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00054 M02S00051.252l678 ---| ITEM EST$CHANB U(EQDE,13,05); # CHANNEL B #
| Line S00052 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00055 M02S00052.252l678 ---| ITEM EST$DCHA B(EQDE,18,01); # CHANNEL A DOWN #
| Line S00053 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00056 M02S00053.252l678 ---| ITEM EST$CHANA U(EQDE,19,05); # CHANNEL A #
00057 M01S00002.252l678 +++| ITEM EST$STATUS U(EQDE,10,02); # DEVICE STATUS #
00058 M01S00003.252l678 +++| ITEM EST$CHAAE B(EQDE,12,01); # CHANNEL A ACCESS PATH #
00059 M01S00004.252l678 +++| ITEM EST$CHAST U(EQDE,13,02); # CHANNEL A STATUS #
00060 M01S00005.252l678 +++| ITEM EST$CHACT B(EQDE,15,01); # CHANNEL A CONTROLLER #
00061 M01S00006.252l678 +++| ITEM EST$CHAPN U(EQDE,16,01); # CHANNEL A PORT NUMBER #
00062 M01S00007.252l678 +++| ITEM EST$CHACC B(EQDE,18,01); # CHANNEL A CONCURRENT #
00063 M01S00008.252l678 +++| ITEM EST$CHANA U(EQDE,19,05); # CHANNEL A #
00064 M01S00009.252l678 +++| ITEM EST$CHBAE B(EQDE,24,01); # CHANNEL B ACCESS PATH #
00065 M01S00010.252l678 +++| ITEM EST$CHBST U(EQDE,25,02); # CHANNEL B STATUS #
00066 M01S00011.252l678 +++| ITEM EST$CHBCT B(EQDE,27,01); # CHANNEL B CONTROLLER #
00067 M01S00012.252l678 +++| ITEM EST$CHBPN U(EQDE,28,01); # CHANNEL B PORT NUMBER #
00068 M01S00054.comuest +++| ITEM EST$RHDE U(EQDE,30,30); # *EQDE* RIGHT HALF #
| Line S00055 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00069 M02S00055.252l678 ---| ITEM EST$OFF B(EQDE,36,01); # DEVICE OFF #
| Line S00056 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00070 M02S00056.252l678 ---| ITEM EST$TYPE U(EQDE,37,11); # DEVICE TYPE #
00071 M01S00013.252l678 +++| ITEM EST$CHBCC B(EQDE,30,01); # CHANNEL B CONCURRENT #
00072 M01S00014.252l678 +++| ITEM EST$CHANB U(EQDE,31,05); # CHANNEL B #
00073 M01S00015.252l678 +++| ITEM EST$TYPE U(EQDE,36,12); # DEVICE TYPE #
00074 M01S00057.comuest +++|
00075 M01S00058.comuest +++| ITEM EST$EQAE U(EQAE,00,60); # EQUIPMENT ASSIGNMENT #
00076 M01S00059.comuest +++| ITEM EST$LHAE U(EQAE,00,30); # *EQAE* LEFT HALF #
00077 M01S00060.comuest +++| ITEM EST$RESI U(EQAE,00,12); # INSTALLATION FIELD #
| Line S00061 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00078 M02S00061.252l678 ---| ITEM EST$RESC U(EQAE,12,30); # RESERVED FOR CDC #
00079 M01S00016.252l678 +++| ITEM EST$RESC1 U(EQAE,12,12); # RESERVED FOR CDC #
00080 M01S00017.252l678 +++| ITEM EST$DEVD U(EQAE,24,12); # DEVICE DEPENDENT DATA #
00081 M01S00062.comuest +++| ITEM EST$RHAE U(EQAE,30,30); # *EQAE* RIGHT HALF #
00082 M01S00018.252l678 +++| ITEM EST$RESC2 U(EQAE,36,06); # RESERVED FOR CDC #
00083 M01S00063.comuest +++| ITEM EST$LAL U(EQAE,42,03); # LOWER ACCESS LEVEL #
00084 M01S00064.comuest +++| ITEM EST$UAL U(EQAE,45,03); # UPPER ACCESS LEVEL #
00085 M01S00065.comuest +++| ITEM EST$EJTO U(EQAE,48,12); # EJT ORDINAL OF JOB #
00086 M01S00066.comuest +++|
00087 M01S00067.comuest +++| #
00088 M01S00068.comuest +++|* MASS STORAGE EQUIPMENT EST ENTRY.
00089 M01S00069.comuest +++| #
00090 M01S00070.comuest +++|
00091 M01S00071.comuest +++| ITEM EST$SYS B(EQDE,01,01); # SYSTEM FILE ON DEVICE #
00092 M01S00072.comuest +++| ITEM EST$SHARE B(EQDE,02,01); # SHARED DEVICE #
00093 M01S00073.comuest +++| ITEM EST$RMVE B(EQDE,03,01); # REMOVABLE DEVICE #
00094 M01S00074.comuest +++| ITEM EST$LDAM B(EQDE,04,01); # *LDAM* DEVICE #
00095 M01S00075.comuest +++| ITEM EST$UNAV B(EQDE,05,01); # DEVICE IS UNAVAILABLE #
00096 M01S00076.comuest +++| ITEM EST$ISHARE B(EQDE,07,01); # ISHARED DEVICE #
00097 M01S00077.comuest +++| ITEM EST$ACTIVE B(EQDE,08,01); # DEVICE IS ACTIVE #
| Line S00078 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00098 M02S00078.252l678 ---| ITEM EST$MCHAN U(EQDE,30,06); # MAINTENANCE CHANNEL #
00099 M01S00079.comuest +++| ITEM EST$MST B(EQDE,48,12); # ADDRESS OF MST/10B #
00100 M01S00019.252l678 +++|
00101 M01S00020.252l678 +++| ITEM EST$MCHAN U(EQAE,30,06); # MAINTENANCE CHANNEL #
00102 M01S00080.comuest +++|
00103 M01S00081.comuest +++| #
00104 M01S00082.comuest +++|* MAGNETIC TAPE EQUIPMENT EST ENTRY.
00105 M01S00083.comuest +++| #
00106 M01S00084.comuest +++|
00107 M01S00085.comuest +++| ITEM EST$MTS B(EQDE,03,01); # MTS (66X) DRIVE #
00108 M01S00086.comuest +++| ITEM EST$ATS B(EQDE,04,01); # ATS (67X) DRIVE #
00109 M01S00087.comuest +++| ITEM EST$FSC B(EQDE,05,01); # FSC DEVICE #
00110 M01S00088.comuest +++| ITEM EST$GCR B(EQDE,07,01); # DEVICE HAS GCR #
| Line S00089 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00111 M02S00089.252l678 ---| ITEM EST$DCHD B(EQDE,24,01); # CHANNEL D DOWN #
| Line S00090 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00112 M02S00090.252l678 ---| ITEM EST$CHAND U(EQDE,25,05); # CHANNEL D #
| Line S00091 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00113 M02S00091.252l678 ---| ITEM EST$DCHC B(EQDE,30,01); # CHANNEL C DOWN #
| Line S00092 Modification History |
M01 (Added by) | comuest |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
00114 M02S00092.252l678 ---| ITEM EST$CHANC U(EQDE,31,05); # CHANNEL C #
00115 M01S00093.comuest +++| ITEM EST$EQU U(EQDE,48,03); # CONTROLLER NUMBER #
00116 M01S00094.comuest +++| ITEM EST$UN U(EQDE,56,04); # UNIT NUMBER #
00117 M01S00095.comuest +++|
00118 M01S00096.comuest +++| END # EST ENTRY #
00119 M01S00097.comuest +++|
00120 M01S00098.comuest +++| END # COMUEST #
00121 M01S00099.comuest +++|
00122 M01S00100.comuest +++| #
00123 M01S00101.comuest +++| COL 30
00124 M01S00102.comuest +++| ENDX #
00125 M01S00103.comuest +++| CONTROL LIST;