From b97d200e294a3030d4df6f2bb8487c14cf363d6b Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Tue, 6 Mar 2012 08:54:55 -0500 Subject: [PATCH] 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 --- Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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; } -- 2.11.0