3 % my $fh = $cgi->upload('batch_results');
4 % $cgi->param('batchnum') =~ /^(\d+)$/;
7 % my $error = defined($fh)
8 % ? FS::cust_pay_batch::import_results( {
10 % 'format' => $cgi->param('format'),
11 % 'paybatch' => $paybatch,
21 %# $cgi->param('error', $error);
22 %# print $cgi->redirect( "${p}cust_main-import.cgi
27 <% include("/elements/header.html",'Batch results upload successful') %>