From: Bernd Bleßmann Date: Fri, 30 Sep 2016 08:59:50 +0000 (+0200) Subject: GL u. AccTransCorrections: signle-dbh: "client" hinzugefügt bei with_transaction X-Git-Tag: release-3.5.4~2009 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=c078749ac84160099a6bca79c288f4f11e871eb8;p=kivitendo-erp.git GL u. AccTransCorrections: signle-dbh: "client" hinzugefügt bei with_transaction --- diff --git a/SL/AccTransCorrections.pm b/SL/AccTransCorrections.pm index fff16f759..2ecad9fb8 100644 --- a/SL/AccTransCorrections.pm +++ b/SL/AccTransCorrections.pm @@ -779,7 +779,7 @@ sub fix_ap_ar_wrong_taxkeys { } if (scalar @corrections) { - SL::DB->with_transaction(sub { + SL::DB->client->with_transaction(sub { my $q_taxkey_only = qq|UPDATE acc_trans SET taxkey = ? WHERE acc_trans_id = ?|; my $h_taxkey_only = prepare_query($form, $dbh, $q_taxkey_only); diff --git a/SL/GL.pm b/SL/GL.pm index 1d3065c2a..9e3806a05 100644 --- a/SL/GL.pm +++ b/SL/GL.pm @@ -50,7 +50,7 @@ sub delete_transaction { my ($self, $myconfig, $form) = @_; $main::lxdebug->enter_sub(); - SL::DB->with_transaction(sub { + SL::DB->client->with_transaction(sub { do_query($form, SL::DB->client->dbh, qq|DELETE FROM gl WHERE id = ?|, conv_i($form->{id})); 1; }) or do { die SL::DB->client->error };