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 4 5 80.0
total 26 27 96.3


line stmt bran cond sub pod time code
1             package Finance::AMEX::Transaction::GRRCN::Trailer;
2             $Finance::AMEX::Transaction::GRRCN::Trailer::VERSION = '0.003';
3 7     7   45 use strict;
  7         15  
  7         194  
4 7     7   37 use warnings;
  7         15  
  7         171  
5              
6             # ABSTRACT: Parse AMEX Transaction/Invoice Level Reconciliation (GRRCN) Trailer Rows
7              
8 7     7   35 use base 'Finance::AMEX::Transaction::GRRCN::Base';
  7         16  
  7         1440  
9              
10             sub field_map {
11             return {
12 2     2 0 16 RECORD_TYPE => [1, 10],
13             SEQUENTIAL_NUMBER => [11, 10],
14             TOTAL_RECORD_COUNT => [21, 7],
15             };
16             }
17              
18 2     2 1 467 sub type {return 'TRAILER'}
19              
20 1     1 1 469 sub RECORD_TYPE {return $_[0]->_get_column('RECORD_TYPE')}
21 1     1 1 460 sub SEQUENTIAL_NUMBER {return $_[0]->_get_column('SEQUENTIAL_NUMBER')}
22 1     1 1 8 sub TOTAL_RECORD_COUNT {return $_[0]->_get_column('TOTAL_RECORD_COUNT')}
23              
24             1;
25              
26             __END__