#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::Statement::Mechanical::US::HFA::StatementFull;

use Carp;

use Data::Dumper;
use Date::Calc;

use lib '/app/tools/common/lib';
use Common::Client;
use Common::Assert;

#use Common::DiskCache;

use lib '/app/tools/rps/lib';

use RPS::DB::Item::MechanicalStatementItem;
use RPS::Statement::Mechanical::US::StatementFull;
use RPS::Statement::Mechanical::US::HFA::StatementPublisherList;
use RPS::Statement::Mechanical::US::HFA::StatementTrackList;

use base 'RPS::Statement::Mechanical::US::StatementFull';

sub _numLines {
    my ( $self, $id ) = @_;
    return RPS::DB::Item::MechanicalStatementItem->GetNumPositiveItemsByStatementID($id);
}

sub _getStatementPublisherList {
    my ( $self, $statementID, $focusPublisherID ) = @_;

    return RPS::Statement::Mechanical::US::HFA::StatementPublisherList->new(
        mechanicalStatementID => $statementID,
        focusPublisherID      => $focusPublisherID,
    );
}

sub _getStatementTrackList {
    my ( $self, $statementID ) = @_;
    return RPS::Statement::Mechanical::US::HFA::StatementTrackList->new( mechanicalStatementID => $statementID );
}

###
1;    #
###