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