X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Fsql.html;h=54d6c2d798cc5e6652c92e4b8f63a1be3db8149b;hb=793956b8a0c19d7d39103e94235b0ca13f0f3e84;hp=e61ce1538cf151be9ae91a3653889b399cb13573;hpb=ef7bb336cc67f127fb1d77532ad3da1369c0ae36;p=freeside.git

diff --git a/httemplate/search/sql.html b/httemplate/search/sql.html
index e61ce1538..54d6c2d79 100644
--- a/httemplate/search/sql.html
+++ b/httemplate/search/sql.html
@@ -1,8 +1,18 @@
-<%= include( '/elements/header', 'Query Results',
-               include( '/elements/menubar', 'Main Menu' => $p )
-%>
-<%= include( 'elements/search.html',
-               'name' => 'rows',
-             
-%>
+<& elements/search.html,
+               'title' => 'Query Results',
+               'name'  => 'rows',
+               'query' => "SELECT $sql",
+               'count_query' => $count,          
+&>
+<%init>
 
+die "access denied"
+  unless $FS::CurrentUser::CurrentUser->access_right('Raw SQL');
+
+my $sql = $cgi->param('sql') or errorpage('Empty query');
+$sql =~ s/;+\s*$//; #remove trailing ;
+
+my $count = $sql;
+$count =~ s/.* FROM /SELECT COUNT(*) FROM /i;
+
+</%init>