From 8cbe016ac2c28cd209c48f053f361573368e7988 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 13 Dec 2011 05:09:32 +0000
Subject: add latitude/longitude to prospects, customers and package locations,
 RT#15539

---
 FS/FS/cust_location.pm | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'FS/FS/cust_location.pm')

diff --git a/FS/FS/cust_location.pm b/FS/FS/cust_location.pm
index 7ffa5ed..a3d5bcb 100644
--- a/FS/FS/cust_location.pm
+++ b/FS/FS/cust_location.pm
@@ -135,6 +135,9 @@ sub check {
     || $self->ut_textn('state')
     || $self->ut_country('country')
     || $self->ut_zip('zip', $self->country)
+    || $self->ut_coordn('latitude')
+    || $self->ut_coordn('longitude')
+    || $self->ut_enum('coord_auto', [ '', 'Y' ])
     || $self->ut_alphan('location_type')
     || $self->ut_textn('location_number')
     || $self->ut_enum('location_kind', [ '', 'R', 'B' ] )
@@ -142,6 +145,9 @@ sub check {
   ;
   return $error if $error;
 
+  $self->set_coord
+    unless $self->latitude && $self->longitude;
+
   return "No prospect or customer!" unless $self->prospectnum || $self->custnum;
   return "Prospect and customer!"       if $self->prospectnum && $self->custnum;
 
-- 
cgit v1.1