X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDN.pm;h=291c99ced1458882b2650b6895771ee61bfc0074;hb=e411fd61f5174cd315a083226bb5e2e071a2caf4;hp=125e33ca1a65141ce0d8db8c2b72c9d8811300dc;hpb=2cb10c92a906996ae3cd2e53b0ba20e183faadd1;p=kivitendo-erp.git diff --git a/SL/DN.pm b/SL/DN.pm index 125e33ca1..291c99ced 100644 --- a/SL/DN.pm +++ b/SL/DN.pm @@ -266,7 +266,7 @@ sub create_invoice_for_fees { sub save_dunning { $main::lxdebug->enter_sub(); - my ($self, $myconfig, $form, $rows, $userspath, $spool, $sendmail) = @_; + my ($self, $myconfig, $form, $rows, $userspath, $spool) = @_; # connect to database my $dbh = $form->dbconnect_noauto($myconfig); @@ -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);