File Coverage

blib/lib/Finance/AMEX/Transaction/EPRAW/Detail/Chargeback.pm
Criterion Covered Total %
statement 33 33 100.0
branch n/a
condition n/a
subroutine 27 27 100.0
pod 24 24 100.0
total 84 84 100.0


line stmt bran cond sub pod time code
1             package Finance::AMEX::Transaction::EPRAW::Detail::Chargeback 0.005;
2              
3 9     9   53 use strict;
  9         15  
  9         220  
4 9     9   36 use warnings;
  9         15  
  9         188  
5              
6             # ABSTRACT: Parse AMEX Reconciliation Files (EPRAW) Chargeback Detail Rows
7              
8 9     9   49 use base 'Finance::AMEX::Transaction::EPRAW::Base';
  9         12  
  9         5205  
9              
10             sub field_map {
11             return {
12 115     115 1 1444 AMEX_PAYEE_NUMBER => [1, 10],
13             AMEX_SE_NUMBER => [11, 10],
14             SE_UNIT_NUMBER => [21, 10],
15             PAYMENT_YEAR => [31, 4],
16             PAYMENT_NUMBER => [35, 8],
17             PAYMENT_NUMBER_DATE => [35, 3],
18             PAYMENT_NUMBER_TYPE => [38, 1],
19             PAYMENT_NUMBER_NUMBER => [39, 4],
20             RECORD_TYPE => [43, 1],
21             DETAIL_RECORD_TYPE => [44, 2],
22             SE_BUSINESS_DATE => [46, 7],
23             AMEX_PROCESS_DATE => [53, 7],
24             SOC_INVOICE_NUMBER => [60, 6],
25             SOC_AMOUNT => [66, 11],
26             CHARGEBACK_AMOUNT => [77, 9],
27             DISCOUNT_AMOUNT => [86, 9],
28             SERVICE_FEE_AMOUNT => [95, 7],
29             NET_CHARGEBACK_AMOUNT => [109, 9],
30             DISCOUNT_RATE => [118, 5],
31             SERVICE_FEE_RATE => [123, 5],
32             CHARGEBACK_REASON => [144, 280],
33             SERVICE_AGENT_MERCHANT_ID => [430, 15],
34             };
35             }
36              
37 10     10 1 2223 sub type {return 'CHARGEBACK_DETAIL'}
38              
39 5     5 1 2525 sub AMEX_PAYEE_NUMBER {return $_[0]->_get_column('AMEX_PAYEE_NUMBER')}
40 5     5 1 2187 sub AMEX_SE_NUMBER {return $_[0]->_get_column('AMEX_SE_NUMBER')}
41 5     5 1 2163 sub SE_UNIT_NUMBER {return $_[0]->_get_column('SE_UNIT_NUMBER')}
42 5     5 1 2150 sub PAYMENT_YEAR {return $_[0]->_get_column('PAYMENT_YEAR')}
43 5     5 1 1817 sub PAYMENT_NUMBER {return $_[0]->_get_column('PAYMENT_NUMBER')}
44 5     5 1 2171 sub PAYMENT_NUMBER_DATE {return $_[0]->_get_column('PAYMENT_NUMBER_DATE')}
45 5     5 1 2161 sub PAYMENT_NUMBER_TYPE {return $_[0]->_get_column('PAYMENT_NUMBER_TYPE')}
46 5     5 1 2151 sub PAYMENT_NUMBER_NUMBER {return $_[0]->_get_column('PAYMENT_NUMBER_NUMBER')}
47 5     5 1 2252 sub RECORD_TYPE {return $_[0]->_get_column('RECORD_TYPE')}
48 5     5 1 1358 sub DETAIL_RECORD_TYPE {return $_[0]->_get_column('DETAIL_RECORD_TYPE')}
49 5     5 1 2145 sub SE_BUSINESS_DATE {return $_[0]->_get_column('SE_BUSINESS_DATE')}
50 5     5 1 2164 sub AMEX_PROCESS_DATE {return $_[0]->_get_column('AMEX_PROCESS_DATE')}
51 5     5 1 2209 sub SOC_INVOICE_NUMBER {return $_[0]->_get_column('SOC_INVOICE_NUMBER')}
52 5     5 1 2156 sub SOC_AMOUNT {return $_[0]->_get_column('SOC_AMOUNT')}
53 5     5 1 2288 sub CHARGEBACK_AMOUNT {return $_[0]->_get_column('CHARGEBACK_AMOUNT')}
54 5     5 1 1749 sub DISCOUNT_AMOUNT {return $_[0]->_get_column('DISCOUNT_AMOUNT')}
55 5     5 1 2143 sub SERVICE_FEE_AMOUNT {return $_[0]->_get_column('SERVICE_FEE_AMOUNT')}
56 5     5 1 2141 sub NET_CHARGEBACK_AMOUNT {return $_[0]->_get_column('NET_CHARGEBACK_AMOUNT')}
57 5     5 1 2207 sub DISCOUNT_RATE {return $_[0]->_get_column('DISCOUNT_RATE')}
58 5     5 1 2192 sub SERVICE_FEE_RATE {return $_[0]->_get_column('SERVICE_FEE_RATE')}
59 5     5 1 1752 sub CHARGEBACK_REASON {return $_[0]->_get_column('CHARGEBACK_REASON')}
60 5     5 1 2151 sub SERVICE_AGENT_MERCHANT_ID {return $_[0]->_get_column('SERVICE_AGENT_MERCHANT_ID')}
61             1;
62              
63             __END__