- $hashref->{country} |
-END
+ <%= $hashref->{country} %> |
+
+ <%
my $j;
if ( $sup ) {
@@ -54,7 +57,9 @@ END
last if $hashref->{country} ne $regions[$i+$j]->country
|| $hashref->{state} ne $regions[$i+$j]->state
|| $hashref->{tax} != $regions[$i+$j]->tax
- || $hashref->{exempt_amount} != $regions[$i+$j]->exempt_amount;
+ || $hashref->{exempt_amount} != $regions[$i+$j]->exempt_amount
+ || $hashref->{setuptax} ne $regions[$i+$j]->setuptax
+ || $hashref->{recurtax} ne $regions[$i+$j]->recurtax;
}
my $newsup=0;
@@ -72,65 +77,73 @@ END
$j = 1;
}
- print "{state}
+ %>
+
+ | <%=
+ $hashref->{state}
? ' BGCOLOR="#ffffff">'. $hashref->{state}
: qq! BGCOLOR="#cccccc">(ALL) !.
qq!expand country!;
-
- print qq! collapse state! if $j>1;
-
- print " | ";
- }
-
-# $sup=$newsup;
-
- print "{county} ) {
- print ' BGCOLOR="#ffffff">'. $hashref->{county};
- } else {
- print ' BGCOLOR="#cccccc">(ALL)';
- if ( $hashref->{state} ) {
- print qq!!.
- qq!expand state!;
- }
- }
- print " | ";
-
- print "{taxclass} ) {
- print ' BGCOLOR="#ffffff">'. $hashref->{taxclass};
- } else {
- print ' BGCOLOR="#cccccc">(ALL)';
- if ( $enable_taxclasses ) {
- print qq!!.
- qq!expand taxclasses!;
- }
-
- }
- print " | ";
-
- print "{taxname} ) {
- print ' BGCOLOR="#ffffff">'. $hashref->{taxname};
- } else {
- print ' BGCOLOR="#cccccc">Tax';
- }
- print " | ";
-
- print "$hashref->{tax}% | ".
- '$'.
- sprintf("%.2f", $hashref->{exempt_amount} || 0). ' | '.
- '
';
-
-}
-
-print <