File Coverage

blib/lib/Finance/AMEX/Transaction/EPPRC/Trailer.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 12 12 100.0
pod 8 9 88.8
total 38 39 97.4


line stmt bran cond sub pod time code
1             package Finance::AMEX::Transaction::EPPRC::Trailer;
2             $Finance::AMEX::Transaction::EPPRC::Trailer::VERSION = '0.003';
3 7     7   47 use strict;
  7         15  
  7         183  
4 7     7   33 use warnings;
  7         13  
  7         172  
5              
6             # ABSTRACT: Parse AMEX Transaction/Invoice Level Reconciliation (EPPRC) Trailer Rows
7              
8 7     7   36 use base 'Finance::AMEX::Transaction::EPPRC::Base';
  7         16  
  7         2293  
9              
10             sub field_map {
11             return {
12 360     360 0 2943 DF_TRL_RECORD_TYPE => [1, 5],
13             DF_TRL_DATE => [6, 8],
14             DF_TRL_TIME => [14, 4],
15             DF_TRL_FILE_ID => [18, 6],
16             DF_TRL_FILE_NAME => [24, 20],
17             DF_TRL_RECIPIENT_KEY => [44, 40],
18             DF_TRL_RECORD_COUNT => [84, 7],
19             };
20             }
21              
22 90     90 1 25219 sub type {return 'TRAILER'}
23              
24 45     45 1 22659 sub DF_TRL_RECORD_TYPE {return $_[0]->_get_column('DF_TRL_RECORD_TYPE')}
25 45     45 1 23042 sub DF_TRL_DATE {return $_[0]->_get_column('DF_TRL_DATE')}
26 45     45 1 23603 sub DF_TRL_TIME {return $_[0]->_get_column('DF_TRL_TIME')}
27 45     45 1 21102 sub DF_TRL_FILE_ID {return $_[0]->_get_column('DF_TRL_FILE_ID')}
28 45     45 1 17368 sub DF_TRL_FILE_NAME {return $_[0]->_get_column('DF_TRL_FILE_NAME')}
29 45     45 1 17369 sub DF_TRL_RECIPIENT_KEY {return $_[0]->_get_column('DF_TRL_RECIPIENT_KEY')}
30 45     45 1 21023 sub DF_TRL_RECORD_COUNT {return $_[0]->_get_column('DF_TRL_RECORD_COUNT')}
31              
32             1;
33              
34             __END__