fixing money stuff -- note vs type
[Evergreen.git] / Open-ILS / src / perlmods / OpenILS / Application / Storage / CDBI / money.pm
index c4fe509..c49a67b 100644 (file)
@@ -23,7 +23,7 @@ __PACKAGE__->columns(Essential => qw/total_paid total_owed balance_owed/);
 
 package money::user_circulation_summary;
 use base qw/money/;
-__PACKAGE__->table('money_user_summary');
+__PACKAGE__->table('money_user_circulation_summary');
 __PACKAGE__->columns(Primary => 'usr');
 __PACKAGE__->columns(Essential => qw/total_paid total_owed balance_owed/);
 #-------------------------------------------------------------------------------
@@ -34,8 +34,8 @@ __PACKAGE__->table('money_billable_transaction_summary');
 __PACKAGE__->columns(Primary => 'id');
 __PACKAGE__->columns(Essential => qw/xact_start usr xact_finish total_paid
                                     last_payment_ts total_owed last_billing_ts
-                                    balance_owed xact_type last_billing_note
-                                    last_payment_note/);
+                                    balance_owed xact_type last_billing_note last_billing_type
+                                    last_payment_note last_payment_type/);
 #-------------------------------------------------------------------------------
 
 package money::billing;
@@ -82,7 +82,7 @@ __PACKAGE__->columns(Others => 'note');
 
 package money::forgive_payment;
 use base qw/money/;
-__PACKAGE__->table('money_payment');
+__PACKAGE__->table('money_forgive_payment');
 __PACKAGE__->columns(Primary => 'id');
 __PACKAGE__->columns(Essential => qw/xact amount payment_ts accepting_usr amount_collected/);
 __PACKAGE__->columns(Others => qw/note/);