FS/FS/cust_main/import_charges/ooma.pm

   1 package FS::cust_main::import_charges::ooma;
   2
   3 use strict;
   4 use base qw( FS::cust_main::Import_Charges );
   5 use vars qw ( %info );
   6
   7 # ooma fields
   8 my @fields =  ('userfield1', 'userfield2', 'userfield3', 'userfield4', 'userfield5', 'userfield6', 'userfield7', 'userfield8', 'amount', 'userfield10', 'userfield11', 'userfield12', 'userfield13', 'userfield14', 'userfield15', 'userfield16', 'pkg', 'userfield18', 'custnum', 'userfield20', 'userfield21', 'userfield22', 'userfield23', 'userfield24', 'userfield25', );
   9 # hash of charges (pkg) to charge.  if empty charge them all.
  10 # '911 services' => '1',
  11 my $charges = {};
  12
  13 %info = (
  14   'fields'   => [@fields],
  15   'charges'  => $charges,
  16   'name'     => 'Ooma',
  17   'weight'   => '10',
  18   'disabled' => '',
  19 );
  20
  21 1;