X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FOE.pm;h=c2cde7306823c188f27f74b734360677d0879d4f;hb=b8125c17c8add08c9b84fb054f797547a853dd3a;hp=df43e2a4ae3d3ee68494bef2213128bdf62f3ad9;hpb=be42a45043cab936e86e91aa895c6fc25bab079f;p=kivitendo-erp.git diff --git a/SL/OE.pm b/SL/OE.pm index df43e2a4a..c2cde7306 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -568,9 +568,10 @@ SQL name_prefix => 'ic_', name_postfix => "_$i", dbh => $dbh); + # link previous items with orderitems foreach (qw(orderitems invoice)) { - if ($form->{"converted_from_${_}_id_$i"}) { + if (!$form->{saveasnew} && $form->{"converted_from_${_}_id_$i"}) { RecordLinks->create_links('dbh' => $dbh, 'mode' => 'ids', 'from_table' => $_, @@ -578,11 +579,12 @@ SQL 'to_table' => 'orderitems', 'to_id' => $orderitems_id, ); - delete $form->{"converted_from_${_}_id_$i"}; } + delete $form->{"converted_from_${_}_id_$i"}; } } } + # search for orphaned ids $query = sprintf 'SELECT id FROM orderitems WHERE trans_id = ? AND NOT id IN (%s)', join ', ', ("?") x scalar @processed_orderitems; @values = (conv_i($form->{id}), map { conv_i($_) } @processed_orderitems);