From: ivan <ivan>
Date: Wed, 20 Oct 2004 10:02:54 +0000 (+0000)
Subject: Ask for ',' delimiter and '"' quote explicitly to prevent problems when a merchant... 
X-Git-Tag: BUSINESS_ONLINEPAYMENT_AUTHORIZENET_3_15~2
X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-AuthorizeNet.git;a=commitdiff_plain;h=f2454fa86f1bc49313933a4a6c38998fa369a42d

Ask for ',' delimiter and '"' quote explicitly to prevent problems when a merchant has them configured differently
---

diff --git a/AuthorizeNet.pm b/AuthorizeNet.pm
index abe5f7b..351d269 100644
--- a/AuthorizeNet.pm
+++ b/AuthorizeNet.pm
@@ -12,7 +12,7 @@ require Exporter;
 @ISA = qw(Exporter AutoLoader Business::OnlinePayment);
 @EXPORT = qw();
 @EXPORT_OK = qw();
-$VERSION = '3.14';
+$VERSION = '3.15';
 
 sub set_defaults {
     my $self = shift;
@@ -191,6 +191,8 @@ sub submit {
         x_Currency_Code x_Trans_ID/);
     $post_data{'x_Test_Request'} = $self->test_transaction()?"TRUE":"FALSE";
     $post_data{'x_ADC_Delim_Data'} = 'TRUE';
+    $post_data{'x_delim_char'} = ',';
+    $post_data{'x_encap_char'} = '"';
     $post_data{'x_ADC_URL'} = 'FALSE';
     $post_data{'x_Version'} = '3.1';
 
diff --git a/Changes b/Changes
index 7008663..5d4898c 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
 Revision history for Perl extension Business::OnlinePayment::AuthorizeNet.
 
+3.15  unreleased
+	- Ask for ',' delimiter and '"' quote explicitly to prevent problems
+	  when a merchant has them configured differently.
+
 3.14  Tue Sep 21 01:10:46 PDT 2004
 	- Added ship_ name/address fields
 	- Fixed required fields for echeck voiding