From 2de6424381005fd17eec908f1cfe141711a81bc6 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Mon, 15 Dec 2014 13:56:53 -0500 Subject: [PATCH] EDI avoid canceling backorder items (from bradley patch) -- part 2 Signed-off-by: Bill Erickson --- Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm index e0fc040277..5e4e2269c7 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/EDI.pm @@ -724,6 +724,11 @@ sub process_parsed_msg { $logger->info("EDI: LI $li_id -- $qty_count in transit"); next; } + + if ($qty_code eq '83') { + $logger->info("EDI: LI $li_id -- backordered $qty_count"); + next; + } # 84: urgent delivery # 118: quantity manifested # ... -- 2.11.0