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

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::Label;
use RPS::Payor::Payor;
use RPS::Statement::Label::StatementLabelList;
use RPS::Statement::Label::StatementTransactionList;
use RPS::DB::Item::LabelRoyaltyStatement;
use RPS::DB::Item::LabelPayee;

use RPS::Statement::Label::BaseStatement;
use base 'RPS::Statement::Label::BaseStatement';

sub _initProperties {
    my ( $self, $props ) = @_;

    $self->SUPER::_initProperties($props);

    $self->{LabelStatementLabelList} =
      RPS::Statement::Label::StatementLabelList->new( labelRoyaltyStatementID => $props->{label_royalty_statement_id} );

    $self->{LabelStatementTransactionList} =
      RPS::Statement::Label::StatementTransactionList->new( labelRoyaltyStatementID => $props->{label_royalty_statement_id} );

    $self->{Payor} = RPS::Payor::Payor->new( payorID => $props->{payor_id}, loadSubs => 0 );

    my $grossSalesTotal = 0;
    my $feeTotal        = 0;

    my $list = $self->{LabelStatementLabelList}->getList();
    if ( defined $list ) {
        foreach my $labelItem (@$list) {
            $grossSalesTotal += $labelItem->GrossSales();
            $feeTotal        += $labelItem->Fee();
        }
    }
    $self->{GrossSalesTotal} = Common::FormObject::Scalar::Money->new( value => $grossSalesTotal );
    $self->{FeeTotal}        = Common::FormObject::Scalar::Money->new( value => $feeTotal );
}

###
1;    #
###