X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Fcust_main%2Fcontacts.html;h=83a6380264b1437b8e4f835de3f7a26c5c1aacde;hp=a86c35cdd76834fa143ecefcb3350d43cec7ac41;hb=747949f05c140e23221b3a2364928431f58fc2d3;hpb=b5c4237a34aef94976bc343c8d9e138664fc3984 diff --git a/httemplate/view/cust_main/contacts.html b/httemplate/view/cust_main/contacts.html index a86c35cdd..83a638026 100644 --- a/httemplate/view/cust_main/contacts.html +++ b/httemplate/view/cust_main/contacts.html @@ -1,110 +1,188 @@ -% my %which = ( -% '' => 'Billing', -% 'ship_' => 'Service', -% ); -% foreach my $which ( '', 'ship_' ) { -% my $pre = $cust_main->get("${which}last") ? $which : ''; - -<% $which{$which} %> address -<% ntable("#cccccc") %><% ntable("#cccccc",2) %> - - Contact name - - <% $cust_main->get("${pre}last"). ', '. $cust_main->get("${pre}first") |h %> - -% if ( $which eq '' && $conf->exists('show_ss') ) { - SS# - <% $cust_main->masked('ss') || ' ' %> -% } - - - Company - <% $cust_main->get("${pre}company") |h %> - - - Address - <% $cust_main->get("${pre}address1") |h %> - +% my %addr_label = ('bill' => 'Billing address', 'ship' => 'Service address'); -% if ( $cust_main->get("${pre}address2") ) { -% my $address2_label = -% ( $conf->exists('cust_main-require_address2') -% && ! ( $pre xor $cust_main->has_ship_address ) -% ) -% ? 'Unit #' -% : ' '; +%# Locations (possibly break this out) +% my @which = ('bill', 'ship'); +% while (@which) { +% my $this = shift @which; +% my $method = $this.'_location'; +% my $location = $cust_main->$method; +<% mt( $addr_label{$this} ) |h %> +% if ( $this eq 'ship' and +% $cust_main->bill_locationnum == $cust_main->ship_locationnum ) +% { + (<% mt('same as billing') %>) +% } + +% if ( +% ($this eq 'ship') +% && $cust_main->invoice_ship_address +% && !$conf->exists('invoice-ship_address') #it's always on, so hide per-cust config +% ) { +(<% emt('included on invoices') %>) +% } + +% if ( $this eq 'bill' ) { +% #billing contact fields + + + +% if ( $conf->exists('show_ss') ) { + + +% } + +% if ( $conf->exists('cust_main-enable_spouse') and +% ($cust_main->spouse_last or $cust_main->spouse_first) ) { + + + + +% } +% if ( $conf->exists('cust-email-high-visibility') ) { + + + + +% } +% if ( $cust_main->company ) { - - + + +% } +% } elsif ( $this eq 'ship' ) { +% if ( $cust_main->ship_company ) { # mostly obsolete these days... + + + + +% } +% } -% } + +% if ( $location ) { # now the actual address + +% if ( $location->locationname ) { + + + + +% } - - -% if ( $cust_main->get("${pre}county") ) { - - -% } - - - - + + + +% if ( $location->get('address2') ) { +% my $address2_label = $conf->exists('cust_main-require_address2') +% ? emt('Unit #') +% : ' '; + - - + + + +% } + - - + + - - + + + +% if ( $location->latitude && $location->longitude ) { + <& /elements/tr-coords.html, $location->latitude, + $location->longitude, + $cust_main->name_short, + $cust_main->agentnum, + &> +% } +<& /elements/tr-censustract.html, $location &> + +% } + +% if ( $this eq 'bill' ) { +% # billing contact phone numbers +% foreach my $phone (qw(daytime night mobile)) { +% next if !$cust_main->get($phone); - - + -% if ( $which eq '' && $conf->exists('show_stateid') ) { + +% } #foreach $phone +% if ( $cust_main->get('fax') ) { + + + + + +% } +% +% if ( $conf->exists('show_stateid') ) { + + - + - + -% } -
<% mt('Contact name') |h %><% $cust_main->contact |h %><% mt('SS#') |h %><% $conf->exists('unmask_ss') + ? $cust_main->ss + : $cust_main->masked('ss') || ' ' %>
<% mt('Spouse') |h %> + <% join(', ', grep $_, + $cust_main->spouse_last, $cust_main->spouse_first) %> +
<% mt('Email address(es)') |h %> + <% $cust_main->invoicing_list_emailonly_scalar || $no %> +
<% $address2_label %><% $cust_main->get("${pre}address2") |h %><% mt('Company') |h %><% $cust_main->company |h %>
<% mt('Company') |h %><% $cust_main->ship_company |h %>
<% mt('Location ID') |h %><% $location->locationname |h %>
City<% $cust_main->get("${pre}city") |h %>County<% $cust_main->get("${pre}county") |h %>State<% state_label( $cust_main->get("${pre}state"), $cust_main->get("${pre}country") ) |h %>Zip<% $cust_main->get("${pre}zip") %><% mt('Address') |h %><% $location->address1 |h %>
Country<% code2country( $cust_main->get("${pre}country") ) %><% $address2_label %><% $location->address2 |h %>
<% $daytime_label %> - <% include('/elements/phonenumber.html', - $cust_main->get("${pre}daytime"), - 'callable'=>1 - ) - %> - <% $location->city |h %>\ +% if ( $location->county ) { + (<% $location->county |h %> county)\ +% } +,<% state_label( $location->state, $location->country ) |h %> + <% $location->zip %> +
<% $night_label %> - <% include('/elements/phonenumber.html', - $cust_main->get("${pre}night"), - 'callable'=>1 - ) - %> - <% code2country( $location->country ) %>
Fax - <% $cust_main->get("${pre}fax") || ' ' %> + <% $phone_label{$phone} %> + <& /elements/phonenumber.html, + $cust_main->get($phone), + callable => 1, + calling_list_exempt => $cust_main->calling_list_exempt, + &>
<% mt('Fax') |h %> + <% $cust_main->get('fax') || ' ' %> +
<% $stateid_label %><% $cust_main->masked('stateid') || ' ' %><% $cust_main->masked('stateid') || ' ' %> <% $stateid_state_label %><% $cust_main->stateid_state || ' ' %><% $cust_main->stateid_state || ' ' %>
-% if ( $which ne 'ship_' ) { + +% } +% } #if $this eq 'bill' + +% if ( @which ) {
% } -% } -<% include('contacts_new.html', $cust_main) %> +% } #while @which <%once> -my $daytime_label = FS::Msgcat::_gettext('daytime') =~ /^(daytime)?$/ - ? 'Day Phone' - : FS::Msgcat::_gettext('daytime'); -my $night_label = FS::Msgcat::_gettext('night') =~ /^(night)?$/ - ? 'Night Phone' - : FS::Msgcat::_gettext('night'); +my %phone_label = ( + + 'daytime' => ( FS::Msgcat::_gettext('daytime') =~ /^(daytime)?$/ + ? 'Day Phone' + : FS::Msgcat::_gettext('daytime') + ), + + 'night' => ( FS::Msgcat::_gettext('night') =~ /^(night)?$/ + ? 'Night Phone' + : FS::Msgcat::_gettext('night') + ), + + 'mobile' => ( FS::Msgcat::_gettext('mobile') =~ /^(mobile)?$/ + ? 'Mobile Phone' + : FS::Msgcat::_gettext('Mobile') + ), +); + my $stateid_label = FS::Msgcat::_gettext('stateid') =~ /^(stateid)?$/ ? 'Driver’s License' : FS::Msgcat::_gettext('stateid'); @@ -115,8 +193,10 @@ my $stateid_state_label = FS::Msgcat::_gettext('stateid_state') =~ /^(stateid_st <%init> -my( $cust_main ) = @_; +my $cust_main = shift; my $conf = new FS::Conf; +my @invoicing_list = $cust_main->invoicing_list; +my $no = emt('no');