X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/454d4b8fde0a834abf462fbf691d2f563d5aed66..2b8804456d1d3ee249a70d98679ea3a934b25a39:/SL/DB/Vendor.pm diff --git a/SL/DB/Vendor.pm b/SL/DB/Vendor.pm index b1458efc3..077982668 100644 --- a/SL/DB/Vendor.pm +++ b/SL/DB/Vendor.pm @@ -6,6 +6,7 @@ use Rose::DB::Object::Helpers qw(as_tree); use SL::DB::MetaSetup::Vendor; use SL::DB::Manager::Vendor; +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 vendor name is missing.') if !$self->name; + push @errors, $self->validate_ibans; return @errors; } @@ -59,5 +61,6 @@ sub displayable_name { sub is_customer { 0 }; sub is_vendor { 1 }; sub payment_terms { goto &payment } +sub number { goto &vendornumber } 1;