Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 8010b559

Von Tamino Steinert vor mehr als 2 Jahren hinzugefügt

  • ID 8010b559b6a609a95a34d81bd98b47c1312d3061
  • Vorgänger ec744c01
  • Nachfolger 70e0527b

Reclamation: don't need shipped_qty

Unterschiede anzeigen:

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