X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e0cc4726f00812a8aa1f6f60bad56b1cf71152e5..ffb7da30ec503c647ae493ba8ffd48cc43fa44e7:/SL/Helper/MT940.pm diff --git a/SL/Helper/MT940.pm b/SL/Helper/MT940.pm index 63f637eed..34b08c165 100644 --- a/SL/Helper/MT940.pm +++ b/SL/Helper/MT940.pm @@ -22,7 +22,7 @@ sub convert_mt940_data { my $aqbin = $::lx_office_conf{applications}->{aqbanking}; die "Can't find aqbanking-cli, please check your configuration file.\n" unless -f $aqbin; my $cmd = "$aqbin --cfgdir=\"" . $sfile->get_path . "\" import --importer=\"swift\" --profile=\"SWIFT-MT940\" -f " . - $sfile->get_path . "/$import_filename | $aqbin --cfgdir=\"" . $sfile->get_path . "\" listtrans --exporter=\"csv\" --profile=kivi 2> /dev/null "; + $sfile->get_path . "/$import_filename | $aqbin --cfgdir=\"" . $sfile->get_path . "\" export --profile=kivi 2> /dev/null "; my $converted_data = '"empty";"local_bank_code";"local_account_number";"remote_bank_code";"remote_account_number";"transdate";"valutadate";"amount";'. '"currency";"remote_name";"remote_name_1";"purpose";"purpose1";"purpose2";"purpose3";"purpose4";"purpose5";"purpose6";"purpose7";"purpose8";"purpose9";'.