From 8f41686a98297c840a6a8b7a5cb4e2450501667e Mon Sep 17 00:00:00 2001
From: Marty Kraimer <mrkraimer@comcast.net>
Date: Wed, 4 Sep 1996 15:25:19 +0000
Subject: [PATCH] If process routine found udf true it did not perform normal
 record completion

---
 src/rec/stringoutRecord.c | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/src/rec/stringoutRecord.c b/src/rec/stringoutRecord.c
index 7496cb218..f3473b81e 100644
--- a/src/rec/stringoutRecord.c
+++ b/src/rec/stringoutRecord.c
@@ -167,7 +167,7 @@ static long process(pstringout)
 
         if(pstringout->udf == TRUE ){
                 recGblSetSevr(pstringout,UDF_ALARM,INVALID_ALARM);
-                return(-1);
+                goto finish;
         }
 
         if (pstringout->nsev < INVALID_ALARM )
@@ -194,16 +194,11 @@ static long process(pstringout)
 
 	/* check if device support set pact */
 	if ( !pact && pstringout->pact ) return(0);
+finish:
 	pstringout->pact = TRUE;
-
 	recGblGetTimeStamp(pstringout);
-
-	/* check event list */
 	monitor(pstringout);
-
-	/* process the forward scan link record */
 	recGblFwdLink(pstringout);
-
 	pstringout->pact=FALSE;
 	return(status);
 }