From 08175832f6dcd675c9c33c91e3f329339ff73c26 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Bernd=20Ble=C3=9Fmann?= <bernd@kivitendo-premium.de>
Date: Mon, 27 Jan 2020 15:05:18 +0100
Subject: [PATCH] =?utf8?q?S:DATEV:CSV:=20Kein=20Auff=C3=BCllen=20des=20Arr?=
 =?utf8?q?ays=20mehr?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Durch die Änderungen zum Festschreibungskennzeichen
("DATEV-Export Festschreibungskennzeichen für jede Buchung einzel setzen"
commit e4edba0587fc8224bd69047fe57dbf435b776aa6) wurde das Array ohnehin auf
120 Einträge erweitert, so dass die Funktion zum Auffüllen auf 116 Einträge
weg kann.

Zudem wird dadurch eine Warnung vermieden ("Negative repeat count does nothing").

Refs #416 (redmine).
---
 SL/DATEV/CSV.pm | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/SL/DATEV/CSV.pm b/SL/DATEV/CSV.pm
index 38c7ad80c..05cc309c2 100644
--- a/SL/DATEV/CSV.pm
+++ b/SL/DATEV/CSV.pm
@@ -520,10 +520,6 @@ sub check_encoding {
   }
 }
 
-sub _kivitendo_to_datev {
-  @kivitendo_to_datev, ({ kivi_datev_name => 'not yet implemented' }) x (116 - @kivitendo_to_datev);
-}
-
 sub header {
   my ($self) = @_;
 
@@ -561,7 +557,7 @@ sub header {
   push @header, [ @header_row_1 ];
 
   # second header row, just the column names
-  push @header, [ map { $_->{csv_header_name} } _kivitendo_to_datev() ];
+  push @header, [ map { $_->{csv_header_name} } @kivitendo_to_datev ];
 
   return \@header;
 }
@@ -570,7 +566,6 @@ sub lines {
   my ($self) = @_;
 
   my (@array_of_datev, @warnings);
-  my @csv_columns = _kivitendo_to_datev();
 
   foreach my $row (@{ $self->datev_lines }) {
     my @current_datev_row;
@@ -578,7 +573,7 @@ sub lines {
     # 1. check all datev_lines and see if we have a defined value
     # 2. if we don't have a defined value set a default if exists
     # 3. otherwise die
-    foreach my $column (@csv_columns) {
+    foreach my $column (@kivitendo_to_datev) {
       if ($column->{kivi_datev_name} eq 'not yet implemented') {
         push @current_datev_row, '';
         next;
-- 
2.20.1