<%
my( $cust_main, $pre, $onchange, $disabled ) = @_;
my $conf = new FS::Conf;
#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;
#my($county_html, $state_html, $country_html) =
# FS::cust_main_county::regionselector( $cust_main->get($pre.'county'),
# $cust_main->get($pre.'state'),
# $cust_main->get($pre.'country'),
# $pre,
# $onchange,
# $disabled,
# );
my %select_hash = (
'county' => $cust_main->get($pre.'county'),
'state' => $cust_main->get($pre.'state'),
'country' => $cust_main->get($pre.'country'),
'prefix' => $pre,
'onchange' => $onchange,
'disabled' => $disabled,
);
my $daytime_label = FS::Msgcat::_gettext('daytime') || 'Day Phone';
my $night_label = FS::Msgcat::_gettext('night') || 'Night Phone';
my $r = qq!* !;
%>
<%= &ntable("#cccccc") %>
<%=$r%>Contact name
(last, first) |
> ,
>
|
<% if ( $conf->exists('show_ss') && !$pre ) { %>
SS# |
|
<% } elsif ( !$pre ) { %>
|
<% } %>
| Company |
>
|
| <%=$r%>Address |
>
|
| |
>
|
| <%=$r%>City |
>
|
<%=$r%>State |
<%= include('select-county.html', %select_hash ) %>
<%= include('select-state.html', %select_hash ) %>
|
<%=$r%>Zip |
>
|
| <%=$r%>Country |
<%= include('select-country.html', %select_hash ) %> |
| <%= $daytime_label %> |
>
|
| <%= $night_label %> |
>
|
| Fax |
>
|
<%=$r%>required fields