X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c2eb03d45b1602b75a2a3074d5baaf650f1eb631..826f6eb2b3e:/SL/OE.pm diff --git a/SL/OE.pm b/SL/OE.pm index ceca51a4f..aaaef1646 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -535,14 +535,18 @@ sub save { $pricegroup_id *= 1; $pricegroup_id = undef if !$pricegroup_id; - if ( $::instance_conf->get_order_always_project && !$form->{"globalproject_id"} && ( $form->{type} eq 'sales_order' ) ) { + # force new project, if not set yet + if ($::instance_conf->get_order_always_project && !$form->{"globalproject_id"} && ($form->{type} eq 'sales_order')) { + require SL::DB::Customer; + my $customer = SL::DB::Manager::Customer->find_by(id => $form->{customer_id}); + die "Can't find customer" unless $customer; my $new_project = SL::DB::Project->new( - projectnumber => $form->{ordnumber}, - description => $form->{customer}, - active => 1, - project_type_id => $::instance_conf->get_project_type_id, + projectnumber => $form->{ordnumber}, + description => $customer->name, + customer_id => $customer->id, + active => 1, + project_type_id => $::instance_conf->get_project_type_id, project_status_id => $::instance_conf->get_project_status_id, - # id => $form->{globalproject_id} ); $new_project->save; $form->{"globalproject_id"} = $new_project->id;