From 4014c3ffc450499ef9813ee8c86db093e4fcf86a Mon Sep 17 00:00:00 2001 From: mark Date: Fri, 12 Mar 2010 10:52:59 +0000 Subject: [PATCH 1/1] RT#7180: backport ECHECK_void_requires_account --- FS/FS/cust_main.pm | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index a2569f7ec..29d6fae46 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -3493,6 +3493,18 @@ sub realtime_refund_bop { ) { warn " attempting void\n" if $DEBUG > 1; my $void = new Business::OnlinePayment( $processor, @bop_options ); + if( $void->can('info') ) { # backported from 1.9 + if( $cust_pay->payby eq 'CARD' + and $void->info('CC_void_requires_card') ) { + $content{'card_number'} = $cust_pay->payinfo; + } + elsif( $cust_pay->payby eq 'CHEK' + and $void->info('ECHECK_void_requires_account') ) { + @content{'account_number', 'routing_code'} = + split('@', $cust_pay->payinfo); + $content{'name'} = $self->get('first') . ' ' . $self->get('last'); + } + } $void->content( 'action' => 'void', %content ); $void->submit(); if ( $void->is_success ) { -- 2.11.0