ZUGFeRD: Einstellung bzgl. Erzeugung auch in Kundenstammdaten

[mfinanz.git] / SL / DB / Customer.pm

diff --git a/SL/DB/Customer.pm b/SL/DB/Customer.pm
index cb51f90f632064dec5d849c18b1c749e8ff866dc..7d36338dd7542d3700a56bbc3ef67596603ec109 100644 (file)
--- a/SL/DB/Customer.pm
+++ b/SL/DB/Customer.pm
@@ -98,4 +98,12 @@ sub is_vendor   { 0 };
 sub payment_terms { goto &payment }
 sub number { goto &customernumber }
 
+sub create_zugferd_invoices_for_this_customer {
+  my ($self) = @_;
+
+  no warnings 'once';
+  return $::instance_conf->get_create_zugferd_invoices if $self->create_zugferd_invoices == -1;
+  return $self->create_zugferd_invoices;
+}
+
 1;