From: Sven Schöling <s.schoeling@linet-services.de>
Date: Tue, 10 Jan 2012 12:28:39 +0000 (+0100)
Subject: Warensuche: Menge in Einkaufsrechnungen positiv anzeigen
X-Git-Tag: release-2.7.0beta1~61^2~13^2~2^2~10
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=df2cb4e9ab3eb6b70a84e09fad5eb6a3a6360bfa;p=kivitendo-erp.git

Warensuche: Menge in Einkaufsrechnungen positiv anzeigen

Teilfix zu Bug 1549.
---

diff --git a/SL/IC.pm b/SL/IC.pm
index 67fbba09c..9b224d62e 100644
--- a/SL/IC.pm
+++ b/SL/IC.pm
@@ -1077,6 +1077,13 @@ sub all_parts {
 
   map { $_->{onhand} *= 1 } @{ $form->{parts} };
 
+  # fix qty sign in ap. those are saved negative
+  if ($bsooqr && $form->{bought}) {
+    for my $row (@{ $form->{parts} }) {
+      $row->{qty} *= -1 if $row->{module} eq 'ir';
+    }
+  }
+
   # post processing for assembly parts lists (bom)
   # for each part get the assembly parts and add them into the partlist.
   my @assemblies;