line |
true |
false |
branch |
49
|
11 |
0 |
unless $self->server |
50
|
11 |
0 |
unless $self->port |
51
|
11 |
0 |
unless $self->path |
57
|
0 |
11 |
exists $opts{'debug'} ? : |
62
|
0 |
11 |
unless $key =~ /^default_(\w*)$/ |
100
|
8 |
2 |
if ($self->transaction_type eq 'CC') { } |
|
2 |
0 |
elsif ($self->transaction_type eq 'ECHECK') { } |
120
|
0 |
10 |
if $content{'recurring_billing'} and $content{'recurring_billing'} eq 'YES' |
130
|
8 |
12 |
if (defined $exp and $exp =~ /^(\d+)\D+\d*\d{2}$/) { } |
|
0 |
24 |
elsif (defined $exp and $exp =~ /^(\d{2})\d{2}$/) { } |
141
|
8 |
12 |
if (defined $exp and $exp =~ /^\d+\D+\d*(\d{2})$/) { } |
|
0 |
24 |
elsif (defined $exp and $exp =~ /^\d{2}(\d{2})$/) { } |
155
|
40 |
520 |
if (ref $map{$_} eq 'HASH') { } |
|
108 |
412 |
elsif (ref $map{$_}) { } |
|
135 |
277 |
elsif (exists $content{$map{$_}}) { } |
156
|
18 |
22 |
if keys %{$map{$_};} |
163
|
217 |
343 |
if (defined $value) { } |
181
|
0 |
0 |
if ($action eq 'normal authorization' or $action eq 'credit' or $action eq 'authorization only' and $type eq 'CC') { } |
|
0 |
0 |
elsif ($action eq 'post authorization' and $type eq 'CC') { } |
|
0 |
0 |
elsif ($action eq 'reverse authorization' and $type eq 'CC') { } |
|
0 |
0 |
elsif ($action eq 'void') { } |
187
|
0 |
0 |
if $type eq 'CC' |
190
|
0 |
0 |
if $type eq 'ECHECK' |
201
|
0 |
0 |
if $type eq 'CC' |
204
|
0 |
0 |
if $type eq 'ECHECK' |
216
|
0 |
0 |
unless exists $content{$_} |
218
|
0 |
0 |
if ($self->test_transaction) |
220
|
0 |
0 |
if $self->server eq 'gtwy.ippay.com' |
227
|
0 |
0 |
if (grep {/^routing_code$/;} @required_fields) |
228
|
0 |
0 |
unless ($content{'routing_code'} =~ /^\d{9}$/) |
235
|
0 |
0 |
unless ($transaction_id) |
239
|
0 |
0 |
if $Business::OnlinePayment::IPPay::DEBUG > 1 |
242
|
0 |
0 |
unless $server_response =~ /^200/ |
252
|
0 |
0 |
if (defined $content{'amount'}) |
258
|
0 |
0 |
if $content{'account_number'} |
260
|
0 |
0 |
if $type eq 'CC' |
261
|
0 |
0 |
if $type eq 'ECHECK' |
265
|
0 |
0 |
unless $country |
270
|
0 |
0 |
unless $country |
271
|
0 |
0 |
if $country |
276
|
0 |
0 |
unless $ship_country |
281
|
0 |
0 |
unless $ship_country |
282
|
0 |
0 |
if $ship_country |
308
|
0 |
0 |
unless ($type ne 'CC' or keys %shippingaddr) |
318
|
0 |
0 |
unless $shippingaddr{'Country'} |
372
|
0 |
0 |
unless $req{'BillingCountry'} |
388
|
0 |
0 |
if $Business::OnlinePayment::IPPay::DEBUG > 1 |
392
|
0 |
0 |
if $Business::OnlinePayment::IPPay::DEBUG > 1 |
395
|
0 |
0 |
if ($server_response =~ /^200/) |
397
|
0 |
0 |
if (exists $response->{'ActionCode'} and not exists $response->{'ErrMsg'}) { } |
412
|
0 |
0 |
$self->result_code eq '000' ? : |
414
|
0 |
0 |
unless ($self->is_success) |
415
|
0 |
0 |
unless ($self->error_message) |
416
|
0 |
0 |
if ($Business::OnlinePayment::IPPay::DEBUG) { } |
449
|
2 |
215 |
if ($item eq 'ACH') |
451
|
2 |
0 |
if $self->{'_content'}{'account_type'} |
458
|
18 |
199 |
if (ref $value eq 'HASH') { } |