Revision 5268bd5d
Von Bernd Bleßmann vor etwa 1 Jahr hinzugefügt
| SL/IR.pm | ||
|---|---|---|
| 422 | 422 |
|
| 423 | 423 |
next if $payments_only; |
| 424 | 424 |
|
| 425 |
# update lastcost |
|
| 426 |
$query = qq|UPDATE parts SET lastcost = ? WHERE id = ?|; |
|
| 427 |
do_query($form, $dbh, $query, $form->{"sellprice_$i"} / $basefactor, conv_i($form->{"id_$i"}));
|
|
| 425 |
# change lastcost for part and all assemblies and assortments recursively |
|
| 426 |
my $a = SL::DB::Part->load_cached(conv_i($form->{"id_$i"}));
|
|
| 427 |
my $part_price_factor = $a->price_factor_id ? $a->price_factor->factor : 1; |
|
| 428 |
my $new_lastcost = abs($fxsellprice * $form->{exchangerate} / $basefactor / $price_factor * $part_price_factor);
|
|
| 429 |
if ( abs($a->lastcost - $new_lastcost) >= 0.009 ) {
|
|
| 430 |
$a->update_attributes(lastcost => $new_lastcost); |
|
| 431 |
$a->set_lastcost_assemblies_and_assortiments; |
|
| 432 |
} |
|
| 428 | 433 |
} |
| 429 | 434 |
|
| 430 | 435 |
next if $payments_only; |
Auch abrufbar als: Unified diff
EK-Rechnung: Änderung EK-Preis Preisfaktor berücksichtigen auch bei keinem inventory_accno
Und Erzeugnisse/Sortimente auch updaten.
Und nur aktualisieren, wenn geändert.
Genau wie in dem if-Zweig, wo es ein inventroy_accno gibt.
commit 6b8e3b8f9763a6a92c713092e232d8157ea4e772
Author: Bernd Bleßmann <bernd@kivitendo-premium.de>
Date: Fri Oct 13 15:06:27 2023 +0200