procedure TUFinaliza_Venda.GerarQRCode;
begin
with UconfigNFCE do
begin
MemoDados.text := ACBrNFe1.GetURLQRCode(ACBrNFe1.NotasFiscais.Items[0]
.NFe.Ide.cUF, ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpAmb,
UPrincipal.somenteNumero(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.Id),
ACBrNFe1.NotasFiscais.Items[0].NFe.Dest.CNPJCPF,
ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dEmi,
ACBrNFe1.NotasFiscais.Items[0].NFe.Total.ICMSTot.vNF,
ACBrNFe1.NotasFiscais.Items[0].NFe.Total.ICMSTot.vICMS,
ACBrNFe1.NotasFiscais.Items[0].NFe.signature.DigestValue, ecIdToken,
ecTokenNumero);
end;
end;
dessa forma da erro [Error] UnFinalizaVenda.pas(1681): Not enough actual parameters
se Coloco NotaUtil da Erro - [Error] UnFinalizaVenda.pas(1679): Undeclared identifier: 'NotaUtil'
sendo que [ecidToken e ecTokenNumero e do Tipo String].
Alguem pode me ajudar?