diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2017-05-31 10:27:13 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2017-05-31 10:27:13 -0700 |
| commit | cacff842d78e4fa6816d41e8804a0845211c2286 (patch) | |
| tree | c410d3dac30d4cb05757c28120bf48dab0814755 | |
| parent | 38539c1c58d0907beee56c4d16f39bdebc6b03ad (diff) | |
additional vitelity debugging, RT#73618
| -rw-r--r-- | FS/FS/part_export/vitelity.pm | 3 |
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); |