projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
fe39cd4
)
fixes to run under the mason strictness
author
ivan
<ivan>
Tue, 9 Nov 2004 07:23:09 +0000
(07:23 +0000)
committer
ivan
<ivan>
Tue, 9 Nov 2004 07:23:09 +0000
(07:23 +0000)
httemplate/search/report_tax.cgi
patch
|
blob
|
history
diff --git
a/httemplate/search/report_tax.cgi
b/httemplate/search/report_tax.cgi
index
aa9ed6f
..
e3d203e
100755
(executable)
--- a/
httemplate/search/report_tax.cgi
+++ b/
httemplate/search/report_tax.cgi
@@
-42,7
+42,7
@@
my $gotcust = "
)
";
)
";
-my($total, $exempt, $taxable, $
tax) = (
0, 0, 0, 0 );
+my($total, $exempt, $taxable, $
owed, $tax) = ( 0,
0, 0, 0, 0 );
my $out = 'Out of taxable region(s)';
my %regions;
foreach my $r (qsearch('cust_main_county', {}, '', $gotcust) ) {
my $out = 'Out of taxable region(s)';
my %regions;
foreach my $r (qsearch('cust_main_county', {}, '', $gotcust) ) {
@@
-153,7
+153,11
@@
push @regions, {
sub getlabel {
my $r = shift;
sub getlabel {
my $r = shift;
+
+ my $label;
if ( $r->tax == 0 ) {
if ( $r->tax == 0 ) {
+ #kludge to avoid "will not stay shared" warning
+ my $out = 'Out of taxable region(s)';
$label = $out;
} elsif ( $r->taxname ) {
$label = $r->taxname;
$label = $out;
} elsif ( $r->taxname ) {
$label = $r->taxname;