Revision 10699892
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
| SL/Controller/Reclamation.pm | ||
|---|---|---|
| 666 | 666 |
sub action_customer_vendor_changed {
|
| 667 | 667 |
my ($self) = @_; |
| 668 | 668 |
|
| 669 |
$self->reclamation( |
|
| 670 |
SL::Model::Record->update_after_customer_vendor_change($self->reclamation)); |
|
| 671 |
|
|
| 669 | 672 |
$self->recalc(); |
| 670 | 673 |
|
| 671 | 674 |
if ( $self->reclamation->customervendor->contacts |
| ... | ... | |
| 1471 | 1474 |
); |
| 1472 | 1475 |
} |
| 1473 | 1476 |
|
| 1477 |
my $cv_id_method = $self->cv . '_id'; |
|
| 1478 |
if (!$::form->{id} && $::form->{$cv_id_method}) {
|
|
| 1479 |
$reclamation->$cv_id_method($::form->{$cv_id_method});
|
|
| 1480 |
$reclamation = SL::Model::Record->update_after_customer_vendor_change($reclamation); |
|
| 1481 |
} |
|
| 1482 |
|
|
| 1474 | 1483 |
my $form_reclamation_items = delete $::form->{reclamation}->{reclamation_items};
|
| 1475 | 1484 |
|
| 1476 | 1485 |
$reclamation->assign_attributes(%{$::form->{reclamation}});
|
Auch abrufbar als: Unified diff
Model::Record: Anpassen nach Kunden/Lieferanten-Änderung