From 691fa49ab2c8d0076ba15825b4e683c87516eba3 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Thu, 5 May 2011 18:27:32 +0000
Subject: [PATCH] add lesnet CDR format

---
 FS/FS/cdr/lesnet.pm | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 FS/FS/cdr/lesnet.pm

diff --git a/FS/FS/cdr/lesnet.pm b/FS/FS/cdr/lesnet.pm
new file mode 100644
index 000000000..5a9482a8d
--- /dev/null
+++ b/FS/FS/cdr/lesnet.pm
@@ -0,0 +1,40 @@
+package FS::cdr::lesnet;
+
+use strict;
+use vars qw( @ISA %info );
+
+@ISA = qw(FS::cdr);
+
+%info = (
+  'name'          => 'LesNet',
+  'weight'        => 120,
+  'type'          => 'csv',
+  'import_fields' => [
+    # Call Date
+    'calldate',
+
+    # Source_Number
+    'src',
+
+    # Terminating_Number
+    'dst',
+
+    # Duration
+    sub { my($cdr,$field) = @_;
+            $cdr->duration($field);
+            $cdr->billsec($field);
+        },
+
+    'upstream_price',
+    
+    'dcontext',
+
+    'channel',
+    
+    # Sip Call id
+    'dstchannel',
+
+  ],
+);
+
+1;
-- 
2.11.0