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