kivitendo/SL/Controller/TopQuickSearch/DeliveryOrder.pm @ 59661dc5
| 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(
|
||||
| 26ec73d6 | Tamino Steinert | controller => 'controller.pl',
|
||
action => 'DeliveryOrder/edit',
|
||||
| 0c227fb2 | Moritz Bunkus | 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;
|