Swiss QR-Bill: QR-Code in Printablauf nur für Formname "Rechnung" erzeugen
authorCem Aydin <cem.aydin@gmx.ch>
Wed, 19 Jan 2022 17:17:46 +0000 (18:17 +0100)
committerCem Aydin <cem.aydin@gmx.ch>
Wed, 19 Jan 2022 22:30:44 +0000 (23:30 +0100)
SL/Template/OpenDocument.pm

index db25455..9f77d57 100644 (file)
@@ -359,7 +359,7 @@ sub parse {
   close(OUT);
 
   my $qr_image_path;
-  if ($::instance_conf->get_create_qrbill_invoices) {
+  if ($::instance_conf->get_create_qrbill_invoices && $form->{formname} eq 'invoice') {
     # the biller account information, biller address and the reference number,
     # are needed in the template aswell as in the qr-code generation, therefore
     # assemble these and add to $::form
@@ -435,7 +435,7 @@ sub parse {
     $zip->contents("styles.xml", Encode::encode('utf-8-strict', $new_styles));
   }
 
-  if ($::instance_conf->get_create_qrbill_invoices) {
+  if ($::instance_conf->get_create_qrbill_invoices && $form->{formname} eq 'invoice') {
     # get placeholder path from odt XML
     my $qr_placeholder_path;
     my $dom = XML::LibXML->load_xml(string => $contents);