From 8bfb21c73f13e8efe4efbe4897f5bcc1ef7fd7e4 Mon Sep 17 00:00:00 2001
From: Philip Reetz <p.reetz@linet-services.de>
Date: Mon, 13 Aug 2007 09:58:12 +0000
Subject: [PATCH] Bei Gutschriften wurde der Lagerbestand falsch aktualisiert

---
 SL/IS.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SL/IS.pm b/SL/IS.pm
index e559286d2..37861e5be 100644
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -959,7 +959,7 @@ sub post_invoice {
   do_query($form, $dbh, $query, @values);
   
   if($form->{"formname"} eq "credit_note") {
-    for my $i (1 .. $form->{paidaccounts}) {
+    for my $i (1 .. $form->{rowcount}) {
       $query = qq|UPDATE parts SET onhand = onhand - ? WHERE id = ?|;
       @values = (conv_i($form->{"qty_$i"}), conv_i($form->{"id_$i"}));
       do_query($form, $dbh, $query, @values);
-- 
2.20.1