X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/85f74d13afed6c9212ad0856b9f34a1f81f354c4..5df2b57a097f66f6cecba0aa577c7aaba3422ab6:/bin/mozilla/oe.pl

diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl
index 93f28f020..6c2569b6f 100644
--- a/bin/mozilla/oe.pl
+++ b/bin/mozilla/oe.pl
@@ -33,6 +33,7 @@
 
 use POSIX qw(strftime);
 
+use SL::DO;
 use SL::FU;
 use SL::OE;
 use SL::IR;
@@ -1813,7 +1814,8 @@ sub sales_order {
     delete($form->{ordnumber});
   }
 
-  $form->{cp_id} *= 1;
+  $form->{cp_id}  *= 1;
+  $form->{oe_ids}  = $form->{id};
 
   $form->{title} = $locale->text('Add Sales Order');
   $form->{vc}    = "customer";
@@ -1882,6 +1884,7 @@ sub delivery_order {
   require "bin/mozilla/do.pl";
 
   $form->{cp_id}           *= 1;
+  $form->{oe_ids}           = $form->{id};
   $form->{transdate}        = $form->current_date(\%myconfig);
   delete $form->{duedate};