From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Tue, 16 Jul 2013 11:20:23 +0000 (+0200)
Subject: Methode SL::DBUpgrade2::Base::check_coa anstelle von manuellem SELECT nutzen
X-Git-Tag: release-3.1.0beta1~161^2^2~44
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=466be2eecf8eb6ec2b1e1e6012e6940817a00104;p=kivitendo-erp.git

Methode SL::DBUpgrade2::Base::check_coa anstelle von manuellem SELECT nutzen
---

diff --git a/sql/Pg-upgrade2/SKR04-3804-addition.pl b/sql/Pg-upgrade2/SKR04-3804-addition.pl
index ce8618f66..b16ef2a61 100644
--- a/sql/Pg-upgrade2/SKR04-3804-addition.pl
+++ b/sql/Pg-upgrade2/SKR04-3804-addition.pl
@@ -12,12 +12,10 @@ sub run {
   my ($self) = @_;
 
   # 1. Überprüfen ob Kontenrahmen SKR04 ist, wenn nicht alles überspringen
-  my ($kontenrahmen) = $self->dbh->selectrow_array("select coa from defaults");
-
-  unless ( $kontenrahmen eq 'Germany-DATEV-SKR04EU' ) {
-    print "Kontenrahmen ist nicht SKR04, &uuml;berspringen<br>";
+  if (!$self->check_coa('Germany-DATEV-SKR04EU')) {
+    print qq|Nichts zu tun in diesem Kontenrahmen.|;
     return 1;
-  };
+  }
 
   # Mandant hat SKR04, erst prüfen wir, ob in der Vergangenheit Buchungen mit
   # taxkey 13 erfolgt sind (Fall "EU ohne USt. ID), diese sind wahrscheinlich