X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDO.pm;h=28eb85436718d973686be97d99944b3b018e31ec;hb=41b8891d96b1ea8b22b06e9a14eb20eb96cc0300;hp=620f1e06a5c8504ff82597db5667777a8e912218;hpb=3bc869ddc37202dfb0f810178ebea7cd5668303d;p=kivitendo-erp.git

diff --git a/SL/DO.pm b/SL/DO.pm
index 620f1e06a..28eb85436 100644
--- a/SL/DO.pm
+++ b/SL/DO.pm
@@ -393,7 +393,7 @@ sub mark_orders_if_delivered {
 
   my $all_units = AM->retrieve_all_units();
 
-  $query        = qq|SELECT oi.parts_id, oi.qty, oi.unit, p.unit AS partunit
+  my $query     = qq|SELECT oi.parts_id, oi.qty, oi.unit, p.unit AS partunit
                      FROM orderitems oi
                      LEFT JOIN parts p ON (oi.parts_id = p.id)
                      WHERE (oi.trans_id = ?)|;
@@ -403,8 +403,6 @@ sub mark_orders_if_delivered {
                                          'oe_id' => $oe_id,);
   my %ordered   = ();
 
-  do_statement($form, $sth, $query, $oe_id);
-
   while (my $ref = $sth->fetchrow_hashref()) {
     $ref->{baseqty} = $ref->{qty} * $all_units->{$ref->{unit}}->{factor} / $all_units->{$ref->{partunit}}->{factor};