Revision 3499dc6a
Von G. Richardson vor fast 13 Jahren hinzugefügt
| SL/IR.pm | ||
|---|---|---|
| 207 | 207 |
|
| 208 | 208 |
next if $payments_only; |
| 209 | 209 |
|
| 210 |
# update parts table |
|
| 210 |
# update parts table by setting lastcost to current price, don't allow negative values by using abs
|
|
| 211 | 211 |
$query = qq|UPDATE parts SET lastcost = ? WHERE id = ?|; |
| 212 |
@values = ($form->{"sellprice_$i"}, conv_i($form->{"id_$i"}));
|
|
| 212 |
@values = (abs($form->{"sellprice_$i"}), conv_i($form->{"id_$i"}));
|
|
| 213 | 213 |
do_query($form, $dbh, $query, @values); |
| 214 | 214 |
|
| 215 | 215 |
# check if we sold the item already and |
Auch abrufbar als: Unified diff
Keine negativen Zahlen beim Update von lastcost in Stammdaten erlauben
Kauft man einen Artikel ein wird beim speichern der Einkaufsrechnung
automatisch in den Stammdaten der EK-Preis für diesen Artikel zu dem Preis
gesetzt.
Da es im Einkauf keine Gutschrift gibt helfen sich manche Benutzer
damit, daß sie in der Einkaufsrechnung mit negativen Zahlen arbeiten.
Wenn man das macht wäre es prinzipiell besser mit negativer Menge statt
negativem Preis zu arbeiten, aber wenn man beim Preis eine negative Zahl
eingibt sollte in den Stammdaten kein negativer Preis gespeichert werden,
deshalb wird der Betrag (abs) des Preises genommen.