Revision history for Business-OnlinePayment-Jety
+0.02 Fri Nov 6 11:45:48 PST 2009
+ - Use 111-111-1111 if no phone number is provided.
+
0.01 Wed Oct 21 21:38:52 PDT 2009
First version, released on an unsuspecting world.
use Tie::IxHash;
@ISA = qw(Business::OnlinePayment::HTTPS);
-$VERSION = '0.01';
+$VERSION = '0.02';
$me = 'Business::OnlinePayment::Jety';
$DEBUG = 0;
if(lc($content->{action}) ne 'normal authorization');
$content->{'function'} = 'echeck';
- $content->{'programdesc'} = '415-462-1624 Business::OnlinePayment::Jety';
+ $content->{'programdesc'} = "415-462-1624 Business::OnlinePayment::Jety v$VERSION";
$content->{'ref'} = time2str('%Y%m%d',time).'-'.int(rand(1000000));
+ $content->{'phone'} ||= '111-111-1111';
+
$content->{'bankname'} ||= 'unknown';
$content->{'bankcity'} ||= 'unknown';
$content->{'bankstate'} ||= 'XX';