package BookPub::Import::Importer::OverDrive::Version15;

use strict;
use Data::Dumper;

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

use lib '/app/tools/bookpub/lib';
use BookPub::Tracker::Service;
use base 'BookPub::Import::Importer::OverDrive';

sub priceTypeQualifierID {
    my $self     = shift;
    my $format   = $self->_getByFieldName('rFormat');
    my $clientID = Common::RSApp::GetClientID;

    # Only want to set this for MacmillanUK
    if ( $clientID != 359 ) {    #MMUK
        return;
    }

    if ( $format =~ /^Retail$/i ) {
        return BookPub::DB::Item::PriceTypeQualifier::kConsumer;
    } elsif ( $format =~ /^Institutional - Public Library$/i ) {
        return BookPub::DB::Item::PriceTypeQualifier::kCorporate;
    } elsif ( $format =~ /^Institutional - School Library$/i ) {
        return BookPub::DB::Item::PriceTypeQualifier::kCorporate;
    } elsif ( $format =~ /^Institutional - Other$/i ) {
        return BookPub::DB::Item::PriceTypeQualifier::kUnqualified;
    }

    $self->fail( "Price type qualifier not set for " . $priceType );
}

###
1;    # Play nicely.
###