X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2d7e4203055156dccb2ca3fba82bbb32873ecd2e..7038ccd5ea5b42f1c02c46dfa1dd23355d503ee7:/SL/DB/TaxZone.pm diff --git a/SL/DB/TaxZone.pm b/SL/DB/TaxZone.pm index 3dfb31355..ad96ee259 100644 --- a/SL/DB/TaxZone.pm +++ b/SL/DB/TaxZone.pm @@ -6,10 +6,21 @@ package SL::DB::TaxZone; use strict; use SL::DB::MetaSetup::TaxZone; +use SL::DB::Manager::TaxZone; +use SL::DB::Helper::ActsAsList; __PACKAGE__->meta->initialize; # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. -__PACKAGE__->meta->make_manager_class; +#__PACKAGE__->meta->make_manager_class; + +sub validate { + my ($self) = @_; + + my @errors; + push @errors, $::locale->text('The description is missing.') if !$self->description; + + return @errors; +} 1;