1 <% include('/elements/header.html', 'Tax Report' ) %>
3 <FORM ACTION="report_tax.cgi" METHOD="GET">
7 % if ( $conf->config('tax-report_groups') ) {
8 % my @lines = $conf->config('tax-report_groups');
11 <TD ALIGN="right">Tax group</TD>
13 <SELECT NAME="report_group">
15 <OPTION VALUE="">all</OPTION>
17 % foreach my $line ( @lines ) {
18 % $line =~ /^\s*(.+)\s+(=|!=)\s+(.*)\s*$/ #or next;
19 % or do { warn "bad report_group line: $line\n"; next; };
20 % my($label, $op, $value) = ($1, $2, $3);
22 <OPTION VALUE="<% "$op $value" %>"><% $label %></OPTION>
31 <% include( '/elements/tr-select-agent.html', 'disable_empty'=>0 ) %>
33 <% include( '/elements/tr-input-beginning_ending.html' ) %>
37 <TD ALIGN="right"><INPUT TYPE="checkbox" NAME="show_cities" VALUE="1" onclick="toggle_show_cities(this)"></TD>
41 <TD ALIGN="right"><INPUT TYPE="checkbox" NAME="show_districts" VALUE="1" DISABLED></TD>
42 <TD>Show districts</TD>
44 <SCRIPT TYPE="text/javascript">
45 function toggle_show_cities() {
46 what = document.getElementsByName('show_cities')[0];
47 what.form.show_districts.disabled = !what.checked;
48 what.form.show_districts.checked = what.checked;
54 % if ( $conf->exists('enable_taxclasses') ) {
56 <TD ALIGN="right"><INPUT TYPE="checkbox" NAME="show_taxclasses" VALUE="1"></TD>
57 <TD>Show tax classes</TD>
61 % my @pkg_class = qsearch('pkg_class', {});
64 <TD ALIGN="right"><INPUT TYPE="checkbox" NAME="show_pkgclasses" VALUE="1"></TD>
65 <TD>Show package classes</TD>
71 <BR><INPUT TYPE="submit" VALUE="Get Report">
75 <% include('/elements/footer.html') %>
79 unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
81 my $conf = new FS::Conf;
83 my $city_sql = "SELECT COUNT(*) FROM cust_main_county
84 WHERE city != '' AND city IS NOT NULL
87 my $city_sth = dbh->prepare($city_sql) or die dbh->errstr;
88 $city_sth->execute or die $city_sth->errstr;
89 my $city = $city_sth->fetchrow_arrayref->[0];