DataObjects/core_functions.sql

diff --git a/DataObjects/core_functions.sql b/DataObjects/core_functions.sql
index 949dd2c..1017191 100644 (file)
--- a/DataObjects/core_functions.sql
+++ b/DataObjects/core_functions.sql
@@ -18,13 +18,12 @@ DELIMITER ;
 
 DROP FUNCTION IF EXISTS core_enum_seqmax;
 DELIMITER $$
-CREATE FUNCTION core_enum_seqmax( etype varchar(128))
-  RETURNS INT(11) DETERMINISTIC
+CREATE PROCEDURE core_enum_seqmax_update( etype varchar(128))
 BEGIN
         DECLARE seqmax INT(11);
         SELECT MAX(seqid) +1 INTO seqmax FROM core_enum WHERE
             etype = etype;
-        RETURN seqmax;
+        UPDATE core_enum SET seqmax = seqmax WHERE etype = etype;
         
     END $$
 DELIMITER ;