NAME
Finance::AMEX::Transaction::CBNOT::Header - Parse AMEX Chargeback Notification Files (CBNOT) Header Rows
VERSION
version 0.001
SYNOPSIS
use Finance::AMEX::Transaction;
my $cbnot = Finance::AMEX::Transaction->new(file_type => 'CBNOT');
open my $fh, '<', '/path to CBNOT file' or die "cannot open CBNOT file: $!";
while (my $record = $cbnot->getline($fh)) {
if ($record->type eq 'HEADER') {
print $record->FILE_CREATION_DATE . "\n";
}
}
# to parse a single line
my $record = $cbnot->parse_line('line from a CBNOT file');
if ($record->type eq 'HEADER') {
...
}
DESCRIPTION
You would not normally be calling this module directly, it is one of the possible return objects from a call to Finance::AMEX::Transaction's getline method.
METHODS
new
Returns a new Finance::AMEX::Transaction::CBNOT::Header object.
my $record = Finance::AMEX::Transaction::CBNOT::Header->new(line => $line);
type
This will always return the string HEADER.
print $record->type; # HEADER
line
Returns the full line that is represented by this object.
print $record->line;
REC_TYPE
This field contains the constant literal "H", a Record Type code that indicates that this is a Chargeback Notifications (CBNOT) File Header Record.
print $record->REC_TYPE; # H
AMEX_APPL_AREA
This field contains the internal American Express data.
APPLICATION_SYSTEM_CODE
Not defined in the documentation.
FILE_TYPE_CODE
Not defined in the documentation.
FILE_CREATION_DATE
Not defined in the documentation.
SAID
This field contains the American Express-assigned, six-character, Service Access ID (SAID).
DATATYPE
This field contains the constant literal "CBNOT", a Data Type code that indicates that these are chargebacks from upstream systems.
CCYYDDD
This field contains the STARS creation date, which is the date that American Express transmitted the file to the merchant.
NAME
Finance::AMEX::Transaction::CBNOT::Header - Object methods for AMEX chargeback notification file header records.
AUTHOR
Tom Heady <theady@ziprecruiter.com>
COPYRIGHT AND LICENSE
This software is copyright (c) 2018 by ZipRecruiter.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.