X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FDB%2FRequirementSpec.pm;h=31dcfe89d3c8445935da538ac73943d262d84cff;hb=b2e1809f6b6d8852ab0086dcc61ae9540c18b83f;hp=99bf11631cd8d35ffc4a9e5a55a5c6fda9301924;hpb=d157b20fa9377ec48a8b00b7f5ccf8299897f0d2;p=kivitendo-erp.git diff --git a/SL/DB/RequirementSpec.pm b/SL/DB/RequirementSpec.pm index 99bf11631..31dcfe89d 100644 --- a/SL/DB/RequirementSpec.pm +++ b/SL/DB/RequirementSpec.pm @@ -3,6 +3,7 @@ package SL::DB::RequirementSpec; use strict; use SL::DB::MetaSetup::RequirementSpec; +use SL::DB::Manager::RequirementSpec; use SL::Locale::String; __PACKAGE__->meta->add_relationship( @@ -18,11 +19,10 @@ __PACKAGE__->meta->add_relationship( }, ); -# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. -__PACKAGE__->meta->make_manager_class; - __PACKAGE__->meta->initialize; +__PACKAGE__->before_save('_before_save_initialize_not_null_columns'); + sub validate { my ($self) = @_; @@ -32,4 +32,13 @@ sub validate { return @errors; } +sub _before_save_initialize_not_null_columns { + my ($self) = @_; + + $self->previous_section_number(0) if !defined $self->previous_section_number; + $self->previous_fb_number(0) if !defined $self->previous_fb_number; + + return 1; +} + 1;