summaryrefslogtreecommitdiff
path: root/httemplate/misc/download-batch.cgi
diff options
context:
space:
mode:
authorJonathan Prykop <jonathan@freeside.biz>2015-12-22 00:28:53 -0600
committerJonathan Prykop <jonathan@freeside.biz>2016-01-05 21:06:41 -0600
commit1667ab631f9fbd0f4ceeb6ec000b0f4ff3ddb51a (patch)
treef1fae9a3e8f6a01782a45528c04e6e9d9ded749a /httemplate/misc/download-batch.cgi
parent9088495eea6c836c7086dec1e76839ed8e93e0be (diff)
RT#34295: Error when attempting to create batch payments [better handling of empty batches]
Diffstat (limited to 'httemplate/misc/download-batch.cgi')
-rw-r--r--httemplate/misc/download-batch.cgi13
1 files changed, 12 insertions, 1 deletions
diff --git a/httemplate/misc/download-batch.cgi b/httemplate/misc/download-batch.cgi
index f3a31eb3b..c4bc37e93 100644
--- a/httemplate/misc/download-batch.cgi
+++ b/httemplate/misc/download-batch.cgi
@@ -1,4 +1,4 @@
-<% $pay_batch->export_batch(%opt) %><%init>
+<% $exporttext %><%init>
#http_header('Content-Type' => 'text/comma-separated-values' ); #IE chokes
http_header('Content-Type' => 'text/plain' ); # not necessarily correct...
@@ -23,4 +23,15 @@ elsif ( $cgi->param('format') =~ /^([\w\- ]+)$/ ) {
my $pay_batch = qsearchs('pay_batch', { batchnum => $batchnum } );
die "Batch not found: '$batchnum'" if !$pay_batch;
+my $exporttext = $pay_batch->export_batch(%opt);
+unless ($exporttext) {
+ http_header('Content-Type' => 'text/html' );
+ $exporttext = <<EOF;
+<SCRIPT>
+alert('Batch was empty, and has been resolved');
+window.top.location.href = '${p}search/pay_batch.cgi?magic=_date;open=1;intransit=1;resolved=1';
+</SCRIPT>
+EOF
+}
+
</%init>