File Coverage

blib/lib/Finance/AMEX/Transaction/GRRCN/Transaction.pm

Criterion	Covered	Total	%
statement	51	51	100.0
branch			n/a
condition			n/a
subroutine	44	44	100.0
pod	41	41	100.0
total	136	136	100.0

package Finance::AMEX::Transaction::GRRCN::Transaction 0.005;

use strict;
use warnings;

# ABSTRACT: Parse AMEX Global Reconciliation (GRRCN) Transaction or summary of charge (SOC) Rows

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

sub field_map {
  my ($self) = @_;

  return [
    {RECORD_TYPE                             => [1,   10]},
    {PAYEE_MERCHANT_ID                       => [11,  15]},
    {SETTLEMENT_ACCOUNT_TYPE_CODE            => [26,  3]},
    {AMERICAN_EXPRESS_PAYMENT_NUMBER         => [29,  10]},
    {PAYMENT_DATE                            => [39,  8]},
    {PAYMENT_CURRENCY                        => [47,  3]},
    {SUBMISSION_MERCHANT_ID                  => [50,  15]},
    {BUSINESS_SUBMISSION_DATE                => [65,  8]},
    {AMERICAN_EXPRESS_PROCESSING_DATE        => [73,  8]},
    {SUBMISSION_INVOICE_NUMBER               => [81,  15]},
    {SUBMISSION_CURRENCY                     => [96,  3]},
    {MERCHANT_LOCATION_ID                    => [99,  15]},
    {INVOICE_REFERENCE_NUMBER                => [114, 30]},
    {SELLER_ID                               => [144, 20]},
    {CARDMEMBER_ACCOUNT_NUMBER               => [164, 19]},
    {INDUSTRY_SPECIFIC_REFERENCE_NUMBER      => [183, 30]},
    {SUBMISSION_GROSS_AMOUNT                 => [213, 16]},
    {TRANSACTION_AMOUNT                      => [229, 16]},
    {TRANSACTION_DATE                        => [245, 8]},
    {TRANSACTION_TIME                        => [253, 6]},
    {TRANSACTION_ID                          => [259, 15]},
    {APPROVAL_CODE                           => [274, 6]},
    {TERMINAL_ID                             => [280, 10]},
    {MERCHANT_CATEGORY_CODE                  => [290, 4]},
    {CARDMEMBER_REFERENCE_NUMBER             => [294, 30]},
    {ACQUIRER_REFERENCE_NUMBER               => [324, 23]},
    {DATA_QUALITY_NON_COMPLIANT_INDICATOR    => [347, 1]},
    {DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_1 => [348, 4]},
    {DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_2 => [352, 4]},
    {DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_3 => [356, 4]},
    {DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_4 => [360, 4]},
    {NON_SWIPED_INDICATOR                    => [364, 1]},
    {TRANSACTION_REJECTED_INDICATOR          => [365, 3]},
    {FIRST_INSTALLMENT_AMOUNT                => [368, 16]},
    {SUBSEQUENT_INSTALLMENT_AMOUNT           => [384, 16]},
    {NUMBER_OF_INSTALLMENTS                  => [400, 5]},
    {INSTALLMENT_NUMBER                      => [405, 5]},
    {FILLER1                                 => [410, 15]},
    {SERVICE_FEE_AMOUNT                      => [425, 16]},
    {ACCELERATION_AMOUNT                     => [441, 16]},
    {FILLER2                                 => [457, 344]},
  ];
}

sub type {return 'TRANSACTION'}

