Dynamics Community Forum Thread Details

Unable To scan QR code on Invoice

Dear Team,

I have created below code to generate QR code and print on sales invoice. I'm working on business central cloud India localization. After scanning QR code on invoice, Getting error Message "Unable to verify Qr code as Digital signature is invalid". Can anyone suggest me how i can achieve this?

local procedure GenerateQRCode(SalInvHeader: Record "Sales Invoice Header"; SignQr: Text)
    var
        BarcodeSymbology2D: Enum "Barcode Symbology 2D";
        BarcodeFontProvider2D: Interface "Barcode Font Provider 2D";
        BarcodeString: Text;
        QRCode: Text;
        os: OutStream;
        Mystream: InStream;
        EinvoiceLedger: Record EInvoiceLedgerEntries;
        Os_iIN: OutStream;
        Is_iIN: InStream;
        TempBlob: Codeunit "Temp Blob";
        QRgenerator: Codeunit "QR Generator";

    begin

        QRCode := SignQr;
        TempBlob.CreateInStream(Is_iIN);
        QRgenerator.GenerateQRCodeImage(QRCode, TempBlob);

SalInvHeader."QR Code".CreateOutStream(os);

CopyStream(os,Is_iIN);
SalInvHeader.Modify();

        EinvoiceLedger.Reset();
        EinvoiceLedger.SetRange("Document No", SalInvHeader."No.");
        if EinvoiceLedger.FindFirst() then begin
          // EinvoiceLedger.QR

                 QRCode := SignQr;
        TempBlob.CreateInStream(Is_iIN);
        QRgenerator.GenerateQRCodeImage(QRCode, TempBlob);

EinvoiceLedger.QR.CreateOutStream(os);

        CopyStream(os,Is_iIN);
        EinvoiceLedger.Modify();
        end;

    end;

Categories:

Business Central

Quick Links

Leaderboard