Capture net/gross unit price

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

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIReader.pm b/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIReader.pm
index bd3c8e1..ef28eef 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIReader.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIReader.pm
@@ -19,7 +19,8 @@ my %edi_li_fields = (
     id      => '^RFF\+LI:\S+\/(\S+)',
     index   => '^LIN\+([^\+]+)',
     amount_billed   => '^MOA\+203:(\d+)',
-    unit_price      => '^PRI\+AAB:(\d+)',
+    net_unit_price  => '^PRI\+AAA:(\d+)',
+    gross_unit_price=> '^PRI\+AAB:(\d+)',
     expected_date   => '^DTM\+44:([^:]+)'
 );