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 |
- |
|
|