From: Sven Schöling <s.schoeling@linet-services.de>
Date: Thu, 3 Sep 2009 13:40:21 +0000 (+0200)
Subject: Bugfix: selectall_HASHREF!
X-Git-Tag: release-2.6.1beta1~304
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=879070c783ed9fd7adc772107e2b1b602601156d;p=kivitendo-erp.git

Bugfix: selectall_HASHREF!
---

diff --git a/SL/OE.pm b/SL/OE.pm
index ce8c9281c..df634afb2 100644
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -976,8 +976,8 @@ sub retrieve_simple {
   my $oe_query    = qq|SELECT * FROM oe         WHERE id = ?|;
   my $oi_query    = qq|SELECT * FROM orderitems WHERE trans_id = ?|;
 
-  my ($order)          = selectall_array_query($form, $dbh, $oe_query, conv_i($params{id}));
-  $order->{orderitems} = selectall_array_query($form, $dbh, $oi_query, conv_i($params{id}));
+  my $order            = selectfirst_hashref_query($form, $dbh, $oe_query, conv_i($params{id}));
+  $order->{orderitems} = selectall_hashref_query(  $form, $dbh, $oi_query, conv_i($params{id}));
 
   $main::lxdebug->leave_sub();