SL::DB::Order: Tests für new_from_multi

[mfinanz.git] / SL / Controller / Order.pm

diff --git a/SL/Controller/Order.pm b/SL/Controller/Order.pm
index 56326b51ccf679d48330c916f3fa8a55142026ee..0144529d593ecd1457ff74c1d86dcf256d2e6240 100644 (file)
--- a/SL/Controller/Order.pm
+++ b/SL/Controller/Order.pm
@@ -1405,7 +1405,11 @@ sub save {
 
     # link records
     if ($::form->{converted_from_oe_id}) {
-      SL::DB::Order->new(id => $::form->{converted_from_oe_id})->load->link_to_record($self->order);
+      my $src = SL::DB::Order->new(id => $::form->{converted_from_oe_id})->load;
+      # implement OE::_close_quotations_rfqs - this a 1 : 1 connection
+      # close only if workflow: quotation -> order. TODO test case
+      $src->update_attributes(closed => 1) if $src->type =~ /_quotation$/;
+      $src->link_to_record($self->order);
 
       if (scalar @{ $::form->{converted_from_orderitems_ids} || [] }) {
         my $idx = 0;