8459e9ae48
TrsrDB: fixed Id -> credId autobalance -> make_transfers TrsrDB::Account: added history accessor TrsrDB::Balance: added fieds earned spent and even_until, renamed credit to available TrsrDB::CurrentArrears: fixed account -> debtor in relation declaration schema.sql: fixed triggers deactivated trigger enforceFixedCredit extended Balance with some more fields t/schema.{sql,out} trivial fixes t/schema.t added tests: Get balances after transfers partial use of credit, indirect transfers
15 lines
297 B
Perl
15 lines
297 B
Perl
use strict;
|
|
|
|
package TrsrDB::Balance;
|
|
use base qw/DBIx::Class::Core/;
|
|
|
|
__PACKAGE__->table("Balance");
|
|
__PACKAGE__->add_columns(qw/ ID available earned promised spent arrears even_until /);
|
|
__PACKAGE__->set_primary_key("ID");
|
|
|
|
__PACKAGE__->belongs_to(
|
|
account => 'TrsrDB::Account', 'ID'
|
|
);
|
|
|
|
1;
|