X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/766f5705ecb9cd56adfbffd94c871959bb64c6fd..fa7fc7eeb3ca718914affee06c0629a08d571288:/SL/Controller/CustomerVendor.pm diff --git a/SL/Controller/CustomerVendor.pm b/SL/Controller/CustomerVendor.pm index f59fd07b5..af109e967 100644 --- a/SL/Controller/CustomerVendor.pm +++ b/SL/Controller/CustomerVendor.pm @@ -551,6 +551,8 @@ sub action_ajaj_customer_autocomplete { $::form->{column} ? ($::form->{column} => $query) : (or => [ customernumber => $query, name => $query ]) ); + push @filter, (or => [ obsolete => undef, obsolete => 0 ]) if !$::form->{obsolete}; + my $customers = SL::DB::Manager::Customer->get_all(query => [ @filter ], limit => $limit); my $value_col = $::form->{column} || 'name'; @@ -878,4 +880,15 @@ sub normalize_name { $self->{cv}->name($name); } +sub home_address_for_google_maps { + my ($self) = @_; + + my $address = $::instance_conf->get_address // ''; + $address =~ s{^\s+|\s+$|\r+}{}g; + $address =~ s{\n+}{,}g; + $address =~ s{\s+}{ }g; + + return $address; +} + 1;