Revision b5d83560
Von Bernd Bleßmann vor fast 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