diff options
author | jeff <jeff> | 2006-10-25 03:12:10 +0000 |
---|---|---|
committer | jeff <jeff> | 2006-10-25 03:12:10 +0000 |
commit | 40b1272a7b98f8a3d2f5252c2997c77de4526ef1 (patch) | |
tree | a1f72675e480619e6c73b92bce5b54038dd03235 /httemplate/view/svc_www.cgi | |
parent | c84d872fdca241d798cc988b44c63d5ac0ea8ead (diff) |
no usersvc svc_www tweak
Diffstat (limited to 'httemplate/view/svc_www.cgi')
-rw-r--r-- | httemplate/view/svc_www.cgi | 22 |
1 files changed, 14 insertions, 8 deletions
diff --git a/httemplate/view/svc_www.cgi b/httemplate/view/svc_www.cgi index f2be5c717..f499a3fb5 100644 --- a/httemplate/view/svc_www.cgi +++ b/httemplate/view/svc_www.cgi @@ -20,6 +20,9 @@ %} %#eofalse % +%my $part_svc=qsearchs('part_svc',{'svcpart'=>$cust_svc->svcpart}) +% or die "svc_www: Unknown svcpart" . $cust_svc->svcpart; + %my $usersvc = $svc_www->usersvc; %my $svc_acct = ''; %my $email = ''; @@ -48,17 +51,20 @@ % qq!<TR><TD ALIGN="right">Service number</TD>!. % qq!<TD BGCOLOR="#ffffff">$svcnum</TD></TR>!. % qq!<TR><TD ALIGN="right">Website name</TD>!. -% qq!<TD BGCOLOR="#ffffff"><A HREF="http://$www">$www<A></TD></TR>!. -% qq!<TR><TD ALIGN="right">Account</TD>!. +% qq!<TD BGCOLOR="#ffffff"><A HREF="http://$www">$www<A></TD></TR>!; +%if ( $part_svc->part_svc_column('usersvc')->columnflag ne 'F' +% || $part_svc->part_svc_column('usersvc')->columnvalue !~ /^\s*$/) { +% print qq!<TR><TD ALIGN="right">Account</TD>!. % qq!<TD BGCOLOR="#ffffff">!; % -%if ( $usersvc ) { -% print qq!<A HREF="${p}view/svc_acct.cgi?$usersvc">$email</A>!; -%} else { -% print '</i>(none)</i>'; -%} +% if ( $usersvc ) { +% print qq!<A HREF="${p}view/svc_acct.cgi?$usersvc">$email</A>!; +% } else { +% print '</i>(none)</i>'; +% } % -%print '</TD></TR>'; +% print '</TD></TR>'; +%} % %foreach (sort { $a cmp $b } $svc_www->virtual_fields) { % print $svc_www->pvf($_)->widget('HTML', 'view', $svc_www->getfield($_)), |