From e8e43b0e59cf50e7a3c0789f589046459bc658c1 Mon Sep 17 00:00:00 2001
From: jeff <jeff>
Date: Wed, 10 Jan 2007 00:42:23 +0000
Subject: [PATCH] ignore filenames and rely on selected batch number

---
 httemplate/misc/upload-batch.cgi     | 6 ++----
 httemplate/search/cust_pay_batch.cgi | 1 +
 2 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/httemplate/misc/upload-batch.cgi b/httemplate/misc/upload-batch.cgi
index 742bbc0c6..5b4961be3 100644
--- a/httemplate/misc/upload-batch.cgi
+++ b/httemplate/misc/upload-batch.cgi
@@ -1,10 +1,8 @@
 %
 %
 %  my $fh = $cgi->upload('batch_results');
-%  my $filename = $cgi->param('batch_results');
-%  $filename =~ /^(.*[\/\\])?([^\/\\]+)$/
-%    or die "unparsable filename: $filename\n";
-%  my $paybatch = $2;
+%  $cgi->param('batchnum') =~ /^(\d+)$/;
+%  my $paybatch = $1;
 %
 %  my $error = defined($fh)
 %    ? FS::cust_pay_batch::import_results( {
diff --git a/httemplate/search/cust_pay_batch.cgi b/httemplate/search/cust_pay_batch.cgi
index b2354b24e..9b0aaeca9 100755
--- a/httemplate/search/cust_pay_batch.cgi
+++ b/httemplate/search/cust_pay_batch.cgi
@@ -90,6 +90,7 @@
 %                    qq!<OPTION VALUE="BoM">Bank of Montreal ECA results</OPTION>!.
 %                    qq!</SELECT><BR>!;
 %    }
+%    $html_init .= qq!<INPUT TYPE="hidden" NAME="batchnum" VALUE="$batchnum">!;
 %    $html_init .= '<INPUT TYPE="submit" VALUE="Upload"></FORM><BR>';
 %  }
 %
-- 
2.11.0