% if ( $error ) {
%   errorpage($error);
% } else {
    <% include("/elements/header.html",'Import successful') %>
    <!-- XXX redirect to batch search like the payment entry... -->
    <% include("/elements/footer.html",'Import successful') %> 
% }
<%init>

die "access denied"
  unless $FS::CurrentUser::CurrentUser->access_right('Import');

my $fh = $cgi->upload('csvfile');

my $error = defined($fh)
  ? FS::cdr::batch_import( {
      'filehandle' => $fh,
      'format'     => scalar($cgi->param('format')),
      'cdrbatch'   => scalar($cgi->param('cdrbatch')),
    } )
  : 'No file';

</%init>