diff options
-rw-r--r-- | httemplate/elements/menu.html | 2 | ||||
-rw-r--r-- | httemplate/search/report_sql.html | 23 |
2 files changed, 25 insertions, 0 deletions
diff --git a/httemplate/elements/menu.html b/httemplate/elements/menu.html index 0c74746b7..047671ae5 100644 --- a/httemplate/elements/menu.html +++ b/httemplate/elements/menu.html @@ -213,6 +213,8 @@ $report_menu{'Billing events'} = [ \%report_bill_event, 'Billing events' ] if $curuser->access_right('Billing event reports'); $report_menu{'Financial'} = [ \%report_financial, 'Financial reports' ] if $curuser->access_right('Financial reports'); +$report_menu{'SQL Query'} = [ $fsurl.'search/report_sql.html', 'SQL Query' ] + if $curuser->access_right('Raw SQL'); tie my %tools_importing, 'Tie::IxHash', 'Import customers from CSV file' => [ $fsurl.'misc/cust_main-import.cgi', '' ], diff --git a/httemplate/search/report_sql.html b/httemplate/search/report_sql.html new file mode 100644 index 000000000..995330894 --- /dev/null +++ b/httemplate/search/report_sql.html @@ -0,0 +1,23 @@ +<% include('/elements/header.html', 'SQL Query' ) %> + +<FORM ACTION="sql.html" METHOD="GET"> + +<TABLE BGCOLOR="#cccccc" CELLSPACING=0> + <TR> + <TD ALIGN="right" VALIGN="top">SELECT </TD> + <TD><TEXTAREA NAME="sql"></TEXTAREA></TD> + </TR> +</TABLE> + +<BR> +<INPUT TYPE="submit" VALUE="Query"> + +</FORM> + +<% include('/elements/footer.html') %> +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Raw SQL'); + +</%init> |