X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c607fb403082a05a5c9f16b084de5b99203bfad7..464f44accd46ed0b2e1f7e2459f53337a6720a7f:/bin/mozilla/do.pl

diff --git a/bin/mozilla/do.pl b/bin/mozilla/do.pl
index 6b72eeeb0..1f9419b39 100644
--- a/bin/mozilla/do.pl
+++ b/bin/mozilla/do.pl
@@ -836,15 +836,6 @@ sub invoice {
   my $currency = $form->{currency};
   invoice_links();
 
-  if ($form->{ordnumber}) {
-    require SL::DB::Order;
-    if (my $order = SL::DB::Manager::Order->find_by(ordnumber => $form->{ordnumber})) {
-      $order->load;
-      $form->{orddate} = $order->transdate_as_date;
-      $form->{$_}      = $order->$_ for qw(payment_id salesman_id taxzone_id quonumber);
-    }
-  }
-
   $form->{currency}     = $currency;
   $form->{exchangerate} = "";
   $form->{forex}        = $form->check_exchangerate(\%myconfig, $form->{currency}, $form->{invdate}, $buysell);