X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/78912e55533a48109adc11e798101b29e174728d..991d16bbbc32c05e2e30e00711a42ba20207a8db:/SL/OE.pm diff --git a/SL/OE.pm b/SL/OE.pm index d8c66f5ef..3dd91bb97 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -578,16 +578,20 @@ SQL name_prefix => 'ic_', name_postfix => "_$i", dbh => $dbh); - # link quotation items with order items and delete entry (just one link) - if ($form->{"converted_from_quotation_orderitems_id_$i"}) { - RecordLinks->create_links('dbh' => $dbh, - 'mode' => 'ids', - 'from_table' => 'orderitems', - 'from_ids' => $form->{"converted_from_quotation_orderitems_id_$i"}, - 'to_table' => 'orderitems', - 'to_id' => $orderitems_id, - ); - delete $form->{"converted_from_quotation_orderitems_id_$i"}; + # link previous items with orderitems + foreach (qw(quotation_orderitems orderitems invoice)) { + if ($form->{"converted_from_${_}_id_$i"}) { + my $table = $_; + $table = 'orderitems' if $table eq 'quotation_orderitems'; + RecordLinks->create_links('dbh' => $dbh, + 'mode' => 'ids', + 'from_table' => $table, + 'from_ids' => $form->{"converted_from_${_}_id_$i"}, + 'to_table' => 'orderitems', + 'to_id' => $orderitems_id, + ); + delete $form->{"converted_from_${_}_id_$i"}; + } } } }