X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/40d52f5031f6e2344a0e1a8d420b5d22ccca5ea8..refs/heads/b-3.4.1:/SL/DATEV/KNEFile.pm

diff --git a/SL/DATEV/KNEFile.pm b/SL/DATEV/KNEFile.pm
index c5f60ea12..9816ac0b7 100644
--- a/SL/DATEV/KNEFile.pm
+++ b/SL/DATEV/KNEFile.pm
@@ -1,5 +1,7 @@
 package SL::DATEV::KNEFile;
 
+use strict;
+
 sub new {
   my $type = shift;
   my $self = {};
@@ -78,7 +80,7 @@ sub format_amount {
 
   if (0 < $width) {
     $width  -= 2;
-    $places  = sprintf("\%0${stellen}d", $places);
+    $places  = sprintf("\%0${width}d", $places);
   }
 
   $decimal_places .= '0' if (2 > length $decimal_places);