projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Finanzbuchhaltung: schönere »…verbucht«-Meldungen via Flash
[kivitendo-erp.git]
/
SL
/
DATEV
/
KNEFile.pm
diff --git
a/SL/DATEV/KNEFile.pm
b/SL/DATEV/KNEFile.pm
index
e8ad474
..
9816ac0
100644
(file)
--- a/
SL/DATEV/KNEFile.pm
+++ b/
SL/DATEV/KNEFile.pm
@@
-71,7
+71,6
@@
sub format_amount {
my $self = shift;
my $amount = shift;
my $width = shift;
my $self = shift;
my $amount = shift;
my $width = shift;
- our $stellen;
$amount =~ s/-//;
my ($places, $decimal_places) = split m/\./, "$amount";
$amount =~ s/-//;
my ($places, $decimal_places) = split m/\./, "$amount";
@@
-81,7
+80,7
@@
sub format_amount {
if (0 < $width) {
$width -= 2;
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);
}
$decimal_places .= '0' if (2 > length $decimal_places);