From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Fri, 20 Apr 2007 08:08:04 +0000 (+0000)
Subject: Falsche DB-Hilfsfunktion verwendet.
X-Git-Tag: release-2.4.3^2~484
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/commitdiff_plain/d8c2fd904e9a5b3843ad433dd0781f53352b30f6

Falsche DB-Hilfsfunktion verwendet.
---

diff --git a/SL/IC.pm b/SL/IC.pm
index b3729714c..a27cc52e4 100644
--- a/SL/IC.pm
+++ b/SL/IC.pm
@@ -347,13 +347,13 @@ sub save {
     do_query($form, $dbh, qq|DELETE FROM translation WHERE parts_id = ?|, conv_i($form->{id}));
 
   } else {
-    my ($count) = selectrow_array($form, $dbh, qq|SELECT COUNT(*) FROM parts WHERE partnumber = ?|, $form->{partnumber});
+    my ($count) = selectrow_query($form, $dbh, qq|SELECT COUNT(*) FROM parts WHERE partnumber = ?|, $form->{partnumber});
     if ($count) {
       $main::lxdebug->leave_sub();
       return 3;
     }
 
-    ($form->{id}) = selectrow_array($form, $dbh, qq|SELECT nextval('id')|);
+    ($form->{id}) = selectrow_query($form, $dbh, qq|SELECT nextval('id')|);
     do_query($form, $dbh, qq|INSERT INTO parts (id, partnumber) VALUES (?, '')|, $form->{id});
 
     $form->{orphaned} = 1;