X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/4c3380341cdb239fcb90ff8d75aa67e653a617a2..c815c7236e442a9117808af8a3cc8445f5a35203:/SL/ARAP.pm

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