From 7a11fc96bf02c695e80b609a2cee76f48d6f02a0 Mon Sep 17 00:00:00 2001
From: Kyle M Hall <kyle@bywatersolutions.com>
Date: Wed, 28 Mar 2012 12:21:46 -0400
Subject: [PATCH] Barcode Prefixes - Followup - Add ability to use barcode prefixes with batch item modification/deletion tool
http://bugs.koha-community.org/show_bug.cgi?id=7676
---
tools/batchMod.pl | 2 ++
1 files changed, 2 insertions(+), 0 deletions(-)
diff --git a/tools/batchMod.pl b/tools/batchMod.pl
index 3ba93a8..b764a8b 100755
--- a/tools/batchMod.pl
+++ b/tools/batchMod.pl
@@ -216,6 +216,7 @@ if ($op eq "show"){
if ($filecontent eq 'barcode_file') {
foreach my $barcode (@contentlist) {
+ $barcode = barcodedecode( $barcode ) if ( C4::Context->preference('itemBarcodeInputFilter') || C4::Context->preference('itembarcodelength') );
my $itemnumber = GetItemnumberFromBarcode($barcode);
if ($itemnumber) {
@@ -239,6 +240,7 @@ if ($op eq "show"){
push my @barcodelist, split(/\s\n/, $list);
foreach my $barcode (@barcodelist) {
+ $barcode = barcodedecode( $barcode ) if ( C4::Context->preference('itemBarcodeInputFilter') || C4::Context->preference('itembarcodelength') );
my $itemnumber = GetItemnumberFromBarcode($barcode);
if ($itemnumber) {
--
1.7.2.5