blob: e039328baab1eb4eac60dffb55f7e976656ebff5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
package FS::cust_main::import_charges::simple;
use strict;
use base qw( FS::cust_main::Import_Charges );
use vars qw ( %info );
# simple field format
my @fields = ('custnum', 'agent_custid', 'amount', 'pkg');
# hash of charges (pkg) to charge. if empty charge them all.
# '911 services' => '1',
my $charges = {};
%info = (
'fields' => [@fields],
'charges' => $charges,
'name' => 'Simple',
'weight' => '1',
'disabled' => '',
);
1;
|