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