Open-ILS/src/sql/Pg/080.schema.money.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 money CASCADE;
  19
  20 BEGIN;
  21
  22 CREATE SCHEMA money;
  23
  24 CREATE TABLE money.collections_tracker (
  25         id              BIGSERIAL                       PRIMARY KEY,
  26         usr             INT                             NOT NULL REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED, -- actor.usr.id
  27         collector       INT                             NOT NULL REFERENCES actor.usr (id) DEFERRABLE INITIALLY DEFERRED,
  28         location        INT                             NOT NULL REFERENCES actor.org_unit (id) DEFERRABLE INITIALLY DEFERRED,
  29         enter_time      TIMESTAMP WITH TIME ZONE
  30 );
  31 CREATE UNIQUE INDEX m_c_t_usr_collector_location_once_idx ON money.collections_tracker (usr, collector, location);
  32 CREATE INDEX m_c_t_collector_idx                          ON money.collections_tracker ( collector );
  33
  34 CREATE TABLE money.billable_xact (
  35         id          BIGSERIAL                   PRIMARY KEY,
  36         usr         INT                         NOT NULL, -- actor.usr.id
  37         xact_start  TIMESTAMP WITH TIME ZONE    NOT NULL DEFAULT NOW(),
  38         xact_finish TIMESTAMP WITH TIME ZONE,
  39     unrecovered BOOL
  40 );
  41 CREATE INDEX m_b_x_open_xacts_idx ON money.billable_xact (usr);
  42
  43 CREATE TABLE money.grocery ( -- Catchall table for local billing
  44         billing_location        INT     NOT NULL, -- library creating transaction
  45         note                    TEXT
  46 ) INHERITS (money.billable_xact);
  47 ALTER TABLE money.grocery ADD PRIMARY KEY (id);
  48 CREATE INDEX circ_open_date_idx ON "money".grocery (xact_start) WHERE xact_finish IS NULL;
  49 CREATE INDEX m_g_usr_idx ON "money".grocery (usr);
  50
  51 CREATE TABLE money.billing (
  52         id              BIGSERIAL                       PRIMARY KEY,
  53         xact            BIGINT                          NOT NULL, -- money.billable_xact.id
  54         billing_ts      TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW(),
  55         voided          BOOL                            NOT NULL DEFAULT FALSE,
  56         voider          INT,
  57         void_time       TIMESTAMP WITH TIME ZONE,
  58         amount          NUMERIC(6,2)                    NOT NULL,
  59         billing_type    TEXT                            NOT NULL,
  60         btype           INT                             NOT NULL REFERENCES config.billing_type (id) ON DELETE RESTRICT DEFERRABLE INITIALLY DEFERRED,
  61         note            TEXT
  62 );
  63 CREATE INDEX m_b_xact_idx ON money.billing (xact);
  64 CREATE INDEX m_b_time_idx ON money.billing (billing_ts);
  65
  66 CREATE TABLE money.payment (
  67         id              BIGSERIAL                       PRIMARY KEY,
  68         xact            BIGINT                          NOT NULL, -- money.billable_xact.id
  69         payment_ts      TIMESTAMP WITH TIME ZONE        NOT NULL DEFAULT NOW(),
  70         voided          BOOL                            NOT NULL DEFAULT FALSE,
  71         amount          NUMERIC(6,2)                    NOT NULL,
  72         note            TEXT
  73 );
  74 CREATE INDEX m_p_xact_idx ON money.payment (xact);
  75 CREATE INDEX m_p_time_idx ON money.payment (payment_ts);
  76
  77 CREATE OR REPLACE VIEW money.payment_view AS
  78         SELECT  p.*,c.relname AS payment_type
  79           FROM  money.payment p
  80                 JOIN pg_class c ON (p.tableoid = c.oid);
  81
  82 CREATE OR REPLACE RULE money_payment_view_update AS ON UPDATE TO money.payment_view DO INSTEAD
  83     UPDATE money.payment SET xact = NEW.xact, payment_ts = NEW.payment_ts, voided = NEW.voided, amount = NEW.amount, note = NEW.note WHERE id = NEW.id;
  84
  85 CREATE OR REPLACE VIEW money.transaction_billing_type_summary AS
  86         SELECT  xact,
  87                 billing_type AS last_billing_type,
  88                 LAST(note) AS last_billing_note,
  89                 MAX(billing_ts) AS last_billing_ts,
  90                 SUM(COALESCE(amount,0)) AS total_owed
  91           FROM  money.billing
  92           WHERE voided IS FALSE
  93           GROUP BY xact,billing_type
  94           ORDER BY MAX(billing_ts);
  95
  96 CREATE OR REPLACE VIEW money.transaction_billing_summary AS
  97         SELECT  xact,
  98                 LAST(billing_type) AS last_billing_type,
  99                 LAST(note) AS last_billing_note,
 100                 MAX(billing_ts) AS last_billing_ts,
 101                 SUM(COALESCE(amount,0)) AS total_owed
 102           FROM  money.billing
 103           WHERE voided IS FALSE
 104           GROUP BY xact
 105           ORDER BY MAX(billing_ts);
 106
 107 CREATE OR REPLACE VIEW money.transaction_payment_summary AS
 108         SELECT  xact,
 109                 LAST(payment_type) AS last_payment_type,
 110                 LAST(note) AS last_payment_note,
 111                 MAX(payment_ts) as last_payment_ts,
 112                 SUM(COALESCE(amount,0)) AS total_paid
 113           FROM  money.payment_view
 114           WHERE voided IS FALSE
 115           GROUP BY xact
 116           ORDER BY MAX(payment_ts);
 117
 118 CREATE OR REPLACE VIEW money.transaction_billing_with_void_summary AS
 119         SELECT  xact,
 120                 LAST(billing_type) AS last_billing_type,
 121                 LAST(note) AS last_billing_note,
 122                 MAX(billing_ts) AS last_billing_ts,
 123                 SUM(CASE WHEN voided THEN 0 ELSE COALESCE(amount,0) END) AS total_owed
 124           FROM  money.billing
 125           GROUP BY xact
 126           ORDER BY MAX(billing_ts);
 127
 128 CREATE OR REPLACE VIEW money.transaction_payment_with_void_summary AS
 129         SELECT  xact,
 130                 LAST(payment_type) AS last_payment_type,
 131                 LAST(note) AS last_payment_note,
 132                 MAX(payment_ts) as last_payment_ts,
 133                 SUM(CASE WHEN voided THEN 0 ELSE COALESCE(amount,0) END) AS total_paid
 134           FROM  money.payment_view
 135           GROUP BY xact
 136           ORDER BY MAX(payment_ts);
 137
 138 CREATE OR REPLACE VIEW money.open_transaction_billing_type_summary AS
 139         SELECT  xact,
 140                 billing_type AS last_billing_type,
 141                 LAST(note) AS last_billing_note,
 142                 MAX(billing_ts) AS last_billing_ts,
 143                 SUM(COALESCE(amount,0)) AS total_owed
 144           FROM  money.billing
 145           WHERE voided IS FALSE
 146           GROUP BY xact,billing_type
 147           ORDER BY MAX(billing_ts);
 148
 149 CREATE OR REPLACE VIEW money.open_transaction_billing_summary AS
 150         SELECT  xact,
 151                 LAST(billing_type) AS last_billing_type,
 152                 LAST(note) AS last_billing_note,
 153                 MAX(billing_ts) AS last_billing_ts,
 154                 SUM(COALESCE(amount,0)) AS total_owed
 155           FROM  money.billing
 156           WHERE voided IS FALSE
 157           GROUP BY xact
 158           ORDER BY MAX(billing_ts);
 159
 160 CREATE OR REPLACE VIEW money.open_transaction_payment_summary AS
 161         SELECT  xact,
 162                 LAST(payment_type) AS last_payment_type,
 163                 LAST(note) AS last_payment_note,
 164                 MAX(payment_ts) as last_payment_ts,
 165                 SUM(COALESCE(amount,0)) AS total_paid
 166           FROM  money.payment_view
 167           WHERE voided IS FALSE
 168           GROUP BY xact
 169           ORDER BY MAX(payment_ts);
 170
 171 /* Replacing with the one below.
 172 CREATE OR REPLACE VIEW money.billable_xact_with_void_summary AS
 173         SELECT  xact.id AS id,
 174                 xact.usr AS usr,
 175                 xact.xact_start AS xact_start,
 176                 xact.xact_finish AS xact_finish,
 177                 credit.total_paid,
 178                 credit.last_payment_ts,
 179                 credit.last_payment_note,
 180                 credit.last_payment_type,
 181                 debit.total_owed,
 182                 debit.last_billing_ts,
 183                 debit.last_billing_note,
 184                 debit.last_billing_type,
 185                 COALESCE(debit.total_owed,0) - COALESCE(credit.total_paid,0) AS balance_owed,
 186                 p.relname AS xact_type
 187           FROM  money.billable_xact xact
 188                 JOIN pg_class p ON (xact.tableoid = p.oid)
 189                 LEFT JOIN money.transaction_billing_with_void_summary debit ON (xact.id = debit.xact)
 190                 LEFT JOIN money.transaction_payment_with_void_summary credit ON (xact.id = credit.xact);
 191 */
 192
 193 CREATE OR REPLACE VIEW money.billable_xact_with_void_summary AS
 194         SELECT  xact.id AS id,
 195                 xact.usr AS usr,
 196                 xact.xact_start AS xact_start,
 197                 xact.xact_finish AS xact_finish,
 198                 SUM(credit.amount) AS total_paid,
 199                 MAX(credit.payment_ts) AS last_payment_ts,
 200                 LAST(credit.note) AS last_payment_note,
 201                 LAST(credit.payment_type) AS last_payment_type,
 202                 SUM(debit.amount) AS total_owed,
 203                 MAX(debit.billing_ts) AS last_billing_ts,
 204                 LAST(debit.note) AS last_billing_note,
 205                 LAST(debit.billing_type) AS last_billing_type,
 206                 COALESCE(SUM(debit.amount),0) - COALESCE(SUM(credit.amount),0) AS balance_owed,
 207                 p.relname AS xact_type
 208           FROM  money.billable_xact xact
 209                 JOIN pg_class p ON (xact.tableoid = p.oid)
 210                 LEFT JOIN money.billing debit ON (xact.id = debit.xact)
 211                 LEFT JOIN money.payment_view credit ON (xact.id = credit.xact)
 212           GROUP BY 1,2,3,4,14
 213           ORDER BY MAX(debit.billing_ts), MAX(credit.payment_ts);
 214
 215 CREATE OR REPLACE VIEW money.billable_xact_summary AS
 216         SELECT  xact.id,
 217                 xact.usr,
 218                 xact.xact_start,
 219                 xact.xact_finish,
 220                 credit.amount AS total_paid,
 221                 credit.payment_ts AS last_payment_ts,
 222                 credit.note AS last_payment_note,
 223                 credit.payment_type AS last_payment_type,
 224                 debit.amount AS total_owed,
 225                 debit.billing_ts AS last_billing_ts,
 226                 debit.note AS last_billing_note,
 227                 debit.billing_type AS last_billing_type,
 228                 COALESCE(debit.amount, 0::numeric) - COALESCE(credit.amount, 0::numeric) AS balance_owed,
 229                 p.relname AS xact_type
 230           FROM  money.billable_xact xact
 231                 JOIN pg_class p ON xact.tableoid = p.oid
 232                 LEFT JOIN (
 233                         SELECT  billing.xact,
 234                                 sum(billing.amount) AS amount,
 235                                 max(billing.billing_ts) AS billing_ts,
 236                                 last(billing.note) AS note,
 237                                 last(billing.billing_type) AS billing_type
 238                           FROM  money.billing
 239                           WHERE billing.voided IS FALSE
 240                           GROUP BY billing.xact
 241                         ) debit ON xact.id = debit.xact
 242                 LEFT JOIN (
 243                         SELECT  payment_view.xact,
 244                                 sum(payment_view.amount) AS amount,
 245                                 max(payment_view.payment_ts) AS payment_ts,
 246                                 last(payment_view.note) AS note,
 247                                 last(payment_view.payment_type) AS payment_type
 248                           FROM  money.payment_view
 249                           WHERE payment_view.voided IS FALSE
 250                           GROUP BY payment_view.xact
 251                         ) credit ON xact.id = credit.xact
 252           ORDER BY debit.billing_ts, credit.payment_ts;
 253
 254 CREATE TABLE money.materialized_billable_xact_summary AS
 255         SELECT * FROM money.billable_xact_summary WHERE 1=0;
 256
 257 CREATE INDEX money_mat_summary_id_idx ON money.materialized_billable_xact_summary (id);
 258 CREATE INDEX money_mat_summary_usr_idx ON money.materialized_billable_xact_summary (usr);
 259 CREATE INDEX money_mat_summary_xact_start_idx ON money.materialized_billable_xact_summary (xact_start);
 260
 261 /* AFTER trigger only! */
 262 CREATE OR REPLACE FUNCTION money.mat_summary_create () RETURNS TRIGGER AS $$
 263 BEGIN
 264         INSERT INTO money.materialized_billable_xact_summary (id, usr, xact_start, xact_finish, total_paid, total_owed, balance_owed, xact_type)
 265                 VALUES ( NEW.id, NEW.usr, NEW.xact_start, NEW.xact_finish, 0.0, 0.0, 0.0, TG_ARGV[0]);
 266         RETURN NEW;
 267 END;
 268 $$ LANGUAGE PLPGSQL;
 269
 270 /* BEFORE or AFTER trigger only! */
 271 CREATE OR REPLACE FUNCTION money.mat_summary_update () RETURNS TRIGGER AS $$
 272 BEGIN
 273         UPDATE  money.materialized_billable_xact_summary
 274           SET   usr = NEW.usr,
 275                 xact_start = NEW.xact_start,
 276                 xact_finish = NEW.xact_finish
 277           WHERE id = NEW.id;
 278         RETURN NEW;
 279 END;
 280 $$ LANGUAGE PLPGSQL;
 281
 282 /* AFTER trigger only! */
 283 CREATE OR REPLACE FUNCTION money.mat_summary_delete () RETURNS TRIGGER AS $$
 284 BEGIN
 285         DELETE FROM money.materialized_billable_xact_summary WHERE id = OLD.id;
 286         RETURN OLD;
 287 END;
 288 $$ LANGUAGE PLPGSQL;
 289
 290 CREATE TRIGGER mat_summary_create_tgr AFTER INSERT ON money.grocery FOR EACH ROW EXECUTE PROCEDURE money.mat_summary_create ('grocery');
 291 CREATE TRIGGER mat_summary_change_tgr AFTER UPDATE ON money.grocery FOR EACH ROW EXECUTE PROCEDURE money.mat_summary_update ();
 292 CREATE TRIGGER mat_summary_remove_tgr AFTER DELETE ON money.grocery FOR EACH ROW EXECUTE PROCEDURE money.mat_summary_delete ();
 293
 294
 295
 296 /* BEFORE or AFTER trigger */
 297 CREATE OR REPLACE FUNCTION money.materialized_summary_billing_add () RETURNS TRIGGER AS $$
 298 BEGIN
 299         IF NOT NEW.voided THEN
 300                 UPDATE  money.materialized_billable_xact_summary
 301                   SET   total_owed = total_owed + NEW.amount,
 302                         last_billing_ts = NEW.billing_ts,
 303                         last_billing_note = NEW.note,
 304                         last_billing_type = NEW.billing_type,
 305                         balance_owed = balance_owed + NEW.amount
 306                   WHERE id = NEW.xact;
 307         END IF;
 308
 309         RETURN NEW;
 310 END;
 311 $$ LANGUAGE PLPGSQL;
 312
 313 /* AFTER trigger only! */
 314 CREATE OR REPLACE FUNCTION money.materialized_summary_billing_update () RETURNS TRIGGER AS $$
 315 DECLARE
 316         old_billing     money.billing%ROWTYPE;
 317         old_voided      money.billing%ROWTYPE;
 318 BEGIN
 319
 320         SELECT * INTO old_billing FROM money.billing WHERE xact = NEW.xact AND NOT voided ORDER BY billing_ts DESC LIMIT 1;
 321         SELECT * INTO old_voided FROM money.billing WHERE xact = NEW.xact ORDER BY billing_ts DESC LIMIT 1;
 322
 323         IF NEW.voided AND NOT OLD.voided THEN
 324                 IF OLD.id = old_voided.id THEN
 325                         UPDATE  money.materialized_billable_xact_summary
 326                           SET   last_billing_ts = old_billing.billing_ts,
 327                                 last_billing_note = old_billing.note,
 328                                 last_billing_type = old_billing.billing_type
 329                           WHERE id = OLD.xact;
 330                 END IF;
 331
 332                 UPDATE  money.materialized_billable_xact_summary
 333                   SET   total_owed = total_owed - NEW.amount,
 334                         balance_owed = balance_owed - NEW.amount
 335                   WHERE id = NEW.xact;
 336
 337         ELSIF NOT NEW.voided AND OLD.voided THEN
 338
 339                 IF OLD.id = old_billing.id THEN
 340                         UPDATE  money.materialized_billable_xact_summary
 341                           SET   last_billing_ts = old_billing.billing_ts,
 342                                 last_billing_note = old_billing.note,
 343                                 last_billing_type = old_billing.billing_type
 344                           WHERE id = OLD.xact;
 345                 END IF;
 346
 347                 UPDATE  money.materialized_billable_xact_summary
 348                   SET   total_owed = total_owed + NEW.amount,
 349                         balance_owed = balance_owed + NEW.amount
 350                   WHERE id = NEW.xact;
 351
 352         ELSE
 353                 UPDATE  money.materialized_billable_xact_summary
 354                   SET   total_owed = total_owed - (OLD.amount - NEW.amount),
 355                         balance_owed = balance_owed - (OLD.amount - NEW.amount)
 356                   WHERE id = NEW.xact;
 357         END IF;
 358
 359         RETURN NEW;
 360 END;
 361 $$ LANGUAGE PLPGSQL;
 362
 363 /* BEFORE trigger only! */
 364 CREATE OR REPLACE FUNCTION money.materialized_summary_billing_del () RETURNS TRIGGER AS $$
 365 DECLARE
 366         prev_billing    money.billing%ROWTYPE;
 367         old_billing     money.billing%ROWTYPE;
 368 BEGIN
 369         SELECT * INTO prev_billing FROM money.billing WHERE xact = OLD.xact AND NOT voided ORDER BY billing_ts DESC LIMIT 1 OFFSET 1;
 370         SELECT * INTO old_billing FROM money.billing WHERE xact = OLD.xact AND NOT voided ORDER BY billing_ts DESC LIMIT 1;
 371
 372         IF OLD.id = old_billing.id THEN
 373                 UPDATE  money.materialized_billable_xact_summary
 374                   SET   last_billing_ts = prev_billing.billing_ts,
 375                         last_billing_note = prev_billing.note,
 376                         last_billing_type = prev_billing.billing_type
 377                   WHERE id = NEW.xact;
 378         END IF;
 379
 380         IF NOT OLD.voided THEN
 381                 UPDATE  money.materialized_billable_xact_summary
 382                   SET   total_owed = total_owed - OLD.amount,
 383                         balance_owed = balance_owed + OLD.amount
 384                   WHERE id = OLD.xact;
 385         END IF;
 386
 387         RETURN OLD;
 388 END;
 389 $$ LANGUAGE PLPGSQL;
 390
 391 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.billing FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_billing_add ();
 392 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.billing FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_billing_update ();
 393 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.billing FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_billing_del ();
 394
 395
 396 /* BEFORE or AFTER trigger */
 397 CREATE OR REPLACE FUNCTION money.materialized_summary_payment_add () RETURNS TRIGGER AS $$
 398 BEGIN
 399         IF NOT NEW.voided THEN
 400                 UPDATE  money.materialized_billable_xact_summary
 401                   SET   total_paid = total_paid + NEW.amount,
 402                         last_payment_ts = NEW.payment_ts,
 403                         last_payment_note = NEW.note,
 404                         last_payment_type = TG_ARGV[0],
 405                         balance_owed = balance_owed - NEW.amount
 406                   WHERE id = NEW.xact;
 407         END IF;
 408
 409         RETURN NEW;
 410 END;
 411 $$ LANGUAGE PLPGSQL;
 412
 413 /* AFTER trigger only! */
 414 CREATE OR REPLACE FUNCTION money.materialized_summary_payment_update () RETURNS TRIGGER AS $$
 415 DECLARE
 416         old_payment     money.payment_view%ROWTYPE;
 417         old_voided      money.payment_view%ROWTYPE;
 418 BEGIN
 419
 420         SELECT * INTO old_payment FROM money.payment_view WHERE xact = NEW.xact AND NOT voided ORDER BY payment_ts DESC LIMIT 1;
 421         SELECT * INTO old_voided FROM money.payment_view WHERE xact = NEW.xact ORDER BY payment_ts DESC LIMIT 1;
 422
 423         IF NEW.voided AND NOT OLD.voided THEN
 424                 IF OLD.id = old_voided.id THEN
 425                         UPDATE  money.materialized_billable_xact_summary
 426                           SET   last_payment_ts = old_payment.payment_ts,
 427                                 last_payment_note = old_payment.note,
 428                                 last_payment_type = old_payment.payment_type
 429                           WHERE id = OLD.xact;
 430                 END IF;
 431
 432                 UPDATE  money.materialized_billable_xact_summary
 433                   SET   total_paid = total_paid - NEW.amount,
 434                         balance_owed = balance_owed + NEW.amount
 435                   WHERE id = NEW.xact;
 436
 437         ELSIF NOT NEW.voided AND OLD.voided THEN
 438
 439                 IF OLD.id = old_payment.id THEN
 440                         UPDATE  money.materialized_billable_xact_summary
 441                           SET   last_payment_ts = old_payment.payment_ts,
 442                                 last_payment_note = old_payment.note,
 443                                 last_payment_type = old_payment.payment_type
 444                           WHERE id = OLD.xact;
 445                 END IF;
 446
 447                 UPDATE  money.materialized_billable_xact_summary
 448                   SET   total_paid = total_paid + NEW.amount,
 449                         balance_owed = balance_owed - NEW.amount
 450                   WHERE id = NEW.xact;
 451
 452         ELSE
 453                 UPDATE  money.materialized_billable_xact_summary
 454                   SET   total_paid = total_paid - (OLD.amount - NEW.amount),
 455                         balance_owed = balance_owed + (OLD.amount - NEW.amount)
 456                   WHERE id = NEW.xact;
 457         END IF;
 458
 459         RETURN NEW;
 460 END;
 461 $$ LANGUAGE PLPGSQL;
 462
 463 /* BEFORE trigger only! */
 464 CREATE OR REPLACE FUNCTION money.materialized_summary_payment_del () RETURNS TRIGGER AS $$
 465 DECLARE
 466         prev_payment    money.payment_view%ROWTYPE;
 467         old_payment     money.payment_view%ROWTYPE;
 468 BEGIN
 469         SELECT * INTO prev_payment FROM money.payment_view WHERE xact = OLD.xact AND NOT voided ORDER BY payment_ts DESC LIMIT 1 OFFSET 1;
 470         SELECT * INTO old_payment FROM money.payment_view WHERE xact = OLD.xact AND NOT voided ORDER BY payment_ts DESC LIMIT 1;
 471
 472         IF OLD.id = old_payment.id THEN
 473                 UPDATE  money.materialized_billable_xact_summary
 474                   SET   last_payment_ts = prev_payment.payment_ts,
 475                         last_payment_note = prev_payment.note,
 476                         last_payment_type = prev_payment.payment_type
 477                   WHERE id = OLD.xact;
 478         END IF;
 479
 480         IF NOT OLD.voided THEN
 481                 UPDATE  money.materialized_billable_xact_summary
 482                   SET   total_paid = total_paid - OLD.amount,
 483                         balance_owed = balance_owed + OLD.amount
 484                   WHERE id = OLD.xact;
 485         END IF;
 486
 487         RETURN OLD;
 488 END;
 489 $$ LANGUAGE PLPGSQL;
 490
 491 CREATE OR REPLACE VIEW money.usr_summary AS
 492         SELECT  usr,
 493                 SUM(total_paid) AS total_paid,
 494                 SUM(total_owed) AS total_owed,
 495                 SUM(balance_owed) AS balance_owed
 496           FROM money.billable_xact_summary
 497           GROUP BY 1;
 498
 499 CREATE OR REPLACE VIEW money.usr_circulation_summary AS
 500         SELECT  usr,
 501                 SUM(total_paid) AS total_paid,
 502                 SUM(total_owed) AS total_owed,
 503                 SUM(balance_owed) AS balance_owed
 504           FROM  money.billable_xact_summary
 505           WHERE xact_type = 'circulation'
 506           GROUP BY 1;
 507
 508 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('payment');
 509 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('payment');
 510 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('payment');
 511
 512 CREATE TABLE money.bnm_payment (
 513         amount_collected        NUMERIC(6,2)    NOT NULL,
 514         accepting_usr           INT             NOT NULL
 515 ) INHERITS (money.payment);
 516 ALTER TABLE money.bnm_payment ADD PRIMARY KEY (id);
 517
 518 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.bnm_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('bnm_payment');
 519 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.bnm_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('bnm_payment');
 520 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.bnm_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('bnm_payment');
 521
 522
 523 CREATE TABLE money.forgive_payment () INHERITS (money.bnm_payment);
 524 ALTER TABLE money.forgive_payment ADD PRIMARY KEY (id);
 525 CREATE INDEX money_forgive_id_idx ON money.forgive_payment (id);
 526 CREATE INDEX money_forgive_payment_xact_idx ON money.forgive_payment (xact);
 527 CREATE INDEX money_forgive_payment_payment_ts_idx ON money.forgive_payment (payment_ts);
 528 CREATE INDEX money_forgive_payment_accepting_usr_idx ON money.forgive_payment (accepting_usr);
 529
 530 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.forgive_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('forgive_payment');
 531 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.forgive_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('forgive_payment');
 532 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.forgive_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('forgive_payment');
 533
 534
 535 CREATE TABLE money.work_payment () INHERITS (money.bnm_payment);
 536 ALTER TABLE money.work_payment ADD PRIMARY KEY (id);
 537 CREATE INDEX money_work_id_idx ON money.work_payment (id);
 538 CREATE INDEX money_work_payment_xact_idx ON money.work_payment (xact);
 539 CREATE INDEX money_work_payment_payment_ts_idx ON money.work_payment (payment_ts);
 540 CREATE INDEX money_work_payment_accepting_usr_idx ON money.work_payment (accepting_usr);
 541
 542 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.work_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('work_payment');
 543 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.work_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('work_payment');
 544 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.work_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('work_payment');
 545
 546
 547 CREATE TABLE money.credit_payment () INHERITS (money.bnm_payment);
 548 ALTER TABLE money.credit_payment ADD PRIMARY KEY (id);
 549 CREATE INDEX money_credit_id_idx ON money.credit_payment (id);
 550 CREATE INDEX money_credit_payment_xact_idx ON money.credit_payment (xact);
 551 CREATE INDEX money_credit_payment_payment_ts_idx ON money.credit_payment (payment_ts);
 552 CREATE INDEX money_credit_payment_accepting_usr_idx ON money.credit_payment (accepting_usr);
 553
 554 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.credit_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('credit_payment');
 555 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.credit_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('credit_payment');
 556 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.credit_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('credit_payment');
 557
 558
 559 CREATE TABLE money.goods_payment () INHERITS (money.bnm_payment);
 560 ALTER TABLE money.goods_payment ADD PRIMARY KEY (id);
 561 CREATE INDEX money_goods_id_idx ON money.goods_payment (id);
 562 CREATE INDEX money_goods_payment_xact_idx ON money.goods_payment (xact);
 563 CREATE INDEX money_goods_payment_payment_ts_idx ON money.goods_payment (payment_ts);
 564 CREATE INDEX money_goods_payment_accepting_usr_idx ON money.goods_payment (accepting_usr);
 565
 566 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.goods_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('goods_payment');
 567 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.goods_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('goods_payment');
 568 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.goods_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('goods_payment');
 569
 570
 571 CREATE TABLE money.bnm_desk_payment (
 572         cash_drawer     INT     REFERENCES actor.workstation (id) DEFERRABLE INITIALLY DEFERRED
 573 ) INHERITS (money.bnm_payment);
 574 ALTER TABLE money.bnm_desk_payment ADD PRIMARY KEY (id);
 575
 576 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.bnm_desk_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('bnm_desk_payment');
 577 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.bnm_desk_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('bnm_desk_payment');
 578 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.bnm_desk_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('bnm_desk_payment');
 579
 580
 581 CREATE OR REPLACE VIEW money.desk_payment_view AS
 582         SELECT  p.*,c.relname AS payment_type
 583           FROM  money.bnm_desk_payment p
 584                 JOIN pg_class c ON (p.tableoid = c.oid);
 585
 586 CREATE OR REPLACE VIEW money.bnm_payment_view AS
 587         SELECT  p.*,c.relname AS payment_type
 588           FROM  money.bnm_payment p
 589                 JOIN pg_class c ON (p.tableoid = c.oid);
 590
 591 CREATE TABLE money.cash_payment () INHERITS (money.bnm_desk_payment);
 592 ALTER TABLE money.cash_payment ADD PRIMARY KEY (id);
 593 CREATE INDEX money_cash_id_idx ON money.cash_payment (id);
 594 CREATE INDEX money_cash_payment_xact_idx ON money.cash_payment (xact);
 595 CREATE INDEX money_cash_payment_ts_idx ON money.cash_payment (payment_ts);
 596 CREATE INDEX money_cash_payment_accepting_usr_idx ON money.cash_payment (accepting_usr);
 597 CREATE INDEX money_cash_payment_cash_drawer_idx ON money.cash_payment (cash_drawer);
 598
 599 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.cash_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('bnm_payment');
 600 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.cash_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('bnm_payment');
 601 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.cash_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('bnm_payment');
 602
 603
 604 CREATE TABLE money.check_payment (
 605         check_number    TEXT    NOT NULL
 606 ) INHERITS (money.bnm_desk_payment);
 607 ALTER TABLE money.check_payment ADD PRIMARY KEY (id);
 608 CREATE INDEX money_check_payment_xact_idx ON money.check_payment (xact);
 609 CREATE INDEX money_check_id_idx ON money.check_payment (id);
 610 CREATE INDEX money_check_payment_ts_idx ON money.check_payment (payment_ts);
 611 CREATE INDEX money_check_payment_accepting_usr_idx ON money.check_payment (accepting_usr);
 612 CREATE INDEX money_check_payment_cash_drawer_idx ON money.check_payment (cash_drawer);
 613
 614 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.check_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('bnm_payment');
 615 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.check_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('bnm_payment');
 616 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.check_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('bnm_payment');
 617
 618
 619 CREATE TABLE money.credit_card_payment (
 620         cc_type         TEXT,
 621         cc_number       TEXT,
 622         expire_month    INT,
 623         expire_year     INT,
 624         approval_code   TEXT
 625 ) INHERITS (money.bnm_desk_payment);
 626 ALTER TABLE money.credit_card_payment ADD PRIMARY KEY (id);
 627 CREATE INDEX money_credit_card_payment_xact_idx ON money.credit_card_payment (xact);
 628 CREATE INDEX money_credit_card_id_idx ON money.credit_card_payment (id);
 629 CREATE INDEX money_credit_card_payment_ts_idx ON money.credit_card_payment (payment_ts);
 630 CREATE INDEX money_credit_card_payment_accepting_usr_idx ON money.credit_card_payment (accepting_usr);
 631 CREATE INDEX money_credit_card_payment_cash_drawer_idx ON money.credit_card_payment (cash_drawer);
 632
 633 CREATE TRIGGER mat_summary_add_tgr AFTER INSERT ON money.credit_card_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_add ('credit_card_payment');
 634 CREATE TRIGGER mat_summary_upd_tgr AFTER UPDATE ON money.credit_card_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_update ('credit_card_payment');
 635 CREATE TRIGGER mat_summary_del_tgr BEFORE DELETE ON money.credit_card_payment FOR EACH ROW EXECUTE PROCEDURE money.materialized_summary_payment_del ('credit_card_payment');
 636
 637
 638 CREATE OR REPLACE VIEW money.non_drawer_payment_view AS
 639         SELECT  p.*, c.relname AS payment_type
 640           FROM  money.bnm_payment p
 641                         JOIN pg_class c ON p.tableoid = c.oid
 642           WHERE c.relname NOT IN ('cash_payment','check_payment','credit_card_payment');
 643
 644 CREATE OR REPLACE VIEW money.cashdrawer_payment_view AS
 645         SELECT  ou.id AS org_unit,
 646                 ws.id AS cashdrawer,
 647                 t.payment_type AS payment_type,
 648                 p.payment_ts AS payment_ts,
 649                 p.amount AS amount,
 650                 p.voided AS voided,
 651                 p.note AS note
 652           FROM  actor.org_unit ou
 653                 JOIN actor.workstation ws ON (ou.id = ws.owning_lib)
 654                 LEFT JOIN money.bnm_desk_payment p ON (ws.id = p.cash_drawer)
 655                 LEFT JOIN money.payment_view t ON (p.id = t.id);
 656
 657
 658 COMMIT;
 659