X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6c04c84648342f3116379296b2568100ebf273df..9ac80938379c017dda977dba51053c2983e3eb17:/SL/IC.pm

diff --git a/SL/IC.pm b/SL/IC.pm
index 191a2d300..163f59069 100644
--- a/SL/IC.pm
+++ b/SL/IC.pm
@@ -1698,6 +1698,16 @@ sub prepare_parts_for_printing {
     }
   }
 
+  my $parts = SL::DB::Manager::Part->get_all(query => [ id => \@part_ids ]);
+  my %parts_by_id = map { $_->id => $_ } @$parts;
+
+  for my $i (1..$rowcount) {
+    my $id = $form->{"${prefix}${i}"};
+    next unless $id;
+
+    push @{ $form->{TEMPLATE_ARRAYS}{part_type} },  $parts_by_id{$id}->type;
+  }
+
   $main::lxdebug->leave_sub();
 }