/* Creating New Invoice-Receipt with Multiple Items*/
| |
Item Code |
Item Description |
Item Quantity |
Item Price |
| Item 1 |
X1457 |
Brown Coffee Cup |
5 |
2.50 |
| Item 2 |
X1458 |
Black Coffee |
3 |
2.75 |
Username: myusername
Invoice Subject: Summer Presale
Item 1
Item Code: X1457
Item Description: Brown Coffee Cup
Item Quantity: 5
Item Price: 2.50
Item 2
Item Code: X1458
Item Description: Black Coffee
Item Quantity: 3
Item Price: 2.75
Invoice Discount: 1.75
Comments: Non-refundable
Company code: 999
HttpPost Sample
<form action='https://account.invoice4u.co.il/public/HttpPost.aspx' method="POST">
<input type="hidden" name="ReplyURL" value="ReturnPage.asp">
<input type="hidden" name="TransType" value="IR:CREATE">
<input type="hidden" name="Username" value="myusername">
<input type="hidden" name="InvoiceSubject" value="Summer Presale">
'// InvoiceItemCode, InvoiceItemDescription, InvoiceItemQuantity,
InvoiceItemPrice must have the same count of items.
'// Items are separated by the PIPE symbol.
<input type="hidden" name="InvoiceItemCode" value="X1457|X1458">
<input type="hidden" name="InvoiceItemDescription" value="Brown Coffee Cup|Black
Coffee">
<input type="hidden" name="InvoiceItemQuantity" value="5|3">
<input type="hidden" name="InvoiceItemPrice" value="2.50|2.75">
<input type="hidden" name="InvoiceDiscount" value="1.75">
<input type="hidden" name="InvoiceComments" value="Non-refundable">
<input type="hidden" name="CompanyCode" value="999">
<input type="submit" value="Submit">
</form>
WebService Sample
Private Function CreateInvoiceReceipt()
Dim A4U As New A4U_IR.w_invoicereceipt
Dim DS As New DataSet
DS = A4U.CREATE("myusername", KEY, "", "Summer Presale", "1.75", "", "X1457|X1458",
"Brown Coffee Cup|Black Coffee", "5|3", "2.50|2.75", "", "Non-refundable", "999", "", "", "")
With DS.Tables(0)
For i As Integer = 0 To .Rows.Count - 1
Response.Write("VAR: " & .Rows(i).Item(0) & " VALUE: " & .Rows(i).Item(1))
Next
End With
End Function
|