developer:soap-1.4:methods:runquicksale

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
developer:soap-1.4:methods:runquicksale [2010/08/30 11:34]
tem
developer:soap-1.4:methods:runquicksale [2010/08/30 15:17] (current)
epouchak
Line 100: Line 100:
 } }
 </​code>​ </​code>​
- 
 ==== VB ==== ==== VB ====
 For directions on how to set up the WSDL link and create the "​token"​ and "​client"​ variables, go to the [[..:​howto:​vb|Visual Basic .Net Soap How-to]]. For directions on how to set up the WSDL link and create the "​token"​ and "​client"​ variables, go to the [[..:​howto:​vb|Visual Basic .Net Soap How-to]].
 <code vb> <code vb>
-    ​Dim client As usaepay.usaepayService = New usaepay.usaepayService +   Dim client As usaepay.usaepayService = New usaepay.usaepayService 
-    Dim token As usaepay.ueSecurityToken+        Dim token As usaepay.ueSecurityToken 
 + 
 +        token = Me.CreateToken("​714SSUxv1uohng2XkMJ7kLpETsu58G66",​ "​1234"​)
  
-    token = Me.CreateToken("​982lz9VsLm87MA54Sv8E582h8OZMArL6",​ "​443311"​) 
  
-    ​Dim refnum As Integer +        ​Dim refnum As Integer 
-    Dim details As usaepay.TransactionDetail = New usaepay.TransactionDetail +        Dim details As usaepay.TransactionDetail = New usaepay.TransactionDetail 
-    Dim authonly As Boolean+        Dim authonly As Boolean
  
-    ​refnum = "46352757+        ​refnum = "46990567
-    details.Amount = "​34.50"​ +        details.Amount = "​34.50"​ 
-    details.AmountSpecified = True +        details.AmountSpecified = True 
-    details.Description = "​Example QuickSale"​ +        details.Description = "​Example QuickSale"​ 
-    details.Invoice = "​123456"​+        details.Invoice = "​123456"​
  
-    ​authonly = False+        ​authonly = False
  
-    ​Dim response As usaepay.TransactionResponse+        ​Dim response As usaepay.TransactionResponse
  
-    ​response = client.runQuickSale(token,​ refnum, details, authonly)+        ​response = client.runQuickSale(token,​ refnum, details, authonly)
  
-    ​If response.ResultCode = "​A"​ Then +        ​If response.ResultCode = "​A"​ Then 
-      MsgBox("​Transaction Approved, ​Reference ​Number: " & response.RefNum) +            MsgBox("​Transaction Approved, ​Refernce ​Number: " & response.RefNum) 
-    ElseIf response.ResultCode = "​D"​ Then +        ElseIf response.ResultCode = "​D"​ Then 
-      MsgBox("​Transaction Declined, Reason: " & response.Error) +            MsgBox("​Transaction Declined, Reason: " & response.Error) 
-    Else +        Else 
-      MsgBox("​Transaction Error, Reason: " & response.Error) +            MsgBox("​Transaction Error, Reason: " & response.Error) 
-    End If+        End If
 </​code>​ </​code>​
  
developer/soap-1.4/methods/runquicksale.txt · Last modified: 2010/08/30 15:17 by epouchak

Page Tools