Revision b5d83560
Von Bernd Bleßmann vor mehr als 4 Jahren hinzugefügt
bin/mozilla/is.pl | ||
---|---|---|
727 | 727 |
|
728 | 728 |
for my $i (1 .. $form->{paidaccounts}) { |
729 | 729 |
next unless $form->{"paid_$i"}; |
730 |
map { $form->{"${_}_$i"} = $form->parse_amount(\%myconfig, $form->{"${_}_$i"}) } qw(paid exchangerate); |
|
731 |
if (!$form->{"forex_$i"}) { #read exchangerate from input field (not hidden) |
|
732 |
$form->{exchangerate} = $form->{"exchangerate_$i"}; |
|
733 |
} |
|
730 |
map { $form->{"${_}_$i"} = $form->parse_amount(\%myconfig, $form->{"${_}_$i"}) } qw(paid exchangerate); |
|
734 | 731 |
$form->{"forex_$i"} = $form->check_exchangerate(\%myconfig, $form->{currency}, $form->{"datepaid_$i"}, 'buy'); |
735 | 732 |
$form->{"exchangerate_$i"} = $form->{"forex_$i"} if $form->{"forex_$i"}; |
736 | 733 |
} |
Auch abrufbar als: Unified diff
Wechselkurs in VK-Rechnung nicht aus Zahlung setzen