#------------------------------------------------------------
# Copyright (C) 2009 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::DB::Item::ContractLevelLicenseIncomeBalanceAccount;
use strict;
use warnings;
use lib '/app/tools/common/lib';
use Common::Assert;
use Common::DB::Item;
use base 'Common::DB::Item';

use lib '/app/tools/rps/lib';
use RPS::DB::Item::FinanceAccount;


use constant kTable => 'contract_level_license_income_balance_account';
use constant kDB => Common::DB::Item::kClientDB();


sub GetCurrentBalance
{
    my ($class, $artistPayeeID, $payorID) = @_;
    assert($artistPayeeID);
    assert($payorID);

    my $balance = 0;

    my $item = $class->Lookup(artist_payee_id => $artistPayeeID, payor_id => $payorID);
    if ($item)
    {
        my $accountID = $item->finance_account_id;
        if ($accountID)
        {
            $balance = RPS::DB::Item::FinanceAccount->CurrentBalance($accountID);
        }
    }

    return $balance;
}

1;