}
sub parts_scoping {
- SL::DB::Manager::Part->type_filter($_[0]);
+ # SL::DB::Manager::Part->type_filter($_[0]);
}
my %specs = ( ar => { number_column => 'invnumber', },
part => { number_column => 'partnumber', number_range_column => 'articlenumber', scoping => \&parts_scoping, },
service => { number_column => 'partnumber', number_range_column => 'servicenumber', scoping => \&parts_scoping, },
assembly => { number_column => 'partnumber', number_range_column => 'assemblynumber', scoping => \&parts_scoping, },
+ assortment => { number_column => 'partnumber', number_range_column => 'assortmentnumber', scoping => \&parts_scoping, },
);
sub get_next_trans_number {
dbh => $self->db->dbh,
select => $number_column,
tables => [ $self->meta->table ],
- columns => { $self->meta->table => [ $number_column ] },
+ columns => { $self->meta->table => [ $self->meta->column_names ] },
query_is_sql => 1,
%conditions_for_in_use,
);
my $range_table = ($business ? $business : SL::DB::Default->get)->load(for_update => 1);
my $start_number = $range_table->$number_range_column;
- $start_number = $range_table->articlenumber if ($number_range_column eq 'assemblynumber') && (length($start_number) < 1);
+ $start_number = $range_table->articlenumber if ($number_range_column =~ /^(assemblynumber|assortmentnumber)$/) && (length($start_number) < 1);
my $sequence = SL::PrefixedNumber->new(number => $start_number // 0);
if (!$fill_holes_in_range) {