File Coverage

blib/lib/Finance/AMEX/Transaction/EPRAW/Detail/ChargeSummary.pm

Criterion	Covered	Total	%
statement	42	42	100.0
branch			n/a
condition			n/a
subroutine	36	36	100.0
pod	33	33	100.0
total	111	111	100.0

package Finance::AMEX::Transaction::EPRAW::Detail::ChargeSummary 0.005;

use strict;
use warnings;

# ABSTRACT: Parse AMEX Reconciliation Files (EPRAW) Summary of Charge (SOC) Detail Rows

use base 'Finance::AMEX::Transaction::EPRAW::Base';

sub field_map {
  return {
    AMEX_PAYEE_NUMBER         => [1,   10],
    AMEX_SE_NUMBER            => [11,  10],
    SE_UNIT_NUMBER            => [21,  10],
    PAYMENT_YEAR              => [31,  4],
    PAYMENT_NUMBER            => [35,  8],
    PAYMENT_NUMBER_DATE       => [35,  3],
    PAYMENT_NUMBER_TYPE       => [38,  1],
    PAYMENT_NUMBER_NUMBER     => [39,  4],
    RECORD_TYPE               => [43,  1],
    DETAIL_RECORD_TYPE        => [44,  2],
    SE_BUSINESS_DATE          => [46,  7],
    AMEX_PROCESS_DATE         => [53,  7],
    SOC_INVOICE_NUMBER        => [60,  6],
    SOC_AMOUNT                => [66,  11],
    DISCOUNT_AMOUNT           => [77,  9],
    SERVICE_FEE_AMOUNT        => [86,  7],
    NET_SOC_AMOUNT            => [100, 11],
    DISCOUNT_RATE             => [111, 5],
    SERVICE_FEE_RATE          => [116, 5],
    AMEX_GROSS_AMOUNT         => [142, 11],
    AMEX_ROC_COUNT            => [153, 5],
    TRACKING_ID               => [158, 9],
    TRACKING_ID_DATE          => [158, 3],
    TRACKING_ID_PCID          => [161, 6],
    CPC_INDICATOR             => [167, 1],
    AMEX_ROC_COUNT_POA        => [183, 7],
    SERVICE_AGENT_MERCHANT_ID => [281, 15],

    # DEPRECATED
    OPTIMA_DIVIDEND_AMOUNT => [93,  7],
    OPTIMA_DIVIDEND_RATE   => [121, 5],
    OPTIMA_GROSS_AMOUNT    => [126, 11],
    OPTIMA_ROC_COUNT       => [137, 5],
  };
}

sub type {return 'SOC_DETAIL'}

sub AMEX_PAYEE_NUMBER         {return $_[0]->_get_column('AMEX_PAYEE_NUMBER')}
sub AMEX_SE_NUMBER            {return $_[0]->_get_column('AMEX_SE_NUMBER')}
sub SE_UNIT_NUMBER            {return $_[0]->_get_column('SE_UNIT_NUMBER')}
sub PAYMENT_YEAR              {return $_[0]->_get_column('PAYMENT_YEAR')}
sub PAYMENT_NUMBER            {return $_[0]->_get_column('PAYMENT_NUMBER')}
sub PAYMENT_NUMBER_DATE       {return $_[0]->_get_column('PAYMENT_NUMBER_DATE')}
sub PAYMENT_NUMBER_TYPE       {return $_[0]->_get_column('PAYMENT_NUMBER_TYPE')}
sub PAYMENT_NUMBER_NUMBER     {return $_[0]->_get_column('PAYMENT_NUMBER_NUMBER')}
sub RECORD_TYPE               {return $_[0]->_get_column('RECORD_TYPE')}
sub DETAIL_RECORD_TYPE        {return $_[0]->_get_column('DETAIL_RECORD_TYPE')}
sub SE_BUSINESS_DATE          {return $_[0]->_get_column('SE_BUSINESS_DATE')}
sub AMEX_PROCESS_DATE         {return $_[0]->_get_column('AMEX_PROCESS_DATE')}
sub SOC_INVOICE_NUMBER        {return $_[0]->_get_column('SOC_INVOICE_NUMBER')}
sub SOC_AMOUNT                {return $_[0]->_get_column('SOC_AMOUNT')}
sub DISCOUNT_AMOUNT           {return $_[0]->_get_column('DISCOUNT_AMOUNT')}
sub SERVICE_FEE_AMOUNT        {return $_[0]->_get_column('SERVICE_FEE_AMOUNT')}
sub NET_SOC_AMOUNT            {return $_[0]->_get_column('NET_SOC_AMOUNT')}
sub DISCOUNT_RATE             {return $_[0]->_get_column('DISCOUNT_RATE')}
sub SERVICE_FEE_RATE          {return $_[0]->_get_column('SERVICE_FEE_RATE')}
sub AMEX_GROSS_AMOUNT         {return $_[0]->_get_column('AMEX_GROSS_AMOUNT')}
sub AMEX_ROC_COUNT            {return $_[0]->_get_column('AMEX_ROC_COUNT')}
sub TRACKING_ID               {return $_[0]->_get_column('TRACKING_ID')}
sub TRACKING_ID_DATE          {return $_[0]->_get_column('TRACKING_ID_DATE')}
sub TRACKING_ID_PCID          {return $_[0]->_get_column('TRACKING_ID_PCID')}
sub CPC_INDICATOR             {return $_[0]->_get_column('CPC_INDICATOR')}
sub AMEX_ROC_COUNT_POA        {return $_[0]->_get_column('AMEX_ROC_COUNT_POA')}
sub SERVICE_AGENT_MERCHANT_ID {return $_[0]->_get_column('SERVICE_AGENT_MERCHANT_ID')}

# DEPRECATED
sub OPTIMA_DIVIDEND_AMOUNT {return $_[0]->_get_column('OPTIMA_DIVIDEND_AMOUNT')}
sub OPTIMA_DIVIDEND_RATE   {return $_[0]->_get_column('OPTIMA_DIVIDEND_RATE')}
sub OPTIMA_GROSS_AMOUNT    {return $_[0]->_get_column('OPTIMA_GROSS_AMOUNT')}
sub OPTIMA_ROC_COUNT       {return $_[0]->_get_column('OPTIMA_ROC_COUNT')}

1;

__END__