From a1d44174ae0b33e000bd341d859198c74f2c02c4 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Thu, 19 Jan 2012 01:20:30 +0000
Subject: [PATCH 1/1] fix error in svc_broadband, RT#16137

---
 httemplate/edit/svc_broadband.cgi | 7 +++++++
 1 file changed, 7 insertions(+)

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)
-- 
2.11.0