server_config.tcl

Remove call to obsolete ::utility::set_sctobj_attributes because it
returns an error and aborts the server_set_sobj_attributes proc.
This bug meant that script context objects weren't being linked into the
hdb tree.

util/utility.tcl
Removed obselete ::utility::set_sctobj_attributes proc because
sctcontrollers are no longer being added to the root of the hdb tree.

site_ansto/instrument/server_config.tcl

@@ -226,7 +226,6 @@ proc server_set_sobj_attributes {} {
     ::nexus::set_sobj_attributes 
     ::histogram_memory::set_sobj_attributes 
     ::utility::set_chopper_attributes
-    ::utility::set_sctobj_attributes
     ::utility::set_sct_object_attributes
 ## TODO move the following to the new ansto gumxml.tcl
     sicslist setatt getgumtreexml privilege internal

site_ansto/instrument/util/utility.tcl

@@ -435,12 +435,6 @@ proc ::utility::set_histomem_attributes {} {
     sicslist setatt $hm mutable true
   }
 }
-proc ::utility::set_sctobj_attributes {} {
-  foreach sobj [sicslist type SctController] {
-    hsetprop /$sobj control false
-    hsetprop /$sobj data false
-  }
-}
 proc ::utility::set_sct_object_attributes {} {
   foreach sobj [sicslist type SCT_OBJECT] {
     sicslist setatt $sobj data true