From 443e237ff0dbd22131349e65e4a86c3f3c73c7c9 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Bernd=20Ble=C3=9Fmann?= Date: Thu, 4 Jun 2020 11:41:23 +0200 Subject: [PATCH] Original-Rechnung bei Mahnung Drucken: sellprice aus fxsellprice setzen MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Sonst stimmt z.B. der Rabatt nicht, da sellprice in der DB den rabattierten Wert enthält/enthalten kann. sellprice wird aber in IS::invoice_details ( aufgerufen aus Form::prepare_for_printing) als unrabattierter Einzelpreis verwendet. --- SL/DN.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/SL/DN.pm b/SL/DN.pm index 976b6aab1..46ab23a5b 100644 --- a/SL/DN.pm +++ b/SL/DN.pm @@ -1128,6 +1128,9 @@ sub print_original_invoices { $print_form->{media} = 'file'; # no language override, should always be the object's language $invoice->flatten_to_form($print_form, format_amounts => 1); + for my $i (1 .. $print_form->{rowcount}) { + $print_form->{"sellprice_$i"} = $print_form->{"fxsellprice_$i"}; + } $print_form->prepare_for_printing; my $filename = SL::Helper::CreatePDF->create_pdf( -- 2.20.1