File Coverage

blib/lib/Finance/AMEX/Transaction/EPPRC/Detail/Other.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::EPPRC::Detail::Other 0.005;
2              
3 9     9   54 use strict;
  9         18  
  9         217  
4 9     9   37 use warnings;
  9         19  
  9         193  
5              
6             # ABSTRACT: Parse AMEX Transaction/Invoice Level Reconciliation (EPPRC) Other Fees and Revenues Detail Rows
7              
8 9     9   38 use base 'Finance::AMEX::Transaction::EPPRC::Base';
  9         19  
  9         5502  
9              
10             sub field_map {
11             return {
12 345     345 1 4618 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             AMEX_PROCESS_DATE => [46, 7],
23             ASSET_BILLING_AMOUNT => [53, 9],
24             ASSET_BILLING_DESCRIPTION => [62, 65],
25             TAKE_ONE_COMMISSION_AMOUNT => [127, 9],
26             TAKE_ONE_DESCRIPTION => [136, 80],
27             OTHER_FEE_AMOUNT => [216, 9],
28             OTHER_FEE_DESCRIPTION => [225, 80],
29             ASSET_BILLING_TAX => [305, 9],
30             PAY_IN_GROSS_INDICATOR => [314, 1],
31             BATCH_CODE => [315, 3],
32             BILL_CODE => [318, 3],
33             SERVICE_AGENT_MERCHANT_ID => [321, 15],
34             };
35             }
36              
37 30     30 1 7238 sub type {return 'OTHER_DETAIL'}
38              
39 15     15 1 6935 sub AMEX_PAYEE_NUMBER {return $_[0]->_get_column('AMEX_PAYEE_NUMBER')}
40 15     15 1 6459 sub AMEX_SE_NUMBER {return $_[0]->_get_column('AMEX_SE_NUMBER')}
41 15     15 1 6057 sub SE_UNIT_NUMBER {return $_[0]->_get_column('SE_UNIT_NUMBER')}
42 15     15 1 5654 sub PAYMENT_YEAR {return $_[0]->_get_column('PAYMENT_YEAR')}
43 15     15 1 7055 sub PAYMENT_NUMBER {return $_[0]->_get_column('PAYMENT_NUMBER')}
44 15     15 1 7278 sub PAYMENT_NUMBER_DATE {return $_[0]->_get_column('PAYMENT_NUMBER_DATE')}
45 15     15 1 6988 sub PAYMENT_NUMBER_TYPE {return $_[0]->_get_column('PAYMENT_NUMBER_TYPE')}
46 15     15 1 5828 sub PAYMENT_NUMBER_NUMBER {return $_[0]->_get_column('PAYMENT_NUMBER_NUMBER')}
47 15     15 1 6937 sub RECORD_TYPE {return $_[0]->_get_column('RECORD_TYPE')}
48 15     15 1 7013 sub DETAIL_RECORD_TYPE {return $_[0]->_get_column('DETAIL_RECORD_TYPE')}
49 15     15 1 6898 sub AMEX_PROCESS_DATE {return $_[0]->_get_column('AMEX_PROCESS_DATE')}
50 15     15 1 6924 sub ASSET_BILLING_AMOUNT {return $_[0]->_get_column('ASSET_BILLING_AMOUNT')}
51 15     15 1 7079 sub ASSET_BILLING_DESCRIPTION {return $_[0]->_get_column('ASSET_BILLING_DESCRIPTION')}
52 15     15 1 6976 sub TAKE_ONE_COMMISSION_AMOUNT {return $_[0]->_get_column('TAKE_ONE_COMMISSION_AMOUNT')}
53 15     15 1 7059 sub TAKE_ONE_DESCRIPTION {return $_[0]->_get_column('TAKE_ONE_DESCRIPTION')}
54 15     15 1 6432 sub OTHER_FEE_AMOUNT {return $_[0]->_get_column('OTHER_FEE_AMOUNT')}
55 15     15 1 7087 sub OTHER_FEE_DESCRIPTION {return $_[0]->_get_column('OTHER_FEE_DESCRIPTION')}
56 15     15 1 7292 sub ASSET_BILLING_TAX {return $_[0]->_get_column('ASSET_BILLING_TAX')}
57 15     15 1 6500 sub PAY_IN_GROSS_INDICATOR {return $_[0]->_get_column('PAY_IN_GROSS_INDICATOR')}
58 15     15 1 6415 sub BATCH_CODE {return $_[0]->_get_column('BATCH_CODE')}
59 15     15 1 6486 sub BILL_CODE {return $_[0]->_get_column('BILL_CODE')}
60 15     15 1 6124 sub SERVICE_AGENT_MERCHANT_ID {return $_[0]->_get_column('SERVICE_AGENT_MERCHANT_ID')}
61              
62             1;
63              
64             __END__