1 package SL::Controller::TopQuickSearch::Contact;
4 use parent qw(SL::Controller::TopQuickSearch::Base);
6 use SL::Controller::CustomerVendor;
8 use SL::DBUtils qw(selectfirst_array_query like);
9 use SL::Locale::String qw(t8);
11 sub auth { 'customer_vendor_edit' }
13 sub name { 'contact' }
15 sub description_config { t8('Contact') }
17 sub description_field { t8('Contacts') }
19 sub query_autocomplete {
22 my $result = SL::DB::Manager::Contact->get_all(
25 cp_name => { ilike => like($::form->{term}) },
26 cp_givenname => { ilike => like($::form->{term}) },
27 cp_email => { ilike => like($::form->{term}) },
29 cp_cv_id => [ \'SELECT id FROM customer UNION SELECT id FROM vendor' ],
37 value => $_->full_name,
38 label => $_->full_name,
44 sub select_autocomplete {
47 my $contact = SL::DB::Manager::Contact->find_by(cp_id => $::form->{id});
49 SL::Controller::CustomerVendor->new->url_for(action => 'edit', id => $contact->cp_cv_id, db => db_for_contact($contact));
55 my $results = $self->query_autocomplete;
58 return SL::Controller::CustomerVendor->new->url_for(
59 controller => 'ct.pl',
60 action => 'list_contacts',
61 'filter.status' => 'active',
62 search_term => $::form->{term},
65 $::form->{id} = $results->[0]{id};
66 return $self->select_autocomplete;
74 my ($customer, $vendor) = selectfirst_array_query($::form, $::form->get_standard_dbh, <<SQL, ($contact->cp_cv_id)x2);
75 SELECT (SELECT COUNT(id) FROM customer WHERE id = ?), (SELECT COUNT(id) FROM vendor WHERE id = ?);
78 die 'Contact is orphaned, cannot link to it' if !$customer && !$vendor;
80 $customer ? 'customer' : 'vendor';