projekt kivitendo

use Carp;

use List::Util qw(max);

use SL::PrefixedNumber;

sub oe_scoping {

  my @numbers        = map { $_->$number_column } @{ $self->_get_manager_class->get_all(%conditions) };

  my %numbers_in_use = map { ( $_ => 1 )        } @numbers;

  my $defaults       = SL::DB::Default->get;

  $number_range_column = 'articlenumber' if $number_range_column eq 'assemblynumber' and length($defaults->$number_range_column) < 1;

  my $sequence       = SL::PrefixedNumber->new(number => $defaults->$number_range_column);