X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDATEV%2FKNEFile.pm;h=9816ac0b7425f259947971c6bf8df75009cc7d82;hb=ff5279eda2b2e7fb378bfc65ea582b10a06ed604;hp=c5f60ea1251c71a263703008ab4b3fa3a9593991;hpb=40d52f5031f6e2344a0e1a8d420b5d22ccca5ea8;p=kivitendo-erp.git 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);