oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed a table name.

Browse source
This commit is contained in:
Matthew Wilson 2006-04-16 01:29:51 +00:00
parent 43ec03c6c0
commit b6f0e9e75c
4 changed files with 8 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/SQL/ResultSet.pm
View file

@ -117,6 +117,7 @@ sub execute {
my $self = shift;
my $placeholders = shift || [];
my $sql = $self->{_sql};
$self->db->session->errorHandler->query($sql,$placeholders);
$self->sth->execute(@{ $placeholders }) or $self->db->session->errorHandler->fatal("Couldn't execute prepared statement: $sql : With place holders: ".join(", ", @{$placeholders}).". Root cause: ". $self->errorMessage);
}
@ -203,7 +204,6 @@ sub prepare {
my $class = shift;
my $sql = shift;
my $db = shift;
$db->session->errorHandler->query($sql);
my $sth = $db->dbh->prepare($sql) or $db->session->errorHandler->fatal("Couldn't prepare statement: ".$sql." : ". $db->dbh->errstr);
bless {_sth => $sth, _sql => $sql, _db=>$db}, $class;
}
@ -292,7 +292,7 @@ sub unconditionalRead {
my $sql = shift;
my $db = shift;
my $placeholders = shift;
$db->session->errorHandler->query($sql);
$db->session->errorHandler->query($sql,$placeholders);
my $sth = $db->dbh->prepare($sql) or $db->session->errorHandler->warn("Unconditional read failed: ".$sql." : ".$db->dbh->errstr);
if ($sth) {
$sth->execute(@$placeholders) or $db->session->errorHandler->warn("Unconditional read failed: ".$sql." : ".$sth->errstr);