File Coverage

blib/lib/Finance/AMEX/Transaction/EPTRN/Detail/ChargeSummary.pm
Criterion Covered Total %
statement 38 38 100.0
branch n/a
condition n/a
subroutine 32 32 100.0
pod 28 29 96.5
total 98 99 98.9


line stmt bran cond sub pod time code
1             package Finance::AMEX::Transaction::EPTRN::Detail::ChargeSummary;
2             $Finance::AMEX::Transaction::EPTRN::Detail::ChargeSummary::VERSION = '0.003';
3 7     7   46 use strict;
  7         15  
  7         188  
4 7     7   36 use warnings;
  7         16  
  7         168  
5              
6             # ABSTRACT: Parse AMEX Transaction/Invoice Level Reconciliation (EPTRN) Summary of Charge (SOC) Detail Rows
7              
8 7     7   36 use base 'Finance::AMEX::Transaction::EPTRN::Base';
  7         13  
  7         5360  
9              
10             sub field_map {
11             return {
12              
13 28     28 0 429 AMEX_PAYEE_NUMBER => [1, 10],
14             AMEX_SE_NUMBER => [11, 10],
15             SE_UNIT_NUMBER => [21, 10],
16             PAYMENT_YEAR => [31, 4],
17             PAYMENT_NUMBER => [35, 8],
18             PAYMENT_NUMBER_DATE => [35, 3],
19             PAYMENT_NUMBER_TYPE => [38, 1],
20             PAYMENT_NUMBER_NUMBER => [39, 4],
21             RECORD_TYPE => [43, 1],
22             DETAIL_RECORD_TYPE => [44, 2],
23             SE_BUSINESS_DATE => [46, 7],
24             AMEX_PROCESS_DATE => [53, 7],
25             SOC_INVOICE_NUMBER => [60, 6],
26             SOC_AMOUNT => [66, 11],
27             DISCOUNT_AMOUNT => [77, 9],
28             SERVICE_FEE_AMOUNT => [86, 7],
29             NET_SOC_AMOUNT => [100, 11],
30             DISCOUNT_RATE => [111, 5],
31             SERVICE_FEE_RATE => [116, 5],
32             AMEX_GROSS_AMOUNT => [142, 11],
33             AMEX_ROC_COUNT => [153, 5],
34             TRACKING_ID => [158, 9],
35             TRACKING_ID_DATE => [158, 3],
36             TRACKING_ID_PCID => [161, 6],
37             CPC_INDICATOR => [167, 1],
38             AMEX_ROC_COUNT_POA => [183, 7],
39             BASE_DISCOUNT_AMOUNT => [190, 16],
40             };
41             }
42              
43 2     2 1 483 sub type {return 'SOC_DETAIL'}
44              
45 1     1 1 473 sub AMEX_PAYEE_NUMBER {return $_[0]->_get_column('AMEX_PAYEE_NUMBER')}
46 1     1 1 510 sub AMEX_SE_NUMBER {return $_[0]->_get_column('AMEX_SE_NUMBER')}
47 1     1 1 432 sub SE_UNIT_NUMBER {return $_[0]->_get_column('SE_UNIT_NUMBER')}
48 1     1 1 448 sub PAYMENT_YEAR {return $_[0]->_get_column('PAYMENT_YEAR')}
49 1     1 1 457 sub PAYMENT_NUMBER {return $_[0]->_get_column('PAYMENT_NUMBER')}
50 1     1 1 434 sub PAYMENT_NUMBER_DATE {return $_[0]->_get_column('PAYMENT_NUMBER_DATE')}
51 1     1 1 8 sub PAYMENT_NUMBER_TYPE {return $_[0]->_get_column('PAYMENT_NUMBER_TYPE')}
52 1     1 1 430 sub PAYMENT_NUMBER_NUMBER {return $_[0]->_get_column('PAYMENT_NUMBER_NUMBER')}
53 1     1 1 453 sub RECORD_TYPE {return $_[0]->_get_column('RECORD_TYPE')}
54 1     1 1 470 sub DETAIL_RECORD_TYPE {return $_[0]->_get_column('DETAIL_RECORD_TYPE')}
55 1     1 1 458 sub SE_BUSINESS_DATE {return $_[0]->_get_column('SE_BUSINESS_DATE')}
56 1     1 1 467 sub AMEX_PROCESS_DATE {return $_[0]->_get_column('AMEX_PROCESS_DATE')}
57 1     1 1 468 sub SOC_INVOICE_NUMBER {return $_[0]->_get_column('SOC_INVOICE_NUMBER')}
58 1     1 1 464 sub SOC_AMOUNT {return $_[0]->_get_column('SOC_AMOUNT')}
59 1     1 1 454 sub DISCOUNT_AMOUNT {return $_[0]->_get_column('DISCOUNT_AMOUNT')}
60 1     1 1 480 sub SERVICE_FEE_AMOUNT {return $_[0]->_get_column('SERVICE_FEE_AMOUNT')}
61 1     1 1 448 sub NET_SOC_AMOUNT {return $_[0]->_get_column('NET_SOC_AMOUNT')}
62 1     1 1 432 sub DISCOUNT_RATE {return $_[0]->_get_column('DISCOUNT_RATE')}
63 1     1 1 454 sub SERVICE_FEE_RATE {return $_[0]->_get_column('SERVICE_FEE_RATE')}
64 1     1 1 431 sub AMEX_GROSS_AMOUNT {return $_[0]->_get_column('AMEX_GROSS_AMOUNT')}
65 1     1 1 435 sub AMEX_ROC_COUNT {return $_[0]->_get_column('AMEX_ROC_COUNT')}
66 1     1 1 468 sub TRACKING_ID {return $_[0]->_get_column('TRACKING_ID')}
67 1     1 1 433 sub TRACKING_ID_DATE {return $_[0]->_get_column('TRACKING_ID_DATE')}
68 1     1 1 452 sub TRACKING_ID_PCID {return $_[0]->_get_column('TRACKING_ID_PCID')}
69 1     1 1 453 sub CPC_INDICATOR {return $_[0]->_get_column('CPC_INDICATOR')}
70 1     1 1 415 sub AMEX_ROC_COUNT_POA {return $_[0]->_get_column('AMEX_ROC_COUNT_POA')}
71 1     1 1 472 sub BASE_DISCOUNT_AMOUNT {return $_[0]->_get_column('BASE_DISCOUNT_AMOUNT')}
72              
73             1;
74              
75             __END__