% if ( $conf->exists('show_ss') && !$pre ) { % } elsif ( !$pre ) { % } % if ( $conf->exists('cust-email-high-visibility') && !$pre ) { % } % unless ( $conf->exists('cust-edit-alt-field-order') ) { #standard order <& company &> <& location &> <& phones &> <& fax &> % } else { #alternate field order <& phones &> <& location &> <& fax &> <& company &> % } % if ( $conf->exists('show_stateid') && !$pre ) { % } elsif ( !$pre ) { % }

<%$r%><% mt('Contact name (last, first)') |h %>	<%$style%>> , <%$style%>>							<% mt('SS#') |h %>
<% $conf->exists('cust_main-require_invoicing_list_email', $agentnum) ? $r : '' %>Email address(es)
<% $stateid_label %>	<%$style%>>	<% $stateid_state_label %>	<& /elements/select-state.html, 'state' => $cust_main->stateid_state, 'country' => $cust_main->country, 'prefix' => 'stateid_', 'onchange' => $onchange, 'disabled' => $disabled, 'style' => \@style, &>

<%$r%><% mt('required fields') |h %>
<%def company> % my $display = ($cust_main->residential_commercial eq 'Commercial') % ? '' : 'none'; <% mt('Company') |h %> <%$style%>> <%def location> <& /elements/location.html, 'prefix' => $pre, 'object' => $cust_main, 'onchange' => $onchange, 'disabled' => $disabled, 'style' => \@style, 'same_checked' => $opt{'same_checked'}, 'geocode' => $opt{'geocode'}, 'censustract' => $opt{'censustract'}, &> <%def phones> <& /elements/tr-cust_main-phones.html, 'prefix' => $pre, 'cust_main' => $cust_main, 'onchange' => $onchange, 'disabled' => $disabled, 'style' => $style, &> <%def fax> <% mt('Fax') |h %> <%$style%>> <%once> my $r = qq!* !; <%shared> my( %opt, $cust_main, $pre, $onchange, $disabled, @style, $style ); <%init> %opt = @_; $cust_main = $opt{'cust_main'}; $pre = $opt{'pre'}; $onchange = $opt{'onchange'}; $disabled = $opt{'disabled'}; @style = ( $opt{'style'} ? @{ $opt{'style'} } : () ); $style = scalar(@style) ? 'STYLE="'. join(';', @style). '"' : ''; my $conf = new FS::Conf; foreach (qw(ss stateid)) { $opt{$_} = $cust_main->masked($_) unless exists $opt{$_}; } #false laziness with ship state my $countrydefault = $conf->config('countrydefault') || 'US'; $cust_main->set($pre.'country', $countrydefault ) unless $cust_main->get($pre.'country'); my $statedefault = $conf->config('statedefault') || ($countrydefault eq 'US' ? 'CA' : ''); $cust_main->set($pre.'state', $statedefault ) unless $cust_main->get($pre.'state') || $cust_main->get($pre.'country') ne $countrydefault; $cust_main->set('stateid_state', $cust_main->state ) unless $pre || $cust_main->get('stateid_state'); $opt{geocode} ||= $cust_main->get('geocode'); $opt{censustract} ||= $cust_main->censustract; my $stateid_label = FS::Msgcat::_gettext('stateid') =~ /^(stateid)?$/ ? 'Driver’s License' : FS::Msgcat::_gettext('stateid') || 'Driver’s License'; my $stateid_state_label = FS::Msgcat::_gettext('stateid_state') =~ /^(stateid_state)?$/ ? 'Driver’s License State' : FS::Msgcat::_gettext('stateid_state') || 'Driver’s License State'; my @invoicing_list = $cust_main->invoicing_list; my $agentnum = $cust_main->agentnum if $cust_main->custnum;