FS/FS/cdr/telapi_voip.pm

   1 package FS::cdr::telapi_voip;
   2 use base qw( FS::cdr );
   3
   4 use strict;
   5 use vars qw( @ISA %info $CDR_TYPES );
   6 use FS::Record qw( qsearch );
   7 use FS::cdr qw( _cdr_date_parser_maker _cdr_min_parser_maker );
   8
   9 %info = (
  10   'name'          => 'telapi_voip (csv file)',
  11   'weight'        => 601,
  12   'header'        => 1,
  13   'type'          => 'csv',
  14   'import_fields' => [
  15     skip(1),                              # Inbound/Outbound
  16     _cdr_date_parser_maker('startdate'),  # date
  17     skip(1),                              # cost per minute
  18     'upstream_price',                     # call cost
  19     'billsec',                            # duration
  20     'src',                                # source
  21     'dst',                                # destination
  22     skip(1),                              # hangup code
  23   ],
  24 );
  25
  26 sub skip { map {''} (1..$_[0]) }
  27
  28 1;