From: Ivan Kohler <ivan@freeside.biz>
Date: Tue, 12 Feb 2019 22:35:11 +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=9ad0cdfb307e346add9e3496cf3cbdc1eee4e7d8

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

diff --git a/FS/FS/Schema.pm b/FS/FS/Schema.pm
index 290c89daf..fc22d6c4f 100644
--- a/FS/FS/Schema.pm
+++ b/FS/FS/Schema.pm
@@ -5660,6 +5660,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 5a398ceaa..aa1c4067f 100644
--- a/FS/FS/cdr.pm
+++ b/FS/FS/cdr.pm
@@ -518,6 +518,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_$_",
@@ -681,6 +682,7 @@ sub rate_prefix {
     return $self->set_status_and_rated_price( 'skipped',
                                               0,
                                               $opt{'svcnum'},
+                                              'statustext' => $reason,
                                             );
   }