#------------------------------------------------------------
# Copyright (C) 2009 RoyaltyShare, Inc.   All Rights Reserved
#------------------------------------------------------------
package Support::SaleImporter::SaleImporterList::RPS;

use strict;
use warnings;
use Carp;

use lib '/app/tools/rps/lib';
use RPS::Import::Service;

use lib '/app/tools/support/lib';
use Support::SaleImporter::SaleImporter::RPS;

use base 'Support::SaleImporter::SaleImporterList';

sub _getAllVersions {
    my $self      = shift;
    my $serviceID = shift || return;
    my $importers = RPS::Import::Service::GetImporters($serviceID);

    return $importers ? keys(%$importers) : undef;
}

sub _getSaleImporter {
    my $self      = shift;
    my $version   = shift;
    my $serviceID = shift;

    return Support::SaleImporter::SaleImporter::RPS->new( version => $version, serviceID => $serviceID );
}

1;