From e9946e925e33078b6e0a1f40c34ea59d2d7a15d3 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 Signed-off-by: Mike Rylander --- 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 9eef738b64..b0290a5244 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm @@ -1338,7 +1338,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