From: Bill Erickson <berick@esilibrary.com>
Date: Thu, 16 Jun 2011 15:50:16 +0000 (-0400)
Subject: Repaired exchange rate PO activation bug
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=9ebe72e82e3eb27cc8eba9ff51f8069cb0c55996;p=contrib%2FConifer.git

Repaired exchange rate PO activation bug

Code was using the wrong hash key to read data from cstore request,
resulting in a NULL debit amount when activating a PO with a different
provider => fund currencies.  This resulted in POs that could not be
activated.

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
index 1440a93972..7c6b228345 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
@@ -689,7 +689,7 @@ sub create_lineitem_detail_debit {
                 $lid->fund->currency_type, # destination currency
                 $li->estimated_unit_price # source amount
             ]
-        })->[0]->{value};
+        })->[0]->{'acq.exchange_ratio'};
     }
 
     my $debit = create_fund_debit(