X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/c954dea7c1b814d66b8c31d04fa70a1bbbcce71e..4720b32a11bf3a7719af1bc2844a7207ca58343b:/SL/GL.pm diff --git a/SL/GL.pm b/SL/GL.pm index ec6b4a467..cd63ec0f6 100644 --- a/SL/GL.pm +++ b/SL/GL.pm @@ -197,17 +197,14 @@ sub _post_transaction { # safety check datev export if ($::instance_conf->get_datev_check_on_gl_transaction) { - my $transdate = $::form->{transdate} ? DateTime->from_lxoffice($::form->{transdate}) : undef; - $transdate ||= DateTime->today; + # create datev object my $datev = SL::DATEV->new( - exporttype => DATEV_ET_BUCHUNGEN, - format => DATEV_FORMAT_KNE, dbh => $dbh, trans_id => $form->{id}, ); - $datev->export; + $datev->generate_datev_data; if ($datev->errors) { die join "\n", $::locale->text('DATEV check returned errors:'), $datev->errors;