File Coverage

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


line stmt bran cond sub pod time code
1             package Finance::AMEX::Transaction::EPRAW::Trailer 0.005;
2              
3 9     9   50 use strict;
  9         16  
  9         251  
4 9     9   40 use warnings;
  9         15  
  9         192  
5              
6             # ABSTRACT: Parse AMEX Reconciliation Files (EPRAW) Trailer Rows
7              
8 9     9   39 use base 'Finance::AMEX::Transaction::EPRAW::Base';
  9         23  
  9         2487  
9              
10             sub field_map {
11             return {
12 48     48 1 291 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 12     12 1 2666 sub type {return 'TRAILER'}
23              
24 6     6 1 2606 sub DF_TRL_RECORD_TYPE {return $_[0]->_get_column('DF_TRL_RECORD_TYPE')}
25 6     6 1 2262 sub DF_TRL_DATE {return $_[0]->_get_column('DF_TRL_DATE')}
26 6     6 1 1387 sub DF_TRL_TIME {return $_[0]->_get_column('DF_TRL_TIME')}
27 6     6 1 1746 sub DF_TRL_FILE_ID {return $_[0]->_get_column('DF_TRL_FILE_ID')}
28 6     6 1 2714 sub DF_TRL_FILE_NAME {return $_[0]->_get_column('DF_TRL_FILE_NAME')}
29 6     6 1 2612 sub DF_TRL_RECIPIENT_KEY {return $_[0]->_get_column('DF_TRL_RECIPIENT_KEY')}
30 6     6 1 2631 sub DF_TRL_RECORD_COUNT {return $_[0]->_get_column('DF_TRL_RECORD_COUNT')}
31              
32             1;
33              
34             __END__