Example:
include( '/elements/location.html',
- 'object' => $cust_main, # or $cust_location
- 'prefix' => $pre, #only for cust_main objects
+ 'object' => $cust_location
+ 'prefix' => $pre, # prefixed to form field names
'onchange' => $javascript,
- 'disabled' => $disabled,
- 'same_checked' => $same_checked,
'geocode' => $geocode, #passed through
'censustract' => $censustract, #passed through
'no_asterisks' => 0, #set true to disable the red asterisks next
#to required fields
'address1_label' => 'Address', #label for address
+ 'enable_coords' => 1, #show latitude/longitude fields
+ 'enable_district' => 1, #show tax district field
+ 'enable_censustract' => 1, #show censustract field
+
)
</%doc>
+<SCRIPT SRC="<% $fsurl %>elements/jquery.deserialize.min.js"></SCRIPT>
+<SCRIPT SRC="<% $fsurl %>elements/polyfill.js"></SCRIPT>
+
% if ( $opt{'alt_format'} ) {
<TR>
- <<%$th%> ALIGN="right">Location kind</<%$th%>>
+ <<%$th%> ALIGN="right">Location kind</<%$th%>>
<TD>
<% include('/elements/select.html',
'cgi' => $cgi,
'field' => 'location_kind',
'id' => 'location_kind',
'disabled' => $disabled,
- 'style' => \@style,
+ #'style' => \@style,
'options' => \@location_kind_options,
'labels' => $location_kind_labels,
'curr_value' => scalar($cgi->param('location_kind'))
- || $object->get($pre.'location_kind'),
+ || $object->get('location_kind'),
)
%>
</TD>
% }
+% if ( $label_prefix eq '_location' ) {
+
+ <TR>
+ <TH ALIGN="right" ><% $opt{'locationname_label'} || emt('Location ID') %></TD>
+ <TD COLSPAN=7>
+ <INPUT TYPE = "text"
+ NAME = "<%$pre%>locationname"
+ ID = "<%$pre%>locationname"
+ VALUE = "<% $object->get('locationname') |h %>"
+ SIZE = 24
+ onChange = "<% $onchange %>"
+ <% $disabled %>
+ <% $style %>
+ >
+ </TD>
+ </TR>
+
+% } else {
+ <& hidden.html, field => $pre.'locationname', value => $object->get('locationname') &>
+
+% }
+
<TR>
- <<%$th%> ALIGN="right"><%$r%><% $opt{'address1_label'} || 'Address' %></<%$th%>>
+ <<%$th%> STYLE="width:16ex" ALIGN="right"><%$r%><% $opt{'address1_label'} || emt('Address') %></<%$th%>>
<TD COLSPAN=7>
<INPUT TYPE = "text"
NAME = "<%$pre%>address1"
ID = "<%$pre%>address1"
- VALUE = "<% $object->get($pre.'address1') |h %>"
+ VALUE = "<% $object->get('address1') |h %>"
SIZE = 54
onChange = "<% $onchange %>"
<% $disabled %>
% if ( ! $opt{'alt_format'} ) { #regular format
<TR>
- <TD ALIGN="right"><FONT ID="<% $pre %>address2_required" color="#ff0000" <% $address2_label_style %>>*</FONT> <FONT ID="<% $pre %>address2_label" <% $address2_label_style %>><B>Unit #</B></FONT></TD>
+ <TH ALIGN="right"><FONT ID="<% $pre %>address2_required" color="#ff0000" <% $address2_label_style %>>*</FONT> <FONT ID="<% $pre %>address2_label" <% $address2_label_style %>><B>Unit #</B></FONT></TD>
<TD COLSPAN=7>
<INPUT TYPE = "text"
NAME = "<%$pre%>address2"
ID = "<%$pre%>address2"
- VALUE = "<% $object->get($pre.'address2') |h %>"
+ VALUE = "<% $object->get('address2') |h %>"
SIZE = 54
onChange = "<% $onchange %>"
<% $disabled %>
% } else { # alternate format
- <INPUT TYPE = "hidden"
- NAME = "<%$pre%>address2"
- VALUE = "<% $object->get($pre.'address2') |h %>"
- >
+<& hidden.html, field => $pre.'address2', value => $object->get('address2') &>
<TR>
- <<%$th%> ALIGN="right">Unit type and #</<%$th%>>
+ <<%$th%> ALIGN="right">Unit type and #</<%$th%>>
<TD COLSPAN=7>
% my $location_type = scalar($cgi->param('location_type'))
-% || $object->get($pre.'location_type');
+% || $object->get('location_type');
% #my $location_number = scalar($cgi->param('location_number'))
% # || $object->get($pre.'location_number');
%
'field' => 'location_type',
'id' => 'location_type',
'disabled' => $disabled,
- 'style' => \@style,
+ #'style' => \@style,
'options' => [ keys %location_types ],
'labels' => \%location_types,
'curr_value' => $location_type,
<INPUT TYPE="text"
NAME = "location_number"
ID = "location_number"
- VALUE = "<% scalar($cgi->param('location_number')) || $object->get($pre.'location_number') |h %>"
+ VALUE = "<% scalar($cgi->param('location_number')) || $object->get('location_number') |h %>"
SIZE = "5"
<% $disabled || ($location_type ? '' : 'DISABLED') %>
<% $style %>
>
-% if ( $object->get($pre.'address2') ) {
-
-% #XXX try to parse first
-% if ( 0 ) {
-% } else {
- Can't parse unit type and number from <B><% $object->get($pre.'address2') |h %></B>
-% }
-
-% }
+% #XXX i don't work so well when the dropdown is changed :/ i probably need to be triggered by "default service address"
+% $alt_err =~ s/(ship_)?address2/'<B>'.encode_entities($object->get($1.'address2')).'<\/B>'/e;
+ <% $alt_err %>
</TD>
<TR>
- <<%$th%> ALIGN="right"><%$r%>City</<%$th%>>
- <TD WIDTH="1"><% include('/elements/city.html', %select_hash) %></TD>
- <<%$th%> ALIGN="right" ID="<%$pre%>countylabel" <%$county_style%>><%$r%>County</<%$th%>>
- <TD><% include('/elements/select-county.html', %select_hash ) %></TD>
- <<%$th%> ALIGN="right" WIDTH="1"><%$r%>State</<%$th%>>
+ <<%$th%> ALIGN="right">
+% unless ($conf->exists('cust_main-no_city_in_address')) {
+ <% $r %><% mt('City') |h %>
+% }
+ </<%$th%>>
+ <TD WIDTH="1"><% include('/elements/city.html', %select_hash, 'text_style' => \@style ) %></TD>
+ <<%$th%> ALIGN="right" WIDTH="1" ID="<%$pre%>countylabel" <%$county_style%>><%$r%>County</<%$th%>>
+ <TD WIDTH="1"><% include('/elements/select-county.html', %select_hash ) %></TD>
+ <<%$th%> ALIGN="right" WIDTH="1"><%$r%><% mt('State') |h %></<%$th%>>
<TD WIDTH="1">
<% include('/elements/select-state.html', %select_hash ) %>
</TD>
- <<%$th%>><%$r%>Zip</<%$th%>>
+ <<%$th%> ALIGN="right" WIDTH="1"><%$r%><% mt('Zip') |h %></<%$th%>>
<TD>
<INPUT TYPE = "text"
NAME = "<%$pre%>zip"
ID = "<%$pre%>zip"
- VALUE = "<% $object->get($pre.'zip') |h %>"
- SIZE = 10
+ VALUE = "<% $object->get('zip') |h %>"
+ SIZE = 11
onChange = "<% $onchange %>"
<% $disabled %>
<% $style %>
</TR>
<TR>
- <<%$th%> ALIGN="right"><%$r%>Country</<%$th%>>
+ <<%$th%> ALIGN="right"><%$r%><% mt('Country') |h %></<%$th%>>
<TD COLSPAN=6><% include('/elements/select-country.html', %select_hash ) %></TD>
</TR>
-% if ( !$pre ) {
- <INPUT TYPE="hidden" NAME="geocode" VALUE="<% $opt{geocode} %>">
+% if ( $opt{enable_coords} ) {
+<TR>
+ <TH ALIGN="right"><% mt('Latitude') |h %></TD>
+ <TD COLSPAN=7>
+ <INPUT TYPE = "text"
+ NAME = "<%$pre%>latitude"
+ ID = "<%$pre%>latitude"
+ VALUE = "<% $object->get('latitude') |h %>"
+ <% $disabled %>
+ <% $style %>
+ >
+ <FONT SIZE="-1" COLOR="#666666"><% mt('Longitude') |h %></FONT>
+ <INPUT TYPE = "text"
+ NAME = "<%$pre%>longitude"
+ ID = "<%$pre%>longitude"
+ VALUE = "<% $object->get('longitude') |h %>"
+ <% $disabled %>
+ <% $style %>
+ >
+ </TD>
+</TR>
% } else {
-% if ( $pre eq 'ship_' && $conf->exists('cust_main-require_censustract') ) {
- <TR><<%$th%> ALIGN="right">Census tract<BR>(automatic)</<%$th%>>
- <TD>
- <INPUT TYPE="text" NAME="censustract" VALUE="<% $opt{censustract} %>">
- </TD>
- </TR>
-% } else {
- <INPUT TYPE="hidden" NAME="censustract" VALUE="<% $opt{censustract} %>">
-% }
-% }
+% foreach (qw(latitude longitude)) {
+<& hidden.html, field => $pre.$_, value => $object->get($_) &>
+% }
+% }
+%
+% foreach (qw(coord_auto geocode censustract censusyear)) {
+ <& hidden.html, field => $pre.$_, value => $object->get($_) &>
+% }
+%
+% if ( $opt{enable_censustract} ) {
+<TR>
+ <TH ALIGN="right">Census tract</TD>
+ <TD COLSPAN=8>
+ <INPUT TYPE="text" SIZE=15
+ ID="<% $pre %>enter_censustract"
+ NAME="<% $pre %>enter_censustract"
+ VALUE="<% $object->censustract |h %>">
+ <FONT SIZE="-1" COLOR="#333333"><% '(automatic)' %></FONT>
+ </TD>
+</TR>
+% }
+% if ( $opt{enable_district} and $conf->config('tax_district_method') ) {
+ <TR>
+ <TD ALIGN="right">Tax district</TD>
+ <TD COLSPAN=8>
+ <INPUT TYPE="text" SIZE=15
+ NAME="<%$pre%>district"
+ ID="<%$pre%>district"
+ VALUE="<% $object->district |h %>">
+ <% '(automatic)' %>
+ </TD>
+ </TR>
+% } else {
+ <& hidden.html, field => $pre.'district', value => $object->get('district') &>
+% }
+
+%# For address standardization:
+%# keep a clean copy of the address so we know if we need
+%# to re-standardize
+% foreach (qw(locationname address1 city state country zip latitude
+% longitude censustract district addr_clean
+% ) ) {
+<& hidden.html, field => 'old_'.$pre.$_, value => $object->get($_) &>
+% }
+%# Placeholders
+<& hidden.html, field => $pre.'cachenum', value => '' &>
+<& hidden.html, field => $pre.'addr_clean', value => $object->get('addr_clean') &>
+
+<SCRIPT TYPE="text/javascript">
+// XXX some of this should go away after address standardization changes...
+<&| /elements/onload.js &>
+ var clear_coords_ids = [
+ '<%$pre%>latitude',
+ '<%$pre%>longitude',
+ '<%$pre%>enter_censustract',
+ '<%$pre%>censustract',
+ '<%$pre%>district'
+ ];
+ function clear_coords() {
+ for (var i=0; i < clear_coords_ids.length; i++) {
+ var el = document.getElementById(clear_coords_ids[i]);
+ if ( el ) {
+ el.value = '';
+ }
+ }
+ }
+ var clear_coords_on_change = [
+ '<%$pre%>address1',
+ '<%$pre%>address2',
+ <% $conf->exists('cust_main-no_city_in_address') ? '' : qq('${pre}city',) %>
+ '<%$pre%>state',
+ '<%$pre%>zip',
+ '<%$pre%>country'
+ ];
+ for (var i=0; i < clear_coords_on_change.length; i++) {
+ var el = document.getElementById(clear_coords_on_change[i]);
+ if ( el.addEventListener ) {
+ el.addEventListener('change', clear_coords);
+ } else if ( el.attachEvent ) {
+ el.attachEvent('onchange', clear_coords);
+ }
+ }
+ function clear_censustract() {
+ // if the user manually edits the census tract, clear the 'hard' census
+ // tract field so that we can re-verify and present a confirmation popup
+
+ // get the ID of the hidden censustract field
+ var censustract_id = this.id.replace('enter_', '');
+ var el = document.getElementById(censustract_id);
+ if (el) {
+ el.value = '';
+ }
+ }
+ var el = document.getElementById('<%$pre%>enter_censustract');
+ if (el) {
+ if ( el.addEventListener ) {
+ el.addEventListener('change', clear_censustract);
+ } else if ( el.attachEvent ) {
+ el.attachEvent('onchange', clear_censustract);
+ }
+ }
+
+</&>
+
+% if (! $m->notes('location_js') ) {
+% $m->notes('location_js', 1);
+
+function Location(fieldset, prefix) {
+ if ( typeof fieldset == 'String' ) {
+ fieldset = $('#' + fieldset);
+ }
+ this.fieldset = $(fieldset);
+ this.prefix = prefix || '';
+
+ var errorbox = document.createElement('DIV');
+ errorbox.className = 'error';
+ fieldset.append(errorbox); // after the <table>
+ $(errorbox).position({
+ my: 'left',
+ at: 'right+20px',
+ of: fieldset
+ });
+ this.errorbox = $(errorbox); // so we can find it
+
+ var img_tick = $('<IMG SRC="<% $fsurl %>images/tick.png">');
+ var img_wait = $('<IMG SRC="<% $fsurl %>images/wait-orange.gif">');
+
+ if ( $('#' + prefix + 'addr_clean').prop('value') ) {
+ $(errorbox).append(img_tick);
+ }
+
+ // get/set the serialized (URL parameter string) contents of the form fields
+ this.value = function(newvalue) {
+ if (newvalue) {
+ try {
+ this.fieldset.deserialize(newvalue);
+ this.errorbox.empty();
+ if ( newvalue['error'] ) {
+ this.errorbox.text(newvalue['error']);
+ } else {
+ this.errorbox.append(img_tick);
+ }
+ } catch(err) {
+ console.log("Couldn't parse returned data:\n" + newvalue);
+ // show an error also
+ }
+ }
+ return this.fieldset.serialize();
+ };
+
+ // send a standardization request and push the result into this.value()
+ this.standardize = function(callback) {
+ this.errorbox.empty();
+ this.errorbox.append(img_wait);
+ $.ajax({
+ type: 'POST',
+ url: '<% $fsurl %>misc/address_standardize.cgi',
+ success: this.value.bind(this),
+ data: this.value()
+ });
+ };
+
+ var location_change_timer;
+
+ // check if required fields are filled, and if so, wait 2 seconds, then
+ // call "standardize"
+ var standardize_if_ready = function( ev ) {
+ // pull the location object back out
+ var loc = ev.data;
+
+ if ( location_change_timer ) {
+ console.log("reset timer...");
+ window.clearTimeout(location_change_timer);
+ }
+
+ // require address1 and either (zip) or (city and state)
+ // before trying to standardize
+ var ready =
+ $('#' + loc.prefix + 'address1').val()
+ && (
+ ( $('#' + loc.prefix + 'city').val()
+ && $('#' + loc.prefix + 'state').val()
+ )
+ || $('#' + loc.prefix + 'zip').val()
+ )
+ ;
+
+ if ( ready ) {
+ console.log("start timer...");
+ location_change_timer = window.setTimeout( loc.standardize.bind(loc),
+ 2000 );
+ }
+ };
+
+ // event handler; the Location object is passed in event.data
+ var location_changed = standardize_if_ready;
+
+ // bind only to the fields that are used in standardization
+ // (so that it's possible to manually edit coords, etc.)
+ var onchange_fields =
+ [ 'address1', 'address2', 'city', 'state', 'zip', 'country' ];
+ for ( var i = 0; i < onchange_fields.length; i++ ) {
+ $('#' + prefix + onchange_fields[i]).on('change', this, location_changed);
+ }
+}
+
+% }
+</SCRIPT>
<%init>
my $onchange = $opt{'onchange'};
my $disabled = $opt{'disabled'};
-my $conf = new FS::Conf;
-
my $r = $opt{'no_asterisks'} ? '' : qq!<font color="#ff0000">*</font> !;
-#false laziness with ship state
+my $conf = new FS::Conf;
my $countrydefault = $conf->config('countrydefault') || 'US';
-$object->set($pre.'country', $countrydefault )
- unless $object->get($pre.'country');
+my $statedefault = $conf->config('statedefault')
+ || ($countrydefault eq 'US' ? 'CA' : '');
+my $label_prefix = $conf->config('cust_location-label_prefix');
+
+$object ||= FS::cust_location->new({
+ 'country' => $countrydefault,
+ 'state' => $statedefault,
+});
-my $statedefault = $conf->config('statedefault')
- || ($countrydefault eq 'US' ? 'CA' : '');
-$object->set($pre.'state', $statedefault )
- unless $object->get($pre.'state')
- || $object->get($pre.'country') ne $countrydefault;
+my $alt_err = ($opt{'alt_format'} && !$disabled) ? $object->alternize : '';
my @style = ();
push @style, 'background-color: #dddddd' if $disabled;
|| ! $conf->exists('cust_main-require_address2')
|| ( !$pre && !$opt{'same_checked'} );
-my @counties = counties( $object->get($pre.'state'),
- $object->get($pre.'country'),
+my @counties = counties( $object->get('state'),
+ $object->get('country'),
);
my @county_style = ();
push @county_style, 'display:none' # 'visibility:hidden'
: '';
my %select_hash = (
- 'city' => $object->get($pre.'city'),
- 'county' => $object->get($pre.'county'),
- 'state' => $object->get($pre.'state'),
- 'country' => $object->get($pre.'country'),
+ 'city' => $object->get('city'),
+ 'county' => $object->get('county'),
+ 'state' => $object->get('state'),
+ 'country' => $object->get('country'),
'prefix' => $pre,
'onchange' => $onchange,
'disabled' => $disabled,
- 'style' => \@style,
+ #'style' => \@style,
);
my $th = $opt{'no_bold'} ? 'TD' : 'TH';