Reorder some functions to avoid creation failure on an empty db; remove unused (and...
[evergreen-equinox.git] / Open-ILS / src / sql / Pg / 040.schema.asset.sql
index 6d1e41f..591543f 100644 (file)
@@ -720,5 +720,18 @@ CREATE TRIGGER autogenerate_placeholder_barcode
        BEFORE INSERT OR UPDATE ON asset.copy
        FOR EACH ROW EXECUTE PROCEDURE asset.autogenerate_placeholder_barcode();
 
+CREATE OR REPLACE FUNCTION evergreen.fake_fkey_tgr () RETURNS TRIGGER AS $F$
+DECLARE
+    copy_id BIGINT;
+BEGIN
+    EXECUTE 'SELECT ($1).' || quote_ident(TG_ARGV[0]) INTO copy_id USING NEW;
+    PERFORM * FROM asset.copy WHERE id = copy_id;
+    IF NOT FOUND THEN
+        RAISE EXCEPTION 'Key (%.%=%) does not exist in asset.copy', TG_TABLE_SCHEMA, TG_TABLE_NAME, copy_id;
+    END IF;
+    RETURN NULL;
+END;
+$F$ LANGUAGE PLPGSQL;
+
 COMMIT;