From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 29 Jul 2013 13:10:11 +0000 (+0200)
Subject: Perl-DB-Upgradescripte: nicht manuell Datenbankhandle committen
X-Git-Tag: release-3.1.0beta1~132
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=9d17c830e06c8b9a24af18b70c622a4fbc8d1b7a;p=kivitendo-erp.git

Perl-DB-Upgradescripte: nicht manuell Datenbankhandle committen
---

diff --git a/sql/Pg-upgrade2/add_more_constraints_fibu_projekt_xplace.pl b/sql/Pg-upgrade2/add_more_constraints_fibu_projekt_xplace.pl
index 2ed31f33b..187eea404 100644
--- a/sql/Pg-upgrade2/add_more_constraints_fibu_projekt_xplace.pl
+++ b/sql/Pg-upgrade2/add_more_constraints_fibu_projekt_xplace.pl
@@ -45,7 +45,6 @@ sub run {
     do_statement($::form,$sth,$query);
     $sth->finish();
   }
-  $self->dbh ->commit();
   return 1;
 }
 
diff --git a/sql/Pg-upgrade2/erzeugnisnummern.pl b/sql/Pg-upgrade2/erzeugnisnummern.pl
index 5c7f9a43d..ab561ee32 100644
--- a/sql/Pg-upgrade2/erzeugnisnummern.pl
+++ b/sql/Pg-upgrade2/erzeugnisnummern.pl
@@ -23,7 +23,6 @@ sub run {
       $update_query = qq|UPDATE parts SET partnumber = '| . $::form->{"partnumber_$i"} . qq|' WHERE id = | . $::form->{"partid_$i"};
       $self->db_query($update_query);
     }
-    $self->dbh->commit();
   }
 
   my $query = qq|SELECT id, partnumber, description, unit, notes, assembly, ean, inventory_accno_id, obsolete
diff --git a/sql/Pg-upgrade2/rundungsfehler_korrigieren_BUG1328.pl b/sql/Pg-upgrade2/rundungsfehler_korrigieren_BUG1328.pl
index 950e023d8..fb742b081 100644
--- a/sql/Pg-upgrade2/rundungsfehler_korrigieren_BUG1328.pl
+++ b/sql/Pg-upgrade2/rundungsfehler_korrigieren_BUG1328.pl
@@ -41,7 +41,6 @@ ar.id) where ac.chart_id IN (select id from chart where link ='AR' OR link like
     do_statement($::form,$sth,$query);
     $sth->finish();
   }
-  $self->dbh ->commit();
   return 1;
 }