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

The run number should be written when making a new scan entry.

Browse Source 
r1776 | ffr | 2007-04-01 15:29:08 +1000 (Sun, 01 Apr 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-04-01 15:29:08 +10:00
committed by Douglas Clowes
parent 486b82c526
commit aded505558
1 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -9,7 +9,7 @@
set tmpstr [string map {"$" ""} {$Name: not supported by cvs2svn $}]
set nx_content_release_tag [lindex $tmpstr [expr [llength $tmpstr] - 1]]
set tmpstr [string map {"$" ""} {$Revision: 1.20 $}]
set tmpstr [string map {"$" ""} {$Revision: 1.21 $}]
set nx_content_revision_num [lindex $tmpstr [expr [llength $tmpstr] - 1]]
MakeNXScript
@@ -116,6 +116,9 @@ proc hmm_addnxscanentry {nxobj entryname point scanVariable scanVarPos scanVarSt
global dictalias;
$nxobj puttext estart $start_time;
nxscript_data clear;
nxscript_data putint 0 $point;
$nxobj putslab erun [list $point] [list 1] nxscript_data;
hmm_save $nxobj $entryname $point;
fillPath $nxobj $scanVariable;
$nxobj makelink scanvar $dictalias($scanVariable);
@@ -141,6 +144,9 @@ proc bm_addnxscanentry {nxobj entryname point scanVariable scanVarPos scanVarSte
global dictalias;
$nxobj puttext estart $start_time;
nxscript_data clear;
nxscript_data putint 0 $point;
$nxobj putslab erun [list $point] [list 1] nxscript_data;
bm_save $nxobj $entryname $point;
fillPath $nxobj $scanVariable;
$nxobj makelink scanvar $dictalias($scanVariable);
@@ -219,9 +225,6 @@ proc putcrystal {nxobj} {
}
proc putcommon {nxobj entryName point} {
$nxobj updatedictvar entryName $entryName
nxscript_data clear;
nxscript_data putint 0 $point;
$nxobj putslab erun [list $point] [list 1] nxscript_data;
$nxobj puttext etitle [getVal [Title]]
$nxobj puttext iname [getVal [Instrument]]
$nxobj puttext username [SplitReply [user]]