fixing money stuff -- note vs type
[Evergreen.git] / Open-ILS / src / perlmods / OpenILS / Application / Storage / CDBI / money.pm
1 package OpenILS::Application::Storage::CDBI::money;
2 our $VERSION = 1;
3
4 #-------------------------------------------------------------------------------
5 package money;
6 use base qw/OpenILS::Application::Storage::CDBI/;
7 #-------------------------------------------------------------------------------
8
9 package money::billable_transaction;
10 use base qw/money/;
11 __PACKAGE__->table('money_billable_xact');
12 __PACKAGE__->columns(Primary => 'id');
13 __PACKAGE__->columns(Essential => qw/xact_start usr/);
14 __PACKAGE__->columns(Others => qw/xact_finish/);
15 #-------------------------------------------------------------------------------
16
17 package money::user_summary;
18 use base qw/money/;
19 __PACKAGE__->table('money_user_summary');
20 __PACKAGE__->columns(Primary => 'usr');
21 __PACKAGE__->columns(Essential => qw/total_paid total_owed balance_owed/);
22 #-------------------------------------------------------------------------------
23
24 package money::user_circulation_summary;
25 use base qw/money/;
26 __PACKAGE__->table('money_user_circulation_summary');
27 __PACKAGE__->columns(Primary => 'usr');
28 __PACKAGE__->columns(Essential => qw/total_paid total_owed balance_owed/);
29 #-------------------------------------------------------------------------------
30
31 package money::billable_transaction_summary;
32 use base qw/money/;
33 __PACKAGE__->table('money_billable_transaction_summary');
34 __PACKAGE__->columns(Primary => 'id');
35 __PACKAGE__->columns(Essential => qw/xact_start usr xact_finish total_paid
36                                      last_payment_ts total_owed last_billing_ts
37                                      balance_owed xact_type last_billing_note last_billing_type
38                                      last_payment_note last_payment_type/);
39 #-------------------------------------------------------------------------------
40
41 package money::billing;
42 use base qw/money/;
43 __PACKAGE__->table('money_billing');
44 __PACKAGE__->columns(Primary => 'id');
45 __PACKAGE__->columns(Essential => qw/xact amount billing_ts note voided/);
46 #-------------------------------------------------------------------------------
47
48 package money::payment;
49 use base qw/money/;
50 __PACKAGE__->table('money_payment');
51 __PACKAGE__->columns(Primary => 'id');
52 __PACKAGE__->columns(Essential => qw/xact amount payment_ts payment_type/);
53 __PACKAGE__->columns(Others => qw/note/);
54 #-------------------------------------------------------------------------------
55
56 package money::cash_payment;
57 use base qw/money/;
58 __PACKAGE__->table('money_cash_payment');
59 __PACKAGE__->columns(Primary => 'id');
60 __PACKAGE__->columns(Essential => qw/xact amount payment_ts cash_drawer accepting_usr amount_collected/);
61 __PACKAGE__->columns(Others => qw/note/);
62 #-------------------------------------------------------------------------------
63
64 package money::check_payment;
65 use base qw/money/;
66 __PACKAGE__->table('money_check_payment');
67 __PACKAGE__->columns(Primary => 'id');
68 __PACKAGE__->columns(Essential => qw/xact amount payment_ts cash_drawer check_number accepting_usr amount_collected/);
69 __PACKAGE__->columns(Others => qw/note/);
70 #-------------------------------------------------------------------------------
71
72 package money::credit_card_payment;
73 use base qw/money/;
74 __PACKAGE__->table('money_credit_card_payment');
75 __PACKAGE__->columns(Primary => 'id');
76 __PACKAGE__->columns(Essential => qw/xact amount payment_ts cash_drawer
77                                      accepting_usr amount_collected cc_type
78                                      cc_number expire_month expire_year
79                                      approval_code/);
80 __PACKAGE__->columns(Others => 'note');
81 #-------------------------------------------------------------------------------
82
83 package money::forgive_payment;
84 use base qw/money/;
85 __PACKAGE__->table('money_forgive_payment');
86 __PACKAGE__->columns(Primary => 'id');
87 __PACKAGE__->columns(Essential => qw/xact amount payment_ts accepting_usr amount_collected/);
88 __PACKAGE__->columns(Others => qw/note/);
89 #-------------------------------------------------------------------------------
90
91 package money::work_payment;
92 use base qw/money::forgive_payment/;
93 __PACKAGE__->table('money_work_payment');
94 #-------------------------------------------------------------------------------
95
96 package money::credit_payment;
97 use base qw/money::forgive_payment/;
98 __PACKAGE__->table('money_credit_payment');
99
100 #-------------------------------------------------------------------------------
101
102 1;
103