X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FCustomer.pm;h=e3e30ddff6c2e59115579703d207050cecab7daf;hb=dc824520b4024bb73b4522a8dad9aae179b29540;hp=2e3fa68562bbb50ad5d95798aa0fef1ebb4310c2;hpb=eca0862f8bcc69d22d94c41cc9076a008c77056d;p=kivitendo-erp.git diff --git a/SL/DB/Customer.pm b/SL/DB/Customer.pm index 2e3fa6856..e3e30ddff 100644 --- a/SL/DB/Customer.pm +++ b/SL/DB/Customer.pm @@ -2,6 +2,8 @@ package SL::DB::Customer; use strict; +use Rose::DB::Object::Helpers qw(as_tree); + use SL::DB::MetaSetup::Customer; use SL::DB::Manager::Customer; use SL::DB::Helper::TransNumberGenerator; @@ -35,7 +37,7 @@ __PACKAGE__->before_save('_before_save_set_customernumber'); sub _before_save_set_customernumber { my ($self) = @_; - $self->create_trans_number if $self->customernumber eq ''; + $self->create_trans_number if !defined $self->customernumber || $self->customernumber eq ''; return 1; } @@ -51,4 +53,8 @@ sub displayable_name { return join ' ', grep $_, $self->customernumber, $self->name; } +sub is_customer { 1 }; +sub is_vendor { 0 }; +sub payment_terms { goto &payment } + 1;