use strict;
use SL::DB::MetaSetup::Vendor;
+use SL::DB::Helper::TransNumberGenerator;
use SL::DB::VC;
__PACKAGE__->meta->make_manager_class;
__PACKAGE__->meta->initialize;
+__PACKAGE__->before_save('_before_save_set_vendornumber');
+
+sub _before_save_set_vendornumber {
+ my ($self) = @_;
+
+ $self->create_trans_number if $self->vendornumber eq '';
+}
+
1;