package BookPub::Import::Importer::Kobo::Version30;

use strict;

use lib '/app/tools/bookpub/lib';
use base 'BookPub::Import::Importer::Kobo::Version23';

sub _headerIdentifier { ( isbn => 'ISBN' ) }

# We have to do some odd things with the field map here because this importer has
# different column definitions of seperate tabs.  The map is defined by tab name below.
# The summary tab is ignored (returns and empty field set).
sub _fieldMap {
    my $self = shift;

    my $map = {
        'agency' => {
            currencyCode           => 'V',
            conversionRate         => 'T',
            countryCode            => 'C',
            rState                 => 'D',
            rPostalCode            => 'E',
            dateBegin              => 'A',
            isbn                   => 'J',
            rTitle                 => 'L',
            rAuthor                => 'K',
            rImprint               => 'I',
            rSales                 => 'F',
            rReturns               => 'G',
            rListPrice             => 'P',
            rListPriceCurrency     => 'S',
            rPurchasePrice         => 'O',
            rPurchasePriceCurrency => 'S',    # because we're using publisher price,
                                              # we'll use list price currency as we
                                              # do in the other versions
            rCOGS                  => 'Q',
            rRevenue               => 'U',
        },
    };

    $map->{wholesale} = $map->{agency};       # wholesale tab maps just like agency tab

    my $sheet = lc( $self->sheetname ) || return {};
    return {} if ( $sheet =~ /(invoice|summary|contract cogs)/i );

    die "Unrecognized tab name '" . $self->sheetname . "'" unless ( $map->{$sheet} );

    return $map->{$sheet};
}

sub priceType {
    my $self = shift;

    my $map = {
        'agency'    => 'agency',
        'wholesale' => 'rrp',
    };

    my $sheet = lc( $self->sheetname );

    return $map->{$sheet};
}

1;
