projects
/
Business-OnlinePayment.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
dad321f
)
add bank_city & bank_state to documentation
author
ivan
<ivan>
Tue, 24 Nov 2009 23:26:13 +0000
(23:26 +0000)
committer
ivan
<ivan>
Tue, 24 Nov 2009 23:26:13 +0000
(23:26 +0000)
Changes
patch
|
blob
|
history
OnlinePayment.pm
patch
|
blob
|
history
diff --git
a/Changes
b/Changes
index
40f2d26
..
a4255e8
100644
(file)
--- a/
Changes
+++ b/
Changes
@@
-1,11
+1,12
@@
Revision history for Perl extension Business::OnlinePayment.
3.01 unreleased
Revision history for Perl extension Business::OnlinePayment.
3.01 unreleased
- - Add
fields to documentation: tax, freight, duty, tax_exemp
t,
- po_number.
+ - Add
optional transaction fields to documentation: tax, freigh
t,
+
duty, tax_exempt,
po_number.
- Add return fields to documentation: order_number, avs_code,
cvv2_response, response_code, response_headers, response_page.
- Add beginning of introspection interface for processor modules.
- Add return fields to documentation: order_number, avs_code,
cvv2_response, response_code, response_headers, response_page.
- Add beginning of introspection interface for processor modules.
+ - Add electronic check fields to documentation: bank_city, bank_state
3.00 Mon Aug 17 15:55:11 PDT 2009
- It finally happened.
3.00 Mon Aug 17 15:55:11 PDT 2009
- It finally happened.
diff --git
a/OnlinePayment.pm
b/OnlinePayment.pm
index
7cdc10e
..
7cc39de
100644
(file)
--- a/
OnlinePayment.pm
+++ b/
OnlinePayment.pm
@@
-6,7
+6,7
@@
use Carp;
require 5.005;
require 5.005;
-$VERSION = '3.01_0
1
';
+$VERSION = '3.01_0
2
';
$VERSION = eval $VERSION; # modperlstyle: convert the string into a number
# Remember subclasses we have "wrapped" submit() with _pre_submit()
$VERSION = eval $VERSION; # modperlstyle: convert the string into a number
# Remember subclasses we have "wrapped" submit() with _pre_submit()
@@
-64,7
+64,7
@@
sub _info {
);
sub info {
);
sub info {
- my $class = shift;
+ my $class = shift;
#class or object
my $info = $class->_info;
if ( @_ ) {
my $key = shift;
my $info = $class->_info;
if ( @_ ) {
my $key = shift;
@@
-521,32
+521,36
@@
Recurring billing flag
=item account_number
=item account_number
-Bank account number for electronic checks or electronic funds
-transfer.
+Bank account number
=item routing_code
=item routing_code
-Bank's routing code for electronic checks or electronic funds
-transfer.
+Bank's routing code
=item account_type
=item account_type
-Account type for electronic checks or electronic funds transfer. Can be
-(case-insensitive): B<Personal Checking>, B<Personal Savings>,
-B<Business Checking> or B<Business Savings>.
+Account type. Can be (case-insensitive): B<Personal Checking>,
+B<Personal Savings>, B<Business Checking> or B<Business Savings>.
=item account_name
=item account_name
-Account holder's name for electronic checks or electronic funds
-transfer.
+Account holder's name.
=item bank_name
=item bank_name
-Bank's name for electronic checks or electronic funds transfer.
+Bank name.
+
+=item bank_city
+
+Bank city.
+
+=item bank_state
+
+Bank state.
=item check_type
=item check_type
-Check type
for electronic checks or electronic funds transfer
.
+Check type.
=item customer_org
=item customer_org
@@
-554,18
+558,15
@@
Customer organization type.
=item customer_ssn
=item customer_ssn
-Customer's social security number. Typically only required for
-electronic checks or electronic funds transfer.
+Customer's social security number.
=item license_num
=item license_num
-Customer's driver's license number. Typically only required for
-electronic checks or electronic funds transfer.
+Customer's driver's license number.
=item license_dob
=item license_dob
-Customer's date of birth. Typically only required for electronic
-checks or electronic funds transfer.
+Customer's date of birth.
=back
=back