File Coverage

blib/lib/Business/CyberSource/Role/ForeignCurrency.pm
Criterion Covered Total %
statement 24 24 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod n/a
total 32 32 100.0


line stmt bran cond sub pod time code
1             package Business::CyberSource::Role::ForeignCurrency;
2 10     10   6897 use strict;
  10         20  
  10         427  
3 10     10   49 use warnings;
  10         18  
  10         305  
4 10     10   49 use namespace::autoclean;
  10         16  
  10         70  
5              
6             our $VERSION = '0.010006'; # VERSION
7              
8 10     10   849 use Moose::Role;
  10         20  
  10         76  
9 10     10   49373 use MooseX::RemoteHelper;
  10         24  
  10         91  
10              
11 10     10   33957 use MooseX::SetOnce 0.200001;
  10         336  
  10         324  
12              
13 10     10   4436 use MooseX::Types::Locale::Currency qw( CurrencyCode );
  10         143246  
  10         109  
14 10     10   8975 use MooseX::Types::Common::Numeric qw( PositiveOrZeroNum );
  10         21  
  10         78  
15              
16             has foreign_currency => (
17             isa => CurrencyCode,
18             remote_name => 'foreignCurrency',
19             predicate => 'has_foreign_currency',
20             traits => ['SetOnce'],
21             is => 'rw',
22             );
23              
24             has foreign_amount => (
25             isa => PositiveOrZeroNum,
26             remote_name => 'foreignAmount',
27             predicate => 'has_foreign_amount',
28             traits => ['SetOnce'],
29             is => 'rw',
30             );
31              
32             has exchange_rate => (
33             isa => PositiveOrZeroNum,
34             remote_name => 'exchangeRate',
35             predicate => 'has_exchange_rate',
36             traits => ['SetOnce'],
37             is => 'rw',
38             );
39              
40             has exchange_rate_timestamp => (
41             isa => 'Str',
42             remote_name => 'exchangeRateTimeStamp',
43             predicate => 'has_exchange_rate_timestamp',
44             traits => ['SetOnce'],
45             is => 'rw',
46             );
47              
48             1;
49              
50             # ABSTRACT: Role to apply to requests and responses that require currency
51              
52             __END__
53              
54             =pod
55              
56             =encoding UTF-8
57              
58             =head1 NAME
59              
60             Business::CyberSource::Role::ForeignCurrency - Role to apply to requests and responses that require currency
61              
62             =head1 VERSION
63              
64             version 0.010006
65              
66             =head1 ATTRIBUTES
67              
68             =head2 foreign_currency
69              
70             Billing currency returned by the DCC service. For the possible values, see the ISO currency codes
71              
72             =head1 BUGS
73              
74             Please report any bugs or feature requests on the bugtracker website
75             https://github.com/xenoterracide/business-cybersource/issues
76              
77             When submitting a bug or request, please include a test-file or a
78             patch to an existing test-file that illustrates the bug or desired
79             feature.
80              
81             =head1 AUTHOR
82              
83             Caleb Cushing <xenoterracide@gmail.com>
84              
85             =head1 COPYRIGHT AND LICENSE
86              
87             This software is Copyright (c) 2015 by Caleb Cushing <xenoterracide@gmail.com>.
88              
89             This is free software, licensed under:
90              
91             The Artistic License 2.0 (GPL Compatible)
92              
93             =cut