summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2017-05-31 10:27:15 -0700
committerIvan Kohler <ivan@freeside.biz>2017-05-31 10:27:15 -0700
commit16ffa8d9479d9ade204cdf3fdf73801eb4985002 (patch)
treef43816aa3d6facc9a41b728969c932cbbfb93283
parent226974d51b200d3881ef8718c87f2faad2c10c97 (diff)
additional vitelity debugging, RT#73618
-rw-r--r--FS/FS/part_export/vitelity.pm3
1 files changed, 3 insertions, 0 deletions
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);