From 7395e6873df1fe410c1414bce044da8523929dfe Mon Sep 17 00:00:00 2001
From: "Janet B. Anderson" <jba@aps.anl.gov>
Date: Mon, 14 Sep 1992 14:25:23 +0000
Subject: [PATCH] Added RTN_SUCCESS check for status

---
 src/db/recGbl.c | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/src/db/recGbl.c b/src/db/recGbl.c
index ba28fd918..f3633879f 100644
--- a/src/db/recGbl.c
+++ b/src/db/recGbl.c
@@ -1,5 +1,5 @@
 /* recGbl.c - Global record processing routines */
-/* share/src/db $Id$ */
+/* share/src/db @(#)recGbl.c	1.15     8/29/92 */
 
 /*
  *      Author:          Marty Kraimer
@@ -34,6 +34,7 @@
  * .04  07-16-92        jba     changes made to remove compile warning msgs
  * .05  07-21-92        jba     Added recGblGetAlarmDouble
  * .06  08-07-92        jba     Added recGblGetLinkValue, recGblPutLinkValue
+ * .07  08-07-92        jba     Added RTN_SUCCESS check for status
  */
 
 #include	<vxWorks.h>
@@ -302,16 +303,17 @@ long recGblGetLinkValue(
 
 	switch (plink->type){
 		case(CONSTANT):
+			*pnRequest=0;
 			break;
 		case(DB_LINK):
 			status=dbGetLink(&(plink->value.db_link),
 				precord,dbrType,pdest,poptions,pnRequest);
-			if(status)
+			if(!RTN_SUCCESS(status))
 				recGblSetSevr(precord,LINK_ALARM,INVALID_ALARM);
 			break;
 		case(CA_LINK):
 			status=dbCaGetLink(plink);
-			if(status)
+			if(!RTN_SUCCESS(status))
 				recGblSetSevr(precord,LINK_ALARM,INVALID_ALARM);
 			break;
 		default:
@@ -338,12 +340,12 @@ long recGblPutLinkValue(
 		case(DB_LINK):
 			status=dbPutLink(&(plink->value.db_link),
 				precord,dbrType,psource,*pnRequest);
-			if(status)
+			if(!RTN_SUCCESS(status))
 				recGblSetSevr(precord,LINK_ALARM,INVALID_ALARM);
 			break;
 		case(CA_LINK):
 			status = dbCaPutLink(plink, &options, pnRequest);
-			if(status)
+			if(!RTN_SUCCESS(status))
 				recGblSetSevr(precord,LINK_ALARM,INVALID_ALARM);
 			break;
 		default: