X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/d1f44c84d990f57982854c6a4716c0f233f45bca..f03134bc436d7969247da0986809afc1567ae21b:/SL/DO.pm diff --git a/SL/DO.pm b/SL/DO.pm index 3dde867c2..1f431ce2d 100644 --- a/SL/DO.pm +++ b/SL/DO.pm @@ -1011,7 +1011,7 @@ sub order_details { push @{ $form->{TEMPLATE_ARRAYS}{si_unit}[$si_position-1] }, $si->{unit}; } - if ($form->{"assembly_$i"}) { + if ($form->{"part_type_$i"} eq 'assembly') { $sameitem = ""; # get parts and push them onto the stack @@ -1073,21 +1073,6 @@ sub order_details { $main::lxdebug->leave_sub(); } -sub project_description { - $main::lxdebug->enter_sub(); - - my ($self, $dbh, $id) = @_; - - my $form = $main::form; - - my $query = qq|SELECT description FROM project WHERE id = ?|; - my ($value) = selectrow_query($form, $dbh, $query, $id); - - $main::lxdebug->leave_sub(); - - return $value; -} - sub unpack_stock_information { $main::lxdebug->enter_sub();