FS/FS/cust_main/import_charges/gcet.pm

   1 package FS::cust_main::import_charges::gcet;
   2
   3 use strict;
   4 use base qw( FS::cust_main::Import_Charges );
   5 use vars qw ( %info );
   6
   7 # gcet fields.
   8 my @fields = ( 'userfield1', 'userfield2', 'userfield3', 'userfield4', 'userfield5', 'userfield6', 'userfield7', 'userfield8', 'userfield9', 'userfield10', 'amount', 'userfield12', 'userfield13', 'userfield14', 'userfield15', 'userfield16', 'userfield17', 'userfield18', 'pkg', 'userfield20', 'custnum', 'userfield22', 'userfield23', 'userfield24', 'userfield25', );
   9 # hash of charges (pkg) to charge.  if empty charge them all.
  10 # '911 services' => '1',
  11 my $charges = {
  12   'DISABILITY ACCESS/ENHANCED 911 SERVICES SURCHARGE' => '1',
  13   'FEDERAL TRS FUND'                                  => '1',
  14   'FEDERAL UNIVERSAL SERVICE FUND'                    => '1',
  15   'STATE SALES TAX'                                   => '1',
  16 };
  17
  18 %info = (
  19   'fields'   => [@fields],
  20   'charges'  => $charges,
  21   'name'     => 'Gcet',
  22   'weight'   => '30',
  23   'disabled' => '1',
  24 );
  25
  26 1;