diff options
| author | ivan <ivan> | 2010-07-17 22:14:39 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2010-07-17 22:14:39 +0000 |
| commit | 7ea90f150b44ffc2ef906a34d49a244d6da7dba5 (patch) | |
| tree | 6d4ffd5552f68d1f3b05df7c81b25f2b7aa4a5ed | |
| parent | a98cd4637716d783c20bb08d903978d06abf9d31 (diff) | |
customer tags, RT#9192
| -rw-r--r-- | FS/FS/UI/Web/small_custview.pm | 22 | ||||
| -rwxr-xr-x | httemplate/view/cust_main.cgi | 17 |
2 files changed, 38 insertions, 1 deletions
diff --git a/FS/FS/UI/Web/small_custview.pm b/FS/FS/UI/Web/small_custview.pm index f8e202092..36dd30c6d 100644 --- a/FS/FS/UI/Web/small_custview.pm +++ b/FS/FS/UI/Web/small_custview.pm @@ -3,6 +3,7 @@ package FS::UI::Web::small_custview; use strict; use vars qw(@EXPORT_OK @ISA); use Exporter; +use HTML::Entities; use FS::Msgcat; use FS::Record qw(qsearchs); use FS::cust_main; @@ -35,7 +36,26 @@ sub small_custview { $html .= 'Customer #<B>'. $cust_main->display_custnum. '</B></A>'. ' - <B><FONT COLOR="#'. $cust_main->statuscolor. '">'. - ucfirst($cust_main->status). '</FONT></B>'. + ucfirst($cust_main->status). '</FONT></B>'; + + my @part_tag = $cust_main->part_tag; + if ( @part_tag ) { + $html .= '<TABLE>'; + foreach my $part_tag ( @part_tag ) { + $html .= '<TR><TD>'. + '<FONT '. ( length($part_tag->tagcolor) + ? 'STYLE="background-color:#'.$part_tag->tagcolor.'"' + : '' + ). + '>'. + encode_entities($part_tag->tagname.': '. $part_tag->tagdesc). + '</FONT>'. + '</TD></TR>'; + } + $html .= '</TABLE>'; + } + + $html .= ntable('#e8e8e8'). '<TR><TD VALIGN="top">'. ntable("#cccccc",2). '<TR><TD ALIGN="right" VALIGN="top">Billing<BR>Address</TD><TD BGCOLOR="#ffffff">'. $cust_main->getfield('last'). ', '. $cust_main->first. '<BR>'; diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi index e9d3f07a9..d854a01fa 100755 --- a/httemplate/view/cust_main.cgi +++ b/httemplate/view/cust_main.cgi @@ -4,6 +4,23 @@ }) %> <BR> +% my @part_tag = $cust_main->part_tag; +% if ( $conf->config('cust_tag-location') eq 'top' && @part_tag ) { +<TABLE STYLE="margin-bottom:8px" CELLSPACING=2> +% foreach my $part_tag ( @part_tag ) { +<TR> + <TD> + <FONT SIZE="+1" + <% length($part_tag->tagcolor) + ? 'STYLE="background-color:#'.$part_tag->tagcolor.'"' + : '' + %>><% $part_tag->tagname.': '. $part_tag->tagdesc |h %></FONT> + <BR> + </TD> +</TR> +% } +</TABLE> +% } <% include('/elements/menubar.html', { 'newstyle' => 1, |