diff options
-rw-r--r-- | FS/FS/Schema.pm | 3 | ||||
-rw-r--r-- | FS/FS/cdr.pm | 2 |
2 files changed, 5 insertions, 0 deletions
diff --git a/FS/FS/Schema.pm b/FS/FS/Schema.pm index 290c89d..fc22d6c 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 5a398ce..aa1c406 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, ); } |