From: Bill Erickson <berick@esilibrary.com>
Date: Tue, 6 Mar 2012 13:54:55 +0000 (-0500)
Subject: ACQ MARC upload barcode extraction
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=refs%2Fheads%2Fuser%2Fberick%2Facq-upload-extract-barcode;p=working%2FEvergreen.git

ACQ MARC upload barcode extraction

Using "barcode" as the key, it's now possible to extract copy barcodes,
in addition to price, quantity, fund, etc., during ACQ vendor MARC file
upload.

Signed-off-by: Bill Erickson <berick@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm
index 1b1aff30e9..c7ca67f725 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm
@@ -1343,7 +1343,8 @@ sub import_lineitem_details {
                 circ_modifier   => $$compiled{circ_modifier},
                 note            => $$compiled{note},
                 location        => $$compiled{copy_location},
-                collection_code => $$compiled{collection_code}
+                collection_code => $$compiled{collection_code},
+                barcode         => $$compiled{barcode}
             ) or return 0;
         }