From 45577c405b4188a0e758a31b36ffd637cbe0ee6b Mon Sep 17 00:00:00 2001
From: "Karl O. Pinc kop@karlpinc.com" <kop@karlpinc.com>
Date: Wed, 1 Oct 2025 21:31:44 +0000
Subject: [PATCH] The BIOGRAPHY_LOG.BLID cannot change

---
 db/schemas/lib/triggers/Makefile              |  1 +
 .../lib/triggers/create/biography_log.m4      | 50 +++++++++++++++++++
 db/schemas/lib/triggers/drop/biography_log.m4 | 23 +++++++++
 3 files changed, 74 insertions(+)
 create mode 100644 db/schemas/lib/triggers/create/biography_log.m4
 create mode 100644 db/schemas/lib/triggers/drop/biography_log.m4

diff --git a/db/schemas/lib/triggers/Makefile b/db/schemas/lib/triggers/Makefile
index e91259f..5722070 100644
--- a/db/schemas/lib/triggers/Makefile
+++ b/db/schemas/lib/triggers/Makefile
@@ -22,6 +22,7 @@
 ORDER := comm_ids \
          departtypes \
          biography_data \
+	 biography_log \
          comm_membs \
          comm_memb_log \
          cycle_states \
diff --git a/db/schemas/lib/triggers/create/biography_log.m4 b/db/schemas/lib/triggers/create/biography_log.m4
new file mode 100644
index 0000000..1596c5d
--- /dev/null
+++ b/db/schemas/lib/triggers/create/biography_log.m4
@@ -0,0 +1,50 @@
+dnl Copyright (C) 2015 The Meme Factory, Inc. http://www.karlpinc.com/
+dnl
+dnl   This program is free software: you can redistribute it and/or modify it
+dnl   under the terms of the GNU Affero General Public License as published by
+dnl   the Free Software Foundation, either version 3 of the License, or
+dnl   (at your option) any later version.
+dnl
+dnl   This program is distributed in the hope that it will be useful,
+dnl   but WITHOUT ANY WARRANTY; without even the implied warranty of
+dnl   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+dnl   GNU Affero General Public License for more details.
+dnl
+dnl   You should have received a copy of the GNU Affero General Public License
+dnl   along with this program.  If not, see <https://www.gnu.org/licenses/>.
+dnl
+dnl Triggers for the biography_log table
+dnl
+dnl Karl O. Pinc <kop@karlpinc.com>
+
+dnl m4 includes
+include(`copyright.m4')dnl
+include(`constants.m4')dnl
+include(`macros.m4')dnl
+
+
+RAISE INFO 'biography_log_func';
+CREATE OR REPLACE FUNCTION biography_log_func ()
+  RETURNS trigger
+  LANGUAGE plpgsql
+  sdb_function_set_search_path
+  AS $$
+  BEGIN
+  -- Function for biography_log update trigger
+  --
+  -- AGPL_notice(`  --', `2025',
+                 `The Meme Factory, Inc., www.karlpinc.com')
+
+  -- Allowing the BLID to change makes life too complicated.
+  cannot_change(`BIOGRAPHY_LOG', `BLID')
+
+  RETURN NULL;
+  END;
+$$;
+
+
+RAISE INFO 'biography_log_trigger';
+CREATE TRIGGER biography_log_trigger
+  AFTER UPDATE
+  ON biography_log FOR EACH ROW
+  EXECUTE PROCEDURE biography_log_func();
diff --git a/db/schemas/lib/triggers/drop/biography_log.m4 b/db/schemas/lib/triggers/drop/biography_log.m4
new file mode 100644
index 0000000..ab081a1
--- /dev/null
+++ b/db/schemas/lib/triggers/drop/biography_log.m4
@@ -0,0 +1,23 @@
+dnl Copyright (C) 2025 The Meme Factory, Inc.   http://www.karlpinc.com/
+dnl
+dnl   This program is free software: you can redistribute it and/or modify
+dnl   it under the terms of the GNU Affero General Public License as published by
+dnl   the Free Software Foundation, either version 3 of the License, or
+dnl   (at your option) any later version.
+dnl
+dnl   This program is distributed in the hope that it will be useful,
+dnl   but WITHOUT ANY WARRANTY; without even the implied warranty of
+dnl   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+dnl   GNU Affero General Public License for more details.
+dnl
+dnl   You should have received a copy of the GNU Affero General Public License
+dnl   along with this program.  If not, see <https://www.gnu.org/licenses/>.
+dnl
+dnl Drop triggers for biography_log table
+dnl
+dnl Karl O. Pinc <kop@karlpinc.com>
+
+dnl m4 includes
+include(`copyright.m4')dnl
+
+DROP FUNCTION IF EXISTS biography_log_func() CASCADE;
-- 
2.34.1