From 05a0faf917f346a0ff4883ba8597d94753ef1f46 Mon Sep 17 00:00:00 2001
From: Waldemar Toews <waldemar.toews@opendynamic.de>
Date: Tue, 30 Jun 2015 14:01:03 +0200
Subject: [PATCH] BUG-Fix: Vergleich der Artikel (bestellt, bezahlt) angepasst.
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Die Erzeugnisse in Rechnungspositionen werden in Positionstabelle
(invoice) zusammen mit Bestandteilen gespeichert. Bei der Prüfung was
bestellt und was bezahlt wurde, kommen dann falsche Ergebnisse.
In SQL: Rechnungspositionen ohne Bestandteile des Erzeugnisses mit
Positionen aus dem Auftrag vergleichen.
---
 SL/ARAP.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SL/ARAP.pm b/SL/ARAP.pm
index dd2bd8e02..977eefb4a 100644
--- a/SL/ARAP.pm
+++ b/SL/ARAP.pm
@@ -60,7 +60,7 @@ sub close_orders_if_billed {
   my $q_billed  = qq|SELECT i.parts_id, i.qty ${qtyfactor} AS qty, i.unit, p.unit AS partunit
                      FROM invoice i
                      LEFT JOIN parts p ON (i.parts_id = p.id)
-                     WHERE i.trans_id = ?|;
+                     WHERE i.trans_id = ? AND i.assemblyitem is false|;
   my $h_billed  = prepare_query($form, $dbh, $q_billed);
 
   my $q_ordered = qq|SELECT oi.parts_id, oi.qty, oi.unit, p.unit AS partunit
-- 
2.20.1