package Distribution::DB::Item::GenreServiceMap;
use strict;
use lib '/app/tools/common/lib';
use Common::DB::Item;
use Common::DB::ItemCollection;
use Common::Assert;

use base 'Common::DB::Item';

use constant kTable => 'genre_service_map';
use constant kDB    => Common::DB::Item::kCommonDB;

sub GetNewGenreName {
    my ( $class, %args ) = @_;
    my $dbo = Common::RSApp::GetCommonDB();

    assert( $args{service_id} );
    assert( $args{genre_id} );

    my $sql =
        "SELECT genre_name  FROM "
      . kTable
      . " WHERE service_id = "
      . $dbo->DBQuote( $args{service_id} )
      . " AND genre_id = "
      . $dbo->DBQuote( $args{genre_id} );

    Common::Log::Debug("QUERY: $sql");

    my $sth = $dbo->DoCmd($sql);
    my ($genre_name) = $sth->fetchrow_array();

    return $genre_name;
}

sub DeleteByServiceID {
    my ( $class, $serviceID ) = @_;
    assert($class);
    assert($serviceID);

    my $sql = "DELETE FROM " . kTable . " WHERE service_id=$serviceID";

    my $dbo = Common::RSApp::GetCommonDB();
    $dbo->DoCmd($sql);
}

1;