#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::DB::Item::Composer;
use strict;
use warnings;

use lib '/app/tools/common/lib';
use base 'Common::DB::Item';

use constant kTable => 'composer';
use constant kDB => Common::DB::Item::kClientDB();

sub Search
{
    my ($class, %args) = @_;

    my $searchTerm = $args{searchTerm};
    my $limit = $args{limit};

    my $where;

    if ($searchTerm)
    {
        $where = $class->SUPER::SearchSyntax(field => 'name', value => $searchTerm);
    }

    my $sql = 'SELECT * FROM ' . kTable;
    if ($where)
    {
        $sql .= " WHERE $where";
    }

    $sql .= ' ORDER BY name';

    if ($limit)
    {
        $sql .= " LIMIT $limit";
    }

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

    return $class->SUPER::GetAll($sql);
}

1;