#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
#------------------------------------------------------------
package RPS::Product::PricingTierList;

use strict;
use warnings;

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

use lib '/app/tools/rps/lib';
use RPS::DB::Item::Service;
use RPS::Product::PricingTier;

use lib '/app/tools/distribution/lib';
use Distribution::DB::Item::ServicePriceTier;
use Distribution::DB::Item::ProductServicePricing;

use Common::FormObject;
use base 'Common::FormObject';

sub _init {
    my ( $self, %args ) = @_;

    $self->SUPER::_init(%args);

    $self->{PricingTier} = [];
    my $tierCollection =
      $args{service_id}
      ? Distribution::DB::Item::ServicePriceTier->Search(%args)
      : Distribution::DB::Item::ServicePriceTier->GetAll();

    my $product_tier = Distribution::DB::Item::ProductServicePricing->Search(%args)
      if ( $args{product_id} );

    while ( $tierCollection->hasNext() ) {
        my $obj = $tierCollection->next();
        my $tier = new RPS::Product::PricingTier( _dbItem => $obj );

        if ( $product_tier && $product_tier->service_price_tier_id == $tier->ServicePriceTierID ) {
            $tier->{Current}        = 1;
            $self->{HasPricingTier} = 1;
        }

        $self->{CurrentPriceTierID} = $tier->ServicePriceTierID();

        push @{ $self->{PricingTier} }, $tier;
    }

    return $self;
}

sub getList {
    my ($self) = @_;

    return $self->{DistributionService};
}

1;