Revision ecd0ca84
Von Moritz Bunkus vor mehr als 15 Jahren hinzugefügt
| SL/AP.pm | ||
|---|---|---|
| 578 | 578 |
|
| 579 | 579 |
($form->{defaultcurrency}) = selectrow_query($form, $dbh, qq|SELECT curr FROM defaults|);
|
| 580 | 580 |
$form->{defaultcurrency} = (split m/:/, $form->{defaultcurrency})[0];
|
| 581 |
$form->{currency} = $form->{defaultcurrency} if ($form->{defaultcurrency} && ($form->{currency} =~ m/^\s*$/));
|
|
| 581 | 582 |
|
| 582 | 583 |
$form->{exchangerate} = $form->format_amount($myconfig, $form->{exchangerate});
|
| 583 | 584 |
|
| SL/AR.pm | ||
|---|---|---|
| 348 | 348 |
|
| 349 | 349 |
($form->{defaultcurrency}) = selectrow_query($form, $dbh, qq|SELECT curr FROM defaults|);
|
| 350 | 350 |
$form->{defaultcurrency} = (split m/:/, $form->{defaultcurrency})[0];
|
| 351 |
$form->{currency} = $form->{defaultcurrency} if ($form->{defaultcurrency} && ($form->{currency} =~ m/^\s*$/));
|
|
| 351 | 352 |
|
| 352 | 353 |
$form->{exchangerate} = $form->format_amount($myconfig, $form->{exchangerate});
|
| 353 | 354 |
|
Auch abrufbar als: Unified diff
Bugfix für "Zahlung buchen":
Wenn eine Rechnung anfangs keine Währung zugewiesen hat, weil noch keine
Währungen eingetragen wurden, später aber in den Benutzereinstellungen
Währungen definiert werden, so führte das dazu, dass bei Buchen der
Zahlungen Lx-Office fälschlicherweise angenommen hat, dass der Benutzer
plötzlich eine andere Währung ausgewählt hat. Um das zu vermeiden,
wird für diesen Fall die Standardwährung angenommen.