X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/59b1c4c2f5f09f6cffa9b9240ee31ca56b80bb7e..5da10e0193a990f94c50252738f33f42d0e7e567:/SL/DB/Customer.pm diff --git a/SL/DB/Customer.pm b/SL/DB/Customer.pm index cb51f90f6..7d36338dd 100644 --- 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;