X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/554abccb6a9d58999280211d1af5bdb8defcdb85..1494963025040708674399d3f70b45e06cba6eeb:/SL/DN.pm

diff --git a/SL/DN.pm b/SL/DN.pm
index 72154c24f..45bc367eb 100644
--- a/SL/DN.pm
+++ b/SL/DN.pm
@@ -288,7 +288,7 @@ sub save_dunning {
                (SELECT SUM(fee)
                 FROM dunning_config
                 WHERE dunning_level <= (SELECT dunning_level FROM dunning_config WHERE id = ?)),
-               (SELECT (amount - paid) * (current_date - transdate) FROM ar WHERE id = ?)
+               (SELECT (amount - paid) * (current_date - duedate) FROM ar WHERE id = ?)
                  * (SELECT interest_rate FROM dunning_config WHERE id = ?)
                  / 360,
                current_date,