Revision 2209f102
Von Tamino Steinert vor 6 Tagen hinzugefügt
SL/Model/Record.pm | ||
---|---|---|
37 | 37 |
sub update_after_customer_vendor_change { |
38 | 38 |
my ($class, $record) = @_; |
39 | 39 |
my $new_customervendor = $record->customervendor; |
40 |
return unless $new_customervendor; |
|
40 | 41 |
|
41 | 42 |
$record->$_($new_customervendor->$_) for (qw( |
42 | 43 |
taxzone_id payment_id delivery_term_id currency_id language_id |
Auch abrufbar als: Unified diff
FIX: S:M:Record: Wenn Kunde/Lieferant geleert wird nichts machen