|
Lines 328-334
if ( $compareinv2barcd ) {
Link Here
|
| 328 |
my $barcode = $item->{barcode}; |
328 |
my $barcode = $item->{barcode}; |
| 329 |
if( !$barcode ) { |
329 |
if( !$barcode ) { |
| 330 |
$item->{problems}->{no_barcode} = 1; |
330 |
$item->{problems}->{no_barcode} = 1; |
| 331 |
} elsif ( grep /^$barcode$/, @scanned_barcodes ) { |
331 |
} elsif ( grep { $_ eq $barcode } @scanned_barcodes ) { |
| 332 |
next; |
332 |
next; |
| 333 |
} else { |
333 |
} else { |
| 334 |
$item->{problems}->{not_scanned} = 1; |
334 |
$item->{problems}->{not_scanned} = 1; |
| 335 |
- |
|
|