Revision 9dd784ba
Von Stephan Köhler vor mehr als 19 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
|
my $rowcount = shift;
|
||
|
$lxdebug->enter_sub();
|
||
|
for $j (1 .. $rowcount) {
|
||
|
|
||
|
my $pricegroup_old = $form->{"pricegroup_old_$i"};
|
||
|
if ($form->{PRICES}{$j}) {
|
||
|
$len = 0;
|
||
| ... | ... | |
|
qq|<option value="$price--$pricegroup_id"$item->{selected}>$pricegroup</option>\n|;
|
||
|
|
||
|
$len += 1;
|
||
|
map {
|
||
|
$form->{"${_}_$j"} =
|
||
|
$form->format_amount(\%myconfig, $form->{"${_}_$j"})
|
||
|
} qw(sellprice price_new price_old);
|
||
|
|
||
|
# set new selectedpricegroup_id and prices for "Preis"
|
||
|
if ($item->{selected}) {
|
||
|
if ($item->{selected} && ($pricegroup_id != 0)) {
|
||
|
$form->{"pricegroup_old_$j"} = $pricegroup_id;
|
||
|
$form->{"price_new_$j"} = $price;
|
||
|
$form->{"sellprice_$j"} = $price;
|
||
|
}
|
||
|
if ($len >= 1) {
|
||
|
if ($pricegroup_id == 0) {
|
||
|
$form->{"price_new_$j"} = $form->{"sellprice_$j"};
|
||
|
}
|
||
|
if ($len > 1) {
|
||
|
$form->{"prices_$j"} = $prices;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
$lxdebug->leave_sub();
|
||
|
}
|
||
|
|
||
Auch abrufbar als: Unified diff
Merge von 685 aus unstable: Bugfix Preisgruppen
Problem bei Preisgruppen und Kommabetraegen und individuellen Preisen geloest