diff --git a/site_ansto/instrument/config/environment/magneticField/sct_bruker_BEC1.tcl b/site_ansto/instrument/config/environment/magneticField/sct_bruker_BEC1.tcl
index cebab88c..acfd4e9b 100644
--- a/site_ansto/instrument/config/environment/magneticField/sct_bruker_BEC1.tcl
+++ b/site_ansto/instrument/config/environment/magneticField/sct_bruker_BEC1.tcl
@@ -375,7 +375,7 @@ proc inTolerance {expectedLength} {
         set nodename $tc_root/sensor/nominal_outp_current
         set setpt [hval $nodename]
         set nodename $tc_root/sensor/desired_current
-        set nominal_outp_current  [hval $nodename]
+        set NominalOutpCurrent  [hval $nodename]
          # clientput "inTolerance(): comparing sensor/setpoint=$setpt with actual sensorValue=$temp"
         set diff [expr {abs($setpt - $NominalOutpCurrent)}]
         if {$diff > $::scobj::bruker_BEC1::bruker_BEC1_driveTolerance} {
@@ -851,7 +851,7 @@ proc checktol {tc_root} {
   set catch_status [ catch {
     set retVal 0
     set sensorValue $tc_root/sensor/desired_current
-    set nominal_outp_current [hval $sensorValue]
+    set NominalOutpCurrent [hval $sensorValue]
     set isetp $tc_root/sensor/nominal_outp_current
     set setpt [hval $isetp]
     set tol   [hval $tc_root/emon/tolerance]