From: Ivan Kohler <ivan@freeside.biz>
Date: Tue, 12 Feb 2019 22:35:14 +0000 (-0800)
Subject: save skip reason for CDR, RT#81480
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=24c2d0b0530f4ffc09ca3a474aa756d3fffda499

save skip reason for CDR, RT#81480
---

diff --git a/FS/FS/Schema.pm b/FS/FS/Schema.pm
index b9df65062..a376dd9b4 100644
--- a/FS/FS/Schema.pm
+++ b/FS/FS/Schema.pm
@@ -5599,6 +5599,9 @@ sub tables_hashref {
         #NULL, done (or something)
         'freesidestatus', 'varchar',   'NULL',     32,   '', '', 
 
+        #additional status info (i.e. reason for "skipped" freesidestatus)
+        'freesidestatustext', 'text',  'NULL',     '',   '', '',
+
         #NULL, done (or something)
         'freesiderewritestatus', 'varchar',   'NULL',     32,   '', '', 
 
diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm
index 57cbbb216..37cb30d9a 100644
--- a/FS/FS/cdr.pm
+++ b/FS/FS/cdr.pm
@@ -519,6 +519,7 @@ sub set_status_and_rated_price {
   } else {
 
     $self->freesidestatus($status);
+    $self->freesidestatustext($opt{'statustext'}) if exists($opt{'statustext'});
     $self->rated_price($rated_price);
     $self->$_($opt{$_})
       foreach grep exists($opt{$_}), map "rated_$_",
@@ -682,6 +683,7 @@ sub rate_prefix {
     return $self->set_status_and_rated_price( 'skipped',
                                               0,
                                               $opt{'svcnum'},
+                                              'statustext' => $reason,
                                             );
   }