]> wagnertech.de Git - mfinanz.git/blobdiff - bin/mozilla/ir.pl
Definitiv verhindern, dass Einkaufsrechnungen doppelt storniert werden können.
[mfinanz.git] / bin / mozilla / ir.pl
index 63325ca02df39eed53dcd619497cba4205f771ac..e088def44288c74aa448bd4b70290043b49b3c8f 100644 (file)
@@ -972,6 +972,10 @@ sub storno {
     $form->error($locale->text('Cannot storno storno invoice!'));
   }
 
+  if (IR->has_storno(\%myconfig, $form)) {
+    $form->error($locale->text("Invoice has already been storno'd!"));
+  }
+
   $form->{storno_id} = $form->{id};
   $form->{storno} = 1;
   $form->{id} = "";