package BookPub::Import::Importer::Readbooks::Version3;

use strict;

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

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

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

sub purchaseType               { BookPub::DB::Item::Sale::kPurchaseTypeDownload }
sub productType                { BookPub::DB::Item::Sale::kProductTypeEBook }
sub priceType                  { 'agency+tax' }
sub _useIsSaleRec              { 1 }
sub _autoParseTitleAndSubtitle { 1 }

sub dateBegin {
    my $self    = shift;
    my $dateStr = $self->_getByFieldName('dateBegin');
    my $date;

    print STDERR "dateBegin: " . $dateStr . "\n";

    # date is in format MM/DD/YYYY HH:MM:SS
    if ( $dateStr =~ /^(\d{1,2})\/(\d{1,2})\/(\d{4})/ ) {
        $date = sprintf( "%04d-%02d-%02d", $3, $1, $2 );
        print STDERR "date: " . $date . "\n";
    } else {
        print STDERR "date is undef\n";
        $date = undef;
    }

    return $date;
}

sub dateEnd {
    my $self = shift;

    return $self->dateBegin();
}

sub _isSaleRec {
    my $self = shift;

    if (   !$self->dateBegin
        && !$self->rTitle
        && !$self->rIsbn13
        && !$self->rPostalCode
        && !$self->countryCode
        && !$self->rUnits
        && !$self->currencyCode ) {
        return 0;
    }
    return $self->BookPub::Import::Importer::_isSaleRec();
}

1;