FS/FS/cdr/lesnet.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
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;