View | Details | Raw Unified | Return to bug 6453
Collapse All | Expand All

(-)a/tools/inventory.pl (-3 / +2 lines)
Lines 194-200 if ( ! ($uploadbarcodes && length($uploadbarcodes)>0 ) || ( $input->param('compa Link Here
194
    if ( ( ( $input->param('compareinv2barcd') eq 'on' ) && ( scalar @brcditems != scalar @$res ) ) && length($uploadbarcodes) > 0 ){
194
    if ( ( ( $input->param('compareinv2barcd') eq 'on' ) && ( scalar @brcditems != scalar @$res ) ) && length($uploadbarcodes) > 0 ){
195
        if ( scalar @brcditems > scalar @$res ){
195
        if ( scalar @brcditems > scalar @$res ){
196
            for my $brcditem (@brcditems) {
196
            for my $brcditem (@brcditems) {
197
                if (! grep(/$brcditem->{barcode}/, @$res) ){
197
                if (! grep( $_->{barcode} =~ /$brcditem->{barcode}/ , @$res) ){
198
                    $brcditem->{notfoundkoha} = 1;
198
                    $brcditem->{notfoundkoha} = 1;
199
                    push @$res, $brcditem;
199
                    push @$res, $brcditem;
200
                }
200
                }
Lines 202-208 if ( ! ($uploadbarcodes && length($uploadbarcodes)>0 ) || ( $input->param('compa Link Here
202
        } else {
202
        } else {
203
            my @notfound;
203
            my @notfound;
204
            for my $item (@$res) {
204
            for my $item (@$res) {
205
                if ( ! grep(/$item->{barcode}/, @brcditems) ){
205
                if ( ! grep( $_->{barcode} =~ /$item->{barcode}/ , @brcditems) ){
206
                    $item->{notfoundbarcode} = 1;
206
                    $item->{notfoundbarcode} = 1;
207
                    push @notfound, $item;
207
                    push @notfound, $item;
208
                }
208
                }
209
- 

Return to bug 6453