X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/54ce51443886623bb785e7c54492ecbc8dc9b3aa..bcc996e65643:/SL/Helper/MassPrintCreatePDF.pm

diff --git a/SL/Helper/MassPrintCreatePDF.pm b/SL/Helper/MassPrintCreatePDF.pm
index 454088e6d..66fbaf2b9 100644
--- a/SL/Helper/MassPrintCreatePDF.pm
+++ b/SL/Helper/MassPrintCreatePDF.pm
@@ -7,8 +7,6 @@ our @EXPORT_OK = qw(create_massprint_pdf merge_massprint_pdf create_pdfs print_p
 our %EXPORT_TAGS = (
   all => \@EXPORT_OK,
 );
-use SL::Helper::CreatePDF qw(:all);
-use SL::Helper::File qw(store_pdf append_general_pdf_attachments);
 
 sub create_pdfs {
   my ($self, %params) = @_;
@@ -39,6 +37,9 @@ sub create_massprint_pdf {
   # flatten_to_form sets payment_terms from customer/vendor - we do not want that here
   # really ??
   delete $form->{payment_terms} if !$form->{payment_id};
+  for my $i (1 .. $form->{rowcount}) {
+    $form->{"sellprice_$i"} = $form->{"fxsellprice_$i"};
+  }
 
   $form->prepare_for_printing;
   $form->{attachment_filename} = $form->generate_attachment_filename;
@@ -166,4 +167,3 @@ Martin Helmling E<lt>martin.helmling@opendynamic.deE<gt>
 
 
 =cut
-