Lines 435-441
sub GetMember {
Link Here
|
435 |
} |
435 |
} |
436 |
$debug && warn $select, " ",values %information; |
436 |
$debug && warn $select, " ",values %information; |
437 |
my $sth = $dbh->prepare("$select"); |
437 |
my $sth = $dbh->prepare("$select"); |
438 |
$sth->execute(map{$information{$_}} keys %information); |
438 |
$sth->execute(@values); |
439 |
my $data = $sth->fetchall_arrayref({}); |
439 |
my $data = $sth->fetchall_arrayref({}); |
440 |
#FIXME interface to this routine now allows generation of a result set |
440 |
#FIXME interface to this routine now allows generation of a result set |
441 |
#so whole array should be returned but bowhere in the current code expects this |
441 |
#so whole array should be returned but bowhere in the current code expects this |