From 62ac28eecd116eb0a806c2b354f216423ea43821 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Bernd=20Ble=C3=9Fmann?= Date: Tue, 23 Mar 2021 11:06:06 +0100 Subject: [PATCH] Mahnungen: Rechnungsnummer der Mahnrechung im PDF-Dateinamen statt dunning_id MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Der Dateiname wird auch als Name des Anhangs bei Mailversand verwendet und dann sieht es besser aus, wenn der Name auch mit der Rechnunsgnummer übereinstimmt. --- SL/DN.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/SL/DN.pm b/SL/DN.pm index ea47209b2..1a615011f 100644 --- a/SL/DN.pm +++ b/SL/DN.pm @@ -1136,7 +1136,7 @@ sub print_invoice_for_fees { $self->set_customer_cvars($myconfig, $form); $self->set_template_options($myconfig, $form); - my $filename = Common::unique_id() . "dunning_invoice_${dunning_id}.pdf"; + my $filename = Common::unique_id() . "dunning_invoice_" . $form->{invnumber} . ".pdf"; my $spool = $::lx_office_conf{paths}->{spool}; $form->{OUT} = "$spool/$filename"; @@ -1145,7 +1145,7 @@ sub print_invoice_for_fees { map { delete $form->{$_} } grep /^[a-z_]+_\d+$/, keys %{ $form }; - my $attachment_filename = $form->get_formname_translation('dunning_invoice') . "_${dunning_id}.pdf"; + my $attachment_filename = $form->get_formname_translation('dunning_invoice') . "_" . $form->{invnumber} . ".pdf"; $form->{attachment_filename} = $attachment_filename; $form->{attachment_type} = "dunning"; $form->{attachment_id} = $invoice_id; -- 2.20.1