Revision 8ed7bcad
Von Tamino Steinert vor fast 3 Jahren hinzugefügt
| SL/Controller/Reclamation.pm | ||
|---|---|---|
|
|
||
|
use SL::Helper::CreatePDF qw(:all);
|
||
|
use SL::Helper::PrintOptions;
|
||
|
use SL::Helper::ShippedQty;
|
||
|
use SL::Helper::UserPreferences::PositionsScrollbar;
|
||
|
use SL::Helper::UserPreferences::UpdatePositions;
|
||
|
|
||
| ... | ... | |
|
reason => sub { $_[0]->reason eq undef ? "" : $_[0]->reason->name },
|
||
|
reason_description_ext => sub { $_[0]->reason_description_ext },
|
||
|
reason_description_int => sub { $_[0]->reason_description_int },
|
||
|
shipped_qty => sub { $_[0]->shipped_qty },
|
||
|
qty => sub { $_[0]->qty },
|
||
|
sellprice => sub { $_[0]->sellprice },
|
||
|
discount => sub { $_[0]->discount },
|
||
| ... | ... | |
|
|
||
|
$self->get_item_cvpartnumber($_) for @{$self->reclamation->items_sorted};
|
||
|
|
||
|
if ($::form->{order_by} eq 'shipped_qty') {
|
||
|
# Calculate shipped qtys here to prevent calling calculate for every item
|
||
|
# via the items method. Do not use write_to_objects to prevent
|
||
|
# reclamation->delivered to be set, because this should be the value from
|
||
|
# db, which can be set manually or is set when linked delivery orders are
|
||
|
# saved.
|
||
|
SL::Helper::ShippedQty->new->calculate($self->reclamation)->write_to(\@{$self->reclamation->items});
|
||
|
}
|
||
|
|
||
|
my $method = $sort_keys{$::form->{order_by}};
|
||
|
my @to_sort = map { { old_pos => $_->position, order_by => $method->($_) } } @{ $self->reclamation->items_sorted };
|
||
|
if ($::form->{sort_dir}) {
|
||
| ... | ... | |
|
$item->active_discount_source($price_source->discount_from_source($item->active_discount_source));
|
||
|
}
|
||
|
|
||
|
# Calculate shipped qtys here to prevent calling calculate for every item via
|
||
|
# the items method. Do not use write_to_objects to prevent
|
||
|
# reclamation->delivered to be set, because this should be the value from db,
|
||
|
# which can be set manually or is set when linked delivery orders are saved.
|
||
|
SL::Helper::ShippedQty->new->calculate($self->reclamation)->write_to(\@{$self->reclamation->items});
|
||
|
|
||
|
if ($self->reclamation->record_number && $::instance_conf->get_webdav) {
|
||
|
my $webdav = SL::Webdav->new(
|
||
|
type => $self->type,
|
||
| ... | ... | |
|
|
||
|
=item *
|
||
|
|
||
|
<<<<<<< HEAD
|
||
|
Ordering item rows with drag and drop is possible. Sorting item rows is possible
|
||
|
(by partnumber, description, reason, reason_description_int,
|
||
|
reason_description_ext, qty, sellprice and discount for now).
|
||
|
=======
|
||
|
Ordering item rows with drag and drop is possible. Sorting item rows is
|
||
|
possible (by partnumber, description, reason, qty, sellprice
|
||
|
and discount for now).
|
||
|
>>>>>>> 66ac9fa6c7 (Reclamation: don't need shipped_qty)
|
||
|
|
||
|
=item *
|
||
|
|
||
Auch abrufbar als: Unified diff
Reclamation: don't need shipped_qty