Merge branch 'master' of ssh://git-jbueren@lx-office.linet-services.de/~/lx-office-erp
authorJan Büren <jan@lx-office-hosting.de>
Thu, 4 Mar 2010 08:58:27 +0000 (09:58 +0100)
committerJan Büren <jan@lx-office-hosting.de>
Thu, 4 Mar 2010 08:58:27 +0000 (09:58 +0100)
Conflicts:

doc/changelog

SL/IS.pm

index a176b4d..6bf6aaf 100644 (file)
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -1017,13 +1017,6 @@ sub post_invoice {
                 conv_i($form->{"id"}));
   do_query($form, $dbh, $query, @values);
 
-  if($form->{"formname"} eq "credit_note") {
-    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);
-    }
-  }
 
   if ($form->{storno}) {
     $query =