package BookPub::Import::Importer::Follett::Version9;

use strict;
use warnings;

use lib '/app/tools/common/lib';
use base 'BookPub::Import::Importer::Follett';

sub _fieldMap {
    {
        countryCode  => 'F',
        rPostalCode  => 'E',
        dateBegin    => 'I1',
        rIsbn13      => 'A',
        rTitle       => 'B',
        rAuthor      => 'C',
        rUnits       => 'H',
        rListPrice   => 'G',
        rDiscount    => 'I',
        rRevenue     => 'J',
        rInstitution => 'D',
        currencyCode => 'K'
    };
}

sub currencyCode         {
    my $self = shift;

    my $currencyCode = $self->_getByFieldName('currencyCode') || "";
    return $currencyCode if ($currencyCode =~ /^\w{3}$/);
}

sub rListPriceCurrency   { shift->currencyCode() }

1;