Revision 85ab496c
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
| SL/Controller/Reclamation.pm | ||
|---|---|---|
| 26 | 26 |
use SL::DB::Translation; |
| 27 | 27 |
use SL::DB::ValidityToken; |
| 28 | 28 |
use SL::DB::EmailJournal; |
| 29 |
use SL::DB::Helper::RecordLink qw(RECORD_ID RECORD_TYPE_REF RECORD_ITEM_ID RECORD_ITEM_TYPE_REF); |
|
| 29 |
use SL::DB::Helper::RecordLink qw(set_record_link_conversions RECORD_ID RECORD_TYPE_REF RECORD_ITEM_ID RECORD_ITEM_TYPE_REF);
|
|
| 30 | 30 |
use SL::DB::Helper::TypeDataProxy; |
| 31 | 31 |
use SL::DB::Helper::Record qw(get_object_name_from_type get_class_from_type); |
| 32 | 32 |
|
| ... | ... | |
| 528 | 528 |
my %additional_params = (); |
| 529 | 529 |
if ($::form->{only_selected_item_positions}) { # ids can be unset before save
|
| 530 | 530 |
my $item_positions = $::form->{selected_item_positions} || [];
|
| 531 |
my @from_item_ids = map { $self->order->items_sorted->[$_]->id } @$item_positions;
|
|
| 531 |
my @from_item_ids = map { $self->reclamation->items_sorted->[$_]->id } @$item_positions;
|
|
| 532 | 532 |
$additional_params{from_item_ids} = \@from_item_ids;
|
| 533 | 533 |
} |
| 534 | 534 |
|
| ... | ... | |
| 1555 | 1555 |
sub save {
|
| 1556 | 1556 |
my ($self) = @_; |
| 1557 | 1557 |
|
| 1558 |
set_record_link_conversions($self->order,
|
|
| 1558 |
set_record_link_conversions($self->reclamation,
|
|
| 1559 | 1559 |
delete $::form->{RECORD_TYPE_REF()}
|
| 1560 | 1560 |
=> delete $::form->{RECORD_ID()},
|
| 1561 | 1561 |
delete $::form->{RECORD_ITEM_TYPE_REF()}
|
Auch abrufbar als: Unified diff
FIX: S:C:Reclamation: Flasche Referenz auf Controller-Objekt