CreateSEPA_QRCode

Syntax

CreateSEPA_QRCode[$](InvoiceNumber, InvoiceAmount [,PixelSize][,UseExtraBankAccnt][,TextColor][,ShowAmount][,ShowName][,ShowInvNo][,ShowIBAN])

Description

If successful, returns the filename of a created QR code image file (.jpg), to automate payments via iPhone or Smartphone, according to SEPA standards.

Parameter	Description
InvoiceNumber	Invoice number, used as info in the format "Invoice No nnnnn".
InvoiceAmount	The amount requested for payment.
PixelSize	Optional, default 84. Renders the QR code in the preferred size, using resampling techniques.
UseExtraBankAccnt	Optional, default FALSE. When TRUE, the secondary bank account number, registered in the Admin Management application, will be used instead of the primary bank account.
TextColor	Optional, default blue. The QR code is accompanied with text items around the code. Different colors can be selected.
ShowAmount	Optional, default TRUE. Shows the invoice amount on top of the QR code.
ShowName	Optional, default TRUE. Shows the beneficiary name on the right side of the QR code. The company name, registered in the Admin Management application is used.
ShowInvNo	Optional, default TRUE. Shows the invoice number on the left side of the QR code.
ShowIBAN	Optiona, default TRUE. Shows the bank account number of the beneficiary.

Note: keep in mind that you need to remove the .jpg file manually after usage. It is stored in your personal Pictures folder.

Example:

See Also

Example

Sub Main

Dim sFile As String

sFile = CreateSEPA_QRCode(123456, 123.45, 96, False,QRtext_Green, True, True, True, True)

If Dir$(sFile) > "" Then

SQL.OpenTradiumDocument sFile

End If

Kill sFile

End Sub