From 685eb3671cba291d97702fa9ad023c1f0d6f1d21 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Wed, 2 Nov 2016 15:00:24 -0400 Subject: [PATCH] LP#1513872 EDIWriter NAD+BY++31B support Signed-off-by: Bill Erickson --- Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIWriter.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIWriter.pm b/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIWriter.pm index b4828599fa..412cb8cc88 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIWriter.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Utils/EDIWriter.pm @@ -384,7 +384,7 @@ BGM+220+$c{po_id}+9' DTM+137:$date:102' EDI - $edi .= "NAD+BY+$c{org_unit_san}::31B\n" + $edi .= "NAD+BY+$c{org_unit_san}::31B'\n" unless $self->{compiled}->{edi_attrs}->{BUYER_ID_INCLUDE_VENDCODE}; $edi .= <