linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Set the link property to data_set for all of the bmonscan axes

Browse Source 
r3505 | dcl | 2012-03-29 10:42:57 +1100 (Thu, 29 Mar 2012) | 1 line
This commit is contained in:
Douglas Clowes
2012-03-29 10:42:57 +11:00
parent a2355b57b8
commit 810788577b
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
site_ansto/instrument/config/nexus/nxscripts_common_1.tcl
View File

@@ -141,7 +141,10 @@ proc newFileName {idNum postfix} {
hsetprop $::counter::HP_BM @signal 1 hsetprop $::counter::HP_BM @signal 1
set nvars [bmonscan noscanvar] set nvars [bmonscan noscanvar]
for { set i 0 } { $i < $nvars } { incr i } { for { set i 0 } { $i < $nvars } { incr i } {
lappend axes_list [lindex [split [lindex [split [bmonscan getvarpar $i]] 0] "."] 1] set axis_name [lindex [split [lindex [split [bmonscan getvarpar $i]] 0] "."] 1]
set node_name [SplitReply [sicslist $axis_name hdb_path]]
hsetprop $node_name link data_set
lappend axes_list $axis_name
} }
set axes [join $axes_list ":"] set axes [join $axes_list ":"]
hsetprop $::counter::HP_BM @axes $axes hsetprop $::counter::HP_BM @axes $axes