sub RECORD_TYPE                             {return $_[0]->_get_column('RECORD_TYPE')}
sub PAYEE_MERCHANT_ID                       {return $_[0]->_get_column('PAYEE_MERCHANT_ID')}
sub SETTLEMENT_ACCOUNT_TYPE_CODE            {return $_[0]->_get_column('SETTLEMENT_ACCOUNT_TYPE_CODE')}
sub AMERICAN_EXPRESS_PAYMENT_NUMBER         {return $_[0]->_get_column('AMERICAN_EXPRESS_PAYMENT_NUMBER')}
sub PAYMENT_DATE                            {return $_[0]->_get_column('PAYMENT_DATE')}
sub PAYMENT_CURRENCY                        {return $_[0]->_get_column('PAYMENT_CURRENCY')}
sub SUBMISSION_MERCHANT_ID                  {return $_[0]->_get_column('SUBMISSION_MERCHANT_ID')}
sub BUSINESS_SUBMISSION_DATE                {return $_[0]->_get_column('BUSINESS_SUBMISSION_DATE')}
sub AMERICAN_EXPRESS_PROCESSING_DATE        {return $_[0]->_get_column('AMERICAN_EXPRESS_PROCESSING_DATE')}
sub SUBMISSION_INVOICE_NUMBER               {return $_[0]->_get_column('SUBMISSION_INVOICE_NUMBER')}
sub SUBMISSION_CURRENCY                     {return $_[0]->_get_column('SUBMISSION_CURRENCY')}
sub MERCHANT_LOCATION_ID                    {return $_[0]->_get_column('MERCHANT_LOCATION_ID')}
sub INVOICE_REFERENCE_NUMBER                {return $_[0]->_get_column('INVOICE_REFERENCE_NUMBER')}
sub SELLER_ID                               {return $_[0]->_get_column('SELLER_ID')}
sub CARDMEMBER_ACCOUNT_NUMBER               {return $_[0]->_get_column('CARDMEMBER_ACCOUNT_NUMBER')}
sub INDUSTRY_SPECIFIC_REFERENCE_NUMBER      {return $_[0]->_get_column('INDUSTRY_SPECIFIC_REFERENCE_NUMBER')}
sub SUBMISSION_GROSS_AMOUNT                 {return $_[0]->_get_column('SUBMISSION_GROSS_AMOUNT')}
sub TRANSACTION_AMOUNT                      {return $_[0]->_get_column('TRANSACTION_AMOUNT')}
sub TRANSACTION_DATE                        {return $_[0]->_get_column('TRANSACTION_DATE')}
sub TRANSACTION_TIME                        {return $_[0]->_get_column('TRANSACTION_TIME')}
sub TRANSACTION_ID                          {return $_[0]->_get_column('TRANSACTION_ID')}
sub APPROVAL_CODE                           {return $_[0]->_get_column('APPROVAL_CODE')}
sub TERMINAL_ID                             {return $_[0]->_get_column('TERMINAL_ID')}
sub MERCHANT_CATEGORY_CODE                  {return $_[0]->_get_column('MERCHANT_CATEGORY_CODE')}
sub CARDMEMBER_REFERENCE_NUMBER             {return $_[0]->_get_column('CARDMEMBER_REFERENCE_NUMBER')}
sub ACQUIRER_REFERENCE_NUMBER               {return $_[0]->_get_column('ACQUIRER_REFERENCE_NUMBER')}
sub DATA_QUALITY_NON_COMPLIANT_INDICATOR    {return $_[0]->_get_column('DATA_QUALITY_NON_COMPLIANT_INDICATOR')}
sub DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_1 {return $_[0]->_get_column('DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_1')}
sub DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_2 {return $_[0]->_get_column('DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_2')}
sub DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_3 {return $_[0]->_get_column('DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_3')}
sub DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_4 {return $_[0]->_get_column('DATA_QUALITY_NON_COMPLIANT_ERROR_CODE_4')}
sub NON_SWIPED_INDICATOR                    {return $_[0]->_get_column('NON_SWIPED_INDICATOR')}
sub TRANSACTION_REJECTED_INDICATOR          {return $_[0]->_get_column('TRANSACTION_REJECTED_INDICATOR')}
sub FIRST_INSTALLMENT_AMOUNT                {return $_[0]->_get_column('FIRST_INSTALLMENT_AMOUNT')}
sub SUBSEQUENT_INSTALLMENT_AMOUNT           {return $_[0]->_get_column('SUBSEQUENT_INSTALLMENT_AMOUNT')}
sub NUMBER_OF_INSTALLMENTS                  {return $_[0]->_get_column('NUMBER_OF_INSTALLMENTS')}
sub INSTALLMENT_NUMBER                      {return $_[0]->_get_column('INSTALLMENT_NUMBER')}
sub SERVICE_FEE_AMOUNT                      {return $_[0]->_get_column('SERVICE_FEE_AMOUNT')}
sub ACCELERATION_AMOUNT                     {return $_[0]->_get_column('ACCELERATION_AMOUNT')}

1;

__END__