code2country($country). " ($country)";
},
+ #state
sub { my $label = $seen_state{$_[0]->country}->{$_[0]->state}++
? '' : state_label($_[0]->state, $_[0]->country);
$label.$countylinks.$addlink;
},
+ #county
sub { my $label =
$seen_county{$_[0]->country}->{$_[0]->state}->{$_[0]->county}++
? '' : $_[0]->county;
);
},
- sub { $_[0]->city
- ? $_[0]->city. ' '.
+ #city
+ sub {
+ my $r = shift;
+ if ( $r->city ) {
+
+ if ( $r->taxclass ) { #but if it has a taxclass, can't remove
+ $r->city;
+ } else {
+ $r->city. ' '.
remove_link( col => 'city',
label=> 'remove city',
- row => $_[0],
+ row => $r,
cgi => $cgi,
- )
- : '(all) '.
- expand_link( desc => 'Add Cities',
- row => $_[0],
- label => 'add cities',
- cgi => $cgi,
);
+ }
+ } else {
+ '(all) '.
+ expand_link( desc => 'Add Cities',
+ row => $r,
+ label => 'add cities',
+ cgi => $cgi,
+ );
+ }
},
);
if ( $conf->exists('enable_taxclasses') ) {
push @header, qq!Tax class (<A HREF="${p}edit/part_pkg_taxclass.html">add new</A>)!;
push @header2, '(per-package classification)';
- push @fields, sub { $_[0]->taxclass || '(all) '.
- separate_taxclasses_link($_[0], 'Separate Taxclasses').
- 'separate taxclasses</A></FONT>'
- };
+ push @fields, sub {
+ my $r = shift;
+ if ( $r->taxclass ) {
+ $r->taxclass;
+ } else {
+ my $sql = 'SELECT COUNT(*) FROM cust_main_county
+ WHERE country = ? AND state = ? AND county = ?
+ AND city = ? AND taxclass IS NOT NULL';
+ if ( FS::Record->scalar_sql($sql, map $r->$_,
+ qw( country state county city) ) ) {
+ '(none)';
+ } else {
+ '(all) '.
+ separate_taxclasses_link($r, 'Separate Taxclasses').
+ 'separate taxclasses</A></FONT>';
+ }
+ }
+ };
push @color, sub { shift->taxclass ? '000000' : '999999' };
push @links, '';
push @link_onclicks, '';