summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMark Wells <mark@freeside.biz>2013-11-07 13:32:23 -0800
committerMark Wells <mark@freeside.biz>2013-11-07 13:32:23 -0800
commit4d1b604424473c32ea06449ed9d5fb29fe4ec3da (patch)
tree75db65988151ea2017ecb79f1efa0739fbbab86b
parentb620cc47491a792f3205dc4a833df20a5584f5a5 (diff)
censustract upgrade should skip prospect locations, #25660
-rw-r--r--FS/FS/cust_main/Location.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/FS/FS/cust_main/Location.pm b/FS/FS/cust_main/Location.pm
index 6b707b1eb..52fe313c6 100644
--- a/FS/FS/cust_main/Location.pm
+++ b/FS/FS/cust_main/Location.pm
@@ -301,6 +301,7 @@ sub _upgrade_data {
qsearch('cust_location', { 'censustract' => '' })
) {
my $custnum = $cust_location->custnum;
+ next if !$custnum; # avoid doing this for prospect locations
my $address1 = $cust_location->address1;
# find the last history record that had that address
my $last_h = qsearchs({