1 <% $cgi->redirect(popurl(3). "search/cust_pay.html?magic=paybatch;paybatch=$paybatch") %>
4 my $fh = $cgi->upload('csvfile');
7 my $paybatch = time2str('webbatch-%Y/%m/%d-%T'. "-$$-". rand() * 2**32, time);
9 my $error = defined($fh)
10 ? FS::cust_pay::batch_import( {
12 'format' => scalar($cgi->param('format')),
14 'agentnum' => scalar($cgi->param('agentnum')),
15 '_date' => scalar($cgi->param('_date')),
16 'paybatch' => $paybatch,