From f024ba4a021455a24fa61ba724b3a8b1912d2fbd Mon Sep 17 00:00:00 2001
From: "Janet B. Anderson" <jba@aps.anl.gov>
Date: Mon, 21 Sep 1992 12:26:34 +0000
Subject: [PATCH] pact now set in recGblGetLinkValue

---
 src/rec/recLongout.c    | 3 +--
 src/rec/recPulseTrain.c | 3 +--
 src/rec/recStringout.c  | 3 +--
 3 files changed, 3 insertions(+), 6 deletions(-)

diff --git a/src/rec/recLongout.c b/src/rec/recLongout.c
index 25c3fdd8b..c16fbba9a 100644
--- a/src/rec/recLongout.c
+++ b/src/rec/recLongout.c
@@ -42,6 +42,7 @@
  * .11  08-14-92        jba     Added simulation processing
  * .12  08-19-92        jba     Added code for invalid alarm output action
  * .13  09-10-92        jba     modified fetch of val from dol to call recGblGetLinkValue
+ * .14  09-18-92        jba     pact now set in recGblGetLinkValue
  */ 
 
 
@@ -187,10 +188,8 @@ static long process(plongout)
 		long options=0;
 		long nRequest=1;
 
-		plongout->pact = TRUE;
 		status = recGblGetLinkValue(&(plongout->dol),(void *)plongout,
 			DBR_LONG,&(plongout->val),&options,&nRequest);
-		plongout->pact = FALSE;
 		if(RTN_SUCCESS(status)) plongout->udf=FALSE;
 	}
 
diff --git a/src/rec/recPulseTrain.c b/src/rec/recPulseTrain.c
index 45fd2a656..76987a16b 100644
--- a/src/rec/recPulseTrain.c
+++ b/src/rec/recPulseTrain.c
@@ -41,6 +41,7 @@
  * .10  07-16-92        jba     added invalid alarm fwd link test and chngd fwd lnk to macro
  * .11  09-10-92        jba     replaced get of hgv value with call to recGblGetLinkvalue
  * .12  10-10-92        jba     replaced code with recGblGetLinkValue call
+ * .13  10-18-92        jba     pact now set in recGblGetLinkValue
  */ 
 
 #include     <vxWorks.h>
@@ -178,10 +179,8 @@ static long process(ppt)
     if (!ppt->pact && ppt->gtyp == SOFTWARE){
          options=0;
          nRequest=1;
-         ppt->pact = TRUE;
          status=recGblGetLinkValue(&(ppt->sgl),(void *)ppt,DBR_SHORT,
               &(ppt->sgv),&options,&nRequest);
-         ppt->pact = FALSE;
 
          if(status==0){
               if(ppt->sgv != ppt->osgv){ /* hgv changed */
diff --git a/src/rec/recStringout.c b/src/rec/recStringout.c
index 48d01a45f..20ddca80c 100644
--- a/src/rec/recStringout.c
+++ b/src/rec/recStringout.c
@@ -40,6 +40,7 @@
  * .09  08-14-92        jba     Added simulation processing
  * .10  08-19-92        jba     Added code for invalid alarm output action
  * .11  10-10-92        jba     replaced code for get of VAL from DOL with recGblGetLinkValue call
+ * .12  10-18-92        jba     pact noew set in recGblGetLinkValue
  */ 
 
 
@@ -185,10 +186,8 @@ static long process(pstringout)
 		long options=0;
 		long nRequest=1;
 
-		pstringout->pact = TRUE;
 		status = recGblGetLinkValue(&(pstringout->dol),(void *)pstringout,
 			DBR_STRING,pstringout->val,&options,&nRequest);
-		pstringout->pact = FALSE;
 		if(RTN_SUCCESS(status)) pstringout->udf=FALSE;
 	}