X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FCustomer.pm;h=8dd2a310d260e8604fbd300132659b467507367b;hb=f5df17caa4a22bcb8abe4910b837ec86a84ba9f0;hp=e3e30ddff6c2e59115579703d207050cecab7daf;hpb=f16c552035ab973a9aed4a1dc29d0e16be7ff541;p=kivitendo-erp.git diff --git a/SL/DB/Customer.pm b/SL/DB/Customer.pm index e3e30ddff..8dd2a310d 100644 --- a/SL/DB/Customer.pm +++ b/SL/DB/Customer.pm @@ -6,6 +6,7 @@ use Rose::DB::Object::Helpers qw(as_tree); use SL::DB::MetaSetup::Customer; use SL::DB::Manager::Customer; +use SL::DB::Helper::IBANValidation; use SL::DB::Helper::TransNumberGenerator; use SL::DB::Helper::CustomVariables ( module => 'CT', @@ -41,6 +42,16 @@ sub _before_save_set_customernumber { return 1; } +sub validate { + my ($self) = @_; + + my @errors; + push @errors, $::locale->text('The customer name is missing.') if !$self->name; + push @errors, $self->validate_ibans; + + return @errors; +} + sub short_address { my ($self) = @_; @@ -56,5 +67,6 @@ sub displayable_name { sub is_customer { 1 }; sub is_vendor { 0 }; sub payment_terms { goto &payment } +sub number { goto &customernumber } 1;