File Coverage

blib/lib/Business/NAB/BPAY/Payments/Results/HeaderRecord.pm

Criterion	Covered	Total	%
statement	9	9	100.0
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	12	12	100.0

package Business::NAB::BPAY::Payments::Results::HeaderRecord;
$Business::NAB::BPAY::Payments::Results::HeaderRecord::VERSION = '0.03';
=head1 NAME

Business::NAB::BPAY::Payments::Results::HeaderRecord

=head1 SYNOPSIS

    use Business::NAB::BPAY::Payments::HeaderRecord;

    # parse
    my $Header = Business::NAB::BPAY::Payments::HeaderRecord
        ->new_from_record( $line );

    # create
    my $Header = Business::NAB::BPAY::Payments::Results::HeaderRecord->new(
        bpay_batch_user_id => '01',
        customer_short_name => 'NAB',
        processing_date => DateTime->now,
    );

    my $line = $Header->to_record;

=head1 DESCRIPTION

Class for header record in the "BPAY Batch User Guide" responses

All methods and attributes are inherited from
L<Business::NAB::BPAY::Payments::HeaderRecord>

=cut

use strict;
use warnings;

use Moose;
extends 'Business::NAB::BPAY::Payments::HeaderRecord';

=head1 SEE ALSO

L<Business::NAB::Types>

L<Business::NAB::BPAY::Payments::Results::HeaderRecord>

=cut

__PACKAGE__->meta->make_immutable;