From 5cb4d011200281328b15ca3e0878c7ecd6f5d0e2 Mon Sep 17 00:00:00 2001
From: mark <mark>
Date: Fri, 18 Feb 2011 00:47:02 +0000
Subject: [PATCH] Telos XML SMS records, RT#10721

---
 FS/FS/cdr/telos_xml.pm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/FS/FS/cdr/telos_xml.pm b/FS/FS/cdr/telos_xml.pm
index a144f0ba4..8c82b7a0b 100644
--- a/FS/FS/cdr/telos_xml.pm
+++ b/FS/FS/cdr/telos_xml.pm
@@ -13,6 +13,7 @@ use FS::cdr qw(_cdr_date_parser_maker);
   'xml_format'    => {
     'xmlrow' => [ 'Telos_CDRS', 'CDRecord' ],
     'xmlkeys' => [ qw(
+      record_type
       seq_num
       a_party_num
       b_party_num
@@ -23,6 +24,12 @@ use FS::cdr qw(_cdr_date_parser_maker);
   },
 
   'import_fields' => [
+    sub { my($cdr, $data, $conf, $param) = @_;
+          $cdr->cdrtypenum($data);
+          # CDR type 2 = SMS records, set billsec = 1 so that 
+          # they'll be charged under per-call rating
+          $cdr->billsec(1) if ( $data == 2 );
+        },
     'uniqueid',
     'src',
     'dst', # usually empty for some reason
-- 
2.11.0