X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FCustomer.pm;h=8dd2a310d260e8604fbd300132659b467507367b;hb=832dce93297e0577b2f7acf6be3612adca7334d9;hp=048db7c101fb5e008f37263d9120197597dc6ec2;hpb=454d4b8fde0a834abf462fbf691d2f563d5aed66;p=kivitendo-erp.git diff --git a/SL/DB/Customer.pm b/SL/DB/Customer.pm index 048db7c10..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', @@ -46,6 +47,7 @@ sub validate { my @errors; push @errors, $::locale->text('The customer name is missing.') if !$self->name; + push @errors, $self->validate_ibans; return @errors; } @@ -65,5 +67,6 @@ sub displayable_name { sub is_customer { 1 }; sub is_vendor { 0 }; sub payment_terms { goto &payment } +sub number { goto &customernumber } 1;