]> wagnertech.de Git - mfinanz.git/blobdiff - bin/mozilla/is.pl
neuen button und Funktion für "als bezahlt markieren" eingeführt.
[mfinanz.git] / bin / mozilla / is.pl
index 9fbbb9efe045f310c9434ab8104563b25800e4c0..6268f4082211cd818aa7acabe03a0d55e3041900 100644 (file)
@@ -1168,11 +1168,16 @@ if ($form->{type} eq "credit_note") {
          . Q($form->{id})
          . qq|);" name="history" id="history" value="|
          . $locale->text('history')
-         . qq|">|;
+         . qq|"> |;
   }
   # /button for saving history
-
-
+  
+  # mark_as_paid button 
+  if($form->{id} ne "") {  
+    print qq|<input type="submit" class="submit" name="action" value="| 
+          . $locale->text('mark as paid') . qq|">|;
+  }
+  # /mark_as_paid button
   print $form->write_trigger(\%myconfig, scalar(@triggers) / 3, @triggers) .
     qq|
 
@@ -1193,6 +1198,12 @@ print qq|
   $lxdebug->leave_sub();
 }
 
+sub mark_as_paid {
+  $lxdebug->enter_sub();
+  $form->mark_as_paid(\%myconfig,"ar");  
+  $lxdebug->leave_sub();
+}
+
 sub update {
   $lxdebug->enter_sub();