<% print header("Edit tax rates", menubar( 'Main Menu' => popurl(2), )); print qq!Error: !, $cgi->param('error'), "" if $cgi->param('error'); print qq!
!, &table(), < Country State County Taxclass
(per-package classification) END if ( dbdef->table('cust_main_county')->column('taxname') ) { print 'Tax name
(printed on invoices)'; } print <Tax Exempt
per
month END if ( dbdef->table('cust_main_county')->column('setuptax') ) { print 'Setup
fee
exempt'; } if ( dbdef->table('cust_main_county')->column('recurtax') ) { print 'Recurring
fee
exempt'; } print ''; foreach my $cust_main_county ( sort { $a->country cmp $b->country or $a->state cmp $b->state or $a->county cmp $b->county } qsearch('cust_main_county',{}) ) { my($hashref)=$cust_main_county->hashref; print < $hashref->{country} END print "{state} ? ' BGCOLOR="#ffffff">'.$hashref->{state} : ' BGCOLOR="#cccccc">(ALL)' , ""; print "{county} ? ' BGCOLOR="#ffffff">'. $hashref->{county} : ' BGCOLOR="#cccccc">(ALL)' , ""; print "{taxclass} ? ' BGCOLOR="#ffffff">'. $hashref->{taxclass} : ' BGCOLOR="#cccccc">(ALL)' , ""; print qq!! if dbdef->table('cust_main_county')->column('taxname'); print qq!
%
!; print qq!
\$
!; print qq!{setuptax} =~ /^Y$/i ? ' CHECKED' : '' ). '>' if dbdef->table('cust_main_county')->column('setuptax'); print qq!{recurtax} =~ /^Y$/i ? ' CHECKED' : '' ). '>' if dbdef->table('cust_main_county')->column('recurtax'); print ''; } print < END %>