]> wagnertech.de Git - kivitendo-erp.git/blobdiff - bin/mozilla/do.pl
Vorlage fuer Lieferscheine auf dispatcher Mechanismus umgestellt
[kivitendo-erp.git] / bin / mozilla / do.pl
index 23989b302179ac78814592c829d0e1d59ce865f5..6a8b94b5597cb80cc78c6991e45f05fe9f633ef5 100644 (file)
@@ -1232,3 +1232,14 @@ sub no {
 sub update {
   call_sub($form->{update_nextsub} || $form->{nextsub} || 'update_delivery_order');
 }
+
+sub dispatcher {
+  foreach my $action (qw(update ship_to print e_mail save transfer_out transfer_in mark_closed save_as_new invoice delete)) {
+    if ($form->{"action_${action}"}) {
+      call_sub($action);
+      return;
+    }
+  }
+
+  $form->error($locale->text('No action defined.'));
+}