X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Freport_tax.cgi;h=410fe46039135f45403deb9bf554a23afba81021;hb=41fc6d0a8aa5921638ac2767265a7528855a5251;hp=a98d36f3c50d7f3ce6904e88a456dd64ca027797;hpb=1238858779262e56f45aef69d33b54052407c7f7;p=freeside.git diff --git a/httemplate/search/report_tax.cgi b/httemplate/search/report_tax.cgi old mode 100755 new mode 100644 index a98d36f3c..410fe4603 --- a/httemplate/search/report_tax.cgi +++ b/httemplate/search/report_tax.cgi @@ -1,168 +1,382 @@ - -<% - -my $user = getotaker; - -$cgi->param('beginning') =~ /^([ 0-9\-\/]{0,10})$/; -my $pbeginning = $1; -my $beginning = $1 ? str2time($1) : 0; - -$cgi->param('ending') =~ /^([ 0-9\-\/]{0,10})$/; -my $pending = $1; -my $ending = ( $1 ? str2time($1) : 4294880896 ) + 86399; - -my($total, $exempt, $taxable, $tax) = ( 0, 0, 0, 0 ); -my $out = 'Out of taxable region(s)'; -my %regions; -foreach my $r ( - qsearch('cust_main_county', {}, '', - "WHERE 0 < ( SELECT COUNT(*) FROM cust_main - WHERE ( cust_main.county = cust_main_county.county - OR cust_main_county.county = '' - OR cust_main_county.county IS NULL ) - AND ( cust_main.state = cust_main_county.state - OR cust_main_county.state = '' - OR cust_main_county.state IS NULL ) - AND ( cust_main.country = cust_main_county.country ) - LIMIT 1 - )" - ) -) { - #warn $r->county. ' '. $r->state. ' '. $r->country. "\n"; - my $label; - if ( $r->tax == 0 ) { - $label = $out; - } elsif ( $r->taxname ) { - $label = $r->taxname; - } else { - $label = $r->country; - $label = $r->state.", $label" if $r->state; - $label = $r->county." county, $label" if $r->county; - } +<& /elements/header.html, $report->title &> +