X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Fvitelity.pm;fp=FS%2FFS%2Fpart_export%2Fvitelity.pm;h=824c54b6ca89a6cadb4682b0e63b6a47fcddc2d4;hb=cacff842d78e4fa6816d41e8804a0845211c2286;hp=29ed8b6a1f312ba58b9ffe6ea2ea702e62cdf961;hpb=38539c1c58d0907beee56c4d16f39bdebc6b03ad;p=freeside.git 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);