X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6cf3f7762efd40bee49a2b8f11bb4ab6915d9071..8a862ec020f773911c6ee60d459cc3206bfc7122:/SL/DB/TaxZone.pm diff --git a/SL/DB/TaxZone.pm b/SL/DB/TaxZone.pm index 7e0f2e725..ad96ee259 100644 --- a/SL/DB/TaxZone.pm +++ b/SL/DB/TaxZone.pm @@ -6,8 +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;