From: Sven Schöling <s.schoeling@linet-services.de>
Date: Mon, 3 Apr 2017 09:27:55 +0000 (+0200)
Subject: DATEV: Warnungen: Uninitialisierte Variablen
X-Git-Tag: release-3.5.4~1145
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=975304c772762b6a029c21aab00f3f449ed5cdf5;p=kivitendo-erp.git

DATEV: Warnungen: Uninitialisierte Variablen
---

diff --git a/SL/DATEV.pm b/SL/DATEV.pm
index ea410aca3..bf96fa447 100644
--- a/SL/DATEV.pm
+++ b/SL/DATEV.pm
@@ -368,13 +368,15 @@ sub generate_datev_data {
   $main::lxdebug->enter_sub();
 
   my ($self, %params)   = @_;
-  my $fromto            = $params{from_to};
+  my $fromto            = $params{from_to} // '';
   my $progress_callback = $params{progress_callback} || sub {};
 
   my $form     =  $main::form;
 
   my $trans_id_filter = '';
-  my ($ar_department_id_filter, $ap_department_id_filter, $gl_department_id_filter);
+  my $ar_department_id_filter = '';
+  my $ap_department_id_filter = '';
+  my $gl_department_id_filter = '';
   if ( $form->{department_id} ) {
     $ar_department_id_filter = " AND ar.department_id = ? ";
     $ap_department_id_filter = " AND ap.department_id = ? ";