my ($self,$params) = @_;
my %tables = (
    origin      => 'tree_origin',
    category    => 'tree_flowering',
    ripe        => 'tree_ripe',
    usage       => 'tree_usage',
);
my $ids;
for my $name (keys %tables) {
    my $value = $params->{$name} or next;
    $ids = $self->search_index_table( $tables{$name}, $value, $ids );
    last unless $ids;
}

##</code><code>##

sub search_index_table {
    my ( $self, $table, $value, $ids ) = @_;

    my $query = "SELECT id FROM $table WHERE name=?";
    if ($ids) {
        my $id_string = join(',', @$ids );
        $query .= " AND id IN ($id_string)";
    }

    my @results;
    my $dbh = $self->{'dbh'};
    my $sth = $dbh->prepare($query);
    $sth->execute($value);
    while ( my ($id) = $sth->fetchrow_array() ) {
        push(@results,$id);
    }
    return (@results ? \@results : undef);
}