File Coverage

lib/WebService/Braintree/TransactionSearch.pm
Criterion Covered Total %
statement 11 12 91.6
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 15 18 83.3


line stmt bran cond sub pod time code
1             package WebService::Braintree::TransactionSearch;
2             $WebService::Braintree::TransactionSearch::VERSION = '0.94';
3 20     20   394 use 5.010_001;
  20         71  
4 20     20   106 use strictures 1;
  20         131  
  20         751  
5              
6 20     20   1953 use Moose;
  20         40  
  20         143  
7 20     20   122375 use WebService::Braintree::AdvancedSearch;
  20         42  
  20         7325  
8              
9             my $field = WebService::Braintree::AdvancedSearchFields->new(metaclass => __PACKAGE__->meta);
10              
11             $field->text("billing_company");
12             $field->text("billing_country_name");
13             $field->text("billing_extended_address");
14             $field->text("billing_first_name");
15             $field->text("billing_last_name");
16             $field->text("billing_locality");
17             $field->text("billing_postal_code");
18             $field->text("billing_region");
19             $field->text("billing_street_address");
20             $field->text("credit_card_cardholder_name");
21             $field->text("currency");
22             $field->text("customer_company");
23             $field->text("customer_email");
24             $field->text("customer_fax");
25             $field->text("customer_first_name");
26             $field->text("customer_id");
27             $field->text("customer_last_name");
28             $field->text("customer_phone");
29             $field->text("customer_website");
30             $field->text("id");
31             $field->text("order_id");
32             $field->text("payment_method_token");
33             $field->text("paypal_payment_id");
34             $field->text("paypal_authorization_id");
35             $field->text("paypal_payer_email");
36             $field->text("processor_authorization_code");
37             $field->text("settlement_batch_id");
38             $field->text("shipping_company");
39             $field->text("shipping_country_name");
40             $field->text("shipping_extended_address");
41             $field->text("shipping_first_name");
42             $field->text("shipping_last_name");
43             $field->text("shipping_locality");
44             $field->text("shipping_postal_code");
45             $field->text("shipping_region");
46             $field->text("shipping_street_address");
47              
48             $field->equality("credit_card_expiration_date");
49              
50             $field->partial_match("credit_card_number");
51              
52             $field->multiple_values("created_using", WebService::Braintree::Transaction::CreatedUsing::FullInformation, WebService::Braintree::Transaction::CreatedUsing::Token);
53             $field->multiple_values("credit_card_card_type", @{WebService::Braintree::CreditCard::CardType::All()});
54             $field->multiple_values("credit_card_customer_location", WebService::Braintree::CreditCard::Location::International, WebService::Braintree::CreditCard::Location::US);
55             $field->multiple_values("ids");
56             $field->multiple_values("merchant_account_id");
57             $field->multiple_values("status", WebService::Braintree::Transaction::Status::All);
58             $field->multiple_values("source", @{WebService::Braintree::Transaction::Source::All()});
59             $field->multiple_values("type", @{WebService::Braintree::Transaction::Type::All()});
60              
61             $field->key_value("refund");
62              
63             $field->range("amount");
64             $field->range("created_at");
65             $field->range("disbursement_date");
66             $field->range("dispute_date");
67             $field->range("authorization_expired_at");
68             $field->range("authorized_at");
69             $field->range("failed_at");
70             $field->range("gateway_rejected_at");
71             $field->range("processor_declined_at");
72             $field->range("settled_at");
73             $field->range("submitted_for_settlement_at");
74             $field->range("voided_at");
75              
76             sub to_hash {
77 0     0 0   WebService::Braintree::AdvancedSearch->search_to_hash(shift);
78             }
79              
80             __PACKAGE__->meta->make_immutable;
81              
82             1;
83             __END__