From 41f561eb60f8a69d1ce3685e04cfd1e1a8efefad Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 12 Mar 2010 21:29:16 +0000
Subject: finishing e911/svc_phone location, RT#7047

---
 httemplate/edit/elements/svc_Common.html | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'httemplate/edit/elements')

diff --git a/httemplate/edit/elements/svc_Common.html b/httemplate/edit/elements/svc_Common.html
index 1cb1659f4..36950b2c9 100644
--- a/httemplate/edit/elements/svc_Common.html
+++ b/httemplate/edit/elements/svc_Common.html
@@ -101,6 +101,11 @@
                            };
                    }
 
+                   if ( $f->{'field'} eq 'custnum' && $pkgnum ) {
+                     my $cust_pkg = qsearchs('cust_pkg', {'pkgnum' => $pkgnum});
+                     $object->set('custnum', $cust_pkg->custnum);
+                   }
+
                  },
 
                  'html_init' => sub {
-- 
cgit v1.2.1