From: ivan <ivan>
Date: Thu, 19 Jan 2012 01:20:30 +0000 (+0000)
Subject: fix error in svc_broadband, RT#16137
X-Git-Tag: freeside_2_3_1~8
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=a1d44174ae0b33e000bd341d859198c74f2c02c4

fix error in svc_broadband, RT#16137
---

diff --git a/httemplate/edit/svc_broadband.cgi b/httemplate/edit/svc_broadband.cgi
index b9e2fd2d9..074af3db6 100644
--- a/httemplate/edit/svc_broadband.cgi
+++ b/httemplate/edit/svc_broadband.cgi
@@ -167,6 +167,13 @@ my $svc_edit_callback = sub {
 my $field_callback = sub {
   my ($cgi, $object, $fieldref) = @_;
 
+  unless ( $part_svc ) {
+    my $svcpart = $object->svcnum ? $object->cust_svc->svcpart;
+                    : $cgi->param('svcpart');
+    $part_svc = qsearchs( 'part_svc', { svcpart => $svcpart } );
+    die "No part_svc entry for svcpart $svcpart!" unless $part_svc;
+  }
+
   my $columndef = $part_svc->part_svc_column($fieldref->{'field'});
   if ($columndef->columnflag eq 'F') {
     $fieldref->{'type'} = length($columndef->columnvalue)