Revision fd46658a
Von Bernd Bleßmann vor mehr als 11 Jahren hinzugefügt
| bin/mozilla/oe.pl | ||
|---|---|---|
|
};
|
||
|
|
||
|
for my $i (1 .. $form->{rowcount}) {
|
||
|
map { $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, $form->{"${_}_${i}"}) if ($form->{"${_}_${i}"}) } qw(ship qty sellprice listprice basefactor discount);
|
||
|
map { $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, $form->{"${_}_${i}"}) if ($form->{"${_}_${i}"}) } qw(ship qty sellprice listprice basefactor discount lastcost);
|
||
|
}
|
||
|
|
||
|
my %saved_vars = map { $_ => $form->{$_} } grep { $form->{$_} } qw(currency);
|
||
Auch abrufbar als: Unified diff
Einkaufspreis parsen bei Erzeugen eines Auftrags aus Angebot.