X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fsearch%2Fsvc_acct.cgi;h=dba5ac302e42dac9e3ce0a014fdceff46c36c6aa;hp=bd89d768fb44d982676287fcf746e4aee59c3b84;hb=8a8c9386cbd3383b0134aae8e32b5995f8886fb2;hpb=8c7396531e6bf6f7c6cc4e5d19e2d381442223c5
diff --git a/httemplate/search/svc_acct.cgi b/httemplate/search/svc_acct.cgi
index bd89d768f..dba5ac302 100755
--- a/httemplate/search/svc_acct.cgi
+++ b/httemplate/search/svc_acct.cgi
@@ -1,5 +1,5 @@
<%
-#
+#
use strict;
use vars qw( $cgi @svc_acct $sortby $query );
@@ -64,6 +64,7 @@ if ( scalar(@svc_acct) == 1 ) {
Service # |
Username |
+ Domain |
UID |
Service |
Customer # |
@@ -81,6 +82,8 @@ END
or die "No cust_svc record for svcnum ". $svc_acct->svcnum;
my $part_svc = qsearchs('part_svc', { 'svcpart' => $cust_svc->svcpart })
or die "No part_svc record for svcpart ". $cust_svc->svcpart;
+ my $svc_domain = qsearchs('svc_domain', { 'svcnum' => $svc_acct->domsvc })
+ or die "No svc_domain record for domsvc ". $cust_svc->domsvc;
my($cust_pkg,$cust_main);
if ( $cust_svc->pkgnum ) {
$cust_pkg = qsearchs('cust_pkg', { 'pkgnum' => $cust_svc->pkgnum })
@@ -88,9 +91,10 @@ END
$cust_main = qsearchs('cust_main', { 'custnum' => $cust_pkg->custnum })
or die "No cust_main record for custnum ". $cust_pkg->custnum;
}
- my($svcnum,$username,$uid,$svc,$custnum,$last,$first,$company)=(
+ my($svcnum,$username,$domain,$uid,$svc,$custnum,$last,$first,$company)=(
$svc_acct->svcnum,
$svc_acct->getfield('username'),
+ $svc_domain->getfield('domain'),
$svc_acct->getfield('uid'),
$part_svc->svc,
$cust_svc->pkgnum ? $cust_main->custnum : '',
@@ -108,6 +112,7 @@ END
$svcnum |
$username |
+ $domain |
$uid |
$svc
| $pcustnum
|