X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FGL.pm;h=cd63ec0f6c48101d4704c2217529d48fc1e3e55e;hb=da2f5aa8cea79ff0a3e1e5e88e74cbf7e9e79794;hp=ec6b4a467f9e253a636802bf0e5f76b7ce5cda18;hpb=c954dea7c1b814d66b8c31d04fa70a1bbbcce71e;p=kivitendo-erp.git 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;