Bugfix: Angebot (Auch bei Rechnung): Menge mit Kommastelle, z.B 6,876, beim
authorUdo Spallek <info@wissensvermittlung.com>
Fri, 18 Nov 2005 00:57:58 +0000 (00:57 +0000)
committerUdo Spallek <info@wissensvermittlung.com>
Fri, 18 Nov 2005 00:57:58 +0000 (00:57 +0000)
Erneuern wird die Menge gerundet und ohne Nachkommastelle angezeigt. In
der Vorgaengerversion ging das noch. Der Positions-Preis wird korrekt
berechnet, nur die Anzeige der Menge scheint das Problem zu sein

bin/mozilla/io.pl

index 0fe78fd..c0ab3dc 100644 (file)
@@ -254,10 +254,13 @@ sub display_row {
         qq|<td><input name="description_$i" size=30 value="$form->{"description_$i"}"></td>|;
     }
 
+    (my $qty_dec)     = ($form->{"qty_$i"} =~ /\.(\d+)/);
+    $qty_dec          = length $qty_dec;
+
     $column_data{qty} =
-        qq|<td align=right><input name="qty_$i" size=5 value=|
-      . $form->format_amount(\%myconfig, $form->{"qty_$i"}, 0)
-      qq|></td>|;
+        qq|<td align=right><input name="qty_$i" size=5 value=|.
+          $form->format_amount(\%myconfig, $form->{"qty_$i"}, $qty_dec)
+       .qq|></td>|;
     $column_data{ship} =
         qq|<td align=right><input name="ship_$i" size=5 value=|
       . $form->format_amount(\%myconfig, $form->{"ship_$i"})