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

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

View File

@@ -141,7 +141,10 @@ proc newFileName {idNum postfix} {
hsetprop $::counter::HP_BM @signal 1
set nvars [bmonscan noscanvar]
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 ":"]
hsetprop $::counter::HP_BM @axes $axes