- # no assortment items were passed, create a part, clone it several times
- # and add to assortment as assortment_items
- my @parts;
- my $part1 = SL::Dev::Part::create_part(partnumber => 'sp1',
- description => 'Testpart assortment',
- )->save;
- push(@parts, $part1);
-
- my $number_of_parts = delete $params{number_of_parts} || 3;
-
- for my $i ( 2 .. $number_of_parts ) {
- my $part = $parts[0]->clone_and_reset;
- $part->partnumber( ($part->partnumber // '') . " " . $i );
- $part->description( ($part->description // '') . " " . $i );
- $part->save;
- push(@parts, $part);
- }
- my $position = 0;
- foreach my $part ( @parts ) {
+ for my $i ( 1 .. delete $params{number_of_parts} || 3) {
+ my $part = SL::Dev::Part::create_part(partnumber => "$base_partnumber $i",
+ description => "Testpart $i",
+ )->save;