X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=t%2Flib%2Ftest_account.pl;fp=t%2Flib%2Ftest_account.pl;h=69f8c8977c9c48aa4f5f8ffe9f3ede2ce9210b95;hb=1e90419f5b23ab4b4fe17b5861958d75ac285c4d;hp=0000000000000000000000000000000000000000;hpb=7f323b74306dfa89de073a2ca5a34e76537815a7;p=Business-OnlinePayment-vSecureProcessing.git

diff --git a/t/lib/test_account.pl b/t/lib/test_account.pl
new file mode 100644
index 0000000..69f8c89
--- /dev/null
+++ b/t/lib/test_account.pl
@@ -0,0 +1,29 @@
+
+sub test_account {
+    # fill all these fields in to test out transactions
+    my %opts = (
+        server =>'', # be sure to leave out the 'https://'
+        platform => '',
+        gid => '',
+        tid => '',
+        userid=> 'name@server.com',
+        port => 443,
+        env => 'test',
+        appid => ''
+    );
+
+    return %opts;
+}
+
+sub expiration_date {
+    my($month, $year) = (localtime)[4,5];
+    $month += 1;
+    $year++;       # So we expire next year.
+    $year %= 100;
+
+    return sprintf("%02d/%02d", $month, $year);
+}
+
+
+1;
+