8. November 2022 10:05
8. November 2022 11:18
8. November 2022 11:21
8. November 2022 12:07
// Create QRCode
SalesInvoiceHeader.CALCFIELDS("Amount Including VAT");
IF NOT Reverse THEN BEGIN
QRCodeInput := CreateQRCodeInput(CompanyInfo."RFC No.",Customer."RFC No.",SalesInvoiceHeader."Amount Including VAT",
FORMAT(SalesInvoiceHeader."Fiscal Invoice Number PAC"));
CreateQRCode(QRCodeInput,TempBlob);
SalesInvoiceHeader."QR Code" := TempBlob.Blob;
END ELSE BEGIN
QRCodeInput := CreateQRCodeInput(CompanyInfo."RFC No.",Customer."RFC No.",SalesInvoiceHeader."Amount Including VAT",
FORMAT(CFDIDocuments."Fiscal Invoice Number PAC"));
CreateQRCode(QRCodeInput,TempBlob);
CFDIDocuments."QR Code" := TempBlob.Blob;
CFDIDocuments.MODIFY;
END;
END;