DataObjects/core_functions.sql

diff --git a/DataObjects/core_functions.sql b/DataObjects/core_functions.sql
index 5393b85..fbfd69a 100644 (file)
--- a/DataObjects/core_functions.sql
+++ b/DataObjects/core_functions.sql
@@ -13,3 +13,21 @@ CREATE FUNCTION i18n_translate(in_ltype  varchar(1) , in_lkey varchar(8), in_inl
         
     END $$
 DELIMITER ;
+
+
+
+DROP PROCEDURE IF EXISTS core_enum_seqmax_update;
+DELIMITER $$
+CREATE PROCEDURE core_enum_seqmax_update( etype varchar(128)) 
+        RETURNS INT(11) DETERMINISTIC
+    BEGIN
+        DECLARE ret  VARCHAR(64);
+        seqmax = (SELECT MAX(seqid) +1 FROM core_enum WHERE 
+
+        SET ret  = '';
+        SELECT lval INTO ret FROM i18n
+            WHERE ltype=in_ltype AND lkey=in_lkey and inlang=in_inlang LIMIT 1;
+        RETURN ret;
+        
+    END $$
+DELIMITER ;