X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/01591fa72e7ca4af7143a573170a78e431728c92..7dd42f875621bd0b26efecaeb1fbc87e72b84c9a:/SL/OE.pm diff --git a/SL/OE.pm b/SL/OE.pm index a0a0abfc8..ef6f59792 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -958,7 +958,8 @@ sub _retrieve { $form->{useasnew} = 1 if $is_collective_order == 1; if (!$form->{id}) { - my $extra_days = $form->{type} eq 'sales_quotation' ? $::instance_conf->get_reqdate_interval : 1; + my $extra_days = $form->{type} eq 'sales_quotation' ? $::instance_conf->get_reqdate_interval : + $form->{type} eq 'sales_order' ? $::instance_conf->get_delivery_date_interval : 1; $form->{reqdate} = DateTime->today_local->next_workday(extra_days => $extra_days)->to_kivitendo; $form->{transdate} = DateTime->today_local->to_kivitendo; } @@ -1505,7 +1506,7 @@ sub order_details { $tax_rate = $taxrate * 100; push(@{ $form->{TEMPLATE_ARRAYS}->{tax_rate} }, qq|$tax_rate|); - if ($form->{"assembly_$i"}) { + if ($form->{"part_type_$i"} eq 'assembly') { $sameitem = ""; # get parts and push them onto the stack @@ -1616,19 +1617,6 @@ sub order_details { $main::lxdebug->leave_sub(); } -sub project_description { - $main::lxdebug->enter_sub(); - - my ($self, $dbh, $id) = @_; - - my $query = qq|SELECT description FROM project WHERE id = ?|; - my ($value) = selectrow_query($main::form, $dbh, $query, $id); - - $main::lxdebug->leave_sub(); - - return $value; -} - 1; __END__