X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Felements%2Ftr-select-cust_location.html;h=1e6cf5b7f9a2593745de7a72158c672bb3f80aa9;hp=1399240d9d0c907bbdb28b16295d4477e5b987a2;hb=569f676f4a06512a46120e12edc6a6410e93ff93;hpb=5f52339b62764ad59fa3e010fad8979dfc3d66ce diff --git a/httemplate/elements/tr-select-cust_location.html b/httemplate/elements/tr-select-cust_location.html index 1399240d9..1e6cf5b7f 100644 --- a/httemplate/elements/tr-select-cust_location.html +++ b/httemplate/elements/tr-select-cust_location.html @@ -2,25 +2,23 @@ Example: - include('/elements/tr-select-cust_location.html', - 'cgi' => $cgi, + <& /elements/tr-select-cust_location.html, + 'cgi' => $cgi, - 'cust_main' => $cust_main, - #or - 'prospect_main' => $prospect_main, + 'cust_main' => $cust_main, + #or + 'prospect_main' => $prospect_main, - #optional - 'empty_label' => '(default service address)', - 'disable_empty' => 0, #1 to disable - ) + #optional + 'empty_label' => '(default service address)', + &> -<% include('/elements/xmlhttp.html', - 'url' => $p.'misc/location.cgi', - 'subs' => [ 'get_location' ], - ) -%> +<& /elements/xmlhttp.html, + 'url' => $p.'misc/location.cgi', + 'subs' => [ 'get_location' ], +&> - <<%$th%> ALIGN="right"><% $opt{'label'} || 'Service location' %>> + <<%$th%> ALIGN="right"><% $opt{'label'} || emt('Service location') %>> - + + <& /elements/select-cust_location.html, + %opt, + 'curr_value' => $locationnum, + 'cust_location' => \@cust_location, + 'onchange' => 'locationnum_changed(this);', + &> + -<% include('/elements/location.html', - 'object' => $cust_location, - #'onchange' ? probably not - 'disabled' => $disabled, - 'no_asterisks' => 1, - 'no_bold' => $opt{'no_bold'}, - 'alt_format' => $opt{'alt_format'}, - ) -%> +<& /elements/location.html, + 'object' => $cust_location, + #'onchange' ? probably not + 'disabled' => $disabled, + 'no_asterisks' => 1, + 'no_bold' => $opt{'no_bold'}, + 'alt_format' => $opt{'alt_format'}, + 'enable_coords' => 1, + 'enable_censustract' => 1, + 'enable_district' => $conf->exists('tax_district_method') ? 1 : 0, +&> + + <%init> @@ -243,8 +232,7 @@ my $cgi = $opt{'cgi'}; my $cust_pkg = $opt{'cust_pkg'}; my $cust_main = $opt{'cust_main'}; my $prospect_main = $opt{'prospect_main'}; - -my $prefix = ($cust_main && length($cust_main->ship_last)) ? 'ship_' : ''; +die "cust_main or prospect_main required" unless $cust_main or $prospect_main; my $locationnum = ''; if ( $cgi->param('error') ) { @@ -256,9 +244,9 @@ if ( $cgi->param('error') ) { } elsif ($prospect_main) { my @cust_location = $prospect_main->cust_location; $locationnum = $cust_location[0]->locationnum if scalar(@cust_location)==1; - } else { #? + } else { #$cust_main $cgi->param('locationnum') =~ /^(\-?\d*)$/ or die "illegal locationnum"; - $locationnum = $1; + $locationnum = $1 || $cust_main->ship_locationnum; } } @@ -267,12 +255,12 @@ if ( $cgi->param('error') ) { my $editable = $cust_main ? 0 : 1; #could use explicit control my $addnew = $cust_main ? 1 : ( $locationnum>0 ? 0 : 1 ); -my @location_fields = qw( address1 address2 city county state zip country ); +my @location_fields = FS::cust_main->location_fields; if ( $opt{'alt_format'} ) { push @location_fields, qw( location_type location_number location_kind ); } -my $cust_location; +my $cust_location; #the one that shows by default in the location edit space if ( $locationnum && $locationnum > 0 ) { $cust_location = qsearchs('cust_location', { 'locationnum' => $locationnum } ) or die "unknown locationnum"; @@ -285,18 +273,24 @@ if ( $locationnum && $locationnum > 0 ) { $cust_location->$_( $pkg_location->$_ ) foreach @location_fields; $opt{'empty_label'} ||= 'package address: '.$pkg_location->line; } elsif ( $cust_main ) { - $cust_location->$_( $cust_main->get($prefix.$_) ) foreach @location_fields; + $cust_location = $cust_main->ship_location; #I think } } +$cust_location->coord_auto('Y'); + my $location_sort = sub { + #enabled w/label_prefix _location # $a->locationname cmp $b->locationname + # or $a->country cmp $b->country + or lc($a->state) cmp lc($b->state) or lc($a->city) cmp lc($b->city) + or lc($a->county) cmp lc($b->county) or lc($a->address1) cmp lc($b->address1) or lc($a->address2) cmp lc($b->address2) }; -my @cust_location = (); +my @cust_location; push @cust_location, $cust_main->cust_location if $cust_main; push @cust_location, $prospect_main->cust_location if $prospect_main; push @cust_location, $cust_location @@ -306,14 +300,14 @@ push @cust_location, $cust_location @cust_location = sort $location_sort grep !$_->disabled, @cust_location; $cust_location = $cust_location[0] - if ( $prospect_main || $opt{'disable_empty'} ) + if $prospect_main && !$opt{'is_optional'} && @cust_location; my $disabled = ( $locationnum < 0 || ( $editable && $locationnum ) - || ( ( $prospect_main || $opt{'disable_empty'} ) + || ( $prospect_main && !$opt{'is_optional'} && !@cust_location && $addnew ) )