kivitendo/SL/Controller/TopQuickSearch/DeliveryOrder.pm @ 1b7759ed
| 0c227fb2 | Moritz Bunkus | package SL::Controller::TopQuickSearch::DeliveryOrder;
|
|
use strict;
|
|||
use parent qw(Rose::Object);
|
|||
use SL::Locale::String qw(t8);
|
|||
use SL::DB::DeliveryOrder;
|
|||
use SL::Controller::Helper::GetModels;
|
|||
use SL::Controller::Base;
|
|||
use Rose::Object::MakeMethods::Generic (
|
|||
'scalar --get_set_init' => [ qw(models) ],
|
|||
);
|
|||
# nope. this is only for subclassing
|
|||
sub auth { 'NOT ALLOWED' }
|
|||
sub name { die 'must be overwritten' }
|
|||
sub description_config { die 'must be overwritten' }
|
|||
sub description_field { die 'must be overwritten' }
|
|||
sub type { die 'must be overwritten' }
|
|||
sub cv { die 'must be overwritten' }
|
|||
sub query_autocomplete {
|
|||
my ($self) = @_;
|
|||
my $objects = $self->models->get;
|
|||
[
|
|||
map {
|
|||
value => $_->digest,
|
|||
label => $_->digest,
|
|||
id => $_->id,
|
|||
}, @$objects
|
|||
];
|
|||
}
|
|||
sub select_autocomplete {
|
|||
$_[0]->redirect_to_object($::form->{id});
|
|||
}
|
|||
sub do_search {
|
|||
my ($self) = @_;
|
|||
my $objects = $self->models->get;
|
|||
return !@$objects ? ()
|
|||
: @$objects == 1 ? $self->redirect_to_object($objects->[0]->id)
|
|||
: $self->redirect_to_search($::form->{term});
|
|||
}
|
|||
sub redirect_to_search {
|
|||
SL::Controller::Base->new->url_for(
|
|||
controller => 'do.pl',
|
|||
action => 'orders',
|
|||
type => $_[0]->type,
|
|||
vc => $_[0]->vc,
|
|||
all => $_[1],
|
|||
open => 1,
|
|||
closed => 1,
|
|||
delivered => 1,
|
|||
notdelivered => 1,
|
|||
sortdir => 0,
|
|||
(map {; "l_$_" => 'Y' } qw(donumber transdate cusordnumber reqdate name employee transaction_description)),
|
|||
);
|
|||
}
|
|||
sub redirect_to_object {
|
|||
SL::Controller::Base->new->url_for(
|
|||
controller => 'do.pl',
|
|||
action => 'edit',
|
|||
type => $_[0]->type,
|
|||
vc => $_[0]->vc,
|
|||
id => $_[1],
|
|||
);
|
|||
}
|
|||
sub init_models {
|
|||
my ($self) = @_;
|
|||
SL::Controller::Helper::GetModels->new(
|
|||
controller => $self,
|
|||
model => 'DeliveryOrder',
|
|||
source => {
|
|||
filter => {
|
|||
type => $self->type,
|
|||
'all:substr:multi::ilike' => $::form->{term},
|
|||
},
|
|||
},
|
|||
sorted => {
|
|||
_default => {
|
|||
by => 'transdate',
|
|||
dir => 0,
|
|||
},
|
|||
transdate => t8('Date'),
|
|||
},
|
|||
paginated => {
|
|||
per_page => 10,
|
|||
},
|
|||
with_objects => [ qw(customer vendor orderitems) ]
|
|||
)
|
|||
}
|
|||
1;
|