X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fis.pl;h=5bfa9deeb3a5c51eb146ce7e017120c22d44c2b6;hb=95155b0d6ddca4b62319edce20397a3ceebac346;hp=33a049f171131b2bbe53d9bd7be3a6313534bbbb;hpb=7712480e4a082f84a2229f5b1a90d79a6c01255b;p=kivitendo-erp.git

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index 33a049f17..5bfa9deeb 100644
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -1518,6 +1518,10 @@ sub storno {
     $form->error($locale->text('Cannot storno storno invoice!'));
   }
 
+  if (IS->has_storno(\%myconfig, $form)) {
+    $form->error($locale->text("Invoice has already been storno'd!"));
+  }
+
   $form->{storno_id} = $form->{id};
   $form->{storno} = 1;
   $form->{id} = "";