From 51986449c83ddb4291f2afd38fc1a2526c93b0b3 Mon Sep 17 00:00:00 2001
From: "Janet B. Anderson" <jba@aps.anl.gov>
Date: Thu, 5 Dec 1991 13:16:55 +0000
Subject: [PATCH] jba add retrun to dbGetLInk,bugfix for SPC_MOD,PROC
 processing change

---
 src/db/dbAccess.c | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/src/db/dbAccess.c b/src/db/dbAccess.c
index adf5d6f10..6b9700384 100644
--- a/src/db/dbAccess.c
+++ b/src/db/dbAccess.c
@@ -33,6 +33,9 @@
  * .03  09-30-91	mrk	Support for TPRO and DISP
  * .04  10-03-91	jba	Bug fix in putStringUchar
  * .05  11-06-91	jba	Moved processing message before record process
+ * .06  11-26-91	jba	Added return to dbGetLink
+ *              		Fixed bug in special processing of SPC_MOD (100) 
+ * .07  12-02-91	jba	Writing to PROC will always force record process
  */
 
 /* This is a major revision of the original implementation of database access.*/
@@ -197,8 +200,8 @@ long dbScanPassive(paddr)
 {
 	struct dbCommon *precord=(struct dbCommon *)(paddr->precord);
 	
-	/* if not passive just return success */
-	if(precord->scan != 0) return(0);
+	/* if not passive and field not PROC just return success */
+	if(precord->scan != 0 && paddr->pfield != &precord->proc) return(0);
 
 	/* return result of process */
 	return(dbProcess(paddr));
@@ -393,6 +396,7 @@ long dbGetLink(pdblink,pdest,dbrType,pbuffer,options,nRequest)
 	}
 	status= dbGetField(paddr,dbrType,pbuffer,options,nRequest,NULL);
 	if(status) recGblRecordError(status,pdest,"dbGetLink");
+        return(status);
 }
 
 long dbPutLink(pdblink,psource,dbrType,pbuffer,nRequest)
@@ -5830,7 +5834,7 @@ long		nRequest;
 
 	/* check for special processing	is required */
 	if(special) {
-	    if(special<=100) { /*global processing*/
+	    if(special<100) { /*global processing*/
 		if(special==SPC_SCAN) add_to_scan_list(paddr,0xffff);
 	    }
 	    else {