From: Thomas Kasulke <t.kasulke@linet-services.de>
Date: Wed, 25 Apr 2007 11:49:04 +0000 (+0000)
Subject: history für stornierte Buchungne eingefügt und rowcount hochgesetzt, damit die Storni... 
X-Git-Tag: release-2.4.3^2~448
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=18db0f54198bec7f6c1c318c71898190c6b268af;p=kivitendo-erp.git

history für stornierte Buchungne eingefügt und rowcount hochgesetzt, damit die Stornierung in post() funktioniert
---

diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl
index ef30cea12..333549367 100644
--- a/bin/mozilla/ir.pl
+++ b/bin/mozilla/ir.pl
@@ -969,7 +969,7 @@ sub update {
 
 sub storno {
   $lxdebug->enter_sub();
-
+use CGI::Carp qw(fatalsToBrowser);
   if ($form->{storno}) {
     $form->error($locale->text('Cannot storno storno invoice!'));
   }
@@ -981,12 +981,20 @@ sub storno {
   invoice_links();
   prepare_invoice();
   relink_accounts();
-
+  
+  # saving the history
+  if(!exists $form->{addition} && $form->{id} ne "") {
+    $form->{snumbers} = qq|invnumber_| . $form->{invnumber};  
+    $form->{addition} = "CANCELED";
+    $form->save_history($form->dbconnect(\%myconfig));
+  }
+  # /saving the history
+  
   $form->{storno_id} = $form->{id};
   $form->{storno} = 1;
   $form->{id} = "";
   $form->{invnumber} = "Storno zu " . $form->{invnumber};
-
+  $form->{rowcount}++;
   &post();
   $lxdebug->leave_sub();