Fix für Bug 1642 - Lieferantenrabatt wird korrekt gespeichert, aber nicht mehr angezeigt
authorJan Büren <jan@lx-office-hosting.de>
Thu, 12 May 2011 09:17:50 +0000 (11:17 +0200)
committerJan Büren <jan@lx-office-hosting.de>
Thu, 12 May 2011 09:17:50 +0000 (11:17 +0200)
1.) Lieferant anlegen: Lieferantenrabatt 20%

2.) Einkaufsrechung erfassen: Rabatt ist korrekt

3.) Buchen

4.) Einkaufsrechnung neu aufrufen, Rabatt ist auf 2% gerutscht, acc_trans
Buchungen und ap.amount ist korrekt geblieben

bin/mozilla/ir.pl

index 3217bf0..1f18c1f 100644 (file)
@@ -226,6 +226,12 @@ sub prepare_invoice {
     foreach my $ref (@{ $form->{invoice_details} }) {
       $i++;
       map { $form->{"${_}_$i"} = $ref->{$_} } keys %{$ref};
+      # übernommen aus is.pl Fix für Bug 1642. Nebenwirkungen? jb 12.5.2011
+      # getestet: Lieferantenauftrag -> Rechnung i.O.
+      #           Lieferantenauftrag -> Lieferschein -> Rechnung i.O.
+      # Werte: 20% (Lieferantenrabatt), 12,4% individuell und 0,4 individuell s.a. 
+      # Screenshot zu Bug 1642
+      $form->{"discount_$i"}   = $form->format_amount(\%myconfig, $form->{"discount_$i"} * 100);
 
       my ($dec) = ($form->{"sellprice_$i"} =~ /\.(\d+)/);
       $dec           = length $dec;