Revision c47100f5
Von Kivitendo Admin vor fast 10 Jahren hinzugefügt
| SL/IC.pm | ||
|---|---|---|
| 419 | 419 |
$query = qq|INSERT INTO prices (parts_id, pricegroup_id, price) VALUES(?, ?, ?)|; |
| 420 | 420 |
$sth = prepare_query($form, $dbh, $query); |
| 421 | 421 |
|
| 422 |
# insert price records only if different to sellprice |
|
| 423 | 422 |
for my $i (1 .. $form->{price_rows}) {
|
| 424 | 423 |
my $price = $form->parse_amount($myconfig, $form->{"price_$i"});
|
| 425 |
next unless $price && ($price != $form->{sellprice});
|
|
| 424 |
next unless $price; |
|
| 426 | 425 |
|
| 427 | 426 |
@values = (conv_i($form->{id}), conv_i($form->{"pricegroup_id_$i"}), $price);
|
| 428 | 427 |
do_statement($form, $sth, $query, @values); |
Auch abrufbar als: Unified diff
Preisgruppenpreis = Verkaufspreis erlauben
War eine Uraltregel, sollte mit dem neuen Pricesource weder nötig, noch
erwünscht sein. Siehe Ticket 24.