- # Let Lx-Office assign a new order number if the user hasn't changed the
- # previous one. If it has been changed manually then use it as-is.
- my $idx = $form->{type} =~ /_quotation$/ ? "quonumber" : "ordnumber";
- if ($form->{saved_xyznumber} &&
- ($form->{saved_xyznumber} eq $form->{$idx})) {
- delete($form->{$idx});
- }