X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fir.pl;h=264100e743b151ccd980ae0ee008b301bca22668;hb=9f0d85c2b00a0d3b7a92b63115801b2452846470;hp=a684593e7f0871e68e9a2c26353552c3bd699a95;hpb=ee072e4f077213bf6f8792ca8f0a1afebbb6282f;p=kivitendo-erp.git
diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl
index a684593e7..264100e74 100644
--- a/bin/mozilla/ir.pl
+++ b/bin/mozilla/ir.pl
@@ -176,8 +176,12 @@ sub prepare_invoice {
$form->{"sellprice_$i"} =
$form->format_amount(\%myconfig, $form->{"sellprice_$i"},
$decimalplaces);
+
+ (my $dec_qty) = ($form->{"qty_$i"} =~ /\.(\d+)/);
+ $dec_qty = length $dec_qty;
+
$form->{"qty_$i"} =
- $form->format_amount(\%myconfig, ($form->{"qty_$i"} * -1));
+ $form->format_amount(\%myconfig, ($form->{"qty_$i"} * -1), $dec_qty);
$form->{rowcount} = $i;
}
@@ -223,15 +227,13 @@ sub form_header {
if ($form->{forex}) {
$exchangerate .= qq|
|
- . $locale->text('Exchangerate')
- . qq| |
+ . $locale->text('Exchangerate') . qq|
$form->{exchangerate}{exchangerate}> |
|;
} else {
$exchangerate .= qq|
|
- . $locale->text('Exchangerate')
- . qq| |
+ . $locale->text('Exchangerate') . qq|
{exchangerate}> |
|;
}
@@ -270,14 +272,12 @@ sub form_header {
$button1 = qq|
{invdate}> |
text('button')
- . qq|> |
+ . $locale->text('button') . qq|>
|;
$button2 = qq|
{duedate}> |
text('button')
- . qq|> |
+ . $locale->text('button') . qq|>
|;
#write Trigger
@@ -304,6 +304,7 @@ sub form_header {
{type}>
+{level}>
{creditlimit}>
{creditremaining}>
@@ -330,8 +331,7 @@ sub form_header {
$vendor |
|
- . $locale->text('Contact Person')
- . qq| |
+ . $locale->text('Contact Person') . qq|
$contact |
{vendor_id}>
@@ -822,7 +822,7 @@ sub update {
$form->format_amount(\%myconfig, $form->{"sellprice_$i"},
$decimalplaces);
$form->{"qty_$i"} =
- $form->format_amount(\%myconfig, $form->{"qty_$i"});
+ $form->format_amount(\%myconfig, $form->{"qty_$i"}, $dec_qty);
}
&display_form;