#---------------------------------------------------------------
# ____                   _ _         ____  _
#|  _ \ ___  _   _  __ _| | |_ _   _/ ___|| |__   __ _ _ __ ___
#| |_) / _ \| | | |/ _` | | __| | | \___ \| '_ \ / _` | '__/ _ \
#|  _ < (_) | |_| | (_| | | |_| |_| |___) | | | | (_| | | |  __/
#|_| \_\___/ \__, |\__,_|_|\__|\__, |____/|_| |_|\__,_|_|  \___|
#            |___/             |___/
#
# Copyright (C) 2012 RoyaltyShare, Inc.   All Rights Reserved
#---------------------------------------------------------------

package RPS::ArtistRoyalty::Fast::Final::ArtistContractTermReserve;

use strict;
use Data::Dumper;
use File::Path;

use lib '/app/tools/common/lib';
use lib '/app/tools/rps/lib';
use lib '/app/tools/raptor/lib';
use Common::RSApp;
use Common::RSDB;

use Data::Dumper;
use DB_File;

use Common::Log;

use base 'RPS::ArtistRoyalty::Fast::Final';

# These are quite similar to the fields in the Reserve.pm package.
# Which isn't surprising, since they are the same table.
#
use constant kArtistContractTermReserveID => 0;
use constant kArtistContractTermID        => 1;
use constant kIncomeSourceID              => 2;
use constant kRegionID                    => 3;
use constant kChannelID                   => 4;
use constant kPriceLevelID                => 5;
use constant kOriginalStatementItemID     => 6;
use constant kProductID                   => 7;
use constant kProductFormatID             => 8;
use constant kUnits                       => 9;
use constant kRevenue                     => 10;
use constant kPrice                       => 11;
use constant kRevenueBased                => 12;
use constant kEffectiveRate               => 13;
use constant kPeriodsRemaining            => 14;
use constant kAlbumID                     => 15;
use constant kTrackID                     => 16;
use constant kProrateTrackCount           => 17;

my @gFields = (
    'artist_contract_term_reserve_id', 'artist_contract_term_id', 'income_source_id',           'region_id',
    'channel_id',                      'price_level_id',          'original_statement_item_id', 'product_id',
    'product_format_id',               'units',                   'revenue',                    'price',
    'revenue_based',                   'effective_rate',          'periods_remaining',          'album_id',
    'track_id',                        'prorate_track_count',
);

sub Fields { return \@gFields; }

sub FileName  { 'artist_contract_term_reserve' }
sub _MaxIDSql { 'SELECT MAX(artist_contract_term_reserve_id) FROM artist_contract_term_reserve' }

#sub GetCurrentMaxID
#{
#    my ($class) = @_;
#
#    return 0;
#}

my $gRunID;

sub Init {
    my ( $class, $outputDirectory, $runID ) = @_;

    # Call the inherited method first.
    #
    $class->SUPER::Init($outputDirectory);

    $gRunID = $runID;
}

sub new {
    my ($class) = @_;

    my $item = $class->BlankItem();
    $class->_IncrementID();
    $item->[kArtistContractTermReserveID] = $class->_CurrentID();

    return bless( $item, $class );
}

1;