Как добавить Swiss QR-код в счёт на Delphi и Lazarus
Сейчас многие страны проводят «диджитализацию» платежных систем, то есть оцифровывание. Самый распространенный способ автоматизации платежей – использовать QR коды, которые легко считываются смартфонами. Возможность кодировать достаточно большое количество информации, высокая устойчивость к повреждению, не требуют специализированного оборудования для считывания – вот главные преимущества QR кода, которые сделали его популярным во всем мире.
Руководство Швейцарии также решили использовать QR-коды для обеспечения электронных платежей. Это означает, что во всех квитанциях об оплате и счетах будут использоваться эти коды.
В связи с этим, в генераторе отчетов FastReport VCL появилась поддержка Swiss QR code. И хоть Swiss QR это просто разновидность QR кода, его принято использовать в определенной форме Swiss bill. Она достаточно проста и содержит информацию о: получателе платежа, плательщике, счете, ссылке на платеж и сумме.
Давайте добавим в шаблон отчета штрихкод Swiss QR.
Здесь мы добавили обычный QR код. Чтобы превратить его в Swiss QR сделайте клик по нему и в инспекторе объектов выберите TfrxSwissPaymentPreset для свойства ExpressionPreset.PresetClass.
QR-код изменился. Теперь в его центре появился швейцарский крест.
После этого в ExpressionPreset.DataObject станут доступны параметры, используемые для построения Swiss QR-кода.
Рассмотрим эти параметры подробнее:
Additional Information
Выставитель счета может ввести какую-либо дополнительную структурированную/неструктурированную информацию для плательщика.
Alternative Schemes
Предполагается, что в будущем выставители счета могут предлагать альтернативные банковским переводам процедуры. Для этого предусмотрено два поля в Swiss QR.
Creditor
Заполняем данные о выставителе счета. Название организации и адрес.
Creditor Information
Iban
В Швейцарии используется стандарт IBAN (International Bank Account Number) для представления номера банковского счета. Из названия понятно, что это международный стандарт, который зарегистрирован в ISO под номером 13616.
Payment Amount Info
Amount
Тут указывается сумма оплаты.
Currency
Так как система оплаты Швейцарская, то предполагается два типа валюты: евро и швейцарские франки (CHF).
Payment Reference
Ссылка на платеж плательщика, которая нужна получателю платежа.
Type:
- frRT_QRR - QR-ссылка: швейцарский стандарт ссылки длиной 26 символов (только цифры);
- frRT_SCOR - Ссылка кредитора: международный стандарт длиной от 5 до 25 символов;
- frRT_NON - ссылка может быть пустой.
Ultimate Creditor
Данные о выставителе счета (предназначено только для дополнительной информации, в случае ее использования в будущем.)
Ultimate Debitor
Здесь необходимо заполнить данные о плательщике: ФИО или наименование организации и адрес.
Далее заполняем значения параметров. Они являются выражениями, поэтому можно либо перетащить поля из дерева данных (в версии FR VCL 6.7 добавлена такая возможность) , либо внести фиксированные данные. Обратите внимание на то что фиксированные строковые параметры должны быть заключены в кавычки (для Pascal Script это одинарные кавычки).
Отключите отображение текста под кодом в свойствах объекта TfrxBarcode2DView.ShowText := False.
Если все данные заполнены правильно, то никаких предупреждающих сообщений не последует, а Swiss QR-код в окне предварительного просмотра изменится.
Теперь и в FastReport VCL можно без труда создать Swiss QR счет, что является ещё одним поводом для апгрейда или обновления на FR VCL 6.7
