diff options
author | ivan <ivan> | 2004-06-10 12:31:32 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-06-10 12:31:32 +0000 |
commit | 3913f6d159b5b8110061690b7c97642c27abf7eb (patch) | |
tree | a5bc48080901dfe6c19c864c2c2f374990a2cfdd /FS/FS/CGI.pm | |
parent | e0c62c388f74e543328f3691e8a8a1edb451a804 (diff) |
agent interface
Diffstat (limited to 'FS/FS/CGI.pm')
-rw-r--r-- | FS/FS/CGI.pm | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/FS/FS/CGI.pm b/FS/FS/CGI.pm index a328629..1ddc62c 100644 --- a/FS/FS/CGI.pm +++ b/FS/FS/CGI.pm @@ -294,6 +294,8 @@ sub small_custview { or die "unknown custnum $arg"; my $html = 'Customer #<B>'. $cust_main->custnum. '</B>'. + ' - <B><FONT COLOR="'. $cust_main->statuscolor. '">'. + ucfirst($cust_main->status). '</FONT></B>'. ntable('#e8e8e8'). '<TR><TD>'. ntable("#cccccc",2). '<TR><TD ALIGN="right" VALIGN="top">Billing<BR>Address</TD><TD BGCOLOR="#ffffff">'. $cust_main->getfield('last'). ', '. $cust_main->first. '<BR>'; @@ -305,6 +307,20 @@ sub small_custview { $html .= $cust_main->country. '<BR>' if $cust_main->country && $cust_main->country ne $countrydefault; + $html .= '</TD></TR><TR><TD></TD><TD BGCOLOR="#ffffff">'; + if ( $cust_main->daytime && $cust_main->night ) { + use FS::Msgcat; + $html .= ( FS::Msgcat::_gettext('daytime') || 'Day' ). + ' '. $cust_main->daytime. + '<BR>'. ( FS::Msgcat::_gettext('night') || 'Night' ). + ' '. $cust_main->night; + } elsif ( $cust_main->daytime || $cust_main->night ) { + $html .= $cust_main->daytime || $cust_main->night; + } + if ( $cust_main->fax ) { + $html .= '<BR>Fax '. $cust_main->fax; + } + $html .= '</TD></TR></TABLE></TD>'; if ( defined $cust_main->dbdef_table->column('ship_last') ) { @@ -327,6 +343,23 @@ sub small_custview { if $cust_main->get("${pre}country") && $cust_main->get("${pre}country") ne $countrydefault; + $html .= '</TD></TR><TR><TD></TD><TD BGCOLOR="#ffffff">'; + + if ( $cust_main->get("${pre}daytime") && $cust_main->get("${pre}night") ) { + use FS::Msgcat; + $html .= ( FS::Msgcat::_gettext('daytime') || 'Day' ). + ' '. $cust_main->get("${pre}daytime"). + '<BR>'. ( FS::Msgcat::_gettext('night') || 'Night' ). + ' '. $cust_main->get("${pre}night"); + } elsif ( $cust_main->get("${pre}daytime") + || $cust_main->get("${pre}night") ) { + $html .= $cust_main->get("${pre}daytime") + || $cust_main->get("${pre}night"); + } + if ( $cust_main->get("${pre}fax") ) { + $html .= '<BR>Fax '. $cust_main->get("${pre}fax"); + } + $html .= '</TD></TR></TABLE></TD>'; } |