From 0043e2b5de5a6e27b34986acf6acbf3fa45b8485 Mon Sep 17 00:00:00 2001
From: rivers <rivers@dc6c5ff5-0b8b-c028-a01f-ffb33f00fc8b>
Date: Fri, 26 Mar 2010 23:28:45 +0000
Subject: [PATCH] Changes to support sliders; set HOPR from array size in
 callbacks

git-svn-id: https://subversion.xor.aps.anl.gov/synApps/areaDetector/trunk@10402 dc6c5ff5-0b8b-c028-a01f-ffb33f00fc8b
---
 ADApp/Db/NDROI.template | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)

diff --git a/ADApp/Db/NDROI.template b/ADApp/Db/NDROI.template
index ca98761..46191ac 100644
--- a/ADApp/Db/NDROI.template
+++ b/ADApp/Db/NDROI.template
@@ -74,6 +74,7 @@ record(longout, "$(P)$(R)MinX")
    field(PINI, "YES")
    field(DTYP, "asynInt32")
    field(OUT,  "@asyn($(PORT),$(ADDR),$(TIMEOUT))DIM0_MIN")
+   field(LOPR, "0")
    field(VAL,  "0")
 }
 
@@ -89,6 +90,7 @@ record(longout, "$(P)$(R)MinY")
    field(PINI, "YES")
    field(DTYP, "asynInt32")
    field(OUT,  "@asyn($(PORT),$(ADDR),$(TIMEOUT))DIM1_MIN")
+   field(LOPR, "0")
    field(VAL,  "0")
 }
 
@@ -104,6 +106,7 @@ record(longout, "$(P)$(R)MinZ")
    field(PINI, "YES")
    field(DTYP, "asynInt32")
    field(OUT,  "@asyn($(PORT),$(ADDR),$(TIMEOUT))DIM2_MIN")
+   field(LOPR, "1")
    field(VAL,  "0")
 }
 
@@ -357,3 +360,37 @@ record(mbbi, "$(P)$(R)DataTypeOut_RBV")
    field(SCAN, "I/O Intr")
 }
 
+###################################################################
+#  These records set the HOPR and LOPR values for the position    #
+#  and size to the maximum for the input array                    #
+###################################################################
+
+record(longin, "$(P)$(R)MaxX")
+{
+    field(INP,  "$(P)$(R)MaxSizeX_RBV CP")
+    field(FLNK, "$(P)$(R)SetXHOPR.PROC PP")
+}
+
+record(dfanout, "$(P)$(R)SetXHOPR")
+{
+    field(DOL,  "$(P)$(R)MaxX NPP")
+    field(OMSL, "closed_loop")
+    field(OUTA, "$(P)$(R)MinX.HOPR NPP")
+    field(OUTB, "$(P)$(R)SizeX.HOPR NPP")
+}
+
+record(longin, "$(P)$(R)MaxY")
+{
+    field(INP,  "$(P)$(R)MaxSizeY_RBV CP")
+    field(FLNK, "$(P)$(R)SetYHOPR.PROC PP")
+}
+
+record(dfanout, "$(P)$(R)SetYHOPR")
+{
+    field(DOL,  "$(P)$(R)MaxY NPP")
+    field(OMSL, "closed_loop")
+    field(OUTA, "$(P)$(R)MinY.HOPR NPP")
+    field(OUTB, "$(P)$(R)SizeY.HOPR NPP")
+}
+
+