From 8f95806ecc2f386480192e47cc9f0a051595425f Mon Sep 17 00:00:00 2001
From: Rodney Davies <rdd@ansto.gov.au>
Date: Tue, 14 Oct 2008 11:35:35 +1100
Subject: [PATCH] Updated to send Jz prior to any voltage setting command

r2721 | rdd | 2008-10-14 11:35:35 +1100 (Tue, 14 Oct 2008) | 3 lines
---
 site_ansto/orhvps.c | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/site_ansto/orhvps.c b/site_ansto/orhvps.c
index 2cf3ddfd..5721faef 100644
--- a/site_ansto/orhvps.c
+++ b/site_ansto/orhvps.c
@@ -644,6 +644,10 @@ static int ORHVPSGetValue( pEVDriver self, float* fPos) {
  * Set the current value from SICS
  */
 static int ORHVPSSetValue( pEVDriver self, float fPos) {
+
+  char reply[CMDLEN];
+  int rep_len = CMDLEN;
+
   pORHVPSDriv priv = NULL;
   assert(self);
   assert(self->pPrivate);
@@ -656,6 +660,9 @@ static int ORHVPSSetValue( pEVDriver self, float fPos) {
     priv->iErrorCode = ORHVPS_ERR_RANGE;
     return 0;
   }
+
+  AsyncUnitTransact(priv->asyncUnit, "Jz", 2, reply, &rep_len);
+
   priv->fTarget = fPos;
   priv->bRunFlag = true;
   return 1;