X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2ae29658a1a3ca7dd001c967457fef8034c3b93a..b518ce7a5f88da626017fbc2ecd4f71f1aac1978:/SL/OE.pm diff --git a/SL/OE.pm b/SL/OE.pm index 0349977a7..2e5c8d696 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -866,6 +866,9 @@ sub retrieve { $stw->finish; } + # delete orderitems_id in collective orders, so that they get cloned no matter what + delete $ref->{orderitems_id} if (@ids); + #set expense_accno=inventory_accno if they are different => bilanz $vendor_accno = ($ref->{expense_accno} != $ref->{inventory_accno})