Revision f9c86f3f
Von Bernd Blessmann vor mehr als 13 Jahren hinzugefügt
bin/mozilla/ap.pl | ||
---|---|---|
# format amounts
|
||
if ($form->{"paid_$i"}) {
|
||
$form->{"paid_$i"} =
|
||
$form->format_amount(\%myconfig, $form->{"paid_$i"}, 2);
|
||
$form->format_amount(\%myconfig, $form->{"paid_$i"}, 2);
|
||
}
|
||
$form->{"exchangerate_$i"} =
|
||
$form->format_amount(\%myconfig, $form->{"exchangerate_$i"});
|
||
if ($form->{"exchangerate_$i"} == 0) {
|
||
$form->{"exchangerate_$i"} = "";
|
||
} else {
|
||
$form->{"exchangerate_$i"} =
|
||
$form->format_amount(\%myconfig, $form->{"exchangerate_$i"});
|
||
}
|
||
|
||
print qq|<input type=hidden name="gldate_$i" value=$form->{"gldate_$i"}>\n|;
|
bin/mozilla/ar.pl | ||
---|---|---|
$form->{"paid_$i"} =
|
||
$form->format_amount(\%myconfig, $form->{"paid_$i"}, 2);
|
||
}
|
||
$form->{"exchangerate_$i"} =
|
||
$form->format_amount(\%myconfig, $form->{"exchangerate_$i"});
|
||
|
||
if ($form->{"exchangerate_$i"} == 0) {
|
||
$form->{"exchangerate_$i"} = "";
|
||
} else {
|
||
$form->{"exchangerate_$i"} =
|
||
$form->format_amount(\%myconfig, $form->{"exchangerate_$i"});
|
||
}
|
||
|
||
$exchangerate = qq| |;
|
Auch abrufbar als: Unified diff
Wechselkurs ging bei Kreditoren/Debitoren-Buchungen verloren, wenn er kleiner 1 war.