Seq # *Modification Id* Act
----------------------------+
| Line S00001 Modification History |
M01 (Added by) | compsud |
M02 (Updated by) | 251l670 |
Seq # *Modification Id* Act
----------------------------+
00001 M02S00001.251l670 ---| CTEXT COMPSUD - SPIN UP/DOWN ISMD DRIVES.
00002 M01S00001.251l670 +++| CTEXT COMPSUD - SPIN UP/DOWN MASS STORAGE DEVICES.
00003 M01S00002.compsud +++| SUD SPACE 4,10
00004 M01S00003.compsud +++| IF -DEF,QUAL$,1
00005 M01S00004.compsud +++| QUAL COMPSUD
| Line S00005 Modification History |
M01 (Added by) | compsud |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00006 M02S00005.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1985.
00007 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00008 M01S00006.compsud +++| SUD SPACE 4,10
| Line S00007 Modification History |
M01 (Added by) | compsud |
M02 (Updated by) | 251l670 |
Seq # *Modification Id* Act
----------------------------+
00009 M02S00007.251l670 ---|*** SUD - SPIN UP/DOWN ISMD DRIVES.
00010 M01S00002.251l670 +++|*** SUD - SPIN UP/DOWN MASS STORAGE DEVICES.
00011 M01S00008.compsud +++|* M. L. SWANSON. 85/10/11.
00012 M01S00009.compsud +++| SUD SPACE 4,10
00013 M01S00010.compsud +++|*** SUD PROVIDES THE UTILITY TO EITHER SPIN UP
| Line S00011 Modification History |
M01 (Added by) | compsud |
M02 (Updated by) | 251l670 |
Seq # *Modification Id* Act
----------------------------+
00014 M02S00011.251l670 ---|* OR SPIN DOWN ISMD DEVICES. IF SPIN UP IS SELECTED
| Line S00012 Modification History |
M01 (Added by) | compsud |
M02 (Updated by) | 251l670 |
Seq # *Modification Id* Act
----------------------------+
00015 M02S00012.251l670 ---|* ONLY THOSE DEVICES THAT ARE ON AND NOT UNLOADED
| Line S00013 Modification History |
M01 (Added by) | compsud |
M02 (Updated by) | 251l670 |
Seq # *Modification Id* Act
----------------------------+
00016 M02S00013.251l670 ---|* WILL BE ACTED UPON.
00017 M01S00003.251l670 +++|* OR SPIN DOWN MASS STORAGE DEVICES. IF SPIN UP IS
00018 M01S00004.251l670 +++|* SELECTED, ONLY THOSE DEVICES THAT ARE ON AND NOT
00019 M01S00005.251l670 +++|* UNLOADED WILL BE ACTED UPON.
00020 M01S00014.compsud +++|*
00021 M01S00015.compsud +++|* ENTRY (A) = 0 TO SPIN UP DEVICES.
00022 M01S00016.compsud +++|* = 20 TO SPIN DOWN DEVICES.
00023 M01S00017.compsud +++|*
00024 M01S00018.compsud +++|* EXIT (A) = 0.
00025 M01S00019.compsud +++|*
00026 M01S00020.compsud +++|* USES CM - CM+4.
00027 M01S00021.compsud +++|*
00028 M01S00022.compsud +++|* MACROS EXECUTE, SFA.
00029 M01S00023.compsud +++|
00030 M01S00024.compsud +++|
00031 M01S00025.compsud +++| SUD SUBR ENTRY/EXIT
00032 M01S00026.compsud +++| LPN 20
00033 M01S00027.compsud +++| STM OVL0 SET OPTION
00034 M01S00028.compsud +++| EXECUTE 0SD,OVL0+2
00035 M01S00029.compsud +++| STM SUDA SET PROCESSOR ENTRY ADDRESS
00036 M01S00030.compsud +++| LDN ESTP
00037 M01S00031.compsud +++| CRD CM
00038 M01S00032.compsud +++| LDD CM+3 LAST MASS STORAGE EST ORDINAL + 1
00039 M01S00033.compsud +++| STM OVL0+1
00040 M01S00034.compsud +++| SUD1 SOM OVL0+1
00041 M01S00035.compsud +++| ZJN SUDX IF END OF MASS STORAGE DEVICES
00042 M01S00036.compsud +++| SFA EST
00043 M01S00006.251l670 +++| ADK EQDE
00044 M01S00037.compsud +++| CRD CM READ EST ENTRY
00045 M01S00038.compsud +++| LDD CM
00046 M01S00039.compsud +++| SHN 21-13
00047 M01S00040.compsud +++| PJN SUD1 IF NOT A MASS STORAGE DEVICE
00048 M01S00041.compsud +++| LDM OVL0
00049 M01S00042.compsud +++| NJN SUD2 IF SPIN DOWN OPERATION
00050 M01S00043.compsud +++| LDD CM
00051 M01S00044.compsud +++| LPN 2
00052 M01S00045.compsud +++| NJN SUD1 IF DEVICE IS OFF OR DOWN
00053 M01S00046.compsud +++| LDD CM+4
00054 M01S00047.compsud +++| SHN 3
00055 M01S00048.compsud +++| ADN STLL FETCH MST STATUS WORD
00056 M01S00049.compsud +++| CRD CM
00057 M01S00050.compsud +++| LDD CM
00058 M01S00051.compsud +++| LPN MLDUL
00059 M01S00052.compsud +++| NJN SUD1 IF DEVICE UNLOADED
00060 M01S00053.compsud +++| SUD2 RJM 0
00061 M01S00054.compsud +++| SUDA EQU *-1
00062 M01S00055.compsud +++| UJN SUD1 PROCESS NEXT EST ENTRY
00063 M01S00056.compsud +++| SUD SPACE 4,10
00064 M01S00057.compsud +++| IF -DEF,QUAL$
00065 M01S00058.compsud +++| QUAL *
00066 M01S00059.compsud +++| SUD EQU /COMPSUD/SUD
00067 M01S00060.compsud +++| ENDIF
00068 M01S00061.compsud +++| ENDX