use Text::CSV_XS;
use FS::Record qw( dbh qsearch qsearchs );
use FS::cust_pay;
+use FS::part_bill_event qw(due_events);
@ISA = qw(FS::Record);
sub import_results {
my $self = shift;
- my $param = @_;
+ my $param = ref($_[0]) ? shift : { @_ };
my $fh = $param->{'filehandle'};
my $format = $param->{'format'};