File Coverage

blib/lib/Finance/AMEX/Transaction/EPPRC/Detail/ChargeSummary.pm
Criterion Covered Total %
statement 44 44 100.0
branch n/a
condition n/a
subroutine 38 38 100.0
pod 35 35 100.0
total 117 117 100.0


line stmt bran cond sub pod time code
1             package Finance::AMEX::Transaction::EPPRC::Detail::ChargeSummary 0.005;
2              
3 9     9   52 use strict;
  9         15  
  9         216  
4 9     9   39 use warnings;
  9         42  
  9         204  
5              
6             # ABSTRACT: Parse AMEX Transaction/Invoice Level Reconciliation (EPPRC) Summary of Charge (SOC) Detail Rows
7              
8 9     9   38 use base 'Finance::AMEX::Transaction::EPPRC::Base';
  9         12  
  9         7290  
9              
10             sub field_map {
11             return {
12 2210     2210 1 39525 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             DISCOUNT_AMOUNT => [77, 9],
27             SERVICE_FEE_AMOUNT => [86, 7],
28             NET_SOC_AMOUNT => [100, 11],
29             DISCOUNT_RATE => [111, 5],
30             SERVICE_FEE_RATE => [116, 5],
31             AMEX_GROSS_AMOUNT => [142, 11],
32             AMEX_ROC_COUNT => [153, 5],
33             TRACKING_ID => [158, 9],
34             TRACKING_ID_DATE => [158, 3],
35             TRACKING_ID_PCID => [161, 6],
36             CPC_INDICATOR => [167, 1],
37             AMEX_ROC_COUNT_POA => [183, 7],
38             BASE_DISCOUNT_AMOUNT => [190, 16],
39             CARD_NOT_PRESENT_BPA_AMOUNT => [206, 16],
40             CARD_NOT_PRESENT_PTA_AMOUNT => [222, 16],
41             CARD_NOT_PRESENT_BPA_RATE => [238, 9],
42             CARD_NOT_PRESENT_PTA_RATE => [247, 9],
43             TRANSACTION_FEE_AMOUNT => [256, 16],
44             TRANSACTION_FEE_RATE => [272, 9],
45             };
46             }
47              
48 130     130 1 31314 sub type {return 'SOC_DETAIL'}
49              
50 65     65 1 29276 sub AMEX_PAYEE_NUMBER {return $_[0]->_get_column('AMEX_PAYEE_NUMBER')}
51 65     65 1 30189 sub AMEX_SE_NUMBER {return $_[0]->_get_column('AMEX_SE_NUMBER')}
52 65     65 1 28506 sub SE_UNIT_NUMBER {return $_[0]->_get_column('SE_UNIT_NUMBER')}
53 65     65 1 29338 sub PAYMENT_YEAR {return $_[0]->_get_column('PAYMENT_YEAR')}
54 65     65 1 30255 sub PAYMENT_NUMBER {return $_[0]->_get_column('PAYMENT_NUMBER')}
55 65     65 1 29789 sub PAYMENT_NUMBER_DATE {return $_[0]->_get_column('PAYMENT_NUMBER_DATE')}
56 65     65 1 29930 sub PAYMENT_NUMBER_TYPE {return $_[0]->_get_column('PAYMENT_NUMBER_TYPE')}
57 65     65 1 27547 sub PAYMENT_NUMBER_NUMBER {return $_[0]->_get_column('PAYMENT_NUMBER_NUMBER')}
58 65     65 1 28766 sub RECORD_TYPE {return $_[0]->_get_column('RECORD_TYPE')}
59 65     65 1 29874 sub DETAIL_RECORD_TYPE {return $_[0]->_get_column('DETAIL_RECORD_TYPE')}
60 65     65 1 28022 sub SE_BUSINESS_DATE {return $_[0]->_get_column('SE_BUSINESS_DATE')}
61 65     65 1 29254 sub AMEX_PROCESS_DATE {return $_[0]->_get_column('AMEX_PROCESS_DATE')}
62 65     65 1 28541 sub SOC_INVOICE_NUMBER {return $_[0]->_get_column('SOC_INVOICE_NUMBER')}
63 65     65 1 29442 sub SOC_AMOUNT {return $_[0]->_get_column('SOC_AMOUNT')}
64 65     65 1 30031 sub DISCOUNT_AMOUNT {return $_[0]->_get_column('DISCOUNT_AMOUNT')}
65 65     65 1 27579 sub SERVICE_FEE_AMOUNT {return $_[0]->_get_column('SERVICE_FEE_AMOUNT')}
66 65     65 1 29951 sub NET_SOC_AMOUNT {return $_[0]->_get_column('NET_SOC_AMOUNT')}
67 65     65 1 29648 sub DISCOUNT_RATE {return $_[0]->_get_column('DISCOUNT_RATE')}
68 65     65 1 29731 sub SERVICE_FEE_RATE {return $_[0]->_get_column('SERVICE_FEE_RATE')}
69 65     65 1 29087 sub AMEX_GROSS_AMOUNT {return $_[0]->_get_column('AMEX_GROSS_AMOUNT')}
70 65     65 1 29128 sub AMEX_ROC_COUNT {return $_[0]->_get_column('AMEX_ROC_COUNT')}
71 65     65 1 29987 sub TRACKING_ID {return $_[0]->_get_column('TRACKING_ID')}
72 65     65 1 29546 sub TRACKING_ID_DATE {return $_[0]->_get_column('TRACKING_ID_DATE')}
73 65     65 1 29039 sub TRACKING_ID_PCID {return $_[0]->_get_column('TRACKING_ID_PCID')}
74 65     65 1 29637 sub CPC_INDICATOR {return $_[0]->_get_column('CPC_INDICATOR')}
75 65     65 1 29702 sub AMEX_ROC_COUNT_POA {return $_[0]->_get_column('AMEX_ROC_COUNT_POA')}
76 65     65 1 27701 sub BASE_DISCOUNT_AMOUNT {return $_[0]->_get_column('BASE_DISCOUNT_AMOUNT')}
77 65     65 1 29800 sub CARD_NOT_PRESENT_BPA_AMOUNT {return $_[0]->_get_column('CARD_NOT_PRESENT_BPA_AMOUNT')}
78 65     65 1 29080 sub CARD_NOT_PRESENT_PTA_AMOUNT {return $_[0]->_get_column('CARD_NOT_PRESENT_PTA_AMOUNT')}
79 65     65 1 27555 sub CARD_NOT_PRESENT_BPA_RATE {return $_[0]->_get_column('CARD_NOT_PRESENT_BPA_RATE')}
80 65     65 1 29326 sub CARD_NOT_PRESENT_PTA_RATE {return $_[0]->_get_column('CARD_NOT_PRESENT_PTA_RATE')}
81 65     65 1 30347 sub TRANSACTION_FEE_AMOUNT {return $_[0]->_get_column('TRANSACTION_FEE_AMOUNT')}
82 65     65 1 26240 sub TRANSACTION_FEE_RATE {return $_[0]->_get_column('TRANSACTION_FEE_RATE')}
83              
84             1;
85              
86             __END__