X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FBusiness.pm;h=ada525da5421d37b9a8ebbf2ebb88d9c2d199c48;hb=1561b7f3d98390ba97bd5a81945f16e82d96915b;hp=badd0b5b4279bd3677707447cd74aef3240e9aed;hpb=78034f2431414b414d171b720bc0438635e19ae5;p=kivitendo-erp.git diff --git a/SL/DB/Business.pm b/SL/DB/Business.pm index badd0b5b4..ada525da5 100644 --- a/SL/DB/Business.pm +++ b/SL/DB/Business.pm @@ -1,13 +1,21 @@ -# This file has been auto-generated only because it didn't exist. -# Feel free to modify it at will; it will not be overwritten automatically. - package SL::DB::Business; use strict; use SL::DB::MetaSetup::Business; +use SL::DB::Manager::Business; + +__PACKAGE__->meta->initialize; + +sub validate { + my ($self) = @_; + + my @errors; + push @errors, $::locale->text('The description is missing.') if !$self->description; + push @errors, $::locale->text('The discount must not be negative.') if $self->discount < 0; + push @errors, $::locale->text('The discount must be less than 100%.') if $self->discount >= 1; -# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. -__PACKAGE__->meta->make_manager_class; + return @errors; +} 1;