projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add latitude/longitude to prospects, customers and package locations, RT#15539
[freeside.git]
/
FS
/
FS
/
cust_bill_pkg_tax_location.pm
diff --git
a/FS/FS/cust_bill_pkg_tax_location.pm
b/FS/FS/cust_bill_pkg_tax_location.pm
index
0d3bd3a
..
44dd6e3
100644
(file)
--- a/
FS/FS/cust_bill_pkg_tax_location.pm
+++ b/
FS/FS/cust_bill_pkg_tax_location.pm
@@
-8,6
+8,7
@@
use FS::cust_pkg;
use FS::cust_location;
use FS::cust_bill_pay_pkg;
use FS::cust_credit_bill_pkg;
use FS::cust_location;
use FS::cust_bill_pay_pkg;
use FS::cust_credit_bill_pkg;
+use FS::cust_main_county;
=head1 NAME
=head1 NAME
@@
-161,7
+162,10
@@
sub desc {
map { $cust_location->$_ }
qw( state county city ) # country?
);
map { $cust_location->$_ }
qw( state county city ) # country?
);
- $self->cust_bill_pkg->desc. " ($location)";
+ my $cust_bill_pkg_desc = $self->billpkgnum
+ ? $self->cust_bill_pkg->desc
+ : $self->cust_bill_pkg_desc;
+ "$cust_bill_pkg_desc ($location)";
}
=item owed
}
=item owed
@@
-196,10
+200,21
@@
sub cust_credit_bill_pkg {
);
}
);
}
+sub cust_main_county {
+ my $self = shift;
+ my $result;
+ if ( $self->taxtype eq 'FS::cust_main_county' ) {
+ $result = qsearchs( 'cust_main_county', { 'taxnum' => $self->taxnum } );
+ }
+}
+
=back
=head1 BUGS
=back
=head1 BUGS
+The presense of FS::cust_main_county::delete makes the cust_main_county method
+unreliable
+
=head1 SEE ALSO
L<FS::Record>, schema.html from the base documentation.
=head1 SEE ALSO
L<FS::Record>, schema.html from the base documentation.