From: ivan Date: Sat, 15 Dec 2001 22:59:35 +0000 (+0000) Subject: style X-Git-Tag: freeside_1_4_0pre11~183 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=b63544b9961e09bfc95908f867993f2c44139b42 style --- diff --git a/httemplate/view/svc_acct.cgi b/httemplate/view/svc_acct.cgi index 23205ece9..7cebdf8da 100755 --- a/httemplate/view/svc_acct.cgi +++ b/httemplate/view/svc_acct.cgi @@ -1,5 +1,5 @@ <% -# +# use strict; use vars qw( $conf $cgi $domain $query $svcnum $svc_acct $cust_svc $pkgnum @@ -29,15 +29,17 @@ $svcnum = $1; $svc_acct = qsearchs('svc_acct',{'svcnum'=>$svcnum}); die "Unknown svcnum" unless $svc_acct; -$cust_svc = qsearchs('cust_svc',{'svcnum'=>$svcnum}); +#false laziness w/all svc_*.cgi +$cust_svc = qsearchs( 'cust_svc' , { 'svcnum' => $svcnum } ); $pkgnum = $cust_svc->getfield('pkgnum'); if ($pkgnum) { - $cust_pkg=qsearchs('cust_pkg',{'pkgnum'=>$pkgnum}); - $custnum=$cust_pkg->getfield('custnum'); + $cust_pkg = qsearchs( 'cust_pkg', { 'pkgnum' => $pkgnum } ); + $custnum = $cust_pkg->custnum; } else { $cust_pkg = ''; $custnum = ''; } +#eofalse $part_svc = qsearchs('part_svc',{'svcpart'=> $cust_svc->svcpart } ); die "Unknown svcpart" unless $part_svc;