Revision 9a7a811d
Von Bernd Blessmann vor mehr als 13 Jahren hinzugefügt
| SL/IC.pm | ||
|---|---|---|
| 502 | 502 |
if (($form->{"make_$i"}) || ($form->{"model_$i"})) {
|
| 503 | 503 |
#hli |
| 504 | 504 |
$value = $form->parse_amount($myconfig, $form->{"lastcost_$i"});
|
| 505 |
if ($value == $form->{"old_lastcost_$i"})
|
|
| 505 |
if ($value == $form->parse_amount($myconfig, $form->{"old_lastcost_$i"}))
|
|
| 506 | 506 |
{
|
| 507 | 507 |
if ($form->{"lastupdate_$i"} eq "") {
|
| 508 | 508 |
$lastupdate = 'now()'; |
| ... | ... | |
| 1663 | 1663 |
} |
| 1664 | 1664 |
|
| 1665 | 1665 |
my $placeholders = join ', ', ('?') x scalar(@part_ids);
|
| 1666 |
my $query = qq|SELECT mm.parts_id, mm.model, v.name AS make |
|
| 1666 |
my $query = qq|SELECT mm.parts_id, mm.model, mm.lastcost, v.name AS make
|
|
| 1667 | 1667 |
FROM makemodel mm |
| 1668 | 1668 |
LEFT JOIN vendor v ON (mm.make = v.id) |
| 1669 | 1669 |
WHERE mm.parts_id IN ($placeholders)|; |
| bin/mozilla/ic.pl | ||
|---|---|---|
| 1703 | 1703 |
# parse pricegroups. and no, don't rely on check_form for this... |
| 1704 | 1704 |
map { $form->{"price_$_"} = $form->parse_amount(\%myconfig, $form->{"price_$_"}) } 1 .. $form->{price_rows};
|
| 1705 | 1705 |
|
| 1706 |
# same for lastcosts |
|
| 1707 |
map { $form->{"lastcost_$_"} = $form->parse_amount(\%myconfig, $form->{"lastcost_$_"}) } 1 .. $form->{"makemodel_rows"};
|
|
| 1708 |
|
|
| 1706 | 1709 |
if ($form->{item} eq "assembly") {
|
| 1707 | 1710 |
my $i = $form->{assembly_rows};
|
| 1708 | 1711 |
|
Auch abrufbar als: Unified diff
Bug 1647 - Lieferanten-Einkaufspreise verlieren Nachkommastellen nicht mehr