#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::Report::ArtistReservePipeline;
use strict;
use warnings;

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

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

use base 'RPS::Report';

sub _baseXMLName { 'Line' }

sub _getDBItem() {
    my $self = shift;
    my %args = @_;
    my $runID = $args{runID};
	my $regionID = $args{regionID};

    return RPS::DB::Item::ReportQueries::ArtistReservePipeline->GetByArtistRoyaltyRunID($runID, $regionID);
}

sub _reportColumns {
    my $self = shift;

    my $currency = Common::Client::Current()->Locale()->currencyFormat()->currencyCode();

    return (
             "AlbumTitle"         => "Album Title",
             "CatalogNumber"      => "Catalog #",
             "ArtistPayeeName"    => "Payee",
             "AccountNumber"      => "Account #",
             "LabelName"          => "Label",
             "RegionName"         => "Region",
             "TotalUnits"         => "Total Reserves Held: Units",
             "TotalRevenue"       => "Total Reserves Held: $currency",
             "Units0"             => "Current Period Taken: Units",
             "Revenue0"           => "Current Period Taken: $currency",
             "Units1"             => "Current Period Liquidated: Units",
             "Revenue1"           => "Current Period Liquidated: $currency",
             "Units2"             => "C+1: Units",
             "Revenue2"           => "C+1: $currency",
             "Units3"             => "C+2: Units",
             "Revenue3"           => "C+2: $currency",
             "Units4"             => "C+3: Units",
             "Revenue4"           => "C+3: $currency",
             "Units5"             => "C+4: Units",
             "Revenue5"           => "C+4: $currency",
             "Units6"             => "C+5: Units",
             "Revenue6"           => "C+5: $currency",
             "Units7"             => "C+6: Units",
             "Revenue7"           => "C+6: $currency",
             "Units8"             => "C+7: Units",
             "Revenue8"           => "C+7: $currency",
             "Units9"             => "C+8: Units",
             "Revenue9"           => "C+8: $currency",
    );
}

sub _fillInHash
{
    my ($self, $data) = @_;

    my $locale = Common::Client::Current()->Locale();

    my %hash;
    $hash{RegionName}      	    = $data->region_name;
    $hash{RegionID}      	    = $data->region_id;
    $hash{ArtistPayeeName}      = $data->artist_payee_name;
    $hash{ArtistPayeeID}        = $data->artist_payee_id;
    $hash{AccountNumber}        = $data->client_account_id;
    $hash{LabelName}            = $data->label_name;
    $hash{CatalogNumber}        = $data->catalog_number;
    $hash{AlbumID}              = $data->album_id;
    $hash{AlbumTitle}           = $data->album_title;
    $hash{TotalRevenue}         = $locale->formatNumber($data->total_revenue);
    $hash{TotalRevenueRounded}  = $locale->formatNumber($data->total_revenue, '.2');
    $hash{TotalUnits}           = $locale->formatNumber($data->total_units);
    $hash{Revenue0}             = $locale->formatNumber($data->revenue_0);
    $hash{Revenue0Rounded}      = $locale->formatNumber($data->revenue_0, '.2');
    $hash{Units0}               = $locale->formatNumber($data->units_0);
    $hash{Revenue1}             = $locale->formatNumber($data->revenue_1);
    $hash{Revenue1Rounded}      = $locale->formatNumber($data->revenue_1, '.2');
    $hash{Units1}               = $locale->formatNumber($data->units_1);
    $hash{Revenue2}             = $locale->formatNumber($data->revenue_2);
    $hash{Revenue2Rounded}      = $locale->formatNumber($data->revenue_2, '.2');
    $hash{Units2}               = $locale->formatNumber($data->units_2);
    $hash{Revenue3}             = $locale->formatNumber($data->revenue_3);
    $hash{Revenue3Rounded}      = $locale->formatNumber($data->revenue_3, '.2');
    $hash{Units3}               = $locale->formatNumber($data->units_3);
    $hash{Revenue4}             = $locale->formatNumber($data->revenue_4);
    $hash{Revenue4Rounded}      = $locale->formatNumber($data->revenue_4, '.2');
    $hash{Units4}               = $locale->formatNumber($data->units_4);
    $hash{Revenue5}             = $locale->formatNumber($data->revenue_5);
    $hash{Units5}               = $locale->formatNumber($data->units_5);
    $hash{Revenue6}             = $locale->formatNumber($data->revenue_6);
    $hash{Units6}               = $locale->formatNumber($data->units_6);
    $hash{Revenue7}             = $locale->formatNumber($data->revenue_7);
    $hash{Units7}               = $locale->formatNumber($data->units_7);
    $hash{Revenue8}             = $locale->formatNumber($data->revenue_8);
    $hash{Units8}               = $locale->formatNumber($data->units_8);
    $hash{Revenue9}             = $locale->formatNumber($data->revenue_9);
    $hash{Units9}               = $locale->formatNumber($data->units_9);

    return \%hash;
}


###
1;#
###