X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f27a8a8ff5f1949aaee43f1df987ca3d05ba5eba..15682dc47316fcc2deab66730045cd38afec001f:/SL/OE.pm

diff --git a/SL/OE.pm b/SL/OE.pm
index 916d41bda..c1d97a593 100644
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -180,8 +180,6 @@ sub save {
     $form->get_employee($dbh);
   }
 
-  $form->{contact_id} = $form->{cp_id};
-  $form->{contact_id} *= 1;
   $form->{payment_id} *= 1;
   $form->{language_id} *= 1;
   $form->{shipto_id} *= 1;
@@ -477,7 +475,7 @@ Message: $form->{message}\r| if $form->{message};
 	      delivery_vendor_id = $form->{delivery_vendor_id},
 	      delivery_customer_id = $form->{delivery_customer_id},
 	      employee_id = $form->{employee_id},
-              cp_id = $form->{contact_id}
+              cp_id = | . conv_i($form->{cp_id}, 'NULL') . qq|
               WHERE id = $form->{id}|;
   $dbh->do($query) || $form->dberror($query);