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

Add a needed SplitReply tom the bmonscan noscanvar

Browse Source 
r3520 | dcl | 2012-04-02 12:56:40 +1000 (Mon, 02 Apr 2012) | 1 line
This commit is contained in:
Douglas Clowes
2012-04-02 12:56:40 +10:00
parent 010aa7f945
commit 534459e51f
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -139,7 +139,7 @@ proc newFileName {idNum postfix} {
set ::counter::HP_BM [getatt monitor_counts hdb_path] set ::counter::HP_BM [getatt monitor_counts hdb_path]
hsetprop $::counter::HP_BM link data_set hsetprop $::counter::HP_BM link data_set
hsetprop $::counter::HP_BM @signal 1 hsetprop $::counter::HP_BM @signal 1
set nvars [bmonscan noscanvar] set nvars [SplitReply [bmonscan noscanvar]]
for { set i 0 } { $i < $nvars } { incr i } { for { set i 0 } { $i < $nvars } { incr i } {
set axis_name [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]] set node_name [SplitReply [sicslist $axis_name hdb_path]]