diff options
| author | Christopher Burger <burgerc@freeside.biz> | 2019-03-12 17:02:07 -0400 |
|---|---|---|
| committer | Christopher Burger <burgerc@freeside.biz> | 2019-03-13 10:03:47 -0400 |
| commit | 2163c682341bebc40b83dbe5bc7f027b17b6a50f (patch) | |
| tree | 9eb098babb16e1c339e7aad8e2d0abf71fd00afb /httemplate | |
| parent | 6a29166de4ccb8d3be83a407bb0b909b066592e8 (diff) | |
RT# 82988 - added check for batch payment upload scripts to make sure they can handle credit batches.
Diffstat (limited to 'httemplate')
| -rw-r--r-- | httemplate/misc/download-batch.cgi | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/httemplate/misc/download-batch.cgi b/httemplate/misc/download-batch.cgi index c6a0b68c3..e4882d1e8 100644 --- a/httemplate/misc/download-batch.cgi +++ b/httemplate/misc/download-batch.cgi @@ -4,6 +4,7 @@ http_header('Content-Type' => 'text/plain' ); # not necessarily correct... my $batchnum; + if ( $cgi->param('batchnum') =~ /^(\d+)$/ ) { $batchnum = $1; } else { @@ -29,7 +30,7 @@ die "Batch not found: '$batchnum'" if !$pay_batch; if ($pay_batch->{Hash}->{arecredits}) { my $export_format = "FS::pay_batch::".$opt{'format'}; - die "This format can not handle refunds." unless $export_format->can('can_handle_credits'); + die "You are trying to download a credit (batch refund) batch and The format ".$opt{'format'}." can not handle refunds.\n" unless $export_format->can('can_handle_credits'); } my $exporttext = $pay_batch->export_batch(%opt); |