Revision 1c1d2aee
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1149 | 1149 |
selectrow_query($self, $dbh, $query); |
| 1150 | 1150 |
|
| 1151 | 1151 |
my $total = ($self->{invtotal}) ? $self->{invtotal} : $self->{ordtotal};
|
| 1152 |
my $skonto_amount = $self->parse_amount($myconfig, $total) * |
|
| 1153 |
$self->{percent_skonto};
|
|
| 1152 | 1154 |
|
| 1153 | 1155 |
$self->{skonto_amount} =
|
| 1154 |
$self->format_amount($myconfig, |
|
| 1155 |
$self->parse_amount($myconfig, $total) * |
|
| 1156 |
$self->{percent_skonto}, 2);
|
|
| 1156 |
$self->format_amount($myconfig, $skonto_amount, 2); |
|
| 1157 | 1157 |
|
| 1158 | 1158 |
if ($self->{"language_id"}) {
|
| 1159 | 1159 |
$query = |
| ... | ... | |
| 1183 | 1183 |
my $saved_numberformat = $myconfig->{"numberformat"};
|
| 1184 | 1184 |
$myconfig->{"numberformat"} = $output_numberformat;
|
| 1185 | 1185 |
$self->{skonto_amount} =
|
| 1186 |
$self->format_amount($myconfig, |
|
| 1187 |
$self->parse_amount($myconfig, $total) * |
|
| 1188 |
$self->{percent_skonto}, 2);
|
|
| 1186 |
$self->format_amount($myconfig, $skonto_amount, 2); |
|
| 1189 | 1187 |
$myconfig->{"numberformat"} = $saved_numberformat;
|
| 1190 | 1188 |
} |
| 1191 | 1189 |
} |
Auch abrufbar als: Unified diff
Kleiner Bug beim Reformatieren von Zahlen für die Zahlungsbedingungen.