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-Tag: sprint4-merge-nov22~5490
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=38332f0bbc18de90a3b83876a3249b3d3e4883bc;p=working%2FEvergreen.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/lib/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm
index 917b20f4b9..dafa288e6e 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm
+++ b/Open-ILS/src/perlmods/lib/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(