From d0c6685cb98ff3eb9778400f4030c8fb42b39b33 Mon Sep 17 00:00:00 2001
From: Ruud Overeem <overeem@astron.nl>
Date: Thu, 17 Sep 2009 13:23:19 +0000
Subject: [PATCH] Bug 1284: Attempt to set start and stoptijd when state is set
 to active, finished or aborted is set.

---
 SAS/OTDB/sql/setTreeState_func.sql | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

diff --git a/SAS/OTDB/sql/setTreeState_func.sql b/SAS/OTDB/sql/setTreeState_func.sql
index 770aa11d7fc..116eafb77c3 100644
--- a/SAS/OTDB/sql/setTreeState_func.sql
+++ b/SAS/OTDB/sql/setTreeState_func.sql
@@ -46,7 +46,10 @@ CREATE OR REPLACE FUNCTION setTreeState(INT4, INT4, INT2)
 		vAuthToken				ALIAS FOR $1;
 		vUserID					INT4;
 		TThardware CONSTANT		INT2 := 10;
+		TTVIC	   CONSTANT		INT2 := 30;
 		TSactive   CONSTANT		INT2 := 600;
+		TSfinished CONSTANT		INT2 := 1000;
+		TSaborted  CONSTANT		INT2 := 1100;
 		TSobsolete CONSTANT		INT2 := 1200;
 
 	BEGIN
@@ -117,6 +120,22 @@ CREATE OR REPLACE FUNCTION setTreeState(INT4, INT4, INT2)
 		  END;
 		END IF;
 
+		-- add timeinfo to VIC trees
+		IF vTreeType = TTVIC THEN
+		  BEGIN
+		  IF $3 = TSactive THEN
+			UPDATE OTDBtree
+			SET    starttime = now()
+			WHERE  treeid    = $2;
+		  END IF;
+		  IF $3 = TSfinished OR $3 = TSaborted THEN
+		    UPDATE OTDBtree
+			SET	   stoptime = now()
+			WHERE  treeid   = $2;
+		  END IF;
+		  END;
+		END IF;
+
 		RETURN TRUE;
 	END;
 ' LANGUAGE plpgsql;
-- 
GitLab