Lines 282-288
if ($op eq "show"){
Link Here
|
282 |
my @barcodelist = grep /\S/, ( split /[$split_chars]/, $list ); |
282 |
my @barcodelist = grep /\S/, ( split /[$split_chars]/, $list ); |
283 |
@barcodelist = uniq @barcodelist; |
283 |
@barcodelist = uniq @barcodelist; |
284 |
|
284 |
|
285 |
my $existing_items = Koha::Items->search({ barcode => \@barcodelist }); |
285 |
my $order = "field(" . join(",","barcode",@barcodelist) . ")"; |
|
|
286 |
my $existing_items = Koha::Items->search({ barcode => \@barcodelist }, |
287 |
{ order_by => \[$order] } ); |
286 |
@itemnumbers = $existing_items->get_column('itemnumber'); |
288 |
@itemnumbers = $existing_items->get_column('itemnumber'); |
287 |
my @barcodes = $existing_items->get_column('barcode'); |
289 |
my @barcodes = $existing_items->get_column('barcode'); |
288 |
my %exists = map {lc($_)=>1} @barcodes; |
290 |
my %exists = map {lc($_)=>1} @barcodes; |
289 |
- |
|
|