treasuredb/TrsrDB/CurrentArrears.pm

use strict;

package TrsrDB::CurrentArrears;
use base qw/DBIx::Class::Core/;

__PACKAGE__->table('CurrentArrears');
__PACKAGE__->add_columns(qw/billId debtor targetCredit date purpose difference/);
__PACKAGE__->set_primary_key("billId");

__PACKAGE__->belongs_to(
    debtor => 'TrsrDB::Account',
    { 'foreign.ID' => 'self.debtor' }
);

__PACKAGE__->many_to_many(
    payable_with => debtor => 'available_credits'
);

1;