package RPS::Import::MusicKey;

use strict;

use Data::Dumper;
use lib '/app/tools/common/lib';
use Common::Util qw(normalize_upc normalize_isrc);
use Date::Calc qw(Days_in_Month);

use lib '/app/tools/data_classes/lib';

use lib '/app/tools/rps/lib';
use RPS::File::Sale;
use base 'RPS::Import::Importer';

sub _headerIdentifier { ( isrc => 'ISRC' ) }

sub _fieldMap {
    my $self = shift;

    my %fieldMap = (
        1 => {
            countryCode => 'J',
            dateBegin   => 'I',
            dateEnd     => 'I',
            artistName  => 'G',
            upc         => 'F',
            ,
            isrc      => 'C',
            trackName => 'H',
            units     => 'O',
        },
    );

    return $fieldMap{ $self->_version() };
}

sub mediaType    { RPS::DB::Item::MediaType::kMediaTypeAudio }
sub productType  { RPS::File::Sale::TYPE_TRACK }
sub formatType   { RPS::File::Sale::FORMAT_STREAM }
sub currencyCode { 'USD' }

sub _isValidSaleRecord {
    my $self = shift;

    # The line is valid if it has units.
    #
    my $units = $self->units;
    if ($units) {

        # Let's make sure we have some kind of identifier.
        if ( $self->isrc || $self->trackName ) {
            return 1;
        } else {
            $self->fail("Missing Track Name and ISRC");
        }
    }

    return;
}

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