($form->{"reqdate_$i"}) ? qq|'$form->{"reqdate_$i"}'| : "NULL";
# get pricegroup_id and save ist
- ($null, my $pricegroup_id) = split /--/, $form->{"sellprice_drag_$i"};
+ ($null, my $pricegroup_id) = split /--/, $form->{"sellprice_pg_$i"};
$pricegroup_id *= 1;
$subtotal = $form->{"subtotal_$i"} * 1;
$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})