]> wagnertech.de Git - mfinanz.git/blobdiff - bin/mozilla/oe.pl
Auftrags-Controller: Funktion "Speichern und Lieferschein".
[mfinanz.git] / bin / mozilla / oe.pl
index f7cf9331f742cc9d8c31e1888ce8de1e1a11c815..91c5a983804954d0d18e926df6d102d0c807d33a 100644 (file)
@@ -1934,6 +1934,19 @@ sub delivery_order {
   $main::lxdebug->leave_sub();
 }
 
+sub oe_delivery_order_from_order {
+
+  return if !$::form->{id};
+
+  my $order = SL::DB::Order->new(id => $::form->{id})->load;
+  $order->flatten_to_form($::form, format_amounts => 1);
+
+  # fake last empty row
+  $::form->{rowcount}++;
+
+  delivery_order();
+}
+
 sub e_mail {
   $main::lxdebug->enter_sub();