Revision history for Business-BatchPayment-Paymentech
+0.06 Wed Dec 21 15:08:00 PST 2016
+ - Add with_recurringInd option to control use of recurring indicator.
+
0.05 Tue Jan 26 15:51:53 PST 2016
- enforce field lengths in raw bytes
- support recurring_billing flag
industryType => 'EC'
login => 'TESTUSER',
password => 'MYPASS',
+ with_recurringInd => 1,
);
my $result = $processor->submit(@items);
=item industryType - your 2-letter industry type code
+=item with_recurringInd - enable the recurring charge indicator field
+
=back
=cut
required => 1,
);
+has 'with_recurringInd' => (
+ is => 'ro',
+ isa => 'Bool',
+ default => 0,
+);
+
has 'fileDateTime' => (
is => 'ro',
isa => 'Str',
} else {
die "payment type ".$item->type." not supported";
}
- if ( $item->recurring_billing eq 'F' ) {
- push @order, ( recurringInd => 'RF' );
- } elsif ( $item->recurring_billing eq 'S' ) {
- push @order, ( recurringInd => 'RS' );
+ if ( $self->with_recurringInd ) {
+ if ( $item->recurring_billing eq 'F' ) {
+ push @order, ( recurringInd => 'RF' );
+ } elsif ( $item->recurring_billing eq 'S' ) {
+ push @order, ( recurringInd => 'RS' );
+ }
} # else don't send recurringInd at all
push @order, (
+libbusiness-batchpayment-paymentech-perl (0.06) unstable; urgency=medium
+
+ * Add with_recurringInd option to control use of recurring indicator.
+
+ -- Mark Wells <mark@freeside.biz> Wed, 21 Dec 2016 15:07:01 -0800
+
libbusiness-batchpayment-paymentech-perl (0.05) unstable; urgency=low
* Initial Debian package release.
Priority: optional
Maintainer: Mark Wells <mark@freeside.biz>
Build-Depends: debhelper (>= 9)
-Build-Depends-Indep: libbusiness-batchpayment-perl (>= 0.03),
- libmoose-perl (>= 1.09),
- libxml-writer-perl,
- libxml-simple-perl,
- libdatetime-perl,
- perl
+Build-Depends-Indep: perl
Standards-Version: 3.9.5
Homepage: https://metacpan.org/release/Business-BatchPayment-Paymentech
Package: libbusiness-batchpayment-paymentech-perl
Architecture: all
-Depends: ${misc:Depends}, ${perl:Depends},
- libbusiness-batchpayment-perl,
+Depends:
+ libbusiness-batchpayment-perl (>= 0.03),
+ libxml-writer-perl,
+ libxml-simple-perl,
+ libdatetime-perl,
libmoose-perl (>= 1.09)
Description: Chase Paymentech XML batch format.
(no description was found)
#!/usr/bin/make -f
+override_dh_auto_test:
+
%:
dh $@