Open-ILS/src/sql/Pg/090.schema.action.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 action CASCADE;
  19
  20 BEGIN;
  21
  22 CREATE SCHEMA action;
  23
  24 CREATE TABLE action.in_house_use (
  25         id              SERIAL                          PRIMARY KEY,
  26         item            BIGINT                          NOT NULL REFERENCES asset.copy (id) DEFERRABLE INITIALLY DEFERRED,
  27         staff           INT                             NOT NULL REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
  28         org_unit        INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
  29         use_time        TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW()
  30 );
  31
  32 CREATE TABLE action.non_cataloged_circulation (
  33         id              SERIAL                          PRIMARY KEY,
  34         patron          INT                             NOT NULL REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
  35         staff           INT                             NOT NULL REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
  36         circ_lib        INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
  37         item_type       INT                             NOT NULL REFERENCES config.non_cataloged_type (id) DEFERRABLE INITIALLY DEFERRED,
  38         circ_time       TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW()
  39 );
  40
  41 CREATE TABLE action.non_cat_in_house_use (
  42         id              SERIAL                          PRIMARY KEY,
  43         item_type       BIGINT                          NOT NULL REFERENCES config.non_cataloged_type(id) DEFERRABLE INITIALLY DEFERRED,
  44         staff           INT                             NOT NULL REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
  45         org_unit        INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
  46         use_time        TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW()
  47 );
  48
  49 CREATE TABLE action.survey (
  50         id              SERIAL                          PRIMARY KEY,
  51         owner           INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
  52         start_date      TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW(),
  53         end_date        TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW() + '10 years'::INTERVAL,
  54         usr_summary     BOOL                            NOT NULL DEFAULT FALSE,
  55         opac            BOOL                            NOT NULL DEFAULT FALSE,
  56         poll            BOOL                            NOT NULL DEFAULT FALSE,
  57         required        BOOL                            NOT NULL DEFAULT FALSE,
  58         name            TEXT                            NOT NULL,
  59         description     TEXT                            NOT NULL
  60 );
  61 CREATE UNIQUE INDEX asv_once_per_owner_idx ON action.survey (owner,name);
  62
  63 CREATE TABLE action.survey_question (
  64         id              SERIAL  PRIMARY KEY,
  65         survey          INT     NOT NULL REFERENCES action.survey DEFERRABLE INITIALLY DEFERRED,
  66         question        TEXT    NOT NULL
  67 );
  68
  69 CREATE TABLE action.survey_answer (
  70         id              SERIAL  PRIMARY KEY,
  71         question        INT     NOT NULL REFERENCES action.survey_question DEFERRABLE INITIALLY DEFERRED,
  72         answer          TEXT    NOT NULL
  73 );
  74
  75 CREATE SEQUENCE action.survey_response_group_id_seq;
  76
  77 CREATE TABLE action.survey_response (
  78         id                      BIGSERIAL                       PRIMARY KEY,
  79         response_group_id       INT,
  80         usr                     INT, -- REFERENCES actor.usr
  81         survey                  INT                             NOT NULL REFERENCES action.survey DEFERRABLE INITIALLY DEFERRED,
  82         question                INT                             NOT NULL REFERENCES action.survey_question DEFERRABLE INITIALLY DEFERRED,
  83         answer                  INT                             NOT NULL REFERENCES action.survey_answer DEFERRABLE INITIALLY DEFERRED,
  84         answer_date             TIMESTAMP WITH TIME ZONE,
  85         effective_date          TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW()
  86 );
  87 CREATE OR REPLACE FUNCTION action.survey_response_answer_date_fixup () RETURNS TRIGGER AS '
  88 BEGIN
  89         NEW.answer_date := NOW();
  90         RETURN NEW;
  91 END;
  92 ' LANGUAGE 'plpgsql';
  93 CREATE TRIGGER action_survey_response_answer_date_fixup_tgr
  94         BEFORE INSERT ON action.survey_response
  95         FOR EACH ROW
  96         EXECUTE PROCEDURE action.survey_response_answer_date_fixup ();
  97
  98
  99 CREATE TABLE action.circulation (
 100         target_copy             BIGINT                          NOT NULL, -- asset.copy.id
 101         circ_lib                INT                             NOT NULL, -- actor.org_unit.id
 102         circ_staff              INT                             NOT NULL, -- actor.usr.id
 103         checkin_staff           INT,                                      -- actor.usr.id
 104         checkin_lib             INT,                                      -- actor.org_unit.id
 105         renewal_remaining       INT                             NOT NULL, -- derived from "circ duration" rule
 106         due_date                TIMESTAMP WITH TIME ZONE,
 107         stop_fines_time         TIMESTAMP WITH TIME ZONE,
 108         checkin_time            TIMESTAMP WITH TIME ZONE,
 109         create_time             TIMESTAMP WITH TIME ZONE    NOT NULL DEFAULT NOW(),
 110         duration                INTERVAL,                                 -- derived from "circ duration" rule
 111         fine_interval           INTERVAL                        NOT NULL DEFAULT '1 day'::INTERVAL, -- derived from "circ fine" rule
 112         recuring_fine           NUMERIC(6,2),                             -- derived from "circ fine" rule
 113         max_fine                NUMERIC(6,2),                             -- derived from "max fine" rule
 114         phone_renewal           BOOL                            NOT NULL DEFAULT FALSE,
 115         desk_renewal            BOOL                            NOT NULL DEFAULT FALSE,
 116         opac_renewal            BOOL                            NOT NULL DEFAULT FALSE,
 117         duration_rule           TEXT                            NOT NULL, -- name of "circ duration" rule
 118         recuring_fine_rule      TEXT                            NOT NULL, -- name of "circ fine" rule
 119         max_fine_rule           TEXT                            NOT NULL, -- name of "max fine" rule
 120         stop_fines              TEXT                            CHECK (stop_fines IN ('CHECKIN','CLAIMSRETURNED','LOST','MAXFINES','RENEW','LONGOVERDUE'))
 121 ) INHERITS (money.billable_xact);
 122 ALTER TABLE action.circulation ADD PRIMARY KEY (id);
 123 CREATE INDEX circ_open_xacts_idx ON action.circulation (usr) WHERE xact_finish IS NULL;
 124 CREATE INDEX circ_outstanding_idx ON action.circulation (usr) WHERE checkin_time IS NULL;
 125 CREATE INDEX circ_checkin_time ON "action".circulation (checkin_time) WHERE checkin_time IS NOT NULL;
 126 CREATE INDEX circ_circ_lib_idx ON "action".circulation (circ_lib);
 127 CREATE INDEX circ_open_date_idx ON "action".circulation (xact_start) WHERE xact_finish IS NULL;
 128
 129 CREATE TABLE action.aged_circulation (
 130         usr_post_code           TEXT,
 131         usr_home_ou             INT     NOT NULL,
 132         usr_profile             INT     NOT NULL,
 133         usr_birth_year          INT,
 134         copy_call_number        INT     NOT NULL,
 135         copy_location           INT     NOT NULL,
 136         copy_owning_lib         INT     NOT NULL,
 137         copy_circ_lib           INT     NOT NULL,
 138         copy_bib_record         BIGINT  NOT NULL,
 139         LIKE action.circulation
 140
 141 );
 142 ALTER TABLE action.aged_circulation ADD PRIMARY KEY (id);
 143 ALTER TABLE action.aged_circulation DROP COLUMN usr;
 144 CREATE INDEX aged_circ_circ_lib_idx ON "action".aged_circulation (circ_lib);
 145 CREATE INDEX aged_circ_start_idx ON "action".aged_circulation (xact_start);
 146 CREATE INDEX aged_circ_copy_circ_lib_idx ON "action".aged_circulation (copy_circ_lib);
 147 CREATE INDEX aged_circ_copy_owning_lib_idx ON "action".aged_circulation (copy_owning_lib);
 148 CREATE INDEX aged_circ_copy_location_idx ON "action".aged_circulation (copy_location);
 149
 150 CREATE OR REPLACE VIEW action.all_circulation AS
 151         SELECT  id,usr_post_code, usr_home_ou, usr_profile, usr_birth_year, copy_call_number, copy_location,
 152                 copy_owning_lib, copy_circ_lib, copy_bib_record, xact_start, xact_finish, target_copy,
 153                 circ_lib, circ_staff, checkin_staff, checkin_lib, renewal_remaining, due_date,
 154                 stop_fines_time, checkin_time, create_time, duration, fine_interval, recuring_fine,
 155                 max_fine, phone_renewal, desk_renewal, opac_renewal, duration_rule, recuring_fine_rule,
 156                 max_fine_rule, stop_fines
 157           FROM  action.aged_circulation
 158                         UNION ALL
 159         SELECT  circ.id,COALESCE(a.post_code,b.post_code) AS usr_post_code, p.home_ou AS usr_home_ou, p.profile AS usr_profile, EXTRACT(YEAR FROM p.dob)::INT AS usr_birth_year,
 160                 cp.call_number AS copy_call_number, cp.location AS copy_location, cn.owning_lib AS copy_owning_lib, cp.circ_lib AS copy_circ_lib,
 161                 cn.record AS copy_bib_record, circ.xact_start, circ.xact_finish, circ.target_copy, circ.circ_lib, circ.circ_staff, circ.checkin_staff,
 162                 circ.checkin_lib, circ.renewal_remaining, circ.due_date, circ.stop_fines_time, circ.checkin_time, circ.create_time, circ.duration,
 163                 circ.fine_interval, circ.recuring_fine, circ.max_fine, circ.phone_renewal, circ.desk_renewal, circ.opac_renewal, circ.duration_rule,
 164                 circ.recuring_fine_rule, circ.max_fine_rule, circ.stop_fines
 165           FROM  action.circulation circ
 166                 JOIN asset.copy cp ON (circ.target_copy = cp.id)
 167                 JOIN asset.call_number cn ON (cp.call_number = cn.id)
 168                 JOIN actor.usr p ON (circ.usr = p.id)
 169                 LEFT JOIN actor.usr_address a ON (p.mailing_address = a.id)
 170                 LEFT JOIN actor.usr_address b ON (p.billing_address = a.id);
 171
 172 CREATE OR REPLACE FUNCTION action.age_circ_on_delete () RETURNS TRIGGER AS $$
 173 BEGIN
 174         INSERT INTO action.aged_circulation
 175                 (id,usr_post_code, usr_home_ou, usr_profile, usr_birth_year, copy_call_number, copy_location,
 176                 copy_owning_lib, copy_circ_lib, copy_bib_record, xact_start, xact_finish, target_copy,
 177                 circ_lib, circ_staff, checkin_staff, checkin_lib, renewal_remaining, due_date,
 178                 stop_fines_time, checkin_time, create_time, duration, fine_interval, recuring_fine,
 179                 max_fine, phone_renewal, desk_renewal, opac_renewal, duration_rule, recuring_fine_rule,
 180                 max_fine_rule, stop_fines)
 181           SELECT
 182                 id,usr_post_code, usr_home_ou, usr_profile, usr_birth_year, copy_call_number, copy_location,
 183                 copy_owning_lib, copy_circ_lib, copy_bib_record, xact_start, xact_finish, target_copy,
 184                 circ_lib, circ_staff, checkin_staff, checkin_lib, renewal_remaining, due_date,
 185                 stop_fines_time, checkin_time, create_time, duration, fine_interval, recuring_fine,
 186                 max_fine, phone_renewal, desk_renewal, opac_renewal, duration_rule, recuring_fine_rule,
 187                 max_fine_rule, stop_fines
 188             FROM action.all_circulation WHERE id = OLD.id;
 189
 190         RETURN OLD;
 191 END;
 192 $$ LANGUAGE 'plpgsql';
 193
 194 CREATE TRIGGER action_circulation_aging_tgr
 195         BEFORE DELETE ON action.circulation
 196         FOR EACH ROW
 197         EXECUTE PROCEDURE action.age_circ_on_delete ();
 198
 199
 200 CREATE OR REPLACE VIEW action.open_circulation AS
 201         SELECT  *
 202           FROM  action.circulation
 203           WHERE checkin_time IS NULL
 204           ORDER BY due_date;
 205
 206
 207 CREATE OR REPLACE VIEW action.billable_cirulations AS
 208         SELECT  *
 209           FROM  action.circulation
 210           WHERE xact_finish IS NULL;
 211
 212 CREATE VIEW stats.fleshed_circulation AS
 213         SELECT  c.*,
 214                 CAST(c.xact_start AS DATE) AS start_date_day,
 215                 CAST(c.xact_finish AS DATE) AS finish_date_day,
 216                 DATE_TRUNC('hour', c.xact_start) AS start_date_hour,
 217                 DATE_TRUNC('hour', c.xact_finish) AS finish_date_hour,
 218                 cp.call_number_label,
 219                 cp.owning_lib,
 220                 cp.item_lang,
 221                 cp.item_type,
 222                 cp.item_form
 223         FROM    "action".circulation c
 224                 JOIN stats.fleshed_copy cp ON (cp.id = c.target_copy);
 225
 226
 227 CREATE OR REPLACE FUNCTION action.circulation_claims_returned () RETURNS TRIGGER AS $$
 228 BEGIN
 229         IF OLD.stop_fines IS NULL OR OLD.stop_fines <> NEW.stop_fines THEN
 230                 IF NEW.stop_fines = 'CLAIMSRETURNED' THEN
 231                         UPDATE actor.usr SET claims_returned_count = claims_returned_count + 1 WHERE id = NEW.usr;
 232                 END IF;
 233                 IF NEW.stop_fines = 'LOST' THEN
 234                         UPDATE asset.copy SET status = 3 WHERE id = NEW.target_copy;
 235                 END IF;
 236         END IF;
 237         RETURN NEW;
 238 END;
 239 $$ LANGUAGE 'plpgsql';
 240 CREATE TRIGGER action_circulation_stop_fines_tgr
 241         BEFORE UPDATE ON action.circulation
 242         FOR EACH ROW
 243         EXECUTE PROCEDURE action.circulation_claims_returned ();
 244
 245
 246 CREATE TABLE action.hold_request (
 247         id                      SERIAL                          PRIMARY KEY,
 248         request_time            TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW(),
 249         capture_time            TIMESTAMP WITH TIME ZONE,
 250         fulfillment_time        TIMESTAMP WITH TIME ZONE,
 251         checkin_time            TIMESTAMP WITH TIME ZONE,
 252         return_time             TIMESTAMP WITH TIME ZONE,
 253         prev_check_time         TIMESTAMP WITH TIME ZONE,
 254         expire_time             TIMESTAMP WITH TIME ZONE,
 255         cancel_time             TIMESTAMP WITH TIME ZONE,
 256         target                  BIGINT                          NOT NULL, -- see hold_type
 257         current_copy            BIGINT                          REFERENCES asset.copy (id) ON DELETE SET NULL DEFERRABLE INITIALLY DEFERRED,
 258         fulfillment_staff       INT                             REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
 259         fulfillment_lib         INT                             REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
 260         request_lib             INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
 261         requestor               INT                             NOT NULL REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
 262         usr                     INT                             NOT NULL REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
 263         selection_ou            INT                             NOT NULL,
 264         selection_depth         INT                             NOT NULL DEFAULT 0,
 265         pickup_lib              INT                             NOT NULL REFERENCES actor.org_unit DEFERRABLE INITIALLY DEFERRED,
 266         hold_type               TEXT                            NOT NULL CHECK (hold_type IN ('M','T','V','C')),
 267         holdable_formats        TEXT,
 268         phone_notify            TEXT,
 269         email_notify            BOOL                            NOT NULL DEFAULT TRUE,
 270         frozen                  BOOL                            NOT NULL DEFAULT FALSE,
 271         thaw_date               TIMESTAMP WITH TIME ZONE
 272 );
 273
 274 CREATE INDEX hold_request_target_idx ON action.hold_request (target);
 275 CREATE INDEX hold_request_usr_idx ON action.hold_request (usr);
 276 CREATE INDEX hold_request_pickup_lib_idx ON action.hold_request (pickup_lib);
 277 CREATE INDEX hold_request_current_copy_idx ON action.hold_request (current_copy);
 278 CREATE INDEX hold_request_prev_check_time_idx ON action.hold_request (prev_check_time);
 279
 280
 281 CREATE TABLE action.hold_notification (
 282         id              SERIAL                          PRIMARY KEY,
 283         hold            INT                             NOT NULL REFERENCES action.hold_request (id) DEFERRABLE INITIALLY DEFERRED,
 284         notify_staff    INT                             REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
 285         notify_time     TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW(),
 286         method          TEXT                            NOT NULL, -- email address or phone number
 287         note            TEXT
 288 );
 289 CREATE INDEX ahn_hold_idx ON action.hold_notification (hold);
 290
 291 CREATE TABLE action.hold_copy_map (
 292         id              SERIAL  PRIMARY KEY,
 293         hold            INT     NOT NULL REFERENCES action.hold_request (id) ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED,
 294         target_copy     BIGINT  NOT NULL REFERENCES asset.copy (id) ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED,
 295         CONSTRAINT copy_once_per_hold UNIQUE (hold,target_copy)
 296 );
 297 -- CREATE INDEX acm_hold_idx ON action.hold_copy_map (hold);
 298 CREATE INDEX acm_copy_idx ON action.hold_copy_map (target_copy);
 299
 300 CREATE TABLE action.transit_copy (
 301         id                      SERIAL                          PRIMARY KEY,
 302         source_send_time        TIMESTAMP WITH TIME ZONE,
 303         dest_recv_time          TIMESTAMP WITH TIME ZONE,
 304         target_copy             BIGINT                          NOT NULL REFERENCES asset.copy (id) ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED,
 305         source                  INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
 306         dest                    INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
 307         prev_hop                INT                             REFERENCES action.transit_copy (id) DEFERRABLE INITIALLY DEFERRED,
 308         copy_status             INT                             NOT NULL REFERENCES config.copy_status (id) DEFERRABLE INITIALLY DEFERRED,
 309         persistant_transfer     BOOL                            NOT NULL DEFAULT FALSE
 310 );
 311 CREATE INDEX active_transit_dest_idx ON "action".transit_copy (dest);
 312 CREATE INDEX active_transit_source_idx ON "action".transit_copy (source);
 313 CREATE INDEX active_transit_cp_idx ON "action".transit_copy (target_copy);
 314
 315
 316 CREATE TABLE action.hold_transit_copy (
 317         hold    INT     REFERENCES action.hold_request (id) ON DELETE SET NULL DEFERRABLE INITIALLY DEFERRED
 318 ) INHERITS (action.transit_copy);
 319 ALTER TABLE action.hold_transit_copy ADD PRIMARY KEY (id);
 320 ALTER TABLE action.hold_transit_copy ADD CONSTRAINT ahtc_tc_fkey FOREIGN KEY (target_copy) REFERENCES asset.copy (id) ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED;
 321 CREATE INDEX active_hold_transit_dest_idx ON "action".hold_transit_copy (dest);
 322 CREATE INDEX active_hold_transit_source_idx ON "action".hold_transit_copy (source);
 323 CREATE INDEX active_hold_transit_cp_idx ON "action".hold_transit_copy (target_copy);
 324
 325
 326 CREATE TABLE action.unfulfilled_hold_list (
 327         id              BIGSERIAL                       PRIMARY KEY,
 328         current_copy    BIGINT                          NOT NULL,
 329         hold            INT                             NOT NULL,
 330         circ_lib        INT                             NOT NULL,
 331         fail_time       TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW()
 332 );
 333
 334 CREATE OR REPLACE FUNCTION asset.merge_record_assets( target_record BIGINT, source_record BIGINT ) RETURNS INT AS $func$
 335 DECLARE
 336         moved_objects INT := 0;
 337         source_cn     asset.call_number%ROWTYPE;
 338         target_cn     asset.call_number%ROWTYPE;
 339         metarec       metabib.metarecord%ROWTYPE;
 340         hold          action.hold_request%ROWTYPE;
 341 BEGIN
 342         -- Find and move metarecords to the target record
 343         SELECT  INTO metarec *
 344           FROM  metabib.metarecord
 345           WHERE master_record = source_record;
 346
 347         IF FOUND THEN
 348                 UPDATE  metabib.metarecord
 349                   SET   master_record = target_record,
 350                         mods = NULL
 351                   WHERE id = metarec.id;
 352
 353                 moved_objects := moved_objects + 1;
 354         END IF;
 355
 356         -- Find call numbers attached to the source ...
 357         FOR source_cn IN SELECT * FROM asset.call_number WHERE record = source_record LOOP
 358
 359                 SELECT  INTO target_cn *
 360                   FROM  asset.call_number
 361                   WHERE label = source_cn.label
 362                         AND owning_lib = source_cn.owning_lib
 363                         AND record = target_record;
 364
 365                 -- ... and if there's a conflicting one on the target ...
 366                 IF FOUND THEN
 367
 368                         -- ... move the copies to that, and ...
 369                         UPDATE  asset.copy
 370                           SET   call_number = target_cn.id
 371                           WHERE call_number = source_cn.id;
 372
 373                         -- ... move V holds to the move-target call number
 374                         FOR hold IN SELECT * FROM action.hold_request WHERE target = source_cn.id AND hold_type = 'V' LOOP
 375
 376                                 UPDATE  action.hold_request
 377                                   SET   target = target_cn.id
 378                                   WHERE id = hold.id;
 379
 380                                 moved_objects := moved_objects + 1;
 381                         END LOOP;
 382
 383                 -- ... if not ...
 384                 ELSE
 385                         -- ... just move the call number to the target record
 386                         UPDATE  asset.call_number
 387                           SET   record = target_record
 388                           WHERE id = source_cn.id;
 389                 END IF;
 390
 391                 moved_objects := moved_objects + 1;
 392         END LOOP;
 393
 394         -- Find T holds targeting the source record ...
 395         FOR hold IN SELECT * FROM action.hold_request WHERE target = source_record AND hold_type = 'T' LOOP
 396
 397                 -- ... and move them to the target record
 398                 UPDATE  action.hold_request
 399                   SET   target = target_record
 400                   WHERE id = hold.id;
 401
 402                 moved_objects := moved_objects + 1;
 403         END LOOP;
 404
 405         -- That's all, folks!
 406         RETURN moved_objects;
 407 END;
 408 $func$ LANGUAGE plpgsql;
 409
 410 COMMIT;
 411