Revision b262a6e8
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1193 | 1193 |
my $query = qq|SELECT e.$fld FROM exchangerate e |
| 1194 | 1194 |
WHERE e.curr = ? AND e.transdate = ?|; |
| 1195 | 1195 |
my ($exchangerate) = selectrow_query($self, $dbh, $query, $currency, $transdate); |
| 1196 |
$dbh->disconnect; |
|
| 1196 |
$dbh->disconnect(); |
|
| 1197 |
|
|
| 1198 |
$exchangerate = 1 if ($exchangerate == 0); |
|
| 1197 | 1199 |
|
| 1198 | 1200 |
$main::lxdebug->leave_sub(); |
| 1199 | 1201 |
|
Auch abrufbar als: Unified diff
Wechselkurse dürfen nicht 0 sein.