From e670183bbb184527df5da958acb7a4b5d41ee6ec Mon Sep 17 00:00:00 2001 From: ivan Date: Tue, 24 Nov 2009 06:04:57 +0000 Subject: [PATCH] send card number with void transactions for B:OP:IPPay, RT#5690 --- FS/FS/cust_main.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 3c4eb4422..47ee23fb2 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -4774,6 +4774,9 @@ sub realtime_refund_bop { ) { warn " attempting void\n" if $DEBUG > 1; my $void = new Business::OnlinePayment( $processor, @bop_options ); + $content{'card_number'} = $cust_pay->payinfo + if $cust_pay->payby eq 'CARD' + && $void->can('info') && $void->info('CC_void_requires_card'); $void->content( 'action' => 'void', %content ); $void->submit(); if ( $void->is_success ) { @@ -6112,6 +6115,9 @@ sub _new_realtime_refund_bop { ) { warn " attempting void\n" if $DEBUG > 1; my $void = new Business::OnlinePayment( $processor, @bop_options ); + $content{'card_number'} = $cust_pay->payinfo + if $cust_pay->payby eq 'CARD' + && $void->can('info') && $void->info('CC_void_requires_card'); $void->content( 'action' => 'void', %content ); $void->submit(); if ( $void->is_success ) { -- 2.11.0