File Coverage

blib/lib/Finance/AMEX/Transaction/GRRCN/Trailer.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod 5 5 100.0
total 27 27 100.0


line stmt bran cond sub pod time code
1             package Finance::AMEX::Transaction::GRRCN::Trailer 0.005;
2              
3 9     9   54 use strict;
  9         24  
  9         233  
4 9     9   40 use warnings;
  9         28  
  9         196  
5              
6             # ABSTRACT: Parse AMEX Transaction/Invoice Level Reconciliation (GRRCN) Trailer Rows
7              
8 9     9   41 use base 'Finance::AMEX::Transaction::GRRCN::Base';
  9         13  
  9         1698  
9              
10             sub field_map {
11             return [
12 4     4 1 36 {RECORD_TYPE => [1, 10]},
13             {SEQUENTIAL_NUMBER => [11, 10]},
14             {TOTAL_RECORD_COUNT => [21, 10]},
15             {FILLER1 => [31, 770]},
16             ];
17             }
18              
19 4     4 1 972 sub type {return 'TRAILER'}
20              
21 2     2 1 41 sub RECORD_TYPE {return $_[0]->_get_column('RECORD_TYPE')}
22 2     2 1 955 sub SEQUENTIAL_NUMBER {return $_[0]->_get_column('SEQUENTIAL_NUMBER')}
23 2     2 1 1020 sub TOTAL_RECORD_COUNT {return $_[0]->_get_column('TOTAL_RECORD_COUNT')}
24              
25             1;
26              
27             __END__