172
sub sql_interval {
172
sub sql_interval {
173
my ($self, $interval, $units) = @_;
173
my ($self, $interval, $units) = @_;
174
174
if ($units =~ /YEAR|MONTH/i) {
175
return "INTERVAL " . $self->quote($interval) . " $units";
175
return "NUMTOYMINTERVAL($interval,'$units')";
177
return "NUMTODSINTERVAL($interval,'$units')";
178
sub sql_position {
181
sub sql_position {
492
package Bugzilla::DB::Oracle::st;
495
package Bugzilla::DB::Oracle::st;
493
use base qw(DBD::Oracle::st);
496
use base qw(DBI::st);
495
sub fetchrow_arrayref {
498
sub fetchrow_arrayref {
496
my $self = shift;
499
my $self = shift;
546
return $ref;
549
return $ref;
554
my $row = $self->SUPER::fetch(@_);
556
Bugzilla::DB::Oracle::_fix_arrayref($row);