Revision a000b4a2
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 *
|
||
|
|
||
| SL/DB/ReclamationItem.pm | ||
|---|---|---|
|
}
|
||
|
},
|
||
|
);
|
||
|
use SL::Helper::ShippedQty;
|
||
|
|
||
|
__PACKAGE__->meta->initialize;
|
||
|
|
||
|
__PACKAGE__->configure_acts_as_list(group_by => [qw(reclamation_id)]);
|
||
|
|
||
|
sub shipped_qty {
|
||
|
my ($self, %params) = @_;
|
||
|
|
||
|
my $force = delete $params{force};
|
||
|
|
||
|
SL::Helper::ShippedQty->new(%params)->calculate($self)->write_to_objects if $force || !defined $self->{shipped_qty};
|
||
|
|
||
|
$self->{shipped_qty};
|
||
|
}
|
||
|
|
||
|
sub is_linked_to_record {
|
||
|
my ($self) = @_;
|
||
|
|
||
| ... | ... | |
|
return $self->reclamation->customervendor;
|
||
|
}
|
||
|
|
||
|
sub delivered_qty { goto &shipped_qty }
|
||
|
sub record { goto &reclamation }
|
||
|
sub record_id { goto &reclamation_id }
|
||
|
sub trans_id { goto &reclamation_id }
|
||
| ... | ... | |
|
|
||
|
=head1 FUNCTIONS
|
||
|
|
||
|
=over 4
|
||
|
|
||
|
=item C<shipped_qty PARAMS>
|
||
|
|
||
|
Calculates the shipped qty for this reclamationitem (measured in the current unit)
|
||
|
and returns it.
|
||
|
|
||
|
Note that the shipped qty is expected not to change within the request and is
|
||
|
cached in C<shipped_qty> once calculated. If C<< force => 1 >> is passed, the
|
||
|
existibng cache is ignored.
|
||
|
|
||
|
Given parameters will be passed to L<SL::Helper::ShippedQty>, so you can force
|
||
|
the shipped/delivered distinction like this:
|
||
|
|
||
|
$_->shipped_qty(require_stock_out => 0);
|
||
|
|
||
|
Note however that calculating shipped_qty on individual Reclamationitems is generally
|
||
|
a bad idea. See L<SL::Helper::ShippedQty> for way to compute these all at once.
|
||
|
|
||
|
=item C<delivered_qty>
|
||
|
|
||
|
Alias for L</shipped_qty>.
|
||
|
|
||
|
=back
|
||
|
|
||
|
=head1 AUTHORS
|
||
|
|
||
|
G. Richardson E<lt>grichardson@kivitendo-premium.deE<gt>
|
||
| templates/webpages/reclamation/tabs/basic_data.html | ||
|---|---|---|
|
<th id="reason_header_id" class="listheading" nowrap width="100"><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("reason")'>[%- 'Reason' | $T8 %]</a></th>
|
||
|
<th id="reason_description_ext_header_id" class="listheading" nowrap ><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("reason_description_ext")'>[%- 'Reason Description Extern' | $T8 %]</a></th>
|
||
|
<th id="reason_description_int_header_id" class="listheading" nowrap ><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("reason_description_int")'>[%- 'Reason Description Intern' | $T8 %]</a></th>
|
||
|
<th id="shipped_qty_header_id" class="listheading" nowrap width="5" ><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("shipped_qty")'>[%- 'Delivered' | $T8 %]</a></th>
|
||
|
<th id="qty_header_id" class="listheading" nowrap width="5" ><a href='#' onClick='javascript:kivi.Reclamation.reorder_items("qty")'> [%- 'Qty' | $T8 %]</a></th>
|
||
|
<th class="listheading" nowrap width="5" >[%- 'Price Factor' | $T8 %] </th>
|
||
|
<th class="listheading" nowrap width="5" >[%- 'Unit' | $T8 %] </th>
|
||
| templates/webpages/reclamation/tabs/basic_data/_row.html | ||
|---|---|---|
|
size='40',
|
||
|
style='width: 150px') %]
|
||
|
</td>
|
||
|
<td nowrap>
|
||
|
[%- L.div_tag(LxERP.format_amount(ITEM.shipped_qty, 2, 0) _ ' ' _ ITEM.unit, name="shipped_qty", class="numeric") %]
|
||
|
</td>
|
||
|
<td nowrap>
|
||
|
[%- L.input_tag("reclamation.reclamation_items[].qty_as_number",
|
||
|
ITEM.qty_as_number,
|
||
Auch abrufbar als: Unified diff
Reclamation: don't need shipped_qty