diff options
| author | Christopher Burger <burgerc@freeside.biz> | 2019-03-10 19:12:20 -0400 |
|---|---|---|
| committer | Christopher Burger <burgerc@freeside.biz> | 2019-03-11 17:51:49 -0400 |
| commit | 7c079bd8cb5ccf5381ac0c054438efcd0645ddbf (patch) | |
| tree | 7747111d708a6e00e33d62368ef985e4472b36ef /FS/bin/freeside-eftca-upload | |
| parent | 038ad47addd4168c74165c4a79051e4d2599258e (diff) | |
RT# 82988 - Fixed so only formats that can handle electronic refunds can download those files
Conflicts:
httemplate/view/cust_main/menu.html
Diffstat (limited to 'FS/bin/freeside-eftca-upload')
| -rwxr-xr-x | FS/bin/freeside-eftca-upload | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/FS/bin/freeside-eftca-upload b/FS/bin/freeside-eftca-upload index 55e97744f..905886ee2 100755 --- a/FS/bin/freeside-eftca-upload +++ b/FS/bin/freeside-eftca-upload @@ -32,8 +32,12 @@ my @batches; if($opt_a) { local $@; + + my %criteria= ( 'status' => 'O', 'payby' => 'CHEK' ); + $criteria{'type'} = 'DEBIT' unless FS::pay_batch->can_handle_electronic_refunds('eft_canada'); + eval { - @batches = qsearch('pay_batch', { 'status' => 'O', 'payby' => 'CHEK' }) + @batches = qsearch('pay_batch', \%criteria) }; log_error_and_die ("Fatal database error: $@") if $@; |