From cacff842d78e4fa6816d41e8804a0845211c2286 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Wed, 31 May 2017 10:27:13 -0700
Subject: [PATCH] additional vitelity debugging, RT#73618

---
 FS/FS/part_export/vitelity.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/FS/FS/part_export/vitelity.pm b/FS/FS/part_export/vitelity.pm
index 29ed8b6a1..824c54b6c 100644
--- a/FS/FS/part_export/vitelity.pm
+++ b/FS/FS/part_export/vitelity.pm
@@ -3,6 +3,7 @@ use base qw( FS::part_export );
 
 use vars qw( %info );
 use Tie::IxHash;
+use Data::Dumper;
 use Geo::StreetAddress::US;
 use Net::Vitelity 0.05;
 use FS::Record qw( qsearch dbh );
@@ -322,6 +323,8 @@ sub _export_insert {
       'contactnumber' => $cust_main->daytime,
     );
 
+    warn Dumper($result) if $self->option('debug');
+
     if ( $result =~ /^ok:/i ) {
       my($ok, $portid, $sig, $bill) = split(':', $result);
       $svc_phone->lnp_portid($portid);
-- 
2.11.0