Open-ILS/src/sql/Pg/040.schema.asset.sql

   1 /*
   2  * Copyright (C) 2004-2008  Georgia Public Library Service
   3  * Copyright (C) 2007-2008  Equinox Software, Inc.
   4  * Mike Rylander <miker@esilibrary.com>
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License
   8  * as published by the Free Software Foundation; either version 2
   9  * of the License, or (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  */
  17
  18 DROP SCHEMA IF EXISTS asset CASCADE;
  19
  20 BEGIN;
  21
  22 CREATE SCHEMA asset;
  23
  24 CREATE TABLE asset.copy_location (
  25         id              SERIAL  PRIMARY KEY,
  26         name            TEXT    NOT NULL,
  27         owning_lib      INT     NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
  28         holdable        BOOL    NOT NULL DEFAULT TRUE,
  29         hold_verify     BOOL    NOT NULL DEFAULT FALSE,
  30         opac_visible    BOOL    NOT NULL DEFAULT TRUE,
  31         circulate       BOOL    NOT NULL DEFAULT TRUE,
  32         label_prefix    TEXT,
  33         label_suffix    TEXT,
  34         checkin_alert   BOOL    NOT NULL DEFAULT FALSE,
  35         deleted         BOOL    NOT NULL DEFAULT FALSE,
  36         url             TEXT
  37 );
  38 CREATE UNIQUE INDEX acl_name_once_per_lib ON asset.copy_location (name, owning_lib) WHERE deleted = FALSE OR deleted IS FALSE;
  39
  40 CREATE TABLE asset.copy_location_order
  41 (
  42         id              SERIAL           PRIMARY KEY,
  43         location        INT              NOT NULL
  44                                              REFERENCES asset.copy_location
  45                                              ON DELETE CASCADE
  46                                              DEFERRABLE INITIALLY DEFERRED,
  47         org             INT              NOT NULL
  48                                              REFERENCES actor.org_unit
  49                                              ON DELETE CASCADE
  50                                              DEFERRABLE INITIALLY DEFERRED,
  51         position        INT              NOT NULL DEFAULT 0,
  52         CONSTRAINT acplo_once_per_org UNIQUE ( location, org )
  53 );
  54
  55 CREATE TABLE asset.copy_location_group (
  56     id              SERIAL  PRIMARY KEY,
  57     name            TEXT    NOT NULL, -- i18n
  58     owner           INT     NOT NULL REFERENCES actor.org_unit (id) ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED,
  59     pos             INT     NOT NULL DEFAULT 0,
  60     top             BOOL    NOT NULL DEFAULT FALSE,
  61     opac_visible    BOOL    NOT NULL DEFAULT TRUE,
  62     CONSTRAINT lgroup_once_per_owner UNIQUE (owner,name)
  63 );
  64
  65 CREATE TABLE asset.copy_location_group_map (
  66     id       SERIAL PRIMARY KEY,
  67     location    INT     NOT NULL REFERENCES asset.copy_location (id) ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED,
  68     lgroup      INT     NOT NULL REFERENCES asset.copy_location_group (id) ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED,
  69     CONSTRAINT  lgroup_once_per_group UNIQUE (lgroup,location)
  70 );
  71
  72 CREATE TABLE asset.copy (
  73         id              BIGSERIAL                       PRIMARY KEY,
  74         circ_lib        INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
  75         creator         BIGINT                          NOT NULL,
  76         call_number     BIGINT                          NOT NULL,
  77         editor          BIGINT                          NOT NULL,
  78         create_date     TIMESTAMP WITH TIME ZONE        DEFAULT NOW(),
  79         edit_date       TIMESTAMP WITH TIME ZONE        DEFAULT NOW(),
  80         copy_number     INT,
  81         status          INT                             NOT NULL DEFAULT 0 REFERENCES config.copy_status (id) DEFERRABLE INITIALLY DEFERRED,
  82         location        INT                             NOT NULL DEFAULT 1 REFERENCES asset.copy_location (id) DEFERRABLE INITIALLY DEFERRED,
  83         loan_duration   INT                             NOT NULL CHECK ( loan_duration IN (1,2,3) ),
  84         fine_level      INT                             NOT NULL CHECK ( fine_level IN (1,2,3) ),
  85         age_protect     INT,
  86         circulate       BOOL                            NOT NULL DEFAULT TRUE,
  87         deposit         BOOL                            NOT NULL DEFAULT FALSE,
  88         ref             BOOL                            NOT NULL DEFAULT FALSE,
  89         holdable        BOOL                            NOT NULL DEFAULT TRUE,
  90         deposit_amount  NUMERIC(6,2)                    NOT NULL DEFAULT 0.00,
  91         price           NUMERIC(8,2),
  92         barcode         TEXT                            NOT NULL,
  93         circ_modifier   TEXT,
  94         circ_as_type    TEXT,
  95         dummy_title     TEXT,
  96         dummy_author    TEXT,
  97         alert_message   TEXT,
  98         opac_visible    BOOL                            NOT NULL DEFAULT TRUE,
  99         deleted         BOOL                            NOT NULL DEFAULT FALSE,
 100         floating        INT,
 101         dummy_isbn      TEXT,
 102         status_changed_time TIMESTAMP WITH TIME ZONE,
 103         active_date TIMESTAMP WITH TIME ZONE,
 104         mint_condition      BOOL        NOT NULL DEFAULT TRUE,
 105     cost    NUMERIC(8,2)
 106 );
 107 CREATE UNIQUE INDEX copy_barcode_key ON asset.copy (barcode) WHERE deleted = FALSE OR deleted IS FALSE;
 108 CREATE INDEX cp_cn_idx ON asset.copy (call_number);
 109 CREATE INDEX cp_avail_cn_idx ON asset.copy (call_number);
 110 CREATE INDEX cp_creator_idx  ON asset.copy ( creator );
 111 CREATE INDEX cp_editor_idx   ON asset.copy ( editor );
 112 CREATE INDEX cp_create_date  ON asset.copy (create_date);
 113 CREATE INDEX cp_available_by_circ_lib_idx ON asset.copy (circ_lib) WHERE status IN (0,7);
 114 CREATE RULE protect_copy_delete AS ON DELETE TO asset.copy DO INSTEAD UPDATE asset.copy SET deleted = TRUE WHERE OLD.id = asset.copy.id;
 115
 116 CREATE TABLE asset.copy_part_map (
 117     id          SERIAL  PRIMARY KEY,
 118     target_copy BIGINT  NOT NULL, -- points o asset.copy
 119     part        INT     NOT NULL REFERENCES biblio.monograph_part (id) ON DELETE CASCADE
 120 );
 121 CREATE UNIQUE INDEX copy_part_map_cp_part_idx ON asset.copy_part_map (target_copy, part);
 122
 123 CREATE TABLE asset.opac_visible_copies (
 124   id        BIGSERIAL primary key,
 125   copy_id   BIGINT, -- copy id
 126   record    BIGINT,
 127   circ_lib  INTEGER
 128 );
 129 COMMENT ON TABLE asset.opac_visible_copies IS $$
 130 Materialized view of copies that are visible in the OPAC, used by
 131 search.query_parser_fts() to speed up OPAC visibility checks on large
 132 databases.  Contents are maintained by a set of triggers.
 133 $$;
 134 CREATE INDEX opac_visible_copies_idx1 on asset.opac_visible_copies (record, circ_lib);
 135 CREATE INDEX opac_visible_copies_copy_id_idx on asset.opac_visible_copies (copy_id);
 136 CREATE UNIQUE INDEX opac_visible_copies_once_per_record_idx on asset.opac_visible_copies (copy_id, record);
 137
 138 CREATE OR REPLACE FUNCTION asset.acp_status_changed()
 139 RETURNS TRIGGER AS $$
 140 BEGIN
 141         IF NEW.status <> OLD.status AND NOT (NEW.status = 0 AND OLD.status = 7) THEN
 142         NEW.status_changed_time := now();
 143         IF NEW.active_date IS NULL AND NEW.status IN (SELECT id FROM config.copy_status WHERE copy_active = true) THEN
 144             NEW.active_date := now();
 145         END IF;
 146     END IF;
 147     RETURN NEW;
 148 END;
 149 $$ LANGUAGE plpgsql;
 150
 151 -- Need to check on initial create. Fast adds, manual edit of status at create, etc.
 152 CREATE OR REPLACE FUNCTION asset.acp_created()
 153 RETURNS TRIGGER AS $$
 154 BEGIN
 155     IF NEW.active_date IS NULL AND NEW.status IN (SELECT id FROM config.copy_status WHERE copy_active = true) THEN
 156         NEW.active_date := now();
 157     END IF;
 158     IF NEW.status_changed_time IS NULL THEN
 159         NEW.status_changed_time := now();
 160     END IF;
 161     RETURN NEW;
 162 END;
 163 $$ LANGUAGE plpgsql;
 164
 165 CREATE TRIGGER acp_status_changed_trig
 166     BEFORE UPDATE ON asset.copy
 167     FOR EACH ROW EXECUTE PROCEDURE asset.acp_status_changed();
 168
 169 CREATE TRIGGER acp_created_trig
 170     BEFORE INSERT ON asset.copy
 171     FOR EACH ROW EXECUTE PROCEDURE asset.acp_created();
 172
 173 CREATE OR REPLACE FUNCTION asset.acp_location_fixer()
 174 RETURNS TRIGGER AS $$
 175 DECLARE
 176     new_copy_location INT;
 177 BEGIN
 178     IF (TG_OP = 'UPDATE') THEN
 179         IF NEW.location = OLD.location AND NEW.call_number = OLD.call_number AND NEW.circ_lib = OLD.circ_lib THEN
 180             RETURN NEW;
 181         END IF;
 182     END IF;
 183     SELECT INTO new_copy_location acpl.id FROM asset.copy_location acpl JOIN actor.org_unit_ancestors_distance((SELECT owning_lib FROM asset.call_number WHERE id = NEW.call_number)) aouad ON acpl.owning_lib = aouad.id WHERE deleted IS FALSE AND name = (SELECT name FROM asset.copy_location WHERE id = NEW.location) ORDER BY distance LIMIT 1;
 184     IF new_copy_location IS NULL THEN
 185         SELECT INTO new_copy_location acpl.id FROM asset.copy_location acpl JOIN actor.org_unit_ancestors_distance(NEW.circ_lib) aouad ON acpl.owning_lib = aouad.id WHERE deleted IS FALSE AND name = (SELECT name FROM asset.copy_location WHERE id = NEW.location) ORDER BY distance LIMIT 1;
 186     END IF;
 187     IF new_copy_location IS NOT NULL THEN
 188         NEW.location = new_copy_location;
 189     END IF;
 190     RETURN NEW;
 191 END;
 192 $$ LANGUAGE plpgsql;
 193
 194 CREATE TRIGGER acp_location_fixer_trig
 195     BEFORE INSERT OR UPDATE OF location, call_number, circ_lib ON asset.copy
 196     FOR EACH ROW EXECUTE PROCEDURE asset.acp_location_fixer();
 197
 198 CREATE TABLE asset.stat_cat_sip_fields (
 199     field   CHAR(2) PRIMARY KEY,
 200     name    TEXT    NOT NULL,
 201     one_only BOOL    NOT NULL DEFAULT FALSE
 202 );
 203 COMMENT ON TABLE asset.stat_cat_sip_fields IS $$
 204 Asset Statistical Category SIP Fields
 205
 206 Contains the list of valid SIP Field identifiers for
 207 Statistical Categories.
 208 $$;
 209
 210 CREATE TABLE asset.stat_cat_entry_transparency_map (
 211         id                      BIGSERIAL       PRIMARY KEY,
 212         stat_cat                INT             NOT NULL, -- needs ON DELETE CASCADE
 213         stat_cat_entry          INT             NOT NULL, -- needs ON DELETE CASCADE
 214         owning_transparency     INT             NOT NULL, -- needs ON DELETE CASCADE
 215         CONSTRAINT scte_once_per_trans UNIQUE (owning_transparency,stat_cat)
 216 );
 217
 218 CREATE TABLE asset.stat_cat (
 219         id              SERIAL  PRIMARY KEY,
 220         owner           INT     NOT NULL,
 221         opac_visible    BOOL    NOT NULL DEFAULT FALSE,
 222         name            TEXT    NOT NULL,
 223         required        BOOL    NOT NULL DEFAULT FALSE,
 224     sip_field   CHAR(2) REFERENCES asset.stat_cat_sip_fields(field) ON UPDATE CASCADE ON DELETE SET NULL DEFERRABLE INITIALLY DEFERRED,
 225     sip_format  TEXT,
 226     checkout_archive    BOOL NOT NULL DEFAULT FALSE,
 227         CONSTRAINT sc_once_per_owner UNIQUE (owner,name)
 228 );
 229
 230 CREATE TABLE asset.stat_cat_entry (
 231         id              SERIAL  PRIMARY KEY,
 232         stat_cat        INT     NOT NULL,
 233         owner           INT     NOT NULL,
 234         value           TEXT    NOT NULL,
 235         CONSTRAINT sce_once_per_owner UNIQUE (stat_cat,owner,value)
 236 );
 237
 238 CREATE TABLE asset.stat_cat_entry_copy_map (
 239         id              BIGSERIAL       PRIMARY KEY,
 240         stat_cat        INT             NOT NULL,
 241         stat_cat_entry  INT             NOT NULL,
 242         owning_copy     BIGINT          NOT NULL,
 243         CONSTRAINT sce_once_per_copy UNIQUE (owning_copy,stat_cat)
 244 );
 245 CREATE INDEX scecm_owning_copy_idx ON asset.stat_cat_entry_copy_map(owning_copy);
 246
 247 CREATE FUNCTION asset.stat_cat_check() RETURNS trigger AS $func$
 248 DECLARE
 249     sipfield asset.stat_cat_sip_fields%ROWTYPE;
 250     use_count INT;
 251 BEGIN
 252     IF NEW.sip_field IS NOT NULL THEN
 253         SELECT INTO sipfield * FROM asset.stat_cat_sip_fields WHERE field = NEW.sip_field;
 254         IF sipfield.one_only THEN
 255             SELECT INTO use_count count(id) FROM asset.stat_cat WHERE sip_field = NEW.sip_field AND id != NEW.id;
 256             IF use_count > 0 THEN
 257                 RAISE EXCEPTION 'Sip field cannot be used twice';
 258             END IF;
 259         END IF;
 260     END IF;
 261     RETURN NEW;
 262 END;
 263 $func$ LANGUAGE PLPGSQL;
 264
 265 CREATE TRIGGER asset_stat_cat_sip_update_trigger
 266     BEFORE INSERT OR UPDATE ON asset.stat_cat FOR EACH ROW
 267     EXECUTE PROCEDURE asset.stat_cat_check();
 268
 269 CREATE TABLE asset.copy_note (
 270         id              BIGSERIAL                       PRIMARY KEY,
 271         owning_copy     BIGINT                          NOT NULL,
 272         creator         BIGINT                          NOT NULL,
 273         create_date     TIMESTAMP WITH TIME ZONE        DEFAULT NOW(),
 274         pub             BOOL                            NOT NULL DEFAULT FALSE,
 275         title           TEXT                            NOT NULL,
 276         value           TEXT                            NOT NULL
 277 );
 278 CREATE INDEX asset_copy_note_creator_idx ON asset.copy_note ( creator );
 279 CREATE INDEX asset_copy_note_owning_copy_idx ON asset.copy_note ( owning_copy );
 280
 281 CREATE TABLE asset.uri (
 282     id  SERIAL  PRIMARY KEY,
 283     href    TEXT    NOT NULL,
 284     label   TEXT,
 285     use_restriction TEXT,
 286     active  BOOL    NOT NULL DEFAULT TRUE
 287 );
 288
 289 CREATE TABLE asset.call_number_class (
 290     id             bigserial     PRIMARY KEY,
 291     name           TEXT          NOT NULL,
 292     normalizer     TEXT          NOT NULL DEFAULT 'asset.normalize_generic',
 293     field          TEXT          NOT NULL DEFAULT '050ab,055ab,060ab,070ab,080ab,082ab,086ab,088ab,090,092,096,098,099'
 294 );
 295 COMMENT ON TABLE asset.call_number_class IS $$
 296 Defines the call number normalization database functions in the "normalizer"
 297 column and the tag/subfield combinations to use to lookup the call number in
 298 the "field" column for a given classification scheme. Tag/subfield combinations
 299 are delimited by commas.
 300 $$;
 301
 302 CREATE OR REPLACE FUNCTION asset.label_normalizer() RETURNS TRIGGER AS $func$
 303 DECLARE
 304     sortkey        TEXT := '';
 305 BEGIN
 306     sortkey := NEW.label_sortkey;
 307
 308     IF NEW.label_class IS NULL THEN
 309             NEW.label_class := COALESCE(
 310             (
 311                 SELECT substring(value from E'\\d+')::integer
 312                 FROM actor.org_unit_ancestor_setting('cat.default_classification_scheme', NEW.owning_lib)
 313             ), 1
 314         );
 315     END IF;
 316
 317     EXECUTE 'SELECT ' || acnc.normalizer || '(' ||
 318        quote_literal( NEW.label ) || ')'
 319        FROM asset.call_number_class acnc
 320        WHERE acnc.id = NEW.label_class
 321        INTO sortkey;
 322     NEW.label_sortkey = sortkey;
 323     RETURN NEW;
 324 END;
 325 $func$ LANGUAGE PLPGSQL;
 326
 327 CREATE OR REPLACE FUNCTION asset.label_normalizer_generic(TEXT) RETURNS TEXT AS $func$
 328     # Created after looking at the Koha C4::ClassSortRoutine::Generic module,
 329     # thus could probably be considered a derived work, although nothing was
 330     # directly copied - but to err on the safe side of providing attribution:
 331     # Copyright (C) 2007 LibLime
 332     # Copyright (C) 2011 Equinox Software, Inc (Steve Callendar)
 333     # Licensed under the GPL v2 or later
 334
 335     use strict;
 336     use warnings;
 337
 338     # Converts the callnumber to uppercase
 339     # Strips spaces from start and end of the call number
 340     # Converts anything other than letters, digits, and periods into spaces
 341     # Collapses multiple spaces into a single underscore
 342     my $callnum = uc(shift);
 343     $callnum =~ s/^\s//g;
 344     $callnum =~ s/\s$//g;
 345     # NOTE: this previously used underscores, but this caused sorting issues
 346     # for the "before" half of page 0 on CN browse, sorting CNs containing a
 347     # decimal before "whole number" CNs
 348     $callnum =~ s/[^A-Z0-9_.]/ /g;
 349     $callnum =~ s/ {2,}/ /g;
 350
 351     return $callnum;
 352 $func$ LANGUAGE PLPERLU IMMUTABLE;
 353
 354 CREATE OR REPLACE FUNCTION asset.label_normalizer_dewey(TEXT) RETURNS TEXT AS $func$
 355     # Derived from the Koha C4::ClassSortRoutine::Dewey module
 356     # Copyright (C) 2007 LibLime
 357     # Licensed under the GPL v2 or later
 358
 359     use strict;
 360     use warnings;
 361
 362     my $init = uc(shift);
 363     $init =~ s/^\s+//;
 364     $init =~ s/\s+$//;
 365     $init =~ s!/!!g;
 366     $init =~ s/^([\p{IsAlpha}]+)/$1 /;
 367     my @tokens = split /\.|\s+/, $init;
 368     my $digit_group_count = 0;
 369     my $first_digit_group_idx;
 370     for (my $i = 0; $i <= $#tokens; $i++) {
 371         if ($tokens[$i] =~ /^\d+$/) {
 372             $digit_group_count++;
 373             if ($digit_group_count == 1) {
 374                 $first_digit_group_idx = $i;
 375             }
 376             if (2 == $digit_group_count) {
 377                 $tokens[$i] = sprintf("%-15.15s", $tokens[$i]);
 378                 $tokens[$i] =~ tr/ /0/;
 379             }
 380         }
 381     }
 382     # Pad the first digit_group if there was only one
 383     if (1 == $digit_group_count) {
 384         $tokens[$first_digit_group_idx] .= '_000000000000000'
 385     }
 386     my $key = join("_", @tokens);
 387     $key =~ s/[^\p{IsAlnum}_]//g;
 388
 389     return $key;
 390
 391 $func$ LANGUAGE PLPERLU IMMUTABLE;
 392
 393
 394 CREATE OR REPLACE FUNCTION asset.label_normalizer_lc(TEXT) RETURNS TEXT AS $func$
 395     use strict;
 396     use warnings;
 397
 398     # Library::CallNumber::LC is currently hosted at http://code.google.com/p/library-callnumber-lc/
 399     # The author hopes to upload it to CPAN some day, which would make our lives easier
 400     use Library::CallNumber::LC;
 401
 402     my $callnum = Library::CallNumber::LC->new(shift);
 403     return $callnum->normalize();
 404
 405 $func$ LANGUAGE PLPERLU IMMUTABLE;
 406
 407 INSERT INTO asset.call_number_class (name, normalizer, field) VALUES
 408     ('Generic', 'asset.label_normalizer_generic', '050ab,055ab,060ab,070ab,080ab,082ab,086ab,088ab,090,092,096,098,099'),
 409     ('Dewey (DDC)', 'asset.label_normalizer_dewey', '080ab,082ab,092abef'),
 410     ('Library of Congress (LC)', 'asset.label_normalizer_lc', '050ab,055ab,090abef')
 411 ;
 412
 413 CREATE OR REPLACE FUNCTION asset.normalize_affix_sortkey () RETURNS TRIGGER AS $$
 414 BEGIN
 415     NEW.label_sortkey := REGEXP_REPLACE(
 416         evergreen.lpad_number_substrings(
 417             naco_normalize(NEW.label),
 418             '0',
 419             10
 420         ),
 421         E'\\s+',
 422         '',
 423         'g'
 424     );
 425     RETURN NEW;
 426 END;
 427 $$ LANGUAGE PLPGSQL;
 428
 429 CREATE TABLE asset.call_number_prefix (
 430         id                      SERIAL   PRIMARY KEY,
 431         owning_lib          INT                 NOT NULL REFERENCES actor.org_unit (id),
 432         label               TEXT                NOT NULL, -- i18n
 433         label_sortkey   TEXT
 434 );
 435 CREATE TRIGGER prefix_normalize_tgr BEFORE INSERT OR UPDATE ON asset.call_number_prefix FOR EACH ROW EXECUTE PROCEDURE asset.normalize_affix_sortkey();
 436 CREATE UNIQUE INDEX asset_call_number_prefix_once_per_lib ON asset.call_number_prefix (label, owning_lib);
 437 CREATE INDEX asset_call_number_prefix_sortkey_idx ON asset.call_number_prefix (label_sortkey);
 438
 439 CREATE TABLE asset.call_number_suffix (
 440         id                      SERIAL   PRIMARY KEY,
 441         owning_lib          INT                 NOT NULL REFERENCES actor.org_unit (id),
 442         label               TEXT                NOT NULL, -- i18n
 443         label_sortkey   TEXT
 444 );
 445 CREATE TRIGGER suffix_normalize_tgr BEFORE INSERT OR UPDATE ON asset.call_number_suffix FOR EACH ROW EXECUTE PROCEDURE asset.normalize_affix_sortkey();
 446 CREATE UNIQUE INDEX asset_call_number_suffix_once_per_lib ON asset.call_number_suffix (label, owning_lib);
 447 CREATE INDEX asset_call_number_suffix_sortkey_idx ON asset.call_number_suffix (label_sortkey);
 448
 449 CREATE TABLE asset.call_number (
 450         id              bigserial PRIMARY KEY,
 451         creator         BIGINT                          NOT NULL,
 452         create_date     TIMESTAMP WITH TIME ZONE        DEFAULT NOW(),
 453         editor          BIGINT                          NOT NULL,
 454         edit_date       TIMESTAMP WITH TIME ZONE        DEFAULT NOW(),
 455         record          bigint                          NOT NULL,
 456         owning_lib      INT                                 NOT NULL,
 457         label           TEXT                            NOT NULL,
 458         deleted         BOOL                            NOT NULL DEFAULT FALSE,
 459         prefix          INT                                 NOT NULL DEFAULT -1 REFERENCES asset.call_number_prefix(id) DEFERRABLE INITIALLY DEFERRED,
 460         suffix          INT                                 NOT NULL DEFAULT -1 REFERENCES asset.call_number_suffix(id) DEFERRABLE INITIALLY DEFERRED,
 461         label_class     BIGINT                          NOT NULL
 462                                                         REFERENCES asset.call_number_class(id)
 463                                                         DEFERRABLE INITIALLY DEFERRED,
 464         label_sortkey   TEXT
 465 );
 466 CREATE INDEX asset_call_number_record_idx ON asset.call_number (record);
 467 CREATE INDEX asset_call_number_creator_idx ON asset.call_number (creator);
 468 CREATE INDEX asset_call_number_editor_idx ON asset.call_number (editor);
 469 CREATE INDEX asset_call_number_dewey_idx ON asset.call_number (public.call_number_dewey(label));
 470 CREATE INDEX asset_call_number_upper_label_id_owning_lib_idx ON asset.call_number (oils_text_as_bytea(label),id,owning_lib);
 471 CREATE INDEX asset_call_number_label_sortkey ON asset.call_number(oils_text_as_bytea(label_sortkey));
 472 CREATE UNIQUE INDEX asset_call_number_label_once_per_lib ON asset.call_number (record, owning_lib, label, prefix, suffix) WHERE deleted = FALSE OR deleted IS FALSE;
 473 CREATE INDEX asset_call_number_label_sortkey_browse ON asset.call_number(oils_text_as_bytea(label_sortkey), oils_text_as_bytea(label), id, owning_lib) WHERE deleted IS FALSE OR deleted = FALSE;
 474 CREATE RULE protect_cn_delete AS ON DELETE TO asset.call_number DO INSTEAD UPDATE asset.call_number SET deleted = TRUE WHERE OLD.id = asset.call_number.id;
 475 CREATE TRIGGER asset_label_sortkey_trigger
 476     BEFORE UPDATE OR INSERT ON asset.call_number
 477     FOR EACH ROW EXECUTE PROCEDURE asset.label_normalizer();
 478
 479 CREATE TABLE asset.uri_call_number_map (
 480     id          BIGSERIAL   PRIMARY KEY,
 481     uri         INT         NOT NULL REFERENCES asset.uri (id),
 482     call_number INT         NOT NULL REFERENCES asset.call_number (id),
 483     CONSTRAINT uri_cn_once UNIQUE (uri,call_number)
 484 );
 485 CREATE INDEX asset_uri_call_number_map_cn_idx ON asset.uri_call_number_map (call_number);
 486
 487 CREATE TABLE asset.call_number_note (
 488         id              BIGSERIAL                       PRIMARY KEY,
 489         call_number     BIGINT                          NOT NULL,
 490         creator         BIGINT                          NOT NULL,
 491         create_date     TIMESTAMP WITH TIME ZONE        DEFAULT NOW(),
 492         pub             BOOL                            NOT NULL DEFAULT FALSE,
 493         title           TEXT                            NOT NULL,
 494         value           TEXT                            NOT NULL
 495 );
 496 CREATE INDEX asset_call_number_note_creator_idx ON asset.call_number_note ( creator );
 497
 498 CREATE TABLE asset.copy_template (
 499         id             SERIAL   PRIMARY KEY,
 500         owning_lib     INT      NOT NULL
 501                                 REFERENCES actor.org_unit (id)
 502                                 DEFERRABLE INITIALLY DEFERRED,
 503         creator        BIGINT   NOT NULL
 504                                 REFERENCES actor.usr (id)
 505                                 DEFERRABLE INITIALLY DEFERRED,
 506         editor         BIGINT   NOT NULL
 507                                 REFERENCES actor.usr (id)
 508                                 DEFERRABLE INITIALLY DEFERRED,
 509         create_date    TIMESTAMP WITH TIME ZONE    DEFAULT NOW(),
 510         edit_date      TIMESTAMP WITH TIME ZONE    DEFAULT NOW(),
 511         name           TEXT     NOT NULL,
 512         -- columns above this point are attributes of the template itself
 513         -- columns after this point are attributes of the copy this template modifies/creates
 514         circ_lib       INT      REFERENCES actor.org_unit (id)
 515                                 DEFERRABLE INITIALLY DEFERRED,
 516         status         INT      REFERENCES config.copy_status (id)
 517                                 DEFERRABLE INITIALLY DEFERRED,
 518         location       INT      REFERENCES asset.copy_location (id)
 519                                 DEFERRABLE INITIALLY DEFERRED,
 520         loan_duration  INT      CONSTRAINT valid_loan_duration CHECK (
 521                                     loan_duration IS NULL OR loan_duration IN (1,2,3)),
 522         fine_level     INT      CONSTRAINT valid_fine_level CHECK (
 523                                     fine_level IS NULL OR loan_duration IN (1,2,3)),
 524         age_protect    INT,
 525         circulate      BOOL,
 526         deposit        BOOL,
 527         ref            BOOL,
 528         holdable       BOOL,
 529         deposit_amount NUMERIC(6,2),
 530         price          NUMERIC(8,2),
 531         circ_modifier  TEXT,
 532         circ_as_type   TEXT,
 533         alert_message  TEXT,
 534         opac_visible   BOOL,
 535         floating       INT,
 536         mint_condition BOOL
 537 );
 538
 539 CREATE TABLE asset.copy_vis_attr_cache (
 540     id              BIGSERIAL   PRIMARY KEY,
 541     record          BIGINT      NOT NULL, -- No FKEYs, managed by user triggers.
 542     target_copy     BIGINT      NOT NULL,
 543     vis_attr_vector INT[]
 544 );
 545 CREATE INDEX copy_vis_attr_cache_record_idx ON asset.copy_vis_attr_cache (record);
 546 CREATE INDEX copy_vis_attr_cache_copy_idx ON asset.copy_vis_attr_cache (target_copy);
 547
 548 CREATE OR REPLACE FUNCTION asset.opac_ou_record_copy_count (org INT, rid BIGINT) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 549 DECLARE
 550     ans RECORD;
 551     trans INT;
 552 BEGIN
 553     SELECT 1 INTO trans FROM biblio.record_entry b JOIN config.bib_source src ON (b.source = src.id) WHERE src.transcendant AND b.id = rid;
 554
 555     FOR ans IN SELECT u.id, t.depth FROM actor.org_unit_ancestors(org) AS u JOIN actor.org_unit_type t ON (u.ou_type = t.id) LOOP
 556         RETURN QUERY
 557         SELECT  ans.depth,
 558                 ans.id,
 559                 COUNT( av.id ),
 560                 SUM( CASE WHEN cp.status IN (0,7,12) THEN 1 ELSE 0 END ),
 561                 COUNT( av.id ),
 562                 trans
 563           FROM
 564                 actor.org_unit_descendants(ans.id) d
 565                 JOIN asset.opac_visible_copies av ON (av.record = rid AND av.circ_lib = d.id)
 566                 JOIN asset.copy cp ON (cp.id = av.copy_id)
 567           GROUP BY 1,2,6;
 568
 569         IF NOT FOUND THEN
 570             RETURN QUERY SELECT ans.depth, ans.id, 0::BIGINT, 0::BIGINT, 0::BIGINT, trans;
 571         END IF;
 572
 573     END LOOP;
 574
 575     RETURN;
 576 END;
 577 $f$ LANGUAGE PLPGSQL;
 578
 579 CREATE OR REPLACE FUNCTION asset.opac_lasso_record_copy_count (i_lasso INT, rid BIGINT) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 580 DECLARE
 581     ans RECORD;
 582     trans INT;
 583 BEGIN
 584     SELECT 1 INTO trans FROM biblio.record_entry b JOIN config.bib_source src ON (b.source = src.id) WHERE src.transcendant AND b.id = rid;
 585
 586     FOR ans IN SELECT u.org_unit AS id FROM actor.org_lasso_map AS u WHERE lasso = i_lasso LOOP
 587         RETURN QUERY
 588         SELECT  -1,
 589                 ans.id,
 590                 COUNT( av.id ),
 591                 SUM( CASE WHEN cp.status IN (0,7,12) THEN 1 ELSE 0 END ),
 592                 COUNT( av.id ),
 593                 trans
 594           FROM
 595                 actor.org_unit_descendants(ans.id) d
 596                 JOIN asset.opac_visible_copies av ON (av.record = rid AND av.circ_lib = d.id)
 597                 JOIN asset.copy cp ON (cp.id = av.copy_id)
 598           GROUP BY 1,2,6;
 599
 600         IF NOT FOUND THEN
 601             RETURN QUERY SELECT -1, ans.id, 0::BIGINT, 0::BIGINT, 0::BIGINT, trans;
 602         END IF;
 603
 604     END LOOP;
 605
 606     RETURN;
 607 END;
 608 $f$ LANGUAGE PLPGSQL;
 609
 610 CREATE OR REPLACE FUNCTION asset.staff_ou_record_copy_count (org INT, rid BIGINT) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 611 DECLARE
 612     ans RECORD;
 613     trans INT;
 614 BEGIN
 615     SELECT 1 INTO trans FROM biblio.record_entry b JOIN config.bib_source src ON (b.source = src.id) WHERE src.transcendant AND b.id = rid;
 616
 617     FOR ans IN SELECT u.id, t.depth FROM actor.org_unit_ancestors(org) AS u JOIN actor.org_unit_type t ON (u.ou_type = t.id) LOOP
 618         RETURN QUERY
 619         SELECT  ans.depth,
 620                 ans.id,
 621                 COUNT( cp.id ),
 622                 SUM( CASE WHEN cp.status IN (0,7,12) THEN 1 ELSE 0 END ),
 623                 SUM( CASE WHEN cl.opac_visible AND cp.opac_visible THEN 1 ELSE 0 END),
 624                 trans
 625           FROM
 626                 actor.org_unit_descendants(ans.id) d
 627                 JOIN asset.copy cp ON (cp.circ_lib = d.id AND NOT cp.deleted)
 628                 JOIN asset.copy_location cl ON (cp.location = cl.id AND NOT cl.deleted)
 629                 JOIN asset.call_number cn ON (cn.record = rid AND cn.id = cp.call_number AND NOT cn.deleted)
 630           GROUP BY 1,2,6;
 631
 632         IF NOT FOUND THEN
 633             RETURN QUERY SELECT ans.depth, ans.id, 0::BIGINT, 0::BIGINT, 0::BIGINT, trans;
 634         END IF;
 635
 636     END LOOP;
 637
 638     RETURN;
 639 END;
 640 $f$ LANGUAGE PLPGSQL;
 641
 642 CREATE OR REPLACE FUNCTION asset.staff_lasso_record_copy_count (i_lasso INT, rid BIGINT) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 643 DECLARE
 644     ans RECORD;
 645     trans INT;
 646 BEGIN
 647     SELECT 1 INTO trans FROM biblio.record_entry b JOIN config.bib_source src ON (b.source = src.id) WHERE src.transcendant AND b.id = rid;
 648
 649     FOR ans IN SELECT u.org_unit AS id FROM actor.org_lasso_map AS u WHERE lasso = i_lasso LOOP
 650         RETURN QUERY
 651         SELECT  -1,
 652                 ans.id,
 653                 COUNT( cp.id ),
 654                 SUM( CASE WHEN cp.status IN (0,7,12) THEN 1 ELSE 0 END ),
 655                 SUM( CASE WHEN cl.opac_visible AND cp.opac_visible THEN 1 ELSE 0 END),
 656                 trans
 657           FROM
 658                 actor.org_unit_descendants(ans.id) d
 659                 JOIN asset.copy cp ON (cp.circ_lib = d.id AND NOT cp.deleted)
 660                 JOIN asset.copy_location cl ON (cp.location = cl.id AND NOT cl.deleted)
 661                 JOIN asset.call_number cn ON (cn.record = rid AND cn.id = cp.call_number AND NOT cn.deleted)
 662           GROUP BY 1,2,6;
 663
 664         IF NOT FOUND THEN
 665             RETURN QUERY SELECT -1, ans.id, 0::BIGINT, 0::BIGINT, 0::BIGINT, trans;
 666         END IF;
 667
 668     END LOOP;
 669
 670     RETURN;
 671 END;
 672 $f$ LANGUAGE PLPGSQL;
 673
 674 CREATE OR REPLACE FUNCTION asset.record_copy_count ( place INT, rid BIGINT, staff BOOL) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 675 BEGIN
 676     IF staff IS TRUE THEN
 677         IF place > 0 THEN
 678             RETURN QUERY SELECT * FROM asset.staff_ou_record_copy_count( place, rid );
 679         ELSE
 680             RETURN QUERY SELECT * FROM asset.staff_lasso_record_copy_count( -place, rid );
 681         END IF;
 682     ELSE
 683         IF place > 0 THEN
 684             RETURN QUERY SELECT * FROM asset.opac_ou_record_copy_count( place, rid );
 685         ELSE
 686             RETURN QUERY SELECT * FROM asset.opac_lasso_record_copy_count( -place, rid );
 687         END IF;
 688     END IF;
 689
 690     RETURN;
 691 END;
 692 $f$ LANGUAGE PLPGSQL;
 693
 694 CREATE OR REPLACE FUNCTION asset.record_has_holdable_copy ( rid BIGINT, ou INT DEFAULT NULL) RETURNS BOOL AS $f$
 695 BEGIN
 696     PERFORM 1
 697         FROM
 698             asset.copy acp
 699             JOIN asset.call_number acn ON acp.call_number = acn.id
 700             JOIN asset.copy_location acpl ON acp.location = acpl.id
 701             JOIN config.copy_status ccs ON acp.status = ccs.id
 702         WHERE
 703             acn.record = rid
 704             AND acp.holdable = true
 705             AND acpl.holdable = true
 706             AND ccs.holdable = true
 707             AND acp.deleted = false
 708             AND acpl.deleted = false
 709             AND acp.circ_lib IN (SELECT id FROM actor.org_unit_descendants(COALESCE($2,(SELECT id FROM evergreen.org_top()))))
 710         LIMIT 1;
 711     IF FOUND THEN
 712         RETURN true;
 713     END IF;
 714     RETURN FALSE;
 715 END;
 716 $f$ LANGUAGE PLPGSQL;
 717
 718 CREATE OR REPLACE FUNCTION asset.opac_ou_metarecord_copy_count (org INT, rid BIGINT) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 719 DECLARE
 720     ans RECORD;
 721     trans INT;
 722 BEGIN
 723     SELECT 1 INTO trans FROM biblio.record_entry b JOIN config.bib_source src ON (b.source = src.id) JOIN metabib.metarecord_source_map m ON (m.source = b.id) WHERE src.transcendant AND m.metarecord = rid;
 724
 725     FOR ans IN SELECT u.id, t.depth FROM actor.org_unit_ancestors(org) AS u JOIN actor.org_unit_type t ON (u.ou_type = t.id) LOOP
 726         RETURN QUERY
 727         SELECT  ans.depth,
 728                 ans.id,
 729                 COUNT( av.id ),
 730                 SUM( CASE WHEN cp.status IN (0,7,12) THEN 1 ELSE 0 END ),
 731                 COUNT( av.id ),
 732                 trans
 733           FROM
 734                 actor.org_unit_descendants(ans.id) d
 735                 JOIN asset.opac_visible_copies av ON (av.circ_lib = d.id)
 736                 JOIN asset.copy cp ON (cp.id = av.copy_id)
 737                 JOIN metabib.metarecord_source_map m ON (m.metarecord = rid AND m.source = av.record)
 738           GROUP BY 1,2,6;
 739
 740         IF NOT FOUND THEN
 741             RETURN QUERY SELECT ans.depth, ans.id, 0::BIGINT, 0::BIGINT, 0::BIGINT, trans;
 742         END IF;
 743
 744     END LOOP;
 745
 746     RETURN;
 747 END;
 748 $f$ LANGUAGE PLPGSQL;
 749
 750 CREATE OR REPLACE FUNCTION asset.opac_lasso_metarecord_copy_count (i_lasso INT, rid BIGINT) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 751 DECLARE
 752     ans RECORD;
 753     trans INT;
 754 BEGIN
 755     SELECT 1 INTO trans FROM biblio.record_entry b JOIN config.bib_source src ON (b.source = src.id) JOIN metabib.metarecord_source_map m ON (m.source = b.id) WHERE src.transcendant AND m.metarecord = rid;
 756
 757     FOR ans IN SELECT u.org_unit AS id FROM actor.org_lasso_map AS u WHERE lasso = i_lasso LOOP
 758         RETURN QUERY
 759         SELECT  -1,
 760                 ans.id,
 761                 COUNT( av.id ),
 762                 SUM( CASE WHEN cp.status IN (0,7,12) THEN 1 ELSE 0 END ),
 763                 COUNT( av.id ),
 764                 trans
 765           FROM
 766                 actor.org_unit_descendants(ans.id) d
 767                 JOIN asset.opac_visible_copies av ON (av.circ_lib = d.id)
 768                 JOIN asset.copy cp ON (cp.id = av.copy_id)
 769                 JOIN metabib.metarecord_source_map m ON (m.metarecord = rid AND m.source = av.record)
 770           GROUP BY 1,2,6;
 771
 772         IF NOT FOUND THEN
 773             RETURN QUERY SELECT ans.depth, ans.id, 0::BIGINT, 0::BIGINT, 0::BIGINT, trans;
 774         END IF;
 775
 776     END LOOP;
 777
 778     RETURN;
 779 END;
 780 $f$ LANGUAGE PLPGSQL;
 781
 782 CREATE OR REPLACE FUNCTION asset.staff_ou_metarecord_copy_count (org INT, rid BIGINT) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 783 DECLARE
 784     ans RECORD;
 785     trans INT;
 786 BEGIN
 787     SELECT 1 INTO trans FROM biblio.record_entry b JOIN config.bib_source src ON (b.source = src.id) JOIN metabib.metarecord_source_map m ON (m.source = b.id) WHERE src.transcendant AND m.metarecord = rid;
 788
 789     FOR ans IN SELECT u.id, t.depth FROM actor.org_unit_ancestors(org) AS u JOIN actor.org_unit_type t ON (u.ou_type = t.id) LOOP
 790         RETURN QUERY
 791         SELECT  ans.depth,
 792                 ans.id,
 793                 COUNT( cp.id ),
 794                 SUM( CASE WHEN cp.status IN (0,7,12) THEN 1 ELSE 0 END ),
 795                 COUNT( cp.id ),
 796                 trans
 797           FROM
 798                 actor.org_unit_descendants(ans.id) d
 799                 JOIN asset.copy cp ON (cp.circ_lib = d.id AND NOT cp.deleted)
 800                 JOIN asset.call_number cn ON (cn.id = cp.call_number AND NOT cn.deleted)
 801                 JOIN metabib.metarecord_source_map m ON (m.metarecord = rid AND m.source = cn.record)
 802           GROUP BY 1,2,6;
 803
 804         IF NOT FOUND THEN
 805             RETURN QUERY SELECT ans.depth, ans.id, 0::BIGINT, 0::BIGINT, 0::BIGINT, trans;
 806         END IF;
 807
 808     END LOOP;
 809
 810     RETURN;
 811 END;
 812 $f$ LANGUAGE PLPGSQL;
 813
 814 CREATE OR REPLACE FUNCTION asset.staff_lasso_metarecord_copy_count (i_lasso INT, rid BIGINT) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 815 DECLARE
 816     ans RECORD;
 817     trans INT;
 818 BEGIN
 819     SELECT 1 INTO trans FROM biblio.record_entry b JOIN config.bib_source src ON (b.source = src.id) JOIN metabib.metarecord_source_map m ON (m.source = b.id) WHERE src.transcendant AND m.metarecord = rid;
 820
 821     FOR ans IN SELECT u.org_unit AS id FROM actor.org_lasso_map AS u WHERE lasso = i_lasso LOOP
 822         RETURN QUERY
 823         SELECT  -1,
 824                 ans.id,
 825                 COUNT( cp.id ),
 826                 SUM( CASE WHEN cp.status IN (0,7,12) THEN 1 ELSE 0 END ),
 827                 COUNT( cp.id ),
 828                 trans
 829           FROM
 830                 actor.org_unit_descendants(ans.id) d
 831                 JOIN asset.copy cp ON (cp.circ_lib = d.id AND NOT cp.deleted)
 832                 JOIN asset.call_number cn ON (cn.id = cp.call_number AND NOT cn.deleted)
 833                 JOIN metabib.metarecord_source_map m ON (m.metarecord = rid AND m.source = cn.record)
 834           GROUP BY 1,2,6;
 835
 836         IF NOT FOUND THEN
 837             RETURN QUERY SELECT ans.depth, ans.id, 0::BIGINT, 0::BIGINT, 0::BIGINT, trans;
 838         END IF;
 839
 840     END LOOP;
 841
 842     RETURN;
 843 END;
 844 $f$ LANGUAGE PLPGSQL;
 845
 846 CREATE OR REPLACE FUNCTION asset.metarecord_copy_count ( place INT, rid BIGINT, staff BOOL) RETURNS TABLE (depth INT, org_unit INT, visible BIGINT, available BIGINT, unshadow BIGINT, transcendant INT) AS $f$
 847 BEGIN
 848     IF staff IS TRUE THEN
 849         IF place > 0 THEN
 850             RETURN QUERY SELECT * FROM asset.staff_ou_metarecord_copy_count( place, rid );
 851         ELSE
 852             RETURN QUERY SELECT * FROM asset.staff_lasso_metarecord_copy_count( -place, rid );
 853         END IF;
 854     ELSE
 855         IF place > 0 THEN
 856             RETURN QUERY SELECT * FROM asset.opac_ou_metarecord_copy_count( place, rid );
 857         ELSE
 858             RETURN QUERY SELECT * FROM asset.opac_lasso_metarecord_copy_count( -place, rid );
 859         END IF;
 860     END IF;
 861
 862     RETURN;
 863 END;
 864 $f$ LANGUAGE PLPGSQL;
 865
 866 CREATE OR REPLACE FUNCTION asset.metarecord_has_holdable_copy ( rid BIGINT, ou INT DEFAULT NULL) RETURNS BOOL AS $f$
 867 BEGIN
 868     PERFORM 1
 869         FROM
 870             asset.copy acp
 871             JOIN asset.call_number acn ON acp.call_number = acn.id
 872             JOIN asset.copy_location acpl ON acp.location = acpl.id
 873             JOIN config.copy_status ccs ON acp.status = ccs.id
 874             JOIN metabib.metarecord_source_map mmsm ON acn.record = mmsm.source
 875         WHERE
 876             mmsm.metarecord = rid
 877             AND acp.holdable = true
 878             AND acpl.holdable = true
 879             AND ccs.holdable = true
 880             AND acp.deleted = false
 881             AND acpl.deleted = false
 882             AND acp.circ_lib IN (SELECT id FROM actor.org_unit_descendants(COALESCE($2,(SELECT id FROM evergreen.org_top()))))
 883         LIMIT 1;
 884     IF FOUND THEN
 885         RETURN true;
 886     END IF;
 887     RETURN FALSE;
 888 END;
 889 $f$ LANGUAGE PLPGSQL;
 890
 891 CREATE OR REPLACE FUNCTION asset.autogenerate_placeholder_barcode ( ) RETURNS TRIGGER AS $f$
 892 BEGIN
 893         IF NEW.barcode LIKE '@@%' THEN
 894                 NEW.barcode := '@@' || NEW.id;
 895         END IF;
 896         RETURN NEW;
 897 END;
 898 $f$ LANGUAGE PLPGSQL;
 899
 900 CREATE TRIGGER autogenerate_placeholder_barcode
 901         BEFORE INSERT OR UPDATE ON asset.copy
 902         FOR EACH ROW EXECUTE PROCEDURE asset.autogenerate_placeholder_barcode();
 903
 904 CREATE OR REPLACE FUNCTION evergreen.fake_fkey_tgr () RETURNS TRIGGER AS $F$
 905 DECLARE
 906     copy_id BIGINT;
 907 BEGIN
 908     EXECUTE 'SELECT ($1).' || quote_ident(TG_ARGV[0]) INTO copy_id USING NEW;
 909     PERFORM * FROM asset.copy WHERE id = copy_id;
 910     IF NOT FOUND THEN
 911         RAISE EXCEPTION 'Key (%.%=%) does not exist in asset.copy', TG_TABLE_SCHEMA, TG_TABLE_NAME, copy_id;
 912     END IF;
 913     RETURN NULL;
 914 END;
 915 $F$ LANGUAGE PLPGSQL;
 916
 917 CREATE TABLE asset.copy_tag (
 918     id              SERIAL PRIMARY KEY,
 919     tag_type        TEXT REFERENCES config.copy_tag_type (code)
 920                     ON UPDATE CASCADE ON DELETE CASCADE,
 921     label           TEXT NOT NULL,
 922     value           TEXT NOT NULL,
 923     index_vector    tsvector NOT NULL,
 924     staff_note      TEXT,
 925     pub             BOOLEAN DEFAULT TRUE,
 926     owner           INTEGER NOT NULL REFERENCES actor.org_unit (id)
 927 );
 928
 929 CREATE INDEX asset_copy_tag_label_idx
 930     ON asset.copy_tag (label);
 931 CREATE INDEX asset_copy_tag_label_lower_idx
 932     ON asset.copy_tag (evergreen.lowercase(label));
 933 CREATE INDEX asset_copy_tag_index_vector_idx
 934     ON asset.copy_tag
 935     USING GIN(index_vector);
 936 CREATE INDEX asset_copy_tag_tag_type_idx
 937     ON asset.copy_tag (tag_type);
 938 CREATE INDEX asset_copy_tag_owner_idx
 939     ON asset.copy_tag (owner);
 940
 941 CREATE OR REPLACE FUNCTION asset.set_copy_tag_value () RETURNS TRIGGER AS $$
 942 BEGIN
 943     IF NEW.value IS NULL THEN
 944         NEW.value = NEW.label;
 945     END IF;
 946
 947     RETURN NEW;
 948 END;
 949 $$ LANGUAGE 'plpgsql';
 950
 951 -- name of following trigger chosen to ensure it runs first
 952 CREATE TRIGGER asset_copy_tag_do_value
 953     BEFORE INSERT OR UPDATE ON asset.copy_tag
 954     FOR EACH ROW EXECUTE PROCEDURE asset.set_copy_tag_value();
 955 CREATE TRIGGER asset_copy_tag_fti_trigger
 956     BEFORE UPDATE OR INSERT ON asset.copy_tag
 957     FOR EACH ROW EXECUTE PROCEDURE oils_tsearch2('default');
 958
 959 CREATE TABLE asset.copy_tag_copy_map (
 960     id              BIGSERIAL PRIMARY KEY,
 961     copy            BIGINT REFERENCES asset.copy (id)
 962                     ON UPDATE CASCADE ON DELETE CASCADE,
 963     tag             INTEGER REFERENCES asset.copy_tag (id)
 964                     ON UPDATE CASCADE ON DELETE CASCADE
 965 );
 966
 967 CREATE INDEX asset_copy_tag_copy_map_copy_idx
 968     ON asset.copy_tag_copy_map (copy);
 969 CREATE INDEX asset_copy_tag_copy_map_tag_idx
 970     ON asset.copy_tag_copy_map (tag);
 971
 972 COMMIT;
 973