X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_main%2FBilling_Batch.pm;fp=FS%2FFS%2Fcust_main%2FBilling_Batch.pm;h=0cf2beeda9c12c999801075087118f5ecb9ed0c1;hp=c2416ab32a789d8cc8ace6e9c5a033003a419cd8;hb=c1a674eb92448c96c82517377069359c487d8642;hpb=974fceaaca8e1404750a60a4daafb568b1be5159 diff --git a/FS/FS/cust_main/Billing_Batch.pm b/FS/FS/cust_main/Billing_Batch.pm index c2416ab32..0cf2beeda 100644 --- a/FS/FS/cust_main/Billing_Batch.pm +++ b/FS/FS/cust_main/Billing_Batch.pm @@ -51,10 +51,22 @@ sub batch_card { return '' unless $amount > 0; my $invnum = delete $options{invnum}; - my $payby = $options{payby} || $self->payby; #still dubious + + #false laziness with Billing_Realtime + my @cust_payby = qsearch({ + 'table' => 'cust_payby', + 'hashref' => { 'custnum' => $self->custnum, }, + 'extra_sql' => " AND payby IN ( 'CARD', 'CHEK' ) ", + 'order_by' => 'ORDER BY weight ASC', + }); + + # batch can't try out every one like realtime, just use first one + my $cust_payby = $cust_payby[0] || $self; # somewhat dubious + + my $payby = $options{payby} || $cust_payby->payby; if ($options{'realtime'}) { - return $self->realtime_bop( FS::payby->payby2bop($self->payby), + return $self->realtime_bop( FS::payby->payby2bop($payby), $amount, %options, ); @@ -114,10 +126,10 @@ sub batch_card { 'state' => $options{state} || $loc->state, 'zip' => $options{zip} || $loc->zip, 'country' => $options{country} || $loc->country, - 'payby' => $options{payby} || $self->payby, - 'payinfo' => $options{payinfo} || $self->payinfo, - 'exp' => $options{paydate} || $self->paydate, - 'payname' => $options{payname} || $self->payname, + 'payby' => $options{payby} || $cust_payby->payby, + 'payinfo' => $options{payinfo} || $cust_payby->payinfo, + 'exp' => $options{paydate} || $cust_payby->paydate, + 'payname' => $options{payname} || $cust_payby->payname, 'amount' => $amount, # consolidating } );