From 622a7ed7d079b7ae183053d2f807c862cc015db7 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Wed, 11 Jul 2012 16:03:18 -0700 Subject: error callbacks, more structure for parse/format methods --- BatchPayment/Batch.pm | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'BatchPayment/Batch.pm') diff --git a/BatchPayment/Batch.pm b/BatchPayment/Batch.pm index eb6716e..d31baae 100644 --- a/BatchPayment/Batch.pm +++ b/BatchPayment/Batch.pm @@ -12,6 +12,9 @@ to a bank (or returned from a bank) as a batch. =over 4 +=item incoming - Flag for one-way batches. The processor must set +this if the batch was originated by the gateway. + =item batch_id - Batch identifier. The format is processor-specific but usually must be a positive integer, if it's used at all. @@ -30,8 +33,14 @@ included in the batch. package Business::BatchPayment::Batch; +use strict; use Moose; +has incoming => ( + is => 'rw', + isa => 'Bool', +); + has batch_id => ( is => 'rw', isa => 'Str', -- cgit v1.2.1