Revision d9c9bc22
Von Moritz Bunkus vor etwa 17 Jahren hinzugefügt
bin/mozilla/io.pl | ||
---|---|---|
33 | 33 |
# |
34 | 34 |
####################################################################### |
35 | 35 |
|
36 |
use CGI; |
|
37 |
use CGI::Ajax; |
|
38 |
use List::Util qw(max); |
|
39 |
|
|
36 | 40 |
use SL::Common; |
37 | 41 |
use SL::CT; |
38 | 42 |
use SL::IC; |
39 |
use CGI::Ajax; |
|
40 |
use CGI; |
|
41 | 43 |
|
42 | 44 |
require "bin/mozilla/common.pl"; |
43 | 45 |
|
... | ... | |
297 | 299 |
$form->{"unit_old_$i"} = $form->{"selected_unit_$i"}; |
298 | 300 |
} |
299 | 301 |
} |
302 |
|
|
300 | 303 |
($dec) = ($form->{"sellprice_$i"} =~ /\.(\d+)/); |
301 |
$dec = length $dec; |
|
302 |
$decimalplaces = ($dec > 2) ? $dec : 2; |
|
303 |
|
|
304 |
$discount = |
|
305 |
$form->round_amount( |
|
306 |
$form->{"sellprice_$i"} * $form->{"discount_$i"} / 100, |
|
307 |
$decimalplaces); |
|
308 |
|
|
309 |
$linetotal = |
|
310 |
$form->round_amount($form->{"sellprice_$i"} - $discount, $decimalplaces); |
|
311 |
$linetotal = $form->round_amount($linetotal * $form->{"qty_$i"}, 2); |
|
312 |
my $real_sellprice = $form->{"sellprice_$i"} - $discount; |
|
304 |
$decimalplaces = max length($dec), 2; |
|
305 |
|
|
306 |
$discount = (100 - $form->{"discount_$i"} * 1) / 100; |
|
307 |
$linetotal = $form->round_amount($form->{"sellprice_$i"} * $form->{"qty_$i"} * $discount, $decimalplaces); |
|
308 |
|
|
309 |
my $real_sellprice = $form->{"sellprice_$i"} * $discount; |
|
313 | 310 |
|
314 | 311 |
# marge calculations |
315 | 312 |
my ($marge_font_start, $marge_font_end); |
Auch abrufbar als: Unified diff
Bugfix Rabattberechnung: Berechnung so umgestellt, dass der Rabatt von der Zeilensumme genommen wird und nicht vom Einzelpreis (Rundung). Fix für Bug 325.
Bugfix Zwischensummen: Bei Belegen aus OE.pm (Angebote, Aufträge, Anfragen) wurde die Variable <%runningnumber%> innerhalb eines Zwischensummenblocks nicht "1.1, 1.2, 1.3" etc hochgezählt, sondern normal "1, 2, 3" etc.
Bugfix Zwischensummen: Bei manchen Browsern wurden die Checkboxen "Zwischensumme" nach "Erneuern" oder neuem Aufrufen eines Beleges nicht richtig vorausgewählt, auch wenn der Status in der Datenbank richtig war.
Kosmetik: Einrückung, Ausrichtung.