[freeside-commits] branch master updated. e92c3b71a6182bdca0831ca4755ae0127e7e5180

[Ivan]

The branch, master has been updated
       via  e92c3b71a6182bdca0831ca4755ae0127e7e5180 (commit)
      from  c145d0efaf3c9d43ca6cad0ec36342f92a6dd646 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit e92c3b71a6182bdca0831ca4755ae0127e7e5180
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Wed May 31 18:55:25 2017 -0700

    fix vitelity addport via API?  RT#73618

diff --git a/FS/FS/part_export/vitelity.pm b/FS/FS/part_export/vitelity.pm
index 824c54b..2956326 100644
--- a/FS/FS/part_export/vitelity.pm
+++ b/FS/FS/part_export/vitelity.pm
@@ -323,13 +323,14 @@ sub _export_insert {
       'contactnumber' => $cust_main->daytime,
     );
 
-    warn Dumper($result) if $self->option('debug');
+    warn "Vitelity reponse: $result" if $self->option('debug');
 
     if ( $result =~ /^ok:/i ) {
       my($ok, $portid, $sig, $bill) = split(':', $result);
       $svc_phone->lnp_portid($portid);
       $svc_phone->lnp_signature('Y') if $sig  =~ /y/i;
       $svc_phone->lnp_bill('Y')      if $bill =~ /y/i;
+      local($FS::svc_Common::noexport_hack) = 1;
       return $svc_phone->replace;
     } else {
       return "Error initiating Vitelity port: $result";
@@ -512,6 +513,7 @@ sub check_lnp {
         # properly
         warn "ERROR provisioning ported-in DID ". $svc_phone->phonenum. ": $error";
       } else {
+        local($FS::svc_Common::noexport_hack) = 1;
         $error = $svc_phone->replace; #to set the lnp_status
         #XXX log this using our internal log instead, so we can alert on it
         warn "ERROR setting lnp_status for DID ". $svc_phone->phonenum. ": $error" if $error;
@@ -519,6 +521,7 @@ sub check_lnp {
 
     } elsif ( $result ne $svc_phone->lnp_reject_reason ) {
       $svc_phone->lnp_reject_reason($result);
+      local($FS::svc_Common::noexport_hack) = 1;
       $error = $svc_phone->replace;
       #XXX log this using our internal log instead, so we can alert on it
       warn "ERROR setting lnp_reject_reason for DID ". $svc_phone->phonenum. ": $error" if $error;

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/part_export/vitelity.pm |    5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)