+ Fix mssql version bug
This commit is contained in:
parent
387a9e3f73
commit
5880e09d72
|
@ -262,18 +262,23 @@ sub fetchrow_hashref {
|
||||||
|
|
||||||
sub query {
|
sub query {
|
||||||
my ($self, %options) = @_;
|
my ($self, %options) = @_;
|
||||||
|
my $continue_error = defined($options{continue_error}) && $options{continue_error} == 1 ? 1 : 0;
|
||||||
|
|
||||||
$self->{statement_handle} = $self->{instance}->prepare($options{query});
|
$self->{statement_handle} = $self->{instance}->prepare($options{query});
|
||||||
if (!defined($self->{statement_handle})) {
|
if (!defined($self->{statement_handle})) {
|
||||||
|
return 1 if ($continue_error == 1);
|
||||||
$self->{output}->add_option_msg(short_msg => "Cannot execute query: " . $self->{instance}->errstr);
|
$self->{output}->add_option_msg(short_msg => "Cannot execute query: " . $self->{instance}->errstr);
|
||||||
$self->{output}->option_exit(exit_litteral => $self->{sql_errors_exit});
|
$self->{output}->option_exit(exit_litteral => $self->{sql_errors_exit});
|
||||||
}
|
}
|
||||||
|
|
||||||
my $rv = $self->{statement_handle}->execute;
|
my $rv = $self->{statement_handle}->execute;
|
||||||
if (!$rv) {
|
if (!$rv) {
|
||||||
|
return 1 if ($continue_error == 1);
|
||||||
$self->{output}->add_option_msg(short_msg => "Cannot execute query: " . $self->{statement_handle}->errstr);
|
$self->{output}->add_option_msg(short_msg => "Cannot execute query: " . $self->{statement_handle}->errstr);
|
||||||
$self->{output}->option_exit(exit_litteral => $self->{sql_errors_exit});
|
$self->{output}->option_exit(exit_litteral => $self->{sql_errors_exit});
|
||||||
}
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
|
@ -31,7 +31,7 @@ sub set_version {
|
||||||
$self->{version} = $self->{instance}->get_info(18); # SQL_DBMS_VER
|
$self->{version} = $self->{instance}->get_info(18); # SQL_DBMS_VER
|
||||||
return if (defined($self->{version}) && $self->{version} ne '');
|
return if (defined($self->{version}) && $self->{version} ne '');
|
||||||
|
|
||||||
$self->query(query => q{select SERVERPROPERTY('productversion') as product_version});
|
return if ($self->query(query => q{select SERVERPROPERTY('productversion') as product_version}, continue_error => 1) == 1);
|
||||||
my $row = $self->fetchrow_hashref();
|
my $row = $self->fetchrow_hashref();
|
||||||
$self->{version} = $row->{product_version};
|
$self->{version} = $row->{product_version};
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue