#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
#------------------------------------------------------------
package RPS::DB::Item::ArtistRoyaltyIncomeItem;
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::ContractRateType;

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


sub DeleteByArtistRoyaltyAlbumID
{
    my ($class, $id) = @_;
    assert($id);

    my $sql = "DELETE FROM " . kTable . " WHERE artist_royalty_album_id=$id";
	my $dbo = Common::RSApp::GetClientDB();
    $dbo->DoCmd($sql);
}


sub GetByArtistRoyaltyAlbumID
{
    my ($class, $id) = @_;
    assert($id);

    my $sql = "SELECT * from " . kTable . " WHERE artist_royalty_album_id=$id";

    return $class->GetAll($sql);
}

sub GetIncomeSourcesByStatement
{
    my ($class, $id) = @_;
    assert($id);

    # JPK - Changing this to a join to speed it up
    #
    my $sql = "SELECT DISTINCT income_source_id FROM " . kTable . " JOIN artist_royalty_album USING (artist_royalty_album_id) WHERE artist_royalty_statement_id = $id";

    return $class->GetAll($sql);	
}

sub GetIncomeSourcesByStatementSkipNonPayable
{
    my ($class, $id) = @_;
    assert($id);

#    my $sql = "SELECT DISTINCT income_source_id FROM " . kTable . " WHERE artist_royalty_album_id IN (SELECT artist_royalty_album_id FROM artist_royalty_album WHERE artist_royalty_statement_id = $id) AND contract_rate_type_id != " . RPS::DB::Item::ContractRateType::kRateTypeNonPayable;
    my $sql = "SELECT DISTINCT income_source_id FROM " . kTable 
     . " JOIN artist_royalty_album USING (artist_royalty_album_id) WHERE artist_royalty_statement_id = $id"
     . " AND contract_rate_type_id != " . RPS::DB::Item::ContractRateType::kRateTypeNonPayable;

    return $class->GetAll($sql);	
}

1;