From dae8a7a35926a35bb907969b0f1ac970cc7ee268 Mon Sep 17 00:00:00 2001
From: "Karl O. Pinc kop@karlpinc.com" <kop@karlpinc.com>
Date: Tue, 9 Jun 2026 23:34:06 +0000
Subject: [PATCH] Validate GROOM_SCANS_B.ExtractedBy against PEOPLE.Active

---
 db/schemas/lib/triggers/create/groom_scans_b.m4 | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/db/schemas/lib/triggers/create/groom_scans_b.m4 b/db/schemas/lib/triggers/create/groom_scans_b.m4
index b61c9a2..fafe7e6 100644
--- a/db/schemas/lib/triggers/create/groom_scans_b.m4
+++ b/db/schemas/lib/triggers/create/groom_scans_b.m4
@@ -107,6 +107,13 @@ CREATE OR REPLACE FUNCTION groom_scans_b_func ()
     END;
   END IF;
 
+  changequote({,})dnl
+  person_active({GROOM_SCANS_B}, {ExtractedBy},
+                {'Key (EID = ('
+                       || NEW.EID
+                       || ')'})
+  changequote(`,')dnl
+
   RETURN NULL;
   END;
 $$;
-- 
2.34.1