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

fixed: Bad message if database link for SQL Report doesn't exist

Browse source
This commit is contained in:
Graham Knop 2008-03-24 09:43:47 +00:00
parent 5bc3ebfd43
commit ee59ef42e9
2 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

1
docs/changelog/7.x.x.txt
View file

@ -16,6 +16,7 @@
- fixed: Able to cut or trash system assets
- fixed: Can't purge uncommitted assets if not using its version tag
- fixed: DataForm will create fields with duplicate names but doesn't use them separately
- fixed: Bad message if database link for SQL Report doesn't exist
7.5.7
- fixed: HttpProxy mixes original site's content encoding with WebGUI's

9
lib/WebGUI/Asset/Wobject/SQLReport.pm
View file

@ -591,9 +591,12 @@ sub _processQuery {
my $i18n = WebGUI::International->new($self->session,"Asset_SQLReport");
push(@{$self->{_debug_loop}},{'debug.output'=>$i18n->get(17).$query});
push(@{$self->{_debug_loop}},{'debug.output'=>$i18n->get('debug placeholder parameters').join(",",@$placeholderParams)});
my $dbLink = WebGUI::DatabaseLink->new($self->session,$self->{_query}{$nr}{databaseLinkId})
|| return $self->session->errorHandler->error("Could not find database link '".$self->{_query}{$nr}{databaseLinkId}."'. Has it been created?");
my $dbLink = WebGUI::DatabaseLink->new($self->session,$self->{_query}{$nr}{databaseLinkId});
if (!$dbLink) {
$self->session->errorHandler->error("Could not find database link '".$self->{_query}{$nr}{databaseLinkId}."'. Has it been created?");
push @{$self->{_debug_loop}}, { 'debug.output' => 'Could not find database link'};
return \%var;
}
my $dbh = $dbLink->db;
if (defined $dbh) {
if ($dbLink->queryIsAllowed($query)) {