X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FUI%2FWeb%2Fsmall_custview.pm;h=ae0a4211bda1b46b4686948590429e0e019fb701;hb=3d0a1bb06b895c5be6e3f0517d355442a6b1e125;hp=36dd30c6dfc621d920b4922f6e2113aa7640072f;hpb=fb4ab1073f0d15d660c6cdc4e07afebf68ef3924;p=freeside.git
diff --git a/FS/FS/UI/Web/small_custview.pm b/FS/FS/UI/Web/small_custview.pm
index 36dd30c6d..ae0a4211b 100644
--- a/FS/FS/UI/Web/small_custview.pm
+++ b/FS/FS/UI/Web/small_custview.pm
@@ -29,7 +29,7 @@ sub small_custview {
: qsearchs('cust_main', { 'custnum' => $arg } )
or die "unknown custnum $arg";
- my $html;
+ my $html = '
';
$html = qq!View
'
if $url;
@@ -58,12 +58,13 @@ sub small_custview {
$html .=
ntable('#e8e8e8'). ''. ntable("#cccccc",2).
' |
Billing Address | '.
- $cust_main->getfield('last'). ', '. $cust_main->first. ' ';
+ encode_entities($cust_main->getfield('last')). ', '.
+ encode_entities($cust_main->first). ' ';
- $html .= $cust_main->company. ' ' if $cust_main->company;
- $html .= $cust_main->address1. ' ';
- $html .= $cust_main->address2. ' ' if $cust_main->address2;
- $html .= $cust_main->city. ', '. $cust_main->state. ' '. $cust_main->zip. ' ';
+ $html .= encode_entities($cust_main->company). ' ' if $cust_main->company;
+ $html .= encode_entities($cust_main->address1). ' ';
+ $html .= encode_entities($cust_main->address2). ' ' if $cust_main->address2;
+ $html .= encode_entities($cust_main->city). ', '. $cust_main->state. ' '. $cust_main->zip. ' ';
$html .= $cust_main->country. ' '
if $cust_main->country && $cust_main->country ne $countrydefault;
@@ -82,45 +83,23 @@ sub small_custview {
$html .= ' |
';
- if ( defined $cust_main->dbdef_table->column('ship_last') ) {
-
- my $pre = $cust_main->ship_last ? 'ship_' : '';
-
- $html .= ''. ntable("#cccccc",2).
- ' | Service Address | '.
- $cust_main->get("${pre}last"). ', '.
- $cust_main->get("${pre}first"). ' ';
- $html .= $cust_main->get("${pre}company"). ' '
- if $cust_main->get("${pre}company");
- $html .= $cust_main->get("${pre}address1"). ' ';
- $html .= $cust_main->get("${pre}address2"). ' '
- if $cust_main->get("${pre}address2");
- $html .= $cust_main->get("${pre}city"). ', '.
- $cust_main->get("${pre}state"). ' '.
- $cust_main->get("${pre}zip"). ' ';
- $html .= $cust_main->get("${pre}country"). ' '
- if $cust_main->get("${pre}country")
- && $cust_main->get("${pre}country") ne $countrydefault;
-
- $html .= ' |
| ';
-
- 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").
- ' '. ( 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 .= ' Fax '. $cust_main->get("${pre}fax");
- }
+ my $ship = $cust_main->ship_location;
- $html .= ' |
';
- }
+ $html .= '
'. ntable("#cccccc",2).
+ ' | Service Address | ';
+ $html .= join(' ',
+ map encode_entities($_), grep $_,
+ $cust_main->contact,
+ $cust_main->company,
+ $ship->address1,
+ $ship->address2,
+ ($ship->city . ', ' . $ship->state . ' ' . $ship->zip),
+ ($ship->country eq $countrydefault ? '' : $ship->country ),
+ );
+
+ # ship phone numbers no longer exist...
+
+ $html .= ' |
';
$html .= '';
@@ -129,6 +108,8 @@ sub small_custview {
# last payment might be good here too?
+ $html .= '
';
+
$html;
}