From: Jan Büren <jan@kivitendo.de>
Date: Tue, 25 Aug 2020 16:20:50 +0000 (+0200)
Subject: aqbanking 6.x benötigt weitere Unterordner
X-Git-Tag: release-3.5.6.1~54
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/67089fda948079650aab17c8aac9cda29f99b579?ds=inline;hp=--cc

aqbanking 6.x benötigt weitere Unterordner

Durch die verkettung der Systemaufrufe kann der
MT940 Import aktuell erst beim zweiten Aufruf ausgeführt werden (ubuntu 20.04)
Das Anlegen der Unterordner umgeht diese Eigenschaft
---

67089fda948079650aab17c8aac9cda29f99b579
diff --git a/SL/Helper/MT940.pm b/SL/Helper/MT940.pm
index 34b08c165..c25fd5962 100644
--- a/SL/Helper/MT940.pm
+++ b/SL/Helper/MT940.pm
@@ -15,9 +15,15 @@ sub convert_mt940_data {
   $sfile->fh->print($mt940_data);
   $sfile->fh->close;
 
+  # create needed dir structure for aqbanking 5.x and 6.x
   my $todir = $sfile->get_path . '/imexporters/csv/profiles';
   mkpath $todir;
+  die "Cannot create $todir" unless -d $todir;
+
   File::Copy::copy('users/aqbanking.conf', $todir.'/kivi.conf');
+  die "Cannot create local aqbanking conf " unless -f $todir.'/kivi.conf';
+
+  mkpath $sfile->get_path . '/settings6/aqbanking';
 
   my $aqbin = $::lx_office_conf{applications}->{aqbanking};
   die "Can't find aqbanking-cli, please check your configuration file.\n" unless -f $aqbin;