For invoices and bills to private customers.

First you check how the mobile app (Bank app) expects the data.

Code:
Line Example Values Description Own data 2 2 Version (001 oder 002) 001 3 2 Zeichencodierung (1= UTF-8, 2 = ISO 8859-1, 3 = ISO 8859-2, 4 = ISO 8859-4, 5 = ISO 8859-5, 6 = ISO 8859-7, 7 = ISO 8859-10, 8 = ISO 8859-15) 1 4 SCT SEPA Credit Transfer SCT 5 BFSWDE33BER BIC der Empfängerbank (im EWR optional[3]) SSKMDEMMXXX 6 Wikimedia Foerdergesellschaft Name des Zahlungsempfängers (maximal 70 Zeichen Text) Fritz Huber 7 DE33100205000001194700 Internationale Bankkontonummer (IBAN) des Zahlungsempfängers DE4270150000090500130 8 EUR123.45 Zahlungsbetrag (Format „EUR#.##“) EUR400.00EUR 9 CHAR Zweck (vierstelliger Buchstabencode, optional) 10 RF18 5390 0754 7034 Referenz (strukturierter 35-Zeichen-Code gem. ISO 11649 RF Creditor Reference)[4] 11 Spende fuer Wikipedia Verwendungszweck (unstrukturierter maximal 140 Zeichen langer Text)[4] Kaution Anzahlung 12 Hinweis an den Nutzer (optional)
1. They are usually expected as a composite string, whereby the individual data fields must be separated by Return (Chr (10) + Chr (13)).
2. Blancs may not appear in the individual data fields.
3. Numbers such as the amount must also be passed as a string and must have a period "." instead of a comma "," and before that the currency sign without Blanc afterwards.
4. For all fields for which no values have to be transferred (Ctr (10 + Ctr (13)) are transferred.

Now you create a function in which the data string is created correctly, e.g .:
Code:
Function
dim QRValue as global
dim total
dim IBAN
let IBAN = {BkAbrKop.EignerIBAN}
let IBAN = Replace (IBAN, "", "")
let total = Replace ({BkAbrKop.Total}, ",", ".")
let Total = Replace (Total, "-", "")
let Total = ("EUR" + Total)
let QRValue = "BCD" + Chr (13) + Chr (10) + "001" + Chr (13) + Chr (10) + "1" + Chr (13) + Chr (10) + "SCT" + Chr (13) + Chr (10) + ({BkAbrKop.EignerBIC}) + Chr (13) + Chr (10) + ({BkAbrKop.Eigner}) + Chr (13) + Chr (10) + IBAN + Chr (13 ) + Chr (10) + Total + Chr (13) + Chr (10) + "" + Chr (13) + Chr (10) + "" + Chr (13) + Chr (10) + "Credit BKAbr" + Chr (13) + Chr (10) + "" + Chr (13) + Chr (10)
return QrValue.
Then right-click on the created function and select "Barcode".
Then select "Field Properties" and there "Barcode" and set "QRCode" there.
With "Common" you can still fill in the "Suppress" function so that the QRcode is suppressed in the event of negative invoice amounts.

Thats all