diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2015-12-26 12:30:18 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2015-12-26 12:30:18 -0800 |
| commit | dd003d59f56742f9374cec309ad81d527e88c846 (patch) | |
| tree | fa890d0a64c6713e29674deff8d0fae6560ca644 /httemplate/misc | |
| parent | 2040b70c10db3390b26777bc584d54333534419d (diff) | |
| parent | 7ec6e27220e3fe82405c911a4c52b24070438328 (diff) | |
Merge branch 'master' of git.freeside.biz:/home/git/freeside
Diffstat (limited to 'httemplate/misc')
| -rw-r--r-- | httemplate/misc/download-batch.cgi | 13 |
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> |