Den Preisfaktor nicht vor dem Runden des Einzelpreises einbeziehen, sonst kommen...

[mfinanz.git] / SL / DN.pm

diff --git a/SL/DN.pm b/SL/DN.pm
index 33cb5502f97f6fa026b26a8cf99b04216f378111..291c99ced1458882b2650b6895771ee61bfc0074 100644 (file)
--- a/SL/DN.pm
+++ b/SL/DN.pm
@@ -513,7 +513,7 @@ sub get_invoices {
   $form->{DUNNINGS} = [];
 
   while (my $ref = $sth->fetchrow_hashref(NAME_lc)) {
-    next if !$ref->{terms} || ($ref->{pastdue} < $ref->{terms});
+    next if ($ref->{pastdue} < $ref->{terms});
 
     $ref->{interest} = $form->round_amount($ref->{interest}, 2);
     push(@{ $form->{DUNNINGS} }, $ref);
@@ -844,7 +844,7 @@ sub print_invoice_for_fees {
   $form->{interest}   = $form->round_amount($interest,        2);
   $form->{invamount}  = $form->round_amount($fee + $interest, 2);
   $form->{dunning_id} = $dunning_id;
-  $form->{formname}   = "${template}";
+  $form->{formname}   = "${template}_invoice";
 
   map { $form->{$_} = $form->format_amount($myconfig, $form->{$_}, 2) } qw(fee interest invamount);