4 <% include('/elements/header.html','Import successful') %>
5 <% include('/elements/footer.html') %>
10 unless $FS::CurrentUser::CurrentUser->access_right('Import');
12 my $fh = $cgi->upload('csvfile');
16 my $error = defined($fh)
17 ? FS::cust_main::batch_import( {
19 agentnum => scalar($cgi->param('agentnum')),
20 refnum => scalar($cgi->param('refnum')),
21 pkgpart => scalar($cgi->param('pkgpart')),
22 #'fields' => [qw( cust_pkg.setup dayphone first last address1 address2
23 # city state zip comments )],
24 'format' => scalar($cgi->param('format')